unit schStockServer_Intf;

interface

uses
  Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, FmtBCD, uROXMLIntf, schStockClient_Intf;

const
  { Delta rules ids 
       Feel free to change them to something more human readable
       but make sure they are unique in the context of your application }
  RID_StockPrendasCentrosDelta = '{2476F86D-B208-4B1A-AA95-6030CAE36358}';
  RID_StockEDIDelta = '{BED82601-A705-4D03-B69F-5FD5869D53C3}';
  RID_StockVARELADelta = '{BD23D312-D161-4618-B40A-D04C1B3BA517}';
  RID_StockEDIInventario2Delta = '{A5CF6999-D054-4BE3-B0E9-9BD78F6E8366}';
  RID_StockEDIInventarioDelta = '{FE54E63F-0508-4E10-95DF-76550B8A5B50}';

type
  { IStockPrendasCentrosDelta }
  IStockPrendasCentrosDelta = interface(IStockPrendasCentros)
  ['{2476F86D-B208-4B1A-AA95-6030CAE36358}']
    { Property getters and setters }
    function GetOldCODIGOValue : String;
    function GetOldPRODUCTOValue : String;
    function GetOldTIPO_PRODUCTOValue : String;
    function GetOldGRUPO_PRODUCTOValue : String;
    function GetOldCOLECCIONValue : String;
    function GetOldCOLORValue : String;
    function GetOldT38Value : Float;
    function GetOldT40Value : Float;
    function GetOldT42Value : Float;
    function GetOldT44Value : Float;
    function GetOldT46Value : Float;
    function GetOldT48Value : Float;
    function GetOldTOTALValue : Float;

    { Properties }
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldT38 : Float read GetOldT38Value;
    property OldT40 : Float read GetOldT40Value;
    property OldT42 : Float read GetOldT42Value;
    property OldT44 : Float read GetOldT44Value;
    property OldT46 : Float read GetOldT46Value;
    property OldT48 : Float read GetOldT48Value;
    property OldTOTAL : Float read GetOldTOTALValue;
  end;

  { TStockPrendasCentrosBusinessProcessorRules }
  TStockPrendasCentrosBusinessProcessorRules = class(TDABusinessProcessorRules, IStockPrendasCentros, IStockPrendasCentrosDelta)
  private
  protected
    { Property getters and setters }
    function GetCODIGOValue: String; virtual;
    function GetCODIGOIsNull: Boolean; virtual;
    function GetOldCODIGOValue: String; virtual;
    function GetOldCODIGOIsNull: Boolean; virtual;
    procedure SetCODIGOValue(const aValue: String); virtual;
    procedure SetCODIGOIsNull(const aValue: Boolean); virtual;
    function GetPRODUCTOValue: String; virtual;
    function GetPRODUCTOIsNull: Boolean; virtual;
    function GetOldPRODUCTOValue: String; virtual;
    function GetOldPRODUCTOIsNull: Boolean; virtual;
    procedure SetPRODUCTOValue(const aValue: String); virtual;
    procedure SetPRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetTIPO_PRODUCTOValue: String; virtual;
    function GetTIPO_PRODUCTOIsNull: Boolean; virtual;
    function GetOldTIPO_PRODUCTOValue: String; virtual;
    function GetOldTIPO_PRODUCTOIsNull: Boolean; virtual;
    procedure SetTIPO_PRODUCTOValue(const aValue: String); virtual;
    procedure SetTIPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetGRUPO_PRODUCTOValue: String; virtual;
    function GetGRUPO_PRODUCTOIsNull: Boolean; virtual;
    function GetOldGRUPO_PRODUCTOValue: String; virtual;
    function GetOldGRUPO_PRODUCTOIsNull: Boolean; virtual;
    procedure SetGRUPO_PRODUCTOValue(const aValue: String); virtual;
    procedure SetGRUPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetCOLECCIONValue: String; virtual;
    function GetCOLECCIONIsNull: Boolean; virtual;
    function GetOldCOLECCIONValue: String; virtual;
    function GetOldCOLECCIONIsNull: Boolean; virtual;
    procedure SetCOLECCIONValue(const aValue: String); virtual;
    procedure SetCOLECCIONIsNull(const aValue: Boolean); virtual;
    function GetCOLORValue: String; virtual;
    function GetCOLORIsNull: Boolean; virtual;
    function GetOldCOLORValue: String; virtual;
    function GetOldCOLORIsNull: Boolean; virtual;
    procedure SetCOLORValue(const aValue: String); virtual;
    procedure SetCOLORIsNull(const aValue: Boolean); virtual;
    function GetT38Value: Float; virtual;
    function GetT38IsNull: Boolean; virtual;
    function GetOldT38Value: Float; virtual;
    function GetOldT38IsNull: Boolean; virtual;
    procedure SetT38Value(const aValue: Float); virtual;
    procedure SetT38IsNull(const aValue: Boolean); virtual;
    function GetT40Value: Float; virtual;
    function GetT40IsNull: Boolean; virtual;
    function GetOldT40Value: Float; virtual;
    function GetOldT40IsNull: Boolean; virtual;
    procedure SetT40Value(const aValue: Float); virtual;
    procedure SetT40IsNull(const aValue: Boolean); virtual;
    function GetT42Value: Float; virtual;
    function GetT42IsNull: Boolean; virtual;
    function GetOldT42Value: Float; virtual;
    function GetOldT42IsNull: Boolean; virtual;
    procedure SetT42Value(const aValue: Float); virtual;
    procedure SetT42IsNull(const aValue: Boolean); virtual;
    function GetT44Value: Float; virtual;
    function GetT44IsNull: Boolean; virtual;
    function GetOldT44Value: Float; virtual;
    function GetOldT44IsNull: Boolean; virtual;
    procedure SetT44Value(const aValue: Float); virtual;
    procedure SetT44IsNull(const aValue: Boolean); virtual;
    function GetT46Value: Float; virtual;
    function GetT46IsNull: Boolean; virtual;
    function GetOldT46Value: Float; virtual;
    function GetOldT46IsNull: Boolean; virtual;
    procedure SetT46Value(const aValue: Float); virtual;
    procedure SetT46IsNull(const aValue: Boolean); virtual;
    function GetT48Value: Float; virtual;
    function GetT48IsNull: Boolean; virtual;
    function GetOldT48Value: Float; virtual;
    function GetOldT48IsNull: Boolean; virtual;
    procedure SetT48Value(const aValue: Float); virtual;
    procedure SetT48IsNull(const aValue: Boolean); virtual;
    function GetTOTALValue: Float; virtual;
    function GetTOTALIsNull: Boolean; virtual;
    function GetOldTOTALValue: Float; virtual;
    function GetOldTOTALIsNull: Boolean; virtual;
    procedure SetTOTALValue(const aValue: Float); virtual;
    procedure SetTOTALIsNull(const aValue: Boolean); virtual;

    { Properties }
    property CODIGO : String read GetCODIGOValue write SetCODIGOValue;
    property CODIGOIsNull : Boolean read GetCODIGOIsNull write SetCODIGOIsNull;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldCODIGOIsNull : Boolean read GetOldCODIGOIsNull;
    property PRODUCTO : String read GetPRODUCTOValue write SetPRODUCTOValue;
    property PRODUCTOIsNull : Boolean read GetPRODUCTOIsNull write SetPRODUCTOIsNull;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldPRODUCTOIsNull : Boolean read GetOldPRODUCTOIsNull;
    property TIPO_PRODUCTO : String read GetTIPO_PRODUCTOValue write SetTIPO_PRODUCTOValue;
    property TIPO_PRODUCTOIsNull : Boolean read GetTIPO_PRODUCTOIsNull write SetTIPO_PRODUCTOIsNull;
    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
    property OldTIPO_PRODUCTOIsNull : Boolean read GetOldTIPO_PRODUCTOIsNull;
    property GRUPO_PRODUCTO : String read GetGRUPO_PRODUCTOValue write SetGRUPO_PRODUCTOValue;
    property GRUPO_PRODUCTOIsNull : Boolean read GetGRUPO_PRODUCTOIsNull write SetGRUPO_PRODUCTOIsNull;
    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
    property OldGRUPO_PRODUCTOIsNull : Boolean read GetOldGRUPO_PRODUCTOIsNull;
    property COLECCION : String read GetCOLECCIONValue write SetCOLECCIONValue;
    property COLECCIONIsNull : Boolean read GetCOLECCIONIsNull write SetCOLECCIONIsNull;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldCOLECCIONIsNull : Boolean read GetOldCOLECCIONIsNull;
    property COLOR : String read GetCOLORValue write SetCOLORValue;
    property COLORIsNull : Boolean read GetCOLORIsNull write SetCOLORIsNull;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldCOLORIsNull : Boolean read GetOldCOLORIsNull;
    property T38 : Float read GetT38Value write SetT38Value;
    property T38IsNull : Boolean read GetT38IsNull write SetT38IsNull;
    property OldT38 : Float read GetOldT38Value;
    property OldT38IsNull : Boolean read GetOldT38IsNull;
    property T40 : Float read GetT40Value write SetT40Value;
    property T40IsNull : Boolean read GetT40IsNull write SetT40IsNull;
    property OldT40 : Float read GetOldT40Value;
    property OldT40IsNull : Boolean read GetOldT40IsNull;
    property T42 : Float read GetT42Value write SetT42Value;
    property T42IsNull : Boolean read GetT42IsNull write SetT42IsNull;
    property OldT42 : Float read GetOldT42Value;
    property OldT42IsNull : Boolean read GetOldT42IsNull;
    property T44 : Float read GetT44Value write SetT44Value;
    property T44IsNull : Boolean read GetT44IsNull write SetT44IsNull;
    property OldT44 : Float read GetOldT44Value;
    property OldT44IsNull : Boolean read GetOldT44IsNull;
    property T46 : Float read GetT46Value write SetT46Value;
    property T46IsNull : Boolean read GetT46IsNull write SetT46IsNull;
    property OldT46 : Float read GetOldT46Value;
    property OldT46IsNull : Boolean read GetOldT46IsNull;
    property T48 : Float read GetT48Value write SetT48Value;
    property T48IsNull : Boolean read GetT48IsNull write SetT48IsNull;
    property OldT48 : Float read GetOldT48Value;
    property OldT48IsNull : Boolean read GetOldT48IsNull;
    property TOTAL : Float read GetTOTALValue write SetTOTALValue;
    property TOTALIsNull : Boolean read GetTOTALIsNull write SetTOTALIsNull;
    property OldTOTAL : Float read GetOldTOTALValue;
    property OldTOTALIsNull : Boolean read GetOldTOTALIsNull;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

  { IStockEDIDelta }
  IStockEDIDelta = interface(IStockEDI)
  ['{BED82601-A705-4D03-B69F-5FD5869D53C3}']
    { Property getters and setters }
    function GetOldCENTROValue : String;
    function GetOldFILIALValue : String;
    function GetOldCODIGOValue : String;
    function GetOldPRODUCTOValue : String;
    function GetOldTIPO_PRODUCTOValue : String;
    function GetOldGRUPO_PRODUCTOValue : String;
    function GetOldCOLECCIONValue : String;
    function GetOldCOLORValue : String;
    function GetOldE38Value : Float;
    function GetOldE40Value : Float;
    function GetOldE42Value : Float;
    function GetOldE44Value : Float;
    function GetOldE46Value : Float;
    function GetOldE48Value : Float;
    function GetOldTEValue : Float;
    function GetOldS38Value : Float;
    function GetOldS40Value : Float;
    function GetOldS42Value : Float;
    function GetOldS44Value : Float;
    function GetOldS46Value : Float;
    function GetOldS48Value : Float;
    function GetOldTSValue : Float;
    function GetOldK38Value : Float;
    function GetOldK40Value : Float;
    function GetOldK42Value : Float;
    function GetOldK44Value : Float;
    function GetOldK46Value : Float;
    function GetOldK48Value : Float;
    function GetOldKTValue : Float;

    { Properties }
    property OldCENTRO : String read GetOldCENTROValue;
    property OldFILIAL : String read GetOldFILIALValue;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldE38 : Float read GetOldE38Value;
    property OldE40 : Float read GetOldE40Value;
    property OldE42 : Float read GetOldE42Value;
    property OldE44 : Float read GetOldE44Value;
    property OldE46 : Float read GetOldE46Value;
    property OldE48 : Float read GetOldE48Value;
    property OldTE : Float read GetOldTEValue;
    property OldS38 : Float read GetOldS38Value;
    property OldS40 : Float read GetOldS40Value;
    property OldS42 : Float read GetOldS42Value;
    property OldS44 : Float read GetOldS44Value;
    property OldS46 : Float read GetOldS46Value;
    property OldS48 : Float read GetOldS48Value;
    property OldTS : Float read GetOldTSValue;
    property OldK38 : Float read GetOldK38Value;
    property OldK40 : Float read GetOldK40Value;
    property OldK42 : Float read GetOldK42Value;
    property OldK44 : Float read GetOldK44Value;
    property OldK46 : Float read GetOldK46Value;
    property OldK48 : Float read GetOldK48Value;
    property OldKT : Float read GetOldKTValue;
  end;

  { TStockEDIBusinessProcessorRules }
  TStockEDIBusinessProcessorRules = class(TDABusinessProcessorRules, IStockEDI, IStockEDIDelta)
  private
  protected
    { Property getters and setters }
    function GetCENTROValue: String; virtual;
    function GetCENTROIsNull: Boolean; virtual;
    function GetOldCENTROValue: String; virtual;
    function GetOldCENTROIsNull: Boolean; virtual;
    procedure SetCENTROValue(const aValue: String); virtual;
    procedure SetCENTROIsNull(const aValue: Boolean); virtual;
    function GetFILIALValue: String; virtual;
    function GetFILIALIsNull: Boolean; virtual;
    function GetOldFILIALValue: String; virtual;
    function GetOldFILIALIsNull: Boolean; virtual;
    procedure SetFILIALValue(const aValue: String); virtual;
    procedure SetFILIALIsNull(const aValue: Boolean); virtual;
    function GetCODIGOValue: String; virtual;
    function GetCODIGOIsNull: Boolean; virtual;
    function GetOldCODIGOValue: String; virtual;
    function GetOldCODIGOIsNull: Boolean; virtual;
    procedure SetCODIGOValue(const aValue: String); virtual;
    procedure SetCODIGOIsNull(const aValue: Boolean); virtual;
    function GetPRODUCTOValue: String; virtual;
    function GetPRODUCTOIsNull: Boolean; virtual;
    function GetOldPRODUCTOValue: String; virtual;
    function GetOldPRODUCTOIsNull: Boolean; virtual;
    procedure SetPRODUCTOValue(const aValue: String); virtual;
    procedure SetPRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetTIPO_PRODUCTOValue: String; virtual;
    function GetTIPO_PRODUCTOIsNull: Boolean; virtual;
    function GetOldTIPO_PRODUCTOValue: String; virtual;
    function GetOldTIPO_PRODUCTOIsNull: Boolean; virtual;
    procedure SetTIPO_PRODUCTOValue(const aValue: String); virtual;
    procedure SetTIPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetGRUPO_PRODUCTOValue: String; virtual;
    function GetGRUPO_PRODUCTOIsNull: Boolean; virtual;
    function GetOldGRUPO_PRODUCTOValue: String; virtual;
    function GetOldGRUPO_PRODUCTOIsNull: Boolean; virtual;
    procedure SetGRUPO_PRODUCTOValue(const aValue: String); virtual;
    procedure SetGRUPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetCOLECCIONValue: String; virtual;
    function GetCOLECCIONIsNull: Boolean; virtual;
    function GetOldCOLECCIONValue: String; virtual;
    function GetOldCOLECCIONIsNull: Boolean; virtual;
    procedure SetCOLECCIONValue(const aValue: String); virtual;
    procedure SetCOLECCIONIsNull(const aValue: Boolean); virtual;
    function GetCOLORValue: String; virtual;
    function GetCOLORIsNull: Boolean; virtual;
    function GetOldCOLORValue: String; virtual;
    function GetOldCOLORIsNull: Boolean; virtual;
    procedure SetCOLORValue(const aValue: String); virtual;
    procedure SetCOLORIsNull(const aValue: Boolean); virtual;
    function GetE38Value: Float; virtual;
    function GetE38IsNull: Boolean; virtual;
    function GetOldE38Value: Float; virtual;
    function GetOldE38IsNull: Boolean; virtual;
    procedure SetE38Value(const aValue: Float); virtual;
    procedure SetE38IsNull(const aValue: Boolean); virtual;
    function GetE40Value: Float; virtual;
    function GetE40IsNull: Boolean; virtual;
    function GetOldE40Value: Float; virtual;
    function GetOldE40IsNull: Boolean; virtual;
    procedure SetE40Value(const aValue: Float); virtual;
    procedure SetE40IsNull(const aValue: Boolean); virtual;
    function GetE42Value: Float; virtual;
    function GetE42IsNull: Boolean; virtual;
    function GetOldE42Value: Float; virtual;
    function GetOldE42IsNull: Boolean; virtual;
    procedure SetE42Value(const aValue: Float); virtual;
    procedure SetE42IsNull(const aValue: Boolean); virtual;
    function GetE44Value: Float; virtual;
    function GetE44IsNull: Boolean; virtual;
    function GetOldE44Value: Float; virtual;
    function GetOldE44IsNull: Boolean; virtual;
    procedure SetE44Value(const aValue: Float); virtual;
    procedure SetE44IsNull(const aValue: Boolean); virtual;
    function GetE46Value: Float; virtual;
    function GetE46IsNull: Boolean; virtual;
    function GetOldE46Value: Float; virtual;
    function GetOldE46IsNull: Boolean; virtual;
    procedure SetE46Value(const aValue: Float); virtual;
    procedure SetE46IsNull(const aValue: Boolean); virtual;
    function GetE48Value: Float; virtual;
    function GetE48IsNull: Boolean; virtual;
    function GetOldE48Value: Float; virtual;
    function GetOldE48IsNull: Boolean; virtual;
    procedure SetE48Value(const aValue: Float); virtual;
    procedure SetE48IsNull(const aValue: Boolean); virtual;
    function GetTEValue: Float; virtual;
    function GetTEIsNull: Boolean; virtual;
    function GetOldTEValue: Float; virtual;
    function GetOldTEIsNull: Boolean; virtual;
    procedure SetTEValue(const aValue: Float); virtual;
    procedure SetTEIsNull(const aValue: Boolean); virtual;
    function GetS38Value: Float; virtual;
    function GetS38IsNull: Boolean; virtual;
    function GetOldS38Value: Float; virtual;
    function GetOldS38IsNull: Boolean; virtual;
    procedure SetS38Value(const aValue: Float); virtual;
    procedure SetS38IsNull(const aValue: Boolean); virtual;
    function GetS40Value: Float; virtual;
    function GetS40IsNull: Boolean; virtual;
    function GetOldS40Value: Float; virtual;
    function GetOldS40IsNull: Boolean; virtual;
    procedure SetS40Value(const aValue: Float); virtual;
    procedure SetS40IsNull(const aValue: Boolean); virtual;
    function GetS42Value: Float; virtual;
    function GetS42IsNull: Boolean; virtual;
    function GetOldS42Value: Float; virtual;
    function GetOldS42IsNull: Boolean; virtual;
    procedure SetS42Value(const aValue: Float); virtual;
    procedure SetS42IsNull(const aValue: Boolean); virtual;
    function GetS44Value: Float; virtual;
    function GetS44IsNull: Boolean; virtual;
    function GetOldS44Value: Float; virtual;
    function GetOldS44IsNull: Boolean; virtual;
    procedure SetS44Value(const aValue: Float); virtual;
    procedure SetS44IsNull(const aValue: Boolean); virtual;
    function GetS46Value: Float; virtual;
    function GetS46IsNull: Boolean; virtual;
    function GetOldS46Value: Float; virtual;
    function GetOldS46IsNull: Boolean; virtual;
    procedure SetS46Value(const aValue: Float); virtual;
    procedure SetS46IsNull(const aValue: Boolean); virtual;
    function GetS48Value: Float; virtual;
    function GetS48IsNull: Boolean; virtual;
    function GetOldS48Value: Float; virtual;
    function GetOldS48IsNull: Boolean; virtual;
    procedure SetS48Value(const aValue: Float); virtual;
    procedure SetS48IsNull(const aValue: Boolean); virtual;
    function GetTSValue: Float; virtual;
    function GetTSIsNull: Boolean; virtual;
    function GetOldTSValue: Float; virtual;
    function GetOldTSIsNull: Boolean; virtual;
    procedure SetTSValue(const aValue: Float); virtual;
    procedure SetTSIsNull(const aValue: Boolean); virtual;
    function GetK38Value: Float; virtual;
    function GetK38IsNull: Boolean; virtual;
    function GetOldK38Value: Float; virtual;
    function GetOldK38IsNull: Boolean; virtual;
    procedure SetK38Value(const aValue: Float); virtual;
    procedure SetK38IsNull(const aValue: Boolean); virtual;
    function GetK40Value: Float; virtual;
    function GetK40IsNull: Boolean; virtual;
    function GetOldK40Value: Float; virtual;
    function GetOldK40IsNull: Boolean; virtual;
    procedure SetK40Value(const aValue: Float); virtual;
    procedure SetK40IsNull(const aValue: Boolean); virtual;
    function GetK42Value: Float; virtual;
    function GetK42IsNull: Boolean; virtual;
    function GetOldK42Value: Float; virtual;
    function GetOldK42IsNull: Boolean; virtual;
    procedure SetK42Value(const aValue: Float); virtual;
    procedure SetK42IsNull(const aValue: Boolean); virtual;
    function GetK44Value: Float; virtual;
    function GetK44IsNull: Boolean; virtual;
    function GetOldK44Value: Float; virtual;
    function GetOldK44IsNull: Boolean; virtual;
    procedure SetK44Value(const aValue: Float); virtual;
    procedure SetK44IsNull(const aValue: Boolean); virtual;
    function GetK46Value: Float; virtual;
    function GetK46IsNull: Boolean; virtual;
    function GetOldK46Value: Float; virtual;
    function GetOldK46IsNull: Boolean; virtual;
    procedure SetK46Value(const aValue: Float); virtual;
    procedure SetK46IsNull(const aValue: Boolean); virtual;
    function GetK48Value: Float; virtual;
    function GetK48IsNull: Boolean; virtual;
    function GetOldK48Value: Float; virtual;
    function GetOldK48IsNull: Boolean; virtual;
    procedure SetK48Value(const aValue: Float); virtual;
    procedure SetK48IsNull(const aValue: Boolean); virtual;
    function GetKTValue: Float; virtual;
    function GetKTIsNull: Boolean; virtual;
    function GetOldKTValue: Float; virtual;
    function GetOldKTIsNull: Boolean; virtual;
    procedure SetKTValue(const aValue: Float); virtual;
    procedure SetKTIsNull(const aValue: Boolean); virtual;

    { Properties }
    property CENTRO : String read GetCENTROValue write SetCENTROValue;
    property CENTROIsNull : Boolean read GetCENTROIsNull write SetCENTROIsNull;
    property OldCENTRO : String read GetOldCENTROValue;
    property OldCENTROIsNull : Boolean read GetOldCENTROIsNull;
    property FILIAL : String read GetFILIALValue write SetFILIALValue;
    property FILIALIsNull : Boolean read GetFILIALIsNull write SetFILIALIsNull;
    property OldFILIAL : String read GetOldFILIALValue;
    property OldFILIALIsNull : Boolean read GetOldFILIALIsNull;
    property CODIGO : String read GetCODIGOValue write SetCODIGOValue;
    property CODIGOIsNull : Boolean read GetCODIGOIsNull write SetCODIGOIsNull;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldCODIGOIsNull : Boolean read GetOldCODIGOIsNull;
    property PRODUCTO : String read GetPRODUCTOValue write SetPRODUCTOValue;
    property PRODUCTOIsNull : Boolean read GetPRODUCTOIsNull write SetPRODUCTOIsNull;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldPRODUCTOIsNull : Boolean read GetOldPRODUCTOIsNull;
    property TIPO_PRODUCTO : String read GetTIPO_PRODUCTOValue write SetTIPO_PRODUCTOValue;
    property TIPO_PRODUCTOIsNull : Boolean read GetTIPO_PRODUCTOIsNull write SetTIPO_PRODUCTOIsNull;
    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
    property OldTIPO_PRODUCTOIsNull : Boolean read GetOldTIPO_PRODUCTOIsNull;
    property GRUPO_PRODUCTO : String read GetGRUPO_PRODUCTOValue write SetGRUPO_PRODUCTOValue;
    property GRUPO_PRODUCTOIsNull : Boolean read GetGRUPO_PRODUCTOIsNull write SetGRUPO_PRODUCTOIsNull;
    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
    property OldGRUPO_PRODUCTOIsNull : Boolean read GetOldGRUPO_PRODUCTOIsNull;
    property COLECCION : String read GetCOLECCIONValue write SetCOLECCIONValue;
    property COLECCIONIsNull : Boolean read GetCOLECCIONIsNull write SetCOLECCIONIsNull;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldCOLECCIONIsNull : Boolean read GetOldCOLECCIONIsNull;
    property COLOR : String read GetCOLORValue write SetCOLORValue;
    property COLORIsNull : Boolean read GetCOLORIsNull write SetCOLORIsNull;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldCOLORIsNull : Boolean read GetOldCOLORIsNull;
    property E38 : Float read GetE38Value write SetE38Value;
    property E38IsNull : Boolean read GetE38IsNull write SetE38IsNull;
    property OldE38 : Float read GetOldE38Value;
    property OldE38IsNull : Boolean read GetOldE38IsNull;
    property E40 : Float read GetE40Value write SetE40Value;
    property E40IsNull : Boolean read GetE40IsNull write SetE40IsNull;
    property OldE40 : Float read GetOldE40Value;
    property OldE40IsNull : Boolean read GetOldE40IsNull;
    property E42 : Float read GetE42Value write SetE42Value;
    property E42IsNull : Boolean read GetE42IsNull write SetE42IsNull;
    property OldE42 : Float read GetOldE42Value;
    property OldE42IsNull : Boolean read GetOldE42IsNull;
    property E44 : Float read GetE44Value write SetE44Value;
    property E44IsNull : Boolean read GetE44IsNull write SetE44IsNull;
    property OldE44 : Float read GetOldE44Value;
    property OldE44IsNull : Boolean read GetOldE44IsNull;
    property E46 : Float read GetE46Value write SetE46Value;
    property E46IsNull : Boolean read GetE46IsNull write SetE46IsNull;
    property OldE46 : Float read GetOldE46Value;
    property OldE46IsNull : Boolean read GetOldE46IsNull;
    property E48 : Float read GetE48Value write SetE48Value;
    property E48IsNull : Boolean read GetE48IsNull write SetE48IsNull;
    property OldE48 : Float read GetOldE48Value;
    property OldE48IsNull : Boolean read GetOldE48IsNull;
    property TE : Float read GetTEValue write SetTEValue;
    property TEIsNull : Boolean read GetTEIsNull write SetTEIsNull;
    property OldTE : Float read GetOldTEValue;
    property OldTEIsNull : Boolean read GetOldTEIsNull;
    property S38 : Float read GetS38Value write SetS38Value;
    property S38IsNull : Boolean read GetS38IsNull write SetS38IsNull;
    property OldS38 : Float read GetOldS38Value;
    property OldS38IsNull : Boolean read GetOldS38IsNull;
    property S40 : Float read GetS40Value write SetS40Value;
    property S40IsNull : Boolean read GetS40IsNull write SetS40IsNull;
    property OldS40 : Float read GetOldS40Value;
    property OldS40IsNull : Boolean read GetOldS40IsNull;
    property S42 : Float read GetS42Value write SetS42Value;
    property S42IsNull : Boolean read GetS42IsNull write SetS42IsNull;
    property OldS42 : Float read GetOldS42Value;
    property OldS42IsNull : Boolean read GetOldS42IsNull;
    property S44 : Float read GetS44Value write SetS44Value;
    property S44IsNull : Boolean read GetS44IsNull write SetS44IsNull;
    property OldS44 : Float read GetOldS44Value;
    property OldS44IsNull : Boolean read GetOldS44IsNull;
    property S46 : Float read GetS46Value write SetS46Value;
    property S46IsNull : Boolean read GetS46IsNull write SetS46IsNull;
    property OldS46 : Float read GetOldS46Value;
    property OldS46IsNull : Boolean read GetOldS46IsNull;
    property S48 : Float read GetS48Value write SetS48Value;
    property S48IsNull : Boolean read GetS48IsNull write SetS48IsNull;
    property OldS48 : Float read GetOldS48Value;
    property OldS48IsNull : Boolean read GetOldS48IsNull;
    property TS : Float read GetTSValue write SetTSValue;
    property TSIsNull : Boolean read GetTSIsNull write SetTSIsNull;
    property OldTS : Float read GetOldTSValue;
    property OldTSIsNull : Boolean read GetOldTSIsNull;
    property K38 : Float read GetK38Value write SetK38Value;
    property K38IsNull : Boolean read GetK38IsNull write SetK38IsNull;
    property OldK38 : Float read GetOldK38Value;
    property OldK38IsNull : Boolean read GetOldK38IsNull;
    property K40 : Float read GetK40Value write SetK40Value;
    property K40IsNull : Boolean read GetK40IsNull write SetK40IsNull;
    property OldK40 : Float read GetOldK40Value;
    property OldK40IsNull : Boolean read GetOldK40IsNull;
    property K42 : Float read GetK42Value write SetK42Value;
    property K42IsNull : Boolean read GetK42IsNull write SetK42IsNull;
    property OldK42 : Float read GetOldK42Value;
    property OldK42IsNull : Boolean read GetOldK42IsNull;
    property K44 : Float read GetK44Value write SetK44Value;
    property K44IsNull : Boolean read GetK44IsNull write SetK44IsNull;
    property OldK44 : Float read GetOldK44Value;
    property OldK44IsNull : Boolean read GetOldK44IsNull;
    property K46 : Float read GetK46Value write SetK46Value;
    property K46IsNull : Boolean read GetK46IsNull write SetK46IsNull;
    property OldK46 : Float read GetOldK46Value;
    property OldK46IsNull : Boolean read GetOldK46IsNull;
    property K48 : Float read GetK48Value write SetK48Value;
    property K48IsNull : Boolean read GetK48IsNull write SetK48IsNull;
    property OldK48 : Float read GetOldK48Value;
    property OldK48IsNull : Boolean read GetOldK48IsNull;
    property KT : Float read GetKTValue write SetKTValue;
    property KTIsNull : Boolean read GetKTIsNull write SetKTIsNull;
    property OldKT : Float read GetOldKTValue;
    property OldKTIsNull : Boolean read GetOldKTIsNull;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

  { IStockVARELADelta }
  IStockVARELADelta = interface(IStockVARELA)
  ['{BD23D312-D161-4618-B40A-D04C1B3BA517}']
    { Property getters and setters }
    function GetOldFILIALValue : String;
    function GetOldCODIGOValue : String;
    function GetOldCOLORValue : String;
    function GetOldPRODUCTOValue : String;
    function GetOldTIPO_PRODUTOValue : String;
    function GetOldGRUPO_PRODUTOValue : String;
    function GetOldCOLECCIONValue : String;
    function GetOldK38Value : Integer;
    function GetOldK40Value : Integer;
    function GetOldK42Value : Integer;
    function GetOldK44Value : Integer;
    function GetOldK46Value : Integer;
    function GetOldK48Value : Integer;
    function GetOldKTValue : Integer;

    { Properties }
    property OldFILIAL : String read GetOldFILIALValue;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldTIPO_PRODUTO : String read GetOldTIPO_PRODUTOValue;
    property OldGRUPO_PRODUTO : String read GetOldGRUPO_PRODUTOValue;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldK38 : Integer read GetOldK38Value;
    property OldK40 : Integer read GetOldK40Value;
    property OldK42 : Integer read GetOldK42Value;
    property OldK44 : Integer read GetOldK44Value;
    property OldK46 : Integer read GetOldK46Value;
    property OldK48 : Integer read GetOldK48Value;
    property OldKT : Integer read GetOldKTValue;
  end;

  { TStockVARELABusinessProcessorRules }
  TStockVARELABusinessProcessorRules = class(TDABusinessProcessorRules, IStockVARELA, IStockVARELADelta)
  private
  protected
    { Property getters and setters }
    function GetFILIALValue: String; virtual;
    function GetFILIALIsNull: Boolean; virtual;
    function GetOldFILIALValue: String; virtual;
    function GetOldFILIALIsNull: Boolean; virtual;
    procedure SetFILIALValue(const aValue: String); virtual;
    procedure SetFILIALIsNull(const aValue: Boolean); virtual;
    function GetCODIGOValue: String; virtual;
    function GetCODIGOIsNull: Boolean; virtual;
    function GetOldCODIGOValue: String; virtual;
    function GetOldCODIGOIsNull: Boolean; virtual;
    procedure SetCODIGOValue(const aValue: String); virtual;
    procedure SetCODIGOIsNull(const aValue: Boolean); virtual;
    function GetCOLORValue: String; virtual;
    function GetCOLORIsNull: Boolean; virtual;
    function GetOldCOLORValue: String; virtual;
    function GetOldCOLORIsNull: Boolean; virtual;
    procedure SetCOLORValue(const aValue: String); virtual;
    procedure SetCOLORIsNull(const aValue: Boolean); virtual;
    function GetPRODUCTOValue: String; virtual;
    function GetPRODUCTOIsNull: Boolean; virtual;
    function GetOldPRODUCTOValue: String; virtual;
    function GetOldPRODUCTOIsNull: Boolean; virtual;
    procedure SetPRODUCTOValue(const aValue: String); virtual;
    procedure SetPRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetTIPO_PRODUTOValue: String; virtual;
    function GetTIPO_PRODUTOIsNull: Boolean; virtual;
    function GetOldTIPO_PRODUTOValue: String; virtual;
    function GetOldTIPO_PRODUTOIsNull: Boolean; virtual;
    procedure SetTIPO_PRODUTOValue(const aValue: String); virtual;
    procedure SetTIPO_PRODUTOIsNull(const aValue: Boolean); virtual;
    function GetGRUPO_PRODUTOValue: String; virtual;
    function GetGRUPO_PRODUTOIsNull: Boolean; virtual;
    function GetOldGRUPO_PRODUTOValue: String; virtual;
    function GetOldGRUPO_PRODUTOIsNull: Boolean; virtual;
    procedure SetGRUPO_PRODUTOValue(const aValue: String); virtual;
    procedure SetGRUPO_PRODUTOIsNull(const aValue: Boolean); virtual;
    function GetCOLECCIONValue: String; virtual;
    function GetCOLECCIONIsNull: Boolean; virtual;
    function GetOldCOLECCIONValue: String; virtual;
    function GetOldCOLECCIONIsNull: Boolean; virtual;
    procedure SetCOLECCIONValue(const aValue: String); virtual;
    procedure SetCOLECCIONIsNull(const aValue: Boolean); virtual;
    function GetK38Value: Integer; virtual;
    function GetK38IsNull: Boolean; virtual;
    function GetOldK38Value: Integer; virtual;
    function GetOldK38IsNull: Boolean; virtual;
    procedure SetK38Value(const aValue: Integer); virtual;
    procedure SetK38IsNull(const aValue: Boolean); virtual;
    function GetK40Value: Integer; virtual;
    function GetK40IsNull: Boolean; virtual;
    function GetOldK40Value: Integer; virtual;
    function GetOldK40IsNull: Boolean; virtual;
    procedure SetK40Value(const aValue: Integer); virtual;
    procedure SetK40IsNull(const aValue: Boolean); virtual;
    function GetK42Value: Integer; virtual;
    function GetK42IsNull: Boolean; virtual;
    function GetOldK42Value: Integer; virtual;
    function GetOldK42IsNull: Boolean; virtual;
    procedure SetK42Value(const aValue: Integer); virtual;
    procedure SetK42IsNull(const aValue: Boolean); virtual;
    function GetK44Value: Integer; virtual;
    function GetK44IsNull: Boolean; virtual;
    function GetOldK44Value: Integer; virtual;
    function GetOldK44IsNull: Boolean; virtual;
    procedure SetK44Value(const aValue: Integer); virtual;
    procedure SetK44IsNull(const aValue: Boolean); virtual;
    function GetK46Value: Integer; virtual;
    function GetK46IsNull: Boolean; virtual;
    function GetOldK46Value: Integer; virtual;
    function GetOldK46IsNull: Boolean; virtual;
    procedure SetK46Value(const aValue: Integer); virtual;
    procedure SetK46IsNull(const aValue: Boolean); virtual;
    function GetK48Value: Integer; virtual;
    function GetK48IsNull: Boolean; virtual;
    function GetOldK48Value: Integer; virtual;
    function GetOldK48IsNull: Boolean; virtual;
    procedure SetK48Value(const aValue: Integer); virtual;
    procedure SetK48IsNull(const aValue: Boolean); virtual;
    function GetKTValue: Integer; virtual;
    function GetKTIsNull: Boolean; virtual;
    function GetOldKTValue: Integer; virtual;
    function GetOldKTIsNull: Boolean; virtual;
    procedure SetKTValue(const aValue: Integer); virtual;
    procedure SetKTIsNull(const aValue: Boolean); virtual;

    { Properties }
    property FILIAL : String read GetFILIALValue write SetFILIALValue;
    property FILIALIsNull : Boolean read GetFILIALIsNull write SetFILIALIsNull;
    property OldFILIAL : String read GetOldFILIALValue;
    property OldFILIALIsNull : Boolean read GetOldFILIALIsNull;
    property CODIGO : String read GetCODIGOValue write SetCODIGOValue;
    property CODIGOIsNull : Boolean read GetCODIGOIsNull write SetCODIGOIsNull;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldCODIGOIsNull : Boolean read GetOldCODIGOIsNull;
    property COLOR : String read GetCOLORValue write SetCOLORValue;
    property COLORIsNull : Boolean read GetCOLORIsNull write SetCOLORIsNull;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldCOLORIsNull : Boolean read GetOldCOLORIsNull;
    property PRODUCTO : String read GetPRODUCTOValue write SetPRODUCTOValue;
    property PRODUCTOIsNull : Boolean read GetPRODUCTOIsNull write SetPRODUCTOIsNull;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldPRODUCTOIsNull : Boolean read GetOldPRODUCTOIsNull;
    property TIPO_PRODUTO : String read GetTIPO_PRODUTOValue write SetTIPO_PRODUTOValue;
    property TIPO_PRODUTOIsNull : Boolean read GetTIPO_PRODUTOIsNull write SetTIPO_PRODUTOIsNull;
    property OldTIPO_PRODUTO : String read GetOldTIPO_PRODUTOValue;
    property OldTIPO_PRODUTOIsNull : Boolean read GetOldTIPO_PRODUTOIsNull;
    property GRUPO_PRODUTO : String read GetGRUPO_PRODUTOValue write SetGRUPO_PRODUTOValue;
    property GRUPO_PRODUTOIsNull : Boolean read GetGRUPO_PRODUTOIsNull write SetGRUPO_PRODUTOIsNull;
    property OldGRUPO_PRODUTO : String read GetOldGRUPO_PRODUTOValue;
    property OldGRUPO_PRODUTOIsNull : Boolean read GetOldGRUPO_PRODUTOIsNull;
    property COLECCION : String read GetCOLECCIONValue write SetCOLECCIONValue;
    property COLECCIONIsNull : Boolean read GetCOLECCIONIsNull write SetCOLECCIONIsNull;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldCOLECCIONIsNull : Boolean read GetOldCOLECCIONIsNull;
    property K38 : Integer read GetK38Value write SetK38Value;
    property K38IsNull : Boolean read GetK38IsNull write SetK38IsNull;
    property OldK38 : Integer read GetOldK38Value;
    property OldK38IsNull : Boolean read GetOldK38IsNull;
    property K40 : Integer read GetK40Value write SetK40Value;
    property K40IsNull : Boolean read GetK40IsNull write SetK40IsNull;
    property OldK40 : Integer read GetOldK40Value;
    property OldK40IsNull : Boolean read GetOldK40IsNull;
    property K42 : Integer read GetK42Value write SetK42Value;
    property K42IsNull : Boolean read GetK42IsNull write SetK42IsNull;
    property OldK42 : Integer read GetOldK42Value;
    property OldK42IsNull : Boolean read GetOldK42IsNull;
    property K44 : Integer read GetK44Value write SetK44Value;
    property K44IsNull : Boolean read GetK44IsNull write SetK44IsNull;
    property OldK44 : Integer read GetOldK44Value;
    property OldK44IsNull : Boolean read GetOldK44IsNull;
    property K46 : Integer read GetK46Value write SetK46Value;
    property K46IsNull : Boolean read GetK46IsNull write SetK46IsNull;
    property OldK46 : Integer read GetOldK46Value;
    property OldK46IsNull : Boolean read GetOldK46IsNull;
    property K48 : Integer read GetK48Value write SetK48Value;
    property K48IsNull : Boolean read GetK48IsNull write SetK48IsNull;
    property OldK48 : Integer read GetOldK48Value;
    property OldK48IsNull : Boolean read GetOldK48IsNull;
    property KT : Integer read GetKTValue write SetKTValue;
    property KTIsNull : Boolean read GetKTIsNull write SetKTIsNull;
    property OldKT : Integer read GetOldKTValue;
    property OldKTIsNull : Boolean read GetOldKTIsNull;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

  { IStockEDIInventario2Delta }
  IStockEDIInventario2Delta = interface(IStockEDIInventario2)
  ['{A5CF6999-D054-4BE3-B0E9-9BD78F6E8366}']
    { Property getters and setters }
    function GetOldCENTROValue : String;
    function GetOldFILIALValue : String;
    function GetOldCODIGOValue : String;
    function GetOldPRODUCTOValue : String;
    function GetOldCOLORValue : String;
    function GetOldTIPO_PRODUCTOValue : String;
    function GetOldGRUPO_PRODUCTOValue : String;
    function GetOldCOLECCIONValue : String;
    function GetOldI38Value : Float;
    function GetOldI40Value : Float;
    function GetOldI42Value : Float;
    function GetOldI44Value : Float;
    function GetOldI46Value : Float;
    function GetOldI48Value : Float;
    function GetOldTIValue : Float;
    function GetOldK38Value : Float;
    function GetOldK40Value : Float;
    function GetOldK42Value : Float;
    function GetOldK44Value : Float;
    function GetOldK46Value : Float;
    function GetOldK48Value : Float;
    function GetOldTKValue : Float;
    function GetOldD38Value : Float;
    function GetOldD40Value : Float;
    function GetOldD42Value : Float;
    function GetOldD44Value : Float;
    function GetOldD46Value : Float;
    function GetOldD48Value : Float;
    function GetOldDTValue : Float;

    { Properties }
    property OldCENTRO : String read GetOldCENTROValue;
    property OldFILIAL : String read GetOldFILIALValue;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldI38 : Float read GetOldI38Value;
    property OldI40 : Float read GetOldI40Value;
    property OldI42 : Float read GetOldI42Value;
    property OldI44 : Float read GetOldI44Value;
    property OldI46 : Float read GetOldI46Value;
    property OldI48 : Float read GetOldI48Value;
    property OldTI : Float read GetOldTIValue;
    property OldK38 : Float read GetOldK38Value;
    property OldK40 : Float read GetOldK40Value;
    property OldK42 : Float read GetOldK42Value;
    property OldK44 : Float read GetOldK44Value;
    property OldK46 : Float read GetOldK46Value;
    property OldK48 : Float read GetOldK48Value;
    property OldTK : Float read GetOldTKValue;
    property OldD38 : Float read GetOldD38Value;
    property OldD40 : Float read GetOldD40Value;
    property OldD42 : Float read GetOldD42Value;
    property OldD44 : Float read GetOldD44Value;
    property OldD46 : Float read GetOldD46Value;
    property OldD48 : Float read GetOldD48Value;
    property OldDT : Float read GetOldDTValue;
  end;

  { TStockEDIInventario2BusinessProcessorRules }
  TStockEDIInventario2BusinessProcessorRules = class(TDABusinessProcessorRules, IStockEDIInventario2, IStockEDIInventario2Delta)
  private
  protected
    { Property getters and setters }
    function GetCENTROValue: String; virtual;
    function GetCENTROIsNull: Boolean; virtual;
    function GetOldCENTROValue: String; virtual;
    function GetOldCENTROIsNull: Boolean; virtual;
    procedure SetCENTROValue(const aValue: String); virtual;
    procedure SetCENTROIsNull(const aValue: Boolean); virtual;
    function GetFILIALValue: String; virtual;
    function GetFILIALIsNull: Boolean; virtual;
    function GetOldFILIALValue: String; virtual;
    function GetOldFILIALIsNull: Boolean; virtual;
    procedure SetFILIALValue(const aValue: String); virtual;
    procedure SetFILIALIsNull(const aValue: Boolean); virtual;
    function GetCODIGOValue: String; virtual;
    function GetCODIGOIsNull: Boolean; virtual;
    function GetOldCODIGOValue: String; virtual;
    function GetOldCODIGOIsNull: Boolean; virtual;
    procedure SetCODIGOValue(const aValue: String); virtual;
    procedure SetCODIGOIsNull(const aValue: Boolean); virtual;
    function GetPRODUCTOValue: String; virtual;
    function GetPRODUCTOIsNull: Boolean; virtual;
    function GetOldPRODUCTOValue: String; virtual;
    function GetOldPRODUCTOIsNull: Boolean; virtual;
    procedure SetPRODUCTOValue(const aValue: String); virtual;
    procedure SetPRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetCOLORValue: String; virtual;
    function GetCOLORIsNull: Boolean; virtual;
    function GetOldCOLORValue: String; virtual;
    function GetOldCOLORIsNull: Boolean; virtual;
    procedure SetCOLORValue(const aValue: String); virtual;
    procedure SetCOLORIsNull(const aValue: Boolean); virtual;
    function GetTIPO_PRODUCTOValue: String; virtual;
    function GetTIPO_PRODUCTOIsNull: Boolean; virtual;
    function GetOldTIPO_PRODUCTOValue: String; virtual;
    function GetOldTIPO_PRODUCTOIsNull: Boolean; virtual;
    procedure SetTIPO_PRODUCTOValue(const aValue: String); virtual;
    procedure SetTIPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetGRUPO_PRODUCTOValue: String; virtual;
    function GetGRUPO_PRODUCTOIsNull: Boolean; virtual;
    function GetOldGRUPO_PRODUCTOValue: String; virtual;
    function GetOldGRUPO_PRODUCTOIsNull: Boolean; virtual;
    procedure SetGRUPO_PRODUCTOValue(const aValue: String); virtual;
    procedure SetGRUPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetCOLECCIONValue: String; virtual;
    function GetCOLECCIONIsNull: Boolean; virtual;
    function GetOldCOLECCIONValue: String; virtual;
    function GetOldCOLECCIONIsNull: Boolean; virtual;
    procedure SetCOLECCIONValue(const aValue: String); virtual;
    procedure SetCOLECCIONIsNull(const aValue: Boolean); virtual;
    function GetI38Value: Float; virtual;
    function GetI38IsNull: Boolean; virtual;
    function GetOldI38Value: Float; virtual;
    function GetOldI38IsNull: Boolean; virtual;
    procedure SetI38Value(const aValue: Float); virtual;
    procedure SetI38IsNull(const aValue: Boolean); virtual;
    function GetI40Value: Float; virtual;
    function GetI40IsNull: Boolean; virtual;
    function GetOldI40Value: Float; virtual;
    function GetOldI40IsNull: Boolean; virtual;
    procedure SetI40Value(const aValue: Float); virtual;
    procedure SetI40IsNull(const aValue: Boolean); virtual;
    function GetI42Value: Float; virtual;
    function GetI42IsNull: Boolean; virtual;
    function GetOldI42Value: Float; virtual;
    function GetOldI42IsNull: Boolean; virtual;
    procedure SetI42Value(const aValue: Float); virtual;
    procedure SetI42IsNull(const aValue: Boolean); virtual;
    function GetI44Value: Float; virtual;
    function GetI44IsNull: Boolean; virtual;
    function GetOldI44Value: Float; virtual;
    function GetOldI44IsNull: Boolean; virtual;
    procedure SetI44Value(const aValue: Float); virtual;
    procedure SetI44IsNull(const aValue: Boolean); virtual;
    function GetI46Value: Float; virtual;
    function GetI46IsNull: Boolean; virtual;
    function GetOldI46Value: Float; virtual;
    function GetOldI46IsNull: Boolean; virtual;
    procedure SetI46Value(const aValue: Float); virtual;
    procedure SetI46IsNull(const aValue: Boolean); virtual;
    function GetI48Value: Float; virtual;
    function GetI48IsNull: Boolean; virtual;
    function GetOldI48Value: Float; virtual;
    function GetOldI48IsNull: Boolean; virtual;
    procedure SetI48Value(const aValue: Float); virtual;
    procedure SetI48IsNull(const aValue: Boolean); virtual;
    function GetTIValue: Float; virtual;
    function GetTIIsNull: Boolean; virtual;
    function GetOldTIValue: Float; virtual;
    function GetOldTIIsNull: Boolean; virtual;
    procedure SetTIValue(const aValue: Float); virtual;
    procedure SetTIIsNull(const aValue: Boolean); virtual;
    function GetK38Value: Float; virtual;
    function GetK38IsNull: Boolean; virtual;
    function GetOldK38Value: Float; virtual;
    function GetOldK38IsNull: Boolean; virtual;
    procedure SetK38Value(const aValue: Float); virtual;
    procedure SetK38IsNull(const aValue: Boolean); virtual;
    function GetK40Value: Float; virtual;
    function GetK40IsNull: Boolean; virtual;
    function GetOldK40Value: Float; virtual;
    function GetOldK40IsNull: Boolean; virtual;
    procedure SetK40Value(const aValue: Float); virtual;
    procedure SetK40IsNull(const aValue: Boolean); virtual;
    function GetK42Value: Float; virtual;
    function GetK42IsNull: Boolean; virtual;
    function GetOldK42Value: Float; virtual;
    function GetOldK42IsNull: Boolean; virtual;
    procedure SetK42Value(const aValue: Float); virtual;
    procedure SetK42IsNull(const aValue: Boolean); virtual;
    function GetK44Value: Float; virtual;
    function GetK44IsNull: Boolean; virtual;
    function GetOldK44Value: Float; virtual;
    function GetOldK44IsNull: Boolean; virtual;
    procedure SetK44Value(const aValue: Float); virtual;
    procedure SetK44IsNull(const aValue: Boolean); virtual;
    function GetK46Value: Float; virtual;
    function GetK46IsNull: Boolean; virtual;
    function GetOldK46Value: Float; virtual;
    function GetOldK46IsNull: Boolean; virtual;
    procedure SetK46Value(const aValue: Float); virtual;
    procedure SetK46IsNull(const aValue: Boolean); virtual;
    function GetK48Value: Float; virtual;
    function GetK48IsNull: Boolean; virtual;
    function GetOldK48Value: Float; virtual;
    function GetOldK48IsNull: Boolean; virtual;
    procedure SetK48Value(const aValue: Float); virtual;
    procedure SetK48IsNull(const aValue: Boolean); virtual;
    function GetTKValue: Float; virtual;
    function GetTKIsNull: Boolean; virtual;
    function GetOldTKValue: Float; virtual;
    function GetOldTKIsNull: Boolean; virtual;
    procedure SetTKValue(const aValue: Float); virtual;
    procedure SetTKIsNull(const aValue: Boolean); virtual;
    function GetD38Value: Float; virtual;
    function GetD38IsNull: Boolean; virtual;
    function GetOldD38Value: Float; virtual;
    function GetOldD38IsNull: Boolean; virtual;
    procedure SetD38Value(const aValue: Float); virtual;
    procedure SetD38IsNull(const aValue: Boolean); virtual;
    function GetD40Value: Float; virtual;
    function GetD40IsNull: Boolean; virtual;
    function GetOldD40Value: Float; virtual;
    function GetOldD40IsNull: Boolean; virtual;
    procedure SetD40Value(const aValue: Float); virtual;
    procedure SetD40IsNull(const aValue: Boolean); virtual;
    function GetD42Value: Float; virtual;
    function GetD42IsNull: Boolean; virtual;
    function GetOldD42Value: Float; virtual;
    function GetOldD42IsNull: Boolean; virtual;
    procedure SetD42Value(const aValue: Float); virtual;
    procedure SetD42IsNull(const aValue: Boolean); virtual;
    function GetD44Value: Float; virtual;
    function GetD44IsNull: Boolean; virtual;
    function GetOldD44Value: Float; virtual;
    function GetOldD44IsNull: Boolean; virtual;
    procedure SetD44Value(const aValue: Float); virtual;
    procedure SetD44IsNull(const aValue: Boolean); virtual;
    function GetD46Value: Float; virtual;
    function GetD46IsNull: Boolean; virtual;
    function GetOldD46Value: Float; virtual;
    function GetOldD46IsNull: Boolean; virtual;
    procedure SetD46Value(const aValue: Float); virtual;
    procedure SetD46IsNull(const aValue: Boolean); virtual;
    function GetD48Value: Float; virtual;
    function GetD48IsNull: Boolean; virtual;
    function GetOldD48Value: Float; virtual;
    function GetOldD48IsNull: Boolean; virtual;
    procedure SetD48Value(const aValue: Float); virtual;
    procedure SetD48IsNull(const aValue: Boolean); virtual;
    function GetDTValue: Float; virtual;
    function GetDTIsNull: Boolean; virtual;
    function GetOldDTValue: Float; virtual;
    function GetOldDTIsNull: Boolean; virtual;
    procedure SetDTValue(const aValue: Float); virtual;
    procedure SetDTIsNull(const aValue: Boolean); virtual;

    { Properties }
    property CENTRO : String read GetCENTROValue write SetCENTROValue;
    property CENTROIsNull : Boolean read GetCENTROIsNull write SetCENTROIsNull;
    property OldCENTRO : String read GetOldCENTROValue;
    property OldCENTROIsNull : Boolean read GetOldCENTROIsNull;
    property FILIAL : String read GetFILIALValue write SetFILIALValue;
    property FILIALIsNull : Boolean read GetFILIALIsNull write SetFILIALIsNull;
    property OldFILIAL : String read GetOldFILIALValue;
    property OldFILIALIsNull : Boolean read GetOldFILIALIsNull;
    property CODIGO : String read GetCODIGOValue write SetCODIGOValue;
    property CODIGOIsNull : Boolean read GetCODIGOIsNull write SetCODIGOIsNull;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldCODIGOIsNull : Boolean read GetOldCODIGOIsNull;
    property PRODUCTO : String read GetPRODUCTOValue write SetPRODUCTOValue;
    property PRODUCTOIsNull : Boolean read GetPRODUCTOIsNull write SetPRODUCTOIsNull;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldPRODUCTOIsNull : Boolean read GetOldPRODUCTOIsNull;
    property COLOR : String read GetCOLORValue write SetCOLORValue;
    property COLORIsNull : Boolean read GetCOLORIsNull write SetCOLORIsNull;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldCOLORIsNull : Boolean read GetOldCOLORIsNull;
    property TIPO_PRODUCTO : String read GetTIPO_PRODUCTOValue write SetTIPO_PRODUCTOValue;
    property TIPO_PRODUCTOIsNull : Boolean read GetTIPO_PRODUCTOIsNull write SetTIPO_PRODUCTOIsNull;
    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
    property OldTIPO_PRODUCTOIsNull : Boolean read GetOldTIPO_PRODUCTOIsNull;
    property GRUPO_PRODUCTO : String read GetGRUPO_PRODUCTOValue write SetGRUPO_PRODUCTOValue;
    property GRUPO_PRODUCTOIsNull : Boolean read GetGRUPO_PRODUCTOIsNull write SetGRUPO_PRODUCTOIsNull;
    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
    property OldGRUPO_PRODUCTOIsNull : Boolean read GetOldGRUPO_PRODUCTOIsNull;
    property COLECCION : String read GetCOLECCIONValue write SetCOLECCIONValue;
    property COLECCIONIsNull : Boolean read GetCOLECCIONIsNull write SetCOLECCIONIsNull;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldCOLECCIONIsNull : Boolean read GetOldCOLECCIONIsNull;
    property I38 : Float read GetI38Value write SetI38Value;
    property I38IsNull : Boolean read GetI38IsNull write SetI38IsNull;
    property OldI38 : Float read GetOldI38Value;
    property OldI38IsNull : Boolean read GetOldI38IsNull;
    property I40 : Float read GetI40Value write SetI40Value;
    property I40IsNull : Boolean read GetI40IsNull write SetI40IsNull;
    property OldI40 : Float read GetOldI40Value;
    property OldI40IsNull : Boolean read GetOldI40IsNull;
    property I42 : Float read GetI42Value write SetI42Value;
    property I42IsNull : Boolean read GetI42IsNull write SetI42IsNull;
    property OldI42 : Float read GetOldI42Value;
    property OldI42IsNull : Boolean read GetOldI42IsNull;
    property I44 : Float read GetI44Value write SetI44Value;
    property I44IsNull : Boolean read GetI44IsNull write SetI44IsNull;
    property OldI44 : Float read GetOldI44Value;
    property OldI44IsNull : Boolean read GetOldI44IsNull;
    property I46 : Float read GetI46Value write SetI46Value;
    property I46IsNull : Boolean read GetI46IsNull write SetI46IsNull;
    property OldI46 : Float read GetOldI46Value;
    property OldI46IsNull : Boolean read GetOldI46IsNull;
    property I48 : Float read GetI48Value write SetI48Value;
    property I48IsNull : Boolean read GetI48IsNull write SetI48IsNull;
    property OldI48 : Float read GetOldI48Value;
    property OldI48IsNull : Boolean read GetOldI48IsNull;
    property TI : Float read GetTIValue write SetTIValue;
    property TIIsNull : Boolean read GetTIIsNull write SetTIIsNull;
    property OldTI : Float read GetOldTIValue;
    property OldTIIsNull : Boolean read GetOldTIIsNull;
    property K38 : Float read GetK38Value write SetK38Value;
    property K38IsNull : Boolean read GetK38IsNull write SetK38IsNull;
    property OldK38 : Float read GetOldK38Value;
    property OldK38IsNull : Boolean read GetOldK38IsNull;
    property K40 : Float read GetK40Value write SetK40Value;
    property K40IsNull : Boolean read GetK40IsNull write SetK40IsNull;
    property OldK40 : Float read GetOldK40Value;
    property OldK40IsNull : Boolean read GetOldK40IsNull;
    property K42 : Float read GetK42Value write SetK42Value;
    property K42IsNull : Boolean read GetK42IsNull write SetK42IsNull;
    property OldK42 : Float read GetOldK42Value;
    property OldK42IsNull : Boolean read GetOldK42IsNull;
    property K44 : Float read GetK44Value write SetK44Value;
    property K44IsNull : Boolean read GetK44IsNull write SetK44IsNull;
    property OldK44 : Float read GetOldK44Value;
    property OldK44IsNull : Boolean read GetOldK44IsNull;
    property K46 : Float read GetK46Value write SetK46Value;
    property K46IsNull : Boolean read GetK46IsNull write SetK46IsNull;
    property OldK46 : Float read GetOldK46Value;
    property OldK46IsNull : Boolean read GetOldK46IsNull;
    property K48 : Float read GetK48Value write SetK48Value;
    property K48IsNull : Boolean read GetK48IsNull write SetK48IsNull;
    property OldK48 : Float read GetOldK48Value;
    property OldK48IsNull : Boolean read GetOldK48IsNull;
    property TK : Float read GetTKValue write SetTKValue;
    property TKIsNull : Boolean read GetTKIsNull write SetTKIsNull;
    property OldTK : Float read GetOldTKValue;
    property OldTKIsNull : Boolean read GetOldTKIsNull;
    property D38 : Float read GetD38Value write SetD38Value;
    property D38IsNull : Boolean read GetD38IsNull write SetD38IsNull;
    property OldD38 : Float read GetOldD38Value;
    property OldD38IsNull : Boolean read GetOldD38IsNull;
    property D40 : Float read GetD40Value write SetD40Value;
    property D40IsNull : Boolean read GetD40IsNull write SetD40IsNull;
    property OldD40 : Float read GetOldD40Value;
    property OldD40IsNull : Boolean read GetOldD40IsNull;
    property D42 : Float read GetD42Value write SetD42Value;
    property D42IsNull : Boolean read GetD42IsNull write SetD42IsNull;
    property OldD42 : Float read GetOldD42Value;
    property OldD42IsNull : Boolean read GetOldD42IsNull;
    property D44 : Float read GetD44Value write SetD44Value;
    property D44IsNull : Boolean read GetD44IsNull write SetD44IsNull;
    property OldD44 : Float read GetOldD44Value;
    property OldD44IsNull : Boolean read GetOldD44IsNull;
    property D46 : Float read GetD46Value write SetD46Value;
    property D46IsNull : Boolean read GetD46IsNull write SetD46IsNull;
    property OldD46 : Float read GetOldD46Value;
    property OldD46IsNull : Boolean read GetOldD46IsNull;
    property D48 : Float read GetD48Value write SetD48Value;
    property D48IsNull : Boolean read GetD48IsNull write SetD48IsNull;
    property OldD48 : Float read GetOldD48Value;
    property OldD48IsNull : Boolean read GetOldD48IsNull;
    property DT : Float read GetDTValue write SetDTValue;
    property DTIsNull : Boolean read GetDTIsNull write SetDTIsNull;
    property OldDT : Float read GetOldDTValue;
    property OldDTIsNull : Boolean read GetOldDTIsNull;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

  { IStockEDIInventarioDelta }
  IStockEDIInventarioDelta = interface(IStockEDIInventario)
  ['{FE54E63F-0508-4E10-95DF-76550B8A5B50}']
    { Property getters and setters }
    function GetOldCENTROValue : String;
    function GetOldFILIALValue : String;
    function GetOldCODIGOValue : String;
    function GetOldPRODUCTOValue : String;
    function GetOldCOLORValue : String;
    function GetOldTIPO_PRODUCTOValue : String;
    function GetOldGRUPO_PRODUCTOValue : String;
    function GetOldCOLECCIONValue : String;
    function GetOldI38Value : Float;
    function GetOldI40Value : Float;
    function GetOldI42Value : Float;
    function GetOldI44Value : Float;
    function GetOldI46Value : Float;
    function GetOldI48Value : Float;
    function GetOldTIValue : Float;
    function GetOldK38Value : Float;
    function GetOldK40Value : Float;
    function GetOldK42Value : Float;
    function GetOldK44Value : Float;
    function GetOldK46Value : Float;
    function GetOldK48Value : Float;
    function GetOldTKValue : Float;
    function GetOldD38Value : Float;
    function GetOldD40Value : Float;
    function GetOldD42Value : Float;
    function GetOldD44Value : Float;
    function GetOldD46Value : Float;
    function GetOldD48Value : Float;
    function GetOldDTValue : Float;

    { Properties }
    property OldCENTRO : String read GetOldCENTROValue;
    property OldFILIAL : String read GetOldFILIALValue;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldI38 : Float read GetOldI38Value;
    property OldI40 : Float read GetOldI40Value;
    property OldI42 : Float read GetOldI42Value;
    property OldI44 : Float read GetOldI44Value;
    property OldI46 : Float read GetOldI46Value;
    property OldI48 : Float read GetOldI48Value;
    property OldTI : Float read GetOldTIValue;
    property OldK38 : Float read GetOldK38Value;
    property OldK40 : Float read GetOldK40Value;
    property OldK42 : Float read GetOldK42Value;
    property OldK44 : Float read GetOldK44Value;
    property OldK46 : Float read GetOldK46Value;
    property OldK48 : Float read GetOldK48Value;
    property OldTK : Float read GetOldTKValue;
    property OldD38 : Float read GetOldD38Value;
    property OldD40 : Float read GetOldD40Value;
    property OldD42 : Float read GetOldD42Value;
    property OldD44 : Float read GetOldD44Value;
    property OldD46 : Float read GetOldD46Value;
    property OldD48 : Float read GetOldD48Value;
    property OldDT : Float read GetOldDTValue;
  end;

  { TStockEDIInventarioBusinessProcessorRules }
  TStockEDIInventarioBusinessProcessorRules = class(TDABusinessProcessorRules, IStockEDIInventario, IStockEDIInventarioDelta)
  private
  protected
    { Property getters and setters }
    function GetCENTROValue: String; virtual;
    function GetCENTROIsNull: Boolean; virtual;
    function GetOldCENTROValue: String; virtual;
    function GetOldCENTROIsNull: Boolean; virtual;
    procedure SetCENTROValue(const aValue: String); virtual;
    procedure SetCENTROIsNull(const aValue: Boolean); virtual;
    function GetFILIALValue: String; virtual;
    function GetFILIALIsNull: Boolean; virtual;
    function GetOldFILIALValue: String; virtual;
    function GetOldFILIALIsNull: Boolean; virtual;
    procedure SetFILIALValue(const aValue: String); virtual;
    procedure SetFILIALIsNull(const aValue: Boolean); virtual;
    function GetCODIGOValue: String; virtual;
    function GetCODIGOIsNull: Boolean; virtual;
    function GetOldCODIGOValue: String; virtual;
    function GetOldCODIGOIsNull: Boolean; virtual;
    procedure SetCODIGOValue(const aValue: String); virtual;
    procedure SetCODIGOIsNull(const aValue: Boolean); virtual;
    function GetPRODUCTOValue: String; virtual;
    function GetPRODUCTOIsNull: Boolean; virtual;
    function GetOldPRODUCTOValue: String; virtual;
    function GetOldPRODUCTOIsNull: Boolean; virtual;
    procedure SetPRODUCTOValue(const aValue: String); virtual;
    procedure SetPRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetCOLORValue: String; virtual;
    function GetCOLORIsNull: Boolean; virtual;
    function GetOldCOLORValue: String; virtual;
    function GetOldCOLORIsNull: Boolean; virtual;
    procedure SetCOLORValue(const aValue: String); virtual;
    procedure SetCOLORIsNull(const aValue: Boolean); virtual;
    function GetTIPO_PRODUCTOValue: String; virtual;
    function GetTIPO_PRODUCTOIsNull: Boolean; virtual;
    function GetOldTIPO_PRODUCTOValue: String; virtual;
    function GetOldTIPO_PRODUCTOIsNull: Boolean; virtual;
    procedure SetTIPO_PRODUCTOValue(const aValue: String); virtual;
    procedure SetTIPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetGRUPO_PRODUCTOValue: String; virtual;
    function GetGRUPO_PRODUCTOIsNull: Boolean; virtual;
    function GetOldGRUPO_PRODUCTOValue: String; virtual;
    function GetOldGRUPO_PRODUCTOIsNull: Boolean; virtual;
    procedure SetGRUPO_PRODUCTOValue(const aValue: String); virtual;
    procedure SetGRUPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
    function GetCOLECCIONValue: String; virtual;
    function GetCOLECCIONIsNull: Boolean; virtual;
    function GetOldCOLECCIONValue: String; virtual;
    function GetOldCOLECCIONIsNull: Boolean; virtual;
    procedure SetCOLECCIONValue(const aValue: String); virtual;
    procedure SetCOLECCIONIsNull(const aValue: Boolean); virtual;
    function GetI38Value: Float; virtual;
    function GetI38IsNull: Boolean; virtual;
    function GetOldI38Value: Float; virtual;
    function GetOldI38IsNull: Boolean; virtual;
    procedure SetI38Value(const aValue: Float); virtual;
    procedure SetI38IsNull(const aValue: Boolean); virtual;
    function GetI40Value: Float; virtual;
    function GetI40IsNull: Boolean; virtual;
    function GetOldI40Value: Float; virtual;
    function GetOldI40IsNull: Boolean; virtual;
    procedure SetI40Value(const aValue: Float); virtual;
    procedure SetI40IsNull(const aValue: Boolean); virtual;
    function GetI42Value: Float; virtual;
    function GetI42IsNull: Boolean; virtual;
    function GetOldI42Value: Float; virtual;
    function GetOldI42IsNull: Boolean; virtual;
    procedure SetI42Value(const aValue: Float); virtual;
    procedure SetI42IsNull(const aValue: Boolean); virtual;
    function GetI44Value: Float; virtual;
    function GetI44IsNull: Boolean; virtual;
    function GetOldI44Value: Float; virtual;
    function GetOldI44IsNull: Boolean; virtual;
    procedure SetI44Value(const aValue: Float); virtual;
    procedure SetI44IsNull(const aValue: Boolean); virtual;
    function GetI46Value: Float; virtual;
    function GetI46IsNull: Boolean; virtual;
    function GetOldI46Value: Float; virtual;
    function GetOldI46IsNull: Boolean; virtual;
    procedure SetI46Value(const aValue: Float); virtual;
    procedure SetI46IsNull(const aValue: Boolean); virtual;
    function GetI48Value: Float; virtual;
    function GetI48IsNull: Boolean; virtual;
    function GetOldI48Value: Float; virtual;
    function GetOldI48IsNull: Boolean; virtual;
    procedure SetI48Value(const aValue: Float); virtual;
    procedure SetI48IsNull(const aValue: Boolean); virtual;
    function GetTIValue: Float; virtual;
    function GetTIIsNull: Boolean; virtual;
    function GetOldTIValue: Float; virtual;
    function GetOldTIIsNull: Boolean; virtual;
    procedure SetTIValue(const aValue: Float); virtual;
    procedure SetTIIsNull(const aValue: Boolean); virtual;
    function GetK38Value: Float; virtual;
    function GetK38IsNull: Boolean; virtual;
    function GetOldK38Value: Float; virtual;
    function GetOldK38IsNull: Boolean; virtual;
    procedure SetK38Value(const aValue: Float); virtual;
    procedure SetK38IsNull(const aValue: Boolean); virtual;
    function GetK40Value: Float; virtual;
    function GetK40IsNull: Boolean; virtual;
    function GetOldK40Value: Float; virtual;
    function GetOldK40IsNull: Boolean; virtual;
    procedure SetK40Value(const aValue: Float); virtual;
    procedure SetK40IsNull(const aValue: Boolean); virtual;
    function GetK42Value: Float; virtual;
    function GetK42IsNull: Boolean; virtual;
    function GetOldK42Value: Float; virtual;
    function GetOldK42IsNull: Boolean; virtual;
    procedure SetK42Value(const aValue: Float); virtual;
    procedure SetK42IsNull(const aValue: Boolean); virtual;
    function GetK44Value: Float; virtual;
    function GetK44IsNull: Boolean; virtual;
    function GetOldK44Value: Float; virtual;
    function GetOldK44IsNull: Boolean; virtual;
    procedure SetK44Value(const aValue: Float); virtual;
    procedure SetK44IsNull(const aValue: Boolean); virtual;
    function GetK46Value: Float; virtual;
    function GetK46IsNull: Boolean; virtual;
    function GetOldK46Value: Float; virtual;
    function GetOldK46IsNull: Boolean; virtual;
    procedure SetK46Value(const aValue: Float); virtual;
    procedure SetK46IsNull(const aValue: Boolean); virtual;
    function GetK48Value: Float; virtual;
    function GetK48IsNull: Boolean; virtual;
    function GetOldK48Value: Float; virtual;
    function GetOldK48IsNull: Boolean; virtual;
    procedure SetK48Value(const aValue: Float); virtual;
    procedure SetK48IsNull(const aValue: Boolean); virtual;
    function GetTKValue: Float; virtual;
    function GetTKIsNull: Boolean; virtual;
    function GetOldTKValue: Float; virtual;
    function GetOldTKIsNull: Boolean; virtual;
    procedure SetTKValue(const aValue: Float); virtual;
    procedure SetTKIsNull(const aValue: Boolean); virtual;
    function GetD38Value: Float; virtual;
    function GetD38IsNull: Boolean; virtual;
    function GetOldD38Value: Float; virtual;
    function GetOldD38IsNull: Boolean; virtual;
    procedure SetD38Value(const aValue: Float); virtual;
    procedure SetD38IsNull(const aValue: Boolean); virtual;
    function GetD40Value: Float; virtual;
    function GetD40IsNull: Boolean; virtual;
    function GetOldD40Value: Float; virtual;
    function GetOldD40IsNull: Boolean; virtual;
    procedure SetD40Value(const aValue: Float); virtual;
    procedure SetD40IsNull(const aValue: Boolean); virtual;
    function GetD42Value: Float; virtual;
    function GetD42IsNull: Boolean; virtual;
    function GetOldD42Value: Float; virtual;
    function GetOldD42IsNull: Boolean; virtual;
    procedure SetD42Value(const aValue: Float); virtual;
    procedure SetD42IsNull(const aValue: Boolean); virtual;
    function GetD44Value: Float; virtual;
    function GetD44IsNull: Boolean; virtual;
    function GetOldD44Value: Float; virtual;
    function GetOldD44IsNull: Boolean; virtual;
    procedure SetD44Value(const aValue: Float); virtual;
    procedure SetD44IsNull(const aValue: Boolean); virtual;
    function GetD46Value: Float; virtual;
    function GetD46IsNull: Boolean; virtual;
    function GetOldD46Value: Float; virtual;
    function GetOldD46IsNull: Boolean; virtual;
    procedure SetD46Value(const aValue: Float); virtual;
    procedure SetD46IsNull(const aValue: Boolean); virtual;
    function GetD48Value: Float; virtual;
    function GetD48IsNull: Boolean; virtual;
    function GetOldD48Value: Float; virtual;
    function GetOldD48IsNull: Boolean; virtual;
    procedure SetD48Value(const aValue: Float); virtual;
    procedure SetD48IsNull(const aValue: Boolean); virtual;
    function GetDTValue: Float; virtual;
    function GetDTIsNull: Boolean; virtual;
    function GetOldDTValue: Float; virtual;
    function GetOldDTIsNull: Boolean; virtual;
    procedure SetDTValue(const aValue: Float); virtual;
    procedure SetDTIsNull(const aValue: Boolean); virtual;

    { Properties }
    property CENTRO : String read GetCENTROValue write SetCENTROValue;
    property CENTROIsNull : Boolean read GetCENTROIsNull write SetCENTROIsNull;
    property OldCENTRO : String read GetOldCENTROValue;
    property OldCENTROIsNull : Boolean read GetOldCENTROIsNull;
    property FILIAL : String read GetFILIALValue write SetFILIALValue;
    property FILIALIsNull : Boolean read GetFILIALIsNull write SetFILIALIsNull;
    property OldFILIAL : String read GetOldFILIALValue;
    property OldFILIALIsNull : Boolean read GetOldFILIALIsNull;
    property CODIGO : String read GetCODIGOValue write SetCODIGOValue;
    property CODIGOIsNull : Boolean read GetCODIGOIsNull write SetCODIGOIsNull;
    property OldCODIGO : String read GetOldCODIGOValue;
    property OldCODIGOIsNull : Boolean read GetOldCODIGOIsNull;
    property PRODUCTO : String read GetPRODUCTOValue write SetPRODUCTOValue;
    property PRODUCTOIsNull : Boolean read GetPRODUCTOIsNull write SetPRODUCTOIsNull;
    property OldPRODUCTO : String read GetOldPRODUCTOValue;
    property OldPRODUCTOIsNull : Boolean read GetOldPRODUCTOIsNull;
    property COLOR : String read GetCOLORValue write SetCOLORValue;
    property COLORIsNull : Boolean read GetCOLORIsNull write SetCOLORIsNull;
    property OldCOLOR : String read GetOldCOLORValue;
    property OldCOLORIsNull : Boolean read GetOldCOLORIsNull;
    property TIPO_PRODUCTO : String read GetTIPO_PRODUCTOValue write SetTIPO_PRODUCTOValue;
    property TIPO_PRODUCTOIsNull : Boolean read GetTIPO_PRODUCTOIsNull write SetTIPO_PRODUCTOIsNull;
    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
    property OldTIPO_PRODUCTOIsNull : Boolean read GetOldTIPO_PRODUCTOIsNull;
    property GRUPO_PRODUCTO : String read GetGRUPO_PRODUCTOValue write SetGRUPO_PRODUCTOValue;
    property GRUPO_PRODUCTOIsNull : Boolean read GetGRUPO_PRODUCTOIsNull write SetGRUPO_PRODUCTOIsNull;
    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
    property OldGRUPO_PRODUCTOIsNull : Boolean read GetOldGRUPO_PRODUCTOIsNull;
    property COLECCION : String read GetCOLECCIONValue write SetCOLECCIONValue;
    property COLECCIONIsNull : Boolean read GetCOLECCIONIsNull write SetCOLECCIONIsNull;
    property OldCOLECCION : String read GetOldCOLECCIONValue;
    property OldCOLECCIONIsNull : Boolean read GetOldCOLECCIONIsNull;
    property I38 : Float read GetI38Value write SetI38Value;
    property I38IsNull : Boolean read GetI38IsNull write SetI38IsNull;
    property OldI38 : Float read GetOldI38Value;
    property OldI38IsNull : Boolean read GetOldI38IsNull;
    property I40 : Float read GetI40Value write SetI40Value;
    property I40IsNull : Boolean read GetI40IsNull write SetI40IsNull;
    property OldI40 : Float read GetOldI40Value;
    property OldI40IsNull : Boolean read GetOldI40IsNull;
    property I42 : Float read GetI42Value write SetI42Value;
    property I42IsNull : Boolean read GetI42IsNull write SetI42IsNull;
    property OldI42 : Float read GetOldI42Value;
    property OldI42IsNull : Boolean read GetOldI42IsNull;
    property I44 : Float read GetI44Value write SetI44Value;
    property I44IsNull : Boolean read GetI44IsNull write SetI44IsNull;
    property OldI44 : Float read GetOldI44Value;
    property OldI44IsNull : Boolean read GetOldI44IsNull;
    property I46 : Float read GetI46Value write SetI46Value;
    property I46IsNull : Boolean read GetI46IsNull write SetI46IsNull;
    property OldI46 : Float read GetOldI46Value;
    property OldI46IsNull : Boolean read GetOldI46IsNull;
    property I48 : Float read GetI48Value write SetI48Value;
    property I48IsNull : Boolean read GetI48IsNull write SetI48IsNull;
    property OldI48 : Float read GetOldI48Value;
    property OldI48IsNull : Boolean read GetOldI48IsNull;
    property TI : Float read GetTIValue write SetTIValue;
    property TIIsNull : Boolean read GetTIIsNull write SetTIIsNull;
    property OldTI : Float read GetOldTIValue;
    property OldTIIsNull : Boolean read GetOldTIIsNull;
    property K38 : Float read GetK38Value write SetK38Value;
    property K38IsNull : Boolean read GetK38IsNull write SetK38IsNull;
    property OldK38 : Float read GetOldK38Value;
    property OldK38IsNull : Boolean read GetOldK38IsNull;
    property K40 : Float read GetK40Value write SetK40Value;
    property K40IsNull : Boolean read GetK40IsNull write SetK40IsNull;
    property OldK40 : Float read GetOldK40Value;
    property OldK40IsNull : Boolean read GetOldK40IsNull;
    property K42 : Float read GetK42Value write SetK42Value;
    property K42IsNull : Boolean read GetK42IsNull write SetK42IsNull;
    property OldK42 : Float read GetOldK42Value;
    property OldK42IsNull : Boolean read GetOldK42IsNull;
    property K44 : Float read GetK44Value write SetK44Value;
    property K44IsNull : Boolean read GetK44IsNull write SetK44IsNull;
    property OldK44 : Float read GetOldK44Value;
    property OldK44IsNull : Boolean read GetOldK44IsNull;
    property K46 : Float read GetK46Value write SetK46Value;
    property K46IsNull : Boolean read GetK46IsNull write SetK46IsNull;
    property OldK46 : Float read GetOldK46Value;
    property OldK46IsNull : Boolean read GetOldK46IsNull;
    property K48 : Float read GetK48Value write SetK48Value;
    property K48IsNull : Boolean read GetK48IsNull write SetK48IsNull;
    property OldK48 : Float read GetOldK48Value;
    property OldK48IsNull : Boolean read GetOldK48IsNull;
    property TK : Float read GetTKValue write SetTKValue;
    property TKIsNull : Boolean read GetTKIsNull write SetTKIsNull;
    property OldTK : Float read GetOldTKValue;
    property OldTKIsNull : Boolean read GetOldTKIsNull;
    property D38 : Float read GetD38Value write SetD38Value;
    property D38IsNull : Boolean read GetD38IsNull write SetD38IsNull;
    property OldD38 : Float read GetOldD38Value;
    property OldD38IsNull : Boolean read GetOldD38IsNull;
    property D40 : Float read GetD40Value write SetD40Value;
    property D40IsNull : Boolean read GetD40IsNull write SetD40IsNull;
    property OldD40 : Float read GetOldD40Value;
    property OldD40IsNull : Boolean read GetOldD40IsNull;
    property D42 : Float read GetD42Value write SetD42Value;
    property D42IsNull : Boolean read GetD42IsNull write SetD42IsNull;
    property OldD42 : Float read GetOldD42Value;
    property OldD42IsNull : Boolean read GetOldD42IsNull;
    property D44 : Float read GetD44Value write SetD44Value;
    property D44IsNull : Boolean read GetD44IsNull write SetD44IsNull;
    property OldD44 : Float read GetOldD44Value;
    property OldD44IsNull : Boolean read GetOldD44IsNull;
    property D46 : Float read GetD46Value write SetD46Value;
    property D46IsNull : Boolean read GetD46IsNull write SetD46IsNull;
    property OldD46 : Float read GetOldD46Value;
    property OldD46IsNull : Boolean read GetOldD46IsNull;
    property D48 : Float read GetD48Value write SetD48Value;
    property D48IsNull : Boolean read GetD48IsNull write SetD48IsNull;
    property OldD48 : Float read GetOldD48Value;
    property OldD48IsNull : Boolean read GetOldD48IsNull;
    property DT : Float read GetDTValue write SetDTValue;
    property DTIsNull : Boolean read GetDTIsNull write SetDTIsNull;
    property OldDT : Float read GetOldDTValue;
    property OldDTIsNull : Boolean read GetOldDTIsNull;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

