#include "77g1a.h"
TOOLBAR "" 0 20 0 2
#include "77toolb.h"
ENDPAGE

PAGE "Modello 770 - Quadro G-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_QUAG1->CODDITTA
  KEY 1
  CHECKTYPE REQUIRED             
  FLAGS "GR"
  MESSAGE COPY,1@
END

STRING F_RAGDITTA 50
BEGIN
  PROMPT 17 1 "Ragione "
  FLAGS "D"      
  MESSAGE COPY,2@
END
                     
TEXT DLG_NULL
BEGIN        
  PROMPT 1 3 "@bPROSPETTO DEGLI UTILI E DELLE RITENUTE     "
END

SPREADSHEET F_PI 0 13
BEGIN
  PROMPT 0 4 ""
  ITEM "Anni@21"
  ITEM "Utili corr. nel 1995"
  ITEM "Importo"
  ITEM "Aliquota"
  ITEM "Rit.acconto"
  ITEM "Rit.imposta"
  ITEM "Utili non assog.a ritenuta"
END

ENDPAGE

ENDMASK

#include "77g1pa.uml"