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

CG1400.CPP : Aggiunta chiamata a TForm::set_arrange() per evitare di

Browse Source 
rieffettuare ogni volta il posizionamento; corretta stampa
			  della data e dei codici ABI-CAB impostati sulla maschera.
CG1400A.UML : Tolto il flag di automatico sul campo data di stampa.
DELIVA.FRM  : Corretta stampa del codice dipendenza.


git-svn-id: svn://10.65.10.50/trunk@2118 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1995-11-09 13:30:48 +00:00
parent e7e352eb23
commit 6fb97e1b61
5 changed files with 19 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
cg/Attic/cg1400.cpp
View File

@ -56,9 +56,8 @@ bool TStampa_deleghe_IVA::create()
_ditte = new TArray_sheet(-1, -1, 0, 0, "Selezione Deleghe da stampare",
"@1|Cod.@5|Ragione Sociale@30|Importo@15r|Interessi@15r|ABI@5|CAB@5|Concessione|Tit. Conto Fis.");
TConfig c(CONFIG_STUDIO, "cg");
_azienda = c.get("CodABI");
_dipendenza = c.get("CodCAB");
_azienda = "" ;
_dipendenza = "" ;
dispatch_e_menu(BAR_ITEM(1));
return TRUE;
@ -346,13 +345,17 @@ bool TStampa_deleghe_IVA::print_deleghe()
cur.read(); // Posiziona il cursore
const bool cera_abi = _azienda.empty() || delega.get("S7").not_empty();
if (_pd.ok())
delega.put("D0",_pd);
const bool cera_abi = _azienda.empty() || _dipendenza.empty();
if (!cera_abi)
{
delega.put("S7", _azienda);
delega.put("S8", _dipendenza);
delega.rewrite();
cur.read();
}
const bool cera_conc = (*r.get(7) <= ' ') || delega.get("S9").not_empty();
if (!cera_conc)
delega.put("S9", r.get(7)); // Concessione
@ -385,6 +388,7 @@ bool TStampa_deleghe_IVA::print_deleghe()
delega.put("S6", tributo);
}
if (i > 0) f.set_arrange(FALSE);
ok = f.print(-1); // Stampa solo il record corrente
if (!ok) break;

1
cg/Attic/cg1400a.uml
View File

@ -184,7 +184,6 @@ DATA F_DATA
BEGIN
PROMPT 2 14 "Data "
HELP "Data da stampare sulle deleghe"
FLAGS "A"
END
BOOLEAN F_AGGIORNA

14
cg/cg1400.cpp
View File

@ -56,9 +56,8 @@ bool TStampa_deleghe_IVA::create()
_ditte = new TArray_sheet(-1, -1, 0, 0, "Selezione Deleghe da stampare",
"@1|Cod.@5|Ragione Sociale@30|Importo@15r|Interessi@15r|ABI@5|CAB@5|Concessione|Tit. Conto Fis.");
TConfig c(CONFIG_STUDIO, "cg");
_azienda = c.get("CodABI");
_dipendenza = c.get("CodCAB");
_azienda = "" ;
_dipendenza = "" ;
dispatch_e_menu(BAR_ITEM(1));
return TRUE;
@ -346,13 +345,17 @@ bool TStampa_deleghe_IVA::print_deleghe()
cur.read(); // Posiziona il cursore
const bool cera_abi = _azienda.empty() || delega.get("S7").not_empty();
if (_pd.ok())
delega.put("D0",_pd);
const bool cera_abi = _azienda.empty() || _dipendenza.empty();
if (!cera_abi)
{
delega.put("S7", _azienda);
delega.put("S8", _dipendenza);
delega.rewrite();
cur.read();
}
const bool cera_conc = (*r.get(7) <= ' ') || delega.get("S9").not_empty();
if (!cera_conc)
delega.put("S9", r.get(7)); // Concessione
@ -385,6 +388,7 @@ bool TStampa_deleghe_IVA::print_deleghe()
delega.put("S6", tributo);
}
if (i > 0) f.set_arrange(FALSE);
ok = f.print(-1); // Stampa solo il record corrente
if (!ok) break;

1
cg/cg1400a.uml
View File

@ -184,7 +184,6 @@ DATA F_DATA
BEGIN
PROMPT 2 14 "Data "
HELP "Data da stampare sulle deleghe"
FLAGS "A"
END
BOOLEAN F_AGGIORNA

2
cg/deliva.frm
View File

@ -383,7 +383,7 @@ BEGIN
KEY "Codice Dipendenza"
PROMPT 124 58 ""
PICTURE "@ @ @ @"
FIELD 1@->I0
FIELD S8[2,5]
END
STRINGA 40 40 1