Generazione Fatture PA con CUP, CIG e rate
git-svn-id: svn://10.65.10.50/branches/R_10_00@22982 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy
parent
1fdd0d560e
commit
3a99fafe2d
@ -8,10 +8,8 @@ int main(int argc, char** argv)
|
||||
|
||||
switch (r)
|
||||
{
|
||||
case 0:
|
||||
default:
|
||||
rt = pa0100(argc, argv);
|
||||
break;
|
||||
case 1 : rt = pa0200(argc, argv); break;
|
||||
default: rt = pa0100(argc, argv); break;
|
||||
}
|
||||
return rt;
|
||||
}
|
||||
|
||||
1
pa/pa0.h
1
pa/pa0.h
@ -2,5 +2,6 @@
|
||||
#define __PA0_H
|
||||
|
||||
int pa0100(int argc, char* argv[]);
|
||||
int pa0200(int argc, char* argv[]);
|
||||
|
||||
#endif
|
||||
|
||||
2386
pa/pa0100.cpp
2386
pa/pa0100.cpp
File diff suppressed because it is too large
Load Diff
@ -11,4 +11,5 @@
|
||||
#define S_RAGSOC 107
|
||||
#define S_UFFICIO 108
|
||||
#define S_RIFAMM 109
|
||||
#define S_COFI 110
|
||||
|
||||
|
||||
@ -26,9 +26,10 @@ BEGIN
|
||||
ITEM "Num.\nDoc.@7"
|
||||
ITEM "Data\nDoc.@10"
|
||||
ITEM "Cliente"
|
||||
ITEM "Ragione Sociale@50"
|
||||
ITEM "Ragione Sociale\nPubblica Amministrazione@50"
|
||||
ITEM "Ufficio"
|
||||
ITEM "Riferimento\nAmministrazione@20"
|
||||
ITEM "Codice Fiscale@16"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
@ -90,6 +91,34 @@ BEGIN
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_COFI 20
|
||||
BEGIN
|
||||
PROMPT 1 5 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
TOOLBAR "Documento" 0 0 0 2
|
||||
|
||||
BUTTON DLG_OK 2 2
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_USER 2 2
|
||||
BEGIN
|
||||
PROMPT 1 1 "Collega"
|
||||
PICTURE TOOL_LINK
|
||||
END
|
||||
|
||||
|
||||
BUTTON DLG_CANCEL 2 2
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
END
|
||||
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
20
pa/pa0200.cpp
Normal file
20
pa/pa0200.cpp
Normal file
@ -0,0 +1,20 @@
|
||||
// gestione tabelle di modulo PA
|
||||
|
||||
#include <modtbapp.h>
|
||||
|
||||
///////////////////////////////////////////////////////////
|
||||
// Applicazione generica di gestione tabelle di modulo
|
||||
///////////////////////////////////////////////////////////
|
||||
|
||||
// applicazione per la gestione delle tabelle di lavanderia
|
||||
class TPA_table_app : public TTable_module_application
|
||||
{
|
||||
public:
|
||||
};
|
||||
|
||||
int pa0200(int argc, char* argv[])
|
||||
{
|
||||
TPA_table_app a;
|
||||
a.run(argc, argv, TR("Tabella Fatture PA"));
|
||||
return 0;
|
||||
}
|
||||
593
pa/paf.ini
593
pa/paf.ini
@ -1,172 +1,513 @@
|
||||
[PAF0100F]
|
||||
P1KHFATT = VARCHAR(20)
|
||||
P1KBFATT = VARCHAR(20)
|
||||
P1PAESE = VARCHAR(2)
|
||||
P1CODICE = VARCHAR(28)
|
||||
P1PRGINV = VARCHAR(10)
|
||||
P1FTRASM = VARCHAR(5)
|
||||
P1CDEST = VARCHAR(6)
|
||||
P1TELEF = VARCHAR(12)
|
||||
P1MAIL = VARCHAR(256)
|
||||
P1GESTIONE = VARCHAR(1)
|
||||
P1ERRORE = VARCHAR(5)
|
||||
P1_KEYHEADERFATT = CHAR(20)
|
||||
P1_KEYBODYFATT = CHAR(20)
|
||||
P1_TRASMITTPAESE = CHAR(2)
|
||||
P1_TRASMITTCOD = CHAR(28)
|
||||
P1_PRGINVIO = CHAR(10)
|
||||
P1_FMTTRASMISS = CHAR(5)
|
||||
P1_CODDEST = CHAR(6)
|
||||
P1_TELEFONO = CHAR(12)
|
||||
P1_MAIL = CHAR(256)
|
||||
|
||||
INDEX_1 = P1KHFATT,P1KBFATT
|
||||
P1_GESTIONE = CHAR(1)
|
||||
P1_ERRINT = CHAR(1)
|
||||
P1_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = P1_KEYHEADERFATT,P1_KEYBODYFATT
|
||||
|
||||
[PAF0200F]
|
||||
P2KHFATT = VARCHAR(20)
|
||||
P2KBFATT = VARCHAR(20)
|
||||
P2PAESE = VARCHAR(2)
|
||||
P2CODICE = VARCHAR(28)
|
||||
P2FISCA = VARCHAR(16)
|
||||
P2DENOM = VARCHAR(80)
|
||||
P2NOME = VARCHAR(60)
|
||||
P2COGN = VARCHAR(60)
|
||||
P2RFISC = VARCHAR(4)
|
||||
P2_KEYHEADERFATT = CHAR(20)
|
||||
P2_KEYBODYFATT = CHAR(20)
|
||||
|
||||
P2SINDI = VARCHAR(60)
|
||||
P2SNCIV = VARCHAR(8)
|
||||
P2SCAP = VARCHAR(5)
|
||||
P2SCOMU = VARCHAR(60)
|
||||
P2SPROV = VARCHAR(2)
|
||||
P2SNAZI = VARCHAR(2)
|
||||
P2_FISCIVAPAESE = CHAR(2)
|
||||
P2_FISCIVACOD = CHAR(28)
|
||||
P2_CODFISCALE = CHAR(16)
|
||||
P2_ANADENOMIN = CHAR(80)
|
||||
P2_ANANOME = CHAR(60)
|
||||
P2_ANACOGNOME = CHAR(60)
|
||||
P2_ANATITOLO = CHAR(10)
|
||||
P2_ANACODEORI = CHAR(17)
|
||||
P2_ALBOPROFESS = CHAR(60)
|
||||
P2_PROVALBO = CHAR(2)
|
||||
P2_NRISCRIZALBO = CHAR(60)
|
||||
P2_DTISCRIZEALBO = DATE
|
||||
P2_REGFISCALE = CHAR(4)
|
||||
P2_SEDEIND = CHAR(60)
|
||||
P2_SEDENRCIVICO = CHAR(8)
|
||||
P2_SEDECAP = NUMERIC(5, 0)
|
||||
P2_SEDECOMUNE = CHAR(60)
|
||||
P2_SEDEPROV = CHAR(2)
|
||||
P2_SEDENAZ = CHAR(2)
|
||||
P2_STABORGIND = CHAR(60)
|
||||
P2_STABORGNRCIVICO = CHAR(8)
|
||||
P2_STABORGCAP = NUMERIC(5, 0)
|
||||
P2_STABORGCOMUNE = CHAR(60)
|
||||
P2_STABORGPROV = CHAR(2)
|
||||
P2_STABORGNAZ = CHAR(2)
|
||||
P2_ISCRREAUFF = CHAR(2)
|
||||
P2_ISCRREANUM = CHAR(20)
|
||||
P2_ISCRREACAP = VARNUMERIC(15, 2)
|
||||
P2_ISCRREASOCIOU = CHAR(2)
|
||||
P2_ISCRREASLIQUID = CHAR(2)
|
||||
P2_CONTATTITELEF = CHAR(12)
|
||||
P2_CONTATTIFAX = CHAR(12)
|
||||
P2_CONTATTIMAIL = CHAR(256)
|
||||
P2_RIFAMMINISTR = CHAR(20)
|
||||
|
||||
P2OINDI = VARCHAR(60)
|
||||
P2ONCIV = VARCHAR(8)
|
||||
P2OCAP = VARCHAR(5)
|
||||
P2OCOMU = VARCHAR(60)
|
||||
P2OPROV = VARCHAR(2)
|
||||
P2ONAZI = VARCHAR(2)
|
||||
P2_GESTIONE = CHAR(1)
|
||||
P2_ERRINT = CHAR(1)
|
||||
P2_ERREST = CHAR(1)
|
||||
|
||||
P2GESTIONE = VARCHAR(1)
|
||||
P2ERRORE = VARCHAR(5)
|
||||
INDEX_1 = P2_KEYHEADERFATT,P2_KEYBODYFATT
|
||||
|
||||
INDEX_1 = P2KHFATT,P2KBFATT
|
||||
[PAF0300F]
|
||||
P3_KEYHEADERFATT = CHAR(20)
|
||||
P3_KEYBODYFATT = CHAR(20)
|
||||
|
||||
P3_FISCIVAPAESE = CHAR(2)
|
||||
P3_FISCIVACODICE = CHAR(28)
|
||||
P3_CODFISC = CHAR(16)
|
||||
P3_ANADENOMI = CHAR(80)
|
||||
P3_ANANOME = CHAR(60)
|
||||
P3_ANACOGNOME = CHAR(60)
|
||||
P3_ANATITOLO = CHAR(10)
|
||||
P3_ANACODEORI = CHAR(17)
|
||||
|
||||
P3_GESTIONE = CHAR(1)
|
||||
P3_ERRINT = CHAR(1)
|
||||
P3_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = P3_KEYHEADERFATT,P3_KEYBODYFATT
|
||||
|
||||
[PAF0400F]
|
||||
P4KHFATT = VARCHAR(20)
|
||||
P4KBFATT = VARCHAR(20)
|
||||
P4PAESE = VARCHAR(2)
|
||||
P4CODICE = VARCHAR(28)
|
||||
P4FISCA = VARCHAR(16)
|
||||
P4DENOM = VARCHAR(80)
|
||||
P4NOME = VARCHAR(60)
|
||||
P4COGN = VARCHAR(60)
|
||||
P4RFISC = VARCHAR(4)
|
||||
P4_KEYHEADERFATT = CHAR(20)
|
||||
P4_KEYBODYFATT = CHAR(20)
|
||||
P4_FISCIVAPAESE = CHAR(2)
|
||||
P4_FISCIVACOD = CHAR(28)
|
||||
P4_CODFISC = CHAR(16)
|
||||
P4_ANADENOM = CHAR(80)
|
||||
P4_ANANOME = CHAR(60)
|
||||
P4_ANACOGNOME = CHAR(60)
|
||||
P4_ANATITOLO = CHAR(10)
|
||||
P4_ANACODEORI = CHAR(17)
|
||||
|
||||
P4SINDI = VARCHAR(60)
|
||||
P4SNCIV = VARCHAR(8)
|
||||
P4SCAP = VARCHAR(5)
|
||||
P4SCOMU = VARCHAR(60)
|
||||
P4SPROV = VARCHAR(2)
|
||||
P4SNAZI = VARCHAR(2)
|
||||
P4_SEDEIND = CHAR(60)
|
||||
P4_SEDENRCIVICO = CHAR(8)
|
||||
P4_SEDECAP = CHAR(5)
|
||||
P4_SEDECOMUNE = CHAR(60)
|
||||
P4_SEDEPROV = CHAR(2)
|
||||
P4_SEDENAZ = CHAR(2)
|
||||
|
||||
P4GESTIONE = VARCHAR(1)
|
||||
P4ERRORE = VARCHAR(5)
|
||||
P4_GESTIONE = CHAR(1)
|
||||
P4_ERRINT = CHAR(1)
|
||||
P4_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = P4KHFATT,P4KBFATT
|
||||
INDEX_1 = P4_KEYHEADERFATT,P4_KEYBODYFATT
|
||||
|
||||
[PAF0500F]
|
||||
P5_KEYHEADERFATT = CHAR(20)
|
||||
P5_KEYBODYFATT = CHAR(20)
|
||||
P5_FISCIVAPAESE = CHAR(2)
|
||||
P5_FISCIVACOD = CHAR(28)
|
||||
P5_CODICEFISC = CHAR(16)
|
||||
P5_ANADENOMIN = CHAR(80)
|
||||
P5_ANANOME = CHAR(60)
|
||||
P5_ANACOGNOME = CHAR(60)
|
||||
P5_ANATITOLO = CHAR(10)
|
||||
P5_ANACODEORI = CHAR(17)
|
||||
|
||||
P5_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = P5_KEYHEADERFATT,P5_KEYBODYFATT
|
||||
|
||||
[PAF0600F]
|
||||
P6_KEYHEADERFATT = CHAR(20)
|
||||
P6_KEYBODYFATT = CHAR(20)
|
||||
P6_SOGGEMITT = CHAR(2)
|
||||
|
||||
P6_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = P6_KEYHEADERFATT,P6_KEYBODYFATT
|
||||
|
||||
[PAF0700F]
|
||||
P7KHFATT = VARCHAR(20)
|
||||
P7KBFATT = VARCHAR(20)
|
||||
P7TDOC = VARCHAR(4)
|
||||
P7DIVISA = VARCHAR(3)
|
||||
P7DATA = VARCHAR(10)
|
||||
P7NUME = VARCHAR(20)
|
||||
P7_KEYHEADERFATT = CHAR(20)
|
||||
P7_KEYBODYFATT = CHAR(20)
|
||||
P7_TIPODOC = CHAR(4)
|
||||
P7_DIVISA = CHAR(3)
|
||||
P7_DATA = DATE
|
||||
P7_NUMERO = CHAR(20)
|
||||
|
||||
P7GESTIONE = VARCHAR(1)
|
||||
P7ERRORE = VARCHAR(5)
|
||||
P7_TIPORITENUTA = CHAR(4)
|
||||
P7_IMPORTORIT = NUMERIC(15, 2)
|
||||
P7_ALIQUOTARIT = NUMERIC(6, 2)
|
||||
P7_CAUSPAGAM = CHAR(1)
|
||||
P7_NUMEROBOLLO = CHAR(14)
|
||||
P7_IMPORTOBOLLO = NUMERIC(15, 2)
|
||||
|
||||
INDEX_1 = P7KHFATT,P7KBFATT
|
||||
P7_GESTIONE = CHAR(1)
|
||||
P7_ERRINT = CHAR(1)
|
||||
P7_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = P7_KEYHEADERFATT,P7_KEYBODYFATT
|
||||
|
||||
[PAF0800F]
|
||||
P8_KEYHEADERFATT = CHAR(20)
|
||||
P8_KEYBODYFATT = CHAR(20)
|
||||
P8_RIFNUMLINEA = INTEGER
|
||||
|
||||
P8_TIPOCASSA = CHAR(4)
|
||||
P8_ALIQCASSA = NUMERIC(6, 2)
|
||||
P8_IMCONTRCASSA = NUMERIC(15, 2)
|
||||
P8_IMPONCASSA = NUMERIC(15, 2)
|
||||
P8_ALIQIVA = NUMERIC(6, 2)
|
||||
P8_RITENUTA = CHAR(2)
|
||||
P8_NATURA = CHAR(2)
|
||||
P8_RIFAMMINIS = CHAR(20)
|
||||
|
||||
P8_GESTIONE = CHAR(1)
|
||||
P8_ERRINT = CHAR(1)
|
||||
P8_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = P8_KEYHEADERFATT,P8_KEYBODYFATT,P8_RIFNUMLINEA
|
||||
|
||||
[PAF0900F]
|
||||
P9KHFATT = VARCHAR(20)
|
||||
P9KBFATT = VARCHAR(20)
|
||||
P9NLIN = INTEGER
|
||||
P9TSCO = VARCHAR(2)
|
||||
P9PSCO = NUMERIC
|
||||
P9ISCO = NUMERIC
|
||||
P9_KEYHEADERFATT = CHAR(20)
|
||||
P9_KEYBODYFATT = CHAR(20)
|
||||
P9_RIFNUMLINEA = INTEGER
|
||||
|
||||
P9GESTIONE = VARCHAR(1)
|
||||
P9_NPROGR = INTEGER
|
||||
P9_TIPOSCONTO = CHAR(2)
|
||||
P9_PERCSCONTO = NUMERIC(6,2)
|
||||
P9_IMPSCONTO = NUMERIC(15,2)
|
||||
|
||||
INDEX_1 = P9KHFATT,P9KBFATT,P9NLIN
|
||||
P9_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = P9_KEYHEADERFATT,P9_KEYBODYFATT,P9_RIFNUMLINEA
|
||||
|
||||
[PAF1000F]
|
||||
P0_KEYHEADERFATT = CHAR(20)
|
||||
P0_KEYBODYFATT = CHAR(20)
|
||||
P0_RIFNUMLINEA = INTEGER
|
||||
P0_IDDOC = CHAR(20)
|
||||
P0_DATADOC = DATE
|
||||
P0_NUMITEM = INTEGER
|
||||
P0_COMMCONVENZ = CHAR(100)
|
||||
P0_CODCUP = CHAR(15)
|
||||
P0_CODCIG = CHAR(15)
|
||||
|
||||
P0_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = P0_KEYHEADERFATT,P0_KEYBODYFATT,P0_RIFNUMLINEA
|
||||
|
||||
[PAF1100F]
|
||||
PA_KEYHEADERFATT = CHAR(20)
|
||||
PA_KEYBODYFATT = CHAR(20)
|
||||
PA_RIFNUMLINEA = INTEGER
|
||||
PA_IDDOC = CHAR(20)
|
||||
PA_DATADOCU = DATE
|
||||
PA_NUMITEM = INTEGER
|
||||
PA_COMMCONVENZ = CHAR(100)
|
||||
PA_CODCUP = CHAR(15)
|
||||
PA_CODCIG = CHAR(15)
|
||||
|
||||
PA_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PA_KEYHEADERFATT,PA_KEYBODYFATT,PA_RIFNUMLINEA
|
||||
|
||||
[PAF1200F]
|
||||
PB_KEYHEADERFATT = CHAR(20)
|
||||
PB_KEYBODYFATT = CHAR(20)
|
||||
PB_RIFNUMLINEA = INTEGER
|
||||
PB_IDDOC = CHAR(20)
|
||||
PB_DATADOCO = DATE
|
||||
PB_NUMITEM = INTEGER
|
||||
PB_COMMCONVENZ = CHAR(100)
|
||||
PB_CODCUP = CHAR(15)
|
||||
PB_CODCIG = CHAR(15)
|
||||
|
||||
PB_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PB_KEYHEADERFATT,PB_KEYBODYFATT,PB_RIFNUMLINEA
|
||||
|
||||
[PAF1300F]
|
||||
PC_KEYHEADERFATT = CHAR(20)
|
||||
PC_KEYBODYFATT = CHAR(20)
|
||||
PC_RIFNUMLINEA = INTEGER
|
||||
PC_IDDOC = CHAR(20)
|
||||
PC_DATADOC = DATE
|
||||
PC_NUMITEM = INTEGER
|
||||
PC_COMMCONVENZ = CHAR(100)
|
||||
PC_CODCUP = CHAR(15)
|
||||
PC_CODCIG = CHAR(15)
|
||||
|
||||
PC_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PC_KEYHEADERFATT,PC_KEYBODYFATT
|
||||
|
||||
[PAF1400F]
|
||||
PD_KEYHEADERFATT = CHAR(20)
|
||||
PD_KEYBODYFATT = CHAR(20)
|
||||
PD_RIFNUMLINEA = INTEGER
|
||||
PD_IDDOC = CHAR(20)
|
||||
PD_DATADOC = DATE
|
||||
PD_NUMITEM = INTEGER
|
||||
PD_COMMCONVENZ = CHAR(100)
|
||||
PD_CODCUP = CHAR(15)
|
||||
PD_CODCIG = CHAR(15)
|
||||
|
||||
PD_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PD_KEYHEADERFATT,PD_KEYBODYFATT
|
||||
|
||||
[PAF1500F]
|
||||
PE_KEYHEADERFATT = CHAR(20)
|
||||
PE_KEYBODYFATT = CHAR(20)
|
||||
PE_RIFFASE = NUMERIC(3, 0)
|
||||
|
||||
PE_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PE_KEYHEADERFATT,PE_KEYBODYFATT
|
||||
|
||||
[PAF1600F]
|
||||
PF_KEYHEADERFATT = CHAR(20)
|
||||
PF_KEYBODYFATT = CHAR(20)
|
||||
|
||||
PF_NUMDDDT = CHAR(20)
|
||||
PF_DATADDT = DATE
|
||||
PF_RIFNUMLINEA = NUMERIC(4, 0)
|
||||
|
||||
PF_GESTIONE = CHAR(1)
|
||||
PF_ERRINT = CHAR(1)
|
||||
PF_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = PF_KEYHEADERFATT,PF_KEYBODYFATT,PF_NUMDDDT,PF_RIFNUMLINEA
|
||||
|
||||
[PAF1700F]
|
||||
PG_KEYHEADERFATT = CHAR(20)
|
||||
PG_KEYBODYFATT = CHAR(20)
|
||||
PG_FISCIVAPAESE = CHAR(2)
|
||||
PG_FISCIVACODICE = CHAR(28)
|
||||
PG_CODICEFISCALE = CHAR(16)
|
||||
PG_ANADENOMINAZ = CHAR(80)
|
||||
PG_ANANOME = CHAR(60)
|
||||
PG_ANACOGNOME = CHAR(60)
|
||||
PG_ANATITOLO = CHAR(10)
|
||||
PG_ANACODEORI = CHAR(17)
|
||||
PG_NUMLICGUIDA = CHAR(20)
|
||||
|
||||
PG_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PG_KEYHEADERFATT,PG_KEYBODYFATT
|
||||
|
||||
[PAF1800F]
|
||||
PIKHFATT = VARCHAR(20)
|
||||
PIKBFATT = VARCHAR(20)
|
||||
PINLIN = INTEGER
|
||||
PITCPRES = VARCHAR(2)
|
||||
PIDESC = VARCHAR(100)
|
||||
PIQTA = NUMERIC
|
||||
PIUNMIS = VARCHAR(10)
|
||||
PIPREZ = NUMERIC
|
||||
PIPRZT = NUMERIC
|
||||
PIAIVA = NUMERIC
|
||||
PI_KEYHEADERFATT = CHAR(20)
|
||||
PI_KEYBODYFATT = CHAR(20)
|
||||
PI_NUMEROLINEA = INTEGER
|
||||
PI_TIPOCESSPREST = CHAR(2)
|
||||
PI_DESCRIZIONE = CHAR(100)
|
||||
PI_QUANTITA = NUMERIC
|
||||
PI_UNITAMISURA = CHAR(10)
|
||||
PI_DTINIZIOPER = DATE
|
||||
PI_DTFINEPER = DATE
|
||||
PI_PREZZOUNIT = NUMERIC
|
||||
PI_PRZTOTALE = NUMERIC
|
||||
PI_ALIQUOTAIVA = NUMERIC
|
||||
PI_RITENUTA = CHAR(2)
|
||||
PI_NATURA = CHAR(2)
|
||||
PI_RIFAMMINISTR = CHAR(20)
|
||||
|
||||
PIGESTIONE = VARCHAR(1)
|
||||
PIERRORE = VARCHAR(5)
|
||||
PI_GESTIONE = CHAR(1)
|
||||
PI_ERRINT = CHAR(1)
|
||||
PI_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = PIKHFATT,PIKBFATT,PINLIN
|
||||
INDEX_1 = PI_KEYHEADERFATT,PI_KEYBODYFATT,PI_NUMEROLINEA
|
||||
|
||||
[PAF1900F]
|
||||
PY_KEYHEADERFATT = CHAR(20)
|
||||
PY_KEYBODYFATT = CHAR(20)
|
||||
PY_KEYNLINEA = INTEGER
|
||||
|
||||
PY_TIPOARTICOLO = CHAR(35)
|
||||
PY_VALOREARTICOLO = CHAR(35)
|
||||
|
||||
PY_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PY_KEYHEADERFATT,PY_KEYBODYFATT,PY_KEYNLINEA
|
||||
|
||||
[PAF2000F]
|
||||
PJKHFATT = VARCHAR(20)
|
||||
PJKBFATT = VARCHAR(20)
|
||||
PJKNLIN = INTEGER
|
||||
PJTSCO = VARCHAR(2)
|
||||
PJPSCO = NUMERIC
|
||||
PJISCO = NUMERIC
|
||||
PJ_KEYHEADERFATT = CHAR(20)
|
||||
PJ_KEYBODYFATT = CHAR(20)
|
||||
PJ_KEYNLINEA = INTEGER
|
||||
PJ_KEYNPROGR = INTEGER
|
||||
|
||||
PJGESTIONE = VARCHAR(1)
|
||||
PJ_TIPOSCONTO = CHAR(2)
|
||||
PJ_PERCSCONTO = NUMERIC(6,2)
|
||||
PJ_IMPORTOSCONTO = NUMERIC(15,2)
|
||||
|
||||
INDEX_1 = PJKHFATT,PJKBFATT,PJKNLIN
|
||||
PJ_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PJ_KEYHEADERFATT,PJ_KEYBODYFATT,PJ_KEYNLINEA,PJ_KEYNPROGR
|
||||
|
||||
[PAF2100F]
|
||||
PK_KEYHEADERFATT = CHAR(20)
|
||||
PK_KEYBODYFATT = CHAR(20)
|
||||
PK_KEYNLINEA = INTEGER
|
||||
|
||||
PK_TIPODATO = CHAR(10)
|
||||
PK_RIFDATO = CHAR(60)
|
||||
PK_RIFNUMERO = NUMERIC(21, 5)
|
||||
PK_RIFDATA = DATE
|
||||
PK_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PK_KEYHEADERFATT,PK_KEYBODYFATT,PK_KEYNLINEA
|
||||
|
||||
[PAF2200F]
|
||||
PLKHFATT = VARCHAR(20)
|
||||
PLKBFATT = VARCHAR(20)
|
||||
PLALIVA = NUMERIC
|
||||
PLNATU = VARCHAR(2)
|
||||
PLIMPO = NUMERIC
|
||||
PLIMPS = NUMERIC
|
||||
PLEIVA = VARCHAR(1)
|
||||
PL_KEYHEADERFATT = CHAR(20)
|
||||
PL_KEYBODYFATT = CHAR(20)
|
||||
PL_KEYNPROGR = INTEGER
|
||||
|
||||
PLGESTIONE = VARCHAR(1)
|
||||
PLERRORE = VARCHAR(5)
|
||||
PL_ALIQUOTAIVA = NUMERIC(6,2)
|
||||
PL_NATURA = CHAR(2)
|
||||
PL_SPESEACCESS = NUMERIC(15,2)
|
||||
PL_ARROTONDAM = NUMERIC(15,2)
|
||||
PL_IMPONIBILE = NUMERIC(15,2)
|
||||
PL_IMPOSTA = NUMERIC(15,2)
|
||||
PL_ESIGIVA = CHAR(1)
|
||||
PL_RIFNORMATIVO = CHAR(100)
|
||||
|
||||
INDEX_1 = PLKHFATT,PLKBFATT,PLALIVA,PLNATU
|
||||
PL_GESTIONE = CHAR(1)
|
||||
PL_ERRINT = CHAR(1)
|
||||
PL_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = PL_KEYHEADERFATT,PL_KEYBODYFATT,PL_KEYNPROGR
|
||||
|
||||
[PAF2300F]
|
||||
PM_KEYHEADERFATT = CHAR(20)
|
||||
PM_KEYBODYFATT = CHAR(20)
|
||||
|
||||
PM_DATA = DATE
|
||||
PM_TOTALEPERCORSO = CHAR(15)
|
||||
|
||||
PM_GESTIONE = CHAR(1)
|
||||
PM_ERRINT = CHAR(1)
|
||||
PM_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = PM_KEYHEADERFATT,PM_KEYBODYFATT
|
||||
|
||||
[PAF2400F]
|
||||
PNKHFATT = VARCHAR(20)
|
||||
PNKBFATT = VARCHAR(20)
|
||||
PNCPAG = VARCHAR(4)
|
||||
PN_KEYHEADERFATT = CHAR(20)
|
||||
PN_KEYBODYFATT = CHAR(20)
|
||||
|
||||
PNGESTIONE = VARCHAR(1)
|
||||
PNERRORE = VARCHAR(5)
|
||||
PN_CONDPAGAMENTO = CHAR(4)
|
||||
|
||||
INDEX_1 = PNKHFATT,PNKBFATT
|
||||
PN_GESTIONE = CHAR(1)
|
||||
PN_ERRINT = CHAR(1)
|
||||
PN_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = PN_KEYHEADERFATT,PN_KEYBODYFATT
|
||||
|
||||
[PAF2500F]
|
||||
POKHFATT = VARCHAR(20)
|
||||
POKBFATT = VARCHAR(20)
|
||||
POKNLIN = INTEGER
|
||||
POMPAGAM = VARCHAR(4)
|
||||
POUSCAD = VARCHAR(10)
|
||||
POIMPO = NUMERIC
|
||||
POCPAG = VARCHAR(15)
|
||||
PO_KEYHEADERFATT = CHAR(20)
|
||||
PO_KEYBODYFATT = CHAR(20)
|
||||
PO_KEYNPROGR = INTEGER
|
||||
|
||||
POGESTIONE = VARCHAR(1)
|
||||
POERRORE = VARCHAR(5)
|
||||
PO_CONDPAGAMENTO = CHAR(4)
|
||||
PO_BENEFICIARIO = CHAR(200)
|
||||
PO_MODALITAPAGAM = CHAR(4)
|
||||
PO_DATARIFTERM = DATE
|
||||
PO_GGTERMINIPAG = INTEGER
|
||||
PO_DATASCADENZA = DATE
|
||||
PO_IMPORTO = NUMERIC(15, 2)
|
||||
PO_CODUFFPOST = CHAR(20)
|
||||
PO_COGNOMEQUIET = CHAR(60)
|
||||
PO_NOMEQUIET = CHAR(60)
|
||||
PO_CFQUIETANZA = CHAR(16)
|
||||
PO_TITOLOQUIET = CHAR(10)
|
||||
PO_ISTFINANZ = CHAR(80)
|
||||
PO_IBAN = CHAR(34)
|
||||
PO_ABI = NUMERIC(5, 0)
|
||||
PO_CAB = NUMERIC(5, 0)
|
||||
PO_BIC = CHAR(11)
|
||||
PO_SCPAGANTIC = NUMERIC(15, 2)
|
||||
PO_DTLIMANTIC = DATE
|
||||
PO_PENALITAPAGAM = NUMERIC(15, 2)
|
||||
PO_DATADECORRP = DATE
|
||||
PO_CODICEPAGAM = CHAR(15)
|
||||
|
||||
INDEX_1 = POKHFATT,POKBFATT,POKNLIN
|
||||
PO_GESTIONE = CHAR(1)
|
||||
PO_ERRINT = CHAR(1)
|
||||
PO_ERREST = CHAR(1)
|
||||
|
||||
INDEX_1 = PO_KEYHEADERFATT,PO_KEYBODYFATT,PO_KEYNPROGR
|
||||
|
||||
[PAF2600F]
|
||||
|
||||
PP_KEYHEADERFATT = CHAR(20)
|
||||
PP_KEYBODYFATT = CHAR(20)
|
||||
|
||||
PP_NOMEATTACHMENT = CHAR(60)
|
||||
PP_COMPRESSIONE = CHAR(10)
|
||||
PP_FMTATTACHMENT = CHAR(10)
|
||||
PP_DESCATTACHMENT = CHAR(10)
|
||||
PP_ATTACHMENT = CHAR(256)
|
||||
|
||||
PP_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PP_KEYHEADERFATT,PP_KEYBODYFATT
|
||||
|
||||
[PAF2700F]
|
||||
PQKHFATT = VARCHAR(20)
|
||||
PQKBFATT = VARCHAR(20)
|
||||
PQITDOC = NUMERIC
|
||||
PQARRO = NUMERIC
|
||||
PQCAUS = VARCHAR(200)
|
||||
PQART73 = VARCHAR(2)
|
||||
PQ_KEYHEADERFATT = CHAR(20)
|
||||
PQ_KEYBODYFATT = CHAR(20)
|
||||
PQ_IMPTOTDOC = NUMERIC(15,2)
|
||||
PQ_ARROTOND = NUMERIC(15,2)
|
||||
PQ_CAUSALE = CHAR(200)
|
||||
PQ_ART73 = CHAR(2)
|
||||
|
||||
PQGESTIONE = VARCHAR(1)
|
||||
PQ_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PQKHFATT,PQKBFATT
|
||||
INDEX_1 = PQ_KEYHEADERFATT,PQ_KEYBODYFATT
|
||||
|
||||
[PAF2800F]
|
||||
PR_KEYHEADERFATT = CHAR(20)
|
||||
PR_KEYBODYFATT = CHAR(20)
|
||||
|
||||
PR_MEZZOTRASP = CHAR(80)
|
||||
PR_CAUSALETRASP = CHAR(100)
|
||||
PR_NUMCOLLI = INTEGER
|
||||
PR_DESCRIZIONE = CHAR(100)
|
||||
PR_UMPESO = CHAR(10)
|
||||
PR_PESOLORDO = NUMERIC(7, 2)
|
||||
PR_PESONETTO = NUMERIC(7, 2)
|
||||
PR_DATAORARIT = TIMESTAMP
|
||||
PR_DATAUNIZIO = DATE
|
||||
PR_TIPORESA = CHAR(3)
|
||||
PR_INDIRIZZORESA = CHAR(60)
|
||||
PR_NRCIVICORESA = CHAR(8)
|
||||
PR_CAPRESA = NUMERIC(5, 0)
|
||||
PR_COMUNERESA = CHAR(60)
|
||||
PR_PROVINCIARESA = CHAR(2)
|
||||
PR_NAZIONERESA = CHAR(2)
|
||||
PR_DATAORACON = TIMESTAMP
|
||||
PR_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PR_KEYHEADERFATT,PR_KEYBODYFATT
|
||||
|
||||
[PAF2900F]
|
||||
PS_KEYHEADERFATT = CHAR(20)
|
||||
PS_KEYBODYFATT = CHAR(20)
|
||||
|
||||
PS_NORMARIFER = CHAR(100)
|
||||
PS_NUMFATTPRINC = CHAR(20)
|
||||
PS_DATAFATTPRINC = DATE
|
||||
|
||||
PS_GESTIONE = CHAR(1)
|
||||
|
||||
INDEX_1 = PS_KEYHEADERFATT,PS_KEYBODYFATT
|
||||
|
||||
[PANUM00F]
|
||||
PJNKEY = CHAR(5)
|
||||
PJNINV = CHAR(10)
|
||||
PJCPER = CHAR(256)
|
||||
PJFILL = CHAR(256)
|
||||
|
||||
INDEX_1 = PJNKEY
|
||||
|
||||
@ -4,4 +4,5 @@ Picture = <ve01>
|
||||
Module = pa
|
||||
Flags = "F"
|
||||
Item_01 = "Fatture P.A.", "pa0 -0", "F"
|
||||
Item_02 = "Firma Digitale", fd0 -0, "F"
|
||||
Item_02 = "Firma Digitale", "fd0 -0", "F"
|
||||
Item_03 = "Contratti/Convenzioni P.A.", "pa0 -1 &CON", "F"
|
||||
|
||||
13
pa/patbcon.h
Normal file
13
pa/patbcon.h
Normal file
@ -0,0 +1,13 @@
|
||||
#ifndef __PATBCON_H
|
||||
#define __PATBCON_H
|
||||
|
||||
#define F_CON_TIPO 101
|
||||
#define F_CON_CODCF 102
|
||||
#define F_CON_RAGSOC 112
|
||||
#define F_CON_CODICE 103
|
||||
#define F_CON_DESCRIZIONE 113
|
||||
#define F_CON_DATA 121
|
||||
|
||||
#endif
|
||||
|
||||
|
||||
107
pa/patbcon.uml
Normal file
107
pa/patbcon.uml
Normal file
@ -0,0 +1,107 @@
|
||||
#include "patbcon.h"
|
||||
|
||||
TOOLBAR "topbar" 0 0 0 2
|
||||
#include <relapbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Contratti per PA" 0 2 0 0
|
||||
|
||||
GROUPBOX DLG_NULL 78 7
|
||||
BEGIN
|
||||
PROMPT 1 0 "@bEstremi contratto/convenzione/ordine P.A."
|
||||
END
|
||||
|
||||
LIST F_CON_TIPO 1 11
|
||||
BEGIN
|
||||
PROMPT 2 1 "Tipo "
|
||||
ITEM "C|Contratto"
|
||||
ITEM "V|Convenzione"
|
||||
ITEM "O|Ordine"
|
||||
FIELD CODTAB[1,1]
|
||||
KEY 1
|
||||
END
|
||||
|
||||
NUMBER F_CON_CODCF 6
|
||||
BEGIN
|
||||
PROMPT 2 2 "Cliente "
|
||||
USE LF_CFVEN SELECT PADESTIN!=""
|
||||
JOIN LF_CLIFO INTO TIPOCF==TIPOCF CODCF==CODCF
|
||||
INPUT TIPOCF "C"
|
||||
INPUT CODCF F_CON_CODCF
|
||||
DISPLAY "Codice" CODCF
|
||||
DISPLAY "Ragione Sociale@50" LF_CLIFO->RAGSOC
|
||||
DISPLAY "Destinatario" PADESTIN
|
||||
DISPLAY "Riferimento amm.@20" PARIFAMM
|
||||
OUTPUT F_CON_CODCF CODCF
|
||||
OUTPUT F_CON_RAGSOC LF_CLIFO->RAGSOC
|
||||
CHECKTYPE REQUIRED
|
||||
FIELD CODTAB[2,7]
|
||||
KEY 1
|
||||
MESSAGE EMPTY ENABLE,F_CON_RAGSOC
|
||||
MESSAGE DISABLE,F_CON_RAGSOC
|
||||
END
|
||||
|
||||
STRING F_CON_RAGSOC 50
|
||||
BEGIN
|
||||
PROMPT 24 2 ""
|
||||
USE LF_CLIFO KEY 2 SELECT LF_CFVEN->PADESTIN!=""
|
||||
JOINT LF_CFVEN INTO TIPOCF==TIPOCF CODCF==CODCF
|
||||
INPUT TIPOCF "C"
|
||||
INPUT RAGSOC F_CON_RAGSOC
|
||||
DISPLAY "Ragione Sociale@50" RAGSOC
|
||||
DISPLAY "Codice" CODCF
|
||||
DISPLAY "Destinatario" LF_CFVEN->PADESTIN
|
||||
DISPLAY "Riferimento amm.@20" LF_CFVEN->PARIFAMM
|
||||
COPY OUTPUT F_CON_CODCF
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_CON_CODICE 20
|
||||
BEGIN
|
||||
PROMPT 2 3 "Numero "
|
||||
FLAGS "U"
|
||||
FIELD CODTAB[8,27]
|
||||
USE &CON
|
||||
JOIN LF_CLIFO INTO TIPOCF="C" CODCF=CODTAB[2,7]
|
||||
INPUT CODTAB[1,1] F_CON_TIPO SELECT
|
||||
INPUT CODTAB[2,7] F_CON_CODCF SELECT
|
||||
INPUT CODTAB[8,27] F_CON_CODICE
|
||||
DISPLAY "Tipo" CODTAB[1,1]
|
||||
DISPLAY "Numero@20" CODTAB[8,]
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Cliente" CODTAB[2,7]
|
||||
DISPLAY "Ragione Sociale@50" LF_CLIFO->RAGSOC
|
||||
OUTPUT F_CON_CODCF CODTAB[2,7]
|
||||
OUTPUT F_CON_CODICE CODTAB[8,]
|
||||
OUTPUT F_CON_DESCRIZIONE S0
|
||||
CHECKTYPE REQUIRED
|
||||
KEY 1
|
||||
END
|
||||
|
||||
STRING F_CON_DESCRIZIONE 70 50
|
||||
BEGIN
|
||||
PROMPT 2 4 "Descrizione "
|
||||
FIELD S0
|
||||
USE &CON KEY 2 SELECT (CODTAB[1,1]==#F_CON_TIPO)&&(STR(CODTAB[2,7]=#F_CON_CODCF))
|
||||
JOIN LF_CLIFO INTO TIPOCF=CODTAB[1,1] CODCF=CODTAB[2,7]
|
||||
INPUT S0 F_CON_DESCRIZIONE
|
||||
DISPLAY "Tipo" CODTAB[1,1]
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Numero@20" CODTAB[8,]
|
||||
DISPLAY "Cliente" CODTAB[2,7]
|
||||
DISPLAY "Ragione Sociale@50" LF_CLIFO->RAGSOC
|
||||
CHECKTYPE REQUIRED
|
||||
COPY OUTPUT F_CON_CODICE
|
||||
KEY 2
|
||||
END
|
||||
|
||||
DATA F_CON_DATA
|
||||
BEGIN
|
||||
PROMPT 2 5 "Data "
|
||||
FIELD D0
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user