Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: MAGGTUX

Package: Imaging

Routine: MAGGTUX


Information

MAGGTUX ;WIOFO/GEK/SG - Imaging utility to validate INDEX values. ; 2/5/09 1:58pm

Source Information

Source file <MAGGTUX.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Imaging 7 $$ISDEL^MAGGI11  (DISPLAY,MAIL,REVIEW)^MAGGTUX1  (CHK45,CHKCR,INIT,VALIND,VALMERG)^MAGGTUX2  ENTRY^MAGLOG  MAILSHR^MAGQBUT1  GENIEN^MAGXCVI  TASKMAN^MAGXCVP  
Kernel 3 ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  MES^XPDUTL  
VA FileMan 1 (C,YMD)^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Imaging 3 MAG IMAGE INDEX VAL CHECK  MAG IMAGE INDEX VAL FIX  MAG IMAGE INDEX VAL REVIEW  

Entry Points

Name Comments DBIA/ICR reference
CHECK ; Check the entries, NO DATABASE changes.
FIX ; Fix/Check INDEX values in Image File entries.
1(COMMIT,MAGN) ; Start here.
TASK ;
START(COMMIT,MAGN,QUEUED) ;Start here.
END ;
ERR ;
EST() ;Estimate time remaining.
PRLINE ; Print a line of current counts
PRHDR ; Print a header and estimate of time.
; For Test DataBase, put code to Hang here for 1 sec. (magslow)
REVIEW

External References

Name Field # of Occurrence
C^%DTC START+32
YMD^%DTC START+129, EST+7
^%ZTLOAD 1+25
$$ISDEL^MAGGI11 START+47
DISPLAY^MAGGTUX1 START+154
MAIL^MAGGTUX1 START+155
REVIEW^MAGGTUX1 REVIEW
CHK45^MAGGTUX2 START+64
CHKCR^MAGGTUX2 START+67
INIT^MAGGTUX2 START+19
VALIND^MAGGTUX2 START+71
VALMERG^MAGGTUX2 START+119
ENTRY^MAGLOG START+103, START+125
MAILSHR^MAGQBUT1 START+7
GENIEN^MAGXCVI START+98, START+113
TASKMAN^MAGXCVP 1+17
$$FMTE^XLFDT START+27, START+130, START+131, EST+8, PRLINE+2
$$NOW^XLFDT START+20, START+32, START+128
MES^XPDUTL START+44

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ is undefined. Quitting."
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !," **** Just Checking entries, no DataBase changes will occur. ****",!
  • Line Location: 1+3
Function Call: WRITE
  • Prompt: !,"Validate Image Index Terms:"
  • Line Location: 1+4
Function Call: WRITE
  • Prompt: !," The Image File is searched for invalid or missing index values."
  • Line Location: 1+5
Function Call: WRITE
  • Prompt: !," The Image Index Generate and Commit functions are used"
  • Line Location: 1+6
Function Call: WRITE
  • Prompt: !," to fix the incorrect Index values."
  • Line Location: 1+7
Function Call: WRITE
  • Prompt: !
  • Line Location: 1+8
Function Call: WRITE
  • Prompt: !,"For a summary of the index values that will be changed."
  • Line Location: 1+9
Function Call: WRITE
  • Prompt: !," use the menu option: CHK - Check Image File for missing Index values"
  • Line Location: 1+10
Function Call: WRITE
  • Prompt: !," "
  • Line Location: 1+11
Function Call: WRITE
  • Prompt: !,"To Fix the invalid index values in the Image File (#2005)."
  • Line Location: 1+12
Function Call: WRITE
  • Prompt: !," use the menu option: FIX - Fix missing Index values in Image File"
  • Line Location: 1+13
Function Call: WRITE
  • Prompt: !
  • Line Location: 1+14
Function Call: WRITE
  • Prompt: !," **** Just Checking entries, No DataBase changes will occur. ****",!
  • Line Location: 1+15
