Patch level : 12.0 954
Files correlati : fp0.exe Commento : - Modificata esportazione dati CONAI se non hai le personalizzazioni attive, in modo da poter personalizzare anche il CONAI. - Aggiunti dati precompilati per altri dati gestionali per CONAI.
This commit is contained in:
		
							parent
							
								
									98fcb9e68a
								
							
						
					
					
						commit
						1c0a48c9ca
					
				| @ -113,6 +113,30 @@ void TFpcust::init_insert_mode(TMask& m) | ||||
|   row_articolo.add("Codice articolo cliente"); | ||||
|   row_articolo.add("READ(34, CODART)"); | ||||
|   row_articolo.add("READ(34, CODARTMAG) != READ(34, CODART) && READ(34, CODART) != \"\""); | ||||
| 
 | ||||
|   // Altri dati gestionali
 | ||||
|   // CONAI
 | ||||
|   TRelation rel(LF_TABMOD); | ||||
|   TRectype  rec(LF_TABMOD); | ||||
|   rec.put("MOD", "VE"); | ||||
|   rec.put("COD", "CSC"); | ||||
| 
 | ||||
|   TCursor conais(&rel, "", 1, &rec, &rec); | ||||
|   for (conais = 0; conais.pos() < conais.items(); ++conais) | ||||
|   { | ||||
|     TRectype& row = conais.curr(); | ||||
|     TToken_string& row_conai = m.sfield(F_ADG).row(-1); | ||||
|     const TString& csc = row.get("CODTAB"); | ||||
|     TString cat(conai_material(conai_str2class(csc))); | ||||
|     cat.upper(); | ||||
|     row_conai.add("CONAI");                                             // TIPODATO
 | ||||
|     row_conai.add(TString("\"Contributo CONAI ") << cat << " (KG)\"");  // RTESTO
 | ||||
|     row_conai.add("READ(RDOC,PCON(1))");                                // RNUMERO
 | ||||
|     row_conai.add("");                                                  // RDATA
 | ||||
|     row_conai.add("");                                                  // TIPORIGA
 | ||||
|     row_conai.add(TString("READ(RDOC,CCON(1)) == \"") << csc << "\"");  // COND
 | ||||
|     row_conai.add("");                                                  // SPLIT
 | ||||
|   } | ||||
| } | ||||
| 
 | ||||
| int TFpcust::read(TMask& m) | ||||
|  | ||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user