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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RA45PST1

Package: Radiology Nuclear Medicine

Routine: RA45PST1


Information

RA45PST1 ;Hines OI/GJC - Post-init 'A', patch 45 ;10/10/03 06:32

Source Information

Source file <RA45PST1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 $$S^%ZTLOAD  $$FMTE^XLFDT  $$UP^XLFSTR  
VA FileMan 3 (FILE,UPDATE)^DIE  ^DIK  $$GET1^DIQ  
MailMan 2 ^XMD  $$GOTLOCAL^XMXAPIG  

Entry Points

Name Comments DBIA/ICR reference
VERSION ;;5.0;Radiology/Nuclear Medicine;**45**;Mar 16, 1998
ENQ1 ;Need to convert the data in the old 'BARIUM USED?' (#5) field in
KILLQ1 ;Kill and clean up symbol table
MAIL ;generate the email message informing the user of the following events:
STOP ;inform the user that the task has been stopped
TRACK ;track the record that could not be locked for updating
SUB() ;return the next available subscript (arithmetic progression)

External References

Name Field # of Occurrence
$$S^%ZTLOAD ENQ1+20
FILE^DIE ENQ1+35
UPDATE^DIE ENQ1+30
^DIK ENQ1+45
$$GET1^DIQ TRACK+7
$$FMTE^XLFDT TRACK+7
$$UP^XLFSTR ENQ1+24
^XMD MAIL+16
$$GOTLOCAL^XMXAPIG MAIL+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^RAMIS(71 - [#71] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RADPT - [#70] ENQ1+14, ENQ1+16, ENQ1+18, ENQ1+19, ENQ1+26, ENQ1+28, ENQ1+36, TRACK+6
^TMP("RA*5*45 BARIUM USED" ENQ1+12!, ENQ1+53, KILLQ1+2!, MAIL+4*, MAIL+5*, MAIL+6*, MAIL+7*, MAIL+8*, MAIL+9*, STOP+1*
TRACK+7*, SUB+1

Label References

Name Line Occurrences
$$SUB STOP+1, TRACK+7
MAIL ENQ1+53
STOP ENQ1+48
TRACK ENQ1+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% KILLQ1+1!
DA ENQ1+45!*, KILLQ1+1!
DA(1 ENQ1+45*
DIC KILLQ1+1!
DIK ENQ1+45!*, KILLQ1+1!
DUZ MAIL+14
RACNI ENQ1+17*, ENQ1+18*, ENQ1+19, ENQ1+26, ENQ1+28, ENQ1+29, ENQ1+32, ENQ1+36, KILLQ1+1!, TRACK+6
>> RACT ENQ1+13*, ENQ1+19*, ENQ1+20
RAD3 ENQ1+28*, ENQ1+29, ENQ1+31!
RADFN ENQ1+13*, ENQ1+14*, ENQ1+16, ENQ1+18, ENQ1+19, ENQ1+26, ENQ1+28, ENQ1+29, ENQ1+32, ENQ1+36
KILLQ1+1!, TRACK+6, TRACK+7
RADTI ENQ1+15*, ENQ1+16*, ENQ1+18, ENQ1+19, ENQ1+26, ENQ1+28, ENQ1+29, ENQ1+32, ENQ1+36, KILLQ1+1!
TRACK+6, TRACK+7
RAEXAM TRACK+6~*, TRACK+7
RAFDA ENQ1+31!, ENQ1+35!
RAFDA( ENQ1+30*, ENQ1+33*, ENQ1+34*
RAIEN ENQ1+29*, ENQ1+30, ENQ1+31!, ENQ1+32*, ENQ1+33, ENQ1+34, ENQ1+35!, KILLQ1+1!
U TRACK+7
X KILLQ1+1!
XMDUZ MAIL+10~*
XMSUB MAIL+10~, MAIL+12*
XMTEXT MAIL+10~, MAIL+11*
XMY MAIL+10~
XMY( MAIL+14*
XMY("G.RAD PE RFORMANCE INDICATOR" , MAIL+15*
Y ENQ1+19*, ENQ1+24, KILLQ1+1!
>> ZTQUEUED ENQ1+13
>> ZTREQ ENQ1+13*
>> ZTSTOP ENQ1+13*, ENQ1+14, ENQ1+16, ENQ1+18, ENQ1+20*, ENQ1+45, ENQ1+48
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All