pascal/callj.pas : callj.ijs startup script