implementation

uses
  Variants, uROBinaryHelpers, uDAInterfaces;

{ TStockPrendasCentrosBusinessProcessorRules }
constructor TStockPrendasCentrosBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TStockPrendasCentrosBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCODIGO];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCODIGO]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosCODIGO];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosCODIGO]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetCODIGOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCODIGO] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetCODIGOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCODIGO] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosPRODUCTO];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosPRODUCTO]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosPRODUCTO];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosPRODUCTO]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetPRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosPRODUCTO] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetPRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosPRODUCTO] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetTIPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosTIPO_PRODUCTO];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetTIPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosTIPO_PRODUCTO]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldTIPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosTIPO_PRODUCTO];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldTIPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosTIPO_PRODUCTO]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetTIPO_PRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosTIPO_PRODUCTO] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetTIPO_PRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosTIPO_PRODUCTO] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetGRUPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosGRUPO_PRODUCTO];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetGRUPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosGRUPO_PRODUCTO]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldGRUPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosGRUPO_PRODUCTO];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldGRUPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosGRUPO_PRODUCTO]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetGRUPO_PRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosGRUPO_PRODUCTO] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetGRUPO_PRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosGRUPO_PRODUCTO] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCOLECCION];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCOLECCION]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosCOLECCION];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosCOLECCION]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetCOLECCIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCOLECCION] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetCOLECCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCOLECCION] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCOLOR];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCOLOR]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosCOLOR];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosCOLOR]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetCOLORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCOLOR] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetCOLORIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosCOLOR] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT38];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT38]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT38];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT38]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT38] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT38] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT40];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT40]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT40];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT40]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT40] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT40] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT42];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT42]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT42];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT42]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT42] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT42] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT44];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT44]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT44];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT44]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT44] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT44] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT46];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT46]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT46];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT46]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT46] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT46] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT48];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetT48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT48]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT48];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldT48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosT48]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT48] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetT48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosT48] := Null;
end;

