arreglo de duplicar presupuestos para que no copie la factura relacionada del presupuesto si la tuviera
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@791 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
e136ba4c8f
commit
c7ec8445a1
@ -432,9 +432,12 @@ begin
|
|||||||
USUARIO := AppFactuGES.UsuarioActivo.UserName;
|
USUARIO := AppFactuGES.UsuarioActivo.UserName;
|
||||||
FECHA_PRESUPUESTO := DateOf(Now);
|
FECHA_PRESUPUESTO := DateOf(Now);
|
||||||
INCIDENCIAS_ACTIVAS := 0;
|
INCIDENCIAS_ACTIVAS := 0;
|
||||||
DataTable.FieldByName('INCIDENCIAS').AsVariant := Null;
|
INCIDENCIASIsNull := True;
|
||||||
|
ID_FACTURAIsNull := True;
|
||||||
|
FECHA_DECISIONIsNull := True;
|
||||||
REFERENCIA := '';
|
REFERENCIA := '';
|
||||||
SITUACION := SITUACION_PRESUPUESTO_PENDIENTE;
|
SITUACION := SITUACION_PRESUPUESTO_PENDIENTE;
|
||||||
|
|
||||||
end;
|
end;
|
||||||
Result.Post;
|
Result.Post;
|
||||||
finally
|
finally
|
||||||
|
|||||||
Binary file not shown.
@ -14,7 +14,7 @@ BEGIN
|
|||||||
BEGIN
|
BEGIN
|
||||||
VALUE "FileVersion", "1.4.7.0\0"
|
VALUE "FileVersion", "1.4.7.0\0"
|
||||||
VALUE "ProductVersion", "1.4.7.0\0"
|
VALUE "ProductVersion", "1.4.7.0\0"
|
||||||
VALUE "CompileDate", "lunes, 01 de diciembre de 2008 12:06\0"
|
VALUE "CompileDate", "martes, 02 de diciembre de 2008 18:01\0"
|
||||||
END
|
END
|
||||||
END
|
END
|
||||||
BLOCK "VarFileInfo"
|
BLOCK "VarFileInfo"
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user