BPX1RWD (rewinddir) example

The following code resets the open directory to the beginning. For the callable service, see rewinddir (BPX1RWD, BPX4RWD) — Reposition a directory stream to the beginning. AMODE 64 callers use BPX4RWD (rewinddir) example.

                                              
       MVC   DIRECTDES,..          File descriptor from opendir       59
         CALL  BPX1RWD,              Reposition directory at beginning +
               (DIRECTDES,           Input: Directory file descriptor  +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------