function TStockPrendasCentrosBusinessProcessorRules.GetTOTALValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosTOTAL];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetTOTALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosTOTAL]);
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldTOTALValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosTOTAL];
end;

function TStockPrendasCentrosBusinessProcessorRules.GetOldTOTALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockPrendasCentrosTOTAL]);
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetTOTALValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosTOTAL] := aValue;
end;

procedure TStockPrendasCentrosBusinessProcessorRules.SetTOTALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockPrendasCentrosTOTAL] := Null;
end;


{ TStockEDIBusinessProcessorRules }
constructor TStockEDIBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TStockEDIBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TStockEDIBusinessProcessorRules.GetCENTROValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICENTRO];
end;

function TStockEDIBusinessProcessorRules.GetCENTROIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICENTRO]);
end;

function TStockEDIBusinessProcessorRules.GetOldCENTROValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDICENTRO];
end;

function TStockEDIBusinessProcessorRules.GetOldCENTROIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDICENTRO]);
end;

procedure TStockEDIBusinessProcessorRules.SetCENTROValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICENTRO] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetCENTROIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICENTRO] := Null;
end;

function TStockEDIBusinessProcessorRules.GetFILIALValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIFILIAL];
end;

function TStockEDIBusinessProcessorRules.GetFILIALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIFILIAL]);
end;

