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:
villa 1996-05-27 10:44:23 +00:00
parent c711835274
commit ec6bf26b5c
2 changed files with 103 additions and 103 deletions

View File

@ -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:

View File

@ -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