@ 0, 10 GET jzm_cislo PREFIX "Číslo:" ONCHANGE=OnChange_VAR

@ 3, 1 BUTTON FORM "UAP_DUG.fmt" \\\
       SIZE 0,15 TITLE "Informace STI" \\\
       ID "VIS"


Function OnChange_VAR
  IF GETENV("GI_SZDC_FORM_STI_BUTTON")="1"
    CHANGESTATE ID=VIS DISABLED=0
    CHANGESTATE ID=VIS HIDDEN=0
  ELSE
    CHANGESTATE ID=VIS DISABLED=1
    CHANGESTATE ID=VIS HIDDEN=1
  ENDIF
EndFunction