function TStockEDIBusinessProcessorRules.GetOldFILIALValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIFILIAL];
end;

function TStockEDIBusinessProcessorRules.GetOldFILIALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIFILIAL]);
end;

procedure TStockEDIBusinessProcessorRules.SetFILIALValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIFILIAL] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetFILIALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIFILIAL] := Null;
end;

function TStockEDIBusinessProcessorRules.GetCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICODIGO];
end;

function TStockEDIBusinessProcessorRules.GetCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICODIGO]);
end;

function TStockEDIBusinessProcessorRules.GetOldCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDICODIGO];
end;

function TStockEDIBusinessProcessorRules.GetOldCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDICODIGO]);
end;

procedure TStockEDIBusinessProcessorRules.SetCODIGOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICODIGO] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetCODIGOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICODIGO] := Null;
end;

function TStockEDIBusinessProcessorRules.GetPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIPRODUCTO];
end;

function TStockEDIBusinessProcessorRules.GetPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIPRODUCTO]);
end;

function TStockEDIBusinessProcessorRules.GetOldPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIPRODUCTO];
end;

function TStockEDIBusinessProcessorRules.GetOldPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIPRODUCTO]);
end;

procedure TStockEDIBusinessProcessorRules.SetPRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIPRODUCTO] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetPRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIPRODUCTO] := Null;
end;

