This repository has been archived on 2024-11-28. You can view files and clone it, but cannot push or open issues or pull requests.
LuisLeon_FactuGES/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloServer_Intf.pas
2007-07-10 17:32:21 +00:00

938 lines
44 KiB
ObjectPascal

unit schInfVentasArticuloServer_Intf;
interface
uses
Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, schInfVentasArticuloClient_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_InfVentasArticuloDelta = '{41CF36F8-6F1E-47E5-A111-BE05FD77D941}';
type
{ IInfVentasArticuloDelta }
IInfVentasArticuloDelta = interface(IInfVentasArticulo)
['{41CF36F8-6F1E-47E5-A111-BE05FD77D941}']
{ Property getters and setters }
function GetOldID_FACTURAValue : Integer;
function GetOldID_EMPRESAValue : Integer;
function GetOldID_REFERENCIA_FACTURAValue : String;
function GetOldFECHA_FACTURAValue : DateTime;
function GetOldIMPORTE_TOTAL_FACTURAValue : Float;
function GetOldID_COMISION_FACTURAValue : Integer;
function GetOldID_ARTICULOValue : Integer;
function GetOldFAMILIAValue : String;
function GetOldREFERENCIAValue : String;
function GetOldREFERENCIA_PROVValue : String;
function GetOldDESCRIPCIONValue : String;
function GetOldCOMISIONABLEValue : Integer;
function GetOldINVENTARIABLEValue : Integer;
function GetOldPRECIO_COSTEValue : Float;
function GetOldDESCUENTO_PROVEEDORValue : Float;
function GetOldPRECIO_NETOValue : Float;
function GetOldPRECIO_PORTEValue : Float;
function GetOldCANTIDADValue : Integer;
function GetOldIMPORTE_UNIDADValue : Float;
function GetOldDESCUENTO_CLIENTEValue : Float;
function GetOldIMPORTE_PORTEValue : Float;
function GetOldIMPORTE_TOTALValue : Float;
function GetOldNIF_CIF_PROVEEDORValue : String;
function GetOldNOMBRE_PROVEEDORValue : String;
function GetOldCALLE_PROVEEDORValue : String;
function GetOldPOBLACION_PROVEEDORValue : String;
function GetOldPROVINCIA_PROVEEDORValue : String;
function GetOldNIF_CIF_CLIENTEValue : String;
function GetOldNOMBRE_CLIENTEValue : String;
function GetOldNOMBRE_COMERCIAL_CLIENTEValue : String;
function GetOldCALLE_CLIENTEValue : String;
function GetOldPOBLACION_CLIENTEValue : String;
function GetOldPROVINCIA_CLIENTEValue : String;
function GetOldNIF_CIF_AGENTEValue : String;
function GetOldNOMBRE_AGENTEValue : String;
function GetOldCALLE_AGENTEValue : String;
function GetOldPOBLACION_AGENTEValue : String;
function GetOldPROVINCIA_AGENTEValue : String;
function GetOldCOMISION_AGENTEValue : Float;
function GetOldIMPORTE_COMISION_AGENTEValue : Float;
{ Properties }
property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
property OldID_REFERENCIA_FACTURA : String read GetOldID_REFERENCIA_FACTURAValue;
property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
property OldIMPORTE_TOTAL_FACTURA : Float read GetOldIMPORTE_TOTAL_FACTURAValue;
property OldID_COMISION_FACTURA : Integer read GetOldID_COMISION_FACTURAValue;
property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue;
property OldFAMILIA : String read GetOldFAMILIAValue;
property OldREFERENCIA : String read GetOldREFERENCIAValue;
property OldREFERENCIA_PROV : String read GetOldREFERENCIA_PROVValue;
property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
property OldCOMISIONABLE : Integer read GetOldCOMISIONABLEValue;
property OldINVENTARIABLE : Integer read GetOldINVENTARIABLEValue;
property OldPRECIO_COSTE : Float read GetOldPRECIO_COSTEValue;
property OldDESCUENTO_PROVEEDOR : Float read GetOldDESCUENTO_PROVEEDORValue;
property OldPRECIO_NETO : Float read GetOldPRECIO_NETOValue;
property OldPRECIO_PORTE : Float read GetOldPRECIO_PORTEValue;
property OldCANTIDAD : Integer read GetOldCANTIDADValue;
property OldIMPORTE_UNIDAD : Float read GetOldIMPORTE_UNIDADValue;
property OldDESCUENTO_CLIENTE : Float read GetOldDESCUENTO_CLIENTEValue;
property OldIMPORTE_PORTE : Float read GetOldIMPORTE_PORTEValue;
property OldIMPORTE_TOTAL : Float read GetOldIMPORTE_TOTALValue;
property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
property OldCALLE_PROVEEDOR : String read GetOldCALLE_PROVEEDORValue;
property OldPOBLACION_PROVEEDOR : String read GetOldPOBLACION_PROVEEDORValue;
property OldPROVINCIA_PROVEEDOR : String read GetOldPROVINCIA_PROVEEDORValue;
property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
property OldNOMBRE_COMERCIAL_CLIENTE : String read GetOldNOMBRE_COMERCIAL_CLIENTEValue;
property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
property OldNIF_CIF_AGENTE : String read GetOldNIF_CIF_AGENTEValue;
property OldNOMBRE_AGENTE : String read GetOldNOMBRE_AGENTEValue;
property OldCALLE_AGENTE : String read GetOldCALLE_AGENTEValue;
property OldPOBLACION_AGENTE : String read GetOldPOBLACION_AGENTEValue;
property OldPROVINCIA_AGENTE : String read GetOldPROVINCIA_AGENTEValue;
property OldCOMISION_AGENTE : Float read GetOldCOMISION_AGENTEValue;
property OldIMPORTE_COMISION_AGENTE : Float read GetOldIMPORTE_COMISION_AGENTEValue;
end;
{ TInfVentasArticuloBusinessProcessorRules }
TInfVentasArticuloBusinessProcessorRules = class(TDABusinessProcessorRules, IInfVentasArticulo, IInfVentasArticuloDelta)
private
protected
{ Property getters and setters }
function GetID_FACTURAValue: Integer; virtual;
function GetOldID_FACTURAValue: Integer; virtual;
procedure SetID_FACTURAValue(const aValue: Integer); virtual;
function GetID_EMPRESAValue: Integer; virtual;
function GetOldID_EMPRESAValue: Integer; virtual;
procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
function GetID_REFERENCIA_FACTURAValue: String; virtual;
function GetOldID_REFERENCIA_FACTURAValue: String; virtual;
procedure SetID_REFERENCIA_FACTURAValue(const aValue: String); virtual;
function GetFECHA_FACTURAValue: DateTime; virtual;
function GetOldFECHA_FACTURAValue: DateTime; virtual;
procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
function GetIMPORTE_TOTAL_FACTURAValue: Float; virtual;
function GetOldIMPORTE_TOTAL_FACTURAValue: Float; virtual;
procedure SetIMPORTE_TOTAL_FACTURAValue(const aValue: Float); virtual;
function GetID_COMISION_FACTURAValue: Integer; virtual;
function GetOldID_COMISION_FACTURAValue: Integer; virtual;
procedure SetID_COMISION_FACTURAValue(const aValue: Integer); virtual;
function GetID_ARTICULOValue: Integer; virtual;
function GetOldID_ARTICULOValue: Integer; virtual;
procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
function GetFAMILIAValue: String; virtual;
function GetOldFAMILIAValue: String; virtual;
procedure SetFAMILIAValue(const aValue: String); virtual;
function GetREFERENCIAValue: String; virtual;
function GetOldREFERENCIAValue: String; virtual;
procedure SetREFERENCIAValue(const aValue: String); virtual;
function GetREFERENCIA_PROVValue: String; virtual;
function GetOldREFERENCIA_PROVValue: String; virtual;
procedure SetREFERENCIA_PROVValue(const aValue: String); virtual;
function GetDESCRIPCIONValue: String; virtual;
function GetOldDESCRIPCIONValue: String; virtual;
procedure SetDESCRIPCIONValue(const aValue: String); virtual;
function GetCOMISIONABLEValue: Integer; virtual;
function GetOldCOMISIONABLEValue: Integer; virtual;
procedure SetCOMISIONABLEValue(const aValue: Integer); virtual;
function GetINVENTARIABLEValue: Integer; virtual;
function GetOldINVENTARIABLEValue: Integer; virtual;
procedure SetINVENTARIABLEValue(const aValue: Integer); virtual;
function GetPRECIO_COSTEValue: Float; virtual;
function GetOldPRECIO_COSTEValue: Float; virtual;
procedure SetPRECIO_COSTEValue(const aValue: Float); virtual;
function GetDESCUENTO_PROVEEDORValue: Float; virtual;
function GetOldDESCUENTO_PROVEEDORValue: Float; virtual;
procedure SetDESCUENTO_PROVEEDORValue(const aValue: Float); virtual;
function GetPRECIO_NETOValue: Float; virtual;
function GetOldPRECIO_NETOValue: Float; virtual;
procedure SetPRECIO_NETOValue(const aValue: Float); virtual;
function GetPRECIO_PORTEValue: Float; virtual;
function GetOldPRECIO_PORTEValue: Float; virtual;
procedure SetPRECIO_PORTEValue(const aValue: Float); virtual;
function GetCANTIDADValue: Integer; virtual;
function GetOldCANTIDADValue: Integer; virtual;
procedure SetCANTIDADValue(const aValue: Integer); virtual;
function GetIMPORTE_UNIDADValue: Float; virtual;
function GetOldIMPORTE_UNIDADValue: Float; virtual;
procedure SetIMPORTE_UNIDADValue(const aValue: Float); virtual;
function GetDESCUENTO_CLIENTEValue: Float; virtual;
function GetOldDESCUENTO_CLIENTEValue: Float; virtual;
procedure SetDESCUENTO_CLIENTEValue(const aValue: Float); virtual;
function GetIMPORTE_PORTEValue: Float; virtual;
function GetOldIMPORTE_PORTEValue: Float; virtual;
procedure SetIMPORTE_PORTEValue(const aValue: Float); virtual;
function GetIMPORTE_TOTALValue: Float; virtual;
function GetOldIMPORTE_TOTALValue: Float; virtual;
procedure SetIMPORTE_TOTALValue(const aValue: Float); virtual;
function GetNIF_CIF_PROVEEDORValue: String; virtual;
function GetOldNIF_CIF_PROVEEDORValue: String; virtual;
procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
function GetNOMBRE_PROVEEDORValue: String; virtual;
function GetOldNOMBRE_PROVEEDORValue: String; virtual;
procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
function GetCALLE_PROVEEDORValue: String; virtual;
function GetOldCALLE_PROVEEDORValue: String; virtual;
procedure SetCALLE_PROVEEDORValue(const aValue: String); virtual;
function GetPOBLACION_PROVEEDORValue: String; virtual;
function GetOldPOBLACION_PROVEEDORValue: String; virtual;
procedure SetPOBLACION_PROVEEDORValue(const aValue: String); virtual;
function GetPROVINCIA_PROVEEDORValue: String; virtual;
function GetOldPROVINCIA_PROVEEDORValue: String; virtual;
procedure SetPROVINCIA_PROVEEDORValue(const aValue: String); virtual;
function GetNIF_CIF_CLIENTEValue: String; virtual;
function GetOldNIF_CIF_CLIENTEValue: String; virtual;
procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual;
function GetNOMBRE_CLIENTEValue: String; virtual;
function GetOldNOMBRE_CLIENTEValue: String; virtual;
procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual;
function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
function GetOldNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual;
function GetCALLE_CLIENTEValue: String; virtual;
function GetOldCALLE_CLIENTEValue: String; virtual;
procedure SetCALLE_CLIENTEValue(const aValue: String); virtual;
function GetPOBLACION_CLIENTEValue: String; virtual;
function GetOldPOBLACION_CLIENTEValue: String; virtual;
procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual;
function GetPROVINCIA_CLIENTEValue: String; virtual;
function GetOldPROVINCIA_CLIENTEValue: String; virtual;
procedure SetPROVINCIA_CLIENTEValue(const aValue: String); virtual;
function GetNIF_CIF_AGENTEValue: String; virtual;
function GetOldNIF_CIF_AGENTEValue: String; virtual;
procedure SetNIF_CIF_AGENTEValue(const aValue: String); virtual;
function GetNOMBRE_AGENTEValue: String; virtual;
function GetOldNOMBRE_AGENTEValue: String; virtual;
procedure SetNOMBRE_AGENTEValue(const aValue: String); virtual;
function GetCALLE_AGENTEValue: String; virtual;
function GetOldCALLE_AGENTEValue: String; virtual;
procedure SetCALLE_AGENTEValue(const aValue: String); virtual;
function GetPOBLACION_AGENTEValue: String; virtual;
function GetOldPOBLACION_AGENTEValue: String; virtual;
procedure SetPOBLACION_AGENTEValue(const aValue: String); virtual;
function GetPROVINCIA_AGENTEValue: String; virtual;
function GetOldPROVINCIA_AGENTEValue: String; virtual;
procedure SetPROVINCIA_AGENTEValue(const aValue: String); virtual;
function GetCOMISION_AGENTEValue: Float; virtual;
function GetOldCOMISION_AGENTEValue: Float; virtual;
procedure SetCOMISION_AGENTEValue(const aValue: Float); virtual;
function GetIMPORTE_COMISION_AGENTEValue: Float; virtual;
function GetOldIMPORTE_COMISION_AGENTEValue: Float; virtual;
procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Float); virtual;
{ Properties }
property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
property ID_REFERENCIA_FACTURA : String read GetID_REFERENCIA_FACTURAValue write SetID_REFERENCIA_FACTURAValue;
property OldID_REFERENCIA_FACTURA : String read GetOldID_REFERENCIA_FACTURAValue;
property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
property IMPORTE_TOTAL_FACTURA : Float read GetIMPORTE_TOTAL_FACTURAValue write SetIMPORTE_TOTAL_FACTURAValue;
property OldIMPORTE_TOTAL_FACTURA : Float read GetOldIMPORTE_TOTAL_FACTURAValue;
property ID_COMISION_FACTURA : Integer read GetID_COMISION_FACTURAValue write SetID_COMISION_FACTURAValue;
property OldID_COMISION_FACTURA : Integer read GetOldID_COMISION_FACTURAValue;
property ID_ARTICULO : Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue;
property FAMILIA : String read GetFAMILIAValue write SetFAMILIAValue;
property OldFAMILIA : String read GetOldFAMILIAValue;
property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
property OldREFERENCIA : String read GetOldREFERENCIAValue;
property REFERENCIA_PROV : String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
property OldREFERENCIA_PROV : String read GetOldREFERENCIA_PROVValue;
property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
property COMISIONABLE : Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
property OldCOMISIONABLE : Integer read GetOldCOMISIONABLEValue;
property INVENTARIABLE : Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
property OldINVENTARIABLE : Integer read GetOldINVENTARIABLEValue;
property PRECIO_COSTE : Float read GetPRECIO_COSTEValue write SetPRECIO_COSTEValue;
property OldPRECIO_COSTE : Float read GetOldPRECIO_COSTEValue;
property DESCUENTO_PROVEEDOR : Float read GetDESCUENTO_PROVEEDORValue write SetDESCUENTO_PROVEEDORValue;
property OldDESCUENTO_PROVEEDOR : Float read GetOldDESCUENTO_PROVEEDORValue;
property PRECIO_NETO : Float read GetPRECIO_NETOValue write SetPRECIO_NETOValue;
property OldPRECIO_NETO : Float read GetOldPRECIO_NETOValue;
property PRECIO_PORTE : Float read GetPRECIO_PORTEValue write SetPRECIO_PORTEValue;
property OldPRECIO_PORTE : Float read GetOldPRECIO_PORTEValue;
property CANTIDAD : Integer read GetCANTIDADValue write SetCANTIDADValue;
property OldCANTIDAD : Integer read GetOldCANTIDADValue;
property IMPORTE_UNIDAD : Float read GetIMPORTE_UNIDADValue write SetIMPORTE_UNIDADValue;
property OldIMPORTE_UNIDAD : Float read GetOldIMPORTE_UNIDADValue;
property DESCUENTO_CLIENTE : Float read GetDESCUENTO_CLIENTEValue write SetDESCUENTO_CLIENTEValue;
property OldDESCUENTO_CLIENTE : Float read GetOldDESCUENTO_CLIENTEValue;
property IMPORTE_PORTE : Float read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
property OldIMPORTE_PORTE : Float read GetOldIMPORTE_PORTEValue;
property IMPORTE_TOTAL : Float read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
property OldIMPORTE_TOTAL : Float read GetOldIMPORTE_TOTALValue;
property NIF_CIF_PROVEEDOR : String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
property NOMBRE_PROVEEDOR : String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
property CALLE_PROVEEDOR : String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
property OldCALLE_PROVEEDOR : String read GetOldCALLE_PROVEEDORValue;
property POBLACION_PROVEEDOR : String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
property OldPOBLACION_PROVEEDOR : String read GetOldPOBLACION_PROVEEDORValue;
property PROVINCIA_PROVEEDOR : String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
property OldPROVINCIA_PROVEEDOR : String read GetOldPROVINCIA_PROVEEDORValue;
property NIF_CIF_CLIENTE : String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
property NOMBRE_CLIENTE : String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
property NOMBRE_COMERCIAL_CLIENTE : String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
property OldNOMBRE_COMERCIAL_CLIENTE : String read GetOldNOMBRE_COMERCIAL_CLIENTEValue;
property CALLE_CLIENTE : String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
property POBLACION_CLIENTE : String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
property PROVINCIA_CLIENTE : String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
property NIF_CIF_AGENTE : String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
property OldNIF_CIF_AGENTE : String read GetOldNIF_CIF_AGENTEValue;
property NOMBRE_AGENTE : String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
property OldNOMBRE_AGENTE : String read GetOldNOMBRE_AGENTEValue;
property CALLE_AGENTE : String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
property OldCALLE_AGENTE : String read GetOldCALLE_AGENTEValue;
property POBLACION_AGENTE : String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
property OldPOBLACION_AGENTE : String read GetOldPOBLACION_AGENTEValue;
property PROVINCIA_AGENTE : String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
property OldPROVINCIA_AGENTE : String read GetOldPROVINCIA_AGENTEValue;
property COMISION_AGENTE : Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
property OldCOMISION_AGENTE : Float read GetOldCOMISION_AGENTEValue;
property IMPORTE_COMISION_AGENTE : Float read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
property OldIMPORTE_COMISION_AGENTE : Float read GetOldIMPORTE_COMISION_AGENTEValue;
public
constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
destructor Destroy; override;
end;
implementation
uses
Variants, uROBinaryHelpers;
{ TInfVentasArticuloBusinessProcessorRules }
constructor TInfVentasArticuloBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
inherited;
end;
destructor TInfVentasArticuloBusinessProcessorRules.Destroy;
begin
inherited;
end;
function TInfVentasArticuloBusinessProcessorRules.GetID_FACTURAValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_FACTURA];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_FACTURA];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetID_FACTURAValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_FACTURA] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetID_EMPRESAValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_EMPRESA];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_EMPRESA];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetID_EMPRESAValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_EMPRESA] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetID_REFERENCIA_FACTURAValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_REFERENCIA_FACTURA];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldID_REFERENCIA_FACTURAValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_REFERENCIA_FACTURA];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetID_REFERENCIA_FACTURAValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_REFERENCIA_FACTURA] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFECHA_FACTURA];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloFECHA_FACTURA];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetFECHA_FACTURAValue(const aValue: DateTime);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFECHA_FACTURA] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_FACTURAValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_FACTURAValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_FACTURAValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetID_COMISION_FACTURAValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_COMISION_FACTURA];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldID_COMISION_FACTURAValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_COMISION_FACTURA];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetID_COMISION_FACTURAValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_COMISION_FACTURA] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetID_ARTICULOValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_ARTICULO];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldID_ARTICULOValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_ARTICULO];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetID_ARTICULOValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_ARTICULO] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetFAMILIAValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFAMILIA];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldFAMILIAValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloFAMILIA];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetFAMILIAValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFAMILIA] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetREFERENCIAValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldREFERENCIAValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloREFERENCIA];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetREFERENCIAValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetREFERENCIA_PROVValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_PROV];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldREFERENCIA_PROVValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloREFERENCIA_PROV];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetREFERENCIA_PROVValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_PROV] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetDESCRIPCIONValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCRIPCION];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCRIPCION];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCRIPCION] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetCOMISIONABLEValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISIONABLE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldCOMISIONABLEValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCOMISIONABLE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetCOMISIONABLEValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISIONABLE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetINVENTARIABLEValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloINVENTARIABLE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldINVENTARIABLEValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloINVENTARIABLE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetINVENTARIABLEValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloINVENTARIABLE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPRECIO_COSTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPRECIO_COSTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPRECIO_COSTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPRECIO_COSTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPRECIO_COSTEValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPRECIO_COSTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetDESCUENTO_PROVEEDORValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldDESCUENTO_PROVEEDORValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetDESCUENTO_PROVEEDORValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPRECIO_NETOValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPRECIO_NETO];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPRECIO_NETOValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPRECIO_NETO];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPRECIO_NETOValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPRECIO_NETO] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPRECIO_PORTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPRECIO_PORTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPRECIO_PORTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPRECIO_PORTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPRECIO_PORTEValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPRECIO_PORTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetCANTIDADValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCANTIDAD];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldCANTIDADValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCANTIDAD];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetCANTIDADValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCANTIDAD] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_UNIDADValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDADValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_UNIDADValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetDESCUENTO_CLIENTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldDESCUENTO_CLIENTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetDESCUENTO_CLIENTEValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_PORTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_PORTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_PORTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_PORTEValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_TOTALValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_TOTALValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_TOTAL];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_TOTALValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetCALLE_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_PROVEEDORValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_PROVEEDORValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_PROVEEDORValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_PROVEEDORValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_CLIENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_CLIENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_COMERCIAL_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetCALLE_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_CLIENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_CLIENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_CLIENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_CLIENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_CLIENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_CLIENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_AGENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_AGENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_AGENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_AGENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_AGENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetCALLE_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_AGENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_AGENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_AGENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_AGENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_AGENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_AGENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_AGENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_AGENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_AGENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_AGENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetCOMISION_AGENTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISION_AGENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldCOMISION_AGENTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCOMISION_AGENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetCOMISION_AGENTEValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISION_AGENTE] := aValue;
end;
function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_COMISION_AGENTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE];
end;
function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_COMISION_AGENTEValue: Float;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE];
end;
procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Float);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE] := aValue;
end;
initialization
RegisterBusinessProcessorRules(RID_InfVentasArticuloDelta, TInfVentasArticuloBusinessProcessorRules);
end.