Patch level : 12.0 410
Files correlati : ba Commento : Serie di aggiornamenti in preparazione al modulo TF: - La tabella Stati CEE adesso comprende anche gli Extra CEE - Aggiunta Natura nei codici IVA anche per il modulo TF - Aggiunta gestione in anagrafica dei Rappresentanti Fiscali o Stabili Organizzazioni git-svn-id: svn://10.65.10.50/branches/R_10_00@23873 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
mtollari
parent
059f0fa79c
commit
ff5d02694e
@ -61,6 +61,8 @@ protected:
|
||||
void set_att_prev(const TMask& m);
|
||||
|
||||
static bool email_handler(TMask_field& f, KEY k);
|
||||
// Handler RF/SO
|
||||
static bool rfso_handler(TMask_field& f, KEY k);
|
||||
|
||||
public:
|
||||
TDitte_application();
|
||||
@ -172,6 +174,36 @@ bool TDitte_application::email_handler(TMask_field& f, KEY k)
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
bool TDitte_application::rfso_handler(TMask_field& f, KEY key)
|
||||
{
|
||||
if(f.get() == "G")
|
||||
{
|
||||
f.mask().show(F_COD_RFSO_G);
|
||||
f.mask().enable(F_COD_RFSO_G);
|
||||
f.mask().set(F_COD_RFSO_F, "");
|
||||
f.mask().hide(F_COD_RFSO_F);
|
||||
f.mask().disable(F_COD_RFSO_F);
|
||||
}
|
||||
else if(f.get() == "F")
|
||||
{
|
||||
f.mask().show(F_COD_RFSO_F);
|
||||
f.mask().enable(F_COD_RFSO_F);
|
||||
f.mask().set(F_COD_RFSO_G, "");
|
||||
f.mask().hide(F_COD_RFSO_G);
|
||||
f.mask().disable(F_COD_RFSO_G);
|
||||
}
|
||||
else
|
||||
{
|
||||
f.mask().set(F_COD_RFSO_F, "");
|
||||
f.mask().set(F_COD_RFSO_G, "");
|
||||
f.mask().hide(F_COD_RFSO_F);
|
||||
f.mask().hide(F_COD_RFSO_G);
|
||||
f.mask().disable(F_COD_RFSO_F);
|
||||
f.mask().disable(F_COD_RFSO_G);
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
bool TDitte_application::user_create() // initvar e arrmask
|
||||
{
|
||||
open_files(LF_NDITTE, LF_ANAG, LF_UNLOC, LF_ATTIV, LF_TABCOM, 0);
|
||||
@ -180,6 +212,7 @@ bool TDitte_application::user_create() // initvar e arrmask
|
||||
_msk = new TMask("ba4300a") ;
|
||||
_msk->set_handler(ba4300_handler);
|
||||
_msk->set_handler(DLG_EMAIL, email_handler);
|
||||
_msk->set_handler(LST_TIPO_RFSO, rfso_handler);
|
||||
|
||||
|
||||
set_search_field(FLD_GD1_CODDITTA);
|
||||
|
||||
@ -70,6 +70,9 @@
|
||||
#define FLD_DE_DENEST1 129
|
||||
#define FLD_DE_DENEST2 130
|
||||
#define FLD_DE_DENEST3 131
|
||||
#define LST_TIPO_RFSO 500 // Aggiunti 2017
|
||||
#define F_COD_RFSO_G 501 // Aggiunti 2017
|
||||
#define F_COD_RFSO_F 502 // Aggiunti 2017
|
||||
#define FLD_GD2_RAPPR 132
|
||||
#define FLD_GD2_RAPPR_ANAGR_RAGSOC 133
|
||||
#define FLD_GD2_CARRAPP 134
|
||||
|
||||
@ -813,6 +813,49 @@ BEGIN
|
||||
HELP "Denominazione estesa della ditta"
|
||||
END
|
||||
|
||||
LIST LST_TIPO_RFSO 10
|
||||
BEGIN
|
||||
HELP "Indicare se è un rappresentante o stabile organizzativo è una persona fisica o giuridica"
|
||||
PROMPT 3 18 "Tipo RF/SO: "
|
||||
FIELD CODRFSO[1,1]
|
||||
ITEM "|"
|
||||
ITEM "G|Giuridico"
|
||||
ITEM "F|Fisico"
|
||||
END
|
||||
|
||||
STRING F_COD_RFSO_G 5
|
||||
BEGIN
|
||||
PROMPT 30 18 "Codice RF/SO:"
|
||||
FIELD CODRFSO[2,]
|
||||
USE LF_ANAG SELECT TIPORFSO!=""
|
||||
INPUT TIPOA "G"
|
||||
INPUT CODANAGR F_COD_RFSO_G
|
||||
DISPLAY "Codice" CODANAGR
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
DISPLAY "Codice Fiscale@16" COFI
|
||||
OUTPUT F_COD_RFSO_G CODANAGR
|
||||
MESSAGE COPY,1@
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "H"
|
||||
END
|
||||
|
||||
STRING F_COD_RFSO_F 5
|
||||
BEGIN
|
||||
PROMPT 30 18 "Codice RF/SO:"
|
||||
FIELD CODRFSO[2,]
|
||||
USE LF_ANAG SELECT TIPORFSO!=""
|
||||
INPUT TIPOA "F"
|
||||
INPUT CODANAGR F_COD_RFSO_F
|
||||
DISPLAY "Codice" CODANAGR
|
||||
DISPLAY "Cognome@30" RAGSOC[1,30]
|
||||
DISPLAY "Nome@20" RAGSOC[31,0]
|
||||
DISPLAY "Codice Fiscale@16" COFI
|
||||
OUTPUT F_COD_RFSO_F CODANAGR
|
||||
MESSAGE COPY,1@
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "H"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Pag. 5" -1 -1 77 18
|
||||
|
||||
@ -23,4 +23,4 @@
|
||||
#define CHK_SERVIZI 124
|
||||
#define FLD_DESCR_I1 125
|
||||
#define FLD_INDET_S4 126
|
||||
#define FLD_NATURAPA 127
|
||||
#define FLD_NATURA 127
|
||||
|
||||
@ -305,11 +305,11 @@ BEGIN
|
||||
FIELD B3
|
||||
END
|
||||
|
||||
LIST FLD_NATURAPA 2 40
|
||||
LIST FLD_NATURA 2 40
|
||||
BEGIN
|
||||
PROMPT 3 19 "Natura per fatture PA"
|
||||
PROMPT 3 19 "Natura: "
|
||||
FIELD S12
|
||||
HELP "Indicare la natura del codice IVA per le fatture PA"
|
||||
HELP "Indicare la natura del codice IVA per le fatture PA/TF"
|
||||
ITEM "|IVA ordinaria"
|
||||
ITEM "N1|N1 - IVA esclusa ex art 15"
|
||||
ITEM "N2|N2 - IVA non soggetta"
|
||||
@ -318,7 +318,6 @@ ITEM "N4|N4 - IVA esente"
|
||||
ITEM "N5|N5 - IVA in regime del margine"
|
||||
ITEM "N6|N6 - IVA in reverse charge"
|
||||
ITEM "N7|N7 - IVA assolta in altro stato U3"
|
||||
MODULE PA
|
||||
END
|
||||
|
||||
BOOLEAN FLD_SOSPESO_B2
|
||||
|
||||
@ -1,2 +1,3 @@
|
||||
#define F_CODICE 101
|
||||
#define F_DESCR 102
|
||||
#define F_STATOEU 103
|
||||
@ -4,11 +4,11 @@ TOOLBAR "topbar" 0 0 0 2
|
||||
#include <relapbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Stati CEE" -1 -1 78 18
|
||||
PAGE "Stati ISO" -1 -1 78 18
|
||||
|
||||
GROUPBOX DLG_NULL 78 7
|
||||
BEGIN
|
||||
PROMPT 1 1 "@bStati CEE"
|
||||
PROMPT 1 1 "@bStati ISO"
|
||||
END
|
||||
|
||||
STRING F_CODICE 2
|
||||
@ -21,6 +21,7 @@ BEGIN
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODICE CODTAB
|
||||
OUTPUT F_DESCR S0
|
||||
OUTPUT F_STATOEU B0
|
||||
CHECKTYPE REQUIRED
|
||||
FIELD CODTAB
|
||||
KEY 1
|
||||
@ -34,11 +35,18 @@ BEGIN
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice@8" CODTAB
|
||||
COPY OUTPUT F_CODICE
|
||||
OUTPUT F_STATOEU B0
|
||||
CHECKTYPE REQUIRED
|
||||
FIELD S0
|
||||
KEY 2
|
||||
END
|
||||
|
||||
BOOLEAN F_STATOEU
|
||||
BEGIN
|
||||
PROMPT 20 3 "Stato EU"
|
||||
FIELD B0
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user