root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 12.0 344

Browse Source 
Files correlati     : 
Commento            : 
- Aggiornata maschera delle impostazioni li, adesso riceve il tipo documento non numerazione.
- Aggiunta gestione note di credito

git-svn-id: svn://10.65.10.50/branches/R_10_00@23613 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
mtollari 2017-02-13 14:33:49 +00:00
parent 30b7d1a29e
commit ef9a155474
5 changed files with 103 additions and 95 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/li/li0300.cpp
View File

@ -63,7 +63,7 @@ void TDI_mask::save_config()
} }
ini_set_string(CONFIG_DITTA, "li", "CODIVA", get(FLD_TABIVA_CODTAB)); ini_set_string(CONFIG_DITTA, "li", "CODIVA", get(FLD_TABIVA_CODTAB));
ini_set_string(CONFIG_DITTA, "li", "TIPIDOC", tipidoc); ini_set_string(CONFIG_DITTA, "li", "TIPIDOC", tipidoc);
message_box(TR("Impostazioni salvate correttamente"));
} }
class TDISettings_app : public TSkeleton_application class TDISettings_app : public TSkeleton_application

180
src/li/li0300a.uml
View File

@ -1,99 +1,99 @@
#include "li0300a.h" #include "li0300a.h"
TOOLBAR "topbar" 0 0 0 2 TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_SAVEREC 2 2 BUTTON DLG_SAVEREC 2 2
BEGIN BEGIN
PROMPT 2 1 "~Registra" PROMPT 2 1 "~Registra"
MESSAGE EXIT,K_SAVE MESSAGE EXIT,K_SAVE
PICTURE TOOL_SAVEREC PICTURE TOOL_SAVEREC
END END
#include <cancelbar.h> #include <cancelbar.h>
ENDPAGE ENDPAGE
PAGE "Impostazioni dichiarazioni d'intento" 0 2 0 0 PAGE "Impostazioni dichiarazioni d'intento" 0 2 0 0
STRING FLD_TABIVA_CODTAB 4 STRING FLD_TABIVA_CODTAB 4
BEGIN BEGIN
PROMPT 2 1 "Codice IVA plafond: " PROMPT 2 1 "Codice IVA plafond: "
FIELD CODTAB FIELD CODTAB
KEY 1 KEY 1
USE %IVA USE %IVA
FLAGS "U" FLAGS "U"
INPUT CODTAB FLD_TABIVA_CODTAB INPUT CODTAB FLD_TABIVA_CODTAB
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Tipo" S1 DISPLAY "Tipo" S1
DISPLAY "%@5" R0 DISPLAY "%@5" R0
DISPLAY "Vent." S6 DISPLAY "Vent." S6
DISPLAY "Sospeso" B2 DISPLAY "Sospeso" B2
OUTPUT FLD_TABIVA_CODTAB CODTAB OUTPUT FLD_TABIVA_CODTAB CODTAB
HELP "Inserire il codice IVA" HELP "Inserire il codice IVA"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
VALIDATE ZEROFILL_FUNC 2 VALIDATE ZEROFILL_FUNC 2
END END
SPREADSHEET DOC_STATO 45 10 SPREADSHEET DOC_STATO 45 10
BEGIN BEGIN
PROMPT 30 1 "" PROMPT 30 1 ""
ITEM "Tipo Numerazione" ITEM "Tipo Numerazione"
ITEM "Da stato" ITEM "Da stato"
ITEM "A stato" ITEM "A stato"
END END
ENDPAGE ENDPAGE
ENDMASK ENDMASK
PAGE "Riga tipo numerazione" -1 -1 78 8 PAGE "Riga tipo numerazione" -1 -1 78 8
STRING FLD_TIPODOC 4 STRING FLD_TIPODOC 4
BEGIN BEGIN
PROMPT 2 1 "Codice Numerazione " PROMPT 2 1 "Tipo Documento "
FIELD CODTAB FIELD TIPODOC
KEY 1 HELP "Codice tipo documento"
USE %NUM USE %TIP
FLAGS "U" INPUT CODTAB FLD_TIPODOC
INPUT CODTAB FLD_TIPODOC DISPLAY "Codice" CODTAB
DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0
DISPLAY "Descrizione@50" S0 OUTPUT FLD_TIPODOC CODTAB
OUTPUT FLD_TIPODOC CODTAB CHECKTYPE REQUIRED
CHECKTYPE REQUIRED END
END
STRING FLD_STATODOCDA 4
STRING FLD_STATODOCDA 4 BEGIN
BEGIN PROMPT 2 2 "Da Numerazione "
PROMPT 2 2 "Da Numerazione " FIELD CODTAB
FIELD CODTAB KEY 1
KEY 1 USE %STD
USE %STD FLAGS "U"
FLAGS "U" INPUT CODTAB FLD_STATODOCA
INPUT CODTAB FLD_STATODOCA DISPLAY "Stato" CODTAB
DISPLAY "Stato" CODTAB DISPLAY "Descrizione@50" S0
DISPLAY "Descrizione@50" S0 OUTPUT FLD_STATODOCDA CODTAB
OUTPUT FLD_STATODOCDA CODTAB //CHECKTYPE REQUIRED
//CHECKTYPE REQUIRED END
END
STRING FLD_STATODOCA 4
STRING FLD_STATODOCA 4 BEGIN
BEGIN PROMPT 2 3 "A Numerazione "
PROMPT 2 3 "A Numerazione " FIELD CODTAB
FIELD CODTAB KEY 1
KEY 1 USE %STD
USE %STD FLAGS "U"
FLAGS "U" INPUT CODTAB FLD_STATODOCA
INPUT CODTAB FLD_STATODOCA DISPLAY "Stato" CODTAB
DISPLAY "Stato" CODTAB DISPLAY "Descrizione@50" S0
DISPLAY "Descrizione@50" S0 OUTPUT FLD_STATODOCA CODTAB
OUTPUT FLD_STATODOCA CODTAB NUM_EXPR #FLD_STATODOCA>=#FLD_STATODOCDA
//CHECKTYPE REQUIRED //CHECKTYPE REQUIRED
END END
ENDPAGE ENDPAGE
TOOLBAR "Documento" 0 0 0 2 TOOLBAR "Documento" 0 0 0 2
BUTTON DLG_OK 2 2 BUTTON DLG_OK 2 2

