inproc internal procedure is there in main.p and sub.p programs, after added sub.p as a super-procedure in main.p.
in this case how to use IN SUPER Keyword ? please explain ?
/* main.p */
define var hdl as handle.
run sub.p persistent set hdl.
this-procedure:add-super-procedure(hdl).
run inproc.
procedure inproc:
message "Main.p inproc".
run super.
end.
/* sub.p */
procedure inproc:
message "Sub.p inproc".
end.