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 |  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: RAHLO1

Package: Radiology Nuclear Medicine

Routine: RAHLO1


Information

RAHLO1 ;HIRMFO/GJC/BNT-File rpt (data from bridge program) ; Jan 06, 2020@15:12:27

Source Information

Source file <RAHLO1.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Radiology Nuclear Medicine 10 $$STUB^RAEDCN1  (ADENDUM,SECDX)^RAHLO2  (TASK,UPMEM,VOICE)^RAHLO4  GENACK^RAHLTCPB  ($$NEWIEN,LOCKR)^RAHLTCPU  UNVER^RARTE1  PTR^RARTE2  UPSTAT^RAUTL0  
UP1^RAUTL1  EN2^RAUTL20  
Kernel 2 $$NOW^XLFDT  EN^XUSHSHP  
VA FileMan 2 (FILE,UPDATE)^DIE  IX^DIK  
Womens Health 1 CREATE^WVRALINK  

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: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RAHLO  

Entry Points

Name Comments DBIA/ICR reference
FILE ;Create entry in file 74 & file data (remember: U = "^")
NEW1 ; The variable RARPT is set to zero in RAHLO. NEWIEN^RAHLTCPU() will
; return a record number in RARPT to used for filing a new report. Use
; UPDATE^DIE to create a report with the record number returned in RARPT.
LOCK1 ;jump here if we intend to amend an existing report
UPACT ;Update the Activity Log (74.01) w/DBS call
PACS ;If there are subscribers to RA RPT xxx events broadcast ORU mesages to those subscribers
KVAR

External References

