Strunzatielle XI - Disabilitato temporaneamente prog. bilanci
git-svn-id: svn://10.65.10.50/trunk@2909 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
c711835274
commit
ec6bf26b5c
@ -19,8 +19,8 @@ int main(int argc,char** argv)
|
|||||||
cg1300(argc,argv); break;
|
cg1300(argc,argv); break;
|
||||||
case 3:
|
case 3:
|
||||||
cg1400(argc,argv); break;
|
cg1400(argc,argv); break;
|
||||||
case 4:
|
// case 4:
|
||||||
cg1500(argc,argv); break;
|
// cg1500(argc,argv); break;
|
||||||
case 5:
|
case 5:
|
||||||
cg1600(argc,argv); break;
|
cg1600(argc,argv); break;
|
||||||
case 6:
|
case 6:
|
||||||
|
202
cg/cg1200a.uml
202
cg/cg1200a.uml
@ -30,156 +30,156 @@ END
|
|||||||
|
|
||||||
RADIOBUTTON RDB_CG12_TYPE 22
|
RADIOBUTTON RDB_CG12_TYPE 22
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 4 "Oggetto"
|
PROMPT 4 4 "Oggetto"
|
||||||
HELP "Selezionare l'archivio che si desidera stampare"
|
HELP "Selezionare l'archivio che si desidera stampare"
|
||||||
ITEM "1|Clienti" MESSAGE RESET,2@|SHOW,1@|HIDE,2@
|
ITEM "1|Clienti" MESSAGE RESET,2@|SHOW,1@|HIDE,2@
|
||||||
ITEM "2|Fornitori" MESSAGE RESET,1@|SHOW,2@|HIDE,1@
|
ITEM "2|Fornitori" MESSAGE RESET,1@|SHOW,2@|HIDE,1@
|
||||||
ITEM "3|Entrambi" MESSAGE HIDE,1@|HIDE,2@|RESET,1@|RESET,2@
|
ITEM "3|Entrambi" MESSAGE HIDE,1@|HIDE,2@|RESET,1@|RESET,2@
|
||||||
END
|
END
|
||||||
|
|
||||||
RADIOBUTTON RDB_CG12_SORT 22
|
RADIOBUTTON RDB_CG12_SORT 22
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 9 "Ordinamento"
|
PROMPT 4 9 "Ordinamento"
|
||||||
HELP "Selezionare il tipo di ordinamento dei record stampati"
|
HELP "Selezionare il tipo di ordinamento dei record stampati"
|
||||||
ITEM "1|per Codice" MESSAGE CLEAR,4@|ENABLE,3@
|
ITEM "1|per Codice" MESSAGE CLEAR,4@|ENABLE,3@
|
||||||
ITEM "2|per Ragione Sociale" MESSAGE CLEAR,3@|ENABLE,4@
|
ITEM "2|per Ragione Sociale" MESSAGE CLEAR,3@|ENABLE,4@
|
||||||
END
|
END
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 35 10
|
GROUPBOX DLG_NULL 35 10
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 32 4 "Selezione "
|
PROMPT 32 4 "Selezione "
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 8 "da Ragione Sociale/Nominativo"
|
PROMPT 34 8 "da Ragione Sociale/Nominativo"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 10 "a Ragione Sociale/Nominativo"
|
PROMPT 34 10 "a Ragione Sociale/Nominativo"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 5 "da Codice"
|
PROMPT 34 5 "da Codice"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 48 5 "a Codice"
|
PROMPT 48 5 "a Codice"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_CLI_CODFR 5
|
STRING FLD_CLI_CODFR 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 6 ""
|
PROMPT 34 6 ""
|
||||||
USE LF_CLIFO KEY 1
|
USE LF_CLIFO KEY 1
|
||||||
INPUT TIPOCF "C"
|
INPUT TIPOCF "C"
|
||||||
INPUT CODCF FLD_CLI_CODFR
|
INPUT CODCF FLD_CLI_CODFR
|
||||||
DISPLAY "Codice" CODCF
|
DISPLAY "Codice" CODCF
|
||||||
DISPLAY "Codice Fiscale@16" COFI
|
DISPLAY "Codice Fiscale@16" COFI
|
||||||
DISPLAY "Ragione sociale@50" RAGSOC
|
DISPLAY "Ragione sociale@50" RAGSOC
|
||||||
OUTPUT FLD_CLI_CODFR CODCF
|
OUTPUT FLD_CLI_CODFR CODCF
|
||||||
GROUP 1 3
|
GROUP 1 3
|
||||||
HELP "Codice di inizio stampa: vuoto = inizio archivio"
|
HELP "Codice di inizio stampa: vuoto = inizio archivio"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_CLI_CODTO 5
|
STRING FLD_CLI_CODTO 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 48 6 ""
|
PROMPT 48 6 ""
|
||||||
COPY USE FLD_CLI_CODFR
|
COPY USE FLD_CLI_CODFR
|
||||||
INPUT TIPOCF "C"
|
INPUT TIPOCF "C"
|
||||||
INPUT CODCF FLD_CLI_CODTO
|
INPUT CODCF FLD_CLI_CODTO
|
||||||
COPY DISPLAY FLD_CLI_CODFR
|
COPY DISPLAY FLD_CLI_CODFR
|
||||||
OUTPUT FLD_CLI_CODTO CODCF
|
OUTPUT FLD_CLI_CODTO CODCF
|
||||||
GROUP 1 3
|
GROUP 1 3
|
||||||
HELP "Codice di fine stampa: vuoto = fine archivio"
|
HELP "Codice di fine stampa: vuoto = fine archivio"
|
||||||
NUM_EXPR {(#THIS_FIELD == 0) || (#THIS_FIELD >= #FLD_CLI_CODFR)}
|
NUM_EXPR {(#THIS_FIELD == 0) || (#THIS_FIELD >= #FLD_CLI_CODFR)}
|
||||||
WARNING "Limite superiore errato"
|
WARNING "Limite superiore errato"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_CLI_RAGSOCFR 50 29
|
STRING FLD_CLI_RAGSOCFR 50 29
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 9 ""
|
PROMPT 34 9 ""
|
||||||
USE LF_CLIFO KEY 2
|
USE LF_CLIFO KEY 2
|
||||||
INPUT TIPOCF "C"
|
INPUT TIPOCF "C"
|
||||||
INPUT RAGSOC FLD_CLI_RAGSOCFR
|
INPUT RAGSOC FLD_CLI_RAGSOCFR
|
||||||
DISPLAY "Ragione sociale@50" RAGSOC
|
DISPLAY "Ragione sociale@50" RAGSOC
|
||||||
DISPLAY "Codice" CODCF
|
DISPLAY "Codice" CODCF
|
||||||
DISPLAY "Codice Fiscale@16" COFI
|
DISPLAY "Codice Fiscale@16" COFI
|
||||||
OUTPUT FLD_CLI_RAGSOCFR RAGSOC
|
OUTPUT FLD_CLI_RAGSOCFR RAGSOC
|
||||||
OUTPUT F_TIPOAPERFR TIPOAPER
|
OUTPUT F_TIPOAPERFR TIPOAPER
|
||||||
GROUP 1 4
|
GROUP 1 4
|
||||||
HELP "Ragione sociale di inizio stampa: vuoto = inizio archivio"
|
HELP "Ragione sociale di inizio stampa: vuoto = inizio archivio"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_CLI_RAGSOCTO 50 29
|
STRING FLD_CLI_RAGSOCTO 50 29
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 11 ""
|
PROMPT 34 11 ""
|
||||||
COPY USE FLD_CLI_RAGSOCFR
|
COPY USE FLD_CLI_RAGSOCFR
|
||||||
INPUT TIPOCF "C"
|
INPUT TIPOCF "C"
|
||||||
INPUT RAGSOC FLD_CLI_RAGSOCTO
|
INPUT RAGSOC FLD_CLI_RAGSOCTO
|
||||||
COPY DISPLAY FLD_CLI_RAGSOCFR
|
COPY DISPLAY FLD_CLI_RAGSOCFR
|
||||||
OUTPUT FLD_CLI_RAGSOCTO RAGSOC
|
OUTPUT FLD_CLI_RAGSOCTO RAGSOC
|
||||||
OUTPUT F_TIPOAPERTO TIPOAPER
|
OUTPUT F_TIPOAPERTO TIPOAPER
|
||||||
GROUP 1 4
|
GROUP 1 4
|
||||||
HELP "Ragione sociale di fine stampa: vuoto = fine archivio"
|
HELP "Ragione sociale di fine stampa: vuoto = fine archivio"
|
||||||
STR_EXPR {(#THIS_FIELD == "") || (#THIS_FIELD >= #FLD_CLI_RAGSOCFR)}
|
STR_EXPR {(#THIS_FIELD == "") || (#THIS_FIELD >= #FLD_CLI_RAGSOCFR)}
|
||||||
WARNING "Limite superiore errato"
|
WARNING "Limite superiore errato"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_FOR_CODFR 5
|
STRING FLD_FOR_CODFR 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 6 ""
|
PROMPT 34 6 ""
|
||||||
COPY USE FLD_CLI_CODFR
|
COPY USE FLD_CLI_CODFR
|
||||||
INPUT TIPOCF "F"
|
INPUT TIPOCF "F"
|
||||||
INPUT CODCF FLD_FOR_CODFR
|
INPUT CODCF FLD_FOR_CODFR
|
||||||
COPY DISPLAY FLD_CLI_CODFR
|
COPY DISPLAY FLD_CLI_CODFR
|
||||||
OUTPUT FLD_FOR_CODFR CODCF
|
OUTPUT FLD_FOR_CODFR CODCF
|
||||||
GROUP 2 3
|
GROUP 2 3
|
||||||
HELP "Codice C/F di inizio stampa: vuoto = inizio archivio"
|
HELP "Codice C/F di inizio stampa: vuoto = inizio archivio"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_FOR_CODTO 5
|
STRING FLD_FOR_CODTO 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 48 6 ""
|
PROMPT 48 6 ""
|
||||||
COPY USE FLD_FOR_CODFR
|
COPY USE FLD_FOR_CODFR
|
||||||
INPUT TIPOCF "F"
|
INPUT TIPOCF "F"
|
||||||
INPUT CODCF FLD_FOR_CODTO
|
INPUT CODCF FLD_FOR_CODTO
|
||||||
COPY DISPLAY FLD_CLI_CODFR
|
COPY DISPLAY FLD_CLI_CODFR
|
||||||
OUTPUT FLD_FOR_CODTO CODCF
|
OUTPUT FLD_FOR_CODTO CODCF
|
||||||
GROUP 2 3
|
GROUP 2 3
|
||||||
HELP "Codice C/F di fine stampa: vuoto = fine archivio"
|
HELP "Codice C/F di fine stampa: vuoto = fine archivio"
|
||||||
NUM_EXPR {(#THIS_FIELD == 0) || (#THIS_FIELD >= #FLD_FOR_CODFR)}
|
NUM_EXPR {(#THIS_FIELD == 0) || (#THIS_FIELD >= #FLD_FOR_CODFR)}
|
||||||
WARNING "Limite superiore errato"
|
WARNING "Limite superiore errato"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_FOR_RAGSOCFR 50 29
|
STRING FLD_FOR_RAGSOCFR 50 29
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 9 ""
|
PROMPT 34 9 ""
|
||||||
USE LF_CLIFO KEY 2
|
USE LF_CLIFO KEY 2
|
||||||
INPUT TIPOCF "F"
|
INPUT TIPOCF "F"
|
||||||
INPUT RAGSOC FLD_FOR_RAGSOCFR
|
INPUT RAGSOC FLD_FOR_RAGSOCFR
|
||||||
COPY DISPLAY FLD_CLI_RAGSOCFR
|
COPY DISPLAY FLD_CLI_RAGSOCFR
|
||||||
OUTPUT FLD_FOR_RAGSOCFR RAGSOC
|
OUTPUT FLD_FOR_RAGSOCFR RAGSOC
|
||||||
OUTPUT F_TIPOAPERFR TIPOAPER
|
OUTPUT F_TIPOAPERFR TIPOAPER
|
||||||
GROUP 2 4
|
GROUP 2 4
|
||||||
HELP "Ragione sociale di inizio stampa: vuoto = inizio archivio"
|
HELP "Ragione sociale di inizio stampa: vuoto = inizio archivio"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_FOR_RAGSOCTO 50 29
|
STRING FLD_FOR_RAGSOCTO 50 29
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 11 ""
|
PROMPT 34 11 ""
|
||||||
COPY USE FLD_FOR_RAGSOCFR
|
COPY USE FLD_FOR_RAGSOCFR
|
||||||
INPUT TIPOCF "F"
|
INPUT TIPOCF "F"
|
||||||
INPUT RAGSOC FLD_FOR_RAGSOCTO
|
INPUT RAGSOC FLD_FOR_RAGSOCTO
|
||||||
COPY DISPLAY FLD_CLI_RAGSOCFR
|
COPY DISPLAY FLD_CLI_RAGSOCFR
|
||||||
OUTPUT FLD_FOR_RAGSOCTO RAGSOC
|
OUTPUT FLD_FOR_RAGSOCTO RAGSOC
|
||||||
OUTPUT F_TIPOAPERTO TIPOAPER
|
OUTPUT F_TIPOAPERTO TIPOAPER
|
||||||
GROUP 2 4
|
GROUP 2 4
|
||||||
HELP "Ragione sociale di fine stampa: vuoto = fine archivio"
|
HELP "Ragione sociale di fine stampa: vuoto = fine archivio"
|
||||||
STR_EXPR {(#THIS_FIELD == "") || (#THIS_FIELD >= #FLD_FOR_RAGSOCFR)}
|
STR_EXPR {(#THIS_FIELD == "") || (#THIS_FIELD >= #FLD_FOR_RAGSOCFR)}
|
||||||
WARNING "Limite superiore errato"
|
WARNING "Limite superiore errato"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_TIPOAPERFR 1
|
STRING F_TIPOAPERFR 1
|
||||||
@ -196,51 +196,51 @@ END
|
|||||||
|
|
||||||
BOOLEAN CHK_CG12_MOVIM
|
BOOLEAN CHK_CG12_MOVIM
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 13 "Solo movimentati"
|
PROMPT 4 13 "Solo movimentati"
|
||||||
HELP "Indicare se stampare solo inclusi archivio movimenti"
|
HELP "Indicare se stampare solo inclusi archivio movimenti"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST LST_CG12_INTERLINE 1
|
LIST LST_CG12_INTERLINE 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 14 "Righe interlinea "
|
PROMPT 4 14 "Righe interlinea "
|
||||||
ITEM "0|0"
|
ITEM "0|0"
|
||||||
ITEM "1|1"
|
ITEM "1|1"
|
||||||
ITEM "2|2"
|
ITEM "2|2"
|
||||||
HELP "Indicare il numero di righe di interlinea tra i nominativi"
|
HELP "Indicare il numero di righe di interlinea tra i nominativi"
|
||||||
END
|
END
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 51 4
|
GROUPBOX DLG_NULL 51 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 16 "Stampa"
|
PROMPT 2 16 "Stampa"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON BUT_CG12_ELENCO 9 2
|
BUTTON BUT_CG12_ELENCO 9 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 17 "~Elenco"
|
PROMPT 4 17 "~Elenco"
|
||||||
MESSAGE EXIT,BUT_CG12_ELENCO
|
MESSAGE EXIT,BUT_CG12_ELENCO
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON BUT_CG12_RUBRICHE 9 2
|
BUTTON BUT_CG12_RUBRICHE 9 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 16 17 "~Rubriche"
|
PROMPT 16 17 "~Rubriche"
|
||||||
MESSAGE EXIT,BUT_CG12_RUBRICHE
|
MESSAGE EXIT,BUT_CG12_RUBRICHE
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON BUT_CG12_ETICHETTE 9 2
|
BUTTON BUT_CG12_ETICHETTE 9 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 28 17 "E~tichette"
|
PROMPT 28 17 "E~tichette"
|
||||||
MESSAGE EXIT,BUT_CG12_ETICHETTE
|
MESSAGE EXIT,BUT_CG12_ETICHETTE
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON BUT_CG12_VENDITE 9 2
|
BUTTON BUT_CG12_VENDITE 9 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 17 "~Vendite"
|
PROMPT 40 17 "~Vendite"
|
||||||
MESSAGE EXIT,BUT_CG12_VENDITE
|
MESSAGE EXIT,BUT_CG12_VENDITE
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 9 2
|
BUTTON DLG_QUIT 9 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 55 17 ""
|
PROMPT 55 17 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
Loading…
x
Reference in New Issue
Block a user