#include "ve5100a.h"

PAGE "Eliminazione documenti" -1 -1 62 11

RADIOBUTTON F_OPERAZIONE 28
BEGIN
  PROMPT  1 1 "Operazione da eseguire"
  ITEM "1|Eliminazione documenti" 
  MESSAGE ENABLE,F_DESC
  ITEM "2|Ripristino documenti"
  MESSAGE DISABLE,F_DESC
  HELP "Scegli l'operazione da eseguire"
END


STRING F_STATUS 1
BEGIN
  PROMPT 2 5 "Stato eliminabile    "
  USE %STD
  INPUT CODTAB F_STATUS
  DISPLAY "Stato documento" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_STATUS CODTAB
  OUTPUT F_STADESC S0
  CHECKTYPE REQUIRED
  WARNING "Stato documento obbligatorio"
  FLAGS "D"
END

STRING F_STADESC 32
BEGIN
  PROMPT 27 5 ""
  FLAGS "D"
END

LIST F_UNIT 2
BEGIN
  PROMPT 2 6 "Unita' di backup     "
  ITEM "A|A:"
  ITEM "B|B:"
END

STRING F_DESC 50 36
BEGIN
  PROMPT 2 7 "Descrizione backup   "
  GROUP 1
END

BUTTON DLG_OK 10 2
BEGIN 
  PROMPT -12 -1 ""
END  

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

ENDPAGE

ENDMASK