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_InfMargenArticulo = '{2DD59805-C1A8-4B91-B689-421A44964DA9}'; { Data table names } nme_InfMargenArticulo = 'InfMargenArticulo'; { InfMargenArticulo fields } fld_InfMargenArticuloID_FACTURA = 'ID_FACTURA'; fld_InfMargenArticuloID_EMPRESA = 'ID_EMPRESA'; fld_InfMargenArticuloREFERENCIA_FACTURA = 'REFERENCIA_FACTURA'; fld_InfMargenArticuloFECHA_FACTURA = 'FECHA_FACTURA'; fld_InfMargenArticuloIMPORTE_TOTAL_FACTURA = 'IMPORTE_TOTAL_FACTURA'; fld_InfMargenArticuloID_COMISION_FACTURA = 'ID_COMISION_FACTURA'; fld_InfMargenArticuloID_ARTICULO = 'ID_ARTICULO'; fld_InfMargenArticuloFAMILIA = 'FAMILIA'; fld_InfMargenArticuloREFERENCIA = 'REFERENCIA'; fld_InfMargenArticuloREFERENCIA_PROV = 'REFERENCIA_PROV'; fld_InfMargenArticuloDESCRIPCION = 'DESCRIPCION'; fld_InfMargenArticuloCOMISIONABLE = 'COMISIONABLE'; fld_InfMargenArticuloINVENTARIABLE = 'INVENTARIABLE'; fld_InfMargenArticuloIMPORTE_UNIDAD_COSTE = 'IMPORTE_UNIDAD_COSTE'; fld_InfMargenArticuloDESCUENTO_PROVEEDOR_COSTE = 'DESCUENTO_PROVEEDOR_COSTE'; fld_InfMargenArticuloIMPORTE_NETO_COSTE = 'IMPORTE_NETO_COSTE'; fld_InfMargenArticuloIMPORTE_PORTE_COSTE = 'IMPORTE_PORTE_COSTE'; fld_InfMargenArticuloIMPORTE_UNIDAD_ULTIMA_COMPRA = 'IMPORTE_UNIDAD_ULTIMA_COMPRA'; fld_InfMargenArticuloIMPORTE_NETO_ULTIMA_COMPRA = 'IMPORTE_NETO_ULTIMA_COMPRA'; fld_InfMargenArticuloIMPORTE_PORTE_ULTIMA_COMPRA = 'IMPORTE_PORTE_ULTIMA_COMPRA'; fld_InfMargenArticuloIMPORTE_UNIDAD_PROMEDIO_COMPRA = 'IMPORTE_UNIDAD_PROMEDIO_COMPRA'; fld_InfMargenArticuloIMPORTE_NETO_PROMEDIO_COMPRA = 'IMPORTE_NETO_PROMEDIO_COMPRA'; fld_InfMargenArticuloIMPORTE_PORTE_PROMEDIO_COMPRA = 'IMPORTE_PORTE_PROMEDIO_COMPRA'; fld_InfMargenArticuloCANTIDAD = 'CANTIDAD'; fld_InfMargenArticuloIMPORTE_UNIDAD_VENTA = 'IMPORTE_UNIDAD_VENTA'; fld_InfMargenArticuloDESCUENTO_CLIENTE_VENTA = 'DESCUENTO_CLIENTE_VENTA'; fld_InfMargenArticuloIMPORTE_NETO_VENTA = 'IMPORTE_NETO_VENTA'; fld_InfMargenArticuloIMPORTE_PORTE_VENTA = 'IMPORTE_PORTE_VENTA'; fld_InfMargenArticuloIMPORTE_TOTAL_VENTA = 'IMPORTE_TOTAL_VENTA'; fld_InfMargenArticuloIMPORTE_MARGEN_COSTE = 'IMPORTE_MARGEN_COSTE'; fld_InfMargenArticuloPORCENTAJE_MARGEN_COSTE = 'PORCENTAJE_MARGEN_COSTE'; fld_InfMargenArticuloIMPORTE_MARGEN_ULT_COMPRA = 'IMPORTE_MARGEN_ULT_COMPRA'; fld_InfMargenArticuloPORCENTAJE_MARGEN_ULT_COMPRA = 'PORCENTAJE_MARGEN_ULT_COMPRA'; fld_InfMargenArticuloIMPORTE_MARGEN_PROM_COMPRA = 'IMPORTE_MARGEN_PROM_COMPRA'; fld_InfMargenArticuloPORCENTAJE_MARGEN_PROM_COMPRA = 'PORCENTAJE_MARGEN_PROM_COMPRA'; fld_InfMargenArticuloNIF_CIF_PROVEEDOR = 'NIF_CIF_PROVEEDOR'; fld_InfMargenArticuloNOMBRE_PROVEEDOR = 'NOMBRE_PROVEEDOR'; fld_InfMargenArticuloCALLE_PROVEEDOR = 'CALLE_PROVEEDOR'; fld_InfMargenArticuloPOBLACION_PROVEEDOR = 'POBLACION_PROVEEDOR'; fld_InfMargenArticuloPROVINCIA_PROVEEDOR = 'PROVINCIA_PROVEEDOR'; fld_InfMargenArticuloNIF_CIF_CLIENTE = 'NIF_CIF_CLIENTE'; fld_InfMargenArticuloNOMBRE_CLIENTE = 'NOMBRE_CLIENTE'; fld_InfMargenArticuloNOMBRE_COMERCIAL_CLIENTE = 'NOMBRE_COMERCIAL_CLIENTE'; fld_InfMargenArticuloCALLE_CLIENTE = 'CALLE_CLIENTE'; fld_InfMargenArticuloPOBLACION_CLIENTE = 'POBLACION_CLIENTE'; fld_InfMargenArticuloPROVINCIA_CLIENTE = 'PROVINCIA_CLIENTE'; fld_InfMargenArticuloNIF_CIF_AGENTE = 'NIF_CIF_AGENTE'; fld_InfMargenArticuloNOMBRE_AGENTE = 'NOMBRE_AGENTE'; fld_InfMargenArticuloCALLE_AGENTE = 'CALLE_AGENTE'; fld_InfMargenArticuloPOBLACION_AGENTE = 'POBLACION_AGENTE'; fld_InfMargenArticuloPROVINCIA_AGENTE = 'PROVINCIA_AGENTE'; fld_InfMargenArticuloCOMISION_AGENTE = 'COMISION_AGENTE'; fld_InfMargenArticuloIMPORTE_COMISION_AGENTE = 'IMPORTE_COMISION_AGENTE'; { InfMargenArticulo field indexes } idx_InfMargenArticuloID_FACTURA = 0; idx_InfMargenArticuloID_EMPRESA = 1; idx_InfMargenArticuloREFERENCIA_FACTURA = 2; idx_InfMargenArticuloFECHA_FACTURA = 3; idx_InfMargenArticuloIMPORTE_TOTAL_FACTURA = 4; idx_InfMargenArticuloID_COMISION_FACTURA = 5; idx_InfMargenArticuloID_ARTICULO = 6; idx_InfMargenArticuloFAMILIA = 7; idx_InfMargenArticuloREFERENCIA = 8; idx_InfMargenArticuloREFERENCIA_PROV = 9; idx_InfMargenArticuloDESCRIPCION = 10; idx_InfMargenArticuloCOMISIONABLE = 11; idx_InfMargenArticuloINVENTARIABLE = 12; idx_InfMargenArticuloIMPORTE_UNIDAD_COSTE = 13; idx_InfMargenArticuloDESCUENTO_PROVEEDOR_COSTE = 14; idx_InfMargenArticuloIMPORTE_NETO_COSTE = 15; idx_InfMargenArticuloIMPORTE_PORTE_COSTE = 16; idx_InfMargenArticuloIMPORTE_UNIDAD_ULTIMA_COMPRA = 17; idx_InfMargenArticuloIMPORTE_NETO_ULTIMA_COMPRA = 18; idx_InfMargenArticuloIMPORTE_PORTE_ULTIMA_COMPRA = 19; idx_InfMargenArticuloIMPORTE_UNIDAD_PROMEDIO_COMPRA = 20; idx_InfMargenArticuloIMPORTE_NETO_PROMEDIO_COMPRA = 21; idx_InfMargenArticuloIMPORTE_PORTE_PROMEDIO_COMPRA = 22; idx_InfMargenArticuloCANTIDAD = 23; idx_InfMargenArticuloIMPORTE_UNIDAD_VENTA = 24; idx_InfMargenArticuloDESCUENTO_CLIENTE_VENTA = 25; idx_InfMargenArticuloIMPORTE_NETO_VENTA = 26; idx_InfMargenArticuloIMPORTE_PORTE_VENTA = 27; idx_InfMargenArticuloIMPORTE_TOTAL_VENTA = 28; idx_InfMargenArticuloIMPORTE_MARGEN_COSTE = 29; idx_InfMargenArticuloPORCENTAJE_MARGEN_COSTE = 30; idx_InfMargenArticuloIMPORTE_MARGEN_ULT_COMPRA = 31; idx_InfMargenArticuloPORCENTAJE_MARGEN_ULT_COMPRA = 32; idx_InfMargenArticuloIMPORTE_MARGEN_PROM_COMPRA = 33; idx_InfMargenArticuloPORCENTAJE_MARGEN_PROM_COMPRA = 34; idx_InfMargenArticuloNIF_CIF_PROVEEDOR = 35; idx_InfMargenArticuloNOMBRE_PROVEEDOR = 36; idx_InfMargenArticuloCALLE_PROVEEDOR = 37; idx_InfMargenArticuloPOBLACION_PROVEEDOR = 38; idx_InfMargenArticuloPROVINCIA_PROVEEDOR = 39; idx_InfMargenArticuloNIF_CIF_CLIENTE = 40; idx_InfMargenArticuloNOMBRE_CLIENTE = 41; idx_InfMargenArticuloNOMBRE_COMERCIAL_CLIENTE = 42; idx_InfMargenArticuloCALLE_CLIENTE = 43; idx_InfMargenArticuloPOBLACION_CLIENTE = 44; idx_InfMargenArticuloPROVINCIA_CLIENTE = 45; idx_InfMargenArticuloNIF_CIF_AGENTE = 46; idx_InfMargenArticuloNOMBRE_AGENTE = 47; idx_InfMargenArticuloCALLE_AGENTE = 48; idx_InfMargenArticuloPOBLACION_AGENTE = 49; idx_InfMargenArticuloPROVINCIA_AGENTE = 50; idx_InfMargenArticuloCOMISION_AGENTE = 51; idx_InfMargenArticuloIMPORTE_COMISION_AGENTE = 52; type { IInfMargenArticulo } IInfMargenArticulo = interface(IDAStronglyTypedDataTable) ['{5C058494-52F5-48F3-A25C-1A5F74D7C2E3}'] { Property getters and setters } function GetID_FACTURAValue: Integer; procedure SetID_FACTURAValue(const aValue: Integer); function GetID_EMPRESAValue: Integer; procedure SetID_EMPRESAValue(const aValue: Integer); function GetREFERENCIA_FACTURAValue: String; procedure SetREFERENCIA_FACTURAValue(const aValue: String); function GetFECHA_FACTURAValue: DateTime; procedure SetFECHA_FACTURAValue(const aValue: DateTime); function GetIMPORTE_TOTAL_FACTURAValue: Currency; procedure SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency); function GetID_COMISION_FACTURAValue: Integer; procedure SetID_COMISION_FACTURAValue(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 GetIMPORTE_UNIDAD_COSTEValue: Currency; procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency); function GetDESCUENTO_PROVEEDOR_COSTEValue: Float; procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float); function GetIMPORTE_NETO_COSTEValue: Currency; procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency); function GetIMPORTE_PORTE_COSTEValue: Currency; procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); function GetIMPORTE_UNIDAD_ULTIMA_COMPRAValue: Currency; procedure SetIMPORTE_UNIDAD_ULTIMA_COMPRAValue(const aValue: Currency); function GetIMPORTE_NETO_ULTIMA_COMPRAValue: Currency; procedure SetIMPORTE_NETO_ULTIMA_COMPRAValue(const aValue: Currency); function GetIMPORTE_PORTE_ULTIMA_COMPRAValue: Currency; procedure SetIMPORTE_PORTE_ULTIMA_COMPRAValue(const aValue: Currency); function GetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue: Currency; procedure SetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue(const aValue: Currency); function GetIMPORTE_NETO_PROMEDIO_COMPRAValue: Currency; procedure SetIMPORTE_NETO_PROMEDIO_COMPRAValue(const aValue: Currency); function GetIMPORTE_PORTE_PROMEDIO_COMPRAValue: Currency; procedure SetIMPORTE_PORTE_PROMEDIO_COMPRAValue(const aValue: Currency); function GetCANTIDADValue: Integer; procedure SetCANTIDADValue(const aValue: Integer); function GetIMPORTE_UNIDAD_VENTAValue: Currency; procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency); function GetDESCUENTO_CLIENTE_VENTAValue: Float; procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float); function GetIMPORTE_NETO_VENTAValue: Currency; procedure SetIMPORTE_NETO_VENTAValue(const aValue: Currency); function GetIMPORTE_PORTE_VENTAValue: Float; procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Float); function GetIMPORTE_TOTAL_VENTAValue: Currency; procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency); function GetIMPORTE_MARGEN_COSTEValue: Currency; procedure SetIMPORTE_MARGEN_COSTEValue(const aValue: Currency); function GetPORCENTAJE_MARGEN_COSTEValue: Float; procedure SetPORCENTAJE_MARGEN_COSTEValue(const aValue: Float); function GetIMPORTE_MARGEN_ULT_COMPRAValue: Currency; procedure SetIMPORTE_MARGEN_ULT_COMPRAValue(const aValue: Currency); function GetPORCENTAJE_MARGEN_ULT_COMPRAValue: Float; procedure SetPORCENTAJE_MARGEN_ULT_COMPRAValue(const aValue: Float); function GetIMPORTE_MARGEN_PROM_COMPRAValue: Currency; procedure SetIMPORTE_MARGEN_PROM_COMPRAValue(const aValue: Currency); function GetPORCENTAJE_MARGEN_PROM_COMPRAValue: Float; procedure SetPORCENTAJE_MARGEN_PROM_COMPRAValue(const aValue: Float); function GetNIF_CIF_PROVEEDORValue: String; procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); function GetNOMBRE_PROVEEDORValue: String; procedure SetNOMBRE_PROVEEDORValue(const aValue: String); function GetCALLE_PROVEEDORValue: String; procedure SetCALLE_PROVEEDORValue(const aValue: String); function GetPOBLACION_PROVEEDORValue: String; procedure SetPOBLACION_PROVEEDORValue(const aValue: String); function GetPROVINCIA_PROVEEDORValue: String; procedure SetPROVINCIA_PROVEEDORValue(const aValue: String); 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 GetCALLE_CLIENTEValue: String; procedure SetCALLE_CLIENTEValue(const aValue: String); function GetPOBLACION_CLIENTEValue: String; procedure SetPOBLACION_CLIENTEValue(const aValue: String); function GetPROVINCIA_CLIENTEValue: String; procedure SetPROVINCIA_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 GetCALLE_AGENTEValue: String; procedure SetCALLE_AGENTEValue(const aValue: String); function GetPOBLACION_AGENTEValue: String; procedure SetPOBLACION_AGENTEValue(const aValue: String); function GetPROVINCIA_AGENTEValue: String; procedure SetPROVINCIA_AGENTEValue(const aValue: String); function GetCOMISION_AGENTEValue: Float; procedure SetCOMISION_AGENTEValue(const aValue: Float); function GetIMPORTE_COMISION_AGENTEValue: Currency; procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency); { Properties } property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue; property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property REFERENCIA_FACTURA: String read GetREFERENCIA_FACTURAValue write SetREFERENCIA_FACTURAValue; property FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue; property IMPORTE_TOTAL_FACTURA: Currency read GetIMPORTE_TOTAL_FACTURAValue write SetIMPORTE_TOTAL_FACTURAValue; property ID_COMISION_FACTURA: Integer read GetID_COMISION_FACTURAValue write SetID_COMISION_FACTURAValue; 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 IMPORTE_UNIDAD_COSTE: Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue; property DESCUENTO_PROVEEDOR_COSTE: Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue; property IMPORTE_NETO_COSTE: Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue; property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue; property IMPORTE_UNIDAD_ULTIMA_COMPRA: Currency read GetIMPORTE_UNIDAD_ULTIMA_COMPRAValue write SetIMPORTE_UNIDAD_ULTIMA_COMPRAValue; property IMPORTE_NETO_ULTIMA_COMPRA: Currency read GetIMPORTE_NETO_ULTIMA_COMPRAValue write SetIMPORTE_NETO_ULTIMA_COMPRAValue; property IMPORTE_PORTE_ULTIMA_COMPRA: Currency read GetIMPORTE_PORTE_ULTIMA_COMPRAValue write SetIMPORTE_PORTE_ULTIMA_COMPRAValue; property IMPORTE_UNIDAD_PROMEDIO_COMPRA: Currency read GetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue write SetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue; property IMPORTE_NETO_PROMEDIO_COMPRA: Currency read GetIMPORTE_NETO_PROMEDIO_COMPRAValue write SetIMPORTE_NETO_PROMEDIO_COMPRAValue; property IMPORTE_PORTE_PROMEDIO_COMPRA: Currency read GetIMPORTE_PORTE_PROMEDIO_COMPRAValue write SetIMPORTE_PORTE_PROMEDIO_COMPRAValue; property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue; property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue; property DESCUENTO_CLIENTE_VENTA: Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue; property IMPORTE_NETO_VENTA: Currency read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue; property IMPORTE_PORTE_VENTA: Float read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue; property IMPORTE_TOTAL_VENTA: Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue; property IMPORTE_MARGEN_COSTE: Currency read GetIMPORTE_MARGEN_COSTEValue write SetIMPORTE_MARGEN_COSTEValue; property PORCENTAJE_MARGEN_COSTE: Float read GetPORCENTAJE_MARGEN_COSTEValue write SetPORCENTAJE_MARGEN_COSTEValue; property IMPORTE_MARGEN_ULT_COMPRA: Currency read GetIMPORTE_MARGEN_ULT_COMPRAValue write SetIMPORTE_MARGEN_ULT_COMPRAValue; property PORCENTAJE_MARGEN_ULT_COMPRA: Float read GetPORCENTAJE_MARGEN_ULT_COMPRAValue write SetPORCENTAJE_MARGEN_ULT_COMPRAValue; property IMPORTE_MARGEN_PROM_COMPRA: Currency read GetIMPORTE_MARGEN_PROM_COMPRAValue write SetIMPORTE_MARGEN_PROM_COMPRAValue; property PORCENTAJE_MARGEN_PROM_COMPRA: Float read GetPORCENTAJE_MARGEN_PROM_COMPRAValue write SetPORCENTAJE_MARGEN_PROM_COMPRAValue; property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue; property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue; property CALLE_PROVEEDOR: String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue; property POBLACION_PROVEEDOR: String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue; property PROVINCIA_PROVEEDOR: String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue; 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 CALLE_CLIENTE: String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue; property POBLACION_CLIENTE: String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue; property PROVINCIA_CLIENTE: String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_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 CALLE_AGENTE: String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue; property POBLACION_AGENTE: String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue; property PROVINCIA_AGENTE: String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue; property COMISION_AGENTE: Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue; property IMPORTE_COMISION_AGENTE: Currency read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue; end; { TInfMargenArticuloDataTableRules } TInfMargenArticuloDataTableRules = class(TDADataTableRules, IInfMargenArticulo) private protected { Property getters and setters } function GetID_FACTURAValue: Integer; virtual; procedure SetID_FACTURAValue(const aValue: Integer); virtual; function GetID_EMPRESAValue: Integer; virtual; procedure SetID_EMPRESAValue(const aValue: Integer); virtual; function GetREFERENCIA_FACTURAValue: String; virtual; procedure SetREFERENCIA_FACTURAValue(const aValue: String); virtual; function GetFECHA_FACTURAValue: DateTime; virtual; procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual; function GetIMPORTE_TOTAL_FACTURAValue: Currency; virtual; procedure SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency); virtual; function GetID_COMISION_FACTURAValue: Integer; virtual; procedure SetID_COMISION_FACTURAValue(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 GetIMPORTE_UNIDAD_COSTEValue: Currency; virtual; procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency); virtual; function GetDESCUENTO_PROVEEDOR_COSTEValue: Float; virtual; procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float); virtual; function GetIMPORTE_NETO_COSTEValue: Currency; virtual; procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency); virtual; function GetIMPORTE_PORTE_COSTEValue: Currency; virtual; procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual; function GetIMPORTE_UNIDAD_ULTIMA_COMPRAValue: Currency; virtual; procedure SetIMPORTE_UNIDAD_ULTIMA_COMPRAValue(const aValue: Currency); virtual; function GetIMPORTE_NETO_ULTIMA_COMPRAValue: Currency; virtual; procedure SetIMPORTE_NETO_ULTIMA_COMPRAValue(const aValue: Currency); virtual; function GetIMPORTE_PORTE_ULTIMA_COMPRAValue: Currency; virtual; procedure SetIMPORTE_PORTE_ULTIMA_COMPRAValue(const aValue: Currency); virtual; function GetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue: Currency; virtual; procedure SetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue(const aValue: Currency); virtual; function GetIMPORTE_NETO_PROMEDIO_COMPRAValue: Currency; virtual; procedure SetIMPORTE_NETO_PROMEDIO_COMPRAValue(const aValue: Currency); virtual; function GetIMPORTE_PORTE_PROMEDIO_COMPRAValue: Currency; virtual; procedure SetIMPORTE_PORTE_PROMEDIO_COMPRAValue(const aValue: Currency); virtual; function GetCANTIDADValue: Integer; virtual; procedure SetCANTIDADValue(const aValue: Integer); virtual; function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual; procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency); virtual; function GetDESCUENTO_CLIENTE_VENTAValue: Float; virtual; procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float); virtual; function GetIMPORTE_NETO_VENTAValue: Currency; virtual; procedure SetIMPORTE_NETO_VENTAValue(const aValue: Currency); virtual; function GetIMPORTE_PORTE_VENTAValue: Float; virtual; procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Float); virtual; function GetIMPORTE_TOTAL_VENTAValue: Currency; virtual; procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency); virtual; function GetIMPORTE_MARGEN_COSTEValue: Currency; virtual; procedure SetIMPORTE_MARGEN_COSTEValue(const aValue: Currency); virtual; function GetPORCENTAJE_MARGEN_COSTEValue: Float; virtual; procedure SetPORCENTAJE_MARGEN_COSTEValue(const aValue: Float); virtual; function GetIMPORTE_MARGEN_ULT_COMPRAValue: Currency; virtual; procedure SetIMPORTE_MARGEN_ULT_COMPRAValue(const aValue: Currency); virtual; function GetPORCENTAJE_MARGEN_ULT_COMPRAValue: Float; virtual; procedure SetPORCENTAJE_MARGEN_ULT_COMPRAValue(const aValue: Float); virtual; function GetIMPORTE_MARGEN_PROM_COMPRAValue: Currency; virtual; procedure SetIMPORTE_MARGEN_PROM_COMPRAValue(const aValue: Currency); virtual; function GetPORCENTAJE_MARGEN_PROM_COMPRAValue: Float; virtual; procedure SetPORCENTAJE_MARGEN_PROM_COMPRAValue(const aValue: Float); virtual; function GetNIF_CIF_PROVEEDORValue: String; virtual; procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual; function GetNOMBRE_PROVEEDORValue: String; virtual; procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual; function GetCALLE_PROVEEDORValue: String; virtual; procedure SetCALLE_PROVEEDORValue(const aValue: String); virtual; function GetPOBLACION_PROVEEDORValue: String; virtual; procedure SetPOBLACION_PROVEEDORValue(const aValue: String); virtual; function GetPROVINCIA_PROVEEDORValue: String; virtual; procedure SetPROVINCIA_PROVEEDORValue(const aValue: String); 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 GetCALLE_CLIENTEValue: String; virtual; procedure SetCALLE_CLIENTEValue(const aValue: String); virtual; function GetPOBLACION_CLIENTEValue: String; virtual; procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual; function GetPROVINCIA_CLIENTEValue: String; virtual; procedure SetPROVINCIA_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 GetCALLE_AGENTEValue: String; virtual; procedure SetCALLE_AGENTEValue(const aValue: String); virtual; function GetPOBLACION_AGENTEValue: String; virtual; procedure SetPOBLACION_AGENTEValue(const aValue: String); virtual; function GetPROVINCIA_AGENTEValue: String; virtual; procedure SetPROVINCIA_AGENTEValue(const aValue: String); virtual; function GetCOMISION_AGENTEValue: Float; virtual; procedure SetCOMISION_AGENTEValue(const aValue: Float); virtual; function GetIMPORTE_COMISION_AGENTEValue: Currency; virtual; procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency); virtual; { Properties } property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue; property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property REFERENCIA_FACTURA: String read GetREFERENCIA_FACTURAValue write SetREFERENCIA_FACTURAValue; property FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue; property IMPORTE_TOTAL_FACTURA: Currency read GetIMPORTE_TOTAL_FACTURAValue write SetIMPORTE_TOTAL_FACTURAValue; property ID_COMISION_FACTURA: Integer read GetID_COMISION_FACTURAValue write SetID_COMISION_FACTURAValue; 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 IMPORTE_UNIDAD_COSTE: Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue; property DESCUENTO_PROVEEDOR_COSTE: Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue; property IMPORTE_NETO_COSTE: Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue; property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue; property IMPORTE_UNIDAD_ULTIMA_COMPRA: Currency read GetIMPORTE_UNIDAD_ULTIMA_COMPRAValue write SetIMPORTE_UNIDAD_ULTIMA_COMPRAValue; property IMPORTE_NETO_ULTIMA_COMPRA: Currency read GetIMPORTE_NETO_ULTIMA_COMPRAValue write SetIMPORTE_NETO_ULTIMA_COMPRAValue; property IMPORTE_PORTE_ULTIMA_COMPRA: Currency read GetIMPORTE_PORTE_ULTIMA_COMPRAValue write SetIMPORTE_PORTE_ULTIMA_COMPRAValue; property IMPORTE_UNIDAD_PROMEDIO_COMPRA: Currency read GetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue write SetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue; property IMPORTE_NETO_PROMEDIO_COMPRA: Currency read GetIMPORTE_NETO_PROMEDIO_COMPRAValue write SetIMPORTE_NETO_PROMEDIO_COMPRAValue; property IMPORTE_PORTE_PROMEDIO_COMPRA: Currency read GetIMPORTE_PORTE_PROMEDIO_COMPRAValue write SetIMPORTE_PORTE_PROMEDIO_COMPRAValue; property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue; property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue; property DESCUENTO_CLIENTE_VENTA: Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue; property IMPORTE_NETO_VENTA: Currency read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue; property IMPORTE_PORTE_VENTA: Float read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue; property IMPORTE_TOTAL_VENTA: Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue; property IMPORTE_MARGEN_COSTE: Currency read GetIMPORTE_MARGEN_COSTEValue write SetIMPORTE_MARGEN_COSTEValue; property PORCENTAJE_MARGEN_COSTE: Float read GetPORCENTAJE_MARGEN_COSTEValue write SetPORCENTAJE_MARGEN_COSTEValue; property IMPORTE_MARGEN_ULT_COMPRA: Currency read GetIMPORTE_MARGEN_ULT_COMPRAValue write SetIMPORTE_MARGEN_ULT_COMPRAValue; property PORCENTAJE_MARGEN_ULT_COMPRA: Float read GetPORCENTAJE_MARGEN_ULT_COMPRAValue write SetPORCENTAJE_MARGEN_ULT_COMPRAValue; property IMPORTE_MARGEN_PROM_COMPRA: Currency read GetIMPORTE_MARGEN_PROM_COMPRAValue write SetIMPORTE_MARGEN_PROM_COMPRAValue; property PORCENTAJE_MARGEN_PROM_COMPRA: Float read GetPORCENTAJE_MARGEN_PROM_COMPRAValue write SetPORCENTAJE_MARGEN_PROM_COMPRAValue; property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue; property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue; property CALLE_PROVEEDOR: String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue; property POBLACION_PROVEEDOR: String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue; property PROVINCIA_PROVEEDOR: String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue; 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 CALLE_CLIENTE: String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue; property POBLACION_CLIENTE: String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue; property PROVINCIA_CLIENTE: String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_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 CALLE_AGENTE: String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue; property POBLACION_AGENTE: String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue; property PROVINCIA_AGENTE: String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue; property COMISION_AGENTE: Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue; property IMPORTE_COMISION_AGENTE: Currency read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue; public constructor Create(aDataTable: TDADataTable); override; destructor Destroy; override; end; implementation uses Variants; { TInfMargenArticuloDataTableRules } constructor TInfMargenArticuloDataTableRules.Create(aDataTable: TDADataTable); begin inherited; end; destructor TInfMargenArticuloDataTableRules.Destroy; begin inherited; end; function TInfMargenArticuloDataTableRules.GetID_FACTURAValue: Integer; begin result := DataTable.Fields[idx_InfMargenArticuloID_FACTURA].AsInteger; end; procedure TInfMargenArticuloDataTableRules.SetID_FACTURAValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenArticuloID_FACTURA].AsInteger := aValue; end; function TInfMargenArticuloDataTableRules.GetID_EMPRESAValue: Integer; begin result := DataTable.Fields[idx_InfMargenArticuloID_EMPRESA].AsInteger; end; procedure TInfMargenArticuloDataTableRules.SetID_EMPRESAValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenArticuloID_EMPRESA].AsInteger := aValue; end; function TInfMargenArticuloDataTableRules.GetREFERENCIA_FACTURAValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloREFERENCIA_FACTURA].AsString; end; procedure TInfMargenArticuloDataTableRules.SetREFERENCIA_FACTURAValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloREFERENCIA_FACTURA].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetFECHA_FACTURAValue: DateTime; begin result := DataTable.Fields[idx_InfMargenArticuloFECHA_FACTURA].AsDateTime; end; procedure TInfMargenArticuloDataTableRules.SetFECHA_FACTURAValue(const aValue: DateTime); begin DataTable.Fields[idx_InfMargenArticuloFECHA_FACTURA].AsDateTime := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_TOTAL_FACTURAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_TOTAL_FACTURA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_TOTAL_FACTURA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetID_COMISION_FACTURAValue: Integer; begin result := DataTable.Fields[idx_InfMargenArticuloID_COMISION_FACTURA].AsInteger; end; procedure TInfMargenArticuloDataTableRules.SetID_COMISION_FACTURAValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenArticuloID_COMISION_FACTURA].AsInteger := aValue; end; function TInfMargenArticuloDataTableRules.GetID_ARTICULOValue: Integer; begin result := DataTable.Fields[idx_InfMargenArticuloID_ARTICULO].AsInteger; end; procedure TInfMargenArticuloDataTableRules.SetID_ARTICULOValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenArticuloID_ARTICULO].AsInteger := aValue; end; function TInfMargenArticuloDataTableRules.GetFAMILIAValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloFAMILIA].AsString; end; procedure TInfMargenArticuloDataTableRules.SetFAMILIAValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloFAMILIA].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetREFERENCIAValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloREFERENCIA].AsString; end; procedure TInfMargenArticuloDataTableRules.SetREFERENCIAValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloREFERENCIA].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetREFERENCIA_PROVValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloREFERENCIA_PROV].AsString; end; procedure TInfMargenArticuloDataTableRules.SetREFERENCIA_PROVValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloREFERENCIA_PROV].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetDESCRIPCIONValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloDESCRIPCION].AsString; end; procedure TInfMargenArticuloDataTableRules.SetDESCRIPCIONValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloDESCRIPCION].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetCOMISIONABLEValue: Integer; begin result := DataTable.Fields[idx_InfMargenArticuloCOMISIONABLE].AsInteger; end; procedure TInfMargenArticuloDataTableRules.SetCOMISIONABLEValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenArticuloCOMISIONABLE].AsInteger := aValue; end; function TInfMargenArticuloDataTableRules.GetINVENTARIABLEValue: Integer; begin result := DataTable.Fields[idx_InfMargenArticuloINVENTARIABLE].AsInteger; end; procedure TInfMargenArticuloDataTableRules.SetINVENTARIABLEValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenArticuloINVENTARIABLE].AsInteger := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_UNIDAD_COSTEValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_UNIDAD_COSTE].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_UNIDAD_COSTE].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetDESCUENTO_PROVEEDOR_COSTEValue: Float; begin result := DataTable.Fields[idx_InfMargenArticuloDESCUENTO_PROVEEDOR_COSTE].AsFloat; end; procedure TInfMargenArticuloDataTableRules.SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenArticuloDESCUENTO_PROVEEDOR_COSTE].AsFloat := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_NETO_COSTEValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_NETO_COSTE].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_NETO_COSTEValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_NETO_COSTE].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_PORTE_COSTEValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_PORTE_COSTE].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_PORTE_COSTE].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_UNIDAD_ULTIMA_COMPRAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_UNIDAD_ULTIMA_COMPRA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_UNIDAD_ULTIMA_COMPRAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_UNIDAD_ULTIMA_COMPRA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_NETO_ULTIMA_COMPRAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_NETO_ULTIMA_COMPRA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_NETO_ULTIMA_COMPRAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_NETO_ULTIMA_COMPRA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_PORTE_ULTIMA_COMPRAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_PORTE_ULTIMA_COMPRA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_PORTE_ULTIMA_COMPRAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_PORTE_ULTIMA_COMPRA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_UNIDAD_PROMEDIO_COMPRA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_UNIDAD_PROMEDIO_COMPRAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_UNIDAD_PROMEDIO_COMPRA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_NETO_PROMEDIO_COMPRAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_NETO_PROMEDIO_COMPRA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_NETO_PROMEDIO_COMPRAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_NETO_PROMEDIO_COMPRA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_PORTE_PROMEDIO_COMPRAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_PORTE_PROMEDIO_COMPRA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_PORTE_PROMEDIO_COMPRAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_PORTE_PROMEDIO_COMPRA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetCANTIDADValue: Integer; begin result := DataTable.Fields[idx_InfMargenArticuloCANTIDAD].AsInteger; end; procedure TInfMargenArticuloDataTableRules.SetCANTIDADValue(const aValue: Integer); begin DataTable.Fields[idx_InfMargenArticuloCANTIDAD].AsInteger := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_UNIDAD_VENTAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_UNIDAD_VENTA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_UNIDAD_VENTA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetDESCUENTO_CLIENTE_VENTAValue: Float; begin result := DataTable.Fields[idx_InfMargenArticuloDESCUENTO_CLIENTE_VENTA].AsFloat; end; procedure TInfMargenArticuloDataTableRules.SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenArticuloDESCUENTO_CLIENTE_VENTA].AsFloat := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_NETO_VENTAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_NETO_VENTA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_NETO_VENTAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_NETO_VENTA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_PORTE_VENTAValue: Float; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_PORTE_VENTA].AsFloat; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_PORTE_VENTAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_PORTE_VENTA].AsFloat := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_TOTAL_VENTAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_TOTAL_VENTA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_TOTAL_VENTA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_MARGEN_COSTEValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_MARGEN_COSTE].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_MARGEN_COSTEValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_MARGEN_COSTE].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetPORCENTAJE_MARGEN_COSTEValue: Float; begin result := DataTable.Fields[idx_InfMargenArticuloPORCENTAJE_MARGEN_COSTE].AsFloat; end; procedure TInfMargenArticuloDataTableRules.SetPORCENTAJE_MARGEN_COSTEValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenArticuloPORCENTAJE_MARGEN_COSTE].AsFloat := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_MARGEN_ULT_COMPRAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_MARGEN_ULT_COMPRA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_MARGEN_ULT_COMPRAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_MARGEN_ULT_COMPRA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetPORCENTAJE_MARGEN_ULT_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenArticuloPORCENTAJE_MARGEN_ULT_COMPRA].AsFloat; end; procedure TInfMargenArticuloDataTableRules.SetPORCENTAJE_MARGEN_ULT_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenArticuloPORCENTAJE_MARGEN_ULT_COMPRA].AsFloat := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_MARGEN_PROM_COMPRAValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_MARGEN_PROM_COMPRA].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_MARGEN_PROM_COMPRAValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_MARGEN_PROM_COMPRA].AsCurrency := aValue; end; function TInfMargenArticuloDataTableRules.GetPORCENTAJE_MARGEN_PROM_COMPRAValue: Float; begin result := DataTable.Fields[idx_InfMargenArticuloPORCENTAJE_MARGEN_PROM_COMPRA].AsFloat; end; procedure TInfMargenArticuloDataTableRules.SetPORCENTAJE_MARGEN_PROM_COMPRAValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenArticuloPORCENTAJE_MARGEN_PROM_COMPRA].AsFloat := aValue; end; function TInfMargenArticuloDataTableRules.GetNIF_CIF_PROVEEDORValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloNIF_CIF_PROVEEDOR].AsString; end; procedure TInfMargenArticuloDataTableRules.SetNIF_CIF_PROVEEDORValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloNIF_CIF_PROVEEDOR].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetNOMBRE_PROVEEDORValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloNOMBRE_PROVEEDOR].AsString; end; procedure TInfMargenArticuloDataTableRules.SetNOMBRE_PROVEEDORValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloNOMBRE_PROVEEDOR].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetCALLE_PROVEEDORValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloCALLE_PROVEEDOR].AsString; end; procedure TInfMargenArticuloDataTableRules.SetCALLE_PROVEEDORValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloCALLE_PROVEEDOR].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetPOBLACION_PROVEEDORValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloPOBLACION_PROVEEDOR].AsString; end; procedure TInfMargenArticuloDataTableRules.SetPOBLACION_PROVEEDORValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloPOBLACION_PROVEEDOR].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetPROVINCIA_PROVEEDORValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloPROVINCIA_PROVEEDOR].AsString; end; procedure TInfMargenArticuloDataTableRules.SetPROVINCIA_PROVEEDORValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloPROVINCIA_PROVEEDOR].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetNIF_CIF_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloNIF_CIF_CLIENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetNIF_CIF_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloNIF_CIF_CLIENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetNOMBRE_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloNOMBRE_CLIENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetNOMBRE_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloNOMBRE_CLIENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloNOMBRE_COMERCIAL_CLIENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloNOMBRE_COMERCIAL_CLIENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetCALLE_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloCALLE_CLIENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetCALLE_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloCALLE_CLIENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetPOBLACION_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloPOBLACION_CLIENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetPOBLACION_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloPOBLACION_CLIENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetPROVINCIA_CLIENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloPROVINCIA_CLIENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetPROVINCIA_CLIENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloPROVINCIA_CLIENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetNIF_CIF_AGENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloNIF_CIF_AGENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetNIF_CIF_AGENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloNIF_CIF_AGENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetNOMBRE_AGENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloNOMBRE_AGENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetNOMBRE_AGENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloNOMBRE_AGENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetCALLE_AGENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloCALLE_AGENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetCALLE_AGENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloCALLE_AGENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetPOBLACION_AGENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloPOBLACION_AGENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetPOBLACION_AGENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloPOBLACION_AGENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetPROVINCIA_AGENTEValue: String; begin result := DataTable.Fields[idx_InfMargenArticuloPROVINCIA_AGENTE].AsString; end; procedure TInfMargenArticuloDataTableRules.SetPROVINCIA_AGENTEValue(const aValue: String); begin DataTable.Fields[idx_InfMargenArticuloPROVINCIA_AGENTE].AsString := aValue; end; function TInfMargenArticuloDataTableRules.GetCOMISION_AGENTEValue: Float; begin result := DataTable.Fields[idx_InfMargenArticuloCOMISION_AGENTE].AsFloat; end; procedure TInfMargenArticuloDataTableRules.SetCOMISION_AGENTEValue(const aValue: Float); begin DataTable.Fields[idx_InfMargenArticuloCOMISION_AGENTE].AsFloat := aValue; end; function TInfMargenArticuloDataTableRules.GetIMPORTE_COMISION_AGENTEValue: Currency; begin result := DataTable.Fields[idx_InfMargenArticuloIMPORTE_COMISION_AGENTE].AsCurrency; end; procedure TInfMargenArticuloDataTableRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency); begin DataTable.Fields[idx_InfMargenArticuloIMPORTE_COMISION_AGENTE].AsCurrency := aValue; end; initialization RegisterDataTableRules(RID_InfMargenArticulo, TInfMargenArticuloDataTableRules); end.