From 2614b30542f2ea9012e079bc5cf6764ee59492f5 Mon Sep 17 00:00:00 2001 From: cris Date: Fri, 16 Oct 1998 14:19:56 +0000 Subject: [PATCH] Patch level : 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 --- at/batbldn.h | 5 +- at/batbldn.uml | 159 +++++++++++++++++++++++++++---------------------- 2 files changed, 93 insertions(+), 71 deletions(-) diff --git a/at/batbldn.h b/at/batbldn.h index 0de7efdd8..c4e64db08 100755 --- a/at/batbldn.h +++ b/at/batbldn.h @@ -7,4 +7,7 @@ #define F_TABLDN_DENLOC 106 #define F_TABLDN_PROVCOM 107 #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 diff --git a/at/batbldn.uml b/at/batbldn.uml index 2fe13bc6c..3158ebeea 100755 --- a/at/batbldn.uml +++ b/at/batbldn.uml @@ -8,108 +8,127 @@ PAGE "Punti di prelievo" -1 -1 78 7 STRING F_TABLDN_CODTAB 4 BEGIN - PROMPT 2 1 "Codice " - FIELD CODTAB - HELP "Inserire il codice del punto di prelievo" - USE LDN - CHECKTYPE REQUIRED - INPUT CODTAB F_TABLDN_CODTAB - DISPLAY "Codice" CODTAB - DISPLAY "Descrizione@50" S0 - OUTPUT F_TABLDN_CODTAB CODTAB - OUTPUT F_TABLDN_DESCR S0 - KEY 1 - FLAGS "U" + PROMPT 2 1 "Codice " + FIELD CODTAB + KEY 1 + FLAGS "U" + USE LDN + INPUT CODTAB F_TABLDN_CODTAB + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT F_TABLDN_CODTAB CODTAB + OUTPUT F_TABLDN_DESCR S0 + CHECKTYPE REQUIRED + HELP "Codice del punto di prelievo" END STRING F_TABLDN_DESCR 50 BEGIN - PROMPT 2 3 "Punto " - FIELD S0 - HELP "Inserire la descrizione del punto" - USE LDN KEY 2 - CHECKTYPE REQUIRED - INPUT S0 F_TABLDN_DESCR - DISPLAY "Descrizione@50" S0 - DISPLAY "Codice" CODTAB - COPY OUTPUT F_TABLDN_CODTAB - KEY 2 + PROMPT 2 2 "Punto " + FIELD S0 + KEY 2 + USE LDN KEY 2 + INPUT S0 F_TABLDN_DESCR + DISPLAY "Descrizione@50" S0 + DISPLAY "Codice" CODTAB + COPY OUTPUT F_TABLDN_CODTAB + CHECKTYPE REQUIRED + HELP "Denominazione del punto di prelievo" END STRING F_TABLDN_INDIR 50 BEGIN - PROMPT 2 5 "Indirizzo " - FIELD S1 + PROMPT 2 4 "Indirizzo " + FIELD S1 END STRING F_TABLDN_COM 4 BEGIN - PROMPT 2 6 "Comune " - FIELD S6 - FLAGS "U" - USE LF_COMUNI - INPUT STATO "" - INPUT COM F_TABLDN_COM - #include - OUTPUT F_TABLDN_COM COM - OUTPUT F_TABLDN_DENCOM DENCOM - OUTPUT F_TABLDN_PROVCOM PROVCOM - OUTPUT F_TABLDN_CAPCOM CAPCOM - CHECKTYPE NORMAL - WARNING "Comune assente" + PROMPT 2 5 "Comune " + FIELD S6 + FLAGS "U" + USE LF_COMUNI + INPUT STATO "" + INPUT COM F_TABLDN_COM + #include + OUTPUT F_TABLDN_COM COM + OUTPUT F_TABLDN_DENCOM DENCOM + OUTPUT F_TABLDN_PROVCOM PROVCOM + OUTPUT F_TABLDN_CAPCOM CAPCOM + CHECKTYPE NORMAL + WARNING "Comune assente" END STRING F_TABLDN_DENCOM 48 BEGIN - PROMPT 21 6 "" - USE LF_COMUNI KEY 2 - INPUT DENCOM F_TABLDN_DENCOM - #include - COPY OUTPUT F_TABLDN_COM - CHECKTYPE NORMAL + PROMPT 21 5 "" + USE LF_COMUNI KEY 2 + INPUT DENCOM F_TABLDN_DENCOM + #include + COPY OUTPUT F_TABLDN_COM + CHECKTYPE NORMAL END STRING F_TABLDN_LOC 4 BEGIN - PROMPT 2 7 "Localita' " - FIELD S7 - FLAGS "U" - USE LCP SELECT S7=#F_TABLDN_COM - INPUT CODTAB F_TABLDN_LOC - DISPLAY "Codice" CODTAB - DISPLAY "Localita'@30" S0 - DISPLAY "CAP@5" S6 - OUTPUT F_TABLDN_LOC CODTAB - OUTPUT F_TABLDN_DENLOC S0 - OUTPUT F_TABLDN_CAPCOM S6 - OUTPUT F_TABLDN_COM S7 - CHECKTYPE NORMAL - HELP "Codice localit… postale se diversa dal comune" + PROMPT 2 6 "Localita' " + FIELD S7 + FLAGS "U" + USE LCP SELECT S7=#F_TABLDN_COM + INPUT CODTAB F_TABLDN_LOC + DISPLAY "Codice" CODTAB + DISPLAY "Localita'@30" S0 + DISPLAY "CAP@5" S6 + OUTPUT F_TABLDN_LOC CODTAB + OUTPUT F_TABLDN_DENLOC S0 + OUTPUT F_TABLDN_CAPCOM S6 + OUTPUT F_TABLDN_COM S7 + CHECKTYPE NORMAL + HELP "Codice localita' postale se diversa dal comune" END STRING F_TABLDN_DENLOC 30 BEGIN - PROMPT 21 7 "" - USE LCP KEY 2 SELECT S7=#F_TABLDN_COM - INPUT S0 F_TABLDN_DENLOC - DISPLAY "Località@30" S0 - DISPLAY "CAP@5" S6 - DISPLAY "Codice" CODTAB - COPY OUTPUT F_TABLDN_LOC - CHECKTYPE NORMAL - HELP "Localit… postale se diversa dal comune" + PROMPT 21 6 "" + USE LCP KEY 2 SELECT S7=#F_TABLDN_COM + INPUT S0 F_TABLDN_DENLOC + DISPLAY "Localita'@30" S0 + DISPLAY "CAP@5" S6 + DISPLAY "Codice" CODTAB + COPY OUTPUT F_TABLDN_LOC + CHECKTYPE NORMAL + HELP "Localita' postale se diversa dal comune" END STRING F_TABLDN_PROVCOM 5 BEGIN - PROMPT 73 6 "" - FLAGS "D" + PROMPT 73 5 "" + FLAGS "D" END STRING F_TABLDN_CAPCOM 5 BEGIN - PROMPT 69 7 "CAP " - FLAGS "D" + PROMPT 69 6 "CAP " + 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 ENDPAGE