unit schInfMargenArticuloClient_Intf; interface uses Classes, DB, SysUtils, uROClasses, uDADataTable; const { Data table 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_InfMargenPorCliente = '{3692A5E8-B098-4018-BD80-96BFA7A96109}'; RID_InfMargenPorArticulo = '{EB4E62CD-5F26-47D0-99CD-8E607B2B7C74}'; { Data table names } nme_InfMargenPorCliente = 'InfMargenPorCliente'; nme_InfMargenPorArticulo = 'InfMargenPorArticulo'; { InfMargenPorCliente fields } fld_InfMargenPorClienteID_EMPRESA = 'ID_EMPRESA'; fld_InfMargenPorClienteID_CLIENTE = 'ID_CLIENTE'; fld_InfMargenPorClienteID_ARTICULO = 'ID_ARTICULO'; fld_InfMargenPorClienteFAMILIA = 'FAMILIA'; fld_InfMargenPorClienteREFERENCIA = 'REFERENCIA'; fld_InfMargenPorClienteREFERENCIA_PROV = 'REFERENCIA_PROV'; fld_InfMargenPorClienteDESCRIPCION = 'DESCRIPCION'; fld_InfMargenPorClienteCOMISIONABLE = 'COMISIONABLE'; fld_InfMargenPorClienteINVENTARIABLE = 'INVENTARIABLE'; fld_InfMargenPorClienteNIF_CIF_CLIENTE = 'NIF_CIF_CLIENTE'; fld_InfMargenPorClienteNOMBRE_CLIENTE = 'NOMBRE_CLIENTE'; fld_InfMargenPorClienteNOMBRE_COMERCIAL_CLIENTE = 'NOMBRE_COMERCIAL_CLIENTE'; fld_InfMargenPorClienteNIF_CIF_AGENTE = 'NIF_CIF_AGENTE'; fld_InfMargenPorClienteNOMBRE_AGENTE = 'NOMBRE_AGENTE'; fld_InfMargenPorClienteIMP_UNIDAD_ULT_VENT = 'IMP_UNIDAD_ULT_VENT'; fld_InfMargenPorClienteIMP_NETO_ULT_VENT = 'IMP_NETO_ULT_VENT'; fld_InfMargenPorClienteIMP_PORTE_ULT_VENT = 'IMP_PORTE_ULT_VENT'; fld_InfMargenPorClienteIMP_UNIDAD_PRO_VENT = 'IMP_UNIDAD_PRO_VENT'; fld_InfMargenPorClienteIMP_NETO_PRO_VENT = 'IMP_NETO_PRO_VENT'; fld_InfMargenPorClienteIMP_PORTE_PRO_VENT = 'IMP_PORTE_PRO_VENT'; fld_InfMargenPorClienteIMP_UNIDAD_COMPRA = 'IMP_UNIDAD_COMPRA'; fld_InfMargenPorClienteIMP_NETO_COMPRA = 'IMP_NETO_COMPRA'; fld_InfMargenPorClienteIMP_PORTE_COMPRA = 'IMP_PORTE_COMPRA'; fld_InfMargenPorClienteIMP_UNIDAD_ULT_COMP = 'IMP_UNIDAD_ULT_COMP'; fld_InfMargenPorClienteIMP_NETO_ULT_COMP = 'IMP_NETO_ULT_COMP'; fld_InfMargenPorClienteIMP_PORTE_ULT_COMP = 'IMP_PORTE_ULT_COMP'; fld_InfMargenPorClienteIMP_UNIDAD_PRO_COMP = 'IMP_UNIDAD_PRO_COMP'; fld_InfMargenPorClienteIMP_NETO_PRO_COMP = 'IMP_NETO_PRO_COMP'; fld_InfMargenPorClienteIMP_PORTE_PRO_COMP = 'IMP_PORTE_PRO_COMP'; fld_InfMargenPorClienteIMP_MARGEN_ULT_VENT_COMPRA = 'IMP_MARGEN_ULT_VENT_COMPRA'; fld_InfMargenPorClientePOR_MARGEN_ULT_VENT_COMPRA = 'POR_MARGEN_ULT_VENT_COMPRA'; fld_InfMargenPorClienteIMP_MARGEN_ULT_VENT_ULT_COMP = 'IMP_MARGEN_ULT_VENT_ULT_COMP'; fld_InfMargenPorClientePOR_MARGEN_ULT_VENT_ULT_COMP = 'POR_MARGEN_ULT_VENT_ULT_COMP'; fld_InfMargenPorClienteIMP_MARGEN_ULT_VENT_PRO_COMP = 'IMP_MARGEN_ULT_VENT_PRO_COMP'; fld_InfMargenPorClientePOR_MARGEN_ULT_VENT_PRO_COMP = 'POR_MARGEN_ULT_VENT_PRO_COMP'; fld_InfMargenPorClienteIMP_MARGEN_PRO_VENT_COMPRA = 'IMP_MARGEN_PRO_VENT_COMPRA'; fld_InfMargenPorClientePOR_MARGEN_PRO_VENT_COMPRA = 'POR_MARGEN_PRO_VENT_COMPRA'; fld_InfMargenPorClienteIMP_MARGEN_PRO_VENT_ULT_COMP = 'IMP_MARGEN_PRO_VENT_ULT_COMP'; fld_InfMargenPorClientePOR_MARGEN_PRO_VENT_ULT_COMP = 'POR_MARGEN_PRO_VENT_ULT_COMP'; fld_InfMargenPorClienteIMP_MARGEN_PRO_VENT_PRO_COMP = 'IMP_MARGEN_PRO_VENT_PRO_COMP'; fld_InfMargenPorClientePOR_MARGEN_PRO_VENT_PRO_COMP = 'POR_MARGEN_PRO_VENT_PRO_COMP'; { InfMargenPorCliente field indexes } idx_InfMargenPorClienteID_EMPRESA = 0; idx_InfMargenPorClienteID_CLIENTE = 1; idx_InfMargenPorClienteID_ARTICULO = 2; idx_InfMargenPorClienteFAMILIA = 3; idx_InfMargenPorClienteREFERENCIA = 4; idx_InfMargenPorClienteREFERENCIA_PROV = 5; idx_InfMargenPorClienteDESCRIPCION = 6; idx_InfMargenPorClienteCOMISIONABLE = 7; idx_InfMargenPorClienteINVENTARIABLE = 8; idx_InfMargenPorClienteNIF_CIF_CLIENTE = 9; idx_InfMargenPorClienteNOMBRE_CLIENTE = 10; idx_InfMargenPorClienteNOMBRE_COMERCIAL_CLIENTE = 11; idx_InfMargenPorClienteNIF_CIF_AGENTE = 12; idx_InfMargenPorClienteNOMBRE_AGENTE = 13; idx_InfMargenPorClienteIMP_UNIDAD_ULT_VENT = 14; idx_InfMargenPorClienteIMP_NETO_ULT_VENT = 15; idx_InfMargenPorClienteIMP_PORTE_ULT_VENT = 16; idx_InfMargenPorClienteIMP_UNIDAD_PRO_VENT = 17; idx_InfMargenPorClienteIMP_NETO_PRO_VENT = 18; idx_InfMargenPorClienteIMP_PORTE_PRO_VENT = 19; idx_InfMargenPorClienteIMP_UNIDAD_COMPRA = 20; idx_InfMargenPorClienteIMP_NETO_COMPRA = 21; idx_InfMargenPorClienteIMP_PORTE_COMPRA = 22; idx_InfMargenPorClienteIMP_UNIDAD_ULT_COMP = 23; idx_InfMargenPorClienteIMP_NETO_ULT_COMP = 24; idx_InfMargenPorClienteIMP_PORTE_ULT_COMP = 25; idx_InfMargenPorClienteIMP_UNIDAD_PRO_COMP = 26; idx_InfMargenPorClienteIMP_NETO_PRO_COMP = 27; idx_InfMargenPorClienteIMP_PORTE_PRO_COMP = 28; idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_COMPRA = 29; idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_COMPRA = 30; idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_ULT_COMP = 31; idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_ULT_COMP = 32; idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_PRO_COMP = 33; idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_PRO_COMP = 34; idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_COMPRA = 35; idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_COMPRA = 36; idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_ULT_COMP = 37; idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_ULT_COMP = 38; idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_PRO_COMP = 39; idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_PRO_COMP = 40; { InfMargenPorArticulo fields } fld_InfMargenPorArticuloID_EMPRESA = 'ID_EMPRESA'; fld_InfMargenPorArticuloID_ARTICULO = 'ID_ARTICULO'; fld_InfMargenPorArticuloFAMILIA = 'FAMILIA'; fld_InfMargenPorArticuloREFERENCIA = 'REFERENCIA'; fld_InfMargenPorArticuloREFERENCIA_PROV = 'REFERENCIA_PROV'; fld_InfMargenPorArticuloDESCRIPCION = 'DESCRIPCION'; fld_InfMargenPorArticuloCOMISIONABLE = 'COMISIONABLE'; fld_InfMargenPorArticuloINVENTARIABLE = 'INVENTARIABLE'; fld_InfMargenPorArticuloIMP_UNIDAD_ULT_VENT = 'IMP_UNIDAD_ULT_VENT'; fld_InfMargenPorArticuloIMP_NETO_ULT_VENT = 'IMP_NETO_ULT_VENT'; fld_InfMargenPorArticuloIMP_PORTE_ULT_VENT = 'IMP_PORTE_ULT_VENT'; fld_InfMargenPorArticuloIMP_UNIDAD_PRO_VENT = 'IMP_UNIDAD_PRO_VENT'; fld_InfMargenPorArticuloIMP_NETO_PRO_VENT = 'IMP_NETO_PRO_VENT'; fld_InfMargenPorArticuloIMP_PORTE_PRO_VENT = 'IMP_PORTE_PRO_VENT'; fld_InfMargenPorArticuloIMP_UNIDAD_COMPRA = 'IMP_UNIDAD_COMPRA'; fld_InfMargenPorArticuloIMP_NETO_COMPRA = 'IMP_NETO_COMPRA'; fld_InfMargenPorArticuloIMP_PORTE_COMPRA = 'IMP_PORTE_COMPRA'; fld_InfMargenPorArticuloIMP_UNIDAD_ULT_COMP = 'IMP_UNIDAD_ULT_COMP'; fld_InfMargenPorArticuloIMP_NETO_ULT_COMP = 'IMP_NETO_ULT_COMP'; fld_InfMargenPorArticuloIMP_PORTE_ULT_COMP = 'IMP_PORTE_ULT_COMP'; fld_InfMargenPorArticuloIMP_UNIDAD_PRO_COMP = 'IMP_UNIDAD_PRO_COMP'; fld_InfMargenPorArticuloIMP_NETO_PRO_COMP = 'IMP_NETO_PRO_COMP'; fld_InfMargenPorArticuloIMP_PORTE_PRO_COMP = 'IMP_PORTE_PRO_COMP'; fld_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_COMPRA = 'IMP_MARGEN_ULT_VENT_COMPRA'; fld_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_COMPRA = 'POR_MARGEN_ULT_VENT_COMPRA'; fld_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_ULT_COMP = 'IMP_MARGEN_ULT_VENT_ULT_COMP'; fld_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_ULT_COMP = 'POR_MARGEN_ULT_VENT_ULT_COMP'; fld_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_PRO_COMP = 'IMP_MARGEN_ULT_VENT_PRO_COMP'; fld_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_PRO_COMP = 'POR_MARGEN_ULT_VENT_PRO_COMP'; fld_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_COMPRA = 'IMP_MARGEN_PRO_VENT_COMPRA'; fld_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_COMPRA = 'POR_MARGEN_PRO_VENT_COMPRA'; fld_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_ULT_COMP = 'IMP_MARGEN_PRO_VENT_ULT_COMP'; fld_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_ULT_COMP = 'POR_MARGEN_PRO_VENT_ULT_COMP'; fld_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_PRO_COMP = 'IMP_MARGEN_PRO_VENT_PRO_COMP'; fld_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_PRO_COMP = 'POR_MARGEN_PRO_VENT_PRO_COMP'; { InfMargenPorArticulo field indexes } idx_InfMargenPorArticuloID_EMPRESA = 0; idx_InfMargenPorArticuloID_ARTICULO = 1; idx_InfMargenPorArticuloFAMILIA = 2; idx_InfMargenPorArticuloREFERENCIA = 3; idx_InfMargenPorArticuloREFERENCIA_PROV = 4; idx_InfMargenPorArticuloDESCRIPCION = 5; idx_InfMargenPorArticuloCOMISIONABLE = 6; idx_InfMargenPorArticuloINVENTARIABLE = 7; idx_InfMargenPorArticuloIMP_UNIDAD_ULT_VENT = 8; idx_InfMargenPorArticuloIMP_NETO_ULT_VENT = 9; idx_InfMargenPorArticuloIMP_PORTE_ULT_VENT = 10; idx_InfMargenPorArticuloIMP_UNIDAD_PRO_VENT = 11; idx_InfMargenPorArticuloIMP_NETO_PRO_VENT = 12; idx_InfMargenPorArticuloIMP_PORTE_PRO_VENT = 13; idx_InfMargenPorArticuloIMP_UNIDAD_COMPRA = 14; idx_InfMargenPorArticuloIMP_NETO_COMPRA = 15; idx_InfMargenPorArticuloIMP_PORTE_COMPRA = 16; idx_InfMargenPorArticuloIMP_UNIDAD_ULT_COMP = 17; idx_InfMargenPorArticuloIMP_NETO_ULT_COMP = 18; idx_InfMargenPorArticuloIMP_PORTE_ULT_COMP = 19; idx_InfMargenPorArticuloIMP_UNIDAD_PRO_COMP = 20; idx_InfMargenPorArticuloIMP_NETO_PRO_COMP = 21; idx_InfMargenPorArticuloIMP_PORTE_PRO_COMP = 22; idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_COMPRA = 23; idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_COMPRA = 24; idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_ULT_COMP = 25; idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_ULT_COMP = 26; idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_PRO_COMP = 27; idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_PRO_COMP = 28; idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_COMPRA = 29; idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_COMPRA = 30; idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_ULT_COMP = 31; idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_ULT_COMP = 32; idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_PRO_COMP = 33; idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_PRO_COMP = 34; type { IInfMargenPorCliente } IInfMargenPorCliente = interface(IDAStronglyTypedDataTable) ['{EB6B9398-B7CF-4F84-8C4A-950B0DA5FDED}'] { Property getters and setters } function GetID_EMPRESAValue: Integer; procedure SetID_EMPRESAValue(const aValue: Integer); function GetID_CLIENTEValue: Integer; procedure SetID_CLIENTEValue(const aValue: Integer); function GetID_ARTICULOValue: Integer; procedure SetID_ARTICULOValue(const aValue: Integer); function GetFAMILIAValue: String; procedure SetFAMILIAValue(const aValue: String); function GetREFERENCIAValue: String; procedure SetREFERENCIAValue(const aValue: String); function GetREFERENCIA_PROVValue: String; procedure SetREFERENCIA_PROVValue(const aValue: String); function GetDESCRIPCIONValue: String; procedure SetDESCRIPCIONValue(const aValue: String); function GetCOMISIONABLEValue: Integer; procedure SetCOMISIONABLEValue(const aValue: Integer); function GetINVENTARIABLEValue: Integer; procedure SetINVENTARIABLEValue(const aValue: Integer); function GetNIF_CIF_CLIENTEValue: String; procedure SetNIF_CIF_CLIENTEValue(const aValue: String); function GetNOMBRE_CLIENTEValue: String; procedure SetNOMBRE_CLIENTEValue(const aValue: String); function GetNOMBRE_COMERCIAL_CLIENTEValue: String; procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); function GetNIF_CIF_AGENTEValue: String; procedure SetNIF_CIF_AGENTEValue(const aValue: String); function GetNOMBRE_AGENTEValue: String; procedure SetNOMBRE_AGENTEValue(const aValue: String); function GetIMP_UNIDAD_ULT_VENTValue: Float; procedure SetIMP_UNIDAD_ULT_VENTValue(const aValue: Float); function GetIMP_NETO_ULT_VENTValue: Float; procedure SetIMP_NETO_ULT_VENTValue(const aValue: Float); function GetIMP_PORTE_ULT_VENTValue: Float; procedure SetIMP_PORTE_ULT_VENTValue(const aValue: Float); function GetIMP_UNIDAD_PRO_VENTValue: Float; procedure SetIMP_UNIDAD_PRO_VENTValue(const aValue: Float); function GetIMP_NETO_PRO_VENTValue: Float; procedure SetIMP_NETO_PRO_VENTValue(const aValue: Float); function GetIMP_PORTE_PRO_VENTValue: Float; procedure SetIMP_PORTE_PRO_VENTValue(const aValue: Float); function GetIMP_UNIDAD_COMPRAValue: Float; procedure SetIMP_UNIDAD_COMPRAValue(const aValue: Float); function GetIMP_NETO_COMPRAValue: Float; procedure SetIMP_NETO_COMPRAValue(const aValue: Float); function GetIMP_PORTE_COMPRAValue: Float; procedure SetIMP_PORTE_COMPRAValue(const aValue: Float); function GetIMP_UNIDAD_ULT_COMPValue: Float; procedure SetIMP_UNIDAD_ULT_COMPValue(const aValue: Float); function GetIMP_NETO_ULT_COMPValue: Float; procedure SetIMP_NETO_ULT_COMPValue(const aValue: Float); function GetIMP_PORTE_ULT_COMPValue: Float; procedure SetIMP_PORTE_ULT_COMPValue(const aValue: Float); function GetIMP_UNIDAD_PRO_COMPValue: Float; procedure SetIMP_UNIDAD_PRO_COMPValue(const aValue: Float); function GetIMP_NETO_PRO_COMPValue: Float; procedure SetIMP_NETO_PRO_COMPValue(const aValue: Float); function GetIMP_PORTE_PRO_COMPValue: Float; procedure SetIMP_PORTE_PRO_COMPValue(const aValue: Float); function GetIMP_MARGEN_ULT_VENT_COMPRAValue: Float; procedure SetIMP_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); function GetPOR_MARGEN_ULT_VENT_COMPRAValue: Float; procedure SetPOR_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); function GetIMP_MARGEN_ULT_VENT_ULT_COMPValue: Float; procedure SetIMP_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); function GetPOR_MARGEN_ULT_VENT_ULT_COMPValue: Float; procedure SetPOR_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); function GetIMP_MARGEN_ULT_VENT_PRO_COMPValue: Float; procedure SetIMP_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); function GetPOR_MARGEN_ULT_VENT_PRO_COMPValue: Float; procedure SetPOR_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); function GetIMP_MARGEN_PRO_VENT_COMPRAValue: Float; procedure SetIMP_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); function GetPOR_MARGEN_PRO_VENT_COMPRAValue: Float; procedure SetPOR_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); function GetIMP_MARGEN_PRO_VENT_ULT_COMPValue: Float; procedure SetIMP_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); function GetPOR_MARGEN_PRO_VENT_ULT_COMPValue: Float; procedure SetPOR_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); function GetIMP_MARGEN_PRO_VENT_PRO_COMPValue: Float; procedure SetIMP_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); function GetPOR_MARGEN_PRO_VENT_PRO_COMPValue: Float; procedure SetPOR_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); { Properties } property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_CLIENTE: Integer read GetID_CLIENTEValue write SetID_CLIENTEValue; property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue; property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue; property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property COMISIONABLE: Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue; property INVENTARIABLE: Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue; property NIF_CIF_CLIENTE: String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue; property NOMBRE_CLIENTE: String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue; property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue; property NIF_CIF_AGENTE: String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue; property NOMBRE_AGENTE: String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue; property IMP_UNIDAD_ULT_VENT: Float read GetIMP_UNIDAD_ULT_VENTValue write SetIMP_UNIDAD_ULT_VENTValue; property IMP_NETO_ULT_VENT: Float read GetIMP_NETO_ULT_VENTValue write SetIMP_NETO_ULT_VENTValue; property IMP_PORTE_ULT_VENT: Float read GetIMP_PORTE_ULT_VENTValue write SetIMP_PORTE_ULT_VENTValue; property IMP_UNIDAD_PRO_VENT: Float read GetIMP_UNIDAD_PRO_VENTValue write SetIMP_UNIDAD_PRO_VENTValue; property IMP_NETO_PRO_VENT: Float read GetIMP_NETO_PRO_VENTValue write SetIMP_NETO_PRO_VENTValue; property IMP_PORTE_PRO_VENT: Float read GetIMP_PORTE_PRO_VENTValue write SetIMP_PORTE_PRO_VENTValue; property IMP_UNIDAD_COMPRA: Float read GetIMP_UNIDAD_COMPRAValue write SetIMP_UNIDAD_COMPRAValue; property IMP_NETO_COMPRA: Float read GetIMP_NETO_COMPRAValue write SetIMP_NETO_COMPRAValue; property IMP_PORTE_COMPRA: Float read GetIMP_PORTE_COMPRAValue write SetIMP_PORTE_COMPRAValue; property IMP_UNIDAD_ULT_COMP: Float read GetIMP_UNIDAD_ULT_COMPValue write SetIMP_UNIDAD_ULT_COMPValue; property IMP_NETO_ULT_COMP: Float read GetIMP_NETO_ULT_COMPValue write SetIMP_NETO_ULT_COMPValue; property IMP_PORTE_ULT_COMP: Float read GetIMP_PORTE_ULT_COMPValue write SetIMP_PORTE_ULT_COMPValue; property IMP_UNIDAD_PRO_COMP: Float read GetIMP_UNIDAD_PRO_COMPValue write SetIMP_UNIDAD_PRO_COMPValue; property IMP_NETO_PRO_COMP: Float read GetIMP_NETO_PRO_COMPValue write SetIMP_NETO_PRO_COMPValue; property IMP_PORTE_PRO_COMP: Float read GetIMP_PORTE_PRO_COMPValue write SetIMP_PORTE_PRO_COMPValue; property IMP_MARGEN_ULT_VENT_COMPRA: Float read GetIMP_MARGEN_ULT_VENT_COMPRAValue write SetIMP_MARGEN_ULT_VENT_COMPRAValue; property POR_MARGEN_ULT_VENT_COMPRA: Float read GetPOR_MARGEN_ULT_VENT_COMPRAValue write SetPOR_MARGEN_ULT_VENT_COMPRAValue; property IMP_MARGEN_ULT_VENT_ULT_COMP: Float read GetIMP_MARGEN_ULT_VENT_ULT_COMPValue write SetIMP_MARGEN_ULT_VENT_ULT_COMPValue; property POR_MARGEN_ULT_VENT_ULT_COMP: Float read GetPOR_MARGEN_ULT_VENT_ULT_COMPValue write SetPOR_MARGEN_ULT_VENT_ULT_COMPValue; property IMP_MARGEN_ULT_VENT_PRO_COMP: Float read GetIMP_MARGEN_ULT_VENT_PRO_COMPValue write SetIMP_MARGEN_ULT_VENT_PRO_COMPValue; property POR_MARGEN_ULT_VENT_PRO_COMP: Float read GetPOR_MARGEN_ULT_VENT_PRO_COMPValue write SetPOR_MARGEN_ULT_VENT_PRO_COMPValue; property IMP_MARGEN_PRO_VENT_COMPRA: Float read GetIMP_MARGEN_PRO_VENT_COMPRAValue write SetIMP_MARGEN_PRO_VENT_COMPRAValue; property POR_MARGEN_PRO_VENT_COMPRA: Float read GetPOR_MARGEN_PRO_VENT_COMPRAValue write SetPOR_MARGEN_PRO_VENT_COMPRAValue; property IMP_MARGEN_PRO_VENT_ULT_COMP: Float read GetIMP_MARGEN_PRO_VENT_ULT_COMPValue write SetIMP_MARGEN_PRO_VENT_ULT_COMPValue; property POR_MARGEN_PRO_VENT_ULT_COMP: Float read GetPOR_MARGEN_PRO_VENT_ULT_COMPValue write SetPOR_MARGEN_PRO_VENT_ULT_COMPValue; property IMP_MARGEN_PRO_VENT_PRO_COMP: Float read GetIMP_MARGEN_PRO_VENT_PRO_COMPValue write SetIMP_MARGEN_PRO_VENT_PRO_COMPValue; property POR_MARGEN_PRO_VENT_PRO_COMP: Float read GetPOR_MARGEN_PRO_VENT_PRO_COMPValue write SetPOR_MARGEN_PRO_VENT_PRO_COMPValue; end; { TInfMargenPorClienteDataTableRules } TInfMargenPorClienteDataTableRules = class(TDADataTableRules, IInfMargenPorCliente) private protected { Property getters and setters } function GetID_EMPRESAValue: Integer; virtual; procedure SetID_EMPRESAValue(const aValue: Integer); virtual; function GetID_CLIENTEValue: Integer; virtual; procedure SetID_CLIENTEValue(const aValue: Integer); virtual; function GetID_ARTICULOValue: Integer; virtual; procedure SetID_ARTICULOValue(const aValue: Integer); virtual; function GetFAMILIAValue: String; virtual; procedure SetFAMILIAValue(const aValue: String); virtual; function GetREFERENCIAValue: String; virtual; procedure SetREFERENCIAValue(const aValue: String); virtual; function GetREFERENCIA_PROVValue: String; virtual; procedure SetREFERENCIA_PROVValue(const aValue: String); virtual; function GetDESCRIPCIONValue: String; virtual; procedure SetDESCRIPCIONValue(const aValue: String); virtual; function GetCOMISIONABLEValue: Integer; virtual; procedure SetCOMISIONABLEValue(const aValue: Integer); virtual; function GetINVENTARIABLEValue: Integer; virtual; procedure SetINVENTARIABLEValue(const aValue: Integer); virtual; function GetNIF_CIF_CLIENTEValue: String; virtual; procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual; function GetNOMBRE_CLIENTEValue: String; virtual; procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual; function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual; procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual; function GetNIF_CIF_AGENTEValue: String; virtual; procedure SetNIF_CIF_AGENTEValue(const aValue: String); virtual; function GetNOMBRE_AGENTEValue: String; virtual; procedure SetNOMBRE_AGENTEValue(const aValue: String); virtual; function GetIMP_UNIDAD_ULT_VENTValue: Float; virtual; procedure SetIMP_UNIDAD_ULT_VENTValue(const aValue: Float); virtual; function GetIMP_NETO_ULT_VENTValue: Float; virtual; procedure SetIMP_NETO_ULT_VENTValue(const aValue: Float); virtual; function GetIMP_PORTE_ULT_VENTValue: Float; virtual; procedure SetIMP_PORTE_ULT_VENTValue(const aValue: Float); virtual; function GetIMP_UNIDAD_PRO_VENTValue: Float; virtual; procedure SetIMP_UNIDAD_PRO_VENTValue(const aValue: Float); virtual; function GetIMP_NETO_PRO_VENTValue: Float; virtual; procedure SetIMP_NETO_PRO_VENTValue(const aValue: Float); virtual; function GetIMP_PORTE_PRO_VENTValue: Float; virtual; procedure SetIMP_PORTE_PRO_VENTValue(const aValue: Float); virtual; function GetIMP_UNIDAD_COMPRAValue: Float; virtual; procedure SetIMP_UNIDAD_COMPRAValue(const aValue: Float); virtual; function GetIMP_NETO_COMPRAValue: Float; virtual; procedure SetIMP_NETO_COMPRAValue(const aValue: Float); virtual; function GetIMP_PORTE_COMPRAValue: Float; virtual; procedure SetIMP_PORTE_COMPRAValue(const aValue: Float); virtual; function GetIMP_UNIDAD_ULT_COMPValue: Float; virtual; procedure SetIMP_UNIDAD_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_NETO_ULT_COMPValue: Float; virtual; procedure SetIMP_NETO_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_PORTE_ULT_COMPValue: Float; virtual; procedure SetIMP_PORTE_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_UNIDAD_PRO_COMPValue: Float; virtual; procedure SetIMP_UNIDAD_PRO_COMPValue(const aValue: Float); virtual; function GetIMP_NETO_PRO_COMPValue: Float; virtual; procedure SetIMP_NETO_PRO_COMPValue(const aValue: Float); virtual; function GetIMP_PORTE_PRO_COMPValue: Float; virtual; procedure SetIMP_PORTE_PRO_COMPValue(const aValue: Float); virtual; function GetIMP_MARGEN_ULT_VENT_COMPRAValue: Float; virtual; procedure SetIMP_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); virtual; function GetPOR_MARGEN_ULT_VENT_COMPRAValue: Float; virtual; procedure SetPOR_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); virtual; function GetIMP_MARGEN_ULT_VENT_ULT_COMPValue: Float; virtual; procedure SetIMP_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); virtual; function GetPOR_MARGEN_ULT_VENT_ULT_COMPValue: Float; virtual; procedure SetPOR_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_MARGEN_ULT_VENT_PRO_COMPValue: Float; virtual; procedure SetIMP_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); virtual; function GetPOR_MARGEN_ULT_VENT_PRO_COMPValue: Float; virtual; procedure SetPOR_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); virtual; function GetIMP_MARGEN_PRO_VENT_COMPRAValue: Float; virtual; procedure SetIMP_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); virtual; function GetPOR_MARGEN_PRO_VENT_COMPRAValue: Float; virtual; procedure SetPOR_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); virtual; function GetIMP_MARGEN_PRO_VENT_ULT_COMPValue: Float; virtual; procedure SetIMP_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); virtual; function GetPOR_MARGEN_PRO_VENT_ULT_COMPValue: Float; virtual; procedure SetPOR_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_MARGEN_PRO_VENT_PRO_COMPValue: Float; virtual; procedure SetIMP_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); virtual; function GetPOR_MARGEN_PRO_VENT_PRO_COMPValue: Float; virtual; procedure SetPOR_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); virtual; { Properties } property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_CLIENTE: Integer read GetID_CLIENTEValue write SetID_CLIENTEValue; property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue; property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue; property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property COMISIONABLE: Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue; property INVENTARIABLE: Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue; property NIF_CIF_CLIENTE: String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue; property NOMBRE_CLIENTE: String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue; property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue; property NIF_CIF_AGENTE: String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue; property NOMBRE_AGENTE: String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue; property IMP_UNIDAD_ULT_VENT: Float read GetIMP_UNIDAD_ULT_VENTValue write SetIMP_UNIDAD_ULT_VENTValue; property IMP_NETO_ULT_VENT: Float read GetIMP_NETO_ULT_VENTValue write SetIMP_NETO_ULT_VENTValue; property IMP_PORTE_ULT_VENT: Float read GetIMP_PORTE_ULT_VENTValue write SetIMP_PORTE_ULT_VENTValue; property IMP_UNIDAD_PRO_VENT: Float read GetIMP_UNIDAD_PRO_VENTValue write SetIMP_UNIDAD_PRO_VENTValue; property IMP_NETO_PRO_VENT: Float read GetIMP_NETO_PRO_VENTValue write SetIMP_NETO_PRO_VENTValue; property IMP_PORTE_PRO_VENT: Float read GetIMP_PORTE_PRO_VENTValue write SetIMP_PORTE_PRO_VENTValue; property IMP_UNIDAD_COMPRA: Float read GetIMP_UNIDAD_COMPRAValue write SetIMP_UNIDAD_COMPRAValue; property IMP_NETO_COMPRA: Float read GetIMP_NETO_COMPRAValue write SetIMP_NETO_COMPRAValue; property IMP_PORTE_COMPRA: Float read GetIMP_PORTE_COMPRAValue write SetIMP_PORTE_COMPRAValue; property IMP_UNIDAD_ULT_COMP: Float read GetIMP_UNIDAD_ULT_COMPValue write SetIMP_UNIDAD_ULT_COMPValue; property IMP_NETO_ULT_COMP: Float read GetIMP_NETO_ULT_COMPValue write SetIMP_NETO_ULT_COMPValue; property IMP_PORTE_ULT_COMP: Float read GetIMP_PORTE_ULT_COMPValue write SetIMP_PORTE_ULT_COMPValue; property IMP_UNIDAD_PRO_COMP: Float read GetIMP_UNIDAD_PRO_COMPValue write SetIMP_UNIDAD_PRO_COMPValue; property IMP_NETO_PRO_COMP: Float read GetIMP_NETO_PRO_COMPValue write SetIMP_NETO_PRO_COMPValue; property IMP_PORTE_PRO_COMP: Float read GetIMP_PORTE_PRO_COMPValue write SetIMP_PORTE_PRO_COMPValue; property IMP_MARGEN_ULT_VENT_COMPRA: Float read GetIMP_MARGEN_ULT_VENT_COMPRAValue write SetIMP_MARGEN_ULT_VENT_COMPRAValue; property POR_MARGEN_ULT_VENT_COMPRA: Float read GetPOR_MARGEN_ULT_VENT_COMPRAValue write SetPOR_MARGEN_ULT_VENT_COMPRAValue; property IMP_MARGEN_ULT_VENT_ULT_COMP: Float read GetIMP_MARGEN_ULT_VENT_ULT_COMPValue write SetIMP_MARGEN_ULT_VENT_ULT_COMPValue; property POR_MARGEN_ULT_VENT_ULT_COMP: Float read GetPOR_MARGEN_ULT_VENT_ULT_COMPValue write SetPOR_MARGEN_ULT_VENT_ULT_COMPValue; property IMP_MARGEN_ULT_VENT_PRO_COMP: Float read GetIMP_MARGEN_ULT_VENT_PRO_COMPValue write SetIMP_MARGEN_ULT_VENT_PRO_COMPValue; property POR_MARGEN_ULT_VENT_PRO_COMP: Float read GetPOR_MARGEN_ULT_VENT_PRO_COMPValue write SetPOR_MARGEN_ULT_VENT_PRO_COMPValue; property IMP_MARGEN_PRO_VENT_COMPRA: Float read GetIMP_MARGEN_PRO_VENT_COMPRAValue write SetIMP_MARGEN_PRO_VENT_COMPRAValue; property POR_MARGEN_PRO_VENT_COMPRA: Float read GetPOR_MARGEN_PRO_VENT_COMPRAValue write SetPOR_MARGEN_PRO_VENT_COMPRAValue; property IMP_MARGEN_PRO_VENT_ULT_COMP: Float read GetIMP_MARGEN_PRO_VENT_ULT_COMPValue write SetIMP_MARGEN_PRO_VENT_ULT_COMPValue; property POR_MARGEN_PRO_VENT_ULT_COMP: Float read GetPOR_MARGEN_PRO_VENT_ULT_COMPValue write SetPOR_MARGEN_PRO_VENT_ULT_COMPValue; property IMP_MARGEN_PRO_VENT_PRO_COMP: Float read GetIMP_MARGEN_PRO_VENT_PRO_COMPValue write SetIMP_MARGEN_PRO_VENT_PRO_COMPValue; property POR_MARGEN_PRO_VENT_PRO_COMP: Float read GetPOR_MARGEN_PRO_VENT_PRO_COMPValue write SetPOR_MARGEN_PRO_VENT_PRO_COMPValue; public constructor Create(aDataTable: TDADataTable); override; destructor Destroy; override; end; { IInfMargenPorArticulo } IInfMargenPorArticulo = interface(IDAStronglyTypedDataTable) ['{08C2EB72-D112-4206-98B0-F47FE2FE0C73}'] { Property getters and setters } function GetID_EMPRESAValue: Integer; procedure SetID_EMPRESAValue(const aValue: Integer); function GetID_ARTICULOValue: Integer; procedure SetID_ARTICULOValue(const aValue: Integer); function GetFAMILIAValue: String; procedure SetFAMILIAValue(const aValue: String); function GetREFERENCIAValue: String; procedure SetREFERENCIAValue(const aValue: String); function GetREFERENCIA_PROVValue: String; procedure SetREFERENCIA_PROVValue(const aValue: String); function GetDESCRIPCIONValue: String; procedure SetDESCRIPCIONValue(const aValue: String); function GetCOMISIONABLEValue: Integer; procedure SetCOMISIONABLEValue(const aValue: Integer); function GetINVENTARIABLEValue: Integer; procedure SetINVENTARIABLEValue(const aValue: Integer); function GetIMP_UNIDAD_ULT_VENTValue: Float; procedure SetIMP_UNIDAD_ULT_VENTValue(const aValue: Float); function GetIMP_NETO_ULT_VENTValue: Float; procedure SetIMP_NETO_ULT_VENTValue(const aValue: Float); function GetIMP_PORTE_ULT_VENTValue: Float; procedure SetIMP_PORTE_ULT_VENTValue(const aValue: Float); function GetIMP_UNIDAD_PRO_VENTValue: Float; procedure SetIMP_UNIDAD_PRO_VENTValue(const aValue: Float); function GetIMP_NETO_PRO_VENTValue: Float; procedure SetIMP_NETO_PRO_VENTValue(const aValue: Float); function GetIMP_PORTE_PRO_VENTValue: Float; procedure SetIMP_PORTE_PRO_VENTValue(const aValue: Float); function GetIMP_UNIDAD_COMPRAValue: Float; procedure SetIMP_UNIDAD_COMPRAValue(const aValue: Float); function GetIMP_NETO_COMPRAValue: Float; procedure SetIMP_NETO_COMPRAValue(const aValue: Float); function GetIMP_PORTE_COMPRAValue: Float; procedure SetIMP_PORTE_COMPRAValue(const aValue: Float); function GetIMP_UNIDAD_ULT_COMPValue: Float; procedure SetIMP_UNIDAD_ULT_COMPValue(const aValue: Float); function GetIMP_NETO_ULT_COMPValue: Float; procedure SetIMP_NETO_ULT_COMPValue(const aValue: Float); function GetIMP_PORTE_ULT_COMPValue: Float; procedure SetIMP_PORTE_ULT_COMPValue(const aValue: Float); function GetIMP_UNIDAD_PRO_COMPValue: Float; procedure SetIMP_UNIDAD_PRO_COMPValue(const aValue: Float); function GetIMP_NETO_PRO_COMPValue: Float; procedure SetIMP_NETO_PRO_COMPValue(const aValue: Float); function GetIMP_PORTE_PRO_COMPValue: Float; procedure SetIMP_PORTE_PRO_COMPValue(const aValue: Float); function GetIMP_MARGEN_ULT_VENT_COMPRAValue: Float; procedure SetIMP_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); function GetPOR_MARGEN_ULT_VENT_COMPRAValue: Float; procedure SetPOR_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); function GetIMP_MARGEN_ULT_VENT_ULT_COMPValue: Float; procedure SetIMP_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); function GetPOR_MARGEN_ULT_VENT_ULT_COMPValue: Float; procedure SetPOR_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); function GetIMP_MARGEN_ULT_VENT_PRO_COMPValue: Float; procedure SetIMP_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); function GetPOR_MARGEN_ULT_VENT_PRO_COMPValue: Float; procedure SetPOR_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); function GetIMP_MARGEN_PRO_VENT_COMPRAValue: Float; procedure SetIMP_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); function GetPOR_MARGEN_PRO_VENT_COMPRAValue: Float; procedure SetPOR_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); function GetIMP_MARGEN_PRO_VENT_ULT_COMPValue: Float; procedure SetIMP_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); function GetPOR_MARGEN_PRO_VENT_ULT_COMPValue: Float; procedure SetPOR_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); function GetIMP_MARGEN_PRO_VENT_PRO_COMPValue: Float; procedure SetIMP_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); function GetPOR_MARGEN_PRO_VENT_PRO_COMPValue: Float; procedure SetPOR_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); { Properties } property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue; property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue; property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property COMISIONABLE: Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue; property INVENTARIABLE: Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue; property IMP_UNIDAD_ULT_VENT: Float read GetIMP_UNIDAD_ULT_VENTValue write SetIMP_UNIDAD_ULT_VENTValue; property IMP_NETO_ULT_VENT: Float read GetIMP_NETO_ULT_VENTValue write SetIMP_NETO_ULT_VENTValue; property IMP_PORTE_ULT_VENT: Float read GetIMP_PORTE_ULT_VENTValue write SetIMP_PORTE_ULT_VENTValue; property IMP_UNIDAD_PRO_VENT: Float read GetIMP_UNIDAD_PRO_VENTValue write SetIMP_UNIDAD_PRO_VENTValue; property IMP_NETO_PRO_VENT: Float read GetIMP_NETO_PRO_VENTValue write SetIMP_NETO_PRO_VENTValue; property IMP_PORTE_PRO_VENT: Float read GetIMP_PORTE_PRO_VENTValue write SetIMP_PORTE_PRO_VENTValue; property IMP_UNIDAD_COMPRA: Float read GetIMP_UNIDAD_COMPRAValue write SetIMP_UNIDAD_COMPRAValue; property IMP_NETO_COMPRA: Float read GetIMP_NETO_COMPRAValue write SetIMP_NETO_COMPRAValue; property IMP_PORTE_COMPRA: Float read GetIMP_PORTE_COMPRAValue write SetIMP_PORTE_COMPRAValue; property IMP_UNIDAD_ULT_COMP: Float read GetIMP_UNIDAD_ULT_COMPValue write SetIMP_UNIDAD_ULT_COMPValue; property IMP_NETO_ULT_COMP: Float read GetIMP_NETO_ULT_COMPValue write SetIMP_NETO_ULT_COMPValue; property IMP_PORTE_ULT_COMP: Float read GetIMP_PORTE_ULT_COMPValue write SetIMP_PORTE_ULT_COMPValue; property IMP_UNIDAD_PRO_COMP: Float read GetIMP_UNIDAD_PRO_COMPValue write SetIMP_UNIDAD_PRO_COMPValue; property IMP_NETO_PRO_COMP: Float read GetIMP_NETO_PRO_COMPValue write SetIMP_NETO_PRO_COMPValue; property IMP_PORTE_PRO_COMP: Float read GetIMP_PORTE_PRO_COMPValue write SetIMP_PORTE_PRO_COMPValue; property IMP_MARGEN_ULT_VENT_COMPRA: Float read GetIMP_MARGEN_ULT_VENT_COMPRAValue write SetIMP_MARGEN_ULT_VENT_COMPRAValue; property POR_MARGEN_ULT_VENT_COMPRA: Float read GetPOR_MARGEN_ULT_VENT_COMPRAValue write SetPOR_MARGEN_ULT_VENT_COMPRAValue; property IMP_MARGEN_ULT_VENT_ULT_COMP: Float read GetIMP_MARGEN_ULT_VENT_ULT_COMPValue write SetIMP_MARGEN_ULT_VENT_ULT_COMPValue; property POR_MARGEN_ULT_VENT_ULT_COMP: Float read GetPOR_MARGEN_ULT_VENT_ULT_COMPValue write SetPOR_MARGEN_ULT_VENT_ULT_COMPValue; property IMP_MARGEN_ULT_VENT_PRO_COMP: Float read GetIMP_MARGEN_ULT_VENT_PRO_COMPValue write SetIMP_MARGEN_ULT_VENT_PRO_COMPValue; property POR_MARGEN_ULT_VENT_PRO_COMP: Float read GetPOR_MARGEN_ULT_VENT_PRO_COMPValue write SetPOR_MARGEN_ULT_VENT_PRO_COMPValue; property IMP_MARGEN_PRO_VENT_COMPRA: Float read GetIMP_MARGEN_PRO_VENT_COMPRAValue write SetIMP_MARGEN_PRO_VENT_COMPRAValue; property POR_MARGEN_PRO_VENT_COMPRA: Float read GetPOR_MARGEN_PRO_VENT_COMPRAValue write SetPOR_MARGEN_PRO_VENT_COMPRAValue; property IMP_MARGEN_PRO_VENT_ULT_COMP: Float read GetIMP_MARGEN_PRO_VENT_ULT_COMPValue write SetIMP_MARGEN_PRO_VENT_ULT_COMPValue; property POR_MARGEN_PRO_VENT_ULT_COMP: Float read GetPOR_MARGEN_PRO_VENT_ULT_COMPValue write SetPOR_MARGEN_PRO_VENT_ULT_COMPValue; property IMP_MARGEN_PRO_VENT_PRO_COMP: Float read GetIMP_MARGEN_PRO_VENT_PRO_COMPValue write SetIMP_MARGEN_PRO_VENT_PRO_COMPValue; property POR_MARGEN_PRO_VENT_PRO_COMP: Float read GetPOR_MARGEN_PRO_VENT_PRO_COMPValue write SetPOR_MARGEN_PRO_VENT_PRO_COMPValue; end; { TInfMargenPorArticuloDataTableRules } TInfMargenPorArticuloDataTableRules = class(TDADataTableRules, IInfMargenPorArticulo) private protected { Property getters and setters } function GetID_EMPRESAValue: Integer; virtual; procedure SetID_EMPRESAValue(const aValue: Integer); virtual; function GetID_ARTICULOValue: Integer; virtual; procedure SetID_ARTICULOValue(const aValue: Integer); virtual; function GetFAMILIAValue: String; virtual; procedure SetFAMILIAValue(const aValue: String); virtual; function GetREFERENCIAValue: String; virtual; procedure SetREFERENCIAValue(const aValue: String); virtual; function GetREFERENCIA_PROVValue: String; virtual; procedure SetREFERENCIA_PROVValue(const aValue: String); virtual; function GetDESCRIPCIONValue: String; virtual; procedure SetDESCRIPCIONValue(const aValue: String); virtual; function GetCOMISIONABLEValue: Integer; virtual; procedure SetCOMISIONABLEValue(const aValue: Integer); virtual; function GetINVENTARIABLEValue: Integer; virtual; procedure SetINVENTARIABLEValue(const aValue: Integer); virtual; function GetIMP_UNIDAD_ULT_VENTValue: Float; virtual; procedure SetIMP_UNIDAD_ULT_VENTValue(const aValue: Float); virtual; function GetIMP_NETO_ULT_VENTValue: Float; virtual; procedure SetIMP_NETO_ULT_VENTValue(const aValue: Float); virtual; function GetIMP_PORTE_ULT_VENTValue: Float; virtual; procedure SetIMP_PORTE_ULT_VENTValue(const aValue: Float); virtual; function GetIMP_UNIDAD_PRO_VENTValue: Float; virtual; procedure SetIMP_UNIDAD_PRO_VENTValue(const aValue: Float); virtual; function GetIMP_NETO_PRO_VENTValue: Float; virtual; procedure SetIMP_NETO_PRO_VENTValue(const aValue: Float); virtual; function GetIMP_PORTE_PRO_VENTValue: Float; virtual; procedure SetIMP_PORTE_PRO_VENTValue(const aValue: Float); virtual; function GetIMP_UNIDAD_COMPRAValue: Float; virtual; procedure SetIMP_UNIDAD_COMPRAValue(const aValue: Float); virtual; function GetIMP_NETO_COMPRAValue: Float; virtual; procedure SetIMP_NETO_COMPRAValue(const aValue: Float); virtual; function GetIMP_PORTE_COMPRAValue: Float; virtual; procedure SetIMP_PORTE_COMPRAValue(const aValue: Float); virtual; function GetIMP_UNIDAD_ULT_COMPValue: Float; virtual; procedure SetIMP_UNIDAD_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_NETO_ULT_COMPValue: Float; virtual; procedure SetIMP_NETO_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_PORTE_ULT_COMPValue: Float; virtual; procedure SetIMP_PORTE_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_UNIDAD_PRO_COMPValue: Float; virtual; procedure SetIMP_UNIDAD_PRO_COMPValue(const aValue: Float); virtual; function GetIMP_NETO_PRO_COMPValue: Float; virtual; procedure SetIMP_NETO_PRO_COMPValue(const aValue: Float); virtual; function GetIMP_PORTE_PRO_COMPValue: Float; virtual; procedure SetIMP_PORTE_PRO_COMPValue(const aValue: Float); virtual; function GetIMP_MARGEN_ULT_VENT_COMPRAValue: Float; virtual; procedure SetIMP_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); virtual; function GetPOR_MARGEN_ULT_VENT_COMPRAValue: Float; virtual; procedure SetPOR_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); virtual; function GetIMP_MARGEN_ULT_VENT_ULT_COMPValue: Float; virtual; procedure SetIMP_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); virtual; function GetPOR_MARGEN_ULT_VENT_ULT_COMPValue: Float; virtual; procedure SetPOR_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_MARGEN_ULT_VENT_PRO_COMPValue: Float; virtual; procedure SetIMP_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); virtual; function GetPOR_MARGEN_ULT_VENT_PRO_COMPValue: Float; virtual; procedure SetPOR_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); virtual; function GetIMP_MARGEN_PRO_VENT_COMPRAValue: Float; virtual; procedure SetIMP_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); virtual; function GetPOR_MARGEN_PRO_VENT_COMPRAValue: Float; virtual; procedure SetPOR_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); virtual; function GetIMP_MARGEN_PRO_VENT_ULT_COMPValue: Float; virtual; procedure SetIMP_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); virtual; function GetPOR_MARGEN_PRO_VENT_ULT_COMPValue: Float; virtual; procedure SetPOR_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); virtual; function GetIMP_MARGEN_PRO_VENT_PRO_COMPValue: Float; virtual; procedure SetIMP_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); virtual; function GetPOR_MARGEN_PRO_VENT_PRO_COMPValue: Float; virtual; procedure SetPOR_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); virtual; { Properties } property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue; property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue; property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property COMISIONABLE: Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue; property INVENTARIABLE: Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue; property IMP_UNIDAD_ULT_VENT: Float read GetIMP_UNIDAD_ULT_VENTValue write SetIMP_UNIDAD_ULT_VENTValue; property IMP_NETO_ULT_VENT: Float read GetIMP_NETO_ULT_VENTValue write SetIMP_NETO_ULT_VENTValue; property IMP_PORTE_ULT_VENT: Float read GetIMP_PORTE_ULT_VENTValue write SetIMP_PORTE_ULT_VENTValue; property IMP_UNIDAD_PRO_VENT: Float read GetIMP_UNIDAD_PRO_VENTValue write SetIMP_UNIDAD_PRO_VENTValue; property IMP_NETO_PRO_VENT: Float read GetIMP_NETO_PRO_VENTValue write SetIMP_NETO_PRO_VENTValue; property IMP_PORTE_PRO_VENT: Float read GetIMP_PORTE_PRO_VENTValue write SetIMP_PORTE_PRO_VENTValue; property IMP_UNIDAD_COMPRA: Float read GetIMP_UNIDAD_COMPRAValue write SetIMP_UNIDAD_COMPRAValue; property IMP_NETO_COMPRA: Float read GetIMP_NETO_COMPRAValue write SetIMP_NETO_COMPRAValue; property IMP_PORTE_COMPRA: Float read GetIMP_PORTE_COMPRAValue write SetIMP_PORTE_COMPRAValue; property IMP_UNIDAD_ULT_COMP: Float read GetIMP_UNIDAD_ULT_COMPValue write SetIMP_UNIDAD_ULT_COMPValue; property IMP_NETO_ULT_COMP: Float read GetIMP_NETO_ULT_COMPValue write SetIMP_NETO_ULT_COMPValue; property IMP_PORTE_ULT_COMP: Float read GetIMP_PORTE_ULT_COMPValue write SetIMP_PORTE_ULT_COMPValue; property IMP_UNIDAD_PRO_COMP: Float read GetIMP_UNIDAD_PRO_COMPValue write SetIMP_UNIDAD_PRO_COMPValue; property IMP_NETO_PRO_COMP: Float read GetIMP_NETO_PRO_COMPValue write SetIMP_NETO_PRO_COMPValue; property IMP_PORTE_PRO_COMP: Float read GetIMP_PORTE_PRO_COMPValue write SetIMP_PORTE_PRO_COMPValue; property IMP_MARGEN_ULT_VENT_COMPRA: Float read GetIMP_MARGEN_ULT_VENT_COMPRAValue write SetIMP_MARGEN_ULT_VENT_COMPRAValue; property POR_MARGEN_ULT_VENT_COMPRA: Float read GetPOR_MARGEN_ULT_VENT_COMPRAValue write SetPOR_MARGEN_ULT_VENT_COMPRAValue; property IMP_MARGEN_ULT_VENT_ULT_COMP: Float read GetIMP_MARGEN_ULT_VENT_ULT_COMPValue write SetIMP_MARGEN_ULT_VENT_ULT_COMPValue; property POR_MARGEN_ULT_VENT_ULT_COMP: Float read GetPOR_MARGEN_ULT_VENT_ULT_COMPValue write SetPOR_MARGEN_ULT_VENT_ULT_COMPValue; property IMP_MARGEN_ULT_VENT_PRO_COMP: Float read GetIMP_MARGEN_ULT_VENT_PRO_COMPValue write SetIMP_MARGEN_ULT_VENT_PRO_COMPValue; property POR_MARGEN_ULT_VENT_PRO_COMP: Float read GetPOR_MARGEN_ULT_VENT_PRO_COMPValue write SetPOR_MARGEN_ULT_VENT_PRO_COMPValue; property IMP_MARGEN_PRO_VENT_COMPRA: Float read GetIMP_MARGEN_PRO_VENT_COMPRAValue write SetIMP_MARGEN_PRO_VENT_COMPRAValue; property POR_MARGEN_PRO_VENT_COMPRA: Float read GetPOR_MARGEN_PRO_VENT_COMPRAValue write SetPOR_MARGEN_PRO_VENT_COMPRAValue; property IMP_MARGEN_PRO_VENT_ULT_COMP: Float read GetIMP_MARGEN_PRO_VENT_ULT_COMPValue write SetIMP_MARGEN_PRO_VENT_ULT_COMPValue; property POR_MARGEN_PRO_VENT_ULT_COMP: Float read GetPOR_MARGEN_PRO_VENT_ULT_COMPValue write SetPOR_MARGEN_PRO_VENT_ULT_COMPValue; property IMP_MARGEN_PRO_VENT_PRO_COMP: Float read GetIMP_MARGEN_PRO_VENT_PRO_COMPValue write SetIMP_MARGEN_PRO_VENT_PRO_COMPValue; property POR_MARGEN_PRO_VENT_PRO_COMP: Float read GetPOR_MARGEN_PRO_VENT_PRO_COMPValue write SetPOR_MARGEN_PRO_VENT_PRO_COMPValue; public constructor Create(aDataTable: TDADataTable); override; destructor Destroy; override; end; implementation uses Variants; { TInfMargenPorClienteDataTableRules } constructor TInfMargenPorClienteDataTableRules.Create(aDataTable: TDADataTable); begin inherited; end; destructor TInfMargenPorClienteDataTableRules.Destroy; begin inherited; end; function TInfMargenPorClienteDataTableRules.GetID_EMPRESAValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorClienteID_EMPRESA].AsInteger; end; procedure TInfMargenPorClienteDataTableRules.SetID_EMPRESAValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorClienteID_EMPRESA].AsInteger := aValue; end; function TInfMargenPorClienteDataTableRules.GetID_CLIENTEValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorClienteID_CLIENTE].AsInteger; end; procedure TInfMargenPorClienteDataTableRules.SetID_CLIENTEValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorClienteID_CLIENTE].AsInteger := aValue; end; function TInfMargenPorClienteDataTableRules.GetID_ARTICULOValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorClienteID_ARTICULO].AsInteger; end; procedure TInfMargenPorClienteDataTableRules.SetID_ARTICULOValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorClienteID_ARTICULO].AsInteger := aValue; end; function TInfMargenPorClienteDataTableRules.GetFAMILIAValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteFAMILIA].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetFAMILIAValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteFAMILIA].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetREFERENCIAValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteREFERENCIA].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetREFERENCIAValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteREFERENCIA].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetREFERENCIA_PROVValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteREFERENCIA_PROV].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetREFERENCIA_PROVValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteREFERENCIA_PROV].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetDESCRIPCIONValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteDESCRIPCION].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetDESCRIPCIONValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteDESCRIPCION].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetCOMISIONABLEValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorClienteCOMISIONABLE].AsInteger; end; procedure TInfMargenPorClienteDataTableRules.SetCOMISIONABLEValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorClienteCOMISIONABLE].AsInteger := aValue; end; function TInfMargenPorClienteDataTableRules.GetINVENTARIABLEValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorClienteINVENTARIABLE].AsInteger; end; procedure TInfMargenPorClienteDataTableRules.SetINVENTARIABLEValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorClienteINVENTARIABLE].AsInteger := aValue; end; function TInfMargenPorClienteDataTableRules.GetNIF_CIF_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteNIF_CIF_CLIENTE].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetNIF_CIF_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteNIF_CIF_CLIENTE].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetNOMBRE_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteNOMBRE_CLIENTE].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetNOMBRE_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteNOMBRE_CLIENTE].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteNOMBRE_COMERCIAL_CLIENTE].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteNOMBRE_COMERCIAL_CLIENTE].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetNIF_CIF_AGENTEValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteNIF_CIF_AGENTE].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetNIF_CIF_AGENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteNIF_CIF_AGENTE].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetNOMBRE_AGENTEValue: String; begin result := DataTable.Fields[idx_InfMargenPorClienteNOMBRE_AGENTE].AsString; end; procedure TInfMargenPorClienteDataTableRules.SetNOMBRE_AGENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorClienteNOMBRE_AGENTE].AsString := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_UNIDAD_ULT_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_ULT_VENT].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_UNIDAD_ULT_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_ULT_VENT].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_NETO_ULT_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_ULT_VENT].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_NETO_ULT_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_ULT_VENT].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_PORTE_ULT_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_ULT_VENT].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_PORTE_ULT_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_ULT_VENT].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_UNIDAD_PRO_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_PRO_VENT].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_UNIDAD_PRO_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_PRO_VENT].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_NETO_PRO_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_PRO_VENT].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_NETO_PRO_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_PRO_VENT].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_PORTE_PRO_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_PRO_VENT].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_PORTE_PRO_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_PRO_VENT].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_UNIDAD_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_COMPRA].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_UNIDAD_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_COMPRA].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_NETO_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_COMPRA].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_NETO_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_COMPRA].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_PORTE_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_COMPRA].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_PORTE_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_COMPRA].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_UNIDAD_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_ULT_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_UNIDAD_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_NETO_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_ULT_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_NETO_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_PORTE_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_ULT_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_PORTE_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_UNIDAD_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_PRO_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_UNIDAD_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_UNIDAD_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_NETO_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_PRO_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_NETO_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_NETO_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_PORTE_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_PRO_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_PORTE_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_PORTE_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_MARGEN_ULT_VENT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_COMPRA].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_COMPRA].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetPOR_MARGEN_ULT_VENT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_COMPRA].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetPOR_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_COMPRA].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_MARGEN_ULT_VENT_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_ULT_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetPOR_MARGEN_ULT_VENT_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_ULT_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetPOR_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_MARGEN_ULT_VENT_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_PRO_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_ULT_VENT_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetPOR_MARGEN_ULT_VENT_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_PRO_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetPOR_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_ULT_VENT_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_MARGEN_PRO_VENT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_COMPRA].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_COMPRA].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetPOR_MARGEN_PRO_VENT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_COMPRA].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetPOR_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_COMPRA].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_MARGEN_PRO_VENT_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_ULT_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetPOR_MARGEN_PRO_VENT_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_ULT_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetPOR_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetIMP_MARGEN_PRO_VENT_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_PRO_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetIMP_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClienteIMP_MARGEN_PRO_VENT_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorClienteDataTableRules.GetPOR_MARGEN_PRO_VENT_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_PRO_COMP].AsFloat; end; procedure TInfMargenPorClienteDataTableRules.SetPOR_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorClientePOR_MARGEN_PRO_VENT_PRO_COMP].AsFloat := aValue; end; { TInfMargenPorArticuloDataTableRules } constructor TInfMargenPorArticuloDataTableRules.Create(aDataTable: TDADataTable); begin inherited; end; destructor TInfMargenPorArticuloDataTableRules.Destroy; begin inherited; end; function TInfMargenPorArticuloDataTableRules.GetID_EMPRESAValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorArticuloID_EMPRESA].AsInteger; end; procedure TInfMargenPorArticuloDataTableRules.SetID_EMPRESAValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorArticuloID_EMPRESA].AsInteger := aValue; end; function TInfMargenPorArticuloDataTableRules.GetID_ARTICULOValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorArticuloID_ARTICULO].AsInteger; end; procedure TInfMargenPorArticuloDataTableRules.SetID_ARTICULOValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorArticuloID_ARTICULO].AsInteger := aValue; end; function TInfMargenPorArticuloDataTableRules.GetFAMILIAValue: String; begin result := DataTable.Fields[idx_InfMargenPorArticuloFAMILIA].AsString; end; procedure TInfMargenPorArticuloDataTableRules.SetFAMILIAValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorArticuloFAMILIA].AsString := aValue; end; function TInfMargenPorArticuloDataTableRules.GetREFERENCIAValue: String; begin result := DataTable.Fields[idx_InfMargenPorArticuloREFERENCIA].AsString; end; procedure TInfMargenPorArticuloDataTableRules.SetREFERENCIAValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorArticuloREFERENCIA].AsString := aValue; end; function TInfMargenPorArticuloDataTableRules.GetREFERENCIA_PROVValue: String; begin result := DataTable.Fields[idx_InfMargenPorArticuloREFERENCIA_PROV].AsString; end; procedure TInfMargenPorArticuloDataTableRules.SetREFERENCIA_PROVValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorArticuloREFERENCIA_PROV].AsString := aValue; end; function TInfMargenPorArticuloDataTableRules.GetDESCRIPCIONValue: String; begin result := DataTable.Fields[idx_InfMargenPorArticuloDESCRIPCION].AsString; end; procedure TInfMargenPorArticuloDataTableRules.SetDESCRIPCIONValue(const aValue: String); begin DataTable.Fields[idx_InfMargenPorArticuloDESCRIPCION].AsString := aValue; end; function TInfMargenPorArticuloDataTableRules.GetCOMISIONABLEValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorArticuloCOMISIONABLE].AsInteger; end; procedure TInfMargenPorArticuloDataTableRules.SetCOMISIONABLEValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorArticuloCOMISIONABLE].AsInteger := aValue; end; function TInfMargenPorArticuloDataTableRules.GetINVENTARIABLEValue: Integer; begin result := DataTable.Fields[idx_InfMargenPorArticuloINVENTARIABLE].AsInteger; end; procedure TInfMargenPorArticuloDataTableRules.SetINVENTARIABLEValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenPorArticuloINVENTARIABLE].AsInteger := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_UNIDAD_ULT_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_ULT_VENT].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_UNIDAD_ULT_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_ULT_VENT].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_NETO_ULT_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_ULT_VENT].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_NETO_ULT_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_ULT_VENT].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_PORTE_ULT_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_ULT_VENT].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_PORTE_ULT_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_ULT_VENT].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_UNIDAD_PRO_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_PRO_VENT].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_UNIDAD_PRO_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_PRO_VENT].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_NETO_PRO_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_PRO_VENT].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_NETO_PRO_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_PRO_VENT].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_PORTE_PRO_VENTValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_PRO_VENT].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_PORTE_PRO_VENTValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_PRO_VENT].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_UNIDAD_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_COMPRA].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_UNIDAD_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_COMPRA].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_NETO_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_COMPRA].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_NETO_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_COMPRA].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_PORTE_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_COMPRA].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_PORTE_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_COMPRA].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_UNIDAD_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_ULT_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_UNIDAD_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_NETO_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_ULT_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_NETO_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_PORTE_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_ULT_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_PORTE_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_UNIDAD_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_PRO_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_UNIDAD_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_UNIDAD_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_NETO_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_PRO_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_NETO_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_NETO_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_PORTE_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_PRO_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_PORTE_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_PORTE_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_MARGEN_ULT_VENT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_COMPRA].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_COMPRA].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetPOR_MARGEN_ULT_VENT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_COMPRA].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetPOR_MARGEN_ULT_VENT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_COMPRA].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_MARGEN_ULT_VENT_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_ULT_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetPOR_MARGEN_ULT_VENT_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_ULT_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetPOR_MARGEN_ULT_VENT_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_MARGEN_ULT_VENT_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_PRO_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_ULT_VENT_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetPOR_MARGEN_ULT_VENT_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_PRO_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetPOR_MARGEN_ULT_VENT_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_ULT_VENT_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_MARGEN_PRO_VENT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_COMPRA].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_COMPRA].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetPOR_MARGEN_PRO_VENT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_COMPRA].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetPOR_MARGEN_PRO_VENT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_COMPRA].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_MARGEN_PRO_VENT_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_ULT_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetPOR_MARGEN_PRO_VENT_ULT_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_ULT_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetPOR_MARGEN_PRO_VENT_ULT_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_ULT_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetIMP_MARGEN_PRO_VENT_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_PRO_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetIMP_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloIMP_MARGEN_PRO_VENT_PRO_COMP].AsFloat := aValue; end; function TInfMargenPorArticuloDataTableRules.GetPOR_MARGEN_PRO_VENT_PRO_COMPValue: Float; begin result := DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_PRO_COMP].AsFloat; end; procedure TInfMargenPorArticuloDataTableRules.SetPOR_MARGEN_PRO_VENT_PRO_COMPValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenPorArticuloPOR_MARGEN_PRO_VENT_PRO_COMP].AsFloat := aValue; end; initialization RegisterDataTableRules(RID_InfMargenPorCliente, TInfMargenPorClienteDataTableRules); RegisterDataTableRules(RID_InfMargenPorArticulo, TInfMargenPorArticuloDataTableRules); end.