Errore MI6083

git-svn-id: svn://10.65.10.50/trunk@3486 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-09-02 15:44:22 +00:00
parent 353442a0c7
commit 2027c381a6

View File

@ -16,9 +16,9 @@ BEGIN
ITEM "C|Dati comuni" MESSAGE CLEAR,1@|"Archivi comuni",F_RAGSOC
ITEM "T|Tutti" MESSAGE CLEAR,1@|"Archivi comuni e ditte",F_RAGSOC
END
NUMBER F_CODDITTA 5
BEGIN
NUMBER F_CODDITTA 5
BEGIN
PROMPT 56 1 "Ditta "
USE LF_NDITTE
INPUT CODDITTA F_CODDITTA
@ -29,7 +29,7 @@ BEGIN
CHECKTYPE REQUIRED
WARNING "Specificare la ditta su cui lavorare"
GROUP 1
END
END
STRING F_RAGSOC 50
BEGIN
@ -37,7 +37,7 @@ BEGIN
USE LF_NDITTE KEY 2
INPUT RAGSOC F_RAGSOC
DISPLAY "Ragione Sociale@50" RAGSOC
DISPLAY "Codice" CODDITTA
DISPLAY "Codice@10" CODDITTA
COPY OUTPUT F_CODDITTA
CHECKTYPE REQUIRED
GROUP 1
@ -70,7 +70,7 @@ BUTTON DLG_QUIT 15 2
BEGIN
PROMPT -33 -1 ""
END
ENDPAGE
ENDMASK