Se habilita duplicar albaranes de cliente

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@181 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
roberto 2008-03-25 19:06:25 +00:00
parent 1f1879dcb4
commit c9e2512299
2 changed files with 1 additions and 3 deletions

View File

@ -422,6 +422,7 @@ begin
USUARIO := AppFactuGES.UsuarioActivo.UserName;
FECHA_ALBARAN := DateOf(Now);
INCIDENCIAS_ACTIVAS := 0;
SITUACION := SITUACION_ALBARAN_PENDIENTE;
// INCIDENCIAS := Nil;
REFERENCIA := '';
FECHA_PREVISTA_ENVIO := 0;

View File

@ -281,8 +281,6 @@ procedure TfEditorAlbaranesCliente.DuplicarInterno;
var
APedido : IBizAlbaranCliente;
begin
AppFactuGES.ShowCapado;
{
inherited;
APedido := FController.Duplicar(Albaranes);
try
@ -290,7 +288,6 @@ AppFactuGES.ShowCapado;
finally
actRefrescar.Execute;
end;
}
end;
procedure TfEditorAlbaranesCliente.EliminarInterno;