* function calls function foo linkage myparam word ret word procedure using myparam returning ret display "myparam is " myparam set ret to 0 public function main linkage status word storage myvar word procedure returning status set myvar to 123 call foo using myvar returning status display "status is " status