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
@ -97,22 +97,46 @@ public:
|
||||
|
||||
void TFpcust::init_insert_mode(TMask& m)
|
||||
{
|
||||
// Presetto delle righe di default
|
||||
// Presetto delle righe di default
|
||||
|
||||
// Causale
|
||||
TToken_string& row_causale = m.sfield(F_CAUSALI).row(-1);
|
||||
row_causale.add("READ(%TIP, S0)");
|
||||
// Causale
|
||||
TToken_string& row_causale = m.sfield(F_CAUSALI).row(-1);
|
||||
row_causale.add("READ(%TIP, S0)");
|
||||
|
||||
// Articoli
|
||||
TToken_string& row_articolo_interno = m.sfield(F_ARTICOLI).row(-1);
|
||||
row_articolo_interno.add("Codice articolo interno");
|
||||
row_articolo_interno.add("READ(34, CODARTMAG)");
|
||||
row_articolo_interno.add("READ(34, CODARTMAG) != \"\" && READ(34, CODART) != \"\"");
|
||||
// Articoli
|
||||
TToken_string& row_articolo_interno = m.sfield(F_ARTICOLI).row(-1);
|
||||
row_articolo_interno.add("Codice articolo interno");
|
||||
row_articolo_interno.add("READ(34, CODARTMAG)");
|
||||
row_articolo_interno.add("READ(34, CODARTMAG) != \"\" && READ(34, CODART) != \"\"");
|
||||
|
||||
TToken_string& row_articolo = m.sfield(F_ARTICOLI).row(-1);
|
||||
row_articolo.add("Codice articolo cliente");
|
||||
row_articolo.add("READ(34, CODART)");
|
||||
row_articolo.add("READ(34, CODARTMAG) != READ(34, CODART) && READ(34, CODART) != \"\"");
|
||||
TToken_string& row_articolo = m.sfield(F_ARTICOLI).row(-1);
|
||||
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