Errore MI2312

git-svn-id: svn://10.65.10.50/trunk@4314 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1997-04-29 11:15:23 +00:00
parent 786ff16d1b
commit d748a62922

View File

@ -13,21 +13,21 @@ BEGIN
PROMPT 4 1 "Cod. esercizio " PROMPT 4 1 "Cod. esercizio "
HELP "Codice esercizio a cui si riferiscono i saldi" HELP "Codice esercizio a cui si riferiscono i saldi"
WARNING "Codice esercizio inesistente" WARNING "Codice esercizio inesistente"
USE ESC USE ESC
INPUT CODTAB[1,4] F_ANNO INPUT CODTAB[1,4] F_ANNO
DISPLAY "Codice" CODTAB[1,4] DISPLAY "Codice" CODTAB[1,4]
DISPLAY "Data inizio esercizio" D0 DISPLAY "Data inizio esercizio" D0
DISPLAY "Data fine esercizio" D1 DISPLAY "Data fine esercizio" D1
OUTPUT F_ANNO CODTAB[1,4] OUTPUT F_ANNO CODTAB[1,4]
FLAGS "Z" FLAGS "Z"
ADD RUN cg0 -5 esc ADD RUN cg0 -5 esc
END END
BOOLEAN F_SCARICATO BOOLEAN F_SCARICATO
BEGIN BEGIN
PROMPT 40 1 "Solo saldi dei movimenti scaricati" PROMPT 40 1 "Solo saldi dei movimenti scaricati"
END END
GROUPBOX DLG_NULL 73 5 GROUPBOX DLG_NULL 73 5
BEGIN BEGIN
PROMPT 3 2 "" PROMPT 3 2 ""
@ -48,12 +48,12 @@ NUMBER F_GRUPPO 3
BEGIN BEGIN
PROMPT 26 3 "Gruppo " PROMPT 26 3 "Gruppo "
HELP "Codice del conto da visualizzare" HELP "Codice del conto da visualizzare"
FLAGS "R" FLAGS "R"
KEY 1 KEY 1
FIELD GRUPPO FIELD GRUPPO
USE LF_PCON SELECT CONTO="" USE LF_PCON SELECT CONTO=""
INPUT GRUPPO F_GRUPPO INPUT GRUPPO F_GRUPPO
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPO GRUPPO OUTPUT F_GRUPPO GRUPPO
// OUTPUT F_DESCR_CONTO DESCR // OUTPUT F_DESCR_CONTO DESCR
@ -63,9 +63,9 @@ BEGIN
WARNING "Gruppo inesistente" WARNING "Gruppo inesistente"
END END
NUMBER F_CONTO 3 NUMBER F_CONTO 3
BEGIN BEGIN
PROMPT 40 3 "Conto " PROMPT 40 3 "Conto "
HELP "Codice del conto da visualizzare" HELP "Codice del conto da visualizzare"
//USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") //USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
USE LF_PCON SELECT SOTTOCONTO="" USE LF_PCON SELECT SOTTOCONTO=""
@ -75,7 +75,7 @@ BEGIN
INPUT GRUPPO F_GRUPPO INPUT GRUPPO F_GRUPPO
INPUT CONTO F_CONTO INPUT CONTO F_CONTO
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
DISPLAY "Tipo" TMCF DISPLAY "Tipo" TMCF
OUTPUT F_TIPOCF TMCF OUTPUT F_TIPOCF TMCF
@ -93,25 +93,25 @@ BEGIN
PROMPT 55 3 "Sottoconto " PROMPT 55 3 "Sottoconto "
HELP "Codice del conto da visualizzare" HELP "Codice del conto da visualizzare"
//USE LF_PCON SELECT SOTTOCONTO!="" //USE LF_PCON SELECT SOTTOCONTO!=""
USE LF_PCON USE LF_PCON
FIELD SOTTOCONTO FIELD SOTTOCONTO
FLAGS "R" FLAGS "R"
KEY 1 KEY 1
INPUT GRUPPO F_GRUPPO INPUT GRUPPO F_GRUPPO
INPUT CONTO F_CONTO INPUT CONTO F_CONTO
INPUT SOTTOCONTO F_SOTTOCONTO INPUT SOTTOCONTO F_SOTTOCONTO
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPO GRUPPO OUTPUT F_GRUPPO GRUPPO
OUTPUT F_CONTO CONTO OUTPUT F_CONTO CONTO
OUTPUT F_SOTTOCONTO SOTTOCONTO OUTPUT F_SOTTOCONTO SOTTOCONTO
OUTPUT F_DESCR_CONTO DESCR OUTPUT F_DESCR_CONTO DESCR
// CHECKTYPE NORMAL // CHECKTYPE NORMAL
VALIDATE CHECK_FIELD F_SOTTOCONTO VALIDATE CHECK_FIELD F_SOTTOCONTO
WARNING "Sottoconto inesistente" WARNING "Sottoconto inesistente"
GROUP 1 GROUP 1
END END
NUMBER F_SOTTOC_CLIENTE 6 NUMBER F_SOTTOC_CLIENTE 6
@ -124,9 +124,9 @@ BEGIN
INPUT TIPOCF "C" INPUT TIPOCF "C"
INPUT CODCF F_SOTTOC_CLIENTE INPUT CODCF F_SOTTOC_CLIENTE
DISPLAY "Codice" CODCF DISPLAY "Codice" CODCF
DISPLAY "Ragione Sociale@50" RAGSOC DISPLAY "Ragione Sociale@60" RAGSOC
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
OUTPUT F_SOTTOC_CLIENTE CODCF OUTPUT F_SOTTOC_CLIENTE CODCF
OUTPUT F_DESCR_CLIENTE RAGSOC OUTPUT F_DESCR_CLIENTE RAGSOC
CHECKTYPE NORMAL CHECKTYPE NORMAL
@ -145,10 +145,10 @@ BEGIN
INPUT TIPOCF "F" INPUT TIPOCF "F"
INPUT CODCF F_SOTTOC_FORN INPUT CODCF F_SOTTOC_FORN
DISPLAY "Codice" CODCF DISPLAY "Codice" CODCF
DISPLAY "Ragione Sociale@50" RAGSOC DISPLAY "Ragione Sociale@60" RAGSOC
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
OUTPUT F_SOTTOC_FORN CODCF OUTPUT F_SOTTOC_FORN CODCF
OUTPUT F_DESCR_FORN RAGSOC OUTPUT F_DESCR_FORN RAGSOC
CHECKTYPE NORMAL CHECKTYPE NORMAL
VALIDATE CHECK_FIELD F_SOTTOC_FORN VALIDATE CHECK_FIELD F_SOTTOC_FORN
@ -164,7 +164,7 @@ BEGIN
KEY 2 KEY 2
USE LF_PCON KEY 2 USE LF_PCON KEY 2
INPUT DESCR F_DESCR_CONTO INPUT DESCR F_DESCR_CONTO
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@60" DESCR
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO DISPLAY "Sottoconto" SOTTOCONTO
@ -197,8 +197,8 @@ STRING F_DESCR_FORN 50
BEGIN BEGIN
PROMPT 4 5 "Fornitore " PROMPT 4 5 "Fornitore "
HELP "Ragione sociale del fornitore da visualizzare" HELP "Ragione sociale del fornitore da visualizzare"
KEY 4 KEY 4
USE LF_CLIFO KEY 2 USE LF_CLIFO KEY 2
INPUT TIPOCF "F" INPUT TIPOCF "F"
INPUT RAGSOC F_DESCR_FORN INPUT RAGSOC F_DESCR_FORN
DISPLAY "Ragione Sociale Fornitore@50" RAGSOC DISPLAY "Ragione Sociale Fornitore@50" RAGSOC
@ -210,7 +210,7 @@ BEGIN
GROUP 3 GROUP 3
END END
SPREADSHEET F_SHEET_SALDI SPREADSHEET F_SHEET_SALDI
BEGIN BEGIN
PROMPT 0 7 "" PROMPT 0 7 ""
ITEM "Es.@4" ITEM "Es.@4"
@ -253,7 +253,7 @@ NUMBER 102 15
BEGIN BEGIN
PROMPT 1 3 "Saldo Iniziale " PROMPT 1 3 "Saldo Iniziale "
HELP "Importo del saldo iniziale" HELP "Importo del saldo iniziale"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -269,7 +269,7 @@ BEGIN
PROMPT 1 4 "Progr.Attuali: Dare " PROMPT 1 4 "Progr.Attuali: Dare "
HELP "Progressivo dare attuale del conto da visualizzare" HELP "Progressivo dare attuale del conto da visualizzare"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
NUMBER 105 15 NUMBER 105 15
@ -277,7 +277,7 @@ BEGIN
PROMPT 47 4 "Avere " PROMPT 47 4 "Avere "
HELP "Progressivo avere attuale del conto da visualizzare" HELP "Progressivo avere attuale del conto da visualizzare"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
NUMBER 106 15 NUMBER 106 15
@ -286,7 +286,7 @@ BEGIN
HELP "Saldo attuale del conto" HELP "Saldo attuale del conto"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
STRING 107 1 STRING 107 1
BEGIN BEGIN
@ -308,10 +308,10 @@ NUMBER 109 15
BEGIN BEGIN
PROMPT 47 6 "Avere " PROMPT 47 6 "Avere "
HELP "Progressivi avere attuali dei movimenti eliminati" HELP "Progressivi avere attuali dei movimenti eliminati"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
=======================================================================*/ =======================================================================*/
NUMBER 108 15 NUMBER 108 15
BEGIN BEGIN
@ -326,8 +326,8 @@ BEGIN
PROMPT 44 6 "" PROMPT 44 6 ""
HELP "Sezione del saldo di chiusura" HELP "Sezione del saldo di chiusura"
FLAGS "R" FLAGS "R"
END END
NUMBER 110 15 NUMBER 110 15
BEGIN BEGIN
PROMPT 1 7 "Saldo complessivo " PROMPT 1 7 "Saldo complessivo "
@ -341,9 +341,9 @@ BEGIN
PROMPT 44 7 "" PROMPT 44 7 ""
HELP "Sezione del saldo attuale complessivo del conto" HELP "Sezione del saldo attuale complessivo del conto"
FLAGS "R" FLAGS "R"
END END
DATE 112 DATE 112
BEGIN BEGIN
PROMPT 1 8 "Ultima data operazione " PROMPT 1 8 "Ultima data operazione "
HELP "Ultima data di registrazione che ha movimentato il conto" HELP "Ultima data di registrazione che ha movimentato il conto"
@ -351,7 +351,7 @@ BEGIN
END END
NUMBER 113 7 NUMBER 113 7
BEGIN BEGIN
PROMPT 1 9 "Ultimo numero operazione " PROMPT 1 9 "Ultimo numero operazione "
HELP "Ultimo numero di registrazione che ha movimentato il conto" HELP "Ultimo numero di registrazione che ha movimentato il conto"
FLAGS "R" FLAGS "R"
@ -362,7 +362,7 @@ BEGIN
PROMPT 1 10 "Progr.Mov.Provvisori: Dare " PROMPT 1 10 "Progr.Mov.Provvisori: Dare "
HELP "Progressivi dare attuali dei movimenti provvisori" HELP "Progressivi dare attuali dei movimenti provvisori"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
NUMBER 115 15 NUMBER 115 15
@ -370,7 +370,7 @@ BEGIN
PROMPT 47 10 "Avere " PROMPT 47 10 "Avere "
HELP "Progressivi avere attuali dei movimenti provvisori del conto" HELP "Progressivi avere attuali dei movimenti provvisori del conto"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
NUMBER 116 15 NUMBER 116 15
@ -400,7 +400,7 @@ NUMBER 119 15
BEGIN BEGIN
PROMPT 47 12 "Avere " PROMPT 47 12 "Avere "
HELP "Progressivi avere attuali dei movimenti eliminati" HELP "Progressivi avere attuali dei movimenti eliminati"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -408,7 +408,7 @@ END
BUTTON DLG_CANCEL 9 2 BUTTON DLG_CANCEL 9 2
BEGIN BEGIN
PROMPT -11 -1 "" PROMPT -11 -1 ""
END END
ENDPAGE ENDPAGE