Eliminati commenti
git-svn-id: svn://10.65.10.50/trunk@485 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
a53a478f16
commit
7b0de636c5
@ -47,7 +47,6 @@ BEGIN
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT F_GRUPPO GRUPPO
|
||||
//OUTPUT F_DESCR_CONTO DESCR
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
@ -65,15 +64,9 @@ BEGIN
|
||||
OUTPUT F_CONTO CONTO
|
||||
OUTPUT F_GRUPPO GRUPPO
|
||||
OUTPUT F_TIPOCF TMCF
|
||||
//OUTPUT F_DESCR_CLIENTE DESCR
|
||||
//OUTPUT F_DESCR_FORN DESCR
|
||||
//OUTPUT F_DESCR_CONTO DESCR
|
||||
|
||||
FLAGS "R"
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Conto inesistente o mancante"
|
||||
//MESSAGE DIRTY,F_SOTTOCONTO|DIRTY,F_SOTTOC_CLIENTE|DIRTY,F_SOTTOC_FORN
|
||||
//MESSAGE DIRTY,F_DESCR_CONTO|DIRTY,F_DESCR_CLIENTE|DIRTY,F_DESCR_FORN
|
||||
END
|
||||
|
||||
NUMBER F_SOTTOCONTO 6
|
||||
@ -92,15 +85,8 @@ BEGIN
|
||||
OUTPUT F_SOTTOCONTO SOTTOCONTO
|
||||
OUTPUT F_GRUPPO GRUPPO
|
||||
OUTPUT F_CONTO CONTO
|
||||
//OUTPUT F_DESCR_CONTO DESCR
|
||||
//OUTPUT F_DESCR_CLIENTE DESCR
|
||||
//OUTPUT F_DESCR_FORN DESCR
|
||||
//CHECKTYPE NORMAL
|
||||
//MESSAGE COPY,F_SOTTOC_FORN //li gestisco da programma senno' fanno casino
|
||||
//MESSAGE COPY,F_SOTTOC_CLIENTE
|
||||
FLAGS "R"
|
||||
CHECKTYPE NORMAL
|
||||
//VALIDATE AUTOEXIT_FUNC 3 F_GRUPPO F_CONTO F_SOTTOCONTO
|
||||
GROUP 1
|
||||
WARNING "Conto inesistente"
|
||||
END
|
||||
@ -109,7 +95,6 @@ NUMBER F_SOTTOC_CLIENTE 6
|
||||
BEGIN
|
||||
PROMPT 54 3 "Cliente "
|
||||
USE LF_CLIFO
|
||||
//FIELD LF_CLIFO->CODCF
|
||||
INPUT TIPOCF "C"
|
||||
INPUT CODCF F_SOTTOC_CLIENTE
|
||||
DISPLAY "Codice" CODCF
|
||||
@ -117,14 +102,10 @@ BEGIN
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
OUTPUT F_SOTTOC_CLIENTE CODCF
|
||||
//OUTPUT F_DESCR_CONTO RAGSOC
|
||||
//OUTPUT F_DESCR_CLIENTE RAGSOC
|
||||
//OUTPUT F_DESCR_FORN RAGSOC
|
||||
FLAGS "R"
|
||||
CHECKTYPE NORMAL
|
||||
KEY 1
|
||||
WARNING "Cliente inesistente"
|
||||
//VALIDATE AUTOEXIT_FUNC 3 F_GRUPPO F_CONTO F_SOTTOC_CLIENTE
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
@ -139,15 +120,10 @@ BEGIN
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
OUTPUT F_SOTTOC_FORN CODCF
|
||||
// OUTPUT F_DESCR_FORN RAGSOC
|
||||
// OUTPUT F_DESCR_CONTO RAGSOC
|
||||
// OUTPUT F_DESCR_CLIENTE RAGSOC
|
||||
FLAGS "R"
|
||||
CHECKTYPE NORMAL
|
||||
// serve per l' autopremimento
|
||||
KEY 1
|
||||
WARNING "Fornitore inesistente"
|
||||
//VALIDATE AUTOEXIT_FUNC 3 F_GRUPPO F_CONTO F_SOTTOC_FORN
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
@ -344,24 +320,6 @@ BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
/*
|
||||
BUTTON DLG_OK 9 2
|
||||
BEGIN
|
||||
PROMPT -13 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 9 2
|
||||
BEGIN
|
||||
PROMPT -23 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_NULL 9 2
|
||||
BEGIN
|
||||
PROMPT -33 -1 "Azzera"
|
||||
MESSAGE RESET,1@
|
||||
END
|
||||
*/
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
Loading…
x
Reference in New Issue
Block a user