Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Pedidos a proveedor: al imprimir un pedido, el fax no salía bien el caso de elegir una dirección de proveedor diferente a la principal.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@815 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2009-01-02 17:17:58 +00:00
parent c0250fee9f
commit 3f85bd52dd
2 changed files with 35 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
Source/Modulos/Pedidos a proveedor/Reports/uRptPedidosProveedor_Server.dfm
View File

@ -168,21 +168,23 @@ object RptPedidosProveedor: TRptPedidosProveedor
'SELECT'#10' PEDIDOS_PROVEEDOR.ID,'#10' PEDIDOS_PROVEEDOR.ID_EMPRESA,'#10' ' + 'SELECT'#10' PEDIDOS_PROVEEDOR.ID,'#10' PEDIDOS_PROVEEDOR.ID_EMPRESA,'#10' ' +
' PEDIDOS_PROVEEDOR.REFERENCIA,'#10' PEDIDOS_PROVEEDOR.FECHA_PEDIDO,' + ' PEDIDOS_PROVEEDOR.REFERENCIA,'#10' PEDIDOS_PROVEEDOR.FECHA_PEDIDO,' +
#10' PEDIDOS_PROVEEDOR.FECHA_ENTREGA,'#10' PEDIDOS_PROVEEDOR.OBSERVAC' + #10' PEDIDOS_PROVEEDOR.FECHA_ENTREGA,'#10' PEDIDOS_PROVEEDOR.OBSERVAC' +
'IONES,'#10' CONTACTOS.NOMBRE,'#10' CONTACTOS.FAX,'#10' PEDIDOS_PROVEEDOR.' + 'IONES,'#10' CONTACTOS.NOMBRE,'#10' COALESCE(CONTACTOS_DIRECCIONES.FAX,' +
'PERSONA_CONTACTO_PROV AS PERSONA_CONTACTO,'#10' PROVEEDORES_DATOS.C' + ' CONTACTOS.FAX) AS FAX,'#10' PEDIDOS_PROVEEDOR.PERSONA_CONTACTO_PRO' +
'ODIGO_ASIGNADO AS CODIGO_CLIENTE,'#10' PEDIDOS_PROVEEDOR.ID_ALMACEN' + 'V AS PERSONA_CONTACTO,'#10' PROVEEDORES_DATOS.CODIGO_ASIGNADO AS CO' +
','#10' COALESCE(ALMACENES.CALLE, PEDIDOS_PROVEEDOR.CALLE) AS CALLE,' + 'DIGO_CLIENTE,'#10' PEDIDOS_PROVEEDOR.ID_ALMACEN,'#10' COALESCE(ALMACEN' +
#10' COALESCE(ALMACENES.POBLACION, PEDIDOS_PROVEEDOR.POBLACION) AS' + 'ES.CALLE, PEDIDOS_PROVEEDOR.CALLE) AS CALLE,'#10' COALESCE(ALMACENE' +
' POBLACION,'#10' COALESCE(ALMACENES.PROVINCIA, PEDIDOS_PROVEEDOR.PR' + 'S.POBLACION, PEDIDOS_PROVEEDOR.POBLACION) AS POBLACION,'#10' COALES' +
'OVINCIA) AS PROVINCIA,'#10' COALESCE(ALMACENES.CODIGO_POSTAL, PEDID' + 'CE(ALMACENES.PROVINCIA, PEDIDOS_PROVEEDOR.PROVINCIA) AS PROVINCI' +
'OS_PROVEEDOR.CODIGO_POSTAL) AS CODIGO_POSTAL,'#10' PEDIDOS_PROVEEDO' + 'A,'#10' COALESCE(ALMACENES.CODIGO_POSTAL, PEDIDOS_PROVEEDOR.CODIGO_' +
'R.PERSONA_CONTACTO AS ENTREGAR_A,'#10' PEDIDOS_PROVEEDOR.IMPORTE_TO' + 'POSTAL) AS CODIGO_POSTAL,'#10' PEDIDOS_PROVEEDOR.PERSONA_CONTACTO A' +
'TAL'#10'FROM'#10' PEDIDOS_PROVEEDOR'#10' INNER JOIN CONTACTOS ON (CONTACTO' + 'S ENTREGAR_A,'#10' PEDIDOS_PROVEEDOR.IMPORTE_TOTAL'#10'FROM'#10' PEDIDOS_P' +
'S.ID = PEDIDOS_PROVEEDOR.ID_PROVEEDOR)'#10' LEFT OUTER JOIN PROVEED' + 'ROVEEDOR'#10' INNER JOIN CONTACTOS ON (CONTACTOS.ID = PEDIDOS_PROVE' +
'ORES_DATOS ON (PROVEEDORES_DATOS.ID_PROVEEDOR = PEDIDOS_PROVEEDO' + 'EDOR.ID_PROVEEDOR)'#10' LEFT OUTER JOIN PROVEEDORES_DATOS ON (PROVE' +
'R.ID_PROVEEDOR)'#10' LEFT OUTER JOIN ALMACENES ON (ALMACENES.ID = P' + 'EDORES_DATOS.ID_PROVEEDOR = PEDIDOS_PROVEEDOR.ID_PROVEEDOR)'#10' LE' +
'EDIDOS_PROVEEDOR.ID_ALMACEN)'#10'WHERE PEDIDOS_PROVEEDOR.ID = :ID'#10#10#10 + 'FT OUTER JOIN CONTACTOS_DIRECCIONES ON (CONTACTOS_DIRECCIONES.ID' +
#10 ' = PEDIDOS_PROVEEDOR.ID_DIRECCION)'#10' LEFT OUTER JOIN ALMACENES O' +
'N (ALMACENES.ID = PEDIDOS_PROVEEDOR.ID_ALMACEN)'#10'WHERE PEDIDOS_PR' +
'OVEEDOR.ID = :ID'#10#10#10#10
StatementType = stSQL StatementType = stSQL
ColumnMappings = < ColumnMappings = <
item item

