roberto
ec0020ddfc
git-svn-id: https://192.168.0.254/svn/Proyectos.AlonsoYSal_FactuGES/trunk@37 9a1d36f3-7752-2d40-8ccb-50eb49674c68
1986 lines
62 KiB
Plaintext
1986 lines
62 KiB
Plaintext
object srvAlbaranesCliente: TsrvAlbaranesCliente
|
|
OldCreateOrder = True
|
|
RequiresSession = True
|
|
SessionManager = dmServer.SessionManager
|
|
AcquireConnection = True
|
|
ConnectionName = 'IBX'
|
|
ServiceSchema = schAlbaranesCliente
|
|
ServiceAdapter = DABINAdapter
|
|
Left = 681
|
|
Top = 255
|
|
Height = 463
|
|
Width = 347
|
|
object schAlbaranesCliente: 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(FECHAALBARAN, 1,4)) as A' +
|
|
'NO'#10'from albaranpago'#10'order by 1 desc)'#10#10'UNION ALL'#10#10'select distinct' +
|
|
' '#39'Todos'#39' as ANO'#10'from empresas'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'ANO'
|
|
TableField = 'ANO'
|
|
end>
|
|
end>
|
|
Name = 'ListaAnosAlbaranes'
|
|
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 = 'ALBARANPAGO'
|
|
SQL = 'SELECT * FROM DAR_REFERENCIA_ALBARAN'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end>
|
|
end>
|
|
Name = 'DarReferenciaAlbaran'
|
|
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 = 'ALBARANPAGO'
|
|
SQL =
|
|
'SELECT ALBARANPAGO.CODIGOEMPRESA, ALBARANPAGO.CODIGO, ALBARANPAG' +
|
|
'O.FECHAALTA,'#10' ALBARANPAGO.USUARIO, ALBARANPAGO.REFERENCIA,' +
|
|
' ALBARANPAGO.CODIGOCONTACTO,'#10' CONTACTOS.NOMBRE, ALBARANPAG' +
|
|
'O.FECHAALBARAN, ALBARANPAGO.SITUACION,'#10' ALBARANPAGO.FECHAP' +
|
|
'AGO, ALBARANPAGO.BASEIMPONIBLE, ALBARANPAGO.DESCUENTO,'#10' AL' +
|
|
'BARANPAGO.IMPORTEDESCUENTO, ALBARANPAGO.IVA, ALBARANPAGO.IMPORTE' +
|
|
'IVA,'#10' ALBARANPAGO.IMPORTETOTAL, ALBARANPAGO.OBSERVACIONES,' +
|
|
#10' ALBARANPAGO.FORMAPAGO, ALBARANPAGO.CODIGOPRESUPUESTO,'#10' ' +
|
|
' MONTAJES.REFERENCIA as REFERENCIAPRESUPUESTO'#10'FROM ALBARANPA' +
|
|
'GO'#10' INNER JOIN CONTACTOS ON (ALBARANPAGO.CODIGOCONTACTO = CONT' +
|
|
'ACTOS.CODIGO)'#10' LEFT OUTER JOIN MONTAJES ON (ALBARANPAGO.CODIGO' +
|
|
'PRESUPUESTO = MONTAJES.CODIGOPRESUPUESTO)'
|
|
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 = 'FECHAALBARAN'
|
|
TableField = 'FECHAALBARAN'
|
|
end
|
|
item
|
|
DatasetField = 'SITUACION'
|
|
TableField = 'SITUACION'
|
|
end
|
|
item
|
|
DatasetField = 'FECHAPAGO'
|
|
TableField = 'FECHAPAGO'
|
|
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 = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOPRESUPUESTO'
|
|
TableField = 'CODIGOPRESUPUESTO'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIAPRESUPUESTO'
|
|
TableField = 'REFERENCIAPRESUPUESTO'
|
|
end>
|
|
end>
|
|
Name = 'AlbaranCliente'
|
|
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 = 'CODIGOALBARANCLIENTE'
|
|
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 = '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 = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Nombre'
|
|
Alignment = taLeftJustify
|
|
ServerAutoRefresh = True
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAALBARAN'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'FECHAALBARANCLIENTE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'SITUACION'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'SITUACIONALBARANCLIENTE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAPAGO'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'FECHAPAGO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOPRESUPUESTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGO (GENERICO)'
|
|
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 = 'REFERENCIAPRESUPUESTO'
|
|
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 = 'CODIGOPRESUPUESTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = '505'
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'ALBARANPAGO'
|
|
SQL =
|
|
'SELECT '#10' CODIGO'#10' FROM'#10' ALBARANPAGO'#10' WHERE CODIGOPRESUPUE' +
|
|
'STO = :CODIGOPRESUPUESTO'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'CODIGO'
|
|
TableField = 'CODIGO'
|
|
end>
|
|
end>
|
|
Name = 'AlbaranDePresupuesto'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
LogChanges = False
|
|
DictionaryEntry = 'CODIGO (GENERICO)'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGOALBARAN'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = '1'
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'DETALLESALBARANPAGO'
|
|
SQL =
|
|
'SELECT'#10' CODIGOALBARAN, NUMCONCEPTO, POSICION, TIPO, DESCRIPCI' +
|
|
'ON, CANTIDAD,'#10' IMPORTEUNIDAD, IMPORTETOTAL, VISIBLE, PUNTOS, ' +
|
|
'IMPORTEPUNTOS, VALORADO'#10' FROM'#10' DETALLESALBARANPAGO'#10' WHERE C' +
|
|
'ODIGOALBARAN = :CODIGOALBARAN'#10' ORDER BY POSICION'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'CODIGOALBARAN'
|
|
TableField = 'CODIGOALBARAN'
|
|
end
|
|
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 = 'VISIBLE'
|
|
TableField = 'VISIBLE'
|
|
end
|
|
item
|
|
DatasetField = 'PUNTOS'
|
|
TableField = 'PUNTOS'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTEPUNTOS'
|
|
TableField = 'IMPORTEPUNTOS'
|
|
end
|
|
item
|
|
DatasetField = 'VALORADO'
|
|
TableField = 'VALORADO'
|
|
end>
|
|
end>
|
|
Name = 'DetallesAlbaranCliente'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOALBARAN'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOALBARANCLIENTE'
|
|
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 = 'TIPODETALLESALBARANCLIENTE'
|
|
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 = 'VISIBLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'PUNTOS'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'PUNTOS'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEPUNTOS'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'IMPORTEPUNTOS'
|
|
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 = 'ALBARANPAGO'
|
|
SQL =
|
|
'SELECT ALBARANPAGO.CODIGO, CONTACTOS.NOMBRE, ALBARANPAGO.SITUACI' +
|
|
'ON,'#10' MONTAJES.REFERENCIA as REFERENCIAPRESUPUESTO'#10'FROM ALB' +
|
|
'ARANPAGO'#10' INNER JOIN CONTACTOS ON (ALBARANPAGO.CODIGOCONTACTO ' +
|
|
'= CONTACTOS.CODIGO)'#10' LEFT OUTER JOIN MONTAJES ON (ALBARANPAGO.' +
|
|
'CODIGOPRESUPUESTO = MONTAJES.CODIGOPRESUPUESTO)'#10'WHERE'#10' ALBAR' +
|
|
'ANPAGO.CODIGO = :CODIGO'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'CODIGO'
|
|
TableField = 'CODIGO'
|
|
end
|
|
item
|
|
DatasetField = 'NOMBRE'
|
|
TableField = 'NOMBRE'
|
|
end
|
|
item
|
|
DatasetField = 'SITUACION'
|
|
TableField = 'SITUACION'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIAPRESUPUESTO'
|
|
TableField = 'REFERENCIAPRESUPUESTO'
|
|
end>
|
|
end>
|
|
Name = 'AlbaranCliente_RefreshDataset'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'CODIGOALBARANCLIENTE'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'SITUACION'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIAPRESUPUESTO'
|
|
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 = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'ALBARANPAGO'
|
|
SQL =
|
|
'SELECT ALBARANPAGO.CODIGOEMPRESA, ALBARANPAGO.CODIGO, ALBARANPAG' +
|
|
'O.FECHAALTA,'#10' ALBARANPAGO.USUARIO, ALBARANPAGO.REFERENCIA,' +
|
|
' ALBARANPAGO.CODIGOCONTACTO,'#10' ALBARANPAGO.FECHAALBARAN, AL' +
|
|
'BARANPAGO.SITUACION, ALBARANPAGO.FECHAPAGO,'#10' ALBARANPAGO.B' +
|
|
'ASEIMPONIBLE, ALBARANPAGO.DESCUENTO, ALBARANPAGO.IMPORTEDESCUENT' +
|
|
'O,'#10' ALBARANPAGO.IVA, ALBARANPAGO.IMPORTEIVA, ALBARANPAGO.I' +
|
|
'MPORTETOTAL,'#10' ALBARANPAGO.OBSERVACIONES, ALBARANPAGO.FORMA' +
|
|
'PAGO,'#10' ALBARANPAGO.CODIGOPRESUPUESTO, MONTAJES.REFERENCIA ' +
|
|
'as REFERENCIAPRE,'#10' '#10'CO.NIFCIF, CO.NOMBRE, CO.CALLE, CO.COD' +
|
|
'IGOPOSTAL, CO.POBLACION, CO.TELEFONO1,'#10'CO.TELEFONO2, CO.MOVIL'#10#10'F' +
|
|
'ROM ALBARANPAGO'#10'INNER JOIN CONTACTOS CO ON (ALBARANPAGO.CODIGOCO' +
|
|
'NTACTO = CO.CODIGO)'#10'LEFT OUTER JOIN MONTAJES ON (ALBARANPAGO.COD' +
|
|
'IGOPRESUPUESTO = MONTAJES.CODIGOPRESUPUESTO)'#10'WHERE ALBARANPAGO.C' +
|
|
'ODIGO = :CODIGO'
|
|
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 = 'FECHAALBARAN'
|
|
TableField = 'FECHAALBARAN'
|
|
end
|
|
item
|
|
DatasetField = 'SITUACION'
|
|
TableField = 'SITUACION'
|
|
end
|
|
item
|
|
DatasetField = 'FECHAPAGO'
|
|
TableField = 'FECHAPAGO'
|
|
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 = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGOPRESUPUESTO'
|
|
TableField = 'CODIGOPRESUPUESTO'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIAPRE'
|
|
TableField = 'REFERENCIAPRE'
|
|
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 = 'TELEFONO1'
|
|
TableField = 'TELEFONO1'
|
|
end
|
|
item
|
|
DatasetField = 'TELEFONO2'
|
|
TableField = 'TELEFONO2'
|
|
end
|
|
item
|
|
DatasetField = 'MOVIL'
|
|
TableField = 'MOVIL'
|
|
end>
|
|
end>
|
|
Name = 'InformeCabeceraAlbaranPago'
|
|
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
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAALTA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOCONTACTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAALBARAN'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'SITUACION'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAPAGO'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'BASEIMPONIBLE'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'DESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEDESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEIVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'OBSERVACIONES'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FORMAPAGO'
|
|
DataType = datMemo
|
|
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 = 'REFERENCIAPRE'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NIFCIF'
|
|
DataType = datString
|
|
Size = 10
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CALLE'
|
|
DataType = datString
|
|
Size = 150
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOPOSTAL'
|
|
DataType = datString
|
|
Size = 5
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POBLACION'
|
|
DataType = datString
|
|
Size = 40
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'TELEFONO1'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'TELEFONO2'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'MOVIL'
|
|
DataType = datString
|
|
Size = 30
|
|
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 = 'CODIGOALBARAN'
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'ALBARANPAGO'
|
|
SQL =
|
|
'SELECT CODIGOALBARAN, NUMCONCEPTO, DESCRIPCION, CANTIDAD, IMPORT' +
|
|
'EUNIDAD,'#10'IMPORTETOTAL, TIPO, POSICION, VALORADO'#10'FROM DETALLESALB' +
|
|
'ARANPAGO'#10'WHERE CODIGOALBARAN = :CODIGOALBARAN AND'#10'VISIBLE = '#39'S'#39#10 +
|
|
'ORDER BY POSICION;'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'CODIGOALBARAN'
|
|
TableField = 'CODIGOALBARAN'
|
|
end
|
|
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 = 'VALORADO'
|
|
TableField = 'VALORADO'
|
|
end>
|
|
end>
|
|
Name = 'InformeDetallesAlbaranPago'
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOALBARAN'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NUMCONCEPTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 2000
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CANTIDAD'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEUNIDAD'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'TIPO'
|
|
DataType = datString
|
|
Size = 1
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POSICION'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
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 = 'FECHAINI'
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAFIN'
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'ALBARANPAGO'
|
|
SQL =
|
|
'SELECT '#10' sum(BASEIMPONIBLE) AS BASEIMPONIBLE,'#10' sum(IMPORTE' +
|
|
'IVA) AS IMPORTEIVA,'#10' sum(IMPORTETOTAL) AS IMPORTETOTAL'#10' FROM' +
|
|
#10' ALBARANPAGO'#10'WHERE FECHAALBARAN BETWEEN :FECHAINI AND :FECHA' +
|
|
'FIN'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'BASEIMPONIBLE'
|
|
TableField = 'BASEIMPONIBLE'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTEIVA'
|
|
TableField = 'IMPORTEIVA'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTETOTAL'
|
|
TableField = 'IMPORTETOTAL'
|
|
end>
|
|
end>
|
|
Name = 'DarSumaImportes'
|
|
Description = 'Suma de todos los importes entre un intervalo de fechas'
|
|
Fields = <
|
|
item
|
|
Name = 'BASEIMPONIBLE'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
LogChanges = False
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEIVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
LogChanges = False
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
LogChanges = False
|
|
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 = 'CODIGOCONTACTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAALBARAN'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'SITUACION'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAPAGO'
|
|
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 = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'CODIGOPRESUPUESTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'ALBARANPAGO'
|
|
SQL =
|
|
'INSERT'#10' INTO ALBARANPAGO'#10' (CODIGOEMPRESA, CODIGO, FECHAALTA,' +
|
|
' USUARIO, CODIGOCONTACTO,'#10' FECHAALBARAN, SITUACION, FECHAPAG' +
|
|
'O, BASEIMPONIBLE, '#10' DESCUENTO, IMPORTEDESCUENTO, IVA, IMPORT' +
|
|
'EIVA, IMPORTETOTAL, '#10' OBSERVACIONES, FORMAPAGO, REFERENCIA, ' +
|
|
'CODIGOPRESUPUESTO)'#10' VALUES'#10' (:CODIGOEMPRESA, :CODIGO, :FECHA' +
|
|
'ALTA, :USUARIO, :CODIGOCONTACTO,'#10' :FECHAALBARAN, :SITUACION,' +
|
|
' :FECHAPAGO, :BASEIMPONIBLE, '#10' :DESCUENTO, :IMPORTEDESCUENTO' +
|
|
', :IVA, :IMPORTEIVA, :IMPORTETOTAL, '#10' :OBSERVACIONES, :FORMA' +
|
|
'PAGO, :REFERENCIA, :CODIGOPRESUPUESTO)'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Insert_AlbaranCliente'
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGOEMPRESA'
|
|
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 = 'CODIGOCONTACTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAALBARAN'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'SITUACION'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHAPAGO'
|
|
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 = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
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 = 'ALBARANPAGO'
|
|
SQL =
|
|
'UPDATE ALBARANPAGO'#10' SET '#10' CODIGOEMPRESA = :CODIGOEMPRESA, '#10' ' +
|
|
' FECHAALTA = :FECHAALTA, '#10' USUARIO = :USUARIO, '#10' CODIGOC' +
|
|
'ONTACTO = :CODIGOCONTACTO, '#10' FECHAALBARAN = :FECHAALBARAN, '#10' ' +
|
|
' SITUACION = :SITUACION, '#10' FECHAPAGO = :FECHAPAGO, '#10' BAS' +
|
|
'EIMPONIBLE = :BASEIMPONIBLE, '#10' DESCUENTO = :DESCUENTO, '#10' I' +
|
|
'MPORTEDESCUENTO = :IMPORTEDESCUENTO, '#10' IVA = :IVA, '#10' IMPOR' +
|
|
'TEIVA = :IMPORTEIVA, '#10' IMPORTETOTAL = :IMPORTETOTAL, '#10' OBS' +
|
|
'ERVACIONES = :OBSERVACIONES, '#10' FORMAPAGO = :FORMAPAGO, '#10' R' +
|
|
'EFERENCIA = :REFERENCIA,'#10' CODIGOPRESUPUESTO = :CODIGOPRESUPUE' +
|
|
'STO'#10' WHERE'#10' (CODIGO = :OLD_CODIGO)'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Update_AlbaranCliente'
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'OLD_CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'ALBARANPAGO'
|
|
SQL =
|
|
'DELETE '#10' FROM'#10' ALBARANPAGO'#10' WHERE'#10' (CODIGO = :OLD_CODIGO' +
|
|
')'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Delete_AlbaranCliente'
|
|
end>
|
|
RelationShips = <
|
|
item
|
|
Name = 'FK_DetallesAlbaranCliente_AlbaranCliente'
|
|
MasterDatasetName = 'AlbaranCliente'
|
|
MasterFields = 'CODIGO'
|
|
DetailDatasetName = 'DetallesAlbaranCliente'
|
|
DetailFields = 'CODIGOALBARAN'
|
|
end
|
|
item
|
|
Name = 'FK_InformeDetallesAlbaranPago_InformeCabeceraAlbaranPago'
|
|
MasterDatasetName = 'InformeCabeceraAlbaranPago'
|
|
MasterFields = 'CODIGO'
|
|
DetailDatasetName = 'InformeDetallesAlbaranPago'
|
|
DetailFields = 'CODIGOALBARAN'
|
|
end>
|
|
UpdateRules = <
|
|
item
|
|
Name = 'Insert AlbaranCliente'
|
|
DoUpdate = False
|
|
DoInsert = True
|
|
DoDelete = False
|
|
DatasetName = 'AlbaranCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Update AlbaranCliente'
|
|
DoUpdate = True
|
|
DoInsert = False
|
|
DoDelete = False
|
|
DatasetName = 'AlbaranCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Delete DetallesAlbaranCliente'
|
|
DoUpdate = False
|
|
DoInsert = False
|
|
DoDelete = True
|
|
DatasetName = 'DetallesAlbaranCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Insert DetallesAlbaranCliente'
|
|
DoUpdate = False
|
|
DoInsert = True
|
|
DoDelete = False
|
|
DatasetName = 'DetallesAlbaranCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Update DetallesAlbaranCliente'
|
|
DoUpdate = True
|
|
DoInsert = False
|
|
DoDelete = False
|
|
DatasetName = 'DetallesAlbaranCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Delete AlbaranCliente'
|
|
DoUpdate = False
|
|
DoInsert = False
|
|
DoDelete = True
|
|
DatasetName = 'AlbaranCliente'
|
|
FailureBehaviour = fbRaiseException
|
|
end>
|
|
Left = 48
|
|
Top = 24
|
|
end
|
|
object bpAlbaranes: TDABusinessProcessor
|
|
Schema = schAlbaranesCliente
|
|
InsertCommandName = 'Insert_AlbaranCliente'
|
|
UpdateCommandName = 'Update_AlbaranCliente'
|
|
RefreshDatasetName = 'AlbaranCliente_RefreshDataset'
|
|
ReferencedDataset = 'AlbaranCliente'
|
|
ProcessorOptions = [poAutoGenerateDelete, poPrepareCommands]
|
|
UpdateMode = updWhereKeyOnly
|
|
Left = 184
|
|
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_AlbaranPago
|
|
Left = 120
|
|
Top = 176
|
|
end
|
|
object DADataDetalles: TDADataSource
|
|
DataTable = tbl_DetallesAlbaranPago
|
|
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 = 38708.696339131940000000
|
|
ReportOptions.VersionBuild = '1'
|
|
ReportOptions.VersionMajor = '12'
|
|
ReportOptions.VersionMinor = '13'
|
|
ReportOptions.VersionRelease = '1'
|
|
ScriptLanguage = 'PascalScript'
|
|
ScriptText.Strings = (
|
|
'procedure Band4OnBeforePrint(Sender: TfrxComponent);'
|
|
'begin'
|
|
' case <frxDBDetalles."TIPO"> of'
|
|
' '#39'C'#39': begin'
|
|
' MemoCampo12.Style := '#39'Concepto comentario'#39';'
|
|
' MemoCampo2.Style := '#39'Concepto comentario'#39';'
|
|
' MemoCampo3.Style := '#39'Concepto comentario'#39';'
|
|
' MemoCampo4.Style := '#39'Concepto comentario'#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'A'#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;'
|
|
' end;'
|
|
'end;'
|
|
''
|
|
'procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);'
|
|
'begin'
|
|
|
|
' Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSum' +
|
|
'mary1.Height - 1;'
|
|
'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>
|
|
end
|
|
object tbl_AlbaranPago: 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_DetallesAlbaranPago: 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 DABINAdapter: TDABINAdapter
|
|
Left = 48
|
|
Top = 72
|
|
end
|
|
end
|