229fcb8bb2
disabilitato cg3500 in attesa di aggiornamento per saldi git-svn-id: svn://10.65.10.50/trunk@2883 c028cbd2-c16b-5b4b-a496-9718f37d4682
159 lines
3.4 KiB
Plaintext
Executable File
159 lines
3.4 KiB
Plaintext
Executable File
//
|
|
// cg3300a.uml
|
|
//
|
|
|
|
#include "cg3300a.h"
|
|
|
|
PAGE "" -1 -1 65 19
|
|
|
|
DATE F_DATA_STAMPA
|
|
BEGIN
|
|
PROMPT 2 1 "Data "
|
|
HELP "Data in cui viene fatta la stampa"
|
|
FLAGS "A"
|
|
END
|
|
|
|
NUMBER F_ANNO_STAMPA 4
|
|
BEGIN
|
|
PROMPT 30 1 "Anno di stampa "
|
|
HELP "Anno di cui stampare gli allegati"
|
|
FLAGS "A"
|
|
END
|
|
|
|
RADIOBUTTON F_MODO_STAMPA 25
|
|
BEGIN
|
|
PROMPT 2 3 "Destinazione"
|
|
HELP "Indicare funzione della stampa"
|
|
ITEM "1|Stampa su modulo"
|
|
MESSAGE DISABLE,F_TRONC|DISABLE,F_ARROT|HIDE,F_STAMPA_TUTTI
|
|
MESSAGE SHOW,F_TIPO_STAMPA
|
|
// MESSAGE HIDE,F_TIPO_STAMPA2|SHOW,F_TIPO_STAMPA
|
|
ITEM "2|Stampa di controllo"
|
|
MESSAGE ENABLE,F_TRONC|ENABLE,F_ARROT|SHOW,F_STAMPA_TUTTI|"X",F_STAMPA_TUTTI
|
|
MESSAGE SHOW,F_TIPO_STAMPA
|
|
// MESSAGE HIDE,F_TIPO_STAMPA2|SHOW,F_TIPO_STAMPA
|
|
// ITEM "3|Stampa su disco"
|
|
// MESSAGE DISABLE,F_TRONC|DISABLE,F_ARROT|HIDE,F_STAMPA_TUTTI
|
|
// MESSAGE HIDE,F_TIPO_STAMPA|SHOW,F_TIPO_STAMPA2
|
|
END
|
|
|
|
RADIOBUTTON F_TIPO_STAMPA 28
|
|
BEGIN
|
|
PROMPT 31 3 "Tipo di stampa "
|
|
HELP "Indicare il tipo di stampa desiderata"
|
|
ITEM "1|Clienti"
|
|
MESSAGE SHOW,F_ANNO_PREC
|
|
ITEM "2|Fornitori"
|
|
MESSAGE SHOW,F_ANNO_PREC
|
|
ITEM "3|Modulo 101 (clienti)"
|
|
MESSAGE HIDE,F_ANNO_PREC
|
|
ITEM "4|Modulo 102 (fornitori)"
|
|
MESSAGE HIDE,F_ANNO_PREC
|
|
END
|
|
|
|
//RADIOBUTTON F_TIPO_STAMPA2 28
|
|
//BEGIN
|
|
// PROMPT 31 3 "Tipo di stampa "
|
|
// HELP "Scegliere il tipo di stampa desiderata"
|
|
// ITEM "1|Clienti"
|
|
// MESSAGE SHOW,F_ANNO_PREC
|
|
// ITEM "2|Fornitori"
|
|
// MESSAGE SHOW,F_ANNO_PREC
|
|
// ITEM "3|Entrambi"
|
|
// MESSAGE HIDE,F_ANNO_PREC
|
|
// FLAGS "H"
|
|
//END
|
|
|
|
BOOLEAN F_ORDINA_DESC
|
|
BEGIN
|
|
PROMPT 2 8 "Ordina per descrizione"
|
|
HELP "Ordina la stampa per descrizione, altrimenti per codice"
|
|
END
|
|
|
|
BOOLEAN F_STAMPA_TUTTI
|
|
BEGIN
|
|
PROMPT 2 9 "Stampa tutti i clienti/fornitori movimentati"
|
|
HELP "Se disabilitato stampa solo i clienti/fornitori che vanno in allegato"
|
|
FLAGS "H"
|
|
END
|
|
|
|
BOOLEAN F_TRONC
|
|
BEGIN
|
|
PROMPT 2 10 "Importi non troncati "
|
|
HELP "Indicare se eliminare gli zeri delle migliaia"
|
|
END
|
|
|
|
BOOLEAN F_ARROT
|
|
BEGIN
|
|
PROMPT 2 11 "Importi non arrotondati "
|
|
HELP "Indicare se gli importi devono essere arrotondati"
|
|
END
|
|
|
|
BOOLEAN F_ANNO_PREC
|
|
BEGIN
|
|
PROMPT 31 10 "Estratto anno precedente "
|
|
HELP "Indicare se stampare solo il saldo dell'anno precedente"
|
|
END
|
|
|
|
BOOLEAN F_ATTIVITA
|
|
BEGIN
|
|
PROMPT 31 11 "Elenco distinto per attivita'"
|
|
HELP "Indicare se stampare un elenco diviso per attivita'"
|
|
END
|
|
|
|
STRING F_RICERCA_ATT 5
|
|
BEGIN
|
|
PROMPT 1 13 "Seleziona codice di attivita' "
|
|
HELP "Stampa solo le ditte che hanno questa attivita'"
|
|
USE %AIS
|
|
INPUT CODTAB F_RICERCA_ATT
|
|
DISPLAY "Codice" CODTAB
|
|
DISPLAY "Attivita'@40" S0
|
|
OUTPUT F_RICERCA_ATT CODTAB
|
|
END
|
|
|
|
BOOLEAN F_RICALCOLA
|
|
BEGIN
|
|
PROMPT 46 13 "Ricalcola"
|
|
HELP "Indicare se ricalcolare ogni ditta prima di stampare"
|
|
END
|
|
|
|
STRING F_DA_DITTA 5
|
|
BEGIN
|
|
PROMPT 1 14 "Da ditta "
|
|
HELP "Ditta di partenza della stampa: vuoto = inizio archivio"
|
|
FLAGS "R"
|
|
USE LF_NDITTE KEY 1
|
|
INPUT CODDITTA F_DA_DITTA
|
|
DISPLAY "Codice" CODDITTA
|
|
DISPLAY "Ragione sociale @50" RAGSOC
|
|
OUTPUT F_DA_DITTA CODDITTA
|
|
END
|
|
|
|
STRING F_A_DITTA 5
|
|
BEGIN
|
|
PROMPT 22 14 "A ditta "
|
|
HELP "Ultima ditta da stampare: vuoto = fine archivio"
|
|
FLAGS "R"
|
|
USE LF_NDITTE KEY 1
|
|
INPUT CODDITTA F_A_DITTA
|
|
DISPLAY "Codice" CODDITTA
|
|
DISPLAY "Ragione sociale @50" RAGSOC
|
|
OUTPUT F_A_DITTA CODDITTA
|
|
VALIDATE F_A_DITTA>=F_DA_DITTA
|
|
END
|
|
|
|
BUTTON DLG_OK 9 2
|
|
BEGIN
|
|
PROMPT -12 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_CANCEL 9 2
|
|
BEGIN
|
|
PROMPT -22 -1 ""
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK
|