The following code changes the process's file mode creation
mask (to user read, group execute, other execute). For
the callable service, see
umask (BPX1UMK, BPX4UMK) — Set the file mode creation mask.
For the data structure, see
BPXYMODE — Map the mode constants of the file services.
AMODE 31 callers use
BPX1UMK (umask) example.
XC S_MODE,S_MODE
MVI S_MODE3,S_IXUSR+S_IXGRP+S_IXOTH Search permission
SPACE
CALL BPX4UMK, Set file creation mask +
(S_MODE, Input: Mode BPXYMODE +
RETVAL), Return value: previous mode mask +
MF=(E,PLIST) ----------------------------------