%ZISH ;ISF/AC,RWF - GT.M for VMS/Unix Host file Control ;12/07/09 15:53
Source file <ZISHGTM.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OPENERR | ;
|
|
| OPEN(X1,X2,X3,X4,X5,X6) | ;SR. Open file
|
|
| OPNERR | ;error on open
|
|
| CLOSE(X) | ;SR. Close HFS device not opened by %ZIS.
|
|
| DEL(%ZX1,%ZX2) | ;ef,SR. Del fl(s)
|
|
| DELERR | ;Trap any $ETRAP error, unwind and return.
|
|
| LIST(%ZX1,%ZX2,%ZX3) | ;ef,SR. Set local array holding fl names
|
|
| LSTX | ;
|
|
| SPAWNERR | ;TRAP ERROR OF SPAWN
|
|
| MV(X1,X2,Y1,Y2) | ;ef,SR. Rename a fl
|
|
| PWD() | ;ef,SR. Print working directory
|
|
| DEFDIR(DF) | ;ef. Default Dir and frmt
|
|
| STATUS() | ;ef,SR. Return EOF status
|
|
| EOF(X) | ;Eof flag, Pass in $ZA
|
|
| QL(X) | ;Qlfrs
|
|
| FL(X) | ;Fl len
|
|
| MAKEREF(HF,IX,OVF) | ;Internal call to rebuild global ref.
|
|
| FTG(%ZX1,%ZX2,%ZX3,%ZX4,%ZX5) | ;ef,SR. Unload contents of host file into global
|
|
| ERREOF | ||
| READNXT(REC) | ;
|
|
| GTF(%ZX1,%ZX2,%ZX3,%ZX4) | ;ef,SR. Load contents of global to host file.
|
|
| GATF(%ZX1,%ZX2,%ZX3,%ZX4) | ;ef,SR. Append to host file.
|
|
| MGTF(%ZX1,%ZX2,%ZX3,%ZX4,%ZX5) | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: READ |
|
| Function Call: WRITE |
|
