#include "ci1400a.h"

TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE

PAGE "Rilevazione ore per Commessa - CdC" -1 -1 0 0

GROUPBOX -1 78 5
BEGIN
  PROMPT 1 1 "@bFiltri su Commesse / CdC"
END

LISTBOX F_CMSOCDC 1 16
BEGIN
  PROMPT 2 2 "@bTipo   "
  ITEM "C|Commessa"
    MESSAGE HIDE,2@|SHOW,1@
  ITEM "S|Centro di Costo"
    MESSAGE HIDE,1@|SHOW,2@
  FLAGS "Z"
  FIELD #CMSOCDC
END

STRING F_DA_CODCMS 20
BEGIN  
  PROMPT 2 3 "Da commessa "
  USE LF_COMMESSE
  INPUT CODCMS F_DA_CODCMS
  DISPLAY "Codice@20" CODCMS
  DISPLAY "Descrizione@50" DESCRIZ
  OUTPUT F_DA_CODCMS CODCMS
  OUTPUT F_DA_DESCMS DESCRIZ
  CHECKTYPE NORMAL
  GROUP 1
END

STRING F_DA_DESCMS 50 37
BEGIN
  PROMPT 38 3 ""
  USE LF_COMMESSE KEY 2
  INPUT DESCRIZ F_DA_DESCMS
  DISPLAY "Descrizione@50" DESCRIZ
  DISPLAY "Codice@20" CODCMS
  COPY OUTPUT F_DA_CODCMS
  CHECKTYPE NORMAL
  GROUP 1
END

STRING F_A_CODCMS 20
BEGIN  
  PROMPT 2 4 "A commessa  "
  COPY USE F_DA_CODCMS
  INPUT CODCMS F_A_CODCMS
  DISPLAY "Codice@20" CODCMS
  DISPLAY "Descrizione@50" DESCRIZ
  OUTPUT F_A_CODCMS CODCMS
  OUTPUT F_A_DESCMS DESCRIZ
  CHECKTYPE NORMAL
  GROUP 1
END

STRING F_A_DESCMS 50 37
BEGIN
  PROMPT 38 4 ""
  COPY USE F_DA_DESCMS
  INPUT DESCRIZ F_A_DESCMS
  DISPLAY "Descrizione@50" DESCRIZ
  DISPLAY "Codice@20" CODCMS
  COPY OUTPUT F_A_CODCMS
  CHECKTYPE NORMAL
  GROUP 1
END

STRING F_DA_CODCDC 20
BEGIN  
  PROMPT 2 3 "Da CdC "
  USE LF_CDC
  INPUT CODCOSTO F_DA_CODCDC
  DISPLAY "Codice@20" CODCOSTO
  DISPLAY "Descrizione@50" DESCRIZ
  OUTPUT F_DA_CODCDC CODCOSTO
  OUTPUT F_DA_DESCDC DESCRIZ
  CHECKTYPE NORMAL
  GROUP 2
END

STRING F_DA_DESCDC 50 42
BEGIN
  PROMPT 32 3 ""
  USE LF_CDC KEY 2
  INPUT DESCRIZ F_DA_DESCDC
  DISPLAY "Descrizione@50" DESCRIZ
  DISPLAY "Codice@20" CODCOSTO
  COPY OUTPUT F_DA_CODCDC
  CHECKTYPE NORMAL
  GROUP 2
END

STRING F_A_CODCDC 20
BEGIN  
  PROMPT 2 4 "A CdC  "
  COPY USE F_DA_CODCDC
  INPUT CODCOSTO F_A_CODCDC
  DISPLAY "Codice@20" CODCOSTO
  DISPLAY "Descrizione@50" DESCRIZ
  OUTPUT F_A_CODCDC CODCOSTO
  OUTPUT F_A_DESCDC DESCRIZ
  CHECKTYPE NORMAL
  GROUP 2
END

STRING F_A_DESCDC 50 42
BEGIN
  PROMPT 32 4 ""
  COPY USE F_DA_DESCDC
  INPUT DESCRIZ F_A_DESCDC
  DISPLAY "Descrizione@50" DESCRIZ
  DISPLAY "Codice@20" CODCOSTO
  COPY OUTPUT F_A_CODCDC
  CHECKTYPE NORMAL
  GROUP 2
END

GROUPBOX -1 78 3
BEGIN
  PROMPT 1 6 "@bFiltri su anno / mese"
END

LISTBOX F_TIPOSTAMPA 10
BEGIN
  PROMPT 2 7 "Tipo di stampa "
  ITEM "M|Mensile"
    MESSAGE SHOW,F_MESE
  ITEM "A|Annuale"
    MESSAGE HIDE,F_MESE
  FLAGS "Z"
  FIELD #TIPOSTAMPA
END

NUMBER F_ANNO 4
BEGIN
  PROMPT 35 7 "Anno "
  CHECKTYPE REQUIRED
  FLAGS "A"
  FIELD #ANNO
END

LISTBOX F_MESE 10
BEGIN 
  PROMPT 50 7 "Mese   "
  FLAGS "M"
  FIELD #MESE
END

ENDPAGE

ENDMASK