%externalstring (40) %fn imp11 version
   %result = "8.2 release 4"
%end
%externalstring (6) %fn imp11host
   %result = "ercm11"
%end
%externalroutine ssmess(%integer i)
   printstring("?? See BG ??")
%end
%endoffile