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 "Forzata@10"
 | 
				
			||||||
  ITEM "N.\nRegistraz.@10"
 | 
					  ITEM "N.\nRegistraz.@10"
 | 
				
			||||||
  ITEM "Codici Errori@10"
 | 
					  ITEM "Codici Errori@10"
 | 
				
			||||||
  DEFAULT "*"  // Impedisce il salvataggio su profilo .ini
 | 
					
 | 
				
			||||||
END
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
ENDPAGE
 | 
					ENDPAGE
 | 
				
			||||||
@ -204,10 +204,10 @@ END
 | 
				
			|||||||
LIST A_INVIO 1 15
 | 
					LIST A_INVIO 1 15
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 1 10 "Da inviare"
 | 
					  PROMPT 1 10 "Da inviare"
 | 
				
			||||||
  ITEM "X|Da Inviare"
 | 
					  ITEM "X|X, Da Inviare"
 | 
				
			||||||
  ITEM "N|Disabilitato"
 | 
					  ITEM "N|N, Disabilitato"
 | 
				
			||||||
  ITEM "F|Forzato"
 | 
					  ITEM "F|F, Forzato"
 | 
				
			||||||
  ITEM "E|Errato"
 | 
					  ITEM "E|E, Errato"
 | 
				
			||||||
  FIELD INVIO
 | 
					  FIELD INVIO
 | 
				
			||||||
END
 | 
					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);
 | 
									o.mask().set(A_FORZATA, true);
 | 
				
			||||||
			else
 | 
								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
 | 
					void TTrFa_mask::changeInvio(TString tipocf, TString codcf, TString numdoc, TString invio) const
 | 
				
			||||||
{
 | 
					{
 | 
				
			||||||
	TSheet_field& sheet = sfield(F_RIGHE);
 | 
						TSheet_field& sheet = sfield(F_RIGHE);
 | 
				
			||||||
	TString rtipo, rcod, rnum;
 | 
						TString rtipo, rcod, rnum, rinvio;
 | 
				
			||||||
	FOR_EACH_SHEET_ROW(sheet, r, strarr)
 | 
						FOR_EACH_SHEET_ROW(sheet, r, strarr)
 | 
				
			||||||
	{
 | 
						{
 | 
				
			||||||
		// Ricevo i parametri della riga
 | 
							// Ricevo i parametri della riga
 | 
				
			||||||
		rtipo.cut(0); rtipo << strarr->get_char(_tipocf);
 | 
							rtipo.cut(0); rtipo << strarr->get_char(_tipocf);
 | 
				
			||||||
		rcod.cut(0);	rcod	<< strarr->get_int(_codcf);
 | 
							rcod.cut(0);	rcod	<< strarr->get_int(_codcf);
 | 
				
			||||||
		rnum.cut(0);	rnum	<< strarr->get(_numdoc);
 | 
							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);
 | 
								strarr->add(invio, _invio);
 | 
				
			||||||
			// Aggiorno la riga
 | 
								// Aggiorno la riga
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user