Patch level :10.0
Files correlati : Ricompilazione Demo : [ ] Commento :hardy correzioni per roberto git-svn-id: svn://10.65.10.50/branches/R_10_00@21619 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
e9f1a4ec4e
commit
550dfdeed4
@ -163,12 +163,6 @@ BEGIN
|
||||
FLAGS "H"
|
||||
END
|
||||
|
||||
STRING DLG_PROFILE 50
|
||||
BEGIN
|
||||
PROMPT 1 -1 "Profilo "
|
||||
PSELECT
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
TOOLBAR "topbar" 0 0 0 2
|
||||
|
@ -702,8 +702,12 @@ void TUpload2Campo::elabora_SI(THardy_upload_recordset& recset, TLog_report& log
|
||||
const TDate datadoc = upload_format_date6(str_datadoc);
|
||||
const TString4 tipodoc = recset.get("TipoDocumento").as_string();
|
||||
const real incasso = recset.get("ImportoIncassato").as_real() / CENTO;
|
||||
//il codice partita su Campo è lungo 7 mentre i terminalini lo possono inviare lungo 15 (cazzi loro..)
|
||||
const TString8 numpart = recset.get("Partita").as_string().left(7);
|
||||
|
||||
//panegirico su anno partita e numero partita
|
||||
const TString16 str_part = recset.get("Partita").as_string();
|
||||
const int annopart = atoi(str_part.left(4)); //anno = primi 4 caratteri del campo partita
|
||||
TString8 numpart = str_part.mid(5, 7); //numero partita = 7 caratteri a partire dal sesto
|
||||
numpart.trim();
|
||||
|
||||
TConfig config(CONFIG_DITTA, "ha");
|
||||
const TString& codcaus = config.get("InpCausale");
|
||||
@ -815,7 +819,7 @@ void TUpload2Campo::elabora_SI(THardy_upload_recordset& recset, TLog_report& log
|
||||
new_rmov_age.put(RMV_IMPORTO, incasso);
|
||||
|
||||
//crea i pagamenti aggiornando anche la partita (qui si parrà la tua nobilitate!)
|
||||
TPartita game(zio_clifo, anno, numpart);
|
||||
TPartita game(zio_clifo, annopart, numpart);
|
||||
const int nriga = game.prima_fattura();
|
||||
const int nrata = 1;
|
||||
//metodo magicissimo per l'aggiornamento della partita con l'incasso
|
||||
@ -1027,15 +1031,22 @@ void TUpload2Campo::elabora_TF(THardy_upload_recordset& recset, TLog_report& log
|
||||
|
||||
doc.put(DOC_CODCF, codcf);
|
||||
doc.put(DOC_CODCFFATT, recset.get(DOC_CODCFFATT).as_int());
|
||||
//sconto in fattura, sconto totale, incasso ecc.... che cazzo sono?
|
||||
//TString8 scontone = recset.get();
|
||||
doc.put(DOC_CODPAG, recset.get(DOC_CODPAG).as_string());
|
||||
//data spedizione...datapart o datacons? (solo per ordini)
|
||||
|
||||
//usa la cli2doc per riempire tutti i campi legati al cliente
|
||||
TCli_for clifor('C', codcf);
|
||||
clifor.cli2doc(doc);
|
||||
|
||||
//sconto in fattura, sconto totale, che cazzo sono?
|
||||
//TString8 scontone = recset.get();
|
||||
|
||||
//codice pagamento
|
||||
doc.put(DOC_CODPAG, recset.get(DOC_CODPAG).as_string());
|
||||
//incasso (importo pagato)
|
||||
const real incasso = recset.get("Incasso").as_real() / CENTO;
|
||||
doc.put(DOC_IMPPAGATO, incasso);
|
||||
|
||||
//data spedizione...datapart o datacons? (solo per ordini)
|
||||
|
||||
//al simpatico documento appiccia tutte le righe RF che seguono il record TF..
|
||||
//..dopo il magico ordinamento iniziale del recordset
|
||||
//intanto azzera le righe eventualmente già presenti (riscrittura)
|
||||
@ -1055,6 +1066,21 @@ void TUpload2Campo::elabora_TF(THardy_upload_recordset& recset, TLog_report& log
|
||||
//agginunge una nuova riga (solo merce, per quanto ne sappiamo)
|
||||
TRiga_documento& rigadoc = doc.new_row("01");
|
||||
|
||||
//3a) tipo cessione (fa cambiare il tipo riga o la causale di riga)
|
||||
const char tipocess = recset.get("TipoCessione").as_string()[0];
|
||||
switch (tipocess)
|
||||
{
|
||||
case 'V': break;
|
||||
case 'O':
|
||||
{
|
||||
rigadoc.put(RDOC_TIPORIGA, "09");
|
||||
rigadoc.put(RDOC_ADDIVA, "X");
|
||||
}
|
||||
break;
|
||||
case 'R': break;
|
||||
case 'S': break;
|
||||
}
|
||||
|
||||
//serie delle put sulla riga documento; ricordiamo che la chiave della riga viene riempita dalla new_row
|
||||
//3a) articolo
|
||||
TString8 codart = recset.get(RDOC_CODART).as_string();
|
||||
@ -1208,7 +1234,7 @@ void TUpload2Campo::elabora_RC(THardy_upload_recordset& recset, TLog_report& log
|
||||
TRiga_documento& rigadoc = doc.new_row("01");
|
||||
|
||||
//serie delle put sulla riga documento; ricordiamo che la chiave della riga viene riempita dalla new_row
|
||||
//3a) articolo
|
||||
//3a) articolo, um, codmag
|
||||
TString8 codart = recset.get("CodiceArticolo").as_string();
|
||||
const TString& descr = check_articolo(codart, log);
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user