git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@632 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
parent
4a73655e14
commit
de47579382
@ -1,5 +1,5 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="42291,7971660764" ScriptLanguage="PascalScript" ScriptText.Text=" procedure DireccionEnvioOnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := ''; DireccionEnvio.Lines.Clear; if (<frxDBCabecera."NOMBRE_CLIENTE"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."NOMBRE_CLIENTE">); if (<frxDBCabecera."PERSONA_CONTACTO"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."PERSONA_CONTACTO">); DireccionEnvio.Lines.Add(<frxDBCabecera."CALLE">); if (<frxDBCabecera."CODIGO_POSTAL"> <> '') then ACadena := <frxDBCabecera."CODIGO_POSTAL"> + ' '; if (<frxDBCabecera."POBLACION"> <> '') then ACadena := ACadena + <frxDBCabecera."POBLACION">; if (ACadena <> '') then DireccionEnvio.Lines.Add(ACadena); if (<frxDBCabecera."PROVINCIA"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."PROVINCIA">); if (<frxDBCabecera."TELEFONO"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."TELEFONO">); end; procedure PageHeader1OnBeforePrint(Sender: TfrxComponent); begin if not Engine.FinalPass then Set('TotalPaginas', (<TotalPaginas> + 1)); if Engine.FinalPass then Set('Pagina', (<Pagina> + 1)); end; procedure frxReportOnStartReport(Sender: TfrxComponent); begin Set('Pagina', 0); Set('TotalPaginas', 0); end; procedure eImporteUnidadOnBeforePrint(Sender: TfrxComponent); begin if <ImprimirPrecio> then begin eImporteUnidad.Visible := True; lImporteUnidad.Visible := True; eImporteTotal.Visible := True; lImporteTotal.Visible := True; ImporteUnidad.Visible := True; ImporteTotal.Visible := True; end else begin eImporteUnidad.Visible := False; lImporteUnidad.Visible := False; eImporteTotal.Visible := False; lImporteTotal.Visible := False; ImporteUnidad.Visible := False; ImporteTotal.Visible := False; eConcepto.Width := eConcepto.Width + eImporteTotal.Width + eImporteUnidad.Width; Concepto.Width := eConcepto.Width - 10; eCantidad.Left := eCantidad.Left + eImporteUnidad.Width; end end; begin end. " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C14000000204E616D653D22546F74616C506167696E61732200010C0E000000204E616D653D22506167696E612200010C16000000204E616D653D22496D7072696D697250726563696F2200010C1C000000204E616D653D22496D7072696D697252656650726F766565646F722200010C14000000204E616D653D2253686F776C6F676F7469706F220000055374796C650100">
|
||||
<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="42300,5905143519" ScriptLanguage="PascalScript" ScriptText.Text=" procedure DireccionEnvioOnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := ''; DireccionEnvio.Lines.Clear; if (<frxDBCabecera."ID_ALMACEN"> <> 1) then if (<frxDBCabecera."PERSONA_CONTACTO"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."PERSONA_CONTACTO">); DireccionEnvio.Lines.Add(<frxDBCabecera."CALLE">); if (<frxDBCabecera."CODIGO_POSTAL"> <> '') then ACadena := <frxDBCabecera."CODIGO_POSTAL"> + ' '; if (<frxDBCabecera."POBLACION"> <> '') then ACadena := ACadena + <frxDBCabecera."POBLACION">; if (ACadena <> '') then DireccionEnvio.Lines.Add(ACadena); if (<frxDBCabecera."PROVINCIA"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."PROVINCIA">); if (<frxDBCabecera."TELEFONO"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."TELEFONO">); end; procedure PageHeader1OnBeforePrint(Sender: TfrxComponent); begin if not Engine.FinalPass then Set('TotalPaginas', (<TotalPaginas> + 1)); if Engine.FinalPass then Set('Pagina', (<Pagina> + 1)); end; procedure frxReportOnStartReport(Sender: TfrxComponent); begin Set('Pagina', 0); Set('TotalPaginas', 0); end; procedure eImporteUnidadOnBeforePrint(Sender: TfrxComponent); begin if <ImprimirPrecio> then begin eImporteUnidad.Visible := True; lImporteUnidad.Visible := True; eImporteTotal.Visible := True; lImporteTotal.Visible := True; ImporteUnidad.Visible := True; ImporteTotal.Visible := True; end else begin eImporteUnidad.Visible := False; lImporteUnidad.Visible := False; eImporteTotal.Visible := False; lImporteTotal.Visible := False; ImporteUnidad.Visible := False; ImporteTotal.Visible := False; eConcepto.Width := eConcepto.Width + eImporteTotal.Width + eImporteUnidad.Width; Concepto.Width := eConcepto.Width - 10; eCantidad.Left := eCantidad.Left + eImporteUnidad.Width; end end; begin end. " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C14000000204E616D653D22546F74616C506167696E61732200010C0E000000204E616D653D22506167696E612200010C16000000204E616D653D22496D7072696D697250726563696F2200010C1C000000204E616D653D22496D7072696D697252656650726F766565646F722200010C14000000204E616D653D2253686F776C6F676F7469706F220000055374796C650100">
|
||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||
<TfrxMasterData Name="MasterData1" Height="24" Left="0" Top="476" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
|
||||
@ -33,8 +33,6 @@
|
||||
<TfrxMemoView Name="Memo2" Left="365,92115" Top="30,89765" Width="347,93723" Height="38,89765" ShowHint="False" Font.Charset="1" Font.Color="8421504" Font.Height="-29" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="PEDIDO A PROVEEDOR"/>
|
||||
<TfrxMemoView Name="Memo1" Left="508,57514" Top="187,04731" Width="94,01577" Height="18,67718" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="Fecha pedido:"/>
|
||||
<TfrxMemoView Name="Memo6" Left="608,70903" Top="187,04731" Width="102,05504" Height="18,67718" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" HideZeros="True" ParentFont="False" Text="[frxDBCabecera."FECHA_PEDIDO"]"/>
|
||||
<TfrxMemoView Name="Memo9" Left="366,83488" Top="149,96073" Width="119,89765" Height="18,67718" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="Fax del proveedor:"/>
|
||||
<TfrxMemoView Name="Memo15" Left="494,85065" Top="149,96073" Width="217,91342" Height="18,67718" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."FAX"]"/>
|
||||
<TfrxMemoView Name="eImporteUnidad" Left="502" Top="374" Width="101,25726667" Height="26,45669291" OnBeforePrint="eImporteUnidadOnBeforePrint" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Importe coste"/>
|
||||
<TfrxMemoView Name="eImporteTotal" Left="603" Top="374" Width="115,25726667" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
|
||||
<TfrxLineView Name="lImporteUnidad" Left="502" Top="374" Width="0" Height="430" ShowHint="False" Frame.Typ="1"/>
|
||||
|
||||
@ -47,34 +47,40 @@
|
||||
<DelphiCompile Include="Contactos_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="adortl.dcp" />
|
||||
<DCCReference Include="ApplicationBase.dcp" />
|
||||
<DCCReference Include="Base.dcp" />
|
||||
<DCCReference Include="bdertl.dcp" />
|
||||
<DCCReference Include="Contactos_controller.dcp" />
|
||||
<DCCReference Include="Contactos_model.dcp" />
|
||||
<DCCReference Include="cxDataD11.dcp" />
|
||||
<DCCReference Include="cxEditorsD11.dcp" />
|
||||
<DCCReference Include="cxLibraryD11.dcp" />
|
||||
<DCCReference Include="DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="dbrtl.dcp" />
|
||||
<DCCReference Include="designide.dcp" />
|
||||
<DCCReference Include="dsnap.dcp" />
|
||||
<DCCReference Include="dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="dxThemeD11.dcp" />
|
||||
<DCCReference Include="FormasPago_controller.dcp" />
|
||||
<DCCReference Include="FormasPago_model.dcp" />
|
||||
<DCCReference Include="GUIBase.dcp" />
|
||||
<DCCReference Include="GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="Jcl.dcp" />
|
||||
<DCCReference Include="JclVcl.dcp" />
|
||||
<DCCReference Include="JvCoreD11R.dcp" />
|
||||
<DCCReference Include="JvGlobusD11R.dcp" />
|
||||
<DCCReference Include="JvSystemD11R.dcp" />
|
||||
<DCCReference Include="RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="rtl.dcp" />
|
||||
<DCCReference Include="TiposIVA_controller.dcp" />
|
||||
<DCCReference Include="TiposIVA_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ApplicationBase.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\bdertl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Contactos_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Contactos_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxDataD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\designide.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\FormasPago_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\FormasPago_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUIBase.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvGlobusD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\TiposIVA_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\TiposIVA_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\xmlrtl.dcp" />
|
||||
<DCCReference Include="uContactosViewRegister.pas" />
|
||||
<DCCReference Include="uEditorCliente.pas">
|
||||
<Form>fEditorCliente</Form>
|
||||
@ -222,12 +228,6 @@
|
||||
<Form>frViewVendedores</Form>
|
||||
<DesignClass>TCustomView</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="vcl.dcp" />
|
||||
<DCCReference Include="vclactnband.dcp" />
|
||||
<DCCReference Include="vcldb.dcp" />
|
||||
<DCCReference Include="vcljpg.dcp" />
|
||||
<DCCReference Include="vclx.dcp" />
|
||||
<DCCReference Include="xmlrtl.dcp" />
|
||||
</ItemGroup>
|
||||
</Project>
|
||||
<!-- EurekaLog First Line
|
||||
|
||||
Binary file not shown.
@ -2,8 +2,6 @@ inherited fEditorContactos: TfEditorContactos
|
||||
Left = 285
|
||||
Top = 448
|
||||
Caption = 'Lista de contactos'
|
||||
ExplicitWidth = 320
|
||||
ExplicitHeight = 240
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
|
||||
@ -88,54 +88,25 @@ object RptPedidosProveedor: TRptPedidosProveedor
|
||||
Connection = 'IBX'
|
||||
TargetTable = 'PEDIDOS_PROVEEDOR'
|
||||
SQL =
|
||||
'SELECT'#10' V_PEDIDOS_PROVEEDOR.ID,'#10' V_PEDIDOS_PROVEEDOR.ID_EMPRES' +
|
||||
'A,'#10' V_PEDIDOS_PROVEEDOR.REFERENCIA,'#10' V_PEDIDOS_PROVEEDOR.FECHA' +
|
||||
'_PEDIDO,'#10' V_PEDIDOS_PROVEEDOR.FECHA_ENTREGA,'#10' V_PEDIDOS_PROVEE' +
|
||||
'DOR.FECHA_ENVIO,'#10' V_PEDIDOS_PROVEEDOR.OBSERVACIONES,'#10' V_PEDIDO' +
|
||||
'S_PROVEEDOR.VENDEDOR,'#10' V_PROVEEDORES.NOMBRE,'#10' V_PROVEEDORES.FA' +
|
||||
'X,'#10#10' '#39#39' AS NOMBRE_CLIENTE,'#10#10' IIF ((V_PEDIDOS_PROVEEDOR.ID_ALMA' +
|
||||
'CEN = 0), V_PEDIDOS_PROVEEDOR.CALLE, ALMACENES.CALLE) AS CALLE,'#10 +
|
||||
' IIF ((V_PEDIDOS_PROVEEDOR.ID_ALMACEN = 0), V_PEDIDOS_PROVEEDOR' +
|
||||
'.POBLACION, ALMACENES.POBLACION) AS POBLACION,'#10' IIF ((V_PEDIDOS' +
|
||||
'_PROVEEDOR.ID_ALMACEN = 0), V_PEDIDOS_PROVEEDOR.PROVINCIA, ALMAC' +
|
||||
'ENES.PROVINCIA) AS PROVINCIA,'#10' IIF ((V_PEDIDOS_PROVEEDOR.ID_ALM' +
|
||||
'ACEN = 0), V_PEDIDOS_PROVEEDOR.CODIGO_POSTAL, ALMACENES.CODIGO_P' +
|
||||
'OSTAL) AS CODIGO_POSTAL,'#10' IIF ((V_PEDIDOS_PROVEEDOR.ID_ALMACEN ' +
|
||||
'= 0), V_PEDIDOS_PROVEEDOR.PERSONA_CONTACTO, ALMACENES.PERSONA_CO' +
|
||||
'NTACTO) AS PERSONA_CONTACTO,'#10' IIF ((V_PEDIDOS_PROVEEDOR.ID_ALMA' +
|
||||
'CEN = 0), V_PEDIDOS_PROVEEDOR.TELEFONO, ALMACENES.TELEFONO) AS T' +
|
||||
'ELEFONO,'#10#10' EMPRESAS.NIF_CIF AS NIF_CIF_EMPRESA,'#10' EMPRESAS.NOMB' +
|
||||
'RE AS NOMBRE_EMPRESA,'#10' EMPRESAS.RAZON_SOCIAL AS RAZON_SOCIAL_EM' +
|
||||
'PRESA,'#10' EMPRESAS.TELEFONO_1 AS TELEFONO_1_EMPRESA,'#10' EMPRESAS.F' +
|
||||
'AX AS FAX_EMPRESA,'#10' EMPRESAS.MOVIL_1 AS MOVIL_1_EMPRESA,'#10' EMPR' +
|
||||
'ESAS.EMAIL_1 AS EMAIL_1_EMPRESA,'#10' EMPRESAS.PAGINA_WEB AS PAGINA' +
|
||||
'_WEB_EMPRESA'#10'FROM'#10' V_PEDIDOS_PROVEEDOR'#10' LEFT OUTER JOIN V_PROV' +
|
||||
'EEDORES ON (V_PROVEEDORES.ID = V_PEDIDOS_PROVEEDOR.ID_PROVEEDOR)' +
|
||||
#10' LEFT OUTER JOIN EMPRESAS ON (EMPRESAS.ID = V_PEDIDOS_PROVEEDO' +
|
||||
'R.ID_EMPRESA)'#10' LEFT OUTER JOIN ALMACENES ON (ALMACENES.ID = V_P' +
|
||||
'EDIDOS_PROVEEDOR.ID_ALMACEN)'#10'WHERE V_PEDIDOS_PROVEEDOR.ID = :ID'#10
|
||||
'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.FECHA_EN' +
|
||||
'VIO,'#10' PEDIDOS_PROVEEDOR.OBSERVACIONES,'#10' VENDEDORES.NOMBRE as V' +
|
||||
'ENDEDOR,'#10' PROVEEDOR.NOMBRE,'#10' PROVEEDOR.FAX,'#10#10' CONTRATOS_CLIEN' +
|
||||
'TE.referencia as referencia_contrato,'#10' CONTRATOS_CLIENTE.refere' +
|
||||
'ncia_CLIENTE,'#10' CLIENTES.NOMBRE AS NOMBRE_CLIENTE,'#10' '#10' PEDIDOS_' +
|
||||
'PROVEEDOR.ID_ALMACEN,'#10' PEDIDOS_PROVEEDOR.CALLE,'#10' PEDIDOS_PROVE' +
|
||||
'EDOR.POBLACION,'#10' PEDIDOS_PROVEEDOR.PROVINCIA,'#10' PEDIDOS_PROVEED' +
|
||||
'OR.CODIGO_POSTAL,'#10' PEDIDOS_PROVEEDOR.PERSONA_CONTACTO,'#10' PEDIDO' +
|
||||
'S_PROVEEDOR.TELEFONO'#10#10'FROM'#10' PEDIDOS_PROVEEDOR'#10' LEFT OUTER JOIN' +
|
||||
' CONTACTOS PROVEEDOR ON (PROVEEDOR .ID = PEDIDOS_PROVEEDOR.ID_PR' +
|
||||
'OVEEDOR)'#10' LEFT OUTER JOIN CONTACTOS VENDEDORES ON (VENDEDORES.I' +
|
||||
'D = PEDIDOS_PROVEEDOR.ID_VENDEDOR)'#10' LEFT OUTER JOIN CONTRATOS_C' +
|
||||
'LIENTE ON (CONTRATOS_CLIENTE.ID = PEDIDOS_PROVEEDOR.ID_CONTRATO_' +
|
||||
'CLIENTE)'#10' LEFT OUTER JOIN CONTACTOS CLIENTES ON (CLIENTES.ID = ' +
|
||||
'CONTRATOS_CLIENTE.ID_CLIENTE)'#10'WHERE PEDIDOS_PROVEEDOR.ID = :ID'#10
|
||||
StatementType = stSQL
|
||||
ColumnMappings = <
|
||||
item
|
||||
DatasetField = 'OBSERVACIONES'
|
||||
TableField = 'OBSERVACIONES'
|
||||
end
|
||||
item
|
||||
DatasetField = 'NOMBRE'
|
||||
TableField = 'NOMBRE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'CALLE'
|
||||
TableField = 'CALLE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'POBLACION'
|
||||
TableField = 'POBLACION'
|
||||
end
|
||||
item
|
||||
DatasetField = 'REFERENCIA'
|
||||
TableField = 'REFERENCIA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'ID'
|
||||
TableField = 'ID'
|
||||
@ -145,66 +116,13 @@ object RptPedidosProveedor: TRptPedidosProveedor
|
||||
TableField = 'ID_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'CODIGO_POSTAL'
|
||||
TableField = 'CODIGO_POSTAL'
|
||||
DatasetField = 'REFERENCIA'
|
||||
TableField = 'REFERENCIA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'FECHA_PEDIDO'
|
||||
TableField = 'FECHA_PEDIDO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'PROVINCIA'
|
||||
TableField = 'PROVINCIA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'PERSONA_CONTACTO'
|
||||
TableField = 'PERSONA_CONTACTO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'TELEFONO'
|
||||
TableField = 'TELEFONO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'NOMBRE_EMPRESA'
|
||||
TableField = 'NOMBRE_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'NIF_CIF_EMPRESA'
|
||||
TableField = 'NIF_CIF_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'RAZON_SOCIAL_EMPRESA'
|
||||
TableField = 'RAZON_SOCIAL_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'TELEFONO_1_EMPRESA'
|
||||
TableField = 'TELEFONO_1_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'FAX_EMPRESA'
|
||||
TableField = 'FAX_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'MOVIL_1_EMPRESA'
|
||||
TableField = 'MOVIL_1_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'EMAIL_1_EMPRESA'
|
||||
TableField = 'EMAIL_1_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'PAGINA_WEB_EMPRESA'
|
||||
TableField = 'PAGINA_WEB_EMPRESA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'FAX'
|
||||
TableField = 'FAX'
|
||||
end
|
||||
item
|
||||
DatasetField = 'NOMBRE_CLIENTE'
|
||||
TableField = '<unknown>'
|
||||
SQLOrigin = 'NOMBRE_CLIENTE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'FECHA_ENTREGA'
|
||||
TableField = 'FECHA_ENTREGA'
|
||||
@ -213,10 +131,67 @@ object RptPedidosProveedor: TRptPedidosProveedor
|
||||
DatasetField = 'FECHA_ENVIO'
|
||||
TableField = 'FECHA_ENVIO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'OBSERVACIONES'
|
||||
TableField = 'OBSERVACIONES'
|
||||
end
|
||||
item
|
||||
DatasetField = 'VENDEDOR'
|
||||
TableField = '<unknown>'
|
||||
SQLOrigin = 'VENDEDOR'
|
||||
end
|
||||
item
|
||||
DatasetField = 'NOMBRE'
|
||||
TableField = '<unknown>'
|
||||
SQLOrigin = 'NOMBRE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'FAX'
|
||||
TableField = '<unknown>'
|
||||
SQLOrigin = 'FAX'
|
||||
end
|
||||
item
|
||||
DatasetField = 'REFERENCIA_CONTRATO'
|
||||
TableField = '<unknown>'
|
||||
SQLOrigin = 'REFERENCIA_CONTRATO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'REFERENCIA_CLIENTE'
|
||||
TableField = '<unknown>'
|
||||
SQLOrigin = 'REFERENCIA_CLIENTE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'NOMBRE_CLIENTE'
|
||||
TableField = '<unknown>'
|
||||
SQLOrigin = 'NOMBRE_CLIENTE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'CALLE'
|
||||
TableField = 'CALLE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'POBLACION'
|
||||
TableField = 'POBLACION'
|
||||
end
|
||||
item
|
||||
DatasetField = 'PROVINCIA'
|
||||
TableField = 'PROVINCIA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'CODIGO_POSTAL'
|
||||
TableField = 'CODIGO_POSTAL'
|
||||
end
|
||||
item
|
||||
DatasetField = 'PERSONA_CONTACTO'
|
||||
TableField = 'PERSONA_CONTACTO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'TELEFONO'
|
||||
TableField = 'TELEFONO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'ID_ALMACEN'
|
||||
TableField = 'ID_ALMACEN'
|
||||
end>
|
||||
end>
|
||||
Name = 'Informe_Cabecera'
|
||||
@ -265,11 +240,25 @@ object RptPedidosProveedor: TRptPedidosProveedor
|
||||
DataType = datString
|
||||
Size = 25
|
||||
end
|
||||
item
|
||||
Name = 'REFERENCIA_CONTRATO'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'REFERENCIA_CLIENTE'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'NOMBRE_CLIENTE'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'ID_ALMACEN'
|
||||
DataType = datInteger
|
||||
end
|
||||
item
|
||||
Name = 'CALLE'
|
||||
DataType = datString
|
||||
@ -299,46 +288,6 @@ object RptPedidosProveedor: TRptPedidosProveedor
|
||||
Name = 'TELEFONO'
|
||||
DataType = datString
|
||||
Size = 25
|
||||
end
|
||||
item
|
||||
Name = 'NIF_CIF_EMPRESA'
|
||||
DataType = datString
|
||||
Size = 15
|
||||
end
|
||||
item
|
||||
Name = 'NOMBRE_EMPRESA'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'RAZON_SOCIAL_EMPRESA'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'TELEFONO_1_EMPRESA'
|
||||
DataType = datString
|
||||
Size = 25
|
||||
end
|
||||
item
|
||||
Name = 'FAX_EMPRESA'
|
||||
DataType = datString
|
||||
Size = 25
|
||||
end
|
||||
item
|
||||
Name = 'MOVIL_1_EMPRESA'
|
||||
DataType = datString
|
||||
Size = 25
|
||||
end
|
||||
item
|
||||
Name = 'EMAIL_1_EMPRESA'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'PAGINA_WEB_EMPRESA'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end>
|
||||
end
|
||||
item
|
||||
@ -497,7 +446,7 @@ object RptPedidosProveedor: TRptPedidosProveedor
|
||||
PrintOptions.Printer = 'Por defecto'
|
||||
PrintOptions.PrintOnSheet = 0
|
||||
ReportOptions.CreateDate = 39065.872423495400000000
|
||||
ReportOptions.LastChange = 42291.759212881950000000
|
||||
ReportOptions.LastChange = 42300.581549502310000000
|
||||
ScriptLanguage = 'PascalScript'
|
||||
ShowProgress = False
|
||||
StoreInDFM = False
|
||||
|
||||
Loading…
Reference in New Issue
Block a user