Invoking System Tasks from Programs › Invoking SDEL Command from Programs › Example

Example

The following example invokes RHDCSDEL to clean up the security definitions for logically deleted users in the default dictionary:

#LINK PGM='RHDCSDEL,PARMS=(DICTNAME,RETCODE,OUTAREA)
.
.
RETCODE  DC    F'0'
DICTNAME DC    CL8'        '
*
OUTAREA  DS    0F
OUTAREAL DC    F'256'
OUTRECD  DC    XL252'00'