#include "cm1100a.h"

TOOLBAR "" 0 -2 0 2

BUTTON DLG_PRINT 10 2
BEGIN
 PROMPT -12 -1 "~Stampa"
 MESSAGE EXIT,K_ENTER
END

BUTTON DLG_QUIT 10 2
BEGIN
 PROMPT -22 -1 ""
END

ENDPAGE

PAGE "Stampa pagato per commessa" -1 -1 50 10

GROUPBOX DLG_NULL 78 6
BEGIN
  PROMPT 1 1 "@bSelezione periodo"
END

RADIOBUTTON F_TIPODATA 76
BEGIN
  PROMPT 2 2 "Tipologia di data"
  ITEM "0|Registrazione"
  ITEM "1|Documento"
  ITEM "2|Pagamento"
  FLAGS "Z"
END

DATE F_DATAINI
BEGIN
  PROMPT 2 5 "Dalla data "
END

DATE F_DATAFIN
BEGIN
  PROMPT 25 5 "Alla data  "
  VALIDATE DATE_CMP_FUNC >= F_DATAINI
  WARNING "La data finale deve essere successiva a quella iniziale"
END

GROUPBOX DLG_NULL 76 4
BEGIN
  PROMPT 1 8 "@bSelezione commesse"
END

STRING F_DACDC 20
BEGIN
  PROMPT 2 9 "Da CDC/Commessa   "
  FLAGS "UZ"
  USE CMS
  INPUT CODTAB F_DACDC
  DISPLAY "Codice@20" CODTAB
  DISPLAY "Descrizione@70" S0
  OUTPUT F_DACDC CODTAB
  CHECKTYPE SEARCH
END

STRING F_ACDC 20
BEGIN
  PROMPT 2 10 "A CDC/Commessa    "
  FLAGS "UZ"
  COPY USE F_DACDC
  INPUT CODTAB F_ACDC
  COPY DISPLAY F_DACDC
  OUTPUT F_ACDC CODTAB
  CHECKTYPE SEARCH
END

ENDPAGE

ENDMASK