Correzione AGA n. 140

git-svn-id: svn://10.65.10.50/trunk@152 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-09-05 10:23:52 +00:00
parent 50f607db53
commit 68911e744a

View File

@ -4,39 +4,39 @@ PAGE "Stampa attivita'" -1 -1 50 8
STRING F_INIZIO1 5 STRING F_INIZIO1 5
BEGIN BEGIN
PROMPT 2 1 "Da codice " PROMPT 2 1 "Da codice "
FLAGS "RZ" FLAGS "RZ"
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio" HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
FIELD LF_TABCOM->CODTAB FIELD CODTAB
USE %AIS USE %AIS
INPUT CODTAB F_INIZIO1 INPUT CODTAB F_INIZIO1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Attivit…@40" S0 DISPLAY "Attivit…@40" S0
OUTPUT F_INIZIO1 CODTAB OUTPUT F_INIZIO1 CODTAB
GROUP 1 GROUP 1
END END
STRING F_FINE1 5 STRING F_FINE1 5
BEGIN BEGIN
PROMPT 2 3 "A codice " PROMPT 3 3 "A codice "
FLAGS "RZ" FLAGS "RZ"
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo" HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
FIELD LF_TABCOM->CODTAB FIELD CODTAB
COPY USE F_INIZIO1 COPY USE F_INIZIO1
INPUT CODTAB F_FINE1 INPUT CODTAB F_FINE1
COPY DISPLAY F_INIZIO1 COPY DISPLAY F_INIZIO1
OUTPUT F_FINE1 CODTAB OUTPUT F_FINE1 CODTAB
GROUP 2 GROUP 2
END END
BUTTON DLG_OK 8 2 BUTTON DLG_OK 8 2
BEGIN BEGIN
PROMPT -12 -1 "" PROMPT -12 -1 ""
END END
BUTTON DLG_QUIT 8 2 BUTTON DLG_QUIT 8 2
BEGIN BEGIN
PROMPT -12 -1 "" PROMPT -22 -1 ""
END END
ENDPAGE ENDPAGE