33
Source/Modulos/Pedidos a proveedor/Reports/uRptWordPedidoProveedor.dfm
View File

@ -22,21 +22,24 @@ object RptWordPedidoProveedor: TRptWordPedidoProveedor
'SELECT'#10' PEDIDOS_PROVEEDOR.ID,'#10' PEDIDOS_PROVEEDOR.ID_EMPRESA,'#10' ' + 'SELECT'#10' PEDIDOS_PROVEEDOR.ID,'#10' PEDIDOS_PROVEEDOR.ID_EMPRESA,'#10' ' +
' PEDIDOS_PROVEEDOR.REFERENCIA,'#10' PEDIDOS_PROVEEDOR.FECHA_PEDIDO,' + ' PEDIDOS_PROVEEDOR.REFERENCIA,'#10' PEDIDOS_PROVEEDOR.FECHA_PEDIDO,' +
#10' PEDIDOS_PROVEEDOR.FECHA_ENTREGA,'#10' PEDIDOS_PROVEEDOR.OBSERVAC' + #10' PEDIDOS_PROVEEDOR.FECHA_ENTREGA,'#10' PEDIDOS_PROVEEDOR.OBSERVAC' +
'IONES,'#10' CONTACTOS.NOMBRE,'#10' CONTACTOS.FAX,'#10' PEDIDOS_PROVEEDOR.' + 'IONES,'#10' CONTACTOS.NOMBRE,'#10' COALESCE(CONTACTOS_DIRECCIONES.FAX,' +
'PERSONA_CONTACTO_PROV AS PERSONA_CONTACTO,'#10' PROVEEDORES_DATOS.C' + ' CONTACTOS.FAX) AS FAX,'#10' PEDIDOS_PROVEEDOR.PERSONA_CONTACTO_PRO' +
'ODIGO_ASIGNADO AS CODIGO_CLIENTE,'#10' PEDIDOS_PROVEEDOR.ID_ALMACEN' + 'V AS PERSONA_CONTACTO,'#10' PROVEEDORES_DATOS.CODIGO_ASIGNADO AS CO' +
','#10' COALESCE(ALMACENES.CALLE, PEDIDOS_PROVEEDOR.CALLE) AS CALLE_' + 'DIGO_CLIENTE,'#10' PEDIDOS_PROVEEDOR.ID_ALMACEN,'#10' COALESCE(ALMACEN' +
'ALMACEN,'#10' COALESCE(ALMACENES.POBLACION, PEDIDOS_PROVEEDOR.POBLA' + 'ES.CALLE, PEDIDOS_PROVEEDOR.CALLE) AS CALLE_ALMACEN,'#10' COALESCE(' +
'CION) AS POBLACION_ALMACEN,'#10' COALESCE(ALMACENES.PROVINCIA, PEDI' + 'ALMACENES.POBLACION, PEDIDOS_PROVEEDOR.POBLACION) AS POBLACION_A' +
'DOS_PROVEEDOR.PROVINCIA) AS PROVINCIA_ALMACEN,'#10' COALESCE(ALMACE' + 'LMACEN,'#10' COALESCE(ALMACENES.PROVINCIA, PEDIDOS_PROVEEDOR.PROVIN' +
'NES.CODIGO_POSTAL, PEDIDOS_PROVEEDOR.CODIGO_POSTAL) AS CODIGO_PO' + 'CIA) AS PROVINCIA_ALMACEN,'#10' COALESCE(ALMACENES.CODIGO_POSTAL, P' +
'STAL_ALMACEN,'#10' PEDIDOS_PROVEEDOR.PERSONA_CONTACTO AS PERSONA_CO' + 'EDIDOS_PROVEEDOR.CODIGO_POSTAL) AS CODIGO_POSTAL_ALMACEN,'#10' PEDI' +
'NTACTO_ALMACEN,'#10' PEDIDOS_PROVEEDOR.IMPORTE_TOTAL'#10'FROM'#10' PEDIDOS' + 'DOS_PROVEEDOR.PERSONA_CONTACTO AS PERSONA_CONTACTO_ALMACEN,'#10' PE' +
'_PROVEEDOR'#10' INNER JOIN CONTACTOS ON (CONTACTOS.ID = PEDIDOS_PRO' + 'DIDOS_PROVEEDOR.IMPORTE_TOTAL'#10'FROM'#10' PEDIDOS_PROVEEDOR'#10' INNER J' +
'VEEDOR.ID_PROVEEDOR)'#10' LEFT OUTER JOIN PROVEEDORES_DATOS ON (PRO' + 'OIN CONTACTOS ON (CONTACTOS.ID = PEDIDOS_PROVEEDOR.ID_PROVEEDOR)' +
'VEEDORES_DATOS.ID_PROVEEDOR = PEDIDOS_PROVEEDOR.ID_PROVEEDOR)'#10' ' + #10' LEFT OUTER JOIN PROVEEDORES_DATOS ON (PROVEEDORES_DATOS.ID_PR' +
'LEFT OUTER JOIN ALMACENES ON (ALMACENES.ID = PEDIDOS_PROVEEDOR.I' + 'OVEEDOR = PEDIDOS_PROVEEDOR.ID_PROVEEDOR)'#10' LEFT OUTER JOIN ALMA' +
'D_ALMACEN)'#10'WHERE PEDIDOS_PROVEEDOR.ID = :ID'#10#10#10#10#10 'CENES ON (ALMACENES.ID = PEDIDOS_PROVEEDOR.ID_ALMACEN)'#10' LEFT OU' +
'TER JOIN CONTACTOS_DIRECCIONES ON (CONTACTOS_DIRECCIONES.ID = PE' +
'DIDOS_PROVEEDOR.ID_DIRECCION)'#10'WHERE PEDIDOS_PROVEEDOR.ID = :ID'#10#10 +
#10#10#10
StatementType = stSQL StatementType = stSQL
ColumnMappings = < ColumnMappings = <
item item