git-svn-id: https://192.168.0.254/svn/Proyectos.Noviseda_FactuGES2/trunk@115 f33bb606-9f5c-448d-9c99-757f00063c96
3830 lines
165 KiB
ObjectPascal
3830 lines
165 KiB
ObjectPascal
unit schPedidosClienteClient_Intf;
|
|
|
|
{$D-}
|
|
interface
|
|
|
|
uses
|
|
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
|
|
|
|
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_PedidoCliente_Art_Colores_Pendientes = '{DAE6EDB6-AC3C-48FE-8267-9FCF8F893536}';
|
|
RID_ListaAnosPedidos = '{8A8427D3-3139-4A1B-9A96-1491FD942CD2}';
|
|
RID_ArticulosPendientes = '{EA7857E1-253B-4C47-9E62-0030C8D0CB2E}';
|
|
RID_PedidosCliente = '{8F6CACE9-0B0B-47F4-9315-DD71C9BDCA22}';
|
|
RID_PedidosCliente_Detalles = '{4C1BBFCE-BE3B-4F5F-9FF2-EE52A2A10063}';
|
|
RID_PedidoCliente_Articulos_Pendientes = '{30F8BA2A-2230-40DD-A760-36D1F7051BB8}';
|
|
RID_PedidosCliente_Detalle_Color = '{E4A714F8-E64E-41D9-A2DE-E880C4C95108}';
|
|
|
|
{ Data table names }
|
|
nme_PedidoCliente_Art_Colores_Pendientes = 'PedidoCliente_Art_Colores_Pendientes';
|
|
nme_ListaAnosPedidos = 'ListaAnosPedidos';
|
|
nme_ArticulosPendientes = 'ArticulosPendientes';
|
|
nme_PedidosCliente = 'PedidosCliente';
|
|
nme_PedidosCliente_Detalles = 'PedidosCliente_Detalles';
|
|
nme_PedidoCliente_Articulos_Pendientes = 'PedidoCliente_Articulos_Pendientes';
|
|
nme_PedidosCliente_Detalle_Color = 'PedidosCliente_Detalle_Color';
|
|
|
|
{ PedidoCliente_Art_Colores_Pendientes fields }
|
|
fld_PedidoCliente_Art_Colores_PendientesID_PEDIDO = 'ID_PEDIDO';
|
|
fld_PedidoCliente_Art_Colores_PendientesID_ARTICULO = 'ID_ARTICULO';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR1 = 'COLOR1';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR2 = 'COLOR2';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR3 = 'COLOR3';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR4 = 'COLOR4';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR5 = 'COLOR5';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR6 = 'COLOR6';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR7 = 'COLOR7';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR8 = 'COLOR8';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR9 = 'COLOR9';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR10 = 'COLOR10';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR11 = 'COLOR11';
|
|
fld_PedidoCliente_Art_Colores_PendientesCOLOR12 = 'COLOR12';
|
|
|
|
{ PedidoCliente_Art_Colores_Pendientes field indexes }
|
|
idx_PedidoCliente_Art_Colores_PendientesID_PEDIDO = 0;
|
|
idx_PedidoCliente_Art_Colores_PendientesID_ARTICULO = 1;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR1 = 2;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR2 = 3;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR3 = 4;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR4 = 5;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR5 = 6;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR6 = 7;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR7 = 8;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR8 = 9;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR9 = 10;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR10 = 11;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR11 = 12;
|
|
idx_PedidoCliente_Art_Colores_PendientesCOLOR12 = 13;
|
|
|
|
{ ListaAnosPedidos fields }
|
|
fld_ListaAnosPedidosANO = 'ANO';
|
|
|
|
{ ListaAnosPedidos field indexes }
|
|
idx_ListaAnosPedidosANO = 0;
|
|
|
|
{ ArticulosPendientes fields }
|
|
fld_ArticulosPendientesID_ARTICULO = 'ID_ARTICULO';
|
|
fld_ArticulosPendientesREFERENCIA = 'REFERENCIA';
|
|
fld_ArticulosPendientesDESCRIPCION = 'DESCRIPCION';
|
|
fld_ArticulosPendientesCOLOR1 = 'COLOR1';
|
|
fld_ArticulosPendientesCOLOR2 = 'COLOR2';
|
|
fld_ArticulosPendientesCOLOR3 = 'COLOR3';
|
|
fld_ArticulosPendientesCOLOR4 = 'COLOR4';
|
|
fld_ArticulosPendientesCOLOR5 = 'COLOR5';
|
|
fld_ArticulosPendientesCOLOR6 = 'COLOR6';
|
|
fld_ArticulosPendientesCOLOR7 = 'COLOR7';
|
|
fld_ArticulosPendientesCOLOR8 = 'COLOR8';
|
|
fld_ArticulosPendientesCOLOR9 = 'COLOR9';
|
|
fld_ArticulosPendientesCOLOR10 = 'COLOR10';
|
|
fld_ArticulosPendientesCOLOR11 = 'COLOR11';
|
|
fld_ArticulosPendientesCOLOR12 = 'COLOR12';
|
|
fld_ArticulosPendientesTOTAL = 'TOTAL';
|
|
|
|
{ ArticulosPendientes field indexes }
|
|
idx_ArticulosPendientesID_ARTICULO = 0;
|
|
idx_ArticulosPendientesREFERENCIA = 1;
|
|
idx_ArticulosPendientesDESCRIPCION = 2;
|
|
idx_ArticulosPendientesCOLOR1 = 3;
|
|
idx_ArticulosPendientesCOLOR2 = 4;
|
|
idx_ArticulosPendientesCOLOR3 = 5;
|
|
idx_ArticulosPendientesCOLOR4 = 6;
|
|
idx_ArticulosPendientesCOLOR5 = 7;
|
|
idx_ArticulosPendientesCOLOR6 = 8;
|
|
idx_ArticulosPendientesCOLOR7 = 9;
|
|
idx_ArticulosPendientesCOLOR8 = 10;
|
|
idx_ArticulosPendientesCOLOR9 = 11;
|
|
idx_ArticulosPendientesCOLOR10 = 12;
|
|
idx_ArticulosPendientesCOLOR11 = 13;
|
|
idx_ArticulosPendientesCOLOR12 = 14;
|
|
idx_ArticulosPendientesTOTAL = 15;
|
|
|
|
{ PedidosCliente fields }
|
|
fld_PedidosClienteID = 'ID';
|
|
fld_PedidosClienteID_EMPRESA = 'ID_EMPRESA';
|
|
fld_PedidosClienteID_CLIENTE = 'ID_CLIENTE';
|
|
fld_PedidosClienteNOMBRE = 'NOMBRE';
|
|
fld_PedidosClienteREFERENCIA = 'REFERENCIA';
|
|
fld_PedidosClienteREFERENCIA_CLIENTE = 'REFERENCIA_CLIENTE';
|
|
fld_PedidosClienteSITUACION = 'SITUACION';
|
|
fld_PedidosClienteFECHA_PEDIDO = 'FECHA_PEDIDO';
|
|
fld_PedidosClienteID_DIRECCION = 'ID_DIRECCION';
|
|
fld_PedidosClienteCALLE = 'CALLE';
|
|
fld_PedidosClienteCODIGO_POSTAL = 'CODIGO_POSTAL';
|
|
fld_PedidosClientePOBLACION = 'POBLACION';
|
|
fld_PedidosClientePROVINCIA = 'PROVINCIA';
|
|
fld_PedidosClientePERSONA_CONTACTO = 'PERSONA_CONTACTO';
|
|
fld_PedidosClienteTELEFONO = 'TELEFONO';
|
|
fld_PedidosClienteOBSERVACIONES = 'OBSERVACIONES';
|
|
fld_PedidosClienteINCIDENCIAS = 'INCIDENCIAS';
|
|
fld_PedidosClienteINCIDENCIAS_ACTIVAS = 'INCIDENCIAS_ACTIVAS';
|
|
fld_PedidosClienteFECHA_ALTA = 'FECHA_ALTA';
|
|
fld_PedidosClienteFECHA_MODIFICACION = 'FECHA_MODIFICACION';
|
|
fld_PedidosClienteUSUARIO = 'USUARIO';
|
|
fld_PedidosClienteIMPORTE_NETO = 'IMPORTE_NETO';
|
|
fld_PedidosClienteIMPORTE_PORTE = 'IMPORTE_PORTE';
|
|
fld_PedidosClienteDESCUENTO = 'DESCUENTO';
|
|
fld_PedidosClienteIMPORTE_DESCUENTO = 'IMPORTE_DESCUENTO';
|
|
fld_PedidosClienteDESCUENTO2 = 'DESCUENTO2';
|
|
fld_PedidosClienteIMPORTE_DESCUENTO2 = 'IMPORTE_DESCUENTO2';
|
|
fld_PedidosClienteBASE_IMPONIBLE = 'BASE_IMPONIBLE';
|
|
fld_PedidosClienteIVA = 'IVA';
|
|
fld_PedidosClienteIMPORTE_IVA = 'IMPORTE_IVA';
|
|
fld_PedidosClienteIMPORTE_TOTAL = 'IMPORTE_TOTAL';
|
|
fld_PedidosClienteID_FORMA_PAGO = 'ID_FORMA_PAGO';
|
|
fld_PedidosClienteFORMA_PAGO = 'FORMA_PAGO';
|
|
fld_PedidosClienteREF_TIENDA_WEB = 'REF_TIENDA_WEB';
|
|
fld_PedidosClienteFECHA_PREVISTA_ENVIO = 'FECHA_PREVISTA_ENVIO';
|
|
fld_PedidosClienteDATOS_BANCARIOS = 'DATOS_BANCARIOS';
|
|
|
|
{ PedidosCliente field indexes }
|
|
idx_PedidosClienteID = 0;
|
|
idx_PedidosClienteID_EMPRESA = 1;
|
|
idx_PedidosClienteID_CLIENTE = 2;
|
|
idx_PedidosClienteNOMBRE = 3;
|
|
idx_PedidosClienteREFERENCIA = 4;
|
|
idx_PedidosClienteREFERENCIA_CLIENTE = 5;
|
|
idx_PedidosClienteSITUACION = 6;
|
|
idx_PedidosClienteFECHA_PEDIDO = 7;
|
|
idx_PedidosClienteID_DIRECCION = 8;
|
|
idx_PedidosClienteCALLE = 9;
|
|
idx_PedidosClienteCODIGO_POSTAL = 10;
|
|
idx_PedidosClientePOBLACION = 11;
|
|
idx_PedidosClientePROVINCIA = 12;
|
|
idx_PedidosClientePERSONA_CONTACTO = 13;
|
|
idx_PedidosClienteTELEFONO = 14;
|
|
idx_PedidosClienteOBSERVACIONES = 15;
|
|
idx_PedidosClienteINCIDENCIAS = 16;
|
|
idx_PedidosClienteINCIDENCIAS_ACTIVAS = 17;
|
|
idx_PedidosClienteFECHA_ALTA = 18;
|
|
idx_PedidosClienteFECHA_MODIFICACION = 19;
|
|
idx_PedidosClienteUSUARIO = 20;
|
|
idx_PedidosClienteIMPORTE_NETO = 21;
|
|
idx_PedidosClienteIMPORTE_PORTE = 22;
|
|
idx_PedidosClienteDESCUENTO = 23;
|
|
idx_PedidosClienteIMPORTE_DESCUENTO = 24;
|
|
idx_PedidosClienteDESCUENTO2 = 25;
|
|
idx_PedidosClienteIMPORTE_DESCUENTO2 = 26;
|
|
idx_PedidosClienteBASE_IMPONIBLE = 27;
|
|
idx_PedidosClienteIVA = 28;
|
|
idx_PedidosClienteIMPORTE_IVA = 29;
|
|
idx_PedidosClienteIMPORTE_TOTAL = 30;
|
|
idx_PedidosClienteID_FORMA_PAGO = 31;
|
|
idx_PedidosClienteFORMA_PAGO = 32;
|
|
idx_PedidosClienteREF_TIENDA_WEB = 33;
|
|
idx_PedidosClienteFECHA_PREVISTA_ENVIO = 34;
|
|
idx_PedidosClienteDATOS_BANCARIOS = 35;
|
|
|
|
{ PedidosCliente_Detalles fields }
|
|
fld_PedidosCliente_DetallesID = 'ID';
|
|
fld_PedidosCliente_DetallesID_PEDIDO = 'ID_PEDIDO';
|
|
fld_PedidosCliente_DetallesPOSICION = 'POSICION';
|
|
fld_PedidosCliente_DetallesTIPO_DETALLE = 'TIPO_DETALLE';
|
|
fld_PedidosCliente_DetallesID_ARTICULO = 'ID_ARTICULO';
|
|
fld_PedidosCliente_DetallesREFERENCIA = 'REFERENCIA';
|
|
fld_PedidosCliente_DetallesREFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR';
|
|
fld_PedidosCliente_DetallesCONCEPTO = 'CONCEPTO';
|
|
fld_PedidosCliente_DetallesCANTIDAD = 'CANTIDAD';
|
|
fld_PedidosCliente_DetallesIMPORTE_UNIDAD = 'IMPORTE_UNIDAD';
|
|
fld_PedidosCliente_DetallesUNIDAD_MEDIDA = 'UNIDAD_MEDIDA';
|
|
fld_PedidosCliente_DetallesDESCUENTO = 'DESCUENTO';
|
|
fld_PedidosCliente_DetallesIMPORTE_PORTE = 'IMPORTE_PORTE';
|
|
fld_PedidosCliente_DetallesIMPORTE_TOTAL = 'IMPORTE_TOTAL';
|
|
fld_PedidosCliente_DetallesVISIBLE = 'VISIBLE';
|
|
|
|
{ PedidosCliente_Detalles field indexes }
|
|
idx_PedidosCliente_DetallesID = 0;
|
|
idx_PedidosCliente_DetallesID_PEDIDO = 1;
|
|
idx_PedidosCliente_DetallesPOSICION = 2;
|
|
idx_PedidosCliente_DetallesTIPO_DETALLE = 3;
|
|
idx_PedidosCliente_DetallesID_ARTICULO = 4;
|
|
idx_PedidosCliente_DetallesREFERENCIA = 5;
|
|
idx_PedidosCliente_DetallesREFERENCIA_PROVEEDOR = 6;
|
|
idx_PedidosCliente_DetallesCONCEPTO = 7;
|
|
idx_PedidosCliente_DetallesCANTIDAD = 8;
|
|
idx_PedidosCliente_DetallesIMPORTE_UNIDAD = 9;
|
|
idx_PedidosCliente_DetallesUNIDAD_MEDIDA = 10;
|
|
idx_PedidosCliente_DetallesDESCUENTO = 11;
|
|
idx_PedidosCliente_DetallesIMPORTE_PORTE = 12;
|
|
idx_PedidosCliente_DetallesIMPORTE_TOTAL = 13;
|
|
idx_PedidosCliente_DetallesVISIBLE = 14;
|
|
|
|
{ PedidoCliente_Articulos_Pendientes fields }
|
|
fld_PedidoCliente_Articulos_PendientesID_ARTICULO = 'ID_ARTICULO';
|
|
fld_PedidoCliente_Articulos_PendientesCANTIDAD_PED = 'CANTIDAD_PED';
|
|
fld_PedidoCliente_Articulos_PendientesCANTIDAD_ALB = 'CANTIDAD_ALB';
|
|
fld_PedidoCliente_Articulos_PendientesCANTIDAD_PENDIENTE = 'CANTIDAD_PENDIENTE';
|
|
|
|
{ PedidoCliente_Articulos_Pendientes field indexes }
|
|
idx_PedidoCliente_Articulos_PendientesID_ARTICULO = 0;
|
|
idx_PedidoCliente_Articulos_PendientesCANTIDAD_PED = 1;
|
|
idx_PedidoCliente_Articulos_PendientesCANTIDAD_ALB = 2;
|
|
idx_PedidoCliente_Articulos_PendientesCANTIDAD_PENDIENTE = 3;
|
|
|
|
{ PedidosCliente_Detalle_Color fields }
|
|
fld_PedidosCliente_Detalle_ColorID = 'ID';
|
|
fld_PedidosCliente_Detalle_ColorID_DETALLE = 'ID_DETALLE';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR1 = 'COLOR1';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR2 = 'COLOR2';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR3 = 'COLOR3';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR4 = 'COLOR4';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR5 = 'COLOR5';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR6 = 'COLOR6';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR7 = 'COLOR7';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR8 = 'COLOR8';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR9 = 'COLOR9';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR10 = 'COLOR10';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR11 = 'COLOR11';
|
|
fld_PedidosCliente_Detalle_ColorCOLOR12 = 'COLOR12';
|
|
|
|
{ PedidosCliente_Detalle_Color field indexes }
|
|
idx_PedidosCliente_Detalle_ColorID = 0;
|
|
idx_PedidosCliente_Detalle_ColorID_DETALLE = 1;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR1 = 2;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR2 = 3;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR3 = 4;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR4 = 5;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR5 = 6;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR6 = 7;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR7 = 8;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR8 = 9;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR9 = 10;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR10 = 11;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR11 = 12;
|
|
idx_PedidosCliente_Detalle_ColorCOLOR12 = 13;
|
|
|
|
type
|
|
{ IPedidoCliente_Art_Colores_Pendientes }
|
|
IPedidoCliente_Art_Colores_Pendientes = interface(IDAStronglyTypedDataTable)
|
|
['{1BFD3DF3-9112-44CF-AD7B-D6A81CC5157F}']
|
|
{ Property getters and setters }
|
|
function GetID_PEDIDOValue: Integer;
|
|
procedure SetID_PEDIDOValue(const aValue: Integer);
|
|
function GetID_PEDIDOIsNull: Boolean;
|
|
procedure SetID_PEDIDOIsNull(const aValue: Boolean);
|
|
function GetID_ARTICULOValue: Integer;
|
|
procedure SetID_ARTICULOValue(const aValue: Integer);
|
|
function GetID_ARTICULOIsNull: Boolean;
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
function GetCOLOR1Value: Int64;
|
|
procedure SetCOLOR1Value(const aValue: Int64);
|
|
function GetCOLOR1IsNull: Boolean;
|
|
procedure SetCOLOR1IsNull(const aValue: Boolean);
|
|
function GetCOLOR2Value: Int64;
|
|
procedure SetCOLOR2Value(const aValue: Int64);
|
|
function GetCOLOR2IsNull: Boolean;
|
|
procedure SetCOLOR2IsNull(const aValue: Boolean);
|
|
function GetCOLOR3Value: Int64;
|
|
procedure SetCOLOR3Value(const aValue: Int64);
|
|
function GetCOLOR3IsNull: Boolean;
|
|
procedure SetCOLOR3IsNull(const aValue: Boolean);
|
|
function GetCOLOR4Value: Int64;
|
|
procedure SetCOLOR4Value(const aValue: Int64);
|
|
function GetCOLOR4IsNull: Boolean;
|
|
procedure SetCOLOR4IsNull(const aValue: Boolean);
|
|
function GetCOLOR5Value: Int64;
|
|
procedure SetCOLOR5Value(const aValue: Int64);
|
|
function GetCOLOR5IsNull: Boolean;
|
|
procedure SetCOLOR5IsNull(const aValue: Boolean);
|
|
function GetCOLOR6Value: Int64;
|
|
procedure SetCOLOR6Value(const aValue: Int64);
|
|
function GetCOLOR6IsNull: Boolean;
|
|
procedure SetCOLOR6IsNull(const aValue: Boolean);
|
|
function GetCOLOR7Value: Int64;
|
|
procedure SetCOLOR7Value(const aValue: Int64);
|
|
function GetCOLOR7IsNull: Boolean;
|
|
procedure SetCOLOR7IsNull(const aValue: Boolean);
|
|
function GetCOLOR8Value: Int64;
|
|
procedure SetCOLOR8Value(const aValue: Int64);
|
|
function GetCOLOR8IsNull: Boolean;
|
|
procedure SetCOLOR8IsNull(const aValue: Boolean);
|
|
function GetCOLOR9Value: Int64;
|
|
procedure SetCOLOR9Value(const aValue: Int64);
|
|
function GetCOLOR9IsNull: Boolean;
|
|
procedure SetCOLOR9IsNull(const aValue: Boolean);
|
|
function GetCOLOR10Value: Int64;
|
|
procedure SetCOLOR10Value(const aValue: Int64);
|
|
function GetCOLOR10IsNull: Boolean;
|
|
procedure SetCOLOR10IsNull(const aValue: Boolean);
|
|
function GetCOLOR11Value: Int64;
|
|
procedure SetCOLOR11Value(const aValue: Int64);
|
|
function GetCOLOR11IsNull: Boolean;
|
|
procedure SetCOLOR11IsNull(const aValue: Boolean);
|
|
function GetCOLOR12Value: Int64;
|
|
procedure SetCOLOR12Value(const aValue: Int64);
|
|
function GetCOLOR12IsNull: Boolean;
|
|
procedure SetCOLOR12IsNull(const aValue: Boolean);
|
|
|
|
|
|
{ Properties }
|
|
property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
|
|
property ID_PEDIDOIsNull: Boolean read GetID_PEDIDOIsNull write SetID_PEDIDOIsNull;
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
|
property COLOR1: Int64 read GetCOLOR1Value write SetCOLOR1Value;
|
|
property COLOR1IsNull: Boolean read GetCOLOR1IsNull write SetCOLOR1IsNull;
|
|
property COLOR2: Int64 read GetCOLOR2Value write SetCOLOR2Value;
|
|
property COLOR2IsNull: Boolean read GetCOLOR2IsNull write SetCOLOR2IsNull;
|
|
property COLOR3: Int64 read GetCOLOR3Value write SetCOLOR3Value;
|
|
property COLOR3IsNull: Boolean read GetCOLOR3IsNull write SetCOLOR3IsNull;
|
|
property COLOR4: Int64 read GetCOLOR4Value write SetCOLOR4Value;
|
|
property COLOR4IsNull: Boolean read GetCOLOR4IsNull write SetCOLOR4IsNull;
|
|
property COLOR5: Int64 read GetCOLOR5Value write SetCOLOR5Value;
|
|
property COLOR5IsNull: Boolean read GetCOLOR5IsNull write SetCOLOR5IsNull;
|
|
property COLOR6: Int64 read GetCOLOR6Value write SetCOLOR6Value;
|
|
property COLOR6IsNull: Boolean read GetCOLOR6IsNull write SetCOLOR6IsNull;
|
|
property COLOR7: Int64 read GetCOLOR7Value write SetCOLOR7Value;
|
|
property COLOR7IsNull: Boolean read GetCOLOR7IsNull write SetCOLOR7IsNull;
|
|
property COLOR8: Int64 read GetCOLOR8Value write SetCOLOR8Value;
|
|
property COLOR8IsNull: Boolean read GetCOLOR8IsNull write SetCOLOR8IsNull;
|
|
property COLOR9: Int64 read GetCOLOR9Value write SetCOLOR9Value;
|
|
property COLOR9IsNull: Boolean read GetCOLOR9IsNull write SetCOLOR9IsNull;
|
|
property COLOR10: Int64 read GetCOLOR10Value write SetCOLOR10Value;
|
|
property COLOR10IsNull: Boolean read GetCOLOR10IsNull write SetCOLOR10IsNull;
|
|
property COLOR11: Int64 read GetCOLOR11Value write SetCOLOR11Value;
|
|
property COLOR11IsNull: Boolean read GetCOLOR11IsNull write SetCOLOR11IsNull;
|
|
property COLOR12: Int64 read GetCOLOR12Value write SetCOLOR12Value;
|
|
property COLOR12IsNull: Boolean read GetCOLOR12IsNull write SetCOLOR12IsNull;
|
|
end;
|
|
|
|
{ TPedidoCliente_Art_Colores_PendientesDataTableRules }
|
|
TPedidoCliente_Art_Colores_PendientesDataTableRules = class(TIntfObjectDADataTableRules, IPedidoCliente_Art_Colores_Pendientes)
|
|
private
|
|
protected
|
|
{ Property getters and setters }
|
|
function GetID_PEDIDOValue: Integer; virtual;
|
|
procedure SetID_PEDIDOValue(const aValue: Integer); virtual;
|
|
function GetID_PEDIDOIsNull: Boolean; virtual;
|
|
procedure SetID_PEDIDOIsNull(const aValue: Boolean); virtual;
|
|
function GetID_ARTICULOValue: Integer; virtual;
|
|
procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
|
|
function GetID_ARTICULOIsNull: Boolean; virtual;
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR1Value: Int64; virtual;
|
|
procedure SetCOLOR1Value(const aValue: Int64); virtual;
|
|
function GetCOLOR1IsNull: Boolean; virtual;
|
|
procedure SetCOLOR1IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR2Value: Int64; virtual;
|
|
procedure SetCOLOR2Value(const aValue: Int64); virtual;
|
|
function GetCOLOR2IsNull: Boolean; virtual;
|
|
procedure SetCOLOR2IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR3Value: Int64; virtual;
|
|
procedure SetCOLOR3Value(const aValue: Int64); virtual;
|
|
function GetCOLOR3IsNull: Boolean; virtual;
|
|
procedure SetCOLOR3IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR4Value: Int64; virtual;
|
|
procedure SetCOLOR4Value(const aValue: Int64); virtual;
|
|
function GetCOLOR4IsNull: Boolean; virtual;
|
|
procedure SetCOLOR4IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR5Value: Int64; virtual;
|
|
procedure SetCOLOR5Value(const aValue: Int64); virtual;
|
|
function GetCOLOR5IsNull: Boolean; virtual;
|
|
procedure SetCOLOR5IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR6Value: Int64; virtual;
|
|
procedure SetCOLOR6Value(const aValue: Int64); virtual;
|
|
function GetCOLOR6IsNull: Boolean; virtual;
|
|
procedure SetCOLOR6IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR7Value: Int64; virtual;
|
|
procedure SetCOLOR7Value(const aValue: Int64); virtual;
|
|
function GetCOLOR7IsNull: Boolean; virtual;
|
|
procedure SetCOLOR7IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR8Value: Int64; virtual;
|
|
procedure SetCOLOR8Value(const aValue: Int64); virtual;
|
|
function GetCOLOR8IsNull: Boolean; virtual;
|
|
procedure SetCOLOR8IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR9Value: Int64; virtual;
|
|
procedure SetCOLOR9Value(const aValue: Int64); virtual;
|
|
function GetCOLOR9IsNull: Boolean; virtual;
|
|
procedure SetCOLOR9IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR10Value: Int64; virtual;
|
|
procedure SetCOLOR10Value(const aValue: Int64); virtual;
|
|
function GetCOLOR10IsNull: Boolean; virtual;
|
|
procedure SetCOLOR10IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR11Value: Int64; virtual;
|
|
procedure SetCOLOR11Value(const aValue: Int64); virtual;
|
|
function GetCOLOR11IsNull: Boolean; virtual;
|
|
procedure SetCOLOR11IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR12Value: Int64; virtual;
|
|
procedure SetCOLOR12Value(const aValue: Int64); virtual;
|
|
function GetCOLOR12IsNull: Boolean; virtual;
|
|
procedure SetCOLOR12IsNull(const aValue: Boolean); virtual;
|
|
|
|
{ Properties }
|
|
property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
|
|
property ID_PEDIDOIsNull: Boolean read GetID_PEDIDOIsNull write SetID_PEDIDOIsNull;
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
|
property COLOR1: Int64 read GetCOLOR1Value write SetCOLOR1Value;
|
|
property COLOR1IsNull: Boolean read GetCOLOR1IsNull write SetCOLOR1IsNull;
|
|
property COLOR2: Int64 read GetCOLOR2Value write SetCOLOR2Value;
|
|
property COLOR2IsNull: Boolean read GetCOLOR2IsNull write SetCOLOR2IsNull;
|
|
property COLOR3: Int64 read GetCOLOR3Value write SetCOLOR3Value;
|
|
property COLOR3IsNull: Boolean read GetCOLOR3IsNull write SetCOLOR3IsNull;
|
|
property COLOR4: Int64 read GetCOLOR4Value write SetCOLOR4Value;
|
|
property COLOR4IsNull: Boolean read GetCOLOR4IsNull write SetCOLOR4IsNull;
|
|
property COLOR5: Int64 read GetCOLOR5Value write SetCOLOR5Value;
|
|
property COLOR5IsNull: Boolean read GetCOLOR5IsNull write SetCOLOR5IsNull;
|
|
property COLOR6: Int64 read GetCOLOR6Value write SetCOLOR6Value;
|
|
property COLOR6IsNull: Boolean read GetCOLOR6IsNull write SetCOLOR6IsNull;
|
|
property COLOR7: Int64 read GetCOLOR7Value write SetCOLOR7Value;
|
|
property COLOR7IsNull: Boolean read GetCOLOR7IsNull write SetCOLOR7IsNull;
|
|
property COLOR8: Int64 read GetCOLOR8Value write SetCOLOR8Value;
|
|
property COLOR8IsNull: Boolean read GetCOLOR8IsNull write SetCOLOR8IsNull;
|
|
property COLOR9: Int64 read GetCOLOR9Value write SetCOLOR9Value;
|
|
property COLOR9IsNull: Boolean read GetCOLOR9IsNull write SetCOLOR9IsNull;
|
|
property COLOR10: Int64 read GetCOLOR10Value write SetCOLOR10Value;
|
|
property COLOR10IsNull: Boolean read GetCOLOR10IsNull write SetCOLOR10IsNull;
|
|
property COLOR11: Int64 read GetCOLOR11Value write SetCOLOR11Value;
|
|
property COLOR11IsNull: Boolean read GetCOLOR11IsNull write SetCOLOR11IsNull;
|
|
property COLOR12: Int64 read GetCOLOR12Value write SetCOLOR12Value;
|
|
property COLOR12IsNull: Boolean read GetCOLOR12IsNull write SetCOLOR12IsNull;
|
|
|
|
public
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
destructor Destroy; override;
|
|
|
|
end;
|
|
|
|
{ IListaAnosPedidos }
|
|
IListaAnosPedidos = interface(IDAStronglyTypedDataTable)
|
|
['{A93D242C-7BE8-4BCE-9D51-C5BE9E75923B}']
|
|
{ Property getters and setters }
|
|
function GetANOValue: String;
|
|
procedure SetANOValue(const aValue: String);
|
|
function GetANOIsNull: Boolean;
|
|
procedure SetANOIsNull(const aValue: Boolean);
|
|
|
|
|
|
{ Properties }
|
|
property ANO: String read GetANOValue write SetANOValue;
|
|
property ANOIsNull: Boolean read GetANOIsNull write SetANOIsNull;
|
|
end;
|
|
|
|
{ TListaAnosPedidosDataTableRules }
|
|
TListaAnosPedidosDataTableRules = class(TIntfObjectDADataTableRules, IListaAnosPedidos)
|
|
private
|
|
protected
|
|
{ Property getters and setters }
|
|
function GetANOValue: String; virtual;
|
|
procedure SetANOValue(const aValue: String); virtual;
|
|
function GetANOIsNull: Boolean; virtual;
|
|
procedure SetANOIsNull(const aValue: Boolean); virtual;
|
|
|
|
{ Properties }
|
|
property ANO: String read GetANOValue write SetANOValue;
|
|
property ANOIsNull: Boolean read GetANOIsNull write SetANOIsNull;
|
|
|
|
public
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
destructor Destroy; override;
|
|
|
|
end;
|
|
|
|
{ IArticulosPendientes }
|
|
IArticulosPendientes = interface(IDAStronglyTypedDataTable)
|
|
['{764F380F-50B6-4FBC-8E75-531B3859322D}']
|
|
{ Property getters and setters }
|
|
function GetID_ARTICULOValue: Integer;
|
|
procedure SetID_ARTICULOValue(const aValue: Integer);
|
|
function GetID_ARTICULOIsNull: Boolean;
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
function GetREFERENCIAValue: String;
|
|
procedure SetREFERENCIAValue(const aValue: String);
|
|
function GetREFERENCIAIsNull: Boolean;
|
|
procedure SetREFERENCIAIsNull(const aValue: Boolean);
|
|
function GetDESCRIPCIONValue: String;
|
|
procedure SetDESCRIPCIONValue(const aValue: String);
|
|
function GetDESCRIPCIONIsNull: Boolean;
|
|
procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
|
|
function GetCOLOR1Value: Int64;
|
|
procedure SetCOLOR1Value(const aValue: Int64);
|
|
function GetCOLOR1IsNull: Boolean;
|
|
procedure SetCOLOR1IsNull(const aValue: Boolean);
|
|
function GetCOLOR2Value: Int64;
|
|
procedure SetCOLOR2Value(const aValue: Int64);
|
|
function GetCOLOR2IsNull: Boolean;
|
|
procedure SetCOLOR2IsNull(const aValue: Boolean);
|
|
function GetCOLOR3Value: Int64;
|
|
procedure SetCOLOR3Value(const aValue: Int64);
|
|
function GetCOLOR3IsNull: Boolean;
|
|
procedure SetCOLOR3IsNull(const aValue: Boolean);
|
|
function GetCOLOR4Value: Int64;
|
|
procedure SetCOLOR4Value(const aValue: Int64);
|
|
function GetCOLOR4IsNull: Boolean;
|
|
procedure SetCOLOR4IsNull(const aValue: Boolean);
|
|
function GetCOLOR5Value: Int64;
|
|
procedure SetCOLOR5Value(const aValue: Int64);
|
|
function GetCOLOR5IsNull: Boolean;
|
|
procedure SetCOLOR5IsNull(const aValue: Boolean);
|
|
function GetCOLOR6Value: Int64;
|
|
procedure SetCOLOR6Value(const aValue: Int64);
|
|
function GetCOLOR6IsNull: Boolean;
|
|
procedure SetCOLOR6IsNull(const aValue: Boolean);
|
|
function GetCOLOR7Value: Int64;
|
|
procedure SetCOLOR7Value(const aValue: Int64);
|
|
function GetCOLOR7IsNull: Boolean;
|
|
procedure SetCOLOR7IsNull(const aValue: Boolean);
|
|
function GetCOLOR8Value: Int64;
|
|
procedure SetCOLOR8Value(const aValue: Int64);
|
|
function GetCOLOR8IsNull: Boolean;
|
|
procedure SetCOLOR8IsNull(const aValue: Boolean);
|
|
function GetCOLOR9Value: Int64;
|
|
procedure SetCOLOR9Value(const aValue: Int64);
|
|
function GetCOLOR9IsNull: Boolean;
|
|
procedure SetCOLOR9IsNull(const aValue: Boolean);
|
|
function GetCOLOR10Value: Int64;
|
|
procedure SetCOLOR10Value(const aValue: Int64);
|
|
function GetCOLOR10IsNull: Boolean;
|
|
procedure SetCOLOR10IsNull(const aValue: Boolean);
|
|
function GetCOLOR11Value: Int64;
|
|
procedure SetCOLOR11Value(const aValue: Int64);
|
|
function GetCOLOR11IsNull: Boolean;
|
|
procedure SetCOLOR11IsNull(const aValue: Boolean);
|
|
function GetCOLOR12Value: Int64;
|
|
procedure SetCOLOR12Value(const aValue: Int64);
|
|
function GetCOLOR12IsNull: Boolean;
|
|
procedure SetCOLOR12IsNull(const aValue: Boolean);
|
|
function GetTOTALValue: Int64;
|
|
procedure SetTOTALValue(const aValue: Int64);
|
|
function GetTOTALIsNull: Boolean;
|
|
procedure SetTOTALIsNull(const aValue: Boolean);
|
|
|
|
|
|
{ Properties }
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
|
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
|
|
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
|
|
property COLOR1: Int64 read GetCOLOR1Value write SetCOLOR1Value;
|
|
property COLOR1IsNull: Boolean read GetCOLOR1IsNull write SetCOLOR1IsNull;
|
|
property COLOR2: Int64 read GetCOLOR2Value write SetCOLOR2Value;
|
|
property COLOR2IsNull: Boolean read GetCOLOR2IsNull write SetCOLOR2IsNull;
|
|
property COLOR3: Int64 read GetCOLOR3Value write SetCOLOR3Value;
|
|
property COLOR3IsNull: Boolean read GetCOLOR3IsNull write SetCOLOR3IsNull;
|
|
property COLOR4: Int64 read GetCOLOR4Value write SetCOLOR4Value;
|
|
property COLOR4IsNull: Boolean read GetCOLOR4IsNull write SetCOLOR4IsNull;
|
|
property COLOR5: Int64 read GetCOLOR5Value write SetCOLOR5Value;
|
|
property COLOR5IsNull: Boolean read GetCOLOR5IsNull write SetCOLOR5IsNull;
|
|
property COLOR6: Int64 read GetCOLOR6Value write SetCOLOR6Value;
|
|
property COLOR6IsNull: Boolean read GetCOLOR6IsNull write SetCOLOR6IsNull;
|
|
property COLOR7: Int64 read GetCOLOR7Value write SetCOLOR7Value;
|
|
property COLOR7IsNull: Boolean read GetCOLOR7IsNull write SetCOLOR7IsNull;
|
|
property COLOR8: Int64 read GetCOLOR8Value write SetCOLOR8Value;
|
|
property COLOR8IsNull: Boolean read GetCOLOR8IsNull write SetCOLOR8IsNull;
|
|
property COLOR9: Int64 read GetCOLOR9Value write SetCOLOR9Value;
|
|
property COLOR9IsNull: Boolean read GetCOLOR9IsNull write SetCOLOR9IsNull;
|
|
property COLOR10: Int64 read GetCOLOR10Value write SetCOLOR10Value;
|
|
property COLOR10IsNull: Boolean read GetCOLOR10IsNull write SetCOLOR10IsNull;
|
|
property COLOR11: Int64 read GetCOLOR11Value write SetCOLOR11Value;
|
|
property COLOR11IsNull: Boolean read GetCOLOR11IsNull write SetCOLOR11IsNull;
|
|
property COLOR12: Int64 read GetCOLOR12Value write SetCOLOR12Value;
|
|
property COLOR12IsNull: Boolean read GetCOLOR12IsNull write SetCOLOR12IsNull;
|
|
property TOTAL: Int64 read GetTOTALValue write SetTOTALValue;
|
|
property TOTALIsNull: Boolean read GetTOTALIsNull write SetTOTALIsNull;
|
|
end;
|
|
|
|
{ TArticulosPendientesDataTableRules }
|
|
TArticulosPendientesDataTableRules = class(TIntfObjectDADataTableRules, IArticulosPendientes)
|
|
private
|
|
protected
|
|
{ Property getters and setters }
|
|
function GetID_ARTICULOValue: Integer; virtual;
|
|
procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
|
|
function GetID_ARTICULOIsNull: Boolean; virtual;
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
|
|
function GetREFERENCIAValue: String; virtual;
|
|
procedure SetREFERENCIAValue(const aValue: String); virtual;
|
|
function GetREFERENCIAIsNull: Boolean; virtual;
|
|
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
|
|
function GetDESCRIPCIONValue: String; virtual;
|
|
procedure SetDESCRIPCIONValue(const aValue: String); virtual;
|
|
function GetDESCRIPCIONIsNull: Boolean; virtual;
|
|
procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR1Value: Int64; virtual;
|
|
procedure SetCOLOR1Value(const aValue: Int64); virtual;
|
|
function GetCOLOR1IsNull: Boolean; virtual;
|
|
procedure SetCOLOR1IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR2Value: Int64; virtual;
|
|
procedure SetCOLOR2Value(const aValue: Int64); virtual;
|
|
function GetCOLOR2IsNull: Boolean; virtual;
|
|
procedure SetCOLOR2IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR3Value: Int64; virtual;
|
|
procedure SetCOLOR3Value(const aValue: Int64); virtual;
|
|
function GetCOLOR3IsNull: Boolean; virtual;
|
|
procedure SetCOLOR3IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR4Value: Int64; virtual;
|
|
procedure SetCOLOR4Value(const aValue: Int64); virtual;
|
|
function GetCOLOR4IsNull: Boolean; virtual;
|
|
procedure SetCOLOR4IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR5Value: Int64; virtual;
|
|
procedure SetCOLOR5Value(const aValue: Int64); virtual;
|
|
function GetCOLOR5IsNull: Boolean; virtual;
|
|
procedure SetCOLOR5IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR6Value: Int64; virtual;
|
|
procedure SetCOLOR6Value(const aValue: Int64); virtual;
|
|
function GetCOLOR6IsNull: Boolean; virtual;
|
|
procedure SetCOLOR6IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR7Value: Int64; virtual;
|
|
procedure SetCOLOR7Value(const aValue: Int64); virtual;
|
|
function GetCOLOR7IsNull: Boolean; virtual;
|
|
procedure SetCOLOR7IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR8Value: Int64; virtual;
|
|
procedure SetCOLOR8Value(const aValue: Int64); virtual;
|
|
function GetCOLOR8IsNull: Boolean; virtual;
|
|
procedure SetCOLOR8IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR9Value: Int64; virtual;
|
|
procedure SetCOLOR9Value(const aValue: Int64); virtual;
|
|
function GetCOLOR9IsNull: Boolean; virtual;
|
|
procedure SetCOLOR9IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR10Value: Int64; virtual;
|
|
procedure SetCOLOR10Value(const aValue: Int64); virtual;
|
|
function GetCOLOR10IsNull: Boolean; virtual;
|
|
procedure SetCOLOR10IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR11Value: Int64; virtual;
|
|
procedure SetCOLOR11Value(const aValue: Int64); virtual;
|
|
function GetCOLOR11IsNull: Boolean; virtual;
|
|
procedure SetCOLOR11IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR12Value: Int64; virtual;
|
|
procedure SetCOLOR12Value(const aValue: Int64); virtual;
|
|
function GetCOLOR12IsNull: Boolean; virtual;
|
|
procedure SetCOLOR12IsNull(const aValue: Boolean); virtual;
|
|
function GetTOTALValue: Int64; virtual;
|
|
procedure SetTOTALValue(const aValue: Int64); virtual;
|
|
function GetTOTALIsNull: Boolean; virtual;
|
|
procedure SetTOTALIsNull(const aValue: Boolean); virtual;
|
|
|
|
{ Properties }
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
|
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
|
|
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
|
|
property COLOR1: Int64 read GetCOLOR1Value write SetCOLOR1Value;
|
|
property COLOR1IsNull: Boolean read GetCOLOR1IsNull write SetCOLOR1IsNull;
|
|
property COLOR2: Int64 read GetCOLOR2Value write SetCOLOR2Value;
|
|
property COLOR2IsNull: Boolean read GetCOLOR2IsNull write SetCOLOR2IsNull;
|
|
property COLOR3: Int64 read GetCOLOR3Value write SetCOLOR3Value;
|
|
property COLOR3IsNull: Boolean read GetCOLOR3IsNull write SetCOLOR3IsNull;
|
|
property COLOR4: Int64 read GetCOLOR4Value write SetCOLOR4Value;
|
|
property COLOR4IsNull: Boolean read GetCOLOR4IsNull write SetCOLOR4IsNull;
|
|
property COLOR5: Int64 read GetCOLOR5Value write SetCOLOR5Value;
|
|
property COLOR5IsNull: Boolean read GetCOLOR5IsNull write SetCOLOR5IsNull;
|
|
property COLOR6: Int64 read GetCOLOR6Value write SetCOLOR6Value;
|
|
property COLOR6IsNull: Boolean read GetCOLOR6IsNull write SetCOLOR6IsNull;
|
|
property COLOR7: Int64 read GetCOLOR7Value write SetCOLOR7Value;
|
|
property COLOR7IsNull: Boolean read GetCOLOR7IsNull write SetCOLOR7IsNull;
|
|
property COLOR8: Int64 read GetCOLOR8Value write SetCOLOR8Value;
|
|
property COLOR8IsNull: Boolean read GetCOLOR8IsNull write SetCOLOR8IsNull;
|
|
property COLOR9: Int64 read GetCOLOR9Value write SetCOLOR9Value;
|
|
property COLOR9IsNull: Boolean read GetCOLOR9IsNull write SetCOLOR9IsNull;
|
|
property COLOR10: Int64 read GetCOLOR10Value write SetCOLOR10Value;
|
|
property COLOR10IsNull: Boolean read GetCOLOR10IsNull write SetCOLOR10IsNull;
|
|
property COLOR11: Int64 read GetCOLOR11Value write SetCOLOR11Value;
|
|
property COLOR11IsNull: Boolean read GetCOLOR11IsNull write SetCOLOR11IsNull;
|
|
property COLOR12: Int64 read GetCOLOR12Value write SetCOLOR12Value;
|
|
property COLOR12IsNull: Boolean read GetCOLOR12IsNull write SetCOLOR12IsNull;
|
|
property TOTAL: Int64 read GetTOTALValue write SetTOTALValue;
|
|
property TOTALIsNull: Boolean read GetTOTALIsNull write SetTOTALIsNull;
|
|
|
|
public
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
destructor Destroy; override;
|
|
|
|
end;
|
|
|
|
{ IPedidosCliente }
|
|
IPedidosCliente = interface(IDAStronglyTypedDataTable)
|
|
['{AFC13DCE-C06B-43F6-8659-EF8F363AA406}']
|
|
{ Property getters and setters }
|
|
function GetIDValue: Integer;
|
|
procedure SetIDValue(const aValue: Integer);
|
|
function GetIDIsNull: Boolean;
|
|
procedure SetIDIsNull(const aValue: Boolean);
|
|
function GetID_EMPRESAValue: Integer;
|
|
procedure SetID_EMPRESAValue(const aValue: Integer);
|
|
function GetID_EMPRESAIsNull: Boolean;
|
|
procedure SetID_EMPRESAIsNull(const aValue: Boolean);
|
|
function GetID_CLIENTEValue: Integer;
|
|
procedure SetID_CLIENTEValue(const aValue: Integer);
|
|
function GetID_CLIENTEIsNull: Boolean;
|
|
procedure SetID_CLIENTEIsNull(const aValue: Boolean);
|
|
function GetNOMBREValue: String;
|
|
procedure SetNOMBREValue(const aValue: String);
|
|
function GetNOMBREIsNull: Boolean;
|
|
procedure SetNOMBREIsNull(const aValue: Boolean);
|
|
function GetREFERENCIAValue: String;
|
|
procedure SetREFERENCIAValue(const aValue: String);
|
|
function GetREFERENCIAIsNull: Boolean;
|
|
procedure SetREFERENCIAIsNull(const aValue: Boolean);
|
|
function GetREFERENCIA_CLIENTEValue: String;
|
|
procedure SetREFERENCIA_CLIENTEValue(const aValue: String);
|
|
function GetREFERENCIA_CLIENTEIsNull: Boolean;
|
|
procedure SetREFERENCIA_CLIENTEIsNull(const aValue: Boolean);
|
|
function GetSITUACIONValue: String;
|
|
procedure SetSITUACIONValue(const aValue: String);
|
|
function GetSITUACIONIsNull: Boolean;
|
|
procedure SetSITUACIONIsNull(const aValue: Boolean);
|
|
function GetFECHA_PEDIDOValue: DateTime;
|
|
procedure SetFECHA_PEDIDOValue(const aValue: DateTime);
|
|
function GetFECHA_PEDIDOIsNull: Boolean;
|
|
procedure SetFECHA_PEDIDOIsNull(const aValue: Boolean);
|
|
function GetID_DIRECCIONValue: Integer;
|
|
procedure SetID_DIRECCIONValue(const aValue: Integer);
|
|
function GetID_DIRECCIONIsNull: Boolean;
|
|
procedure SetID_DIRECCIONIsNull(const aValue: Boolean);
|
|
function GetCALLEValue: String;
|
|
procedure SetCALLEValue(const aValue: String);
|
|
function GetCALLEIsNull: Boolean;
|
|
procedure SetCALLEIsNull(const aValue: Boolean);
|
|
function GetCODIGO_POSTALValue: String;
|
|
procedure SetCODIGO_POSTALValue(const aValue: String);
|
|
function GetCODIGO_POSTALIsNull: Boolean;
|
|
procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
|
|
function GetPOBLACIONValue: String;
|
|
procedure SetPOBLACIONValue(const aValue: String);
|
|
function GetPOBLACIONIsNull: Boolean;
|
|
procedure SetPOBLACIONIsNull(const aValue: Boolean);
|
|
function GetPROVINCIAValue: String;
|
|
procedure SetPROVINCIAValue(const aValue: String);
|
|
function GetPROVINCIAIsNull: Boolean;
|
|
procedure SetPROVINCIAIsNull(const aValue: Boolean);
|
|
function GetPERSONA_CONTACTOValue: String;
|
|
procedure SetPERSONA_CONTACTOValue(const aValue: String);
|
|
function GetPERSONA_CONTACTOIsNull: Boolean;
|
|
procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
|
|
function GetTELEFONOValue: String;
|
|
procedure SetTELEFONOValue(const aValue: String);
|
|
function GetTELEFONOIsNull: Boolean;
|
|
procedure SetTELEFONOIsNull(const aValue: Boolean);
|
|
function GetOBSERVACIONESValue: IROStrings;
|
|
function GetOBSERVACIONESIsNull: Boolean;
|
|
procedure SetOBSERVACIONESIsNull(const aValue: Boolean);
|
|
function GetINCIDENCIASValue: IROStrings;
|
|
function GetINCIDENCIASIsNull: Boolean;
|
|
procedure SetINCIDENCIASIsNull(const aValue: Boolean);
|
|
function GetINCIDENCIAS_ACTIVASValue: Integer;
|
|
procedure SetINCIDENCIAS_ACTIVASValue(const aValue: Integer);
|
|
function GetINCIDENCIAS_ACTIVASIsNull: Boolean;
|
|
procedure SetINCIDENCIAS_ACTIVASIsNull(const aValue: Boolean);
|
|
function GetFECHA_ALTAValue: DateTime;
|
|
procedure SetFECHA_ALTAValue(const aValue: DateTime);
|
|
function GetFECHA_ALTAIsNull: Boolean;
|
|
procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
|
|
function GetFECHA_MODIFICACIONValue: DateTime;
|
|
procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
|
|
function GetFECHA_MODIFICACIONIsNull: Boolean;
|
|
procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
|
|
function GetUSUARIOValue: String;
|
|
procedure SetUSUARIOValue(const aValue: String);
|
|
function GetUSUARIOIsNull: Boolean;
|
|
procedure SetUSUARIOIsNull(const aValue: Boolean);
|
|
function GetIMPORTE_NETOValue: Currency;
|
|
procedure SetIMPORTE_NETOValue(const aValue: Currency);
|
|
function GetIMPORTE_NETOIsNull: Boolean;
|
|
procedure SetIMPORTE_NETOIsNull(const aValue: Boolean);
|
|
function GetIMPORTE_PORTEValue: Currency;
|
|
procedure SetIMPORTE_PORTEValue(const aValue: Currency);
|
|
function GetIMPORTE_PORTEIsNull: Boolean;
|
|
procedure SetIMPORTE_PORTEIsNull(const aValue: Boolean);
|
|
function GetDESCUENTOValue: Float;
|
|
procedure SetDESCUENTOValue(const aValue: Float);
|
|
function GetDESCUENTOIsNull: Boolean;
|
|
procedure SetDESCUENTOIsNull(const aValue: Boolean);
|
|
function GetIMPORTE_DESCUENTOValue: Currency;
|
|
procedure SetIMPORTE_DESCUENTOValue(const aValue: Currency);
|
|
function GetIMPORTE_DESCUENTOIsNull: Boolean;
|
|
procedure SetIMPORTE_DESCUENTOIsNull(const aValue: Boolean);
|
|
function GetDESCUENTO2Value: Float;
|
|
procedure SetDESCUENTO2Value(const aValue: Float);
|
|
function GetDESCUENTO2IsNull: Boolean;
|
|
procedure SetDESCUENTO2IsNull(const aValue: Boolean);
|
|
function GetIMPORTE_DESCUENTO2Value: Currency;
|
|
procedure SetIMPORTE_DESCUENTO2Value(const aValue: Currency);
|
|
function GetIMPORTE_DESCUENTO2IsNull: Boolean;
|
|
procedure SetIMPORTE_DESCUENTO2IsNull(const aValue: Boolean);
|
|
function GetBASE_IMPONIBLEValue: Currency;
|
|
procedure SetBASE_IMPONIBLEValue(const aValue: Currency);
|
|
function GetBASE_IMPONIBLEIsNull: Boolean;
|
|
procedure SetBASE_IMPONIBLEIsNull(const aValue: Boolean);
|
|
function GetIVAValue: Float;
|
|
procedure SetIVAValue(const aValue: Float);
|
|
function GetIVAIsNull: Boolean;
|
|
procedure SetIVAIsNull(const aValue: Boolean);
|
|
function GetIMPORTE_IVAValue: Currency;
|
|
procedure SetIMPORTE_IVAValue(const aValue: Currency);
|
|
function GetIMPORTE_IVAIsNull: Boolean;
|
|
procedure SetIMPORTE_IVAIsNull(const aValue: Boolean);
|
|
function GetIMPORTE_TOTALValue: Currency;
|
|
procedure SetIMPORTE_TOTALValue(const aValue: Currency);
|
|
function GetIMPORTE_TOTALIsNull: Boolean;
|
|
procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean);
|
|
function GetID_FORMA_PAGOValue: Integer;
|
|
procedure SetID_FORMA_PAGOValue(const aValue: Integer);
|
|
function GetID_FORMA_PAGOIsNull: Boolean;
|
|
procedure SetID_FORMA_PAGOIsNull(const aValue: Boolean);
|
|
function GetFORMA_PAGOValue: String;
|
|
procedure SetFORMA_PAGOValue(const aValue: String);
|
|
function GetFORMA_PAGOIsNull: Boolean;
|
|
procedure SetFORMA_PAGOIsNull(const aValue: Boolean);
|
|
function GetREF_TIENDA_WEBValue: Integer;
|
|
procedure SetREF_TIENDA_WEBValue(const aValue: Integer);
|
|
function GetREF_TIENDA_WEBIsNull: Boolean;
|
|
procedure SetREF_TIENDA_WEBIsNull(const aValue: Boolean);
|
|
function GetFECHA_PREVISTA_ENVIOValue: DateTime;
|
|
procedure SetFECHA_PREVISTA_ENVIOValue(const aValue: DateTime);
|
|
function GetFECHA_PREVISTA_ENVIOIsNull: Boolean;
|
|
procedure SetFECHA_PREVISTA_ENVIOIsNull(const aValue: Boolean);
|
|
function GetDATOS_BANCARIOSValue: String;
|
|
procedure SetDATOS_BANCARIOSValue(const aValue: String);
|
|
function GetDATOS_BANCARIOSIsNull: Boolean;
|
|
procedure SetDATOS_BANCARIOSIsNull(const aValue: Boolean);
|
|
|
|
|
|
{ Properties }
|
|
property ID: Integer read GetIDValue write SetIDValue;
|
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
|
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
|
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
|
property ID_CLIENTE: Integer read GetID_CLIENTEValue write SetID_CLIENTEValue;
|
|
property ID_CLIENTEIsNull: Boolean read GetID_CLIENTEIsNull write SetID_CLIENTEIsNull;
|
|
property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
|
|
property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
|
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
|
property REFERENCIA_CLIENTE: String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
|
|
property REFERENCIA_CLIENTEIsNull: Boolean read GetREFERENCIA_CLIENTEIsNull write SetREFERENCIA_CLIENTEIsNull;
|
|
property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
|
|
property SITUACIONIsNull: Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
|
|
property FECHA_PEDIDO: DateTime read GetFECHA_PEDIDOValue write SetFECHA_PEDIDOValue;
|
|
property FECHA_PEDIDOIsNull: Boolean read GetFECHA_PEDIDOIsNull write SetFECHA_PEDIDOIsNull;
|
|
property ID_DIRECCION: Integer read GetID_DIRECCIONValue write SetID_DIRECCIONValue;
|
|
property ID_DIRECCIONIsNull: Boolean read GetID_DIRECCIONIsNull write SetID_DIRECCIONIsNull;
|
|
property CALLE: String read GetCALLEValue write SetCALLEValue;
|
|
property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
|
|
property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
|
|
property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
|
|
property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
|
|
property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
|
|
property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
|
|
property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
|
|
property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
|
|
property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
|
|
property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
|
|
property TELEFONOIsNull: Boolean read GetTELEFONOIsNull write SetTELEFONOIsNull;
|
|
property OBSERVACIONES: IROStrings read GetOBSERVACIONESValue;
|
|
property OBSERVACIONESIsNull: Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull;
|
|
property INCIDENCIAS: IROStrings read GetINCIDENCIASValue;
|
|
property INCIDENCIASIsNull: Boolean read GetINCIDENCIASIsNull write SetINCIDENCIASIsNull;
|
|
property INCIDENCIAS_ACTIVAS: Integer read GetINCIDENCIAS_ACTIVASValue write SetINCIDENCIAS_ACTIVASValue;
|
|
property INCIDENCIAS_ACTIVASIsNull: Boolean read GetINCIDENCIAS_ACTIVASIsNull write SetINCIDENCIAS_ACTIVASIsNull;
|
|
property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
|
|
property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
|
|
property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
|
|
property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
|
|
property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
|
|
property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
|
|
property IMPORTE_NETO: Currency read GetIMPORTE_NETOValue write SetIMPORTE_NETOValue;
|
|
property IMPORTE_NETOIsNull: Boolean read GetIMPORTE_NETOIsNull write SetIMPORTE_NETOIsNull;
|
|
property IMPORTE_PORTE: Currency read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
|
|
property IMPORTE_PORTEIsNull: Boolean read GetIMPORTE_PORTEIsNull write SetIMPORTE_PORTEIsNull;
|
|
property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
|
|
property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
|
|
property IMPORTE_DESCUENTO: Currency read GetIMPORTE_DESCUENTOValue write SetIMPORTE_DESCUENTOValue;
|
|
property IMPORTE_DESCUENTOIsNull: Boolean read GetIMPORTE_DESCUENTOIsNull write SetIMPORTE_DESCUENTOIsNull;
|
|
property DESCUENTO2: Float read GetDESCUENTO2Value write SetDESCUENTO2Value;
|
|
property DESCUENTO2IsNull: Boolean read GetDESCUENTO2IsNull write SetDESCUENTO2IsNull;
|
|
property IMPORTE_DESCUENTO2: Currency read GetIMPORTE_DESCUENTO2Value write SetIMPORTE_DESCUENTO2Value;
|
|
property IMPORTE_DESCUENTO2IsNull: Boolean read GetIMPORTE_DESCUENTO2IsNull write SetIMPORTE_DESCUENTO2IsNull;
|
|
property BASE_IMPONIBLE: Currency read GetBASE_IMPONIBLEValue write SetBASE_IMPONIBLEValue;
|
|
property BASE_IMPONIBLEIsNull: Boolean read GetBASE_IMPONIBLEIsNull write SetBASE_IMPONIBLEIsNull;
|
|
property IVA: Float read GetIVAValue write SetIVAValue;
|
|
property IVAIsNull: Boolean read GetIVAIsNull write SetIVAIsNull;
|
|
property IMPORTE_IVA: Currency read GetIMPORTE_IVAValue write SetIMPORTE_IVAValue;
|
|
property IMPORTE_IVAIsNull: Boolean read GetIMPORTE_IVAIsNull write SetIMPORTE_IVAIsNull;
|
|
property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
|
|
property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
|
|
property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;
|
|
property ID_FORMA_PAGOIsNull: Boolean read GetID_FORMA_PAGOIsNull write SetID_FORMA_PAGOIsNull;
|
|
property FORMA_PAGO: String read GetFORMA_PAGOValue write SetFORMA_PAGOValue;
|
|
property FORMA_PAGOIsNull: Boolean read GetFORMA_PAGOIsNull write SetFORMA_PAGOIsNull;
|
|
property REF_TIENDA_WEB: Integer read GetREF_TIENDA_WEBValue write SetREF_TIENDA_WEBValue;
|
|
property REF_TIENDA_WEBIsNull: Boolean read GetREF_TIENDA_WEBIsNull write SetREF_TIENDA_WEBIsNull;
|
|
property FECHA_PREVISTA_ENVIO: DateTime read GetFECHA_PREVISTA_ENVIOValue write SetFECHA_PREVISTA_ENVIOValue;
|
|
property FECHA_PREVISTA_ENVIOIsNull: Boolean read GetFECHA_PREVISTA_ENVIOIsNull write SetFECHA_PREVISTA_ENVIOIsNull;
|
|
property DATOS_BANCARIOS: String read GetDATOS_BANCARIOSValue write SetDATOS_BANCARIOSValue;
|
|
property DATOS_BANCARIOSIsNull: Boolean read GetDATOS_BANCARIOSIsNull write SetDATOS_BANCARIOSIsNull;
|
|
end;
|
|
|
|
{ TPedidosClienteDataTableRules }
|
|
TPedidosClienteDataTableRules = class(TIntfObjectDADataTableRules, IPedidosCliente)
|
|
private
|
|
f_OBSERVACIONES: IROStrings;
|
|
f_INCIDENCIAS: IROStrings;
|
|
procedure OBSERVACIONES_OnChange(Sender: TObject);
|
|
procedure INCIDENCIAS_OnChange(Sender: TObject);
|
|
protected
|
|
{ Property getters and setters }
|
|
function GetIDValue: Integer; virtual;
|
|
procedure SetIDValue(const aValue: Integer); virtual;
|
|
function GetIDIsNull: Boolean; virtual;
|
|
procedure SetIDIsNull(const aValue: Boolean); virtual;
|
|
function GetID_EMPRESAValue: Integer; virtual;
|
|
procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
|
|
function GetID_EMPRESAIsNull: Boolean; virtual;
|
|
procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
|
|
function GetID_CLIENTEValue: Integer; virtual;
|
|
procedure SetID_CLIENTEValue(const aValue: Integer); virtual;
|
|
function GetID_CLIENTEIsNull: Boolean; virtual;
|
|
procedure SetID_CLIENTEIsNull(const aValue: Boolean); virtual;
|
|
function GetNOMBREValue: String; virtual;
|
|
procedure SetNOMBREValue(const aValue: String); virtual;
|
|
function GetNOMBREIsNull: Boolean; virtual;
|
|
procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
|
|
function GetREFERENCIAValue: String; virtual;
|
|
procedure SetREFERENCIAValue(const aValue: String); virtual;
|
|
function GetREFERENCIAIsNull: Boolean; virtual;
|
|
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
|
|
function GetREFERENCIA_CLIENTEValue: String; virtual;
|
|
procedure SetREFERENCIA_CLIENTEValue(const aValue: String); virtual;
|
|
function GetREFERENCIA_CLIENTEIsNull: Boolean; virtual;
|
|
procedure SetREFERENCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
|
|
function GetSITUACIONValue: String; virtual;
|
|
procedure SetSITUACIONValue(const aValue: String); virtual;
|
|
function GetSITUACIONIsNull: Boolean; virtual;
|
|
procedure SetSITUACIONIsNull(const aValue: Boolean); virtual;
|
|
function GetFECHA_PEDIDOValue: DateTime; virtual;
|
|
procedure SetFECHA_PEDIDOValue(const aValue: DateTime); virtual;
|
|
function GetFECHA_PEDIDOIsNull: Boolean; virtual;
|
|
procedure SetFECHA_PEDIDOIsNull(const aValue: Boolean); virtual;
|
|
function GetID_DIRECCIONValue: Integer; virtual;
|
|
procedure SetID_DIRECCIONValue(const aValue: Integer); virtual;
|
|
function GetID_DIRECCIONIsNull: Boolean; virtual;
|
|
procedure SetID_DIRECCIONIsNull(const aValue: Boolean); virtual;
|
|
function GetCALLEValue: String; virtual;
|
|
procedure SetCALLEValue(const aValue: String); virtual;
|
|
function GetCALLEIsNull: Boolean; virtual;
|
|
procedure SetCALLEIsNull(const aValue: Boolean); virtual;
|
|
function GetCODIGO_POSTALValue: String; virtual;
|
|
procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
|
|
function GetCODIGO_POSTALIsNull: Boolean; virtual;
|
|
procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
|
|
function GetPOBLACIONValue: String; virtual;
|
|
procedure SetPOBLACIONValue(const aValue: String); virtual;
|
|
function GetPOBLACIONIsNull: Boolean; virtual;
|
|
procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
|
|
function GetPROVINCIAValue: String; virtual;
|
|
procedure SetPROVINCIAValue(const aValue: String); virtual;
|
|
function GetPROVINCIAIsNull: Boolean; virtual;
|
|
procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
|
|
function GetPERSONA_CONTACTOValue: String; virtual;
|
|
procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
|
|
function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
|
|
procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
|
|
function GetTELEFONOValue: String; virtual;
|
|
procedure SetTELEFONOValue(const aValue: String); virtual;
|
|
function GetTELEFONOIsNull: Boolean; virtual;
|
|
procedure SetTELEFONOIsNull(const aValue: Boolean); virtual;
|
|
function GetOBSERVACIONESValue: IROStrings; virtual;
|
|
function GetOBSERVACIONESIsNull: Boolean; virtual;
|
|
procedure SetOBSERVACIONESIsNull(const aValue: Boolean); virtual;
|
|
function GetINCIDENCIASValue: IROStrings; virtual;
|
|
function GetINCIDENCIASIsNull: Boolean; virtual;
|
|
procedure SetINCIDENCIASIsNull(const aValue: Boolean); virtual;
|
|
function GetINCIDENCIAS_ACTIVASValue: Integer; virtual;
|
|
procedure SetINCIDENCIAS_ACTIVASValue(const aValue: Integer); virtual;
|
|
function GetINCIDENCIAS_ACTIVASIsNull: Boolean; virtual;
|
|
procedure SetINCIDENCIAS_ACTIVASIsNull(const aValue: Boolean); virtual;
|
|
function GetFECHA_ALTAValue: DateTime; virtual;
|
|
procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
|
|
function GetFECHA_ALTAIsNull: Boolean; virtual;
|
|
procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
|
|
function GetFECHA_MODIFICACIONValue: DateTime; virtual;
|
|
procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
|
|
function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
|
|
procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
|
|
function GetUSUARIOValue: String; virtual;
|
|
procedure SetUSUARIOValue(const aValue: String); virtual;
|
|
function GetUSUARIOIsNull: Boolean; virtual;
|
|
procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_NETOValue: Currency; virtual;
|
|
procedure SetIMPORTE_NETOValue(const aValue: Currency); virtual;
|
|
function GetIMPORTE_NETOIsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_NETOIsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_PORTEValue: Currency; virtual;
|
|
procedure SetIMPORTE_PORTEValue(const aValue: Currency); virtual;
|
|
function GetIMPORTE_PORTEIsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_PORTEIsNull(const aValue: Boolean); virtual;
|
|
function GetDESCUENTOValue: Float; virtual;
|
|
procedure SetDESCUENTOValue(const aValue: Float); virtual;
|
|
function GetDESCUENTOIsNull: Boolean; virtual;
|
|
procedure SetDESCUENTOIsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_DESCUENTOValue: Currency; virtual;
|
|
procedure SetIMPORTE_DESCUENTOValue(const aValue: Currency); virtual;
|
|
function GetIMPORTE_DESCUENTOIsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_DESCUENTOIsNull(const aValue: Boolean); virtual;
|
|
function GetDESCUENTO2Value: Float; virtual;
|
|
procedure SetDESCUENTO2Value(const aValue: Float); virtual;
|
|
function GetDESCUENTO2IsNull: Boolean; virtual;
|
|
procedure SetDESCUENTO2IsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_DESCUENTO2Value: Currency; virtual;
|
|
procedure SetIMPORTE_DESCUENTO2Value(const aValue: Currency); virtual;
|
|
function GetIMPORTE_DESCUENTO2IsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_DESCUENTO2IsNull(const aValue: Boolean); virtual;
|
|
function GetBASE_IMPONIBLEValue: Currency; virtual;
|
|
procedure SetBASE_IMPONIBLEValue(const aValue: Currency); virtual;
|
|
function GetBASE_IMPONIBLEIsNull: Boolean; virtual;
|
|
procedure SetBASE_IMPONIBLEIsNull(const aValue: Boolean); virtual;
|
|
function GetIVAValue: Float; virtual;
|
|
procedure SetIVAValue(const aValue: Float); virtual;
|
|
function GetIVAIsNull: Boolean; virtual;
|
|
procedure SetIVAIsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_IVAValue: Currency; virtual;
|
|
procedure SetIMPORTE_IVAValue(const aValue: Currency); virtual;
|
|
function GetIMPORTE_IVAIsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_IVAIsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_TOTALValue: Currency; virtual;
|
|
procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
|
|
function GetIMPORTE_TOTALIsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean); virtual;
|
|
function GetID_FORMA_PAGOValue: Integer; virtual;
|
|
procedure SetID_FORMA_PAGOValue(const aValue: Integer); virtual;
|
|
function GetID_FORMA_PAGOIsNull: Boolean; virtual;
|
|
procedure SetID_FORMA_PAGOIsNull(const aValue: Boolean); virtual;
|
|
function GetFORMA_PAGOValue: String; virtual;
|
|
procedure SetFORMA_PAGOValue(const aValue: String); virtual;
|
|
function GetFORMA_PAGOIsNull: Boolean; virtual;
|
|
procedure SetFORMA_PAGOIsNull(const aValue: Boolean); virtual;
|
|
function GetREF_TIENDA_WEBValue: Integer; virtual;
|
|
procedure SetREF_TIENDA_WEBValue(const aValue: Integer); virtual;
|
|
function GetREF_TIENDA_WEBIsNull: Boolean; virtual;
|
|
procedure SetREF_TIENDA_WEBIsNull(const aValue: Boolean); virtual;
|
|
function GetFECHA_PREVISTA_ENVIOValue: DateTime; virtual;
|
|
procedure SetFECHA_PREVISTA_ENVIOValue(const aValue: DateTime); virtual;
|
|
function GetFECHA_PREVISTA_ENVIOIsNull: Boolean; virtual;
|
|
procedure SetFECHA_PREVISTA_ENVIOIsNull(const aValue: Boolean); virtual;
|
|
function GetDATOS_BANCARIOSValue: String; virtual;
|
|
procedure SetDATOS_BANCARIOSValue(const aValue: String); virtual;
|
|
function GetDATOS_BANCARIOSIsNull: Boolean; virtual;
|
|
procedure SetDATOS_BANCARIOSIsNull(const aValue: Boolean); virtual;
|
|
|
|
{ Properties }
|
|
property ID: Integer read GetIDValue write SetIDValue;
|
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
|
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
|
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
|
property ID_CLIENTE: Integer read GetID_CLIENTEValue write SetID_CLIENTEValue;
|
|
property ID_CLIENTEIsNull: Boolean read GetID_CLIENTEIsNull write SetID_CLIENTEIsNull;
|
|
property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
|
|
property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
|
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
|
property REFERENCIA_CLIENTE: String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
|
|
property REFERENCIA_CLIENTEIsNull: Boolean read GetREFERENCIA_CLIENTEIsNull write SetREFERENCIA_CLIENTEIsNull;
|
|
property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
|
|
property SITUACIONIsNull: Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
|
|
property FECHA_PEDIDO: DateTime read GetFECHA_PEDIDOValue write SetFECHA_PEDIDOValue;
|
|
property FECHA_PEDIDOIsNull: Boolean read GetFECHA_PEDIDOIsNull write SetFECHA_PEDIDOIsNull;
|
|
property ID_DIRECCION: Integer read GetID_DIRECCIONValue write SetID_DIRECCIONValue;
|
|
property ID_DIRECCIONIsNull: Boolean read GetID_DIRECCIONIsNull write SetID_DIRECCIONIsNull;
|
|
property CALLE: String read GetCALLEValue write SetCALLEValue;
|
|
property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
|
|
property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
|
|
property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
|
|
property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
|
|
property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
|
|
property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
|
|
property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
|
|
property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
|
|
property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
|
|
property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
|
|
property TELEFONOIsNull: Boolean read GetTELEFONOIsNull write SetTELEFONOIsNull;
|
|
property OBSERVACIONES: IROStrings read GetOBSERVACIONESValue;
|
|
property OBSERVACIONESIsNull: Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull;
|
|
property INCIDENCIAS: IROStrings read GetINCIDENCIASValue;
|
|
property INCIDENCIASIsNull: Boolean read GetINCIDENCIASIsNull write SetINCIDENCIASIsNull;
|
|
property INCIDENCIAS_ACTIVAS: Integer read GetINCIDENCIAS_ACTIVASValue write SetINCIDENCIAS_ACTIVASValue;
|
|
property INCIDENCIAS_ACTIVASIsNull: Boolean read GetINCIDENCIAS_ACTIVASIsNull write SetINCIDENCIAS_ACTIVASIsNull;
|
|
property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
|
|
property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
|
|
property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
|
|
property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
|
|
property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
|
|
property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
|
|
property IMPORTE_NETO: Currency read GetIMPORTE_NETOValue write SetIMPORTE_NETOValue;
|
|
property IMPORTE_NETOIsNull: Boolean read GetIMPORTE_NETOIsNull write SetIMPORTE_NETOIsNull;
|
|
property IMPORTE_PORTE: Currency read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
|
|
property IMPORTE_PORTEIsNull: Boolean read GetIMPORTE_PORTEIsNull write SetIMPORTE_PORTEIsNull;
|
|
property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
|
|
property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
|
|
property IMPORTE_DESCUENTO: Currency read GetIMPORTE_DESCUENTOValue write SetIMPORTE_DESCUENTOValue;
|
|
property IMPORTE_DESCUENTOIsNull: Boolean read GetIMPORTE_DESCUENTOIsNull write SetIMPORTE_DESCUENTOIsNull;
|
|
property DESCUENTO2: Float read GetDESCUENTO2Value write SetDESCUENTO2Value;
|
|
property DESCUENTO2IsNull: Boolean read GetDESCUENTO2IsNull write SetDESCUENTO2IsNull;
|
|
property IMPORTE_DESCUENTO2: Currency read GetIMPORTE_DESCUENTO2Value write SetIMPORTE_DESCUENTO2Value;
|
|
property IMPORTE_DESCUENTO2IsNull: Boolean read GetIMPORTE_DESCUENTO2IsNull write SetIMPORTE_DESCUENTO2IsNull;
|
|
property BASE_IMPONIBLE: Currency read GetBASE_IMPONIBLEValue write SetBASE_IMPONIBLEValue;
|
|
property BASE_IMPONIBLEIsNull: Boolean read GetBASE_IMPONIBLEIsNull write SetBASE_IMPONIBLEIsNull;
|
|
property IVA: Float read GetIVAValue write SetIVAValue;
|
|
property IVAIsNull: Boolean read GetIVAIsNull write SetIVAIsNull;
|
|
property IMPORTE_IVA: Currency read GetIMPORTE_IVAValue write SetIMPORTE_IVAValue;
|
|
property IMPORTE_IVAIsNull: Boolean read GetIMPORTE_IVAIsNull write SetIMPORTE_IVAIsNull;
|
|
property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
|
|
property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
|
|
property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;
|
|
property ID_FORMA_PAGOIsNull: Boolean read GetID_FORMA_PAGOIsNull write SetID_FORMA_PAGOIsNull;
|
|
property FORMA_PAGO: String read GetFORMA_PAGOValue write SetFORMA_PAGOValue;
|
|
property FORMA_PAGOIsNull: Boolean read GetFORMA_PAGOIsNull write SetFORMA_PAGOIsNull;
|
|
property REF_TIENDA_WEB: Integer read GetREF_TIENDA_WEBValue write SetREF_TIENDA_WEBValue;
|
|
property REF_TIENDA_WEBIsNull: Boolean read GetREF_TIENDA_WEBIsNull write SetREF_TIENDA_WEBIsNull;
|
|
property FECHA_PREVISTA_ENVIO: DateTime read GetFECHA_PREVISTA_ENVIOValue write SetFECHA_PREVISTA_ENVIOValue;
|
|
property FECHA_PREVISTA_ENVIOIsNull: Boolean read GetFECHA_PREVISTA_ENVIOIsNull write SetFECHA_PREVISTA_ENVIOIsNull;
|
|
property DATOS_BANCARIOS: String read GetDATOS_BANCARIOSValue write SetDATOS_BANCARIOSValue;
|
|
property DATOS_BANCARIOSIsNull: Boolean read GetDATOS_BANCARIOSIsNull write SetDATOS_BANCARIOSIsNull;
|
|
|
|
public
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
destructor Destroy; override;
|
|
|
|
end;
|
|
|
|
{ IPedidosCliente_Detalles }
|
|
IPedidosCliente_Detalles = interface(IDAStronglyTypedDataTable)
|
|
['{65AE1BAD-EEB3-48CE-8366-FB559610658B}']
|
|
{ Property getters and setters }
|
|
function GetIDValue: Integer;
|
|
procedure SetIDValue(const aValue: Integer);
|
|
function GetIDIsNull: Boolean;
|
|
procedure SetIDIsNull(const aValue: Boolean);
|
|
function GetID_PEDIDOValue: Integer;
|
|
procedure SetID_PEDIDOValue(const aValue: Integer);
|
|
function GetID_PEDIDOIsNull: Boolean;
|
|
procedure SetID_PEDIDOIsNull(const aValue: Boolean);
|
|
function GetPOSICIONValue: Integer;
|
|
procedure SetPOSICIONValue(const aValue: Integer);
|
|
function GetPOSICIONIsNull: Boolean;
|
|
procedure SetPOSICIONIsNull(const aValue: Boolean);
|
|
function GetTIPO_DETALLEValue: String;
|
|
procedure SetTIPO_DETALLEValue(const aValue: String);
|
|
function GetTIPO_DETALLEIsNull: Boolean;
|
|
procedure SetTIPO_DETALLEIsNull(const aValue: Boolean);
|
|
function GetID_ARTICULOValue: Integer;
|
|
procedure SetID_ARTICULOValue(const aValue: Integer);
|
|
function GetID_ARTICULOIsNull: Boolean;
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
function GetREFERENCIAValue: String;
|
|
procedure SetREFERENCIAValue(const aValue: String);
|
|
function GetREFERENCIAIsNull: Boolean;
|
|
procedure SetREFERENCIAIsNull(const aValue: Boolean);
|
|
function GetREFERENCIA_PROVEEDORValue: String;
|
|
procedure SetREFERENCIA_PROVEEDORValue(const aValue: String);
|
|
function GetREFERENCIA_PROVEEDORIsNull: Boolean;
|
|
procedure SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean);
|
|
function GetCONCEPTOValue: String;
|
|
procedure SetCONCEPTOValue(const aValue: String);
|
|
function GetCONCEPTOIsNull: Boolean;
|
|
procedure SetCONCEPTOIsNull(const aValue: Boolean);
|
|
function GetCANTIDADValue: Float;
|
|
procedure SetCANTIDADValue(const aValue: Float);
|
|
function GetCANTIDADIsNull: Boolean;
|
|
procedure SetCANTIDADIsNull(const aValue: Boolean);
|
|
function GetIMPORTE_UNIDADValue: Currency;
|
|
procedure SetIMPORTE_UNIDADValue(const aValue: Currency);
|
|
function GetIMPORTE_UNIDADIsNull: Boolean;
|
|
procedure SetIMPORTE_UNIDADIsNull(const aValue: Boolean);
|
|
function GetUNIDAD_MEDIDAValue: String;
|
|
procedure SetUNIDAD_MEDIDAValue(const aValue: String);
|
|
function GetUNIDAD_MEDIDAIsNull: Boolean;
|
|
procedure SetUNIDAD_MEDIDAIsNull(const aValue: Boolean);
|
|
function GetDESCUENTOValue: Float;
|
|
procedure SetDESCUENTOValue(const aValue: Float);
|
|
function GetDESCUENTOIsNull: Boolean;
|
|
procedure SetDESCUENTOIsNull(const aValue: Boolean);
|
|
function GetIMPORTE_PORTEValue: Currency;
|
|
procedure SetIMPORTE_PORTEValue(const aValue: Currency);
|
|
function GetIMPORTE_PORTEIsNull: Boolean;
|
|
procedure SetIMPORTE_PORTEIsNull(const aValue: Boolean);
|
|
function GetIMPORTE_TOTALValue: Currency;
|
|
procedure SetIMPORTE_TOTALValue(const aValue: Currency);
|
|
function GetIMPORTE_TOTALIsNull: Boolean;
|
|
procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean);
|
|
function GetVISIBLEValue: Integer;
|
|
procedure SetVISIBLEValue(const aValue: Integer);
|
|
function GetVISIBLEIsNull: Boolean;
|
|
procedure SetVISIBLEIsNull(const aValue: Boolean);
|
|
|
|
|
|
{ Properties }
|
|
property ID: Integer read GetIDValue write SetIDValue;
|
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
|
property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
|
|
property ID_PEDIDOIsNull: Boolean read GetID_PEDIDOIsNull write SetID_PEDIDOIsNull;
|
|
property POSICION: Integer read GetPOSICIONValue write SetPOSICIONValue;
|
|
property POSICIONIsNull: Boolean read GetPOSICIONIsNull write SetPOSICIONIsNull;
|
|
property TIPO_DETALLE: String read GetTIPO_DETALLEValue write SetTIPO_DETALLEValue;
|
|
property TIPO_DETALLEIsNull: Boolean read GetTIPO_DETALLEIsNull write SetTIPO_DETALLEIsNull;
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
|
property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
|
|
property REFERENCIA_PROVEEDORIsNull: Boolean read GetREFERENCIA_PROVEEDORIsNull write SetREFERENCIA_PROVEEDORIsNull;
|
|
property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
|
|
property CONCEPTOIsNull: Boolean read GetCONCEPTOIsNull write SetCONCEPTOIsNull;
|
|
property CANTIDAD: Float read GetCANTIDADValue write SetCANTIDADValue;
|
|
property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
|
|
property IMPORTE_UNIDAD: Currency read GetIMPORTE_UNIDADValue write SetIMPORTE_UNIDADValue;
|
|
property IMPORTE_UNIDADIsNull: Boolean read GetIMPORTE_UNIDADIsNull write SetIMPORTE_UNIDADIsNull;
|
|
property UNIDAD_MEDIDA: String read GetUNIDAD_MEDIDAValue write SetUNIDAD_MEDIDAValue;
|
|
property UNIDAD_MEDIDAIsNull: Boolean read GetUNIDAD_MEDIDAIsNull write SetUNIDAD_MEDIDAIsNull;
|
|
property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
|
|
property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
|
|
property IMPORTE_PORTE: Currency read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
|
|
property IMPORTE_PORTEIsNull: Boolean read GetIMPORTE_PORTEIsNull write SetIMPORTE_PORTEIsNull;
|
|
property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
|
|
property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
|
|
property VISIBLE: Integer read GetVISIBLEValue write SetVISIBLEValue;
|
|
property VISIBLEIsNull: Boolean read GetVISIBLEIsNull write SetVISIBLEIsNull;
|
|
end;
|
|
|
|
{ TPedidosCliente_DetallesDataTableRules }
|
|
TPedidosCliente_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IPedidosCliente_Detalles)
|
|
private
|
|
protected
|
|
{ Property getters and setters }
|
|
function GetIDValue: Integer; virtual;
|
|
procedure SetIDValue(const aValue: Integer); virtual;
|
|
function GetIDIsNull: Boolean; virtual;
|
|
procedure SetIDIsNull(const aValue: Boolean); virtual;
|
|
function GetID_PEDIDOValue: Integer; virtual;
|
|
procedure SetID_PEDIDOValue(const aValue: Integer); virtual;
|
|
function GetID_PEDIDOIsNull: Boolean; virtual;
|
|
procedure SetID_PEDIDOIsNull(const aValue: Boolean); virtual;
|
|
function GetPOSICIONValue: Integer; virtual;
|
|
procedure SetPOSICIONValue(const aValue: Integer); virtual;
|
|
function GetPOSICIONIsNull: Boolean; virtual;
|
|
procedure SetPOSICIONIsNull(const aValue: Boolean); virtual;
|
|
function GetTIPO_DETALLEValue: String; virtual;
|
|
procedure SetTIPO_DETALLEValue(const aValue: String); virtual;
|
|
function GetTIPO_DETALLEIsNull: Boolean; virtual;
|
|
procedure SetTIPO_DETALLEIsNull(const aValue: Boolean); virtual;
|
|
function GetID_ARTICULOValue: Integer; virtual;
|
|
procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
|
|
function GetID_ARTICULOIsNull: Boolean; virtual;
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
|
|
function GetREFERENCIAValue: String; virtual;
|
|
procedure SetREFERENCIAValue(const aValue: String); virtual;
|
|
function GetREFERENCIAIsNull: Boolean; virtual;
|
|
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
|
|
function GetREFERENCIA_PROVEEDORValue: String; virtual;
|
|
procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;
|
|
function GetREFERENCIA_PROVEEDORIsNull: Boolean; virtual;
|
|
procedure SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean); virtual;
|
|
function GetCONCEPTOValue: String; virtual;
|
|
procedure SetCONCEPTOValue(const aValue: String); virtual;
|
|
function GetCONCEPTOIsNull: Boolean; virtual;
|
|
procedure SetCONCEPTOIsNull(const aValue: Boolean); virtual;
|
|
function GetCANTIDADValue: Float; virtual;
|
|
procedure SetCANTIDADValue(const aValue: Float); virtual;
|
|
function GetCANTIDADIsNull: Boolean; virtual;
|
|
procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_UNIDADValue: Currency; virtual;
|
|
procedure SetIMPORTE_UNIDADValue(const aValue: Currency); virtual;
|
|
function GetIMPORTE_UNIDADIsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_UNIDADIsNull(const aValue: Boolean); virtual;
|
|
function GetUNIDAD_MEDIDAValue: String; virtual;
|
|
procedure SetUNIDAD_MEDIDAValue(const aValue: String); virtual;
|
|
function GetUNIDAD_MEDIDAIsNull: Boolean; virtual;
|
|
procedure SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); virtual;
|
|
function GetDESCUENTOValue: Float; virtual;
|
|
procedure SetDESCUENTOValue(const aValue: Float); virtual;
|
|
function GetDESCUENTOIsNull: Boolean; virtual;
|
|
procedure SetDESCUENTOIsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_PORTEValue: Currency; virtual;
|
|
procedure SetIMPORTE_PORTEValue(const aValue: Currency); virtual;
|
|
function GetIMPORTE_PORTEIsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_PORTEIsNull(const aValue: Boolean); virtual;
|
|
function GetIMPORTE_TOTALValue: Currency; virtual;
|
|
procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
|
|
function GetIMPORTE_TOTALIsNull: Boolean; virtual;
|
|
procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean); virtual;
|
|
function GetVISIBLEValue: Integer; virtual;
|
|
procedure SetVISIBLEValue(const aValue: Integer); virtual;
|
|
function GetVISIBLEIsNull: Boolean; virtual;
|
|
procedure SetVISIBLEIsNull(const aValue: Boolean); virtual;
|
|
|
|
{ Properties }
|
|
property ID: Integer read GetIDValue write SetIDValue;
|
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
|
property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
|
|
property ID_PEDIDOIsNull: Boolean read GetID_PEDIDOIsNull write SetID_PEDIDOIsNull;
|
|
property POSICION: Integer read GetPOSICIONValue write SetPOSICIONValue;
|
|
property POSICIONIsNull: Boolean read GetPOSICIONIsNull write SetPOSICIONIsNull;
|
|
property TIPO_DETALLE: String read GetTIPO_DETALLEValue write SetTIPO_DETALLEValue;
|
|
property TIPO_DETALLEIsNull: Boolean read GetTIPO_DETALLEIsNull write SetTIPO_DETALLEIsNull;
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
|
property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
|
|
property REFERENCIA_PROVEEDORIsNull: Boolean read GetREFERENCIA_PROVEEDORIsNull write SetREFERENCIA_PROVEEDORIsNull;
|
|
property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
|
|
property CONCEPTOIsNull: Boolean read GetCONCEPTOIsNull write SetCONCEPTOIsNull;
|
|
property CANTIDAD: Float read GetCANTIDADValue write SetCANTIDADValue;
|
|
property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
|
|
property IMPORTE_UNIDAD: Currency read GetIMPORTE_UNIDADValue write SetIMPORTE_UNIDADValue;
|
|
property IMPORTE_UNIDADIsNull: Boolean read GetIMPORTE_UNIDADIsNull write SetIMPORTE_UNIDADIsNull;
|
|
property UNIDAD_MEDIDA: String read GetUNIDAD_MEDIDAValue write SetUNIDAD_MEDIDAValue;
|
|
property UNIDAD_MEDIDAIsNull: Boolean read GetUNIDAD_MEDIDAIsNull write SetUNIDAD_MEDIDAIsNull;
|
|
property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
|
|
property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
|
|
property IMPORTE_PORTE: Currency read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
|
|
property IMPORTE_PORTEIsNull: Boolean read GetIMPORTE_PORTEIsNull write SetIMPORTE_PORTEIsNull;
|
|
property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
|
|
property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
|
|
property VISIBLE: Integer read GetVISIBLEValue write SetVISIBLEValue;
|
|
property VISIBLEIsNull: Boolean read GetVISIBLEIsNull write SetVISIBLEIsNull;
|
|
|
|
public
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
destructor Destroy; override;
|
|
|
|
end;
|
|
|
|
{ IPedidoCliente_Articulos_Pendientes }
|
|
IPedidoCliente_Articulos_Pendientes = interface(IDAStronglyTypedDataTable)
|
|
['{FB1F9D4A-319A-4FB3-8576-26E149E18E06}']
|
|
{ Property getters and setters }
|
|
function GetID_ARTICULOValue: Integer;
|
|
procedure SetID_ARTICULOValue(const aValue: Integer);
|
|
function GetID_ARTICULOIsNull: Boolean;
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
function GetCANTIDAD_PEDValue: Float;
|
|
procedure SetCANTIDAD_PEDValue(const aValue: Float);
|
|
function GetCANTIDAD_PEDIsNull: Boolean;
|
|
procedure SetCANTIDAD_PEDIsNull(const aValue: Boolean);
|
|
function GetCANTIDAD_ALBValue: Float;
|
|
procedure SetCANTIDAD_ALBValue(const aValue: Float);
|
|
function GetCANTIDAD_ALBIsNull: Boolean;
|
|
procedure SetCANTIDAD_ALBIsNull(const aValue: Boolean);
|
|
function GetCANTIDAD_PENDIENTEValue: Float;
|
|
procedure SetCANTIDAD_PENDIENTEValue(const aValue: Float);
|
|
function GetCANTIDAD_PENDIENTEIsNull: Boolean;
|
|
procedure SetCANTIDAD_PENDIENTEIsNull(const aValue: Boolean);
|
|
|
|
|
|
{ Properties }
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
|
property CANTIDAD_PED: Float read GetCANTIDAD_PEDValue write SetCANTIDAD_PEDValue;
|
|
property CANTIDAD_PEDIsNull: Boolean read GetCANTIDAD_PEDIsNull write SetCANTIDAD_PEDIsNull;
|
|
property CANTIDAD_ALB: Float read GetCANTIDAD_ALBValue write SetCANTIDAD_ALBValue;
|
|
property CANTIDAD_ALBIsNull: Boolean read GetCANTIDAD_ALBIsNull write SetCANTIDAD_ALBIsNull;
|
|
property CANTIDAD_PENDIENTE: Float read GetCANTIDAD_PENDIENTEValue write SetCANTIDAD_PENDIENTEValue;
|
|
property CANTIDAD_PENDIENTEIsNull: Boolean read GetCANTIDAD_PENDIENTEIsNull write SetCANTIDAD_PENDIENTEIsNull;
|
|
end;
|
|
|
|
{ TPedidoCliente_Articulos_PendientesDataTableRules }
|
|
TPedidoCliente_Articulos_PendientesDataTableRules = class(TIntfObjectDADataTableRules, IPedidoCliente_Articulos_Pendientes)
|
|
private
|
|
protected
|
|
{ Property getters and setters }
|
|
function GetID_ARTICULOValue: Integer; virtual;
|
|
procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
|
|
function GetID_ARTICULOIsNull: Boolean; virtual;
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
|
|
function GetCANTIDAD_PEDValue: Float; virtual;
|
|
procedure SetCANTIDAD_PEDValue(const aValue: Float); virtual;
|
|
function GetCANTIDAD_PEDIsNull: Boolean; virtual;
|
|
procedure SetCANTIDAD_PEDIsNull(const aValue: Boolean); virtual;
|
|
function GetCANTIDAD_ALBValue: Float; virtual;
|
|
procedure SetCANTIDAD_ALBValue(const aValue: Float); virtual;
|
|
function GetCANTIDAD_ALBIsNull: Boolean; virtual;
|
|
procedure SetCANTIDAD_ALBIsNull(const aValue: Boolean); virtual;
|
|
function GetCANTIDAD_PENDIENTEValue: Float; virtual;
|
|
procedure SetCANTIDAD_PENDIENTEValue(const aValue: Float); virtual;
|
|
function GetCANTIDAD_PENDIENTEIsNull: Boolean; virtual;
|
|
procedure SetCANTIDAD_PENDIENTEIsNull(const aValue: Boolean); virtual;
|
|
|
|
{ Properties }
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
|
property CANTIDAD_PED: Float read GetCANTIDAD_PEDValue write SetCANTIDAD_PEDValue;
|
|
property CANTIDAD_PEDIsNull: Boolean read GetCANTIDAD_PEDIsNull write SetCANTIDAD_PEDIsNull;
|
|
property CANTIDAD_ALB: Float read GetCANTIDAD_ALBValue write SetCANTIDAD_ALBValue;
|
|
property CANTIDAD_ALBIsNull: Boolean read GetCANTIDAD_ALBIsNull write SetCANTIDAD_ALBIsNull;
|
|
property CANTIDAD_PENDIENTE: Float read GetCANTIDAD_PENDIENTEValue write SetCANTIDAD_PENDIENTEValue;
|
|
property CANTIDAD_PENDIENTEIsNull: Boolean read GetCANTIDAD_PENDIENTEIsNull write SetCANTIDAD_PENDIENTEIsNull;
|
|
|
|
public
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
destructor Destroy; override;
|
|
|
|
end;
|
|
|
|
{ IPedidosCliente_Detalle_Color }
|
|
IPedidosCliente_Detalle_Color = interface(IDAStronglyTypedDataTable)
|
|
['{FEED9557-5E73-47D9-A62B-E92C858D9608}']
|
|
{ Property getters and setters }
|
|
function GetIDValue: Integer;
|
|
procedure SetIDValue(const aValue: Integer);
|
|
function GetIDIsNull: Boolean;
|
|
procedure SetIDIsNull(const aValue: Boolean);
|
|
function GetID_DETALLEValue: Integer;
|
|
procedure SetID_DETALLEValue(const aValue: Integer);
|
|
function GetID_DETALLEIsNull: Boolean;
|
|
procedure SetID_DETALLEIsNull(const aValue: Boolean);
|
|
function GetCOLOR1Value: Integer;
|
|
procedure SetCOLOR1Value(const aValue: Integer);
|
|
function GetCOLOR1IsNull: Boolean;
|
|
procedure SetCOLOR1IsNull(const aValue: Boolean);
|
|
function GetCOLOR2Value: Integer;
|
|
procedure SetCOLOR2Value(const aValue: Integer);
|
|
function GetCOLOR2IsNull: Boolean;
|
|
procedure SetCOLOR2IsNull(const aValue: Boolean);
|
|
function GetCOLOR3Value: Integer;
|
|
procedure SetCOLOR3Value(const aValue: Integer);
|
|
function GetCOLOR3IsNull: Boolean;
|
|
procedure SetCOLOR3IsNull(const aValue: Boolean);
|
|
function GetCOLOR4Value: Integer;
|
|
procedure SetCOLOR4Value(const aValue: Integer);
|
|
function GetCOLOR4IsNull: Boolean;
|
|
procedure SetCOLOR4IsNull(const aValue: Boolean);
|
|
function GetCOLOR5Value: Integer;
|
|
procedure SetCOLOR5Value(const aValue: Integer);
|
|
function GetCOLOR5IsNull: Boolean;
|
|
procedure SetCOLOR5IsNull(const aValue: Boolean);
|
|
function GetCOLOR6Value: Integer;
|
|
procedure SetCOLOR6Value(const aValue: Integer);
|
|
function GetCOLOR6IsNull: Boolean;
|
|
procedure SetCOLOR6IsNull(const aValue: Boolean);
|
|
function GetCOLOR7Value: Integer;
|
|
procedure SetCOLOR7Value(const aValue: Integer);
|
|
function GetCOLOR7IsNull: Boolean;
|
|
procedure SetCOLOR7IsNull(const aValue: Boolean);
|
|
function GetCOLOR8Value: Integer;
|
|
procedure SetCOLOR8Value(const aValue: Integer);
|
|
function GetCOLOR8IsNull: Boolean;
|
|
procedure SetCOLOR8IsNull(const aValue: Boolean);
|
|
function GetCOLOR9Value: Integer;
|
|
procedure SetCOLOR9Value(const aValue: Integer);
|
|
function GetCOLOR9IsNull: Boolean;
|
|
procedure SetCOLOR9IsNull(const aValue: Boolean);
|
|
function GetCOLOR10Value: Integer;
|
|
procedure SetCOLOR10Value(const aValue: Integer);
|
|
function GetCOLOR10IsNull: Boolean;
|
|
procedure SetCOLOR10IsNull(const aValue: Boolean);
|
|
function GetCOLOR11Value: Integer;
|
|
procedure SetCOLOR11Value(const aValue: Integer);
|
|
function GetCOLOR11IsNull: Boolean;
|
|
procedure SetCOLOR11IsNull(const aValue: Boolean);
|
|
function GetCOLOR12Value: Integer;
|
|
procedure SetCOLOR12Value(const aValue: Integer);
|
|
function GetCOLOR12IsNull: Boolean;
|
|
procedure SetCOLOR12IsNull(const aValue: Boolean);
|
|
|
|
|
|
{ Properties }
|
|
property ID: Integer read GetIDValue write SetIDValue;
|
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
|
property ID_DETALLE: Integer read GetID_DETALLEValue write SetID_DETALLEValue;
|
|
property ID_DETALLEIsNull: Boolean read GetID_DETALLEIsNull write SetID_DETALLEIsNull;
|
|
property COLOR1: Integer read GetCOLOR1Value write SetCOLOR1Value;
|
|
property COLOR1IsNull: Boolean read GetCOLOR1IsNull write SetCOLOR1IsNull;
|
|
property COLOR2: Integer read GetCOLOR2Value write SetCOLOR2Value;
|
|
property COLOR2IsNull: Boolean read GetCOLOR2IsNull write SetCOLOR2IsNull;
|
|
property COLOR3: Integer read GetCOLOR3Value write SetCOLOR3Value;
|
|
property COLOR3IsNull: Boolean read GetCOLOR3IsNull write SetCOLOR3IsNull;
|
|
property COLOR4: Integer read GetCOLOR4Value write SetCOLOR4Value;
|
|
property COLOR4IsNull: Boolean read GetCOLOR4IsNull write SetCOLOR4IsNull;
|
|
property COLOR5: Integer read GetCOLOR5Value write SetCOLOR5Value;
|
|
property COLOR5IsNull: Boolean read GetCOLOR5IsNull write SetCOLOR5IsNull;
|
|
property COLOR6: Integer read GetCOLOR6Value write SetCOLOR6Value;
|
|
property COLOR6IsNull: Boolean read GetCOLOR6IsNull write SetCOLOR6IsNull;
|
|
property COLOR7: Integer read GetCOLOR7Value write SetCOLOR7Value;
|
|
property COLOR7IsNull: Boolean read GetCOLOR7IsNull write SetCOLOR7IsNull;
|
|
property COLOR8: Integer read GetCOLOR8Value write SetCOLOR8Value;
|
|
property COLOR8IsNull: Boolean read GetCOLOR8IsNull write SetCOLOR8IsNull;
|
|
property COLOR9: Integer read GetCOLOR9Value write SetCOLOR9Value;
|
|
property COLOR9IsNull: Boolean read GetCOLOR9IsNull write SetCOLOR9IsNull;
|
|
property COLOR10: Integer read GetCOLOR10Value write SetCOLOR10Value;
|
|
property COLOR10IsNull: Boolean read GetCOLOR10IsNull write SetCOLOR10IsNull;
|
|
property COLOR11: Integer read GetCOLOR11Value write SetCOLOR11Value;
|
|
property COLOR11IsNull: Boolean read GetCOLOR11IsNull write SetCOLOR11IsNull;
|
|
property COLOR12: Integer read GetCOLOR12Value write SetCOLOR12Value;
|
|
property COLOR12IsNull: Boolean read GetCOLOR12IsNull write SetCOLOR12IsNull;
|
|
end;
|
|
|
|
{ TPedidosCliente_Detalle_ColorDataTableRules }
|
|
TPedidosCliente_Detalle_ColorDataTableRules = class(TIntfObjectDADataTableRules, IPedidosCliente_Detalle_Color)
|
|
private
|
|
protected
|
|
{ Property getters and setters }
|
|
function GetIDValue: Integer; virtual;
|
|
procedure SetIDValue(const aValue: Integer); virtual;
|
|
function GetIDIsNull: Boolean; virtual;
|
|
procedure SetIDIsNull(const aValue: Boolean); virtual;
|
|
function GetID_DETALLEValue: Integer; virtual;
|
|
procedure SetID_DETALLEValue(const aValue: Integer); virtual;
|
|
function GetID_DETALLEIsNull: Boolean; virtual;
|
|
procedure SetID_DETALLEIsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR1Value: Integer; virtual;
|
|
procedure SetCOLOR1Value(const aValue: Integer); virtual;
|
|
function GetCOLOR1IsNull: Boolean; virtual;
|
|
procedure SetCOLOR1IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR2Value: Integer; virtual;
|
|
procedure SetCOLOR2Value(const aValue: Integer); virtual;
|
|
function GetCOLOR2IsNull: Boolean; virtual;
|
|
procedure SetCOLOR2IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR3Value: Integer; virtual;
|
|
procedure SetCOLOR3Value(const aValue: Integer); virtual;
|
|
function GetCOLOR3IsNull: Boolean; virtual;
|
|
procedure SetCOLOR3IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR4Value: Integer; virtual;
|
|
procedure SetCOLOR4Value(const aValue: Integer); virtual;
|
|
function GetCOLOR4IsNull: Boolean; virtual;
|
|
procedure SetCOLOR4IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR5Value: Integer; virtual;
|
|
procedure SetCOLOR5Value(const aValue: Integer); virtual;
|
|
function GetCOLOR5IsNull: Boolean; virtual;
|
|
procedure SetCOLOR5IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR6Value: Integer; virtual;
|
|
procedure SetCOLOR6Value(const aValue: Integer); virtual;
|
|
function GetCOLOR6IsNull: Boolean; virtual;
|
|
procedure SetCOLOR6IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR7Value: Integer; virtual;
|
|
procedure SetCOLOR7Value(const aValue: Integer); virtual;
|
|
function GetCOLOR7IsNull: Boolean; virtual;
|
|
procedure SetCOLOR7IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR8Value: Integer; virtual;
|
|
procedure SetCOLOR8Value(const aValue: Integer); virtual;
|
|
function GetCOLOR8IsNull: Boolean; virtual;
|
|
procedure SetCOLOR8IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR9Value: Integer; virtual;
|
|
procedure SetCOLOR9Value(const aValue: Integer); virtual;
|
|
function GetCOLOR9IsNull: Boolean; virtual;
|
|
procedure SetCOLOR9IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR10Value: Integer; virtual;
|
|
procedure SetCOLOR10Value(const aValue: Integer); virtual;
|
|
function GetCOLOR10IsNull: Boolean; virtual;
|
|
procedure SetCOLOR10IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR11Value: Integer; virtual;
|
|
procedure SetCOLOR11Value(const aValue: Integer); virtual;
|
|
function GetCOLOR11IsNull: Boolean; virtual;
|
|
procedure SetCOLOR11IsNull(const aValue: Boolean); virtual;
|
|
function GetCOLOR12Value: Integer; virtual;
|
|
procedure SetCOLOR12Value(const aValue: Integer); virtual;
|
|
function GetCOLOR12IsNull: Boolean; virtual;
|
|
procedure SetCOLOR12IsNull(const aValue: Boolean); virtual;
|
|
|
|
{ Properties }
|
|
property ID: Integer read GetIDValue write SetIDValue;
|
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
|
property ID_DETALLE: Integer read GetID_DETALLEValue write SetID_DETALLEValue;
|
|
property ID_DETALLEIsNull: Boolean read GetID_DETALLEIsNull write SetID_DETALLEIsNull;
|
|
property COLOR1: Integer read GetCOLOR1Value write SetCOLOR1Value;
|
|
property COLOR1IsNull: Boolean read GetCOLOR1IsNull write SetCOLOR1IsNull;
|
|
property COLOR2: Integer read GetCOLOR2Value write SetCOLOR2Value;
|
|
property COLOR2IsNull: Boolean read GetCOLOR2IsNull write SetCOLOR2IsNull;
|
|
property COLOR3: Integer read GetCOLOR3Value write SetCOLOR3Value;
|
|
property COLOR3IsNull: Boolean read GetCOLOR3IsNull write SetCOLOR3IsNull;
|
|
property COLOR4: Integer read GetCOLOR4Value write SetCOLOR4Value;
|
|
property COLOR4IsNull: Boolean read GetCOLOR4IsNull write SetCOLOR4IsNull;
|
|
property COLOR5: Integer read GetCOLOR5Value write SetCOLOR5Value;
|
|
property COLOR5IsNull: Boolean read GetCOLOR5IsNull write SetCOLOR5IsNull;
|
|
property COLOR6: Integer read GetCOLOR6Value write SetCOLOR6Value;
|
|
property COLOR6IsNull: Boolean read GetCOLOR6IsNull write SetCOLOR6IsNull;
|
|
property COLOR7: Integer read GetCOLOR7Value write SetCOLOR7Value;
|
|
property COLOR7IsNull: Boolean read GetCOLOR7IsNull write SetCOLOR7IsNull;
|
|
property COLOR8: Integer read GetCOLOR8Value write SetCOLOR8Value;
|
|
property COLOR8IsNull: Boolean read GetCOLOR8IsNull write SetCOLOR8IsNull;
|
|
property COLOR9: Integer read GetCOLOR9Value write SetCOLOR9Value;
|
|
property COLOR9IsNull: Boolean read GetCOLOR9IsNull write SetCOLOR9IsNull;
|
|
property COLOR10: Integer read GetCOLOR10Value write SetCOLOR10Value;
|
|
property COLOR10IsNull: Boolean read GetCOLOR10IsNull write SetCOLOR10IsNull;
|
|
property COLOR11: Integer read GetCOLOR11Value write SetCOLOR11Value;
|
|
property COLOR11IsNull: Boolean read GetCOLOR11IsNull write SetCOLOR11IsNull;
|
|
property COLOR12: Integer read GetCOLOR12Value write SetCOLOR12Value;
|
|
property COLOR12IsNull: Boolean read GetCOLOR12IsNull write SetCOLOR12IsNull;
|
|
|
|
public
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
destructor Destroy; override;
|
|
|
|
end;
|
|
|
|
implementation
|
|
|
|
uses Variants, uROBinaryHelpers;
|
|
|
|
{ TPedidoCliente_Art_Colores_PendientesDataTableRules }
|
|
constructor TPedidoCliente_Art_Colores_PendientesDataTableRules.Create(aDataTable: TDADataTable);
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
destructor TPedidoCliente_Art_Colores_PendientesDataTableRules.Destroy;
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetID_PEDIDOValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesID_PEDIDO].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetID_PEDIDOValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesID_PEDIDO].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetID_PEDIDOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesID_PEDIDO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetID_PEDIDOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesID_PEDIDO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetID_ARTICULOValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesID_ARTICULO].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetID_ARTICULOValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesID_ARTICULO].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetID_ARTICULOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesID_ARTICULO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesID_ARTICULO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR1Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR1].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR1Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR1].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR1IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR1].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR1IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR1].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR2Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR2].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR2Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR2].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR2IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR2].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR2IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR2].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR3Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR3].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR3Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR3].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR3IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR3].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR3IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR3].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR4Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR4].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR4Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR4].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR4IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR4].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR4IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR4].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR5Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR5].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR5Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR5].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR5IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR5].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR5IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR5].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR6Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR6].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR6Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR6].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR6IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR6].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR6IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR6].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR7Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR7].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR7Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR7].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR7IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR7].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR7IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR7].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR8Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR8].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR8Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR8].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR8IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR8].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR8IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR8].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR9Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR9].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR9Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR9].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR9IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR9].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR9IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR9].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR10Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR10].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR10Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR10].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR10IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR10].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR10IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR10].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR11Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR11].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR11Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR11].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR11IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR11].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR11IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR11].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR12Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR12].AsLargeInt;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR12Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR12].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Art_Colores_PendientesDataTableRules.GetCOLOR12IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR12].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Art_Colores_PendientesDataTableRules.SetCOLOR12IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Art_Colores_PendientesCOLOR12].AsVariant := Null;
|
|
end;
|
|
|
|
|
|
{ TListaAnosPedidosDataTableRules }
|
|
constructor TListaAnosPedidosDataTableRules.Create(aDataTable: TDADataTable);
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
destructor TListaAnosPedidosDataTableRules.Destroy;
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
function TListaAnosPedidosDataTableRules.GetANOValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_ListaAnosPedidosANO].AsString;
|
|
end;
|
|
|
|
procedure TListaAnosPedidosDataTableRules.SetANOValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_ListaAnosPedidosANO].AsString := aValue;
|
|
end;
|
|
|
|
function TListaAnosPedidosDataTableRules.GetANOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ListaAnosPedidosANO].IsNull;
|
|
end;
|
|
|
|
procedure TListaAnosPedidosDataTableRules.SetANOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ListaAnosPedidosANO].AsVariant := Null;
|
|
end;
|
|
|
|
|
|
{ TArticulosPendientesDataTableRules }
|
|
constructor TArticulosPendientesDataTableRules.Create(aDataTable: TDADataTable);
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
destructor TArticulosPendientesDataTableRules.Destroy;
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetID_ARTICULOValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesID_ARTICULO].AsInteger;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetID_ARTICULOValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesID_ARTICULO].AsInteger := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetID_ARTICULOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesID_ARTICULO].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesID_ARTICULO].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetREFERENCIAValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesREFERENCIA].AsString;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetREFERENCIAValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesREFERENCIA].AsString := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetREFERENCIAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesREFERENCIA].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesREFERENCIA].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetDESCRIPCIONValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesDESCRIPCION].AsString;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetDESCRIPCIONValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesDESCRIPCION].AsString := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetDESCRIPCIONIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesDESCRIPCION].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesDESCRIPCION].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR1Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR1].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR1Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR1].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR1IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR1].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR1IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR1].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR2Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR2].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR2Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR2].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR2IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR2].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR2IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR2].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR3Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR3].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR3Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR3].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR3IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR3].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR3IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR3].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR4Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR4].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR4Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR4].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR4IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR4].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR4IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR4].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR5Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR5].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR5Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR5].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR5IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR5].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR5IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR5].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR6Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR6].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR6Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR6].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR6IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR6].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR6IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR6].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR7Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR7].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR7Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR7].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR7IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR7].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR7IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR7].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR8Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR8].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR8Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR8].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR8IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR8].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR8IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR8].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR9Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR9].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR9Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR9].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR9IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR9].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR9IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR9].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR10Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR10].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR10Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR10].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR10IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR10].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR10IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR10].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR11Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR11].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR11Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR11].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR11IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR11].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR11IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR11].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR12Value: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR12].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR12Value(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR12].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetCOLOR12IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesCOLOR12].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetCOLOR12IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesCOLOR12].AsVariant := Null;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetTOTALValue: Int64;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesTOTAL].AsLargeInt;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetTOTALValue(const aValue: Int64);
|
|
begin
|
|
DataTable.Fields[idx_ArticulosPendientesTOTAL].AsLargeInt := aValue;
|
|
end;
|
|
|
|
function TArticulosPendientesDataTableRules.GetTOTALIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_ArticulosPendientesTOTAL].IsNull;
|
|
end;
|
|
|
|
procedure TArticulosPendientesDataTableRules.SetTOTALIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_ArticulosPendientesTOTAL].AsVariant := Null;
|
|
end;
|
|
|
|
|
|
{ TPedidosClienteDataTableRules }
|
|
constructor TPedidosClienteDataTableRules.Create(aDataTable: TDADataTable);
|
|
var
|
|
StrList: TStringList;
|
|
begin
|
|
inherited;
|
|
|
|
StrList := TStringList.Create;
|
|
StrList.OnChange := OBSERVACIONES_OnChange;
|
|
f_OBSERVACIONES := NewROStrings(StrList,True);
|
|
|
|
StrList := TStringList.Create;
|
|
StrList.OnChange := INCIDENCIAS_OnChange;
|
|
f_INCIDENCIAS := NewROStrings(StrList,True);
|
|
end;
|
|
|
|
destructor TPedidosClienteDataTableRules.Destroy;
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.OBSERVACIONES_OnChange(Sender: TObject);
|
|
begin
|
|
if DataTable.Editing then DataTable.Fields[idx_PedidosClienteOBSERVACIONES].AsVariant := TStringList(Sender).Text;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.INCIDENCIAS_OnChange(Sender: TObject);
|
|
begin
|
|
if DataTable.Editing then DataTable.Fields[idx_PedidosClienteINCIDENCIAS].AsVariant := TStringList(Sender).Text;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIDValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIDValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteID].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIDIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIDIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteID].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetID_EMPRESAValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID_EMPRESA].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteID_EMPRESA].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetID_EMPRESAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID_EMPRESA].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteID_EMPRESA].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetID_CLIENTEValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID_CLIENTE].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetID_CLIENTEValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteID_CLIENTE].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetID_CLIENTEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID_CLIENTE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetID_CLIENTEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteID_CLIENTE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetNOMBREValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteNOMBRE].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetNOMBREValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteNOMBRE].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetNOMBREIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteNOMBRE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetNOMBREIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteNOMBRE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetREFERENCIAValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteREFERENCIA].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetREFERENCIAValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteREFERENCIA].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetREFERENCIAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteREFERENCIA].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteREFERENCIA].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetREFERENCIA_CLIENTEValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteREFERENCIA_CLIENTE].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetREFERENCIA_CLIENTEValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteREFERENCIA_CLIENTE].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetREFERENCIA_CLIENTEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteREFERENCIA_CLIENTE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetREFERENCIA_CLIENTEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteREFERENCIA_CLIENTE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetSITUACIONValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteSITUACION].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetSITUACIONValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteSITUACION].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetSITUACIONIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteSITUACION].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetSITUACIONIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteSITUACION].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFECHA_PEDIDOValue: DateTime;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFECHA_PEDIDO].AsDateTime;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFECHA_PEDIDOValue(const aValue: DateTime);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteFECHA_PEDIDO].AsDateTime := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFECHA_PEDIDOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFECHA_PEDIDO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFECHA_PEDIDOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteFECHA_PEDIDO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetID_DIRECCIONValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID_DIRECCION].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetID_DIRECCIONValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteID_DIRECCION].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetID_DIRECCIONIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID_DIRECCION].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetID_DIRECCIONIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteID_DIRECCION].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetCALLEValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteCALLE].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetCALLEValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteCALLE].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetCALLEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteCALLE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetCALLEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteCALLE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetCODIGO_POSTALValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteCODIGO_POSTAL].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetCODIGO_POSTALValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteCODIGO_POSTAL].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetCODIGO_POSTALIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteCODIGO_POSTAL].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteCODIGO_POSTAL].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetPOBLACIONValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClientePOBLACION].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetPOBLACIONValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClientePOBLACION].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetPOBLACIONIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClientePOBLACION].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClientePOBLACION].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetPROVINCIAValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClientePROVINCIA].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetPROVINCIAValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClientePROVINCIA].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetPROVINCIAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClientePROVINCIA].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClientePROVINCIA].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetPERSONA_CONTACTOValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClientePERSONA_CONTACTO].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetPERSONA_CONTACTOValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClientePERSONA_CONTACTO].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClientePERSONA_CONTACTO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClientePERSONA_CONTACTO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetTELEFONOValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteTELEFONO].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetTELEFONOValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteTELEFONO].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetTELEFONOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteTELEFONO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetTELEFONOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteTELEFONO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetOBSERVACIONESValue: IROStrings;
|
|
begin
|
|
result := f_OBSERVACIONES;
|
|
result.Text := DataTable.Fields[idx_PedidosClienteOBSERVACIONES].AsString;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetOBSERVACIONESIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteOBSERVACIONES].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetOBSERVACIONESIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteOBSERVACIONES].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetINCIDENCIASValue: IROStrings;
|
|
begin
|
|
result := f_INCIDENCIAS;
|
|
result.Text := DataTable.Fields[idx_PedidosClienteINCIDENCIAS].AsString;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetINCIDENCIASIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteINCIDENCIAS].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetINCIDENCIASIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteINCIDENCIAS].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetINCIDENCIAS_ACTIVASValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteINCIDENCIAS_ACTIVAS].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetINCIDENCIAS_ACTIVASValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteINCIDENCIAS_ACTIVAS].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetINCIDENCIAS_ACTIVASIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteINCIDENCIAS_ACTIVAS].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetINCIDENCIAS_ACTIVASIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteINCIDENCIAS_ACTIVAS].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFECHA_ALTAValue: DateTime;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFECHA_ALTA].AsDateTime;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFECHA_ALTAValue(const aValue: DateTime);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteFECHA_ALTA].AsDateTime := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFECHA_ALTAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFECHA_ALTA].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFECHA_ALTAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteFECHA_ALTA].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFECHA_MODIFICACION].AsDateTime;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteFECHA_MODIFICACION].AsDateTime := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFECHA_MODIFICACION].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteFECHA_MODIFICACION].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetUSUARIOValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteUSUARIO].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetUSUARIOValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteUSUARIO].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetUSUARIOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteUSUARIO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetUSUARIOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteUSUARIO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_NETOValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_NETO].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_NETOValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_NETO].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_NETOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_NETO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_NETOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_NETO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_PORTEValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_PORTE].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_PORTEValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_PORTE].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_PORTEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_PORTE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_PORTEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_PORTE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetDESCUENTOValue: Float;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteDESCUENTO].AsFloat;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetDESCUENTOValue(const aValue: Float);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteDESCUENTO].AsFloat := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetDESCUENTOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteDESCUENTO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetDESCUENTOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteDESCUENTO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_DESCUENTOValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_DESCUENTO].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_DESCUENTOValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_DESCUENTO].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_DESCUENTOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_DESCUENTO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_DESCUENTOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_DESCUENTO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetDESCUENTO2Value: Float;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteDESCUENTO2].AsFloat;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetDESCUENTO2Value(const aValue: Float);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteDESCUENTO2].AsFloat := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetDESCUENTO2IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteDESCUENTO2].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetDESCUENTO2IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteDESCUENTO2].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_DESCUENTO2Value: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_DESCUENTO2].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_DESCUENTO2Value(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_DESCUENTO2].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_DESCUENTO2IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_DESCUENTO2].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_DESCUENTO2IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_DESCUENTO2].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetBASE_IMPONIBLEValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteBASE_IMPONIBLE].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetBASE_IMPONIBLEValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteBASE_IMPONIBLE].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetBASE_IMPONIBLEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteBASE_IMPONIBLE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetBASE_IMPONIBLEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteBASE_IMPONIBLE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIVAValue: Float;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIVA].AsFloat;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIVAValue(const aValue: Float);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteIVA].AsFloat := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIVAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIVA].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIVAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteIVA].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_IVAValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_IVA].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_IVAValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_IVA].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_IVAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_IVA].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_IVAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_IVA].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_TOTALValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_TOTAL].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_TOTALValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_TOTAL].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetIMPORTE_TOTALIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteIMPORTE_TOTAL].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteIMPORTE_TOTAL].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetID_FORMA_PAGOValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID_FORMA_PAGO].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetID_FORMA_PAGOValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteID_FORMA_PAGO].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetID_FORMA_PAGOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteID_FORMA_PAGO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetID_FORMA_PAGOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteID_FORMA_PAGO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFORMA_PAGOValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFORMA_PAGO].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFORMA_PAGOValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteFORMA_PAGO].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFORMA_PAGOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFORMA_PAGO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFORMA_PAGOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteFORMA_PAGO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetREF_TIENDA_WEBValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteREF_TIENDA_WEB].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetREF_TIENDA_WEBValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteREF_TIENDA_WEB].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetREF_TIENDA_WEBIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteREF_TIENDA_WEB].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetREF_TIENDA_WEBIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteREF_TIENDA_WEB].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFECHA_PREVISTA_ENVIOValue: DateTime;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFECHA_PREVISTA_ENVIO].AsDateTime;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFECHA_PREVISTA_ENVIOValue(const aValue: DateTime);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteFECHA_PREVISTA_ENVIO].AsDateTime := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetFECHA_PREVISTA_ENVIOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteFECHA_PREVISTA_ENVIO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetFECHA_PREVISTA_ENVIOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteFECHA_PREVISTA_ENVIO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetDATOS_BANCARIOSValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteDATOS_BANCARIOS].AsString;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetDATOS_BANCARIOSValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosClienteDATOS_BANCARIOS].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosClienteDataTableRules.GetDATOS_BANCARIOSIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosClienteDATOS_BANCARIOS].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosClienteDataTableRules.SetDATOS_BANCARIOSIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosClienteDATOS_BANCARIOS].AsVariant := Null;
|
|
end;
|
|
|
|
|
|
{ TPedidosCliente_DetallesDataTableRules }
|
|
constructor TPedidosCliente_DetallesDataTableRules.Create(aDataTable: TDADataTable);
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
destructor TPedidosCliente_DetallesDataTableRules.Destroy;
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetIDValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesID].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetIDValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesID].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetIDIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesID].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetIDIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesID].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetID_PEDIDOValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesID_PEDIDO].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetID_PEDIDOValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesID_PEDIDO].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetID_PEDIDOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesID_PEDIDO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetID_PEDIDOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesID_PEDIDO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetPOSICIONValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesPOSICION].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetPOSICIONValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesPOSICION].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetPOSICIONIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesPOSICION].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetPOSICIONIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesPOSICION].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetTIPO_DETALLEValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesTIPO_DETALLE].AsString;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetTIPO_DETALLEValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesTIPO_DETALLE].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetTIPO_DETALLEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesTIPO_DETALLE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetTIPO_DETALLEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesTIPO_DETALLE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetID_ARTICULOValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesID_ARTICULO].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetID_ARTICULOValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesID_ARTICULO].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetID_ARTICULOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesID_ARTICULO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesID_ARTICULO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetREFERENCIAValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesREFERENCIA].AsString;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetREFERENCIAValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesREFERENCIA].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetREFERENCIAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesREFERENCIA].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesREFERENCIA].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetREFERENCIA_PROVEEDORValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesREFERENCIA_PROVEEDOR].AsString;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesREFERENCIA_PROVEEDOR].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetREFERENCIA_PROVEEDORIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesREFERENCIA_PROVEEDOR].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesREFERENCIA_PROVEEDOR].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetCONCEPTOValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesCONCEPTO].AsString;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetCONCEPTOValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesCONCEPTO].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetCONCEPTOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesCONCEPTO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetCONCEPTOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesCONCEPTO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetCANTIDADValue: Float;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesCANTIDAD].AsFloat;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetCANTIDADValue(const aValue: Float);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesCANTIDAD].AsFloat := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetCANTIDADIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesCANTIDAD].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetCANTIDADIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesCANTIDAD].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetIMPORTE_UNIDADValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_UNIDAD].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetIMPORTE_UNIDADValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_UNIDAD].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetIMPORTE_UNIDADIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_UNIDAD].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetIMPORTE_UNIDADIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_UNIDAD].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetUNIDAD_MEDIDAValue: String;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesUNIDAD_MEDIDA].AsString;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetUNIDAD_MEDIDAValue(const aValue: String);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesUNIDAD_MEDIDA].AsString := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetUNIDAD_MEDIDAIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesUNIDAD_MEDIDA].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetUNIDAD_MEDIDAIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesUNIDAD_MEDIDA].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetDESCUENTOValue: Float;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesDESCUENTO].AsFloat;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetDESCUENTOValue(const aValue: Float);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesDESCUENTO].AsFloat := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetDESCUENTOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesDESCUENTO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetDESCUENTOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesDESCUENTO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetIMPORTE_PORTEValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_PORTE].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetIMPORTE_PORTEValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_PORTE].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetIMPORTE_PORTEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_PORTE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetIMPORTE_PORTEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_PORTE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetIMPORTE_TOTALValue: Currency;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_TOTAL].AsCurrency;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetIMPORTE_TOTALValue(const aValue: Currency);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_TOTAL].AsCurrency := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetIMPORTE_TOTALIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_TOTAL].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesIMPORTE_TOTAL].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetVISIBLEValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesVISIBLE].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetVISIBLEValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_DetallesVISIBLE].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_DetallesDataTableRules.GetVISIBLEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_DetallesVISIBLE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_DetallesDataTableRules.SetVISIBLEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_DetallesVISIBLE].AsVariant := Null;
|
|
end;
|
|
|
|
|
|
{ TPedidoCliente_Articulos_PendientesDataTableRules }
|
|
constructor TPedidoCliente_Articulos_PendientesDataTableRules.Create(aDataTable: TDADataTable);
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
destructor TPedidoCliente_Articulos_PendientesDataTableRules.Destroy;
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
function TPedidoCliente_Articulos_PendientesDataTableRules.GetID_ARTICULOValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Articulos_PendientesID_ARTICULO].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Articulos_PendientesDataTableRules.SetID_ARTICULOValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Articulos_PendientesID_ARTICULO].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Articulos_PendientesDataTableRules.GetID_ARTICULOIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Articulos_PendientesID_ARTICULO].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Articulos_PendientesDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Articulos_PendientesID_ARTICULO].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Articulos_PendientesDataTableRules.GetCANTIDAD_PEDValue: Float;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_PED].AsFloat;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Articulos_PendientesDataTableRules.SetCANTIDAD_PEDValue(const aValue: Float);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_PED].AsFloat := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Articulos_PendientesDataTableRules.GetCANTIDAD_PEDIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_PED].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Articulos_PendientesDataTableRules.SetCANTIDAD_PEDIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_PED].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Articulos_PendientesDataTableRules.GetCANTIDAD_ALBValue: Float;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_ALB].AsFloat;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Articulos_PendientesDataTableRules.SetCANTIDAD_ALBValue(const aValue: Float);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_ALB].AsFloat := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Articulos_PendientesDataTableRules.GetCANTIDAD_ALBIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_ALB].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Articulos_PendientesDataTableRules.SetCANTIDAD_ALBIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_ALB].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidoCliente_Articulos_PendientesDataTableRules.GetCANTIDAD_PENDIENTEValue: Float;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_PENDIENTE].AsFloat;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Articulos_PendientesDataTableRules.SetCANTIDAD_PENDIENTEValue(const aValue: Float);
|
|
begin
|
|
DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_PENDIENTE].AsFloat := aValue;
|
|
end;
|
|
|
|
function TPedidoCliente_Articulos_PendientesDataTableRules.GetCANTIDAD_PENDIENTEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_PENDIENTE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidoCliente_Articulos_PendientesDataTableRules.SetCANTIDAD_PENDIENTEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidoCliente_Articulos_PendientesCANTIDAD_PENDIENTE].AsVariant := Null;
|
|
end;
|
|
|
|
|
|
{ TPedidosCliente_Detalle_ColorDataTableRules }
|
|
constructor TPedidosCliente_Detalle_ColorDataTableRules.Create(aDataTable: TDADataTable);
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
destructor TPedidosCliente_Detalle_ColorDataTableRules.Destroy;
|
|
begin
|
|
inherited;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetIDValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorID].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetIDValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorID].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetIDIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorID].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetIDIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorID].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetID_DETALLEValue: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorID_DETALLE].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetID_DETALLEValue(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorID_DETALLE].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetID_DETALLEIsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorID_DETALLE].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetID_DETALLEIsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorID_DETALLE].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR1Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR1].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR1Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR1].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR1IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR1].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR1IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR1].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR2Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR2].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR2Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR2].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR2IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR2].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR2IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR2].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR3Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR3].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR3Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR3].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR3IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR3].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR3IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR3].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR4Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR4].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR4Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR4].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR4IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR4].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR4IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR4].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR5Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR5].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR5Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR5].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR5IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR5].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR5IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR5].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR6Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR6].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR6Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR6].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR6IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR6].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR6IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR6].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR7Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR7].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR7Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR7].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR7IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR7].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR7IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR7].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR8Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR8].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR8Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR8].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR8IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR8].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR8IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR8].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR9Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR9].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR9Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR9].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR9IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR9].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR9IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR9].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR10Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR10].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR10Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR10].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR10IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR10].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR10IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR10].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR11Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR11].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR11Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR11].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR11IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR11].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR11IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR11].AsVariant := Null;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR12Value: Integer;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR12].AsInteger;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR12Value(const aValue: Integer);
|
|
begin
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR12].AsInteger := aValue;
|
|
end;
|
|
|
|
function TPedidosCliente_Detalle_ColorDataTableRules.GetCOLOR12IsNull: boolean;
|
|
begin
|
|
result := DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR12].IsNull;
|
|
end;
|
|
|
|
procedure TPedidosCliente_Detalle_ColorDataTableRules.SetCOLOR12IsNull(const aValue: Boolean);
|
|
begin
|
|
if aValue then
|
|
DataTable.Fields[idx_PedidosCliente_Detalle_ColorCOLOR12].AsVariant := Null;
|
|
end;
|
|
|
|
|
|
initialization
|
|
RegisterDataTableRules(RID_PedidoCliente_Art_Colores_Pendientes, TPedidoCliente_Art_Colores_PendientesDataTableRules);
|
|
RegisterDataTableRules(RID_ListaAnosPedidos, TListaAnosPedidosDataTableRules);
|
|
RegisterDataTableRules(RID_ArticulosPendientes, TArticulosPendientesDataTableRules);
|
|
RegisterDataTableRules(RID_PedidosCliente, TPedidosClienteDataTableRules);
|
|
RegisterDataTableRules(RID_PedidosCliente_Detalles, TPedidosCliente_DetallesDataTableRules);
|
|
RegisterDataTableRules(RID_PedidoCliente_Articulos_Pendientes, TPedidoCliente_Articulos_PendientesDataTableRules);
|
|
RegisterDataTableRules(RID_PedidosCliente_Detalle_Color, TPedidosCliente_Detalle_ColorDataTableRules);
|
|
|
|
end.
|