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

Kazzatelle

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1226 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-04-10 16:30:03 +00:00
parent 6b47725702
commit 71f8628412
5 changed files with 378 additions and 356 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
cg/Attic/cg1400.cpp
View File

@ -133,8 +133,12 @@ int TStampa_deleghe_IVA::select()
TToken_string d(80); TToken_string d(80);
_ditte->destroy(); _ditte->destroy();
<<<<<<< cg1400.cpp
begin_wait();
=======
begin_wait(); begin_wait();
>>>>>>> 1.9
for (_nditte->first(); _nditte->good(); _nditte->next()) for (_nditte->first(); _nditte->good(); _nditte->next())
{ {
TLocalisamfile& anag = _nditte->lfile(LF_ANAG); TLocalisamfile& anag = _nditte->lfile(LF_ANAG);
@ -149,6 +153,7 @@ int TStampa_deleghe_IVA::select()
const long dit = _nditte->lfile().get_long("CODDITTA"); const long dit = _nditte->lfile().get_long("CODDITTA");
chiave.format("%05ld%04d%02d%d", dit, _anno, _mese, _tipo); chiave.format("%05ld%04d%02d%d", dit, _anno, _mese, _tipo);
deleghe.put("CODTAB", chiave); deleghe.put("CODTAB", chiave);
if (deleghe.read() == NOERR && deleghe.get_bool("B0") == FALSE) // Da stampare if (deleghe.read() == NOERR && deleghe.get_bool("B0") == FALSE) // Da stampare
{ {
const long abi = deleghe.get_long("S7"); const long abi = deleghe.get_long("S7");
@ -168,8 +173,12 @@ int TStampa_deleghe_IVA::select()
} }
} }
} }
<<<<<<< cg1400.cpp
end_wait();
=======
end_wait(); end_wait();
>>>>>>> 1.9
int res = 1; int res = 1;
if (_ditte->items() > 0) if (_ditte->items() > 0)
{ {

2
cg/cg0100.cpp
View File

@ -361,6 +361,8 @@ bool CG0100_application::user_create()
_saldi = new TLocalisamfile(LF_SALDI); _saldi = new TLocalisamfile(LF_SALDI);
_saldi->setkey(2); _saldi->setkey(2);
set_search_field(FLD_CM1_GRUPPO); set_search_field(FLD_CM1_GRUPPO);
return TRUE; return TRUE;
} }

1
cg/cg0400.cpp
View File

@ -210,6 +210,7 @@ bool CG0400_application::user_create()
_anag = new TLocalisamfile(LF_ANAG); _anag = new TLocalisamfile(LF_ANAG);
_nditte = new TLocalisamfile(LF_NDITTE); _nditte = new TLocalisamfile(LF_NDITTE);
_com = new TLocalisamfile(LF_COMUNI); _com = new TLocalisamfile(LF_COMUNI);
return TRUE; return TRUE;
} }

9
cg/cg1400.cpp
View File

@ -133,8 +133,12 @@ int TStampa_deleghe_IVA::select()
TToken_string d(80); TToken_string d(80);
_ditte->destroy(); _ditte->destroy();
<<<<<<< cg1400.cpp
begin_wait();
=======
begin_wait(); begin_wait();
>>>>>>> 1.9
for (_nditte->first(); _nditte->good(); _nditte->next()) for (_nditte->first(); _nditte->good(); _nditte->next())
{ {
TLocalisamfile& anag = _nditte->lfile(LF_ANAG); TLocalisamfile& anag = _nditte->lfile(LF_ANAG);
@ -149,6 +153,7 @@ int TStampa_deleghe_IVA::select()
const long dit = _nditte->lfile().get_long("CODDITTA"); const long dit = _nditte->lfile().get_long("CODDITTA");
chiave.format("%05ld%04d%02d%d", dit, _anno, _mese, _tipo); chiave.format("%05ld%04d%02d%d", dit, _anno, _mese, _tipo);
deleghe.put("CODTAB", chiave); deleghe.put("CODTAB", chiave);
if (deleghe.read() == NOERR && deleghe.get_bool("B0") == FALSE) // Da stampare if (deleghe.read() == NOERR && deleghe.get_bool("B0") == FALSE) // Da stampare
{ {
const long abi = deleghe.get_long("S7"); const long abi = deleghe.get_long("S7");
@ -168,8 +173,12 @@ int TStampa_deleghe_IVA::select()
} }
} }
} }
<<<<<<< cg1400.cpp
end_wait();
=======
end_wait(); end_wait();
>>>>>>> 1.9
int res = 1; int res = 1;
if (_ditte->items() > 0) if (_ditte->items() > 0)
{ {

3
cg/del.frm
View File

@ -7,6 +7,7 @@ JOIN 8 TO 6 INTO CODANAGR=CODANAGR
JOIN 7 TO 6 INTO CODANAGR=CODANAGR JOIN 7 TO 6 INTO CODANAGR=CODANAGR
JOIN 13 TO 6 ALIAS 12 INTO COM=COMRF JOIN 13 TO 6 ALIAS 12 INTO COM=COMRF
JOIN 13 TO 8 ALIAS 13 INTO COM=COMNASC JOIN 13 TO 8 ALIAS 13 INTO COM=COMNASC
END
SECTION BODY 0 66 SECTION BODY 0 66
STRINGA STRINGA
@ -25,7 +26,7 @@ END
STRINGA STRINGA
BEGIN BEGIN
KEY "Provicia Banca" KEY "Provincia Banca"
PROMPT 73 12 "" PROMPT 73 12 ""
FIELD 11@->PROVCOM FIELD 11@->PROVCOM
END END