Patch level : 12.0 no-patch

Files correlati     : cg
Commento            : 
- Aggiornata maschera clienti/fornitori: Rinominato "Stato" con "Codice ISO" e aggiunto un campo con la descrizione dello stato così facendo è stato aggiunto anche la ricerca per nome stato
- Aggiornata maschera clienti/fornitori occasionali: Tolti tutti i controlli a db e reso zerofilled il CAP

git-svn-id: svn://10.65.10.50/branches/R_10_00@24141 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
mtollari 2017-10-11 08:26:43 +00:00
parent dcf68b94ec
commit 9635ef7268
3 changed files with 28 additions and 9 deletions

View File

@ -14,6 +14,7 @@
#define F_CAPCF 108
#define F_COFI 109
#define F_STATOPAIV 110
#define F_STATOPAIVSTR 128
#define F_PAIV 111
#define F_TIPOPERS 112
#define F_ALLEG 113

View File

@ -126,7 +126,7 @@ END
STRING F_STATOPAIV 2
BEGIN
PROMPT 42 4 "Stato "
PROMPT 42 4 "Codice ISO "
FIELD STATOPAIV
HELP "Codice ISO dello stato"
FLAGS "U"
@ -135,18 +135,35 @@ BEGIN
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_STATOPAIV CODTAB
OUTPUT F_STATOPAIVSTR S0
CHECKTYPE NORMAL
END
STRING F_STATOPAIVSTR 25 15
BEGIN
PROMPT 60 4 ""
HELP "Codice ISO dello stato"
FLAGS "U"
USE %SCE
KEY 2
INPUT S0 F_STATOPAIVSTR
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_STATOPAIV CODTAB
OUTPUT F_STATOPAIVSTR S0
CHECKTYPE NORMAL
END
STRING F_PAIV 12
BEGIN
PROMPT 42 5 "Codice "
PROMPT 42 5 "P.IVA "
FIELD PAIV
KEY 5
USE LF_CLIFO KEY 5
INPUT TIPOCF F_TIPOCF SELECT
INPUT STATOPAIV F_STATOPAIV
INPUT PAIV F_PAIV
DISPLAY "ISO@3" STATOPAIV
DISPLAY "Partita IVA@11" PAIV
DISPLAY "Sospeso" SOSPESO
DISPLAY "Codice@R" CODCF

View File

@ -62,7 +62,7 @@ BEGIN
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT O_STATOPAIV CODTAB
CHECKTYPE NORMAL
//CHECKTYPE NORMAL
END
STRING O_PAIV 12
@ -100,7 +100,7 @@ BEGIN
DISPLAY "Codice" CODTAB
DISPLAY "Denominazione@50" S0
OUTPUT O_STATO CODTAB
CHECKTYPE NORMAL
//CHECKTYPE NORMAL
END
STRING O_COMUNE 4
@ -118,7 +118,7 @@ BEGIN
OUTPUT O_COMUNE COM
OUTPUT O_DENCOM DENCOM
OUTPUT O_CAP CAPCOM
CHECKTYPE NORMAL
//CHECKTYPE NORMAL
ADD RUN ba4 -0
END
@ -127,6 +127,7 @@ BEGIN
PROMPT 56 7 "C.A.P. "
HELP "CAP della residenza della persona"
FIELD CAP
FLAGS "ZF"
END
STRING O_DENCOM 50
@ -140,7 +141,7 @@ BEGIN
DISPLAY "Stato" STATO
DISPLAY "Codice@10" COM
COPY OUTPUT O_COMUNE
CHECKTYPE NORMAL
//CHECKTYPE NORMAL
ADD RUN ba4 -0
END
@ -172,7 +173,7 @@ BEGIN
INPUT CODTAB O_STATONAS
COPY DISPLAY O_STATO
OUTPUT O_STATONAS CODTAB
CHECKTYPE NORMAL
//CHECKTYPE NORMAL
END
STRING O_COMUNENAS 4
@ -186,7 +187,7 @@ BEGIN
COPY DISPLAY O_COMUNE
OUTPUT O_COMUNENAS COM
OUTPUT O_DENCOMNAS DENCOM
CHECKTYPE NORMAL
//CHECKTYPE NORMAL
END
STRING O_DENCOMNAS 50
@ -196,7 +197,7 @@ BEGIN
INPUT DENCOM O_DENCOMNAS
COPY DISPLAY O_DENCOM
COPY OUTPUT O_COMUNENAS
CHECKTYPE NORMAL
//CHECKTYPE NORMAL
END
ENDPAGE