- Contactos: lista de personal asociado a un contacto (en clientes y proveedores). - Obras: poder indicar una subcontrata - Pedidos a proveedor: usar obras como destino del pedido. git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@350 0c75b7a4-871f-7646-8a2f-f78d34cc349f
46 lines
1.1 KiB
ObjectPascal
46 lines
1.1 KiB
ObjectPascal
package Obras_view;
|
|
|
|
{$R *.res}
|
|
{$ALIGN 8}
|
|
{$ASSERTIONS ON}
|
|
{$BOOLEVAL OFF}
|
|
{$DEBUGINFO ON}
|
|
{$EXTENDEDSYNTAX ON}
|
|
{$IMPORTEDDATA ON}
|
|
{$IOCHECKS ON}
|
|
{$LOCALSYMBOLS ON}
|
|
{$LONGSTRINGS ON}
|
|
{$OPENSTRINGS ON}
|
|
{$OPTIMIZATION ON}
|
|
{$OVERFLOWCHECKS OFF}
|
|
{$RANGECHECKS OFF}
|
|
{$REFERENCEINFO ON}
|
|
{$SAFEDIVIDE OFF}
|
|
{$STACKFRAMES OFF}
|
|
{$TYPEDADDRESS OFF}
|
|
{$VARSTRINGCHECKS ON}
|
|
{$WRITEABLECONST OFF}
|
|
{$MINENUMSIZE 1}
|
|
{$IMAGEBASE $400000}
|
|
{$IMPLICITBUILD ON}
|
|
|
|
requires
|
|
Base,
|
|
GUIBase,
|
|
ApplicationBase,
|
|
Obras_controller,
|
|
Obras_model,
|
|
Contactos_view;
|
|
|
|
contains
|
|
uViewObra in 'uViewObra.pas' {frViewObra: TFrame},
|
|
uViewObras in 'uViewObras.pas' {frViewObras: TFrame},
|
|
uEditorObras in 'uEditorObras.pas' {fEditorObras: TfEditorObras},
|
|
uObrasViewRegister in 'uObrasViewRegister.pas',
|
|
uEditorObra in 'uEditorObra.pas' {fEditorObra: TfEditorObra},
|
|
uEditorListaObras in 'uEditorListaObras.pas' {fEditorListaObras: TfListaObras},
|
|
uViewSubcontrataObra in 'uViewSubcontrataObra.pas' {frViewSubcontrataObra: TFrame},
|
|
uViewClienteAsociadoObra in 'uViewClienteAsociadoObra.pas' {frViewClienteAsociadoObra: T};
|
|
|
|
end.
|