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

Package: Record Tracking

Routine: RTDPA


Information

RTDPA ;TROY ISC/MJK - Record File Look-up ; 5/19/87 11:21 AM ; 5/23/03 4:41am

Source Information

Source file <RTDPA.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Record Tracking 6 (IN,NAME)^RTB  (TYPE,TYPE1)^RTDPA1  SET^RTRD  START^RTRPT2  TYPE1^RTUTL  ^RTUTL2  
VA FileMan 3 ^DIC  YN^DICN  ^DIE  

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

Package Total Caller Graph
Record Tracking 11 RTDEL  RTDPA2  RTP2  RTQ  RTT  RTT1  RTT11  RTT3  
RTT4  RTUTL2  ^RTV(190.1  
Registration 1 DGRPDD1  

Entry Points

Name Comments DBIA/ICR reference
RT
ASK
RT1
FIND
SET
NUM
RTC
Q
Q1
CHAR
BCINVLD
BOR
SCR
BC ; called from 7.5 node of RECORDS file for pre-look-up massage
; picks up IEN for consolidated sites based on "AOLDBC" x-ref
BCDFN ; called from 7.5 node of PATIENT file for pre-look-up massage
; picks up IEN for consolidated sites based on "AOLDBC" x-ref
; of RECORDS file #190.

External References

Name Field # of Occurrence
^DIC RT1+3, BOR
YN^DICN BCINVLD+8
^DIE BCINVLD+9
IN^RTB RT1+6
NAME^RTB FINDFIND+5, NUMBCINVLD+6
TYPE^RTDPA1 SET
TYPE1^RTDPA1 SET
SET^RTRD FIND+6
START^RTRPT2 BOR+2
TYPE1^RTUTL SET
^RTUTL2 FIND

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,$S($D(RTDC("A")):RTDC("A"),1:"Select Record: ")
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: RTDC("B"),"// "
  • Condition for execution: $D(RTDC("B"))
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: " ",Y," "
  • Line Location: NUM+0
Function Call: WRITE
  • Prompt: " ",Y," "
  • Line Location: BCINVLD+6
Function Call: WRITE
  • Prompt: @IOF,"Select Record:"
  • Line Location: BCINVLD+9
Routine Call
  • DIC
  • Line Location:
    • RT1+3
    • BOR
Routine Call
  • DIE
  • Line Location:
    • BCINVLD+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RT - [#190] Classic Fileman Calls
^RTV(195.9 - [#195.9] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(190 NUMBCINVLD+6, SCR
^DIC(190 FIND+4
^DIC(195.2 - [#195.2] SET
^DISV( RT1+2, RTC*
^RT - [#190] NUMRTC+1, BCINVLD+2, BCINVLD+3, BCINVLD+5, BCINVLD+6, SCRSCR+1, BCDFN+10
^RT("AOLDBC" RT1+1, BCINVLD+4, BC+3, BCDFN+4

Label References

Name Line Occurrences
ASK FIND+2, QBORBOR+2
BCINVLD RT1+1
BOR RT1+5
CHAR RT1+1, BC+4, BCDFN+5
FIND SET+1
NUM RT1+1, RT1+2, RT1+4
Q RT1+1, RT1+2, RT1+3, RT1+6, FINDFIND+3, FIND+4, FIND+6, SET+1, NUM+1
Q1 RT1FIND+1, FIND+2, BORBOR+2, BOR+4
RT1 RT+1
RTC FINDBOR+3
SCR NUM
SET FIND+5

Naked Globals

Name Field # of Occurrence
^("LAYGO" FIND+4
^("SCR" SCR
^("^RT(" RT1+2
^(0 RTC+1, BCINVLD+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% FIND+4*, BCINVLD+8~*, BCINVLD+9
C RT1+1, CHAR*, CHAR+1*, BCINVLDBCINVLD+4, BCINVLD+9, BC+2~, BC+5, BCDFN+3~, BCDFN+6
DA BCINVLD+9~*
DFN BCDFN+3~, BCDFN+10*, BCDFN+11
DIC RT+1*, RT1+3*!, RT1+6!, Q1!, BOR!*
DIC("A" RT, BOR*
DIC("B" RT
DIC("DR" BOR*
DIC("S" RTDPA+2*, RT+1, RT1+3*, BOR*
DIC(0 RT+1*, RT1+3*, BOR*
DIE BCINVLD+9~*
>> DLAYGO FIND+4
DR BCINVLD+9~*
DTIME ASK
DUZ RT1+2, RTC
DUZ(0 FIND+4
>> I CHAR*
IEN BCDFN+3~, BCDFN+8*, BCDFN+9, BCDFN+10
IOF BCINVLD+9
RT RT!, FIND*, SET+1, NUM*, NUM+1, RTCRTC+1, QQ1BCINVLD+6*
BOR+3*
RT1 RT1!, FIND+2, Q1!
RTA RT1+6*!
>> RTAPL RT1+6, SETBOR
>> RTASK BOR+2*
RTB BOR+1!, BOR+2*
>> RTBCIFN RT1*, RT1+1*
RTC FINDFIND+3!, RTC*, BOR+3
RTDC Q1!
RTDC("A" RT*, ASK
RTDC("B" RT*, ASK
RTDC("S" RT+1*, RT1+3, SCR+1
RTDC(0 RT+1*, RT1+5, FIND+2, FIND+3, NUMRTC+1, QBCINVLD+6, BORBOR+2
RTE RT!, RT1+6*, FINDFIND+5, Q1!
RTESC RT!, RT1*
RTOLD RT1+1*!, BC+2~, BC+3*, BC+5, BCDFN+3~, BCDFN+4*, BCDFN+7
RTRD FIND+6!
RTRD("A" FIND+6*
RTRD("B" FIND+6*
RTRD(0 FIND+6*
RTRD(1 FIND+6*
RTRD(2 FIND+6*
RTS Q1!
>> RTSEL FIND+1, BOR+1, BOR+2*
>> RTSEL("A" FIND*!
>> RTSHOW FIND+5
RTSN RT1+1*!, NUM, Q1!, BCINVLD+5
RTTY SET*!
RTXR RT1*, Q, Q1!
RTY FINDFIND+1, FIND+2, FIND+3!, BOR+2
RTY(1 FIND, RTC*, BOR+3
RTZZ BOR+2!
RTZZ("RTB" BOR+1*, BOR+2
RTZZ("RTSEL" BOR+1*, BOR+2
S SCR*!
U BCINVLD+3, BCDFN+10
W RT1+1*!, CHARBCINVLD+2, BCINVLD+3, BCINVLD+4, BCINVLD+9, BC+2~, BC+3*, BCDFN+3~, BCDFN+4*
>> X ASK*, RT1RT1+1, RT1+2, RT1+3, RT1+4, RT1+5*, RT1+6, FIND+6*, Q1*
BCINVLDBCINVLD+4*, BCINVLD+7, BCINVLD+9*, BC+3, BC+5*, BCDFN+4, BCDFN+6, BCDFN+7*, BCDFN+8
BCDFN+11*
>> X1 RT+1*
Y RT1+1*, RT1+2*, RT1+4*, RT1+6, FIND*, FIND+5*, FIND+6, SET*, NUM*, RTC+1*
, Q1*, CHAR*, CHAR+1, BCINVLDBCINVLD+1~, BCINVLD+2*, BCINVLD+3, BCINVLD+5, BCINVLD+6*, BCINVLD+9
BORBOR+2, SCR*, SCR+1*, BC+5, BCDFN+6
Y(0 RTC+1*
Z CHAR*, CHAR+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All