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.

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

View File

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

View File

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