#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
