%ZISUTL ;ISD/HGW - Device Handler Utility routine ; 8/19/20 10:51am
Source file <ZISUTL.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GETDEV(X) | ;Return IO variables
 ; ZEXCEPT: POP  | 
|
| SAVDEV(NM) | ;Save IO variables
 | 
 
  | 
| SYMBOL(MODE,ROOT) | ;0=Save, 1=Restore, K=Kill IO variables
 | 
|
| RMDEV(X) | ;Remove saved IO variables.
 | 
 
  | 
| RMALLDEV() | ;Remove saved IO variables for all devices saved in table.
 | 
|
| FINDEV(NM) | ;Find Device name and return IEN.
 | 
|
| NEXTDEV(NM) | ;Return next available device.
 | 
|
| OPEN(HNDL,IOP,%ZIS) | ;Open extrinsic function
 | 
 
  | 
| CLOSE(X1) | ;Close extrinsic function
 | 
 
  | 
| USE(X1) | ;Restore IO* variables pertaining to the device.
 | 
 
  | 
| LINEPORT() | ;Return device name for line port.
 | 
|
| LNPRTSUB() | ;Return line port subtype pointer.
 | 
|
| LNPRTNAM() | ;Return Line port name
 | 
|
| LNPRTIEN(X) | ;Return internal entry number of Line/port
 | 
|
| LNPRTADR(X) | ;Returns Line/Port name of a fixed device.
 | 
|
| FIND(IOP) | ;e.f. Get the IEN of a device
 | 
|
| NOQ(IOP) | ;e.f. Return queueing status
 | 
|
| UNIQUE(ZISNA) | ;Build a unique number to add to a device name
 | 
|
| ENDOFILE() | ;p599 Set Cache end-of-file to work like DSM
 |