function TStockEDIBusinessProcessorRules.GetTIPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITIPO_PRODUCTO];
end;

function TStockEDIBusinessProcessorRules.GetTIPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITIPO_PRODUCTO]);
end;

function TStockEDIBusinessProcessorRules.GetOldTIPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDITIPO_PRODUCTO];
end;

function TStockEDIBusinessProcessorRules.GetOldTIPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDITIPO_PRODUCTO]);
end;

procedure TStockEDIBusinessProcessorRules.SetTIPO_PRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITIPO_PRODUCTO] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetTIPO_PRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITIPO_PRODUCTO] := Null;
end;

function TStockEDIBusinessProcessorRules.GetGRUPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIGRUPO_PRODUCTO];
end;

function TStockEDIBusinessProcessorRules.GetGRUPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIGRUPO_PRODUCTO]);
end;

function TStockEDIBusinessProcessorRules.GetOldGRUPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIGRUPO_PRODUCTO];
end;

function TStockEDIBusinessProcessorRules.GetOldGRUPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIGRUPO_PRODUCTO]);
end;

procedure TStockEDIBusinessProcessorRules.SetGRUPO_PRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIGRUPO_PRODUCTO] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetGRUPO_PRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIGRUPO_PRODUCTO] := Null;
end;

