The following code creates a symbolic link
/sysaccts
for path name
/sys12/acctn.
For the callable service, see
symlink (BPX1SYM, BPX4SYM) — Create a symbolic link to a path name.
AMODE 64 callers use
BPX4SYM (symlink) example.
MVC BUFFERA(12),=CL12'/sys12/acctn'
MVC BUFLENA,=F'12'
MVC BUFFERB(09),=CL09'/sysaccts'
MVC BUFLENB,=F'09'
SPACE ,
CALL BPX1SYM, Create symbolic link to pathname +
(BUFLENA, Input: Pathname length +
BUFFERA, Input: Pathname +
BUFLENB, Input: Link name length +
BUFFERB, Input: Link name +
RETVAL, Return value: 0 or -1 +
RETCODE, Return code +
RSNCODE), Reason code +
VL,MF=(E,PLIST) ----------------------------------