Patch level : 12.0 430
Files correlati : tf Commento : Corretta logica FLAG_FORZATO e FLAG_ERRORE git-svn-id: svn://10.65.10.50/branches/R_10_00@24037 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
028b14c0df
commit
cd683ff589
@ -185,7 +185,7 @@ BEGIN
|
||||
ITEM "Forzata@10"
|
||||
ITEM "N.\nRegistraz.@10"
|
||||
ITEM "Codici Errori@10"
|
||||
DEFAULT "*" // Impedisce il salvataggio su profilo .ini
|
||||
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
@ -204,10 +204,10 @@ END
|
||||
LIST A_INVIO 1 15
|
||||
BEGIN
|
||||
PROMPT 1 10 "Da inviare"
|
||||
ITEM "X|Da Inviare"
|
||||
ITEM "N|Disabilitato"
|
||||
ITEM "F|Forzato"
|
||||
ITEM "E|Errato"
|
||||
ITEM "X|X, Da Inviare"
|
||||
ITEM "N|N, Disabilitato"
|
||||
ITEM "F|F, Forzato"
|
||||
ITEM "E|E, Errato"
|
||||
FIELD INVIO
|
||||
END
|
||||
|
||||
|
@ -305,7 +305,9 @@ bool TTrFa_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
||||
o.mask().set(A_FORZATA, true);
|
||||
else
|
||||
{
|
||||
changeInvio(o.mask().get(A_TIPOCF), o.mask().get(A_CODCF), o.mask().get(A_NUMDOC), o.mask().get(A_INVIO));
|
||||
TString invio = o.mask().get(A_INVIO);
|
||||
if(invio != FLAG_FORZATO || invio != FLAG_ERRORE)
|
||||
changeInvio(o.mask().get(A_TIPOCF), o.mask().get(A_CODCF), o.mask().get(A_NUMDOC), invio);
|
||||
}
|
||||
}
|
||||
}
|
||||
@ -580,14 +582,15 @@ TRecnotype TTrFa_mask::nuovo_progr() const
|
||||
void TTrFa_mask::changeInvio(TString tipocf, TString codcf, TString numdoc, TString invio) const
|
||||
{
|
||||
TSheet_field& sheet = sfield(F_RIGHE);
|
||||
TString rtipo, rcod, rnum;
|
||||
TString rtipo, rcod, rnum, rinvio;
|
||||
FOR_EACH_SHEET_ROW(sheet, r, strarr)
|
||||
{
|
||||
// Ricevo i parametri della riga
|
||||
rtipo.cut(0); rtipo << strarr->get_char(_tipocf);
|
||||
rcod.cut(0); rcod << strarr->get_int(_codcf);
|
||||
rnum.cut(0); rnum << strarr->get(_numdoc);
|
||||
if(tipocf == rtipo && codcf == rcod && rnum == numdoc)
|
||||
rinvio.cut(0); rinvio << strarr->get(_invio);
|
||||
if(rinvio != FLAG_FORZATO && invio != FLAG_ERRORE && tipocf == rtipo && codcf == rcod && rnum == numdoc)
|
||||
{
|
||||
strarr->add(invio, _invio);
|
||||
// Aggiorno la riga
|
||||
|
Loading…
x
Reference in New Issue
Block a user