function TStockEDIBusinessProcessorRules.GetCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICOLECCION];
end;

function TStockEDIBusinessProcessorRules.GetCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICOLECCION]);
end;

function TStockEDIBusinessProcessorRules.GetOldCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDICOLECCION];
end;

function TStockEDIBusinessProcessorRules.GetOldCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDICOLECCION]);
end;

procedure TStockEDIBusinessProcessorRules.SetCOLECCIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICOLECCION] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetCOLECCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICOLECCION] := Null;
end;

function TStockEDIBusinessProcessorRules.GetCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICOLOR];
end;

function TStockEDIBusinessProcessorRules.GetCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICOLOR]);
end;

function TStockEDIBusinessProcessorRules.GetOldCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDICOLOR];
end;

function TStockEDIBusinessProcessorRules.GetOldCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDICOLOR]);
end;

procedure TStockEDIBusinessProcessorRules.SetCOLORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICOLOR] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetCOLORIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDICOLOR] := Null;
end;

function TStockEDIBusinessProcessorRules.GetE38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE38];
end;

function TStockEDIBusinessProcessorRules.GetE38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE38]);
end;

function TStockEDIBusinessProcessorRules.GetOldE38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE38];
end;

function TStockEDIBusinessProcessorRules.GetOldE38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE38]);
end;