Function Call: WRITE
  • Prompt: !," **** Fixing invalid entries, DataBase changes Will occur. ****",!
  • Line Location: 1+16
Function Call: WRITE
  • Prompt: !,"Canceled. "
  • Line Location: 1+18
Function Call: WRITE
  • Prompt: !,DESC_" Has been Queued as task# : "_ZTSK
  • Line Location: 1+26
Function Call: WRITE
  • Prompt: !,"Image Index Validate process is currently running. Try later."
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"Just Checking Index Terms, NO CHANGES to database. (Q to quit)"
  • Line Location: START+22
Function Call: WRITE
  • Prompt: !!,"Invalid entries will be fixed. Database will be modified (Q to quit)"
  • Line Location: START+23
Function Call: WRITE
  • Prompt: !!," Press 'Q' at any time to QUIT. It can be resumed later.",!
  • Line Location: START+24
Function Call: WRITE
  • Prompt: !,"Ready to Start Y/N N// "
  • Line Location: START+25
Function Call: WRITE
  • Prompt: !!,"Canceled."
  • Line Location: START+26
Function Call: WRITE
  • Prompt: !,"Starting at "_$$FMTE^XLFDT(STTIME)
  • Line Location: START+27
Function Call: READ
  • Variable: X
  • Timeout: 0
  • Line Location: START+42
Function Call: WRITE
  • Prompt: !
  • Line Location: START+44
Function Call: WRITE
  • Prompt: !,IEN,?10,CDT,?22,CT,?36,NT,?48,NI,?64,$$EST_" ..."
  • Line Location: PRLINE+3
Function Call: WRITE
  • Prompt: !,"Just Checking Index Terms, NO CHANGES to database. (Q to quit)"
  • Line Location: PRHDR+3
