%externalroutine eprecall2(%integer id,aparprops)

printstring("Eprecall2
")
%end
%externalroutine Eproc2(%stringname name,%integer props,aparprops,%integername id)
printstring("Eproc2
")
%end
%endoffile