SJLennon
8 lines
199 B
Plaintext
8 lines
199 B
Plaintext
PGM
|
|
|
|
/* Create a lock and delay. Called by T9ALLOCMNY */
|
|
|
|
ALCOBJ OBJ((lennons1/qclsrc *FILE *SHRRD)) WAIT(0)
|
|
DLYJOB DLY(180)
|
|
ENDPGM
|