// 77stqd.uml - Stampa quadro (maschera generica per tutti i quadri)

#include "77stqd.h" 

PAGE "Stampa quadro" -1 -1 68 12

GROUPBOX DLG_NULL 66 3
BEGIN
    PROMPT 1 1 "Ditta"
END

NUMBER F_CODDITTA 5
BEGIN
    PROMPT 2 2 ""
    FLAGS "GRD"
    CHECKTYPE NORMAL
    USE LF_NDITTE KEY 1
    INPUT CODDITTA F_CODDITTA
    DISPLAY "Codice" CODDITTA
    DISPLAY "Ragione sociale @50" RAGSOC
    OUTPUT F_RAGDITTA RAGSOC
END

STRING F_RAGDITTA 56
BEGIN
    PROMPT 9 2 ""
    FLAGS "D"
END

STRING F_TEXT 56
BEGIN
    PROMPT 9 2 ""
    FLAGS "DH"
END

NUMBER F_ANNO 4
BEGIN
  PROMPT 1 4 "Anno dichiarazione   "   
  FLAGS "D"
END

GROUPBOX DLG_NULL 66 5
BEGIN
    PROMPT 1 5 "Stampante"
END

STRING F_CURRPRINTER 120 63
BEGIN
    PROMPT 2 6 ""
    FLAGS "D"
END

BOOLEAN F_MODULASER
BEGIN
  PROMPT 2 7 "Modulaser"
  MESSAGE TRUE ENABLE,F_APPENDFILE
  MESSAGE FALSE CLEAR,F_APPENDFILE
END

BOOLEAN F_APPENDFILE
BEGIN
  PROMPT 2 8 "Aggiungi al file"
END

BUTTON DLG_SETPRINT 10 2
BEGIN
  PROMPT 54 7 "~Imposta"
  PICTURE 165
END
     
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

ENDMASK