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

Arreglo de pedidos a proveedor que fallaba al insertar un pedido nuevo

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@418 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-06-03 12:26:53 +00:00
parent 0d438bdc67
commit 4c82a32538
6 changed files with 198 additions and 219 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Source/Modulos/Pedidos a proveedor/Data/uDataModulePedidosProveedor.dfm
View File

@ -57,7 +57,6 @@ inherited DataModulePedidosProveedor: TDataModulePedidosProveedor
Name = 'REFERENCIA'
DataType = datString
Size = 255
ServerAutoRefresh = True
DictionaryEntry = 'PedidosProveedor_REFERENCIA'
end
item

10
Source/Modulos/Pedidos a proveedor/Model/PedidosProveedor_model.dproj
View File

@ -43,12 +43,6 @@
<Borland.ProjectType>Package</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
<Excluded_Packages Name="C:\Archivos de programa\RemObjects Software\Pascal Script\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Excluded_Packages>
<Excluded_Packages Name="C:\Archivos de programa\EurekaLog 5\Delphi10\ExceptionExpert10.bpl">EurekaLog 5.1.9</Excluded_Packages>
</Excluded_Packages><Source><Source Name="MainSource">PedidosProveedor_model.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
@ -58,8 +52,8 @@
<DelphiCompile Include="PedidosProveedor_model.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\Contactos_model.dcp" />
<DCCReference Include="Base.dcp" />
<DCCReference Include="Contactos_model.dcp" />
<DCCReference Include="Data\uIDataModulePedidosProveedor.pas" />
<DCCReference Include="Data\uIDataModulePedidosProveedorReport.pas" />
<DCCReference Include="schPedidosProveedorClient_Intf.pas" />

BIN
Source/Modulos/Pedidos a proveedor/Model/PedidosProveedor_model.res
View File

Binary file not shown.

20
Source/Modulos/Pedidos a proveedor/Model/schPedidosProveedorClient_Intf.pas
View File