Name Field # of Occurrence
FILE^DIE LOCK1+17, LOCK1+62
UPDATE^DIE NEW1+9, UPACT+5
IX^DIK UPACT+9
$$STUB^RAEDCN1 FILE+19
ADENDUM^RAHLO2 LOCK1+86
SECDX^RAHLO2 LOCK1+113
TASK^RAHLO4 PACS+3
UPMEM^RAHLO4 LOCK1+113
VOICE^RAHLO4 PACS+3
GENACK^RAHLTCPB UPACT+24
$$NEWIEN^RAHLTCPU NEW1+3
LOCKR^RAHLTCPU FILE+25
UNVER^RARTE1 FILE+22
PTR^RARTE2 LOCK1+27
UPSTAT^RAUTL0 UPACT+19
UP1^RAUTL1 UPACT+20
EN2^RAUTL20 FILE+11
CREATE^WVRALINK LOCK1+105
$$NOW^XLFDT FILE+9, UPACT+2
EN^XUSHSHP LOCK1+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RARPT - [#74] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(78.3 - [#78.3] LOCK1+44, LOCK1+73
^RADPT - [#70] LOCK1+56, LOCK1+111, UPACT+18
^RARPT - [#74] FILE+13, FILE+20, FILE+21, FILE+27!, LOCK1+77*, LOCK1+78*, LOCK1+82*, LOCK1+83*, LOCK1+93, LOCK1+99*
LOCK1+100*, LOCK1+102*, LOCK1+105, UPACT+18, PACS+3
^TMP("DIERR" UPACT+5!
^TMP("RARPT-REC" FILE+24, LOCK1+16, LOCK1+48, LOCK1+49, LOCK1+77, LOCK1+82, LOCK1+86, LOCK1+92, LOCK1+95, LOCK1+97
LOCK1+98
^VA(200 - [#200] LOCK1+52, LOCK1+53, LOCK1+57

Label References

Name Line Occurrences
LOCK1 FILE+13
UPACT LOCK1+106

Naked Globals

Name Field # of Occurrence
^( LOCK1+77, LOCK1+82
^("H" FILE+27!
^("R" FILE+27!
^(0 LOCK1+111, PACS+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA UPACT+9*!
DIERR UPACT+5!
DIK UPACT+9*!
>> I LOCK1+77*, LOCK1+82*, LOCK1+95*, LOCK1+97, LOCK1+98
>> J LOCK1+77*, LOCK1+78, LOCK1+82*, LOCK1+83
RA12 LOCK1+109~, LOCK1+111*
RA13 LOCK1+109~, LOCK1+111*
RA15 LOCK1+109~, LOCK1+111*
RA7 LOCK1+108~, LOCK1+110*, LOCK1+113*
RAAB LOCK1+44*, LOCK1+73*, KVAR!
RACNI FILE+17~, LOCK1+37, LOCK1+56, LOCK1+105, LOCK1+110, LOCK1+111, LOCK1+113*, LOCK1+114*
RACNISAV LOCK1+108~, LOCK1+110*, LOCK1+113, LOCK1+114
>> RACNT LOCK1+93*, LOCK1+94, LOCK1+96*, LOCK1+99*, LOCK1+100, LOCK1+102
RADATE FILE+17~, LOCK1+9, LOCK1+78, LOCK1+83, LOCK1+102
RADATIME FILE+9~*, LOCK1+7, LOCK1+8
>> RADENDUM FILE+20, LOCK1+51, LOCK1+58, LOCK1+76, LOCK1+81, LOCK1+86
RADFN FILE+17~, NEW1+6, LOCK1+37, LOCK1+56, LOCK1+105, LOCK1+111, UPACT+18
RADTI FILE+17~, NEW1+8, LOCK1+37, LOCK1+56, LOCK1+105, LOCK1+111, UPACT+18
>> RADUZ FILE+24*
>> RADX LOCK1+42, LOCK1+43, LOCK1+44
RAEDIT FILE+19*, LOCK1+7, UPACT+3, KVAR!
>> RAERR FILE+13, FILE+25, FILE+27, NEW1+10*, LOCK1+19*, LOCK1+65*, UPACT+24
>> RAERR("DIERR" NEW1+10, LOCK1+18, LOCK1+63, LOCK1+64
RAESIG LOCK1+1*, LOCK1+13, KVAR!
RAFDA FILE+5~, NEW1+9!, LOCK1+2!, LOCK1+37!, LOCK1+66!, UPACT+1!, UPACT+5!
RAFDA( LOCK1+43*, LOCK1+52*, LOCK1+53*, LOCK1+58*, LOCK1+61*, UPACT+2*, UPACT+3*, UPACT+4*
RAFDA(74 NEW1+6*, NEW1+8*, LOCK1+3*, LOCK1+7*, LOCK1+8*, LOCK1+9*, LOCK1+10*, LOCK1+11*, LOCK1+12*, LOCK1+13*
LOCK1+14*, LOCK1+16*
RAFIELD LOCK1+64~*
RAHIST KVAR!
>> RAHSTNDE LOCK1+93*, LOCK1+99
RAIENS FILE+5~, NEW1+9!, LOCK1+2!*, LOCK1+3, LOCK1+7, LOCK1+8, LOCK1+9, LOCK1+10, LOCK1+11, LOCK1+12
LOCK1+13, LOCK1+14, LOCK1+16, LOCK1+37!*, LOCK1+43, LOCK1+52, LOCK1+53, LOCK1+58, LOCK1+61, LOCK1+66!
UPACT+1!*, UPACT+2, UPACT+3, UPACT+4, UPACT+5!
RAIENS(1 NEW1+6*
>> RALN LOCK1+97*, LOCK1+98*, LOCK1+100
RALONGCN FILE+17~, NEW1+6, NEW1+8, LOCK1+26
>> RAMDV UPACT+16
RAMEMARR FILE+10~, FILE+11
RAMEMARR( LOCK1+113
>> RANEW LOCK1+94*, LOCK1+98
RAPRTSET FILE+10~, LOCK1+25, LOCK1+106
RAQUEUED UPACT+9*, KVAR!
RAQUIET FILE+8~*
RARELTEL LOCK1+33*, LOCK1+42, LOCK1+47!
>> RARPT FILE+13*, FILE+19, FILE+20, FILE+21, FILE+22, FILE+23*, FILE+27, NEW1+3*, NEW1+6, LOCK1+1
LOCK1+2, LOCK1+61, LOCK1+65, LOCK1+77, LOCK1+78, LOCK1+82, LOCK1+83, LOCK1+93, LOCK1+99, LOCK1+100
LOCK1+102, LOCK1+105, UPACT+1, UPACT+9, UPACT+18, PACS+3
RARPTN LOCK1+26~*
RARPTSTS FILE+17~, LOCK1+3, LOCK1+8, LOCK1+10, LOCK1+13, LOCK1+16, LOCK1+33, UPACT+3, UPACT+19, UPACT+20
RASAV FILE+13*!, FILE+23
>> RASECDX LOCK1+70, LOCK1+113
>> RASECDX( LOCK1+72
RASSN FILE+17~
>> RASUB FILE+24, LOCK1+16, LOCK1+48, LOCK1+49, LOCK1+77, LOCK1+82, LOCK1+86, LOCK1+92, LOCK1+95, LOCK1+97
LOCK1+98
>> RATELE LOCK1+33
>> RATELENM LOCK1+11
>> RATELEPI LOCK1+12
>> RATRANSC LOCK1+14, UPACT+4
RAVERF FILE+17~, LOCK1+1, LOCK1+8, LOCK1+10, LOCK1+14, LOCK1+16, LOCK1+57, LOCK1+58, UPACT+4
RAX LOCK1+71~*, LOCK1+72*, LOCK1+73
RAXIT LOCK1+27~
RAZ7003 LOCK1+56*, LOCK1+66!
RAZPCE LOCK1+57*, LOCK1+58, LOCK1+66!
RAZRES LOCK1+48*, LOCK1+51, LOCK1+52, LOCK1+66!
RAZSTF LOCK1+49*, LOCK1+51, LOCK1+53, LOCK1+66!
U FILE+20, LOCK1+44, LOCK1+73, LOCK1+78, LOCK1+83, LOCK1+102, LOCK1+105, LOCK1+111, PACS+3
>> X LOCK1+1*
>> X1 LOCK1+1*
>> X2 LOCK1+1*
ZTQUEUED FILE+7~*

Marked Items

Name Field # of Occurrence
$T(CREATE^WVRALINK LOCK1+105
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All