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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Tabella punti di prelievo: aggiunto teleofno, orario, note


git-svn-id: svn://10.65.10.50/trunk@7267 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1998-10-16 14:19:56 +00:00
parent beb152a392
commit 2614b30542
2 changed files with 93 additions and 71 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
at/batbldn.h
View File

@ -7,4 +7,7 @@
#define F_TABLDN_DENLOC 106 #define F_TABLDN_DENLOC 106
#define F_TABLDN_PROVCOM 107 #define F_TABLDN_PROVCOM 107
#define F_TABLDN_CAPCOM 108 #define F_TABLDN_CAPCOM 108
#define DLG_DEL 110 #define F_TABLDN_TELEFONO 109
#define F_TABLDN_ORARIO 110
#define F_TABLDN_NOTE 111
#define DLG_DEL 112

57
at/batbldn.uml
View File

@ -10,41 +10,41 @@ STRING F_TABLDN_CODTAB 4
BEGIN BEGIN
PROMPT 2 1 "Codice " PROMPT 2 1 "Codice "
FIELD CODTAB FIELD CODTAB
HELP "Inserire il codice del punto di prelievo" KEY 1
FLAGS "U"
USE LDN USE LDN
CHECKTYPE REQUIRED
INPUT CODTAB F_TABLDN_CODTAB INPUT CODTAB F_TABLDN_CODTAB
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_TABLDN_CODTAB CODTAB OUTPUT F_TABLDN_CODTAB CODTAB
OUTPUT F_TABLDN_DESCR S0 OUTPUT F_TABLDN_DESCR S0
KEY 1 CHECKTYPE REQUIRED
FLAGS "U" HELP "Codice del punto di prelievo"
END END
STRING F_TABLDN_DESCR 50 STRING F_TABLDN_DESCR 50
BEGIN BEGIN
PROMPT 2 3 "Punto " PROMPT 2 2 "Punto "
FIELD S0 FIELD S0
HELP "Inserire la descrizione del punto" KEY 2
USE LDN KEY 2 USE LDN KEY 2
CHECKTYPE REQUIRED
INPUT S0 F_TABLDN_DESCR INPUT S0 F_TABLDN_DESCR
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
COPY OUTPUT F_TABLDN_CODTAB COPY OUTPUT F_TABLDN_CODTAB
KEY 2 CHECKTYPE REQUIRED
HELP "Denominazione del punto di prelievo"
END END
STRING F_TABLDN_INDIR 50 STRING F_TABLDN_INDIR 50
BEGIN BEGIN
PROMPT 2 5 "Indirizzo " PROMPT 2 4 "Indirizzo "
FIELD S1 FIELD S1
END END
STRING F_TABLDN_COM 4 STRING F_TABLDN_COM 4
BEGIN BEGIN
PROMPT 2 6 "Comune " PROMPT 2 5 "Comune "
FIELD S6 FIELD S6
FLAGS "U" FLAGS "U"
USE LF_COMUNI USE LF_COMUNI
@ -61,7 +61,7 @@ END
STRING F_TABLDN_DENCOM 48 STRING F_TABLDN_DENCOM 48
BEGIN BEGIN
PROMPT 21 6 "" PROMPT 21 5 ""
USE LF_COMUNI KEY 2 USE LF_COMUNI KEY 2
INPUT DENCOM F_TABLDN_DENCOM INPUT DENCOM F_TABLDN_DENCOM
#include <comdden.h> #include <comdden.h>
@ -71,7 +71,7 @@ END
STRING F_TABLDN_LOC 4 STRING F_TABLDN_LOC 4
BEGIN BEGIN
PROMPT 2 7 "Localita' " PROMPT 2 6 "Localita' "
FIELD S7 FIELD S7
FLAGS "U" FLAGS "U"
USE LCP SELECT S7=#F_TABLDN_COM USE LCP SELECT S7=#F_TABLDN_COM
@ -84,32 +84,51 @@ BEGIN
OUTPUT F_TABLDN_CAPCOM S6 OUTPUT F_TABLDN_CAPCOM S6
OUTPUT F_TABLDN_COM S7 OUTPUT F_TABLDN_COM S7
CHECKTYPE NORMAL CHECKTYPE NORMAL
HELP "Codice localit… postale se diversa dal comune" HELP "Codice localita' postale se diversa dal comune"
END END
STRING F_TABLDN_DENLOC 30 STRING F_TABLDN_DENLOC 30
BEGIN BEGIN
PROMPT 21 7 "" PROMPT 21 6 ""
USE LCP KEY 2 SELECT S7=#F_TABLDN_COM USE LCP KEY 2 SELECT S7=#F_TABLDN_COM
INPUT S0 F_TABLDN_DENLOC INPUT S0 F_TABLDN_DENLOC
DISPLAY "Località@30" S0 DISPLAY "Localita'@30" S0
DISPLAY "CAP@5" S6 DISPLAY "CAP@5" S6
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
COPY OUTPUT F_TABLDN_LOC COPY OUTPUT F_TABLDN_LOC
CHECKTYPE NORMAL CHECKTYPE NORMAL
HELP "Localit… postale se diversa dal comune" HELP "Localita' postale se diversa dal comune"
END END
STRING F_TABLDN_PROVCOM 5 STRING F_TABLDN_PROVCOM 5
BEGIN BEGIN
PROMPT 73 6 "" PROMPT 73 5 ""
FLAGS "D" FLAGS "D"
END END
STRING F_TABLDN_CAPCOM 5 STRING F_TABLDN_CAPCOM 5
BEGIN BEGIN
PROMPT 69 7 "CAP " PROMPT 69 6 "CAP "
FLAGS "D" FIELD S8
//FLAGS "D"
END
STRING F_TABLDN_TELEFONO 20
BEGIN
PROMPT 2 8 "Telefono "
FIELD S4
END
STRING F_TABLDN_ORARIO 50
BEGIN
PROMPT 2 9 "Orario "
FIELD S2
END
STRING F_TABLDN_NOTE 70 50
BEGIN
PROMPT 2 10 "Note "
FIELD S3
END END
ENDPAGE ENDPAGE