procedure TStockEDIBusinessProcessorRules.SetE38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE38] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetE38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE38] := Null;
end;

function TStockEDIBusinessProcessorRules.GetE40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE40];
end;

function TStockEDIBusinessProcessorRules.GetE40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE40]);
end;

function TStockEDIBusinessProcessorRules.GetOldE40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE40];
end;

function TStockEDIBusinessProcessorRules.GetOldE40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE40]);
end;

procedure TStockEDIBusinessProcessorRules.SetE40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE40] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetE40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE40] := Null;
end;

function TStockEDIBusinessProcessorRules.GetE42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE42];
end;

function TStockEDIBusinessProcessorRules.GetE42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE42]);
end;

function TStockEDIBusinessProcessorRules.GetOldE42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE42];
end;

function TStockEDIBusinessProcessorRules.GetOldE42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE42]);
end;

procedure TStockEDIBusinessProcessorRules.SetE42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE42] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetE42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE42] := Null;
end;

function TStockEDIBusinessProcessorRules.GetE44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE44];
end;

function TStockEDIBusinessProcessorRules.GetE44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE44]);
end;

function TStockEDIBusinessProcessorRules.GetOldE44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE44];
end;

function TStockEDIBusinessProcessorRules.GetOldE44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE44]);
end;

procedure TStockEDIBusinessProcessorRules.SetE44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE44] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetE44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE44] := Null;
end;

function TStockEDIBusinessProcessorRules.GetE46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE46];
end;

function TStockEDIBusinessProcessorRules.GetE46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE46]);
end;

function TStockEDIBusinessProcessorRules.GetOldE46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE46];
end;

function TStockEDIBusinessProcessorRules.GetOldE46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE46]);
end;

procedure TStockEDIBusinessProcessorRules.SetE46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE46] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetE46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE46] := Null;
end;

function TStockEDIBusinessProcessorRules.GetE48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE48];
end;

function TStockEDIBusinessProcessorRules.GetE48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE48]);
end;

function TStockEDIBusinessProcessorRules.GetOldE48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE48];
end;

function TStockEDIBusinessProcessorRules.GetOldE48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIE48]);
end;

procedure TStockEDIBusinessProcessorRules.SetE48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE48] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetE48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIE48] := Null;
end;

function TStockEDIBusinessProcessorRules.GetTEValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITE];
end;

function TStockEDIBusinessProcessorRules.GetTEIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITE]);
end;

function TStockEDIBusinessProcessorRules.GetOldTEValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDITE];
end;

function TStockEDIBusinessProcessorRules.GetOldTEIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDITE]);
end;

procedure TStockEDIBusinessProcessorRules.SetTEValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITE] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITE] := Null;
end;

function TStockEDIBusinessProcessorRules.GetS38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS38];
end;

function TStockEDIBusinessProcessorRules.GetS38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS38]);
end;

function TStockEDIBusinessProcessorRules.GetOldS38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS38];
end;

function TStockEDIBusinessProcessorRules.GetOldS38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS38]);
end;

procedure TStockEDIBusinessProcessorRules.SetS38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS38] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetS38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS38] := Null;
end;

function TStockEDIBusinessProcessorRules.GetS40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS40];
end;

function TStockEDIBusinessProcessorRules.GetS40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS40]);
end;

function TStockEDIBusinessProcessorRules.GetOldS40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS40];
end;

function TStockEDIBusinessProcessorRules.GetOldS40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS40]);
end;

procedure TStockEDIBusinessProcessorRules.SetS40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS40] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetS40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS40] := Null;
end;

function TStockEDIBusinessProcessorRules.GetS42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS42];
end;

function TStockEDIBusinessProcessorRules.GetS42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS42]);
end;

function TStockEDIBusinessProcessorRules.GetOldS42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS42];
end;

function TStockEDIBusinessProcessorRules.GetOldS42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS42]);
end;

procedure TStockEDIBusinessProcessorRules.SetS42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS42] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetS42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS42] := Null;
end;

function TStockEDIBusinessProcessorRules.GetS44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS44];
end;

function TStockEDIBusinessProcessorRules.GetS44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS44]);
end;

function TStockEDIBusinessProcessorRules.GetOldS44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS44];
end;

function TStockEDIBusinessProcessorRules.GetOldS44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS44]);
end;

procedure TStockEDIBusinessProcessorRules.SetS44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS44] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetS44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS44] := Null;
end;

function TStockEDIBusinessProcessorRules.GetS46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS46];
end;

function TStockEDIBusinessProcessorRules.GetS46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS46]);
end;

function TStockEDIBusinessProcessorRules.GetOldS46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS46];
end;

function TStockEDIBusinessProcessorRules.GetOldS46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS46]);
end;

procedure TStockEDIBusinessProcessorRules.SetS46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS46] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetS46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS46] := Null;
end;

function TStockEDIBusinessProcessorRules.GetS48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS48];
end;

function TStockEDIBusinessProcessorRules.GetS48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS48]);
end;

function TStockEDIBusinessProcessorRules.GetOldS48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS48];
end;

function TStockEDIBusinessProcessorRules.GetOldS48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIS48]);
end;

procedure TStockEDIBusinessProcessorRules.SetS48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS48] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetS48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIS48] := Null;
end;

function TStockEDIBusinessProcessorRules.GetTSValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITS];
end;

function TStockEDIBusinessProcessorRules.GetTSIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITS]);
end;

function TStockEDIBusinessProcessorRules.GetOldTSValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDITS];
end;

function TStockEDIBusinessProcessorRules.GetOldTSIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDITS]);
end;

procedure TStockEDIBusinessProcessorRules.SetTSValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITS] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetTSIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDITS] := Null;
end;

function TStockEDIBusinessProcessorRules.GetK38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK38];
end;

function TStockEDIBusinessProcessorRules.GetK38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK38]);
end;

function TStockEDIBusinessProcessorRules.GetOldK38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK38];
end;

function TStockEDIBusinessProcessorRules.GetOldK38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK38]);
end;

procedure TStockEDIBusinessProcessorRules.SetK38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK38] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetK38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK38] := Null;
end;

function TStockEDIBusinessProcessorRules.GetK40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK40];
end;

function TStockEDIBusinessProcessorRules.GetK40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK40]);
end;

function TStockEDIBusinessProcessorRules.GetOldK40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK40];
end;

function TStockEDIBusinessProcessorRules.GetOldK40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK40]);
end;

procedure TStockEDIBusinessProcessorRules.SetK40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK40] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetK40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK40] := Null;
end;

function TStockEDIBusinessProcessorRules.GetK42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK42];
end;

function TStockEDIBusinessProcessorRules.GetK42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK42]);
end;

function TStockEDIBusinessProcessorRules.GetOldK42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK42];
end;

function TStockEDIBusinessProcessorRules.GetOldK42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK42]);
end;

procedure TStockEDIBusinessProcessorRules.SetK42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK42] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetK42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK42] := Null;
end;

function TStockEDIBusinessProcessorRules.GetK44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK44];
end;

function TStockEDIBusinessProcessorRules.GetK44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK44]);
end;

function TStockEDIBusinessProcessorRules.GetOldK44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK44];
end;

function TStockEDIBusinessProcessorRules.GetOldK44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK44]);
end;

procedure TStockEDIBusinessProcessorRules.SetK44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK44] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetK44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK44] := Null;
end;

function TStockEDIBusinessProcessorRules.GetK46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK46];
end;

function TStockEDIBusinessProcessorRules.GetK46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK46]);
end;

function TStockEDIBusinessProcessorRules.GetOldK46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK46];
end;

function TStockEDIBusinessProcessorRules.GetOldK46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK46]);
end;

procedure TStockEDIBusinessProcessorRules.SetK46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK46] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetK46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK46] := Null;
end;

function TStockEDIBusinessProcessorRules.GetK48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK48];
end;

function TStockEDIBusinessProcessorRules.GetK48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK48]);
end;

function TStockEDIBusinessProcessorRules.GetOldK48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK48];
end;

function TStockEDIBusinessProcessorRules.GetOldK48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIK48]);
end;

procedure TStockEDIBusinessProcessorRules.SetK48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK48] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetK48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIK48] := Null;
end;

function TStockEDIBusinessProcessorRules.GetKTValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIKT];
end;

function TStockEDIBusinessProcessorRules.GetKTIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIKT]);
end;

function TStockEDIBusinessProcessorRules.GetOldKTValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIKT];
end;

function TStockEDIBusinessProcessorRules.GetOldKTIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIKT]);
end;

procedure TStockEDIBusinessProcessorRules.SetKTValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIKT] := aValue;
end;

procedure TStockEDIBusinessProcessorRules.SetKTIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIKT] := Null;
end;


{ TStockVARELABusinessProcessorRules }
constructor TStockVARELABusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TStockVARELABusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TStockVARELABusinessProcessorRules.GetFILIALValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAFILIAL];
end;

function TStockVARELABusinessProcessorRules.GetFILIALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAFILIAL]);
end;

function TStockVARELABusinessProcessorRules.GetOldFILIALValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAFILIAL];
end;

function TStockVARELABusinessProcessorRules.GetOldFILIALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAFILIAL]);
end;

procedure TStockVARELABusinessProcessorRules.SetFILIALValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAFILIAL] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetFILIALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAFILIAL] := Null;
end;

function TStockVARELABusinessProcessorRules.GetCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACODIGO];
end;

function TStockVARELABusinessProcessorRules.GetCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACODIGO]);
end;

function TStockVARELABusinessProcessorRules.GetOldCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELACODIGO];
end;

function TStockVARELABusinessProcessorRules.GetOldCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELACODIGO]);
end;

procedure TStockVARELABusinessProcessorRules.SetCODIGOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACODIGO] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetCODIGOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACODIGO] := Null;
end;

function TStockVARELABusinessProcessorRules.GetCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACOLOR];
end;

function TStockVARELABusinessProcessorRules.GetCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACOLOR]);
end;

function TStockVARELABusinessProcessorRules.GetOldCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELACOLOR];
end;

function TStockVARELABusinessProcessorRules.GetOldCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELACOLOR]);
end;

procedure TStockVARELABusinessProcessorRules.SetCOLORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACOLOR] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetCOLORIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACOLOR] := Null;
end;

function TStockVARELABusinessProcessorRules.GetPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAPRODUCTO];
end;

function TStockVARELABusinessProcessorRules.GetPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAPRODUCTO]);
end;

function TStockVARELABusinessProcessorRules.GetOldPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAPRODUCTO];
end;

function TStockVARELABusinessProcessorRules.GetOldPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAPRODUCTO]);
end;

procedure TStockVARELABusinessProcessorRules.SetPRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAPRODUCTO] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetPRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAPRODUCTO] := Null;
end;

function TStockVARELABusinessProcessorRules.GetTIPO_PRODUTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELATIPO_PRODUTO];
end;

function TStockVARELABusinessProcessorRules.GetTIPO_PRODUTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELATIPO_PRODUTO]);
end;

function TStockVARELABusinessProcessorRules.GetOldTIPO_PRODUTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELATIPO_PRODUTO];
end;

function TStockVARELABusinessProcessorRules.GetOldTIPO_PRODUTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELATIPO_PRODUTO]);
end;

procedure TStockVARELABusinessProcessorRules.SetTIPO_PRODUTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELATIPO_PRODUTO] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetTIPO_PRODUTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELATIPO_PRODUTO] := Null;
end;

function TStockVARELABusinessProcessorRules.GetGRUPO_PRODUTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAGRUPO_PRODUTO];
end;

function TStockVARELABusinessProcessorRules.GetGRUPO_PRODUTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAGRUPO_PRODUTO]);
end;

function TStockVARELABusinessProcessorRules.GetOldGRUPO_PRODUTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAGRUPO_PRODUTO];
end;

function TStockVARELABusinessProcessorRules.GetOldGRUPO_PRODUTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAGRUPO_PRODUTO]);
end;

procedure TStockVARELABusinessProcessorRules.SetGRUPO_PRODUTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAGRUPO_PRODUTO] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetGRUPO_PRODUTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAGRUPO_PRODUTO] := Null;
end;

function TStockVARELABusinessProcessorRules.GetCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACOLECCION];
end;

function TStockVARELABusinessProcessorRules.GetCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACOLECCION]);
end;

function TStockVARELABusinessProcessorRules.GetOldCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELACOLECCION];
end;

function TStockVARELABusinessProcessorRules.GetOldCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELACOLECCION]);
end;

procedure TStockVARELABusinessProcessorRules.SetCOLECCIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACOLECCION] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetCOLECCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELACOLECCION] := Null;
end;

function TStockVARELABusinessProcessorRules.GetK38Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK38];
end;

function TStockVARELABusinessProcessorRules.GetK38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK38]);
end;

function TStockVARELABusinessProcessorRules.GetOldK38Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK38];
end;

