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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: GMRAY29

Package: Adverse Reaction Tracking

Routine: GMRAY29


Information

GMRAY29 ;SLC/DAN Installation Utilities ;3/1/07 14:34

Source Information

Source file <GMRAY29.m>

Call Graph

Call Graph Total: 14

Package Total Call Graph
Adverse Reaction Tracking 4 ($$DECEASED,ADCOM)^GMRAFX  ($$DUP,DELMUL)^GMRAFX3  ($$NKASCR,CLN)^GMRANKA  UPDATE^GMRAPES1  
Kernel 4 ^%ZTLOAD  ($$FMADD,$$FMTE,$$NOW)^XLFDT  $$UP^XLFSTR  BMES^XPDUTL  
VA Fileman 3 $$FIND1^DIC  (,FILE)^DIE  ^DIK  
MailMan 1 ^XMD  
Registration 1 ($$TESTPAT,DEM)^VADPT  
Toolkit 1 SCREEN^XTID  

Entry Points

Name Comments DBIA/ICR reference
UPDATEF ;Update reactant to say free text so users know it isn't a standardized entry
PRETRAN ;Load conversion table into KIDS build
FIXALG ;Loop through 120.8 update existing free text entries
UPDATE ;Update free text entry to data found in table
Q ;
UPDATEE ;Mark as entered in error, check for NKA
DEL ;No zero node, remove entry
MAIL ;Send message indicating post install is finished
POST ;Post installation processes
DQ ;Process begins here

External References

Name Field # of Occurrence
^%ZTLOAD Q+3
$$FIND1^DIC UPDATE+5, UPDATE+6, UPDATE+7, UPDATE+8
^DIE UPDATEE+5, UPDATEE+8, UPDATE+15, UPDATE+21
FILE^DIE UPDATEF+4
^DIK DEL+4
$$DECEASED^GMRAFX FIXALG+5
ADCOM^GMRAFX UPDATEE+6, UPDATE+25
$$DUP^GMRAFX3 UPDATE+13
DELMUL^GMRAFX3 UPDATE+22
$$NKASCR^GMRANKA UPDATEE+7
CLN^GMRANKA UPDATEE+9
UPDATE^GMRAPES1 UPDATE+23
$$TESTPAT^VADPT FIXALG+5
DEM^VADPT MAIL+30
$$FMADD^XLFDT DQ+4
$$FMTE^XLFDT MAIL+9
$$NOW^XLFDT UPDATEE+8, MAIL+9
$$UP^XLFSTR FIXALG+8
^XMD MAIL+23, MAIL+39
BMES^XPDUTL Q+3, Q+4
SCREEN^XTID UPDATE+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Conversion table not loaded - INSTALLATION ABORTED"
  • Line Location: POST+3
Routine Call
  • DIE
  • Line Location:
    • UPDATEE+5
    • UPDATEE+8
    • UPDATE+15
    • UPDATE+21
Routine Call
  • DIC
  • Line Location:
    • UPDATE+5
    • UPDATE+6
    • UPDATE+7
    • UPDATE+8
