ENTRY OnSubPictureClosed(IN ALIAS _pictureRef)
 ; akcie
 END OnSubPictureClosed 

 ENTRY OnSubPictureClosed(IN ALIAS _pictureRef, IN INT _instanceId)
 ; akcie
 END OnSubPictureClosed 

 ; obsluha udalosti OnSubPictureClosed
 ENTRY OnSubPictureClosed(IN ALIAS _schemeRef)
   IF _schemeRef\HBJ = S.SubScheme\HBJ THEN
     ; bola zatvorená podschéma S.SubScheme, ktorá bola otvorená
     ; na obsluhe udalosti BtnOK_OnClick
     ; Ak schéma S.SubScheme obsahuje vstupno-výstupné premenné,
     ; ich hodnoty sú prenesené do aktuálnej schémy
   ENDIF
 END OnSubPictureClosed
 
 ; obsluha udalosti: Stlačenie tlačidla myši
 ENTRY BtnOK_OnClick
     ; otvorenie podschémy
     OPEN S.SubScheme DIRECT
 END BtnOK_OnSubPictureClosed