campo-sirio/ps/pd0666100a.uml

#include "pd0666100a.h"

PAGE "Trasferimento a SAP per Medicasa" -1 -1 72 19

GROUPBOX DLG_NULL 71 4
BEGIN
  PROMPT 1 2 "@bEsportazione clenti / fornitori"
END

BOOLEAN F_CLIENTI
BEGIN
  PROMPT 2 3 "Clienti"
  MESSAGE FALSE DISABLE,F_CLIFILE
  MESSAGE TRUE ENABLE,F_CLIFILE
END

STRING F_CLIFILE 128 50
BEGIN
  PROMPT 14 3 "File "
  CHECKTYPE REQUIRED
  FIELD CLIFILE
END

BOOLEAN F_FORNITORI
BEGIN
  PROMPT 2 4 "Fornitori"
  MESSAGE FALSE DISABLE,F_FORNFILE
  MESSAGE TRUE ENABLE,F_FORNFILE
END

STRING F_FORNFILE 128 50
BEGIN
  PROMPT 14 4 "File "
  CHECKTYPE REQUIRED
  FIELD FORNFILE
END

GROUPBOX DLG_NULL 71 10
BEGIN
  PROMPT 1 6 "@bEsportazione partite"
END

BOOLEAN F_PARTITEC
BEGIN
  PROMPT 2 7 "Partite clienti   "
  MESSAGE FALSE DISABLE,F_PARTFILEC
  MESSAGE TRUE ENABLE,F_PARTFILEC
END

STRING F_PARTFILEC 128 40
BEGIN
  PROMPT 24 7 "File "
  CHECKTYPE REQUIRED
  FIELD PARTFILEC
END

DATE F_LASTDATAC
BEGIN
  PROMPT 2 8 "Data ultimo invio "
  FLAGS "D"
  FIELD LASTDATAC
END

NUMBER F_LASTNUMC 3
BEGIN
  PROMPT 40 8 "Numero ultimo invio "
  FLAGS "D"
  FIELD LASTNUMC
END

NUMBER F_NEXTNUMC 3
BEGIN
  PROMPT 2 9 "Numero invio da effettuare "
END

BOOLEAN F_PARTITEF
BEGIN
  PROMPT 2 12 "Partite fornitori "
  MESSAGE FALSE DISABLE,F_PARTFILEF
  MESSAGE TRUE ENABLE,F_PARTFILEF
END

STRING F_PARTFILEF 128 40
BEGIN
  PROMPT 24 12 "File "
  CHECKTYPE REQUIRED
  FIELD PARTFILEF
END

DATE F_LASTDATAF
BEGIN
  PROMPT 2 13 "Data ultimo invio "
  FLAGS "D"
  FIELD LASTDATAF
END

NUMBER F_LASTNUMF 3
BEGIN
  PROMPT 40 13 "Numero ultimo invio "
  FLAGS "D"
  FIELD LASTNUMF
END

NUMBER F_NEXTNUMF 3
BEGIN
  PROMPT 2 14 "Numero invio da effettuare "
END


DATE F_TODAY
BEGIN
  PROMPT 2 16 "Data invio da effettuare "
  FLAGS "A"
END


BUTTON DLG_ELABORA 10 2
BEGIN
  PROMPT -12 -1 ""
  PICTURE BMP_ELABORA
  MESSAGE EXIT,K_ENTER
END

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

ENDPAGE

ENDMASK