#include "lv2500a.h"

TOOLBAR "" 0 0 0 2
#include <elabar.h>

ENDPAGE

PAGE "Fatturazione" -1 -1 40 5

DATE F_DADATA
BEGIN
  PROMPT 2 1 "Fattura dal "
  FLAGS "H"
END

DATE F_ADATA
BEGIN
  PROMPT 45 1 "al "
  FLAGS "H"
END

DATE F_DATAFAT
BEGIN
  PROMPT 2 2 "Data di fatturazione "
  FLAGS "A"
  CHECKTYPE REQUIRED
END

STRING F_CODCATC 2
BEGIN
  PROMPT 2 3 "Codice Categoria economica   "
  FIELD LF_CFVEN->CODCATC
  USE CCO
  INPUT CODTAB F_CODCATC
  DISPLAY "Codice contabile" CODTAB
  DISPLAY "Descrizione@30" S0
  OUTPUT F_CODCATC CODTAB
  HELP "Codice categoria contabile del C/F"
  CHECKTYPE NORMAL
END

STRING F_CODZONA 2
BEGIN
  PROMPT 2 4 "Codice Zona     "
  FIELD LF_CFVEN->CODZONA
  GROUP 7
  USE ZON
  INPUT CODTAB F_CODZONA
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_CODZONA CODTAB
  HELP "Codice della zona dell'agente"
  CHECKTYPE NORMAL
END


STRING F_COD_ELAB 8
BEGIN
  PROMPT 2 5 "Codice      "
  FLAG "U"
  USE %ELD SELECT I0==2
  INPUT CODTAB F_COD_ELAB
  DISPLAY "Codice@8" CODTAB
  DISPLAY "Descrizione@50" S0
  DISPLAY "Numerazione" S5
  OUTPUT F_COD_ELAB CODTAB
  OUTPUT F_DESC_ELAB S0
  CHECKTYPE REQUIRED
END

STRING F_DESC_ELAB 50
BEGIN
  PROMPT 2 6 "Descrizione "
  USE %ELD KEY 2 SELECT I0==2
  INPUT S0 F_DESC_ELAB
  DISPLAY "Descrizione@50" S0
  DISPLAY "Codice@8" CODTAB
  DISPLAY "Numerazione" S5
  COPY OUTPUT F_COD_ELAB
  CHECKTYPE REQUIRED
END

RADIOBUTTON F_PERFAT 1 70
BEGIN
  PROMPT 2 7 "@bPeriodicità di fatturazione "
  ITEM "0|Giornaliera" 
  ITEM "1|Settimanale" 
  ITEM "2|Quindicinale" 
  ITEM "3|Mensile" 
END

ENDPAGE

ENDMASK