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

Repaso a contactos:

Browse Source 
* Rellenar los campos ID_EMPRESA y USUARIO con sus valores.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@131 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2007-11-18 12:57:35 +00:00
parent 01a6886a44
commit ae5d9dcfff
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Source/Modulos/Contactos/Model/uBizContactos.pas
View File

@ -348,7 +348,7 @@ type
implementation
uses
uDataTableUtils, Classes, DateUtils, SysUtils;
uDataTableUtils, Classes, DateUtils, SysUtils, uFactuGES_App;
{ TBizContacto }
@ -402,8 +402,7 @@ end;
procedure TBizContacto.IniciarValoresContactoNuevo;
begin
//
//USUARIO := dmUsuarios.LoginInfo.Usuario;
USUARIO := AppFactuGES.UsuarioActivo.UserName;
end;
procedure TBizContacto.OnNewRecord(Sender: TDADataTable);