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 "Gruppo" GRUPPO
|
||||||
DISPLAY "Descrizione@50" DESCR
|
DISPLAY "Descrizione@50" DESCR
|
||||||
OUTPUT F_GRUPPO GRUPPO
|
OUTPUT F_GRUPPO GRUPPO
|
||||||
//OUTPUT F_DESCR_CONTO DESCR
|
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -65,15 +64,9 @@ BEGIN
|
|||||||
OUTPUT F_CONTO CONTO
|
OUTPUT F_CONTO CONTO
|
||||||
OUTPUT F_GRUPPO GRUPPO
|
OUTPUT F_GRUPPO GRUPPO
|
||||||
OUTPUT F_TIPOCF TMCF
|
OUTPUT F_TIPOCF TMCF
|
||||||
//OUTPUT F_DESCR_CLIENTE DESCR
|
|
||||||
//OUTPUT F_DESCR_FORN DESCR
|
|
||||||
//OUTPUT F_DESCR_CONTO DESCR
|
|
||||||
|
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
WARNING "Conto inesistente o mancante"
|
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
|
END
|
||||||
|
|
||||||
NUMBER F_SOTTOCONTO 6
|
NUMBER F_SOTTOCONTO 6
|
||||||
@ -92,15 +85,8 @@ BEGIN
|
|||||||
OUTPUT F_SOTTOCONTO SOTTOCONTO
|
OUTPUT F_SOTTOCONTO SOTTOCONTO
|
||||||
OUTPUT F_GRUPPO GRUPPO
|
OUTPUT F_GRUPPO GRUPPO
|
||||||
OUTPUT F_CONTO CONTO
|
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"
|
FLAGS "R"
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
//VALIDATE AUTOEXIT_FUNC 3 F_GRUPPO F_CONTO F_SOTTOCONTO
|
|
||||||
GROUP 1
|
GROUP 1
|
||||||
WARNING "Conto inesistente"
|
WARNING "Conto inesistente"
|
||||||
END
|
END
|
||||||
@ -109,7 +95,6 @@ NUMBER F_SOTTOC_CLIENTE 6
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 54 3 "Cliente "
|
PROMPT 54 3 "Cliente "
|
||||||
USE LF_CLIFO
|
USE LF_CLIFO
|
||||||
//FIELD LF_CLIFO->CODCF
|
|
||||||
INPUT TIPOCF "C"
|
INPUT TIPOCF "C"
|
||||||
INPUT CODCF F_SOTTOC_CLIENTE
|
INPUT CODCF F_SOTTOC_CLIENTE
|
||||||
DISPLAY "Codice" CODCF
|
DISPLAY "Codice" CODCF
|
||||||
@ -117,14 +102,10 @@ BEGIN
|
|||||||
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_CONTO RAGSOC
|
|
||||||
//OUTPUT F_DESCR_CLIENTE RAGSOC
|
|
||||||
//OUTPUT F_DESCR_FORN RAGSOC
|
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
KEY 1
|
KEY 1
|
||||||
WARNING "Cliente inesistente"
|
WARNING "Cliente inesistente"
|
||||||
//VALIDATE AUTOEXIT_FUNC 3 F_GRUPPO F_CONTO F_SOTTOC_CLIENTE
|
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -139,15 +120,10 @@ BEGIN
|
|||||||
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_CONTO RAGSOC
|
|
||||||
// OUTPUT F_DESCR_CLIENTE RAGSOC
|
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
// serve per l' autopremimento
|
|
||||||
KEY 1
|
KEY 1
|
||||||
WARNING "Fornitore inesistente"
|
WARNING "Fornitore inesistente"
|
||||||
//VALIDATE AUTOEXIT_FUNC 3 F_GRUPPO F_CONTO F_SOTTOC_FORN
|
|
||||||
GROUP 3
|
GROUP 3
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -344,24 +320,6 @@ BEGIN
|
|||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
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
|
ENDPAGE
|
||||||
|
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
Loading…
x
Reference in New Issue
Block a user