root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Aggiunto a menu il programma di parametrizzazione deleghe

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1489 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-06-21 15:31:21 +00:00
parent 56eb66a4a0
commit b6d974409f
2 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
ba/ba2100.cpp
View File

@ -55,7 +55,7 @@ bool TForm_editor::create()
if (form == NULL) if (form == NULL)
form = argv(a); form = argv(a);
else else
if (code == 0) if (code == 0)
code = atol(argv(a)); code = atol(argv(a));
} }
@ -84,9 +84,9 @@ bool TForm_editor::create()
KEY k; KEY k;
while ((k = m.run()) != K_ESC) while ((k = m.run()) != K_ESC)
{ {
TString fform = m.get(F_BASE); TString16 fform = m.get(F_BASE);
TString fdesc = m.get(F_DESC); TString80 fdesc = m.get(F_DESC);
long fcode = m.get_long(F_CODE); long fcode = m.get_long(F_CODE);
if (k == K_ENTER) if (k == K_ENTER)
{ {
@ -96,8 +96,7 @@ bool TForm_editor::create()
} }
else if (k == K_DEL) else if (k == K_DEL)
{ {
if (yesno_box("Confermare la cancellazione del " if (yesno_box("Confermare la cancellazione del profilo %05ld", fcode))
"profilo %05ld", fcode))
{ {
TLocalisamfile frm(LF_FORM); TLocalisamfile frm(LF_FORM);
frm.zero(); frm.zero();
@ -111,8 +110,7 @@ bool TForm_editor::create()
rfr.put("CODPROF", fcode); rfr.put("CODPROF", fcode);
if (rfr.read() == NOERR) if (rfr.read() == NOERR)
{ {
for (; rfr.get_long("CODPROF") == fcode && rfr.get("TIPOPROF") for ( ; rfr.get_long("CODPROF") == fcode && rfr.get("TIPOPROF") == fform; rfr.next())
== fform; rfr.next())
rfr.remove(); rfr.remove();
} }
m.set(F_CODE,""); m.set(F_CODE,"");

3
ba/prassi.mnu
View File

@ -140,6 +140,7 @@
15|Utenti|ba1 -3 15|Utenti|ba1 -3
15|Attivazione|ba1 -4 15|Attivazione|ba1 -4
15|Backup|ba2 -1 15|Backup|ba2 -1
15|Servizio|22
16|Servizio| 16|Servizio|
16|Copia Archivi|cg4 -1 16|Copia Archivi|cg4 -1
16|Ripristino stampa registri|cg5 -4 16|Ripristino stampa registri|cg5 -4
@ -182,3 +183,5 @@
21|Apertura nuovo esercizio|cg4 -4 C 21|Apertura nuovo esercizio|cg4 -4 C
21|Apertura nuovo esercizio IVA|cg4 -4 I 21|Apertura nuovo esercizio IVA|cg4 -4 I
21|Chiusura/Apertura conti|cg4 -5 21|Chiusura/Apertura conti|cg4 -5
22|Servizio
22|Parametrizzazione deleghe|ba2 -0 -E