function TStockVARELABusinessProcessorRules.GetOldK38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK38]);
end;

procedure TStockVARELABusinessProcessorRules.SetK38Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK38] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetK38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK38] := Null;
end;

function TStockVARELABusinessProcessorRules.GetK40Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK40];
end;

function TStockVARELABusinessProcessorRules.GetK40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK40]);
end;

function TStockVARELABusinessProcessorRules.GetOldK40Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK40];
end;

function TStockVARELABusinessProcessorRules.GetOldK40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK40]);
end;

procedure TStockVARELABusinessProcessorRules.SetK40Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK40] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetK40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK40] := Null;
end;

function TStockVARELABusinessProcessorRules.GetK42Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK42];
end;

function TStockVARELABusinessProcessorRules.GetK42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK42]);
end;

function TStockVARELABusinessProcessorRules.GetOldK42Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK42];
end;

function TStockVARELABusinessProcessorRules.GetOldK42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK42]);
end;

procedure TStockVARELABusinessProcessorRules.SetK42Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK42] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetK42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK42] := Null;
end;

function TStockVARELABusinessProcessorRules.GetK44Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK44];
end;

function TStockVARELABusinessProcessorRules.GetK44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK44]);
end;

function TStockVARELABusinessProcessorRules.GetOldK44Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK44];
end;

function TStockVARELABusinessProcessorRules.GetOldK44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK44]);
end;

procedure TStockVARELABusinessProcessorRules.SetK44Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK44] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetK44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK44] := Null;
end;

function TStockVARELABusinessProcessorRules.GetK46Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK46];
end;

function TStockVARELABusinessProcessorRules.GetK46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK46]);
end;

function TStockVARELABusinessProcessorRules.GetOldK46Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK46];
end;

function TStockVARELABusinessProcessorRules.GetOldK46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK46]);
end;

procedure TStockVARELABusinessProcessorRules.SetK46Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK46] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetK46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK46] := Null;
end;

function TStockVARELABusinessProcessorRules.GetK48Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK48];
end;

function TStockVARELABusinessProcessorRules.GetK48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK48]);
end;

function TStockVARELABusinessProcessorRules.GetOldK48Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK48];
end;

function TStockVARELABusinessProcessorRules.GetOldK48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAK48]);
end;

procedure TStockVARELABusinessProcessorRules.SetK48Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK48] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetK48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAK48] := Null;
end;

function TStockVARELABusinessProcessorRules.GetKTValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAKT];
end;

function TStockVARELABusinessProcessorRules.GetKTIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAKT]);
end;

function TStockVARELABusinessProcessorRules.GetOldKTValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAKT];
end;

function TStockVARELABusinessProcessorRules.GetOldKTIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockVARELAKT]);
end;

procedure TStockVARELABusinessProcessorRules.SetKTValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAKT] := aValue;
end;

procedure TStockVARELABusinessProcessorRules.SetKTIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockVARELAKT] := Null;
end;


{ TStockEDIInventario2BusinessProcessorRules }
constructor TStockEDIInventario2BusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TStockEDIInventario2BusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TStockEDIInventario2BusinessProcessorRules.GetCENTROValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CENTRO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetCENTROIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CENTRO]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldCENTROValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2CENTRO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldCENTROIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2CENTRO]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetCENTROValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CENTRO] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetCENTROIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CENTRO] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetFILIALValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2FILIAL];
end;

function TStockEDIInventario2BusinessProcessorRules.GetFILIALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2FILIAL]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldFILIALValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2FILIAL];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldFILIALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2FILIAL]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetFILIALValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2FILIAL] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetFILIALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2FILIAL] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CODIGO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CODIGO]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2CODIGO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2CODIGO]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetCODIGOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CODIGO] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetCODIGOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CODIGO] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2PRODUCTO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2PRODUCTO]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2PRODUCTO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2PRODUCTO]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetPRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2PRODUCTO] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetPRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2PRODUCTO] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLOR];
end;

function TStockEDIInventario2BusinessProcessorRules.GetCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLOR]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2COLOR];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2COLOR]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetCOLORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLOR] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetCOLORIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLOR] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetTIPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TIPO_PRODUCTO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetTIPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TIPO_PRODUCTO]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldTIPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TIPO_PRODUCTO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldTIPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TIPO_PRODUCTO]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetTIPO_PRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TIPO_PRODUCTO] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetTIPO_PRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TIPO_PRODUCTO] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetGRUPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetGRUPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldGRUPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldGRUPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetGRUPO_PRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetGRUPO_PRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLECCION];
end;

function TStockEDIInventario2BusinessProcessorRules.GetCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLECCION]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2COLECCION];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2COLECCION]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetCOLECCIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLECCION] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetCOLECCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLECCION] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetI38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I38];
end;

function TStockEDIInventario2BusinessProcessorRules.GetI38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I38]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I38];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I38]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I38] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I38] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetI40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I40];
end;

function TStockEDIInventario2BusinessProcessorRules.GetI40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I40]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I40];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I40]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I40] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I40] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetI42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I42];
end;

function TStockEDIInventario2BusinessProcessorRules.GetI42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I42]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I42];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I42]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I42] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I42] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetI44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I44];
end;

function TStockEDIInventario2BusinessProcessorRules.GetI44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I44]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I44];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I44]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I44] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I44] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetI46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I46];
end;

function TStockEDIInventario2BusinessProcessorRules.GetI46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I46]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I46];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I46]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I46] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I46] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetI48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I48];
end;

function TStockEDIInventario2BusinessProcessorRules.GetI48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I48]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I48];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldI48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I48]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I48] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetI48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I48] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetTIValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TI];
end;

function TStockEDIInventario2BusinessProcessorRules.GetTIIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TI]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldTIValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TI];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldTIIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TI]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetTIValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TI] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetTIIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TI] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetK38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K38];
end;

function TStockEDIInventario2BusinessProcessorRules.GetK38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K38]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K38];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K38]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K38] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K38] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetK40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K40];
end;

function TStockEDIInventario2BusinessProcessorRules.GetK40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K40]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K40];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K40]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K40] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K40] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetK42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K42];
end;

function TStockEDIInventario2BusinessProcessorRules.GetK42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K42]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K42];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K42]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K42] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K42] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetK44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K44];
end;

function TStockEDIInventario2BusinessProcessorRules.GetK44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K44]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K44];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K44]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K44] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K44] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetK46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K46];
end;

function TStockEDIInventario2BusinessProcessorRules.GetK46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K46]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K46];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K46]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K46] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K46] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetK48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K48];
end;

function TStockEDIInventario2BusinessProcessorRules.GetK48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K48]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K48];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldK48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K48]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K48] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetK48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K48] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetTKValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TK];
end;

function TStockEDIInventario2BusinessProcessorRules.GetTKIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TK]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldTKValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TK];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldTKIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TK]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetTKValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TK] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetTKIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TK] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetD38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D38];
end;

function TStockEDIInventario2BusinessProcessorRules.GetD38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D38]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D38];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D38]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D38] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D38] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetD40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D40];
end;

function TStockEDIInventario2BusinessProcessorRules.GetD40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D40]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D40];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D40]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D40] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D40] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetD42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D42];
end;

function TStockEDIInventario2BusinessProcessorRules.GetD42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D42]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D42];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D42]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D42] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D42] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetD44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D44];
end;

function TStockEDIInventario2BusinessProcessorRules.GetD44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D44]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D44];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D44]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D44] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D44] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetD46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D46];
end;

function TStockEDIInventario2BusinessProcessorRules.GetD46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D46]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D46];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D46]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D46] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D46] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetD48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D48];
end;

function TStockEDIInventario2BusinessProcessorRules.GetD48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D48]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D48];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldD48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D48]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D48] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetD48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D48] := Null;
end;

function TStockEDIInventario2BusinessProcessorRules.GetDTValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2DT];
end;

function TStockEDIInventario2BusinessProcessorRules.GetDTIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2DT]);
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldDTValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2DT];
end;

function TStockEDIInventario2BusinessProcessorRules.GetOldDTIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2DT]);
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetDTValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2DT] := aValue;
end;

procedure TStockEDIInventario2BusinessProcessorRules.SetDTIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2DT] := Null;
end;


{ TStockEDIInventarioBusinessProcessorRules }
constructor TStockEDIInventarioBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TStockEDIInventarioBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TStockEDIInventarioBusinessProcessorRules.GetCENTROValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCENTRO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetCENTROIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCENTRO]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldCENTROValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioCENTRO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldCENTROIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioCENTRO]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetCENTROValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCENTRO] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetCENTROIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCENTRO] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetFILIALValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioFILIAL];
end;

function TStockEDIInventarioBusinessProcessorRules.GetFILIALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioFILIAL]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldFILIALValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioFILIAL];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldFILIALIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioFILIAL]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetFILIALValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioFILIAL] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetFILIALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioFILIAL] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCODIGO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCODIGO]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldCODIGOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioCODIGO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldCODIGOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioCODIGO]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetCODIGOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCODIGO] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetCODIGOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCODIGO] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioPRODUCTO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioPRODUCTO]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldPRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioPRODUCTO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldPRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioPRODUCTO]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetPRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioPRODUCTO] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetPRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioPRODUCTO] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCOLOR];
end;

function TStockEDIInventarioBusinessProcessorRules.GetCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCOLOR]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldCOLORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioCOLOR];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldCOLORIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioCOLOR]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetCOLORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCOLOR] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetCOLORIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCOLOR] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetTIPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTIPO_PRODUCTO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetTIPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTIPO_PRODUCTO]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldTIPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioTIPO_PRODUCTO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldTIPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioTIPO_PRODUCTO]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetTIPO_PRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTIPO_PRODUCTO] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetTIPO_PRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTIPO_PRODUCTO] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetGRUPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioGRUPO_PRODUCTO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetGRUPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioGRUPO_PRODUCTO]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldGRUPO_PRODUCTOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioGRUPO_PRODUCTO];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldGRUPO_PRODUCTOIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioGRUPO_PRODUCTO]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetGRUPO_PRODUCTOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioGRUPO_PRODUCTO] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetGRUPO_PRODUCTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioGRUPO_PRODUCTO] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCOLECCION];
end;

function TStockEDIInventarioBusinessProcessorRules.GetCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCOLECCION]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldCOLECCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioCOLECCION];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldCOLECCIONIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioCOLECCION]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetCOLECCIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCOLECCION] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetCOLECCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioCOLECCION] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetI38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI38];
end;

function TStockEDIInventarioBusinessProcessorRules.GetI38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI38]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI38];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI38]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI38] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI38] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetI40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI40];
end;

function TStockEDIInventarioBusinessProcessorRules.GetI40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI40]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI40];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI40]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI40] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI40] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetI42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI42];
end;

function TStockEDIInventarioBusinessProcessorRules.GetI42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI42]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI42];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI42]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI42] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI42] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetI44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI44];
end;

function TStockEDIInventarioBusinessProcessorRules.GetI44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI44]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI44];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI44]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI44] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI44] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetI46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI46];
end;

function TStockEDIInventarioBusinessProcessorRules.GetI46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI46]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI46];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI46]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI46] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI46] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetI48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI48];
end;

function TStockEDIInventarioBusinessProcessorRules.GetI48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI48]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI48];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldI48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioI48]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI48] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetI48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioI48] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetTIValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTI];
end;

function TStockEDIInventarioBusinessProcessorRules.GetTIIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTI]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldTIValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioTI];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldTIIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioTI]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetTIValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTI] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetTIIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTI] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetK38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK38];
end;

function TStockEDIInventarioBusinessProcessorRules.GetK38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK38]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK38];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK38]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK38] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK38] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetK40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK40];
end;

function TStockEDIInventarioBusinessProcessorRules.GetK40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK40]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK40];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK40]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK40] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK40] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetK42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK42];
end;

function TStockEDIInventarioBusinessProcessorRules.GetK42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK42]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK42];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK42]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK42] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK42] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetK44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK44];
end;

function TStockEDIInventarioBusinessProcessorRules.GetK44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK44]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK44];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK44]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK44] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK44] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetK46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK46];
end;

function TStockEDIInventarioBusinessProcessorRules.GetK46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK46]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK46];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK46]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK46] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK46] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetK48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK48];
end;

function TStockEDIInventarioBusinessProcessorRules.GetK48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK48]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK48];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldK48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioK48]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK48] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetK48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioK48] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetTKValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTK];
end;

function TStockEDIInventarioBusinessProcessorRules.GetTKIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTK]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldTKValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioTK];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldTKIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioTK]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetTKValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTK] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetTKIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioTK] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetD38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD38];
end;

function TStockEDIInventarioBusinessProcessorRules.GetD38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD38]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD38Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD38];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD38IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD38]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD38Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD38] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD38IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD38] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetD40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD40];
end;

function TStockEDIInventarioBusinessProcessorRules.GetD40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD40]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD40Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD40];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD40IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD40]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD40Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD40] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD40IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD40] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetD42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD42];
end;

function TStockEDIInventarioBusinessProcessorRules.GetD42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD42]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD42Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD42];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD42IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD42]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD42Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD42] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD42IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD42] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetD44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD44];
end;

function TStockEDIInventarioBusinessProcessorRules.GetD44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD44]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD44Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD44];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD44IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD44]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD44Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD44] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD44IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD44] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetD46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD46];
end;

function TStockEDIInventarioBusinessProcessorRules.GetD46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD46]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD46Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD46];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD46IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD46]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD46Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD46] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD46IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD46] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetD48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD48];
end;

function TStockEDIInventarioBusinessProcessorRules.GetD48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD48]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD48Value: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD48];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldD48IsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioD48]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD48Value(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD48] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetD48IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioD48] := Null;
end;

function TStockEDIInventarioBusinessProcessorRules.GetDTValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioDT];
end;

function TStockEDIInventarioBusinessProcessorRules.GetDTIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioDT]);
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldDTValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioDT];
end;

function TStockEDIInventarioBusinessProcessorRules.GetOldDTIsNull: Boolean;
begin
  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventarioDT]);
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetDTValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioDT] := aValue;
end;

procedure TStockEDIInventarioBusinessProcessorRules.SetDTIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventarioDT] := Null;
end;


initialization
  RegisterBusinessProcessorRules(RID_StockPrendasCentrosDelta, TStockPrendasCentrosBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_StockEDIDelta, TStockEDIBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_StockVARELADelta, TStockVARELABusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_StockEDIInventario2Delta, TStockEDIInventario2BusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_StockEDIInventarioDelta, TStockEDIInventarioBusinessProcessorRules);

end.
