git-svn-id: https://192.168.0.254/svn/Proyectos.AlonsoYSal_FactuGES/trunk@46 9a1d36f3-7752-2d40-8ccb-50eb49674c68
2039 lines
63 KiB
Plaintext
2039 lines
63 KiB
Plaintext
object srvFacturasCliente: TsrvFacturasCliente
|
|
OldCreateOrder = True
|
|
RequiresSession = True
|
|
SessionManager = dmServer.SessionManager
|
|
AcquireConnection = True
|
|
ConnectionName = 'IBX'
|
|
ServiceSchema = schFacturasCliente
|
|
ServiceAdapter = DABINAdapter
|
|
Left = 1168
|
|
Top = 313
|
|
Height = 490
|
|
Width = 347
|
|
object schFacturasCliente: TDASchema
|
|
ConnectionManager = dmServer.ConnectionManager
|
|
DataDictionary = dmServer.DataDictionary
|
|
Diagrams = dmServer.DADiagrams
|
|
Datasets = <
|
|
item
|
|
Params = <>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
SQL =
|
|
'select ANO from'#10'(select distinct(substr(FECHAfactura, 1,4)) as A' +
|
|
'NO'#10'from facturascliente'#10'order by 1 desc)'#10#10'UNION ALL'#10#10'select dist' +
|
|
'inct '#39'Todos'#39' as ANO'#10'from empresas'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'ANO'
|
|
TableField = 'ANO'
|
|
end>
|
|
end>
|
|
Name = 'ListaAnosFacturas'
|
|
Fields = <
|
|
item
|
|
Name = 'ANO'
|
|
DataType = datString
|
|
Size = 254
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'FACTURASCLIENTE'
|
|
SQL = 'SELECT * FROM DAR_REFERENCIA_FACTURACLIENTE'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end>
|
|
end>
|
|
Name = 'DarReferenciaFactura'
|
|
Fields = <
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'REFERENCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'V_FACTURASCLIENTE'
|
|
SQL =
|
|
'SELECT '#10' CODIGOEMPRESA, CODIGO, FECHAALTA, USUARIO, FECHAFACT' +
|
|
'URA, REFERENCIA,'#10' BASEIMPONIBLE, DESCUENTO, IMPORTEDESCUENTO,' +
|
|
' IVA, IMPORTEIVA, '#10' IMPORTETOTAL, OBSERVACIONES, FORMAPAGO, C' +
|
|
'ODIGOCONTACTO, '#10' NIFCIF, NOMBRE, CALLE, PROVINCIA, CODIGOPOST' +
|
|
'AL, POBLACION, CODIGOALBARAN,'#10' CODIGOPRESUPUESTO, REFERENCIA_' +
|
|
'MONTAJE_PRE, REFERENCIA_MONTAJE_ALB'#10' FROM'#10' V_FACTURASCLIENTE'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'CODIGOEMPRESA'
|
|
TableField = 'CODIGOEMPRESA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGO'
|
|
TableField = 'CODIGO'
|
|
end
|
|
item
|
|
DatasetField = 'FECHAALTA'
|
|
TableField = 'FECHAALTA'
|
|
end
|
|
item
|
|
DatasetField = 'USUARIO'
|
|
TableField = 'USUARIO'
|
|
end
|
|
item
|
|
DatasetField = 'FECHAFACTURA'
|
|
TableField = 'FECHAFACTURA'
|
|
end
|
|
item
|
|
DatasetField = 'BASEIMPONIBLE'
|
|
TableField = 'BASEIMPONIBLE'
|
|
end
|
|
item
|
|
DatasetField = 'DESCUENTO'
|
|
TableField = 'DESCUENTO'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTEDESCUENTO'
|
|
TableField = 'IMPORTEDESCUENTO'
|
|
end
|
|
item
|
|
DatasetField = 'IVA'
|
|
TableField = 'IVA'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTEIVA'
|
|
TableField = 'IMPORTEIVA'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTETOTAL'
|
|
TableField = 'IMPORTETOTAL'
|
|
end
|
|
item
|
|
DatasetField = 'OBSERVACIONES'
|
|
TableField = 'OBSERVACIONES'
|
|
end
|
|
item
|
|
DatasetField = 'FORMAPAGO'
|
|
TableField = 'FORMAPAGO'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOCONTACTO'
|
|
TableField = 'CODIGOCONTACTO'
|
|
end
|
|
item
|
|
DatasetField = 'NIFCIF'
|
|
TableField = 'NIFCIF'
|
|
end
|
|
item
|
|
DatasetField = 'NOMBRE'
|
|
TableField = 'NOMBRE'
|
|
end
|
|
item
|
|
DatasetField = 'CALLE'
|
|
TableField = 'CALLE'
|
|
end
|
|
item
|
|
DatasetField = 'PROVINCIA'
|
|
TableField = 'PROVINCIA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOPOSTAL'
|
|
TableField = 'CODIGOPOSTAL'
|
|
end
|
|
item
|
|
DatasetField = 'POBLACION'
|
|
TableField = 'POBLACION'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOALBARAN'
|
|
TableField = 'CODIGOALBARAN'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOPRESUPUESTO'
|
|
TableField = 'CODIGOPRESUPUESTO'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA_MONTAJE_PRE'
|
|
TableField = 'REFERENCIA_MONTAJE_PRE'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA_MONTAJE_ALB'
|
|
TableField = 'REFERENCIA_MONTAJE_ALB'
|
|
end>
|
|
end>
|
|
Name = 'FacturasCliente'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOEMPRESA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOEMPRESA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOFACTURACLIENTE'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAALTA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'FECHAALTA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'USUARIO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAFACTURA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'FECHAFACTURA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'REFERENCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'BASEIMPONIBLE'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'BASEIMPONIBLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'DESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'DESCUENTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEDESCUENTO'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTEDESCUENTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IVA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEIVA'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTEIVA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTETOTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'OBSERVACIONES'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'OBSERVACIONES'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FORMAPAGO'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'FORMAPAGO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOCONTACTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOCONTACTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NIFCIF'
|
|
DataType = datString
|
|
Size = 10
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'NIFCIF'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'NOMBRE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CALLE'
|
|
DataType = datString
|
|
Size = 150
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CALLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'PROVINCIA'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'PROVINCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOPOSTAL'
|
|
DataType = datString
|
|
Size = 5
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOPOSTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POBLACION'
|
|
DataType = datString
|
|
Size = 40
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'POBLACION'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOALBARAN'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOPRESUPUESTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA_MONTAJE_PRE'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA_MONTAJE_ALB'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGOFACTURA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'DETALLESFACTURASCLIENTE'
|
|
SQL =
|
|
'SELECT '#10' CODIGOFACTURA, NUMCONCEPTO, DESCRIPCION, CANTIDAD, '#10 +
|
|
' IMPORTEUNIDAD, IMPORTETOTAL, POSICION, TIPO, VISIBLE, VALORA' +
|
|
'DO'#10' FROM'#10' DETALLESFACTURASCLIENTE'#10' WHERE CODIGOFACTURA = :C' +
|
|
'ODIGOFACTURA'#10' ORDER BY POSICION;'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'NUMCONCEPTO'
|
|
TableField = 'NUMCONCEPTO'
|
|
end
|
|
item
|
|
DatasetField = 'DESCRIPCION'
|
|
TableField = 'DESCRIPCION'
|
|
end
|
|
item
|
|
DatasetField = 'CANTIDAD'
|
|
TableField = 'CANTIDAD'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTEUNIDAD'
|
|
TableField = 'IMPORTEUNIDAD'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTETOTAL'
|
|
TableField = 'IMPORTETOTAL'
|
|
end
|
|
item
|
|
DatasetField = 'POSICION'
|
|
TableField = 'POSICION'
|
|
end
|
|
item
|
|
DatasetField = 'TIPO'
|
|
TableField = 'TIPO'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOFACTURA'
|
|
TableField = 'CODIGOFACTURA'
|
|
end
|
|
item
|
|
DatasetField = 'VISIBLE'
|
|
TableField = 'VISIBLE'
|
|
end
|
|
item
|
|
DatasetField = 'VALORADO'
|
|
TableField = 'VALORADO'
|
|
end>
|
|
end>
|
|
Name = 'DetallesFacturasCliente'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOFACTURA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOFACTURACLIENTE'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NUMCONCEPTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'NUMCONCEPTO'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POSICION'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'POSICIONCONCEPTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'TIPO'
|
|
DataType = datString
|
|
Size = 1
|
|
Description = 'Cap'#237'tulo, etc'
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'TIPODETALLESFACTURACLIENTE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'DESCRIPCION'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CANTIDAD'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CANTIDAD'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEUNIDAD'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTEUNIDAD'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTETOTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'VISIBLE'
|
|
DataType = datString
|
|
Size = 1
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'DetallesFacturasCliente_VISIBLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'VALORADO'
|
|
DataType = datString
|
|
Size = 1
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'FACTURASCLIENTE'
|
|
SQL =
|
|
'SELECT '#10' CODIGOEMPRESA, CODIGO, FECHAALTA, USUARIO, FECHAFACT' +
|
|
'URA, REFERENCIA,'#10' BASEIMPONIBLE, DESCUENTO, IMPORTEDESCUENTO,' +
|
|
' IVA, IMPORTEIVA, '#10' IMPORTETOTAL, OBSERVACIONES, FORMAPAGO, C' +
|
|
'ODIGOCONTACTO, '#10' NIFCIF, NOMBRE, CALLE, PROVINCIA, CODIGOPOST' +
|
|
'AL, POBLACION'#10' FROM'#10' FACTURASCLIENTE'#10' WHERE CODIGO = :CODIG' +
|
|
'O'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'CODIGOEMPRESA'
|
|
TableField = 'CODIGOEMPRESA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGO'
|
|
TableField = 'CODIGO'
|
|
end
|
|
item
|
|
DatasetField = 'FECHAALTA'
|
|
TableField = 'FECHAALTA'
|
|
end
|
|
item
|
|
DatasetField = 'USUARIO'
|
|
TableField = 'USUARIO'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOCONTACTO'
|
|
TableField = 'CODIGOCONTACTO'
|
|
end
|
|
item
|
|
DatasetField = 'BASEIMPONIBLE'
|
|
TableField = 'BASEIMPONIBLE'
|
|
end
|
|
item
|
|
DatasetField = 'DESCUENTO'
|
|
TableField = 'DESCUENTO'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTEDESCUENTO'
|
|
TableField = 'IMPORTEDESCUENTO'
|
|
end
|
|
item
|
|
DatasetField = 'IVA'
|
|
TableField = 'IVA'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTEIVA'
|
|
TableField = 'IMPORTEIVA'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTETOTAL'
|
|
TableField = 'IMPORTETOTAL'
|
|
end
|
|
item
|
|
DatasetField = 'OBSERVACIONES'
|
|
TableField = 'OBSERVACIONES'
|
|
end
|
|
item
|
|
DatasetField = 'FORMAPAGO'
|
|
TableField = 'FORMAPAGO'
|
|
end
|
|
item
|
|
DatasetField = 'NOMBRE'
|
|
TableField = 'NOMBRE'
|
|
end
|
|
item
|
|
DatasetField = 'NIFCIF'
|
|
TableField = 'NIFCIF'
|
|
end
|
|
item
|
|
DatasetField = 'CALLE'
|
|
TableField = 'CALLE'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOPOSTAL'
|
|
TableField = 'CODIGOPOSTAL'
|
|
end
|
|
item
|
|
DatasetField = 'POBLACION'
|
|
TableField = 'POBLACION'
|
|
end
|
|
item
|
|
DatasetField = 'FECHAFACTURA'
|
|
TableField = 'FECHAFACTURA'
|
|
end
|
|
item
|
|
DatasetField = 'PROVINCIA'
|
|
TableField = 'PROVINCIA'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end>
|
|
end>
|
|
Name = 'InformeCabeceraFacturaCliente'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOEMPRESA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOEMPRESA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOFACTURACLIENTE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAALTA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'FECHAALTA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'USUARIO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAFACTURA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'FECHAFACTURACLIENTE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'REFERENCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOCONTACTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOCONTACTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'BASEIMPONIBLE'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'BASEIMPONIBLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'DESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'DESCUENTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEDESCUENTO'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTEDESCUENTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IVA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEIVA'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTEIVA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTETOTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'OBSERVACIONES'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'OBSERVACIONES'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FORMAPAGO'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'FORMAPAGO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NIFCIF'
|
|
DataType = datString
|
|
Size = 10
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'NIFCIF'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'NOMBRE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CALLE'
|
|
DataType = datString
|
|
Size = 150
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CALLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'PROVINCIA'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'PROVINCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOPOSTAL'
|
|
DataType = datString
|
|
Size = 5
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOPOSTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POBLACION'
|
|
DataType = datString
|
|
Size = 40
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'POBLACION'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGOFACTURA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'DETALLESFACTURASCLIENTE'
|
|
SQL =
|
|
'SELECT '#10' CODIGOFACTURA, NUMCONCEPTO, DESCRIPCION, CANTIDAD, '#10 +
|
|
' IMPORTEUNIDAD, IMPORTETOTAL, POSICION, TIPO, VALORADO'#10'FROM D' +
|
|
'ETALLESFACTURASCLIENTE'#10'WHERE CODIGOFACTURA = :CODIGOFACTURA AND'#10 +
|
|
'VISIBLE = '#39'S'#39#10'ORDER BY POSICION'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'NUMCONCEPTO'
|
|
TableField = 'NUMCONCEPTO'
|
|
end
|
|
item
|
|
DatasetField = 'DESCRIPCION'
|
|
TableField = 'DESCRIPCION'
|
|
end
|
|
item
|
|
DatasetField = 'CANTIDAD'
|
|
TableField = 'CANTIDAD'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTEUNIDAD'
|
|
TableField = 'IMPORTEUNIDAD'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTETOTAL'
|
|
TableField = 'IMPORTETOTAL'
|
|
end
|
|
item
|
|
DatasetField = 'TIPO'
|
|
TableField = 'TIPO'
|
|
end
|
|
item
|
|
DatasetField = 'POSICION'
|
|
TableField = 'POSICION'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOFACTURA'
|
|
TableField = 'CODIGOFACTURA'
|
|
end
|
|
item
|
|
DatasetField = 'VALORADO'
|
|
TableField = 'VALORADO'
|
|
end>
|
|
end>
|
|
Name = 'InformeDetallesFacturaCliente'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOFACTURA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOFACTURACLIENTE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NUMCONCEPTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'NUMCONCEPTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'DESCRIPCION'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CANTIDAD'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CANTIDAD'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEUNIDAD'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTEUNIDAD'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTETOTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'TIPO'
|
|
DataType = datString
|
|
Size = 1
|
|
Description = 'Cap'#237'tulo, etc'
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'TIPODETALLESFACTURACLIENTE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POSICION'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'POSICIONCONCEPTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'VALORADO'
|
|
DataType = datString
|
|
Size = 1
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'V_FACTURASCLIENTE'
|
|
SQL =
|
|
'SELECT '#10' CODIGOEMPRESA, CODIGO, REFERENCIA, CODIGOALBARAN,'#10' ' +
|
|
' CODIGOPRESUPUESTO, REFERENCIA_MONTAJE_PRE, REFERENCIA_MONTAJE_' +
|
|
'ALB'#10' FROM'#10' V_FACTURASCLIENTE'#10'WHERE V_FACTURASCLIENTE.CODIGO ' +
|
|
'= :CODIGO'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'CODIGOEMPRESA'
|
|
TableField = 'CODIGOEMPRESA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGO'
|
|
TableField = 'CODIGO'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOALBARAN'
|
|
TableField = 'CODIGOALBARAN'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOPRESUPUESTO'
|
|
TableField = 'CODIGOPRESUPUESTO'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA_MONTAJE_PRE'
|
|
TableField = 'REFERENCIA_MONTAJE_PRE'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA_MONTAJE_ALB'
|
|
TableField = 'REFERENCIA_MONTAJE_ALB'
|
|
end>
|
|
end>
|
|
Name = 'FacturasCliente_RefresDataSet'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOEMPRESA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGO'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'REFERENCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOALBARAN'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOPRESUPUESTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA_MONTAJE_PRE'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA_MONTAJE_ALB'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end>
|
|
Commands = <
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGOEMPRESA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAALTA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAFACTURA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'BASEIMPONIBLE'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'DESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'IMPORTEDESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'IVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'IMPORTEIVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'OBSERVACIONES'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FORMAPAGO'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOCONTACTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'NIFCIF'
|
|
DataType = datString
|
|
Size = 10
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CALLE'
|
|
DataType = datString
|
|
Size = 150
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'PROVINCIA'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOPOSTAL'
|
|
DataType = datString
|
|
Size = 5
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'POBLACION'
|
|
DataType = datString
|
|
Size = 40
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOALBARAN'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOPRESUPUESTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'FACTURASCLIENTE'
|
|
SQL =
|
|
'INSERT'#10' INTO FACTURASCLIENTE'#10' (CODIGOEMPRESA, CODIGO, FECHAA' +
|
|
'LTA, USUARIO, FECHAFACTURA, '#10' BASEIMPONIBLE, DESCUENTO, IMPO' +
|
|
'RTEDESCUENTO, IVA, IMPORTEIVA, '#10' IMPORTETOTAL, OBSERVACIONES' +
|
|
', FORMAPAGO, CODIGOCONTACTO, '#10' NIFCIF, NOMBRE, CALLE, PROVIN' +
|
|
'CIA, CODIGOPOSTAL, POBLACION, '#10' REFERENCIA, CODIGOALBARAN, C' +
|
|
'ODIGOPRESUPUESTO)'#10' VALUES'#10' (:CODIGOEMPRESA, :CODIGO, :FECHAA' +
|
|
'LTA, :USUARIO, :FECHAFACTURA, '#10' :BASEIMPONIBLE, :DESCUENTO, ' +
|
|
':IMPORTEDESCUENTO, :IVA, '#10' :IMPORTEIVA, :IMPORTETOTAL, :OBSE' +
|
|
'RVACIONES, :FORMAPAGO, '#10' :CODIGOCONTACTO, :NIFCIF, :NOMBRE, ' +
|
|
':CALLE, :PROVINCIA, '#10' :CODIGOPOSTAL, :POBLACION, :REFERENCIA' +
|
|
', :CODIGOALBARAN, :CODIGOPRESUPUESTO)'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Insert_FacturasCliente'
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'OLD_CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'FACTURASCLIENTE'
|
|
SQL =
|
|
'DELETE '#10' FROM'#10' FACTURASCLIENTE'#10' WHERE'#10' (CODIGO = :OLD_CO' +
|
|
'DIGO)'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Delete_FacturasCliente'
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGOEMPRESA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAALTA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAFACTURA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'BASEIMPONIBLE'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'DESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'IMPORTEDESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'IVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'IMPORTEIVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'OBSERVACIONES'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FORMAPAGO'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOCONTACTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'NIFCIF'
|
|
DataType = datString
|
|
Size = 10
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CALLE'
|
|
DataType = datString
|
|
Size = 150
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'PROVINCIA'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOPOSTAL'
|
|
DataType = datString
|
|
Size = 5
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'POBLACION'
|
|
DataType = datString
|
|
Size = 40
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOALBARAN'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOPRESUPUESTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'OLD_CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'FACTURASCLIENTE'
|
|
SQL =
|
|
'UPDATE FACTURASCLIENTE'#10' SET '#10' CODIGOEMPRESA = :CODIGOEMPRESA' +
|
|
', '#10' CODIGO = :CODIGO, '#10' FECHAALTA = :FECHAALTA, '#10' USUAR' +
|
|
'IO = :USUARIO, '#10' FECHAFACTURA = :FECHAFACTURA, '#10' BASEIMPON' +
|
|
'IBLE = :BASEIMPONIBLE, '#10' DESCUENTO = :DESCUENTO, '#10' IMPORTE' +
|
|
'DESCUENTO = :IMPORTEDESCUENTO, '#10' IVA = :IVA, '#10' IMPORTEIVA ' +
|
|
'= :IMPORTEIVA, '#10' IMPORTETOTAL = :IMPORTETOTAL, '#10' OBSERVACI' +
|
|
'ONES = :OBSERVACIONES, '#10' FORMAPAGO = :FORMAPAGO, '#10' CODIGOC' +
|
|
'ONTACTO = :CODIGOCONTACTO, '#10' NIFCIF = :NIFCIF, '#10' NOMBRE = ' +
|
|
':NOMBRE, '#10' CALLE = :CALLE, '#10' PROVINCIA = :PROVINCIA, '#10' ' +
|
|
'CODIGOPOSTAL = :CODIGOPOSTAL, '#10' POBLACION = :POBLACION, '#10' ' +
|
|
'REFERENCIA = :REFERENCIA, '#10' CODIGOALBARAN = :CODIGOALBARAN,'#10' ' +
|
|
' CODIGOPRESUPUESTO = :CODIGOPRESUPUESTO'#10' WHERE'#10' (CODIGO = ' +
|
|
':OLD_CODIGO)'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Update_FacturasCliente'
|
|
end>
|
|
RelationShips = <
|
|
item
|
|
Name = 'FK_DetallesFacturasCliente_FacturasCliente'
|
|
MasterDatasetName = 'FacturasCliente'
|
|
MasterFields = 'CODIGO'
|
|
DetailDatasetName = 'DetallesFacturasCliente'
|
|
DetailFields = 'CODIGOFACTURA'
|
|
end
|
|
item
|
|
Name = 'FK_InformeDetallesFacturaCliente_InformeCabeceraFacturaCliente'
|
|
MasterDatasetName = 'InformeCabeceraFacturaCliente'
|
|
MasterFields = 'CODIGO'
|
|
DetailDatasetName = 'InformeDetallesFacturaCliente'
|
|
DetailFields = 'CODIGOFACTURA'
|
|
end>
|
|
UpdateRules = <
|
|
item
|
|
Name = 'Insert FacturasCliente'
|
|
DoUpdate = False
|
|
DoInsert = True
|
|
DoDelete = False
|
|
DatasetName = 'FacturasCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Update FacturasCliente'
|
|
DoUpdate = True
|
|
DoInsert = False
|
|
DoDelete = False
|
|
DatasetName = 'FacturasCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Delete DetallesFacturasCliente'
|
|
DoUpdate = False
|
|
DoInsert = False
|
|
DoDelete = True
|
|
DatasetName = 'DetallesFacturasCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Insert DetallesFacturasCliente'
|
|
DoUpdate = False
|
|
DoInsert = True
|
|
DoDelete = False
|
|
DatasetName = 'DetallesFacturasCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Update DetallesFacturasCliente'
|
|
DoUpdate = True
|
|
DoInsert = False
|
|
DoDelete = False
|
|
DatasetName = 'DetallesFacturasCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Delete FacturasCliente'
|
|
DoUpdate = False
|
|
DoInsert = False
|
|
DoDelete = True
|
|
DatasetName = 'FacturasCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end>
|
|
Left = 48
|
|
Top = 24
|
|
end
|
|
object frxDBDetalles: TfrxDBDataset
|
|
UserName = 'frxDBDetalles'
|
|
CloseDataSource = False
|
|
DataSource = DADataDetalles
|
|
Left = 200
|
|
Top = 128
|
|
end
|
|
object frxDBCabecera: TfrxDBDataset
|
|
UserName = 'frxDBCabecera'
|
|
CloseDataSource = False
|
|
DataSource = DADataCabecera
|
|
Left = 120
|
|
Top = 128
|
|
end
|
|
object DADataCabecera: TDADataSource
|
|
DataTable = tbl_FacturaCliente
|
|
Left = 120
|
|
Top = 176
|
|
end
|
|
object DADataDetalles: TDADataSource
|
|
DataTable = tbl_DetallesFacturaCliente
|
|
Left = 200
|
|
Top = 176
|
|
end
|
|
object frxReport1: TfrxReport
|
|
Version = '3.23.7'
|
|
DotMatrixReport = False
|
|
EngineOptions.DoublePass = True
|
|
IniFile = '\Software\Fast Reports'
|
|
PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator]
|
|
PreviewOptions.OutlineWidth = 180
|
|
PreviewOptions.Zoom = 1.000000000000000000
|
|
PrintOptions.Printer = 'Default'
|
|
ReportOptions.CreateDate = 37871.995398692100000000
|
|
ReportOptions.Description.Strings = (
|
|
'Demonstrates how to create simple list report.')
|
|
ReportOptions.LastChange = 43748.663813726850000000
|
|
ReportOptions.VersionBuild = '1'
|
|
ReportOptions.VersionMajor = '12'
|
|
ReportOptions.VersionMinor = '13'
|
|
ReportOptions.VersionRelease = '1'
|
|
ScriptLanguage = 'PascalScript'
|
|
ScriptText.Strings = (
|
|
'procedure PresupuestoRelOnBeforePrint(Sender: TfrxComponent);'
|
|
'begin'
|
|
' PresupuestoRel.Lines.Clear;'
|
|
' if <frxDBCabecera."REFERENCIAPRE"> = '#39#39' then'
|
|
' PresupuestoRel.Lines.Add('#39'-'#39')'
|
|
' else'
|
|
|
|
' PresupuestoRel.Lines.Add(<frxDBCabecera."REFERENCIAPRE' +
|
|
'">);'
|
|
'end;'
|
|
''
|
|
'procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);'
|
|
'var'
|
|
' cadenaAux: String;'
|
|
'begin'
|
|
' DatosCliente.Lines.Clear;'
|
|
' DatosCliente.Lines.Add(<frxDBCabecera."CALLE">);'
|
|
''
|
|
' if (<frxDBCabecera."CODIGOPOSTAL"> <> '#39#39')'
|
|
' or (<frxDBCabecera."POBLACION"> <> '#39#39') then'
|
|
|
|
' DatosCliente.Lines.Add(<frxDBCabecera."CODIGOPOSTAL"> + <fr' +
|
|
'xDBCabecera."POBLACION">);'
|
|
''
|
|
' CadenaAux := '#39#39';'
|
|
' if <frxDBCabecera."TELEFONO1"> <> '#39#39' then'
|
|
' if CadenaAux = '#39#39' then'
|
|
|
|
' CadenaAux := CadenaAux + '#39'Telf:'#39' + <frxDBCabecera."TELEF' +
|
|
'ONO1">'
|
|
' else'
|
|
|
|
' CadenaAux := CadenaAux + '#39' / '#39' + <frxDBCabecera."TELEFON' +
|
|
'O1">;'
|
|
''
|
|
' if <frxDBCabecera."TELEFONO2"> <> '#39#39' then'
|
|
' if CadenaAux = '#39#39' then'
|
|
|
|
' CadenaAux := CadenaAux + '#39'Telf:'#39' + <frxDBCabecera."TELEF' +
|
|
'ONO2">'
|
|
' else'
|
|
|
|
' CadenaAux := CadenaAux + '#39' / '#39' + <frxDBCabecera."TELEFON' +
|
|
'O2">;'
|
|
''
|
|
' if <frxDBCabecera."MOVIL"> <> '#39#39' then'
|
|
' if CadenaAux = '#39#39' then'
|
|
|
|
' CadenaAux := CadenaAux + '#39'Telf:'#39' + <frxDBCabecera."MOVIL' +
|
|
'">'
|
|
' else'
|
|
|
|
' CadenaAux := CadenaAux + '#39' / '#39' + <frxDBCabecera."MOVIL">' +
|
|
';'
|
|
''
|
|
' DatosCliente.Lines.Add(CadenaAux);'
|
|
'end;'
|
|
''
|
|
'procedure BandaDetallesOnBeforePrint(Sender: TfrxComponent);'
|
|
'begin'
|
|
' case <frxDBDetalles."TIPO"> of'
|
|
' '#39'C'#39': begin'
|
|
' MemoCampo12.Style := '#39'Concepto normal'#39';'
|
|
' MemoCampo2.Style := '#39'Concepto normal'#39';'
|
|
' MemoCampo3.Style := '#39'Concepto normal'#39';'
|
|
' MemoCampo4.Style := '#39'Concepto normal'#39';'
|
|
' end;'
|
|
' '#39'S'#39': begin'
|
|
' MemoCampo12.Style := '#39'Concepto subtotal'#39';'
|
|
' MemoCampo2.Style := '#39'Concepto subtotal'#39';'
|
|
' MemoCampo3.Style := '#39'Concepto subtotal'#39';'
|
|
' MemoCampo4.Style := '#39'Concepto subtotal'#39';'
|
|
' end;'
|
|
' '#39'T'#39': begin'
|
|
' MemoCampo12.Style := '#39'Concepto titulo'#39';'
|
|
' MemoCampo2.Style := '#39'Concepto titulo'#39';'
|
|
' MemoCampo3.Style := '#39'Concepto titulo'#39';'
|
|
' MemoCampo4.Style := '#39'Concepto titulo'#39';'
|
|
' end;'
|
|
' end;'
|
|
'end;'
|
|
''
|
|
'procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);'
|
|
'begin'
|
|
|
|
' Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSum' +
|
|
'mary1.Height - 1;'
|
|
'end;'
|
|
''
|
|
'procedure MemoCampo3OnBeforePrint(Sender: TfrxComponent);'
|
|
'begin'
|
|
' case <frxDBDetalles."VALORADO"> of'
|
|
' '#39'S'#39': begin'
|
|
' MemoCampo3.Visible := True;'
|
|
' MemoCampo4.Visible := True;'
|
|
' end;'
|
|
' '#39'N'#39': begin'
|
|
' MemoCampo3.Visible := False;'
|
|
' MemoCampo4.Visible := False;'
|
|
' end;'
|
|
' end;'
|
|
'end;'
|
|
''
|
|
'begin'
|
|
''
|
|
'end.')
|
|
StoreInDFM = False
|
|
Left = 40
|
|
Top = 128
|
|
Datasets = <
|
|
item
|
|
DataSet = frxDBCabecera
|
|
DataSetName = 'frxDBCabecera'
|
|
end
|
|
item
|
|
DataSet = frxDBDetalles
|
|
DataSetName = 'frxDBDetalles'
|
|
end>
|
|
Variables = <>
|
|
Style = <
|
|
item
|
|
Name = 'Concepto normal'
|
|
Color = clNone
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
end
|
|
item
|
|
Name = 'Concepto subtotal'
|
|
Color = 15790320
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
end
|
|
item
|
|
Name = 'Cabecera de columna'
|
|
Color = 15790320
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
|
|
end
|
|
item
|
|
Name = 'Concepto titulo'
|
|
Color = clNone
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
end>
|
|
end
|
|
object tbl_FacturaCliente: TDACDSDataTable
|
|
RemoteUpdatesOptions = []
|
|
Fields = <>
|
|
Params = <>
|
|
MasterMappingMode = mmDataRequest
|
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
|
RemoteFetchEnabled = False
|
|
SchemaCall.Params = <>
|
|
DataRequestCall.Params = <>
|
|
DataUpdateCall.Params = <>
|
|
ScriptCall.Params = <>
|
|
ReadOnly = False
|
|
Adapter = DABINAdapter
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
IndexDefs = <>
|
|
Left = 120
|
|
Top = 232
|
|
end
|
|
object tbl_DetallesFacturaCliente: TDACDSDataTable
|
|
RemoteUpdatesOptions = []
|
|
Fields = <>
|
|
Params = <>
|
|
MasterMappingMode = mmDataRequest
|
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
|
RemoteFetchEnabled = False
|
|
SchemaCall.Params = <>
|
|
DataRequestCall.Params = <>
|
|
DataUpdateCall.Params = <>
|
|
ScriptCall.Params = <>
|
|
ReadOnly = False
|
|
Adapter = DABINAdapter
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
IndexDefs = <>
|
|
Left = 200
|
|
Top = 232
|
|
end
|
|
object frxBarCodeObject1: TfrxBarCodeObject
|
|
Left = 24
|
|
Top = 296
|
|
end
|
|
object frxOLEObject1: TfrxOLEObject
|
|
Left = 56
|
|
Top = 296
|
|
end
|
|
object frxChartObject1: TfrxChartObject
|
|
Left = 24
|
|
Top = 328
|
|
end
|
|
object frxRichObject1: TfrxRichObject
|
|
Left = 56
|
|
Top = 328
|
|
end
|
|
object frxCrossObject1: TfrxCrossObject
|
|
Left = 88
|
|
Top = 296
|
|
end
|
|
object frxCheckBoxObject1: TfrxCheckBoxObject
|
|
Left = 88
|
|
Top = 328
|
|
end
|
|
object frxGradientObject1: TfrxGradientObject
|
|
Left = 24
|
|
Top = 360
|
|
end
|
|
object frxDotMatrixExport1: TfrxDotMatrixExport
|
|
UseFileCache = True
|
|
ShowProgress = True
|
|
EscModel = 0
|
|
GraphicFrames = False
|
|
SaveToFile = False
|
|
UseIniSettings = True
|
|
Left = 56
|
|
Top = 360
|
|
end
|
|
object frxDialogControls1: TfrxDialogControls
|
|
Left = 88
|
|
Top = 360
|
|
end
|
|
object DABINAdapter: TDABINAdapter
|
|
Left = 48
|
|
Top = 72
|
|
end
|
|
object bpFacturasCliente: TDABusinessProcessor
|
|
Schema = schFacturasCliente
|
|
InsertCommandName = 'Insert_FacturasCliente'
|
|
DeleteCommandName = 'Delete_FacturasCliente'
|
|
UpdateCommandName = 'Update_FacturasCliente'
|
|
RefreshDatasetName = 'FacturasCliente_RefresDataSet'
|
|
ReferencedDataset = 'FacturasCliente'
|
|
ProcessorOptions = [poPrepareCommands]
|
|
UpdateMode = updWhereKeyOnly
|
|
Left = 208
|
|
Top = 24
|
|
end
|
|
end
|