campo-sirio/mr/mrtbimp.uml

#include "mrtblnp.h" 

TOOLBAR "" 0 19 80 3 
#include <toolbar.h> 
ENDPAGE 

PAGE "Impianti"  -1 -1 65 15 

GROUPBOX DLG_NULL 78 5
BEGIN
  PROMPT 1 1 "" 
END 

STRING F_CODICE 5
BEGIN 
  PROMPT 2 2 "Codice       " 
  FIELD CODTAB 
  KEY 1 
  USE IMP
  INPUT CODTAB F_CODICE 
  DISPLAY "Codice@5" CODTAB 
  DISPLAY "Descrizione@60" S0 
  OUTPUT F_CODICE CODTAB 
  OUTPUT F_DESC S0 
  CHECKTYPE REQUIRED 
  FLAGS "UZ" 
END 

STRING F_DESC 50 
BEGIN 
  PROMPT 2 4 "Descrizione  "
  FIELD S0 
  KEY 2 
  USE IMP KEY 2 
  INPUT S0 F_DESC 
  DISPLAY "Descrizione@60" S0 
  DISPLAY "Codice@5" CODTAB 
  OUTPUT F_DESC S0 
  OUTPUT F_CODICE CODTAB 
  CHECKTYPE REQUIRED 
END 
 
ENDPAGE

PAGE "Calendario"  -1 -1 65 15 

NUMBER F_YEAR 4
BEGIN
  PROMPT 1 1 "Anno "
  FLAGS "A"
END

RADIOBUTTON F_TYPE 28
BEGIN
  PROMPT 16 0 ""
  ITEM "I|Impianto"
  ITEM "S|Standard"
  FLAGS "Z"
END

CALENDAR F_CALENDAR -3 -1
BEGIN
  PROMPT 0 2 ""
END

ENDPAGE

ENDMASK