campo-sirio/m770/774300a.uml

#include "774300a.h"     

TOOLBAR "" 0 18 0 4
#include <toolbar.h>
ENDPAGE
                        
PAGE "Storico azzeramenti" -1 -1 78 21

NUMBER F_ANNODIC 4
BEGIN
  PROMPT 1 3 "Anno dichiarazione "           
  FIELD LF_STAZZ->ANNODIC                
  KEY 1
  USE LF_STAZZ KEY 1
  INPUT ANNODIC F_ANNODIC 
  DISPLAY "Anno" ANNODIC   
  DISPLAY "Azzeramento schede" DATASCH  
  DISPLAY "Azzeramento quadri" DATAQUA 
  OUTPUT F_ANNODIC ANNODIC
  OUTPUT F_USERSCH USERSCH
  OUTPUT F_DATASCH DATASCH 
  OUTPUT F_USERQUA USERQUA 
  OUTPUT F_DATAQUA DATAQUA 
  CHECKTYPE REQUIRED
  FLAGS "R"   
  MESSAGE ENABLE,F_AZZSCH|ENABLE,F_AZZQUA
END
                         
GROUPBOX DLG_NULL -1 3
BEGIN
  PROMPT 1 7 "@bAzzeramento schede percipienti"
  FLAGS "R"
END
                         
BOOLEAN F_AZZSCH
BEGIN
  PROMPT 2 8 ""
END

STRING F_USERSCH 8
BEGIN
  PROMPT 6 8 "Utente "
  FIELD LF_STAZZ->USERSCH 
  FLAGS "D"               
END

DATE F_DATASCH
BEGIN
  PROMPT 25 8 "Data azzeramento "
  FIELD LF_STAZZ->DATASCH  
  FLAGS "D"
END
                  
GROUPBOX DLG_NULL -1 3
BEGIN
  PROMPT 1 12 "@bAzzeramento quadri dichiarazione"                         
  FLAGS "R"
END

BOOLEAN F_AZZQUA
BEGIN
  PROMPT 2 13 ""
END

STRING F_USERQUA 8
BEGIN
  PROMPT 6 13 "Utente "
  FIELD LF_STAZZ->USERQUA 
  FLAGS "D"               
END                  
                  
DATE F_DATAQUA
BEGIN
  PROMPT 25 13 "Data azzeramento "
  FIELD LF_STAZZ->DATAQUA  
  FLAGS "D"
END

ENDPAGE

ENDMASK