#include "771295.h"

TOOLBAR "" 0 0 0 2
#include <relapbar.h>
ENDPAGE

PAGE "Dettaglio quadro H" -1 -1 78 18
                  
GROUPBOX DLG_NULL 78 3
BEGIN
  PROMPT 1 0 ""
END
                  
NUMBER F_CODDITTA 5
BEGIN
  PROMPT 3 1 "Ditta  "
  FLAGS "FRDP"
  USE LF_NDITTE KEY 1
  FIELD LF_DETH->CODDITTA
  CHECKTYPE REQUIRED
  INPUT CODDITTA F_CODDITTA
  DISPLAY "Codice" CODDITTA
  DISPLAY "Ragione sociale @50" RAGSOC
  OUTPUT F_RAGSOC RAGSOC  
  KEY 1
END

STRING F_RAGSOC 50
BEGIN
  PROMPT 17 1 "Ragione "
  FLAGS "DP"
END                                

NUMBER F_ANNO 4
BEGIN
  PROMPT 52 3 "Anno dichiarazione "
  FIELD LF_DETH->ANNO
  KEY 1
  CHECKTYPE REQUIRED  
  FLAGS "RDP"
END
         
TEXT DLG_NULL
BEGIN
  PROMPT 2 7 "Ente previdenziale assistenza percettore" 
END
         
NUMBER F_ENTE 2
BEGIN
  PROMPT 2 8 ""
  CHECKTYPE REQUIRED
  FIELD LF_DETH->ENTE
  FLAGS "GDP"
  KEY 1
END

STRING F_DESCRENTE 60
BEGIN
  PROMPT 7 8 ""
  FLAGS "DP"
END
            
DATE F_DATAVERS
BEGIN
  PROMPT 2 10 "Data versamento       "
  USE LF_DETH
  CHECKTYPE REQUIRED
  INPUT CODDITTA F_CODDITTA SELECT
  INPUT ANNO F_ANNO SELECT
  INPUT ENTE F_ENTE SELECT
  INPUT DATAVERS F_DATAVERS 
  DISPLAY "Ditta" CODDITTA
  DISPLAY "Anno" ANNO
  DISPLAY "Ente@33" ENTE
  DISPLAY "Data versamento" DATAVERS
  DISPLAY "Numero versamento" NUMVERS
  OUTPUT F_ANNO ANNO
  OUTPUT F_ENTE ENTE
  OUTPUT F_DATAVERS DATAVERS
  OUTPUT F_NUMVERS NUMVERS
  FIELD LF_DETH->DATAVERS
  KEY 1
END

NUMBER F_NUMVERS 5
BEGIN
  PROMPT 2 11 "Numero versamento     "
  COPY USE F_DATAVERS
  CHECKTYPE REQUIRED
  INPUT CODDITTA F_CODDITTA SELECT
  INPUT ANNO F_ANNO SELECT
  INPUT ENTE F_ENTE SELECT
  INPUT DATAVERS F_DATAVERS 
  INPUT NUMVERS F_NUMVERS
  COPY DISPLAY F_DATAVERS
  COPY OUTPUT F_DATAVERS
  FIELD LF_DETH->NUMVERS           
  FLAGS "R"
  KEY 1
END

NUMBER F_NREGINOTA 7
BEGIN
  PROMPT 2 12 "N.ro registr. I nota             "
  FLAGS "R"
  FIELD LF_DETH->NREGINOTA
END

NUMBER F_IMPVERS 15
BEGIN
  PROMPT 2 13 "Importo versato                  "
  PICTURE "."
  FLAGS "R"
  FIELD LF_DETH->IMPVERS
END
                        
TEXT DLG_NULL
BEGIN
  PROMPT 2 14 "Contributi obbligatori"
END

NUMBER F_CONTRDAT 15
BEGIN
  PROMPT 2 15 "a carico del datore di lavoro    "
  FIELD LF_DETH->CONTRDAT
  PICTURE "."
  FLAGS "R"
END

TEXT DLG_NULL
BEGIN
  PROMPT 2 16 "Contributi obbligatori a"
END

NUMBER F_CONTRLAV 15
BEGIN
  PROMPT 2 17 "carico del lavoratore dipendente "
  FIELD LF_DETH->CONTRLAV
  PICTURE "."
  FLAGS "R"
END

ENDPAGE

ENDMASK