Albaranes de proveedor: Sustitución de herencia en reglas de negocio.
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@490 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
0d4cc87c6c
commit
e7cc803c6f
@ -3,7 +3,7 @@ unit schAlbaranesProveedorClient_Intf;
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
|
||||
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
|
||||
|
||||
const
|
||||
{ Data table rules ids
|
||||
@ -361,7 +361,7 @@ type
|
||||
end;
|
||||
|
||||
{ TAlbaranesProveedorDataTableRules }
|
||||
TAlbaranesProveedorDataTableRules = class(TDADataTableRules, IAlbaranesProveedor)
|
||||
TAlbaranesProveedorDataTableRules = class(TIntfObjectDADataTableRules, IAlbaranesProveedor)
|
||||
private
|
||||
f_OBSERVACIONES: IROStrings;
|
||||
f_INCIDENCIAS: IROStrings;
|
||||
@ -704,7 +704,7 @@ type
|
||||
end;
|
||||
|
||||
{ TAlbaranesProveedor_DetallesDataTableRules }
|
||||
TAlbaranesProveedor_DetallesDataTableRules = class(TDADataTableRules, IAlbaranesProveedor_Detalles)
|
||||
TAlbaranesProveedor_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IAlbaranesProveedor_Detalles)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
|
||||
@ -3,7 +3,7 @@ unit schPedidosProveedorClient_Intf;
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
|
||||
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
|
||||
|
||||
const
|
||||
{ Data table rules ids
|
||||
@ -387,7 +387,7 @@ type
|
||||
end;
|
||||
|
||||
{ TPedidosProveedorDataTableRules }
|
||||
TPedidosProveedorDataTableRules = class(TDADataTableRules, IPedidosProveedor)
|
||||
TPedidosProveedorDataTableRules = class(TIntfObjectDADataTableRules, IPedidosProveedor)
|
||||
private
|
||||
f_OBSERVACIONES: IROStrings;
|
||||
f_INCIDENCIAS: IROStrings;
|
||||
@ -736,7 +736,7 @@ type
|
||||
end;
|
||||
|
||||
{ TPedidosProveedor_DetallesDataTableRules }
|
||||
TPedidosProveedor_DetallesDataTableRules = class(TDADataTableRules, IPedidosProveedor_Detalles)
|
||||
TPedidosProveedor_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IPedidosProveedor_Detalles)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
@ -891,7 +891,7 @@ type
|
||||
end;
|
||||
|
||||
{ TPedidosProveedor_Articulos_PendientesDataTableRules }
|
||||
TPedidosProveedor_Articulos_PendientesDataTableRules = class(TDADataTableRules, IPedidosProveedor_Articulos_Pendientes)
|
||||
TPedidosProveedor_Articulos_PendientesDataTableRules = class(TIntfObjectDADataTableRules, IPedidosProveedor_Articulos_Pendientes)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
|
||||
Loading…
Reference in New Issue
Block a user