MAGFILEB ;WOIFO/RED - CREATE FILE REFERENCE FROM ^MAG(2005) ; 10/22/2002 06:39
Source file <MAGFILEB.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VST | ; Entry point to get a full size image with copying from JB to MAG DISK
|
|
| VSTNOCP | ; Entry point to get a full size image without copying it from the JB
|
|
| ABS | ; Entry point to get an image abstract with copying from JB to MAG DISK
|
|
| ABSNOCP | ; Entry point to get an image abstract without copying it from the JB
|
|
| BIG | ; Entry point to get a big file with copying from JB to MAG DISK
|
|
| BIGNOCP | ; Entry point to get a big without copying it from the JB
|
|
| FULL | ||
| ABSTRACT | ||
| BIGFILE | ||
| EXIT | ||
| FINDFILE | ;
|
|
| DIRHASH(FILENAME,NETLOCN) | ; determine the hierarchical file directory hash
|
|
| NOWHERE | ; File is not anywhere on the jukebox -- output error message
; Requested image file is not on the Jukebox |
|
| OFFLINE | ; Jukebox Cartridge is off-line -- output error message
; Jukebox Cartridge with image file is off-line." |
|
| IMOFFLN(FILE) | ;Check to see if image is offline (jb platter removed)
|
| FileNo | Call Tags |
|---|---|
| ^MAG(2005.2 - [#2005.2] | GET1^DIQ |
