70 lines
1.1 KiB
Plaintext
70 lines
1.1 KiB
Plaintext
|
#include "771231a.h"
|
||
|
|
TOOLBAR "" 0 20 0 2
|
||
|
|
#include "toolb_77.h"
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
PAGE "Modello 770 - Quadro F-1" -1 -1 78 18
|
||
|
|
|
||
|
|
GROUPBOX DLG_NULL 78 3
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 0 ""
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMBER F_CODDITTA 5
|
||
|
|
BEGIN
|
||
|
|
PROMPT 3 1 "Ditta "
|
||
|
|
USE LF_NDITTE KEY 1
|
||
|
|
INPUT CODDITTA F_CODDITTA
|
||
|
|
OUTPUT F_RAGDITTA RAGSOC
|
||
|
|
FIELD LF_QUAF1->CODDITTA
|
||
|
|
KEY 1
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
FLAGS "GR"
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING F_RAGDITTA 50
|
||
|
|
BEGIN
|
||
|
|
PROMPT 17 1 "Ragione "
|
||
|
|
FLAGS "D"
|
||
|
|
END
|
||
|
|
|
||
|
|
GROUPBOX DLG_NULL 0 4
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 3 "@bProspetto A"
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMBER F_A1 15
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 4 "Ammontare complessivo delle plusvalenze imponibili "
|
||
|
|
PICTURE "."
|
||
|
|
FIELD LF_QUAF1->F1_A1
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMBER F_A2 15
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 5 "Ritenuta operata "
|
||
|
|
PICTURE "."
|
||
|
|
FIELD LF_QUAF1->F1_A2
|
||
|
|
END
|
||
|
|
|
||
|
|
TEXT DLG_NULL
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 7 "@bProspetto B"
|
||
|
|
END
|
||
|
|
|
||
|
|
SPREADSHEET F_B 78 8
|
||
|
|
BEGIN
|
||
|
|
PROMPT 0 8 ""
|
||
|
|
ITEM "Causale"
|
||
|
|
ITEM "Descrizione@50"
|
||
|
|
ITEM "Aliquota"
|
||
|
|
ITEM "Sogg. a rit.@15"
|
||
|
|
ITEM "Ritenuta@15"
|
||
|
|
END
|
||
|
|
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
ENDMASK
|
||
|
|
|
||
|
|
#include "771232b.uml" // mask prospetto B
|