95a8cd1f23
Files correlati : 777.exe 77qla.frm 77qst.frm Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/trunk@20403 c028cbd2-c16b-5b4b-a496-9718f37d4682
140 lines
2.0 KiB
Plaintext
Executable File
140 lines
2.0 KiB
Plaintext
Executable File
USE 42
|
|
END
|
|
|
|
DESCRIPTION
|
|
BEGIN
|
|
41->* "Quadro ST 770"
|
|
END
|
|
|
|
GENERAL
|
|
BEGIN
|
|
OFFSET 0 0
|
|
FONT "Roman 17cpi"
|
|
SIZE 12
|
|
CA "X"
|
|
IN 3 3
|
|
FI 130
|
|
END
|
|
|
|
SECTION BODY ODD 2
|
|
|
|
NUMERO 1
|
|
BEGIN
|
|
KEY "PERIODO DI RIFERIMENTO"
|
|
PROMPT 9 2 ""
|
|
MESSAGE _PERIODO_RIF
|
|
SPECIAL STRINGA TRASFER "ST002001" "NP"
|
|
END
|
|
|
|
VALUTA 2
|
|
BEGIN
|
|
KEY "RITENUTE OPERATE"
|
|
PROMPT 79 2 ""
|
|
FIELD QLRITEFF
|
|
SPECIAL STRINGA TRASFER "ST002002" "NP"
|
|
END
|
|
|
|
VALUTA 3
|
|
BEGIN
|
|
KEY "CREDITI RECUPERATI"
|
|
PROMPT 79 2 ""
|
|
FIELD QLRITCOMP
|
|
SPECIAL STRINGA TRASFER "ST002003" "NP"
|
|
END
|
|
|
|
VALUTA 4
|
|
BEGIN
|
|
KEY "IMPORTI A SCOMPUTO"
|
|
PROMPT 79 2 ""
|
|
SPECIAL STRINGA TRASFER "ST002004" "NP"
|
|
END
|
|
|
|
VALUTA 5
|
|
BEGIN
|
|
KEY "VERSAMENTI IN ECCESSO"
|
|
PROMPT 79 2 ""
|
|
FIELD QLRITVEREC
|
|
SPECIAL STRINGA TRASFER "ST002005" "NP"
|
|
END
|
|
|
|
VALUTA 6
|
|
BEGIN
|
|
KEY "CREDITI D'IMPOSTA UTILIZZATI A SCOMPUTO"
|
|
PROMPT 79 2 ""
|
|
SPECIAL STRINGA TRASFER "ST002004" "NP"
|
|
END
|
|
|
|
VALUTA 7
|
|
BEGIN
|
|
KEY "IMPORTO VERSATO"
|
|
PROMPT 79 2 ""
|
|
MESSAGE _NUMEXPR,#2-#3-#4-#5-#6
|
|
SPECIAL STRINGA TRASFER "ST002007" "NP"
|
|
END
|
|
|
|
VALUTA 8
|
|
BEGIN
|
|
KEY "INTERESSI VERSATI"
|
|
PROMPT 79 2 ""
|
|
FIELD QLINTERESS
|
|
SPECIAL STRINGA TRASFER "ST002008" "NP"
|
|
END
|
|
|
|
NUMERO 9
|
|
BEGIN
|
|
KEY "RAVVEDIMENTO"
|
|
SPECIAL STRINGA TRASFER "ST002009" "CB"
|
|
END
|
|
|
|
STRINGA 10
|
|
BEGIN
|
|
KEY "NOTE"
|
|
PROMPT 79 2 ""
|
|
FIELD QLNOTE
|
|
SPECIAL STRINGA TRASFER "ST002010" "AN"
|
|
END
|
|
|
|
STRINGA 11
|
|
BEGIN
|
|
KEY "CODICE TRIBUTO"
|
|
PROMPT 79 2 ""
|
|
FIELD QLCT
|
|
SPECIAL STRINGA TRASFER "ST002011" "AN"
|
|
END
|
|
|
|
LISTA 100
|
|
BEGIN
|
|
KEY "Tesoreria"
|
|
PROMPT 79 2 ""
|
|
FIELD QLLV
|
|
ITEM " | " MESSAGE " ",10
|
|
ITEM "C| " MESSAGE " ",10
|
|
ITEM "T|X" MESSAGE "X",10
|
|
END
|
|
|
|
NUMERO 12
|
|
BEGIN
|
|
KEY "Tesoreria"
|
|
PROMPT 79 2 ""
|
|
SPECIAL STRINGA TRASFER "ST002012" "CB"
|
|
END
|
|
|
|
NUMERO 13
|
|
BEGIN
|
|
KEY "Regione"
|
|
PROMPT 79 2 ""
|
|
FIELD QLREGIONE
|
|
END
|
|
|
|
STRINGA 14
|
|
BEGIN
|
|
KEY "Data versamento"
|
|
PROMPT 79 2 ""
|
|
SPECIAL STRINGA TRASFER "ST002014" "DT"
|
|
FIELD QLDV
|
|
END
|
|
|
|
END
|
|
|
|
END
|