MAGSDOFF ; OI&T-Clin3/DWM - DEX & AA Track Offline Images ; 01/31/13
Source file <MAGSDOFF.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; entry point; called by ^MAGSDOFL; from option [MAG JB OFFLINE]
|
|
EXIT | ;
|
|
DIR | ; ask path & file name
|
|
PULL | ; extract image file name from data saved in ^TMP($J,
; build ^TMP($J,"PLATTER",L)=file_name |
|
SET | ; LN = image file name
|
|
OFF | ; import image file names into #2006.033 'OFFLINE IMAGES FILE'
|
|
UPD | ; update platter report file in directory
|
|
PLAT(MAGPLAT) | ; starting at 30 char length, whittle down until unique
|
|
ERR(TY,T1,T2,T3) | ; error messaging
|
|
MAIL(GRP) | ; add "OFFLINE IMAGE TRACKERS" and/or active member
; No update if group exist w/active local member ; If no group add it, add DUZ as member and mag server ; If group w/o active local member, add DUZ as member and mag server |
|
KILL | ; remove before release
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|