@ -3,15 +3,15 @@ unit schPedidosProveedorClient_Intf;
interface
uses
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
const
{ Data table rules ids
Feel free to change them to something more human readable
but make sure they are unique in the context of your application }
RID_PedidosProveedor = '{BF69E780-7218-4D16-8D06-93922A90C263}';
RID_PedidosProveedor_Detalles = '{325616FD-4D4C-4966-ABB4-DA61F028808A}';
RID_PedidosProveedor_Articulos_Pendientes = '{CC923862-B303-4114-BCE9-390F29227B57}';
RID_PedidosProveedor = '{22AB7846-6093-4612-B61E-FD4C10DB2AE7}';
RID_PedidosProveedor_Detalles = '{03E6E5FB-F6A4-4BA6-B50A-2266A1B760B9}';
RID_PedidosProveedor_Articulos_Pendientes = '{DE3CC08E-E770-4883-B5A9-DAAC783FEECD}';
{ Data table names }
nme_PedidosProveedor = 'PedidosProveedor';
@ -151,7 +151,7 @@ const
type
{ IPedidosProveedor }
IPedidosProveedor = interface(IDAStronglyTypedDataTable)
['{86B0C6FE-F4C2-4D08-B550-9B28424DC65F}']
['{D50CD449-67BE-478F-AC2A-D10FF3915156}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -379,7 +379,7 @@ type
end;
{ TPedidosProveedorDataTableRules }
TPedidosProveedorDataTableRules = class(TIntfObjectDADataTableRules, IPedidosProveedor)
TPedidosProveedorDataTableRules = class(TDADataTableRules, IPedidosProveedor)
private
f_OBSERVACIONES: IROStrings;
f_INCIDENCIAS: IROStrings;
@ -618,7 +618,7 @@ type
{ IPedidosProveedor_Detalles }
IPedidosProveedor_Detalles = interface(IDAStronglyTypedDataTable)
['{F6C135F0-A6F6-4575-B95A-6C09F48B8AF7}']
['{16378B3A-6A16-45AB-A2F8-8C50E9ECB4FA}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -722,7 +722,7 @@ type
end;
{ TPedidosProveedor_DetallesDataTableRules }
TPedidosProveedor_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IPedidosProveedor_Detalles)
TPedidosProveedor_DetallesDataTableRules = class(TDADataTableRules, IPedidosProveedor_Detalles)
private
protected
{ Property getters and setters }
@ -833,7 +833,7 @@ type
{ IPedidosProveedor_Articulos_Pendientes }
IPedidosProveedor_Articulos_Pendientes = interface(IDAStronglyTypedDataTable)
['{6B40F639-92F1-4D42-A5F7-FEEEDAA1990A}']
['{5122E04E-672C-45EF-A1C4-82D194A1DBF3}']
{ Property getters and setters }
function GetID_PEDIDOValue: Integer;
procedure SetID_PEDIDOValue(const aValue: Integer);
@ -877,7 +877,7 @@ type
end;
{ TPedidosProveedor_Articulos_PendientesDataTableRules }
TPedidosProveedor_Articulos_PendientesDataTableRules = class(TIntfObjectDADataTableRules, IPedidosProveedor_Articulos_Pendientes)
TPedidosProveedor_Articulos_PendientesDataTableRules = class(TDADataTableRules, IPedidosProveedor_Articulos_Pendientes)
private
protected
{ Property getters and setters }

12
Source/Modulos/Pedidos a proveedor/Model/schPedidosProveedorServer_Intf.pas
View File

@ -9,14 +9,14 @@ const
{ Delta rules ids
Feel free to change them to something more human readable
but make sure they are unique in the context of your application }
RID_PedidosProveedorDelta = '{22716888-D480-4353-8839-68A6CF4AC29C}';
RID_PedidosProveedor_DetallesDelta = '{D1D10F76-2A35-46FF-84AA-50A16F7F3E53}';
RID_PedidosProveedor_Articulos_PendientesDelta = '{DD6B9A4F-AF66-4725-9ABE-D62CB27BAC83}';
RID_PedidosProveedorDelta = '{616C488F-BFD3-45A8-A204-879873D85CF0}';
RID_PedidosProveedor_DetallesDelta = '{C93B2E5B-CC8C-47D8-B4F1-9E6B677EF39A}';
RID_PedidosProveedor_Articulos_PendientesDelta = '{5EE863CB-706E-46E9-A9F0-743A71E89B4A}';
type
{ IPedidosProveedorDelta }
IPedidosProveedorDelta = interface(IPedidosProveedor)
['{22716888-D480-4353-8839-68A6CF4AC29C}']
['{616C488F-BFD3-45A8-A204-879873D85CF0}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_EMPRESAValue : Integer;
@ -484,7 +484,7 @@ type
{ IPedidosProveedor_DetallesDelta }
IPedidosProveedor_DetallesDelta = interface(IPedidosProveedor_Detalles)
['{D1D10F76-2A35-46FF-84AA-50A16F7F3E53}']
['{C93B2E5B-CC8C-47D8-B4F1-9E6B677EF39A}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_PEDIDOValue : Integer;
@ -698,7 +698,7 @@ type
{ IPedidosProveedor_Articulos_PendientesDelta }
IPedidosProveedor_Articulos_PendientesDelta = interface(IPedidosProveedor_Articulos_Pendientes)
['{DD6B9A4F-AF66-4725-9ABE-D62CB27BAC83}']
['{5EE863CB-706E-46E9-A9F0-743A71E89B4A}']
{ Property getters and setters }
function GetOldID_PEDIDOValue : Integer;
function GetOldREFERENCIAValue : String;

374
Source/Modulos/Pedidos a proveedor/Servidor/srvPedidosProveedor_Impl.dfm
View File

@ -1,7 +1,6 @@
object srvPedidosProveedor: TsrvPedidosProveedor
OldCreateOrder = True
OnCreate = DARemoteServiceCreate
RequiresSession = True
SessionManager = dmServer.SessionManager
ConnectionName = 'IBX'
ServiceSchema = schPedidosProveedor
@ -70,6 +69,14 @@ object srvPedidosProveedor: TsrvPedidosProveedor
DatasetField = 'NOMBRE_ALMACEN'
TableField = 'NOMBRE_ALMACEN'
end
item
DatasetField = 'ID_OBRA'
TableField = 'ID_OBRA'
end
item
DatasetField = 'NOMBRE_OBRA'
TableField = 'NOMBRE_OBRA'
end
item
DatasetField = 'OBSERVACIONES'
TableField = 'OBSERVACIONES'
@ -161,14 +168,6 @@ object srvPedidosProveedor: TsrvPedidosProveedor
item
DatasetField = 'ID_FORMA_PAGO'
TableField = 'ID_FORMA_PAGO'
end
item
DatasetField = 'ID_OBRA'
TableField = 'ID_OBRA'
end
item
DatasetField = 'NOMBRE_OBRA'
TableField = 'NOMBRE_OBRA'
end>
end>
Name = 'PedidosProveedor'
@ -201,7 +200,6 @@ object srvPedidosProveedor: TsrvPedidosProveedor
Name = 'REFERENCIA'
DataType = datString
Size = 255
ServerAutoRefresh = True
DictionaryEntry = 'PedidosProveedor_REFERENCIA'
end
item
@ -384,7 +382,6 @@ object srvPedidosProveedor: TsrvPedidosProveedor
Statements = <
item
Connection = 'IBX'
TargetTable = 'PEDIDOS_PROVEEDOR_DETALLES'
SQL =
'SELECT'#10' PEDIDOS_PROVEEDOR_DETALLES.ID, PEDIDOS_PROVEEDOR_DETA' +
'LLES.ID_PEDIDO,'#10' PEDIDOS_PROVEEDOR_DETALLES.POSICION, PEDIDOS' +
@ -425,6 +422,10 @@ object srvPedidosProveedor: TsrvPedidosProveedor
DatasetField = 'CANTIDAD'
TableField = 'CANTIDAD'
end
item
DatasetField = 'UNIDAD_MEDIDA'
TableField = 'UNIDAD_MEDIDA'
end
item
DatasetField = 'IMPORTE_UNIDAD'
TableField = 'IMPORTE_UNIDAD'
@ -451,22 +452,15 @@ object srvPedidosProveedor: TsrvPedidosProveedor
end
item
DatasetField = 'REFERENCIA'
TableField = '<unknown>'
SQLOrigin = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'REFERENCIA_PROVEEDOR'
TableField = '<unknown>'
SQLOrigin = 'REFERENCIA_PROVEEDOR'
end
item
DatasetField = 'UNIDAD_MEDIDA'
TableField = 'UNIDAD_MEDIDA'
TableField = 'REFERENCIA_PROVEEDOR'
end
item
DatasetField = 'REFERENCIA_FABRICANTE'
TableField = '<unknown>'
SQLOrigin = 'REFERENCIA_FABRICANTE'
TableField = 'REFERENCIA_FABRICANTE'
end>
end>
Name = 'PedidosProveedor_Detalles'
@ -571,7 +565,6 @@ object srvPedidosProveedor: TsrvPedidosProveedor
Statements = <
item
Connection = 'IBX'
TargetTable = 'V_PED_PROV_ARTICULOS'
SQL =
'select V_PED_PROV_ARTICULOS.ID_PEDIDO,'#10' ARTICULOS.REFERENC' +
'IA,'#10' V_PED_PROV_ARTICULOS.ID_ARTICULO,'#10' ARTICULOS.DE' +
@ -663,173 +656,6 @@ object srvPedidosProveedor: TsrvPedidosProveedor
end>
Name = 'Delete_PedidosProveedor'
end
item
Params = <
item
Name = 'CANTIDAD'
Value = ''
end
item
Name = 'POSICION'
Value = ''
end
item
Name = 'UNIDAD_MEDIDA'
Value = ''
end
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PEDIDOS_PROV_DETALLES_ID'
Value = ''
end
item
Name = 'TIPO_DETALLE'
Value = ''
end
item
Name = 'CONCEPTO'
Value = ''
end
item
Name = 'IMPORTE_UNIDAD'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end
item
Name = 'VISIBLE'
Value = ''
end
item
Name = 'ID_PEDIDO'
Value = ''
end
item
Name = 'ID_ARTICULO'
Value = ''
end
item
Name = 'DESCUENTO'
Value = ''
end
item
Name = 'IMPORTE_PORTE'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PEDIDOS_PROVEEDOR_DETALLES'
SQL =
'INSERT'#10' INTO PEDIDOS_PROVEEDOR_DETALLES'#10' (CANTIDAD, POSICION' +
', ID, TIPO_DETALLE, CONCEPTO, IMPORTE_UNIDAD, '#10' IMPORTE_TOTA' +
'L, VISIBLE, ID_PEDIDO, UNIDAD_MEDIDA,'#10' ID_ARTICULO, DESCUENT' +
'O, IMPORTE_PORTE)'#10' VALUES'#10' (:CANTIDAD, :POSICION, :ID, :TIPO' +
'_DETALLE, :CONCEPTO, '#10' :IMPORTE_UNIDAD, :IMPORTE_TOTAL, :VIS' +
'IBLE, :ID_PEDIDO, :UNIDAD_MEDIDA,'#10' :ID_ARTICULO, :DESCUENTO,' +
' :IMPORTE_PORTE)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_PedidosProveedor_Detalles'
end
item
Params = <
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PEDIDOS_PROVEEDOR_DETALLES'
SQL =
'DELETE '#10' FROM'#10' PEDIDOS_PROVEEDOR_DETALLES'#10' WHERE'#10' (ID = ' +
':OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_PedidosProveedor_Detalles'
end
item
Params = <
item
Name = 'UNIDAD_MEDIDA'
Value = ''
end
item
Name = 'CANTIDAD'
Value = ''
end
item
Name = 'POSICION'
Value = ''
end
item
Name = 'ID'
Value = ''
end
item
Name = 'TIPO_DETALLE'
Value = ''
end
item
Name = 'CONCEPTO'
Value = ''
end
item
Name = 'IMPORTE_UNIDAD'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end
item
Name = 'VISIBLE'
Value = ''
end
item
Name = 'ID_PEDIDO'
Value = ''
end
item
Name = 'ID_ARTICULO'
Value = ''
end
item
Name = 'DESCUENTO'
Value = ''
end
item
Name = 'IMPORTE_PORTE'
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PEDIDOS_PROVEEDOR_DETALLES'
SQL =
'UPDATE PEDIDOS_PROVEEDOR_DETALLES'#10' SET '#10' CANTIDAD = :CANTIDA' +
'D, '#10' UNIDAD_MEDIDA = :UNIDAD_MEDIDA,'#10' POSICION = :POSICION' +
', '#10' ID = :ID, '#10' TIPO_DETALLE = :TIPO_DETALLE, '#10' CONCEPT' +
'O = :CONCEPTO, '#10' IMPORTE_UNIDAD = :IMPORTE_UNIDAD, '#10' IMPOR' +
'TE_TOTAL = :IMPORTE_TOTAL, '#10' VISIBLE = :VISIBLE, '#10' ID_PEDI' +
'DO = :ID_PEDIDO, '#10' ID_ARTICULO = :ID_ARTICULO,'#10' DESCUENTO ' +
'= :DESCUENTO,'#10' IMPORTE_PORTE = :IMPORTE_PORTE'#10' WHERE'#10' (ID' +
' = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_PedidosProveedor_Detalles'
end
item
Params = <
item
@ -1149,13 +975,176 @@ object srvPedidosProveedor: TsrvPedidosProveedor
ColumnMappings = <>
end>
Name = 'Update_PedidosProveedor'
end
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PEDIDOS_PROV_DETALLES_ID'
Value = ''
end
item
Name = 'ID_PEDIDO'
Value = ''
end
item
Name = 'POSICION'
Value = ''
end
item
Name = 'TIPO_DETALLE'
Value = ''
end
item
Name = 'ID_ARTICULO'
Value = ''
end
item
Name = 'CONCEPTO'
Value = ''
end
item
Name = 'CANTIDAD'
Value = ''
end
item
Name = 'UNIDAD_MEDIDA'
Value = ''
end
item
Name = 'IMPORTE_UNIDAD'
Value = ''
end
item
Name = 'DESCUENTO'
Value = ''
end
item
Name = 'IMPORTE_PORTE'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end
item
Name = 'VISIBLE'
Value = ''
end>
Statements = <
item
ConnectionType = 'Interbase'
Default = True
TargetTable = 'PEDIDOS_PROVEEDOR_DETALLES'
SQL =
'INSERT'#10' INTO PEDIDOS_PROVEEDOR_DETALLES'#10' (ID, ID_PEDIDO, POS' +
'ICION, TIPO_DETALLE, ID_ARTICULO, '#10' CONCEPTO, CANTIDAD, UNID' +
'AD_MEDIDA, IMPORTE_UNIDAD, '#10' DESCUENTO, IMPORTE_PORTE, IMPOR' +
'TE_TOTAL, VISIBLE, FECHA_ALTA)'#10' VALUES'#10' (:ID, :ID_PEDIDO, :P' +
'OSICION, :TIPO_DETALLE, :ID_ARTICULO, '#10' :CONCEPTO, :CANTIDAD' +
', :UNIDAD_MEDIDA, :IMPORTE_UNIDAD, '#10' :DESCUENTO, :IMPORTE_PO' +
'RTE, :IMPORTE_TOTAL, :VISIBLE, '#10' current_timestamp)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_PedidosProveedor_Detalles'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datInteger
Value = '0'
end>
Statements = <
item
ConnectionType = 'Interbase'
Default = True
TargetTable = 'PEDIDOS_PROVEEDOR_DETALLES'
SQL =
'DELETE '#10' FROM'#10' PEDIDOS_PROVEEDOR_DETALLES'#10' WHERE'#10' (ID = ' +
':OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_PedidosProveedor_Detalles'
end
item
Params = <
item
Name = 'POSICION'
Value = ''
end
item
Name = 'TIPO_DETALLE'
Value = ''
end
item
Name = 'ID_ARTICULO'
Value = ''
end
item
Name = 'CONCEPTO'
Value = ''
end
item
Name = 'CANTIDAD'
Value = ''
end
item
Name = 'UNIDAD_MEDIDA'
Value = ''
end
item
Name = 'IMPORTE_UNIDAD'
Value = ''
end
item
Name = 'DESCUENTO'
Value = ''
end
item
Name = 'IMPORTE_PORTE'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end
item
Name = 'VISIBLE'
Value = ''
end
item
Name = 'ID'
Value = ''
end>
Statements = <
item
ConnectionType = 'Interbase'
Default = True
TargetTable = 'PEDIDOS_PROVEEDOR_DETALLES'
SQL =
'UPDATE PEDIDOS_PROVEEDOR_DETALLES'#10' SET '#10' POSICION = :POSICIO' +
'N,'#10' TIPO_DETALLE = :TIPO_DETALLE, '#10' ID_ARTICULO = :ID_ARTI' +
'CULO, '#10' CONCEPTO = :CONCEPTO, '#10' CANTIDAD = :CANTIDAD, '#10' ' +
' UNIDAD_MEDIDA = :UNIDAD_MEDIDA, '#10' IMPORTE_UNIDAD = :IMPORTE_' +
'UNIDAD, '#10' DESCUENTO = :DESCUENTO, '#10' IMPORTE_PORTE = :IMPOR' +
'TE_PORTE, '#10' IMPORTE_TOTAL = :IMPORTE_TOTAL, '#10' VISIBLE = :V' +
'ISIBLE, '#10' FECHA_MODIFICACION = current_timestamp'#10' WHERE'#10' ' +
'(ID = :ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_PedidosProveedor_Detalles'
end>
RelationShips = <
item
Name = 'FK_PedidosProveedor_Detalles'
MasterDatasetName = 'PedidosProveedor'
MasterFields = 'ID'
DetailDatasetName = 'PedidosProveedor_Detalles'
DetailDatasetName = 'Copy of PedidosProveedor_Detalles'
DetailFields = 'ID_PEDIDO'
RelationshipType = rtForeignKey
end>
@ -1211,9 +1200,8 @@ object srvPedidosProveedor: TsrvPedidosProveedor
InsertCommandName = 'Insert_PedidosProveedor'
DeleteCommandName = 'Delete_PedidosProveedor'
UpdateCommandName = 'Update_PedidosProveedor'
RefreshDatasetName = 'PedidosProveedor_Refresh'
ReferencedDataset = 'PedidosProveedor'
ProcessorOptions = [poPrepareCommands]
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 240
Top = 24
@ -1223,7 +1211,6 @@ object srvPedidosProveedor: TsrvPedidosProveedor
InsertCommandName = 'Insert_PedidosProveedor_Detalles'
DeleteCommandName = 'Delete_PedidosProveedor_Detalles'
UpdateCommandName = 'Update_PedidosProveedor_Detalles'
RefreshDatasetName = 'PedidosProveedor_Detalles_Refresh'
ReferencedDataset = 'PedidosProveedor_Detalles'
ProcessorOptions = [poPrepareCommands]
UpdateMode = updWhereKeyOnly
@ -1493,7 +1480,6 @@ object srvPedidosProveedor: TsrvPedidosProveedor
DataType = datString
Size = 255
DisplayLabel = 'REFERENCIA'
ServerAutoRefresh = True
end
item
Name = 'PedidosProveedor_FECHA_ENVIO'