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