1
src/li/li0400a.h
View File

@ -29,3 +29,4 @@
#define F_PROTINTF 123 #define F_PROTINTF 123
#define F_PROTINTS 124 #define F_PROTINTS 124
#define F_NOTE 125 #define F_NOTE 125
#define B_CHIUSA 126

6
src/li/li0400a.uml
View File

@ -229,6 +229,12 @@ BEGIN
FIELD TIPOOP FIELD TIPOOP
END END
BOOLEAN B_CHIUSA
BEGIN
PROMPT 40 16 "Chiusa: "
FIELD CHIUSA
END
CURRENCY F_IMPORTO 18 CURRENCY F_IMPORTO 18
BEGIN BEGIN
PROMPT 1 17 "Importo " PROMPT 1 17 "Importo "

9
src/li/lilib01.cpp
View File

@ -1,4 +1,5 @@
#include "lilib01.h" #include "lilib01.h"
#include <recarray.h>
#define FINO_A_PLAFOND 2 #define FINO_A_PLAFOND 2
@ -7,10 +8,10 @@ void TLi_manager::elabTipiStati(TToken_string& tipi, TToken_string& stati)
for(int i = 0; i < tipidoc.items(); i++) for(int i = 0; i < tipidoc.items(); i++)
{ {
TToken_string statidoc(ini_get_string(CONFIG_DITTA, "li", tipidoc.get(i)), ','); TToken_string statidoc(ini_get_string(CONFIG_DITTA, "li", tipidoc.get(i)), ',');
for(int j = 0; j < statidoc.items(); j++) for(int j = statidoc.get_int(0); j <= statidoc.get_int(1); j++)
{ {
tipi.add(tipidoc.get(i)); tipi.add(tipidoc.get(i));
stati.add(statidoc.get(j)); stati.add(j);
} }
} }
} }
@ -62,7 +63,7 @@ const real TLi_manager::getPlaRes()
TLista_documenti din; // Legge tutti i documenti di input TLista_documenti din; // Legge tutti i documenti di input
TToken_string tipi, stati; TToken_string tipi, stati;
elabTipiStati(tipi, stati); elabTipiStati(tipi, stati);
TDate ad(TString(year)<<"1201"); TDate ad(31, 12, year);
// Trovo tutti i documenti che mi interessano e sottraggo l'imponibile al plafond // Trovo tutti i documenti che mi interessano e sottraggo l'imponibile al plafond
din.read('D', tipocf, codcli, year, tipi, stati, iniDicInt, ad); din.read('D', tipocf, codcli, year, tipi, stati, iniDicInt, ad);
@ -76,7 +77,7 @@ const real TLi_manager::getPlaRes()
TRiepilogo_iva * totali = static_cast<TRiepilogo_iva *>(tabIva.get()); TRiepilogo_iva * totali = static_cast<TRiepilogo_iva *>(tabIva.get());
if(totali->cod_iva() == codiva) if(totali->cod_iva() == codiva)
{ {
resPlafond -= totali->imp_orig(); resPlafond -= cache().get("%TIP", din[i].tipo().codice()).get_bool("B7") ? -totali->imp_orig() : totali->imp_orig();
} }
if(resPlafond < 0) break; if(resPlafond < 0) break;
} }