Patch level : 12.0
Files correlati : NO patch git-svn-id: svn://10.65.10.50/branches/R_10_00@24070 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
23398dc583
commit
f18f72ef20
@ -1,6 +1,7 @@
|
|||||||
#include <relapp.h>
|
#include <relapp.h>
|
||||||
#include <automask.h>
|
#include <automask.h>
|
||||||
#include <config.h>
|
#include <config.h>
|
||||||
|
#include <lffiles.h>
|
||||||
#include <progind.h>
|
#include <progind.h>
|
||||||
#include <recarray.h> // cache()
|
#include <recarray.h> // cache()
|
||||||
#include <recset.h> // TISAM_recordset
|
#include <recset.h> // TISAM_recordset
|
||||||
@ -9,7 +10,11 @@
|
|||||||
#include <execp.h> // TExternal_app
|
#include <execp.h> // TExternal_app
|
||||||
#include <dongle.h> // dongle()
|
#include <dongle.h> // dongle()
|
||||||
|
|
||||||
|
#include "..\cg\cglib01.h"
|
||||||
#include "..\cg\cglib03.h"
|
#include "..\cg\cglib03.h"
|
||||||
|
#include <mov.h>
|
||||||
|
#include <rmoviva.h>
|
||||||
|
|
||||||
|
|
||||||
#include "tf0.h"
|
#include "tf0.h"
|
||||||
#include "tf0200a.h"
|
#include "tf0200a.h"
|
||||||
@ -431,8 +436,10 @@ void ComLiqPerIva_mask::extractinator() // Per gli amici GTFO
|
|||||||
const TRectype rowLia = getLIA(anno);
|
const TRectype rowLia = getLIA(anno);
|
||||||
|
|
||||||
TString queryIva = "USE RMOVIVA\n";
|
TString queryIva = "USE RMOVIVA\n";
|
||||||
queryIva << "SELECT (23.REG!=\"\")&&BETWEEN(23.DATAREG,#DADATAREG,#ADATAREG)";
|
queryIva << "SELECT ( " << FIELD_NAME(LF_MOV, MOV_REG) << "!=\"\")&&BETWEEN( " << FIELD_NAME(LF_MOV, MOV_DATAREG) << ",#DADATAREG,#ADATAREG)"; // scritto FIELD_NAME meglio usarla
|
||||||
queryIva << "\nJOIN MOV INTO NUMREG==NUMREG\n";
|
// queryIva << "SELECT (23.REG!=\"\")&&BETWEEN(23.DATAREG,#DADATAREG,#ADATAREG)";
|
||||||
|
queryIva << "\nJOIN MOV INTO " << MOV_NUMREG << "==" << MOV_NUMREG << "\n";
|
||||||
|
// queryIva << "\nJOIN MOV INTO NUMREG==NUMREG\n";
|
||||||
|
|
||||||
TISAM_recordset curIva(queryIva);
|
TISAM_recordset curIva(queryIva);
|
||||||
curIva.set_var("#DADATAREG", data_da);
|
curIva.set_var("#DADATAREG", data_da);
|
||||||
@ -442,13 +449,14 @@ void ComLiqPerIva_mask::extractinator() // Per gli amici GTFO
|
|||||||
{
|
{
|
||||||
TString totat, totpas, i;
|
TString totat, totpas, i;
|
||||||
// Controllo che sia un movimento con codice non "non soggetto"
|
// Controllo che sia un movimento con codice non "non soggetto"
|
||||||
TCodiceIVA codiva(curIva.get("25.CODIVA").as_string());
|
TCodiceIVA codiva(curIva.get(FIELD_NAME(LF_RMOVIVA, RMI_CODIVA)).as_string());
|
||||||
if(codiva.tipo() == "NS") continue;
|
if(codiva.tipo() == "NS") continue;
|
||||||
|
|
||||||
// Prendo il tipo di registro
|
// Prendo il tipo di registro
|
||||||
TRegistro reg(curIva.get("23.REG").as_string());
|
TRegistro reg(curIva.get(FIELD_NAME(LF_MOV, MOV_REG)).as_string());
|
||||||
int tiporeg = reg.tipo();
|
int tiporeg = reg.tipo();
|
||||||
bool isCorrispettivo = reg.corrispettivi();
|
bool isCorrispettivo = reg.corrispettivi();
|
||||||
|
|
||||||
// Prendiamo l'imponibile
|
// Prendiamo l'imponibile
|
||||||
real imp = curIva.get("25.IMPONIBILE").as_real();
|
real imp = curIva.get("25.IMPONIBILE").as_real();
|
||||||
real imposta = curIva.get("25.IMPOSTA").as_real();
|
real imposta = curIva.get("25.IMPOSTA").as_real();
|
||||||
@ -475,9 +483,13 @@ void ComLiqPerIva_mask::extractinator() // Per gli amici GTFO
|
|||||||
{
|
{
|
||||||
// Nell'imponibile è presente il totale fattura, devo calcolare l'imposta e sottrarla
|
// Nell'imponibile è presente il totale fattura, devo calcolare l'imposta e sottrarla
|
||||||
// Es iva 22% => imp : 122 = x : 100
|
// Es iva 22% => imp : 122 = x : 100
|
||||||
imp = imp * CENTO / (CENTO + codiva.percentuale());
|
// imp = imp * CENTO / (CENTO + codiva.percentuale()); esiste una funzione per scorporare l'IVA
|
||||||
|
codiva.scorpora(imp);
|
||||||
}
|
}
|
||||||
|
// TString msg; msg.format("t %s imp %s s ", totopatt.stringa(), imp.stringa());
|
||||||
totopatt += imp;
|
totopatt += imp;
|
||||||
|
msg << totopatt.stringa();
|
||||||
|
int i = 1;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
|
Loading…
x
Reference in New Issue
Block a user