Function Call: WRITE
  • Prompt: !,"IEN Saved #checked No Type No Index values est: "
  • Line Location: PRHDR+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("ERRTN" ERR+2
^MAG(2005 - [#2005] START+14, START+31, START+40, START+41, START+49, START+50, START+51, START+55, START+60, START+61
, START+100*, START+122*, PRLINE+2
^MAG(2005.85 - [#2005.85] START+35, START+36
^MAGIXCVT(2006.96 - [#2006.96] START+101*, START+124*
^TMP($J START+5*, START+6*
^XTMP( START+19, START+31!*, START+32*, START+33*, START+86*, START+87*, START+120*, START+131*, START+132*, START+133*
, START+135*, START+136*, START+137*, START+138*, START+139*, START+140*, START+141*, START+142*, START+143*, START+144*
, START+145*, START+146*, START+147*, START+148*, START+149*, START+150*, START+151*, START+152*, START+153*

Label References

Name Line Occurrences
$$EST PRLINE+3
1 CHECK+1, FIX+1
@( ERR+2
END START+21
PRHDR START+38, PRLINE+4
PRLINE START+55
START 1+19, TASK+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+10~, START+130, EST+8
%H START+10~, START+129*, EST+7*
ANS 1+2~, 1+17, 1+18, 1+19, 1+23
CDT START+9~, PRLINE+2*, PRLINE+3
COMMIT 1~, 1+3, 1+15, 1+19, 1+21, 1+24, TASK+1, START~, START+22, START+96
, START+121, PRHDR+3
CRCT START+11~, START+12*, START+147
CT START+11~, START+12*, START+54*, START+55, START+133, START+135, PRLINE+3
CTALL START+11~, START+12*, START+46*, EST+4, EST+5, EST+6
DESC 1+2~, 1+21*, 1+22, 1+26
DOT START+9~, START+14*, START+55
DT START+32
DUZ 1+1, START+103, START+125
ELSP START+10~, START+130*, START+131
ENDTIME START+10~, START+128*, START+131
EST EST+2~, EST+6*, EST+7
ET START+9~, EST+2~, EST+3*, EST+4, EST+5
FIX START+11~, START+12*, START+102*, START+123*, START+153
GO0 START+11~, START+12*, START+61*, START+141
GO1 START+11~, START+12*, START+60*, START+140
GRINI START+11~, START+12*, START+76*, START+139, START+148
GRINT START+11~, START+12*, START+84*, START+138
IEN START+9~, START+15*, START+31, START+41*, START+47, START+49, START+50, START+51, START+55, START+60
, START+61, START+64, START+67, START+78, START+87, START+88, START+98, START+100, START+101, START+103
, START+113, START+122, START+124, START+125, START+132, PRLINE+2, PRLINE+3
INDXD START+9~, START+98, START+99*, START+100, START+113, START+114*, START+117, START+120
INVG START+11~, START+12*, START+143
INVO START+11~, START+12*, START+144
ISGRP START+9~, START+48*, START+60*, START+61
IXO START+9~, START+53*
IXP START+9~, START+53*, START+67
IXS START+9~, START+53*
IXT START+9~, START+53*, START+71
J START+9~, START+117*
LN START+11~, START+12*, PRLINE+4*
LNI START+10~, START+78*, START+152
LNT START+10~, START+88*, START+151
MAGN 1~, 1+19, 1+24, TASK+1, START~, START+19, START+31, START+32, START+33, START+86
, START+87, START+120, START+131, START+132, START+133, START+135, START+136, START+137, START+138, START+139
, START+140, START+141, START+142, START+143, START+144, START+145, START+146, START+147, START+148, START+149
, START+150, START+151, START+152, START+153
>> MAGTMP("VALID ATE INDEX TERMS" , START+2, END+1, ERR+1
MDFN START+9~, START+52*, START+57, START+103, START+125
MRY START+10~
N0 START+9~, START+49*, START+52, START+58, START+60, START+76, START+84
N2 START+9~, START+50*, START+78, START+88
N40 START+9~, START+51*, START+53, START+64, START+67, START+75, START+83, START+86, START+87, START+91*
, START+95, START+115, START+117*, START+119, START+120, START+122
NI START+11~, START+12*, START+77*, START+137, START+148, PRLINE+3
NOMERG START+11~, START+12*, START+145
NOPAT START+11~, START+12*, START+57*, START+149
NORG START+9~
NOZ START+11~, START+12*, START+58*, START+150
NT START+11~, START+12*, START+85*, START+136, PRLINE+3
OFX START+11~, START+12*, START+142
OKMERG START+11~, START+12*, START+146
OL40 START+9~, START+115*, START+119, START+120
ORG START+11~, START+12*
PKG START+10~
PS EST+2~, EST+5*, EST+6
QUEUED TASK+1, START~, START+3, START+21, START+44, START+154, PRLINE+1, PRHDR+2
RADCR START+9~, START+35*, START+67
RADCT START+9~, START+36*
SD START+10~
ST START+9~, START+39*, START+129, EST+1, EST+3
STOP START+11~, START+12*, START+21, START+26*, START+41, START+43*
STTIME START+10~, START+20*, START+27
TIM START+10~, START+40*, EST+6
TITLE START+10~
TIUDA START+10~
TTLDA START+10~
X START+9~, START+25*, START+26, START+32, START+42*, START+130, EST+8
X1 START+10~, START+32*
>> X2 START+32*
>> XMSUB START+4*
ZTDESC 1+2~, 1+22*
ZTDTH 1+2~, 1+23*
ZTIO 1+2~, 1+23*
ZTRTN 1+2~, 1+20*
ZTSAVE 1+2~
ZTSAVE("COMMIT" 1+24*
ZTSAVE("MAGN" 1+24*
ZTSAVE("QUEUED" 1+24*
ZTSK 1+2~, 1+19*, 1+26

Marked Items

Name Field # of Occurrence
$T( START+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All