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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: LRAPLG

Package: Lab Service

Routine: LRAPLG


Information

LRAPLG ;AVAMC/REG/WTY - AP LOG-IN ;01/23/17 03:16

Source Information

Source file <LRAPLG.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Lab Service 10 ^LRAP  EN1^LRAPKOE  ^LRAPLG1  ^LRAPLG2  ^LRAPPOW  A^LRAPWU  ^LRDPA  (D,V,XR,YN)^LRU  
D^LRUA  X^LRUWK  
VA FileMan 2 ^%DT  ^DIE  
Kernel 1 $$FMTE^XLFDT  
Surgery 1 ^SROSPLG  

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
Lab Service 1 LRAPLG  

Entry Points

Name Comments DBIA/ICR reference
EN ;
GETP
ADD
CK
SET
END

External References

Name Field # of Occurrence
^%DT EN+20, EN+25
^DIE ADD
^LRAP EN+14
EN1^LRAPKOE EN+12
^LRAPLG1 ADD+3
^LRAPLG2 CK+1
^LRAPPOW ADD+2
A^LRAPWU EN+19
^LRDPA GETP+1
D^LRU EN+20
V^LRU END
XR^LRU EN+19
YN^LRU EN+19, CK+1
D^LRUA GETP+3
X^LRUWK EN+16, EN+17
^SROSPLG GETP+9
$$FMTE^XLFDT GETP+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Log-In for ",LRH(0)," "
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: !
  • Line Location: GETP+0
Function Call: WRITE
  • Prompt: $C(7),!!,"NO DATE DIED ENTERED IN ",LRFNAM," FILE",!
  • Line Location: ADD+0
Function Call: WRITE
  • Prompt: !,"Yr:",1700+$E(Y,1,3)," Acc#:",X," IN LAB FILE FOR ",$P(@(LRPF_DFN_",0)"),U)," SSN:",$P(^(0),U,9)
  • Line Location: ADD+1
Function Call: WRITE
  • Prompt: $C(7),!!?20,"Also in accession file"
  • Line Location: CK+0
Function Call: WRITE
  • Prompt: !,"Enter in Accession File "
  • Line Location: CK+1
Routine Call
  • DIE
  • Line Location:
    • ADD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" GETP+9
^LAB(69.9 - [#69.9] EN+12
^LR - [#63] GETP+4, GETP+5, ADD+1
^LRO(68 - [#68] EN+22, EN+23*, EN+24, CK
^LRO(69.2 - [#69.2] SET

Label References

Name Line Occurrences
@( EN+18
ADD GETP+11
CK ADD+1
EN EN+13
END EN+2, EN+13, EN+14, EN+16, EN+17, EN+18, GETP+1
GETP GETP+11
SET EN+17

Naked Globals

Name Field # of Occurrence
^("AU" ADD+1
^(0 EN+22*, EN+23*, EN+24*, ADD+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+19*, EN+20, CK+1*
%DT EN+20*!, EN+25*
%DT("A" EN+20*
%DT(0 EN+20*
D0 EN+3~
DA ADD*, END+6!
DD EN+3~
DFN ADDADD+1, END+6!
DIC GETP!, ADD+3!, END+6!
DIE ADD*, ADD+3!, END+6!
DOD EN+6~, END+2!
DR ADD*, ADD+3!, END+6!
FDAIEN EN+6~, END+2!
H8 EN+6~, END+2!
LR END+6!
LR("L" EN+16*
LR6802 EN+6~, END+2!
LRAA EN+22, EN+23, EN+24, CKSETEND+6!
LRAA(3 EN+19*
LRACC EN+6~, END+2!
LRAD EN+20*, EN+21, EN+23, EN+24, END+6!
LRADD EN+5~
LRAPDIAL EN+13!, ADD+3!, END+6!
LRAPLGX EN+6~, EN+10*, END+2!
LRCAPA EN+16, EN+17, EN+18, END+6!
LRCDT EN+6~, END+2!
LRCNT EN+6~, END+2!
LRDFN GETP+1, GETP+4, GETP+5, ADD+1, CKEND+6!
LRDPAF GETP*, END+6!
LRDPF ADDEND+7!
LRDTI EN+25*, GETP+4, END+7!
LREAL EN+6~, END+2!
LREND EN+3~*
LREXP ADD*, END+7!
LRFDA EN+7~, END+3!
LRFNAM ADDEND+7!
LRH END+7!
LRH(0 EN+19, EN+20*
LRH(2 EN+21*
LRIENLOC EN+7~, END+3!
LRLWC EN+9~, EN+10*
LRMD ADD+3!, END+7!
LRNLT EN+7~, END+3!
LRNT EN+7~, END+3!
LRORDR EN+6~, EN+10*
LROT EN+7~, END+3!
LRPCEVSO EN+7~, END+3!
LRPF ADD+1, ADD+2, END+7!
LRPRAC GETP+2, GETP+3, END+7!
LRPRAC(1 GETP+2*, GETP+3*
LRPROVL EN+7~, END+3!
LRSAMP EN+7~, END+3!
LRSF515 EN+8~, END+4!
LRSIT GETP*, END+8!
LRSPEC EN+8~, END+4!
LRSPTOP EN+8~, END+4!
LRSS EN+16, EN+17, EN+18, EN+19, GETP+4, GETP+5, GETP+9, ADDADD+1, END+8!
LRT EN+16!, EN+17!, END+8!
LRTSORU EN+8~, END+4!
LRTST EN+8~, END+4!
LRUID EN+8~, END+4!
LRW END+8!
LRW("G" EN+17*
LRW("H&E" EN+16*
LRW("SS" EN+17*
LRWHN EN+21*, END+8!
OCXSEG EN+9~
ORGMDAT END+4!
ORGMDATZ EN+8~
ORIFN EN+9~, END+5!
SS EN+9~, END+5!
TEST EN+9~, END+5!
U EN+17, ADD+1
X EN+9~, EN+16*, EN+17*, EN+18, EN+25*, GETP+3*, GETP+4*, GETP+5, GETP+9*, ADD
ADD+1*, CK, SET*, END+5!
X11 EN+9~, END+5!
Y EN+9~, EN+14, EN+20*, EN+25, GETP+5*, GETP+6, GETP+7, ADDADD+1*, END+5!
Y(1 ADD+1*, CK
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All