%ZIS2 ;SFISC/AC,RWF -- DEVICE HANDLER (CHECKS) ;11/08/2011
Source file <ZIS2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| L2 | ;Entry point from %ZIS1, %E holds the IEN value
|
|
| CHECK | ;Get IO check for secondary $I
|
|
| VTRM | ||
| SLAVE | ||
| PQ | ;Check (if not queueing to secondary system) that print queue is established and available
|
|
| OCPU | ||
| OOS | ||
| PTIME | ||
| DUZ | ||
| T | ;
|
|
| TMPVAR | ||
| T2 | ||
| QUECHK() | ;Return 1 if OK
|
|
| OTHCPU(%1) | ;%1 should be either DEVICE or HUNT GROUP
|
|
| IOPAR(%DA,%N) | ;Return I/O parameter
|
|
| SEC | ;Do Security check
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