Routine Call
  • DIE
  • Line Location:
    • UPDATEF+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(120.8 - [#120.8] Classic Fileman Calls
^GMR(120.85 - [#120.85] Classic Fileman Calls
^GMR(120.86 - [#120.86] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(120.8 - [#120.8] FIXALG+3, FIXALG+4, FIXALG+5, FIXALG+6, FIXALG+7, UPDATEE+2, UPDATEE+3, UPDATE+2
^GMR(120.85 - [#120.85] UPDATE+16, UPDATE+18, UPDATE+19
^GMRD(120.82 - [#120.82] FIXALG+2, UPDATE+12
^XTMP("GMRAFIX" PRETRAN+1, POST+1!, POST+2*, POST+3, DQ+4*, FIXALG+8
^XTMP("GMRAFX" DQ+5!

Label References

Name Line Occurrences
DEL FIXALG+4
FIXALG DQ+2
MAIL DQ+3
Q POST+4
UPDATE FIXALG+11
UPDATEE FIXALG+10
UPDATEF FIXALG+9, UPDATE+9, UPDATE+13

Naked Globals

Name Field # of Occurrence
^(0 UPDATEE+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AIFN UPDATE+1~, UPDATE+17*, UPDATE+18*, UPDATE+19, UPDATE+20
CNT MAIL+1~, MAIL+7*, MAIL+8*, MAIL+9*, MAIL+10*, MAIL+12*, MAIL+13*, MAIL+14*, MAIL+16*, MAIL+17*
, MAIL+19, MAIL+20*, MAIL+21*, MAIL+26*, MAIL+27*, MAIL+28*, MAIL+31*, MAIL+33*, MAIL+34*, MAIL+35*
COM UPDATE+1~, UPDATE+24*, UPDATE+25
DA DEL+1~, DEL+3*, UPDATEE+1~, UPDATEE+4*, UPDATEE+8*, UPDATE+1~, UPDATE+15*, UPDATE+20*
DA(1 UPDATE+20*
DFN UPDATEE+1~, UPDATEE+2*, UPDATEE+7, UPDATEE+8, UPDATE+1~, UPDATE+2*, UPDATE+9, UPDATE+13, MAIL+1~, MAIL+29*
, MAIL+32, MAIL+33
DIE UPDATEE+1~, UPDATEE+4*, UPDATEE+8*, UPDATE+1~, UPDATE+15*, UPDATE+21*
DIFROM MAIL+1~
DIK DEL+1~, DEL+3*
DR UPDATEE+1~, UPDATEE+4*, UPDATEE+8*, UPDATE+1~, UPDATE+15*, UPDATE+21*
DT DQ+4
DUZ UPDATEE+4, UPDATEE+8, MAIL+6, MAIL+37
ENTRY FIXALG+1~, FIXALG+8*, FIXALG+9, FIXALG+10, UPDATEE+8, UPDATE+4, UPDATE+9, UPDATE+13
ERR DQ+1~, FIXALG+2*, MAIL+11
ERR( MAIL+25, MAIL+29, MAIL+32, MAIL+33
ERR(2 UPDATE+9*, MAIL+5
ERR(3 UPDATE+13*, MAIL+5
ERRCODE UPDATE+1~
EXTRA MAIL+1~, MAIL+5*, MAIL+6, MAIL+36
FDA UPDATEF+1~
FDA( UPDATEF+3*
FILE UPDATE+1~, UPDATE+4*, UPDATE+5, UPDATE+6, UPDATE+7, UPDATE+8, UPDATE+10, UPDATE+12
FREE FIXALG+1~, FIXALG+2*, FIXALG+6
GMRAAR UPDATE+1~, UPDATE+10*, UPDATE+24
GMRAAR("O" UPDATE+12*, UPDATE+15, UPDATE+23
GMRAAR(0 UPDATE+11*, UPDATE+15, UPDATE+24
GMRADONT DEL+1~, DEL+2*
GMRAI FIXALG+1~, FIXALG+3*, FIXALG+4, FIXALG+5, FIXALG+6, FIXALG+7, DEL+3, UPDATEF+3, UPDATEE+2, UPDATEE+3
, UPDATEE+4, UPDATEE+6, UPDATE+2, UPDATE+3
GMRAPA UPDATE+1~, UPDATE+3*, UPDATE+15, UPDATE+16, UPDATE+18, UPDATE+25
GMRASCR UPDATE+1~, UPDATE+8*
GMRATXT MAIL+1~
GMRATXT( MAIL+8*, MAIL+9*, MAIL+10*, MAIL+12*, MAIL+13*, MAIL+14*, MAIL+16*, MAIL+17*, MAIL+19*, MAIL+20*
, MAIL+21*, MAIL+26*, MAIL+27*, MAIL+28*, MAIL+31*, MAIL+33*, MAIL+34*, MAIL+35*
IEN UPDATE+1~, UPDATE+5*, UPDATE+6*, UPDATE+7*, UPDATE+8*, UPDATE+9, UPDATE+10, UPDATE+12
LIST UPDATE+23!
LOOP MAIL+1~, MAIL+18*, MAIL+19, MAIL+20, MAIL+24*, MAIL+25, MAIL+27, MAIL+29, MAIL+32, MAIL+33
NAME UPDATE+1~, UPDATE+4*, UPDATE+5, UPDATE+6, UPDATE+7, UPDATE+8, UPDATE+11
REACTANT FIXALG+1~, FIXALG+7*, FIXALG+8, UPDATEF+2*, UPDATEF+3, UPDATE+9, UPDATE+13, UPDATE+19, UPDATE+24, MAIL+1~
, MAIL+32*, MAIL+33
SIEN UPDATE+1~, UPDATE+19*, UPDATE+20
TE DQ+1~, UPDATEE+10*, MAIL+15
TF DQ+1~, UPDATEF+5*, MAIL+15
TIME UPDATEE+1~, UPDATEE+3*, UPDATEE+8
TU DQ+1~, UPDATE+26*, MAIL+15
U FIXALG+5, FIXALG+6, FIXALG+7, FIXALG+10, UPDATEE+2, UPDATEE+3, UPDATEE+8, UPDATE+2, UPDATE+4, UPDATE+12
, MAIL+33
USER UPDATEE+1~, UPDATEE+3*, UPDATEE+8
VADM MAIL+1~, MAIL+30!
VADM(1 MAIL+31
VADM(2 MAIL+31
XMDUZ MAIL+1~, MAIL+2*
XMSUB MAIL+1~, MAIL+22*, MAIL+38*
XMTEXT MAIL+1~, MAIL+22*, MAIL+38*
XMY MAIL+1~, MAIL+37!
XMY( MAIL+6*, MAIL+37*
XMY("CATHERINE.HOANG2@VA.GOV" MAIL+3*
XMY("DAVID.NABER@VA.GOV" MAIL+3*
XMY("HULET.LEE_ANN@FORUM.VA.GOV" MAIL+4*
XMZ MAIL+1~
>> XPDGREF PRETRAN+1, POST+2
>> XPDQUIT POST+3*
ZTDESC Q+1~, Q+2*
ZTDTH Q+1~, Q+2*
ZTIO Q+1~, Q+2*
ZTRTN Q+1~, Q+2*
ZTSK Q+1~, Q+3, Q+4

Marked Items

Name Field # of Occurrence
$T(SCREEN^XTID UPDATE+8
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All