ec5cd6f14d
Files correlati : Ricompilazione Demo : [ ] Commento : Modifiche al pacchetto gestione 770 (ora denominato Gestione Percipienti), in modo da avere diciture corrette per quanto riguarda i programmi di stampa e gestione quadri, ora chiamati RIEPILOGHI. Commentato l'uso dei quadri che non servivano piu', modificati opportunamente i menus e programmi per gestione parametri ed azzeramenti git-svn-id: svn://10.65.10.50/trunk@7030 c028cbd2-c16b-5b4b-a496-9718f37d4682
202 lines
4.6 KiB
Plaintext
Executable File
202 lines
4.6 KiB
Plaintext
Executable File
USE 61
|
|
JOIN %CA7 TO 61 ALIAS 14 INTO CODTAB=CODCAUS
|
|
JOIN 9 INTO CODDITTA=CODDITTA
|
|
JOIN 6 TO 9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
|
JOIN 6 TO 61 ALIAS 216 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
|
JOIN 8 TO 216@ ALIAS 218 INTO CODANAGR=CODANAGR
|
|
JOIN 13 TO 218@ ALIAS 313 INTO STATO=="" COM==COMNASC
|
|
JOIN 13 TO 216@ ALIAS 413 INTO STATO==STATORES COM==COMRES
|
|
END
|
|
|
|
DESCRIPTION
|
|
BEGIN
|
|
61->* "Riepilogo SC"
|
|
9->* "Ditte"
|
|
6->* "Anagrafica persone fisiche e giuridiche"
|
|
8->* "Anagrafica persone fisiche"
|
|
216@->* "Anagrafica persone fisiche e giuridiche"
|
|
218@->* "Anagrafica persone fisiche"
|
|
313@->* "Comuni"
|
|
413@->* "Comuni"
|
|
END
|
|
|
|
GENERAL
|
|
BEGIN
|
|
OFFSET 0 0
|
|
END
|
|
|
|
SECTION HEADER ODD 6
|
|
|
|
STRINGA 1 40 1
|
|
BEGIN
|
|
KEY "nome ditta"
|
|
PROMPT 1 1 "Ditta: "
|
|
FIELD 9->RAGSOC
|
|
END
|
|
|
|
STRINGA 2 10
|
|
BEGIN
|
|
KEY "Data"
|
|
PROMPT 106 1 "Data "
|
|
MESSAGE _TODAY
|
|
END
|
|
|
|
NUMERO 3 7
|
|
BEGIN
|
|
KEY "Nr. pagina"
|
|
PROMPT 122 1 "Pagina "
|
|
MESSAGE _PAGENO
|
|
END
|
|
|
|
NUMERO 4 40
|
|
BEGIN
|
|
KEY "Intestazione stampa"
|
|
PROMPT 55 2 "Stampa riepilogo SC"
|
|
END
|
|
|
|
END
|
|
|
|
SECTION BODY ODD 2 COLUMNWISE
|
|
|
|
STRING 1 50
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "Ragione Sociale" "Ragione Sociale"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "Ragione Sociale"
|
|
PROMPT 1 1 ""
|
|
FIELD 216@->RAGSOC
|
|
END
|
|
|
|
STRINGA 2 5
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "Caus." "Caus."
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "CAUSALE riepilogo SC"
|
|
PROMPT 2 1 ""
|
|
FIELD CAUSALE
|
|
END
|
|
|
|
STRING 3 5
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "Tass." "Tass."
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "FLAG TASSAZIONE SEPARATA"
|
|
PROMPT 3 1 ""
|
|
FIELD TASSAZIONE
|
|
END
|
|
|
|
NUMBER 4 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "@CAmm. lordo" "Amm. lordo"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "AMMONTARE LORDO CORRISPOSTO"
|
|
PROMPT 4 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD AMMLORDO
|
|
END
|
|
|
|
NUMBER 5 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "@CContributi" "Contributi"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "CONTRIBUTI OBBLIGATORI"
|
|
PROMPT 5 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD CONTROBB
|
|
END
|
|
|
|
NUMBER 6 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "Somme non sogg" "Somme non sogg"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "SOMME NON SOGGETTE A RITENUTA"
|
|
PROMPT 6 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD SOMNONSOGG
|
|
END
|
|
|
|
NUMBER 7 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "@CImponibile" "Imponibile"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "IMPONIBILE"
|
|
PROMPT 7 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD IMPONIBILE
|
|
END
|
|
|
|
NUMBER 8 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "@CImposta" "Imposta"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "IMPOSTA"
|
|
PROMPT 8 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD IMPOSTA
|
|
END
|
|
|
|
NUMBER 9 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "@CDetr. fam." "Detr. fam."
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "DETRAZIONI PER CARICHI DI FAMIGLIA"
|
|
PROMPT 9 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD DETCARFAM
|
|
END
|
|
|
|
NUMBER 10 6
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "Gg.det" "Gg.det"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "NUMERO GIORNI DETRAZIONI PER LAVORO DIPENDENTE"
|
|
PROMPT 10 1 ""
|
|
FIELD GGLAVDIP
|
|
END
|
|
|
|
NUMBER 11 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "@CDetr. lav." "Detr. lav."
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "DETRAZIONI PER LAVORO DIPENDENTE"
|
|
PROMPT 11 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD DETLAVDIP
|
|
END
|
|
|
|
NUMBER 12 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "@CTot. detr." "Tot. detr."
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "TOTALE DETRAZIONI"
|
|
PROMPT 12 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD TOTDET
|
|
END
|
|
|
|
NUMBER 13 14
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "Ritenute" "Ritenute"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "RITENUTE OPERATE"
|
|
PROMPT 13 1 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD RITENUTE
|
|
END
|
|
|
|
END
|
|
|