Incluimos Fecha prevista de entrega
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@69 c93665c3-c93d-084d-9b98-7d5f4a9c3376
This commit is contained in:
parent
6a135fda27
commit
e029cbfd62
@ -110,16 +110,16 @@ object RptAlbaranesCliente: TRptAlbaranesCliente
|
|||||||
'LBARANES_CLIENTE.POBLACION,'#10' V_ALBARANES_CLIENTE.PROVINCIA,'#10' V' +
|
'LBARANES_CLIENTE.POBLACION,'#10' V_ALBARANES_CLIENTE.PROVINCIA,'#10' V' +
|
||||||
'_ALBARANES_CLIENTE.PERSONA_CONTACTO,'#10' V_ALBARANES_CLIENTE.TELEF' +
|
'_ALBARANES_CLIENTE.PERSONA_CONTACTO,'#10' V_ALBARANES_CLIENTE.TELEF' +
|
||||||
'ONO,'#10' V_ALBARANES_CLIENTE.CALLE,'#10' V_ALBARANES_CLIENTE.OBSERVAC' +
|
'ONO,'#10' V_ALBARANES_CLIENTE.CALLE,'#10' V_ALBARANES_CLIENTE.OBSERVAC' +
|
||||||
'IONES,'#10' V_ALBARANES_CLIENTE.IMPORTE_TOTAL,'#10' EMPRESAS.NIF_CIF A' +
|
'IONES,'#10' V_ALBARANES_CLIENTE.IMPORTE_TOTAL,'#10' V_ALBARANES_CLIENT' +
|
||||||
'S NIF_CIF_EMPRESA,'#10' EMPRESAS.NOMBRE AS NOMBRE_EMPRESA,'#10' EMPRES' +
|
'E.FECHA_PREVISTA_ENVIO,'#10' EMPRESAS.NIF_CIF AS NIF_CIF_EMPRESA,'#10' ' +
|
||||||
'AS.RAZON_SOCIAL AS RAZON_SOCIAL_EMPRESA,'#10' EMPRESAS.TELEFONO_1 A' +
|
' EMPRESAS.NOMBRE AS NOMBRE_EMPRESA,'#10' EMPRESAS.RAZON_SOCIAL AS R' +
|
||||||
'S TELEFONO_1_EMPRESA,'#10' EMPRESAS.FAX AS FAX_EMPRESA,'#10' EMPRESAS.' +
|
'AZON_SOCIAL_EMPRESA,'#10' EMPRESAS.TELEFONO_1 AS TELEFONO_1_EMPRESA' +
|
||||||
'MOVIL_1 AS MOVIL_1_EMPRESA,'#10' EMPRESAS.EMAIL_1 AS EMAIL_1_EMPRES' +
|
','#10' EMPRESAS.FAX AS FAX_EMPRESA,'#10' EMPRESAS.MOVIL_1 AS MOVIL_1_E' +
|
||||||
'A,'#10' EMPRESAS.PAGINA_WEB AS PAGINA_WEB_EMPRESA'#10'FROM'#10' V_ALBARA' +
|
'MPRESA,'#10' EMPRESAS.EMAIL_1 AS EMAIL_1_EMPRESA,'#10' EMPRESAS.PAGINA' +
|
||||||
'NES_CLIENTE'#10' LEFT OUTER JOIN V_CLIENTES ON (V_CLIENTES.ID = V_A' +
|
'_WEB AS PAGINA_WEB_EMPRESA'#10'FROM'#10' V_ALBARANES_CLIENTE'#10' LEFT O' +
|
||||||
'LBARANES_CLIENTE.ID_CLIENTE)'#10' LEFT OUTER JOIN EMPRESAS ON (EMPR' +
|
'UTER JOIN V_CLIENTES ON (V_CLIENTES.ID = V_ALBARANES_CLIENTE.ID_' +
|
||||||
'ESAS.ID = V_ALBARANES_CLIENTE.ID_EMPRESA)'#10'WHERE V_ALBARANES_CLIE' +
|
'CLIENTE)'#10' LEFT OUTER JOIN EMPRESAS ON (EMPRESAS.ID = V_ALBARANE' +
|
||||||
'NTE.ID = :ID'
|
'S_CLIENTE.ID_EMPRESA)'#10'WHERE V_ALBARANES_CLIENTE.ID = :ID'
|
||||||
StatementType = stSQL
|
StatementType = stSQL
|
||||||
ColumnMappings = <
|
ColumnMappings = <
|
||||||
item
|
item
|
||||||
@ -225,6 +225,10 @@ object RptAlbaranesCliente: TRptAlbaranesCliente
|
|||||||
item
|
item
|
||||||
DatasetField = 'REFERENCIA_CLIENTE'
|
DatasetField = 'REFERENCIA_CLIENTE'
|
||||||
TableField = 'REFERENCIA_CLIENTE'
|
TableField = 'REFERENCIA_CLIENTE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'FECHA_PREVISTA_ENVIO'
|
||||||
|
TableField = 'FECHA_PREVISTA_ENVIO'
|
||||||
end>
|
end>
|
||||||
end>
|
end>
|
||||||
Name = 'Informe_Cabecera'
|
Name = 'Informe_Cabecera'
|
||||||
@ -438,6 +442,17 @@ object RptAlbaranesCliente: TRptAlbaranesCliente
|
|||||||
Lookup = False
|
Lookup = False
|
||||||
LookupCache = False
|
LookupCache = False
|
||||||
end
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_PREVISTA_ENVIO'
|
||||||
|
DataType = datDateTime
|
||||||
|
BlobType = dabtUnknown
|
||||||
|
DisplayWidth = 0
|
||||||
|
Alignment = taLeftJustify
|
||||||
|
InPrimaryKey = False
|
||||||
|
Calculated = False
|
||||||
|
Lookup = False
|
||||||
|
LookupCache = False
|
||||||
|
end
|
||||||
item
|
item
|
||||||
Name = 'NIF_CIF_EMPRESA'
|
Name = 'NIF_CIF_EMPRESA'
|
||||||
DataType = datString
|
DataType = datString
|
||||||
|
|||||||
@ -25,9 +25,9 @@ type
|
|||||||
frxChartObject1: TfrxChartObject;
|
frxChartObject1: TfrxChartObject;
|
||||||
frxDBCabecera: TfrxDBDataset;
|
frxDBCabecera: TfrxDBDataset;
|
||||||
frxDBDetalles: TfrxDBDataset;
|
frxDBDetalles: TfrxDBDataset;
|
||||||
|
frxReport: TfrxReport;
|
||||||
schReport: TDASchema;
|
schReport: TDASchema;
|
||||||
DataDictionary: TDADataDictionary;
|
DataDictionary: TDADataDictionary;
|
||||||
frxReport: TfrxReport;
|
|
||||||
procedure DataModuleCreate(Sender: TObject);
|
procedure DataModuleCreate(Sender: TObject);
|
||||||
private
|
private
|
||||||
FConnection: IDAConnection;
|
FConnection: IDAConnection;
|
||||||
|
|||||||
Reference in New Issue
Block a user