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

Package: Lab Service

Routine: LRAPPOW


Information

LRAPPOW ;DALOI/REG/WTY - POW PATIENT LOOK-UP ;01/29/13 16:51

Source Information

Source file <LRAPPOW.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 $$CJ^XLFSTR  
Lab Service 1 (,F)^LRAPF  

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

Package Total Caller Graph
Lab Service 2 LRAPLG  LRSPT  

Entry Points

Name Comments DBIA/ICR reference
FLG ;
NOTE ;
R ;
PAGE ;

External References

Name Field # of Occurrence
^LRAPF PAGE+2
F^LRAPF PAGE+2
$$CJ^XLFSTR R+4, R+8, R+12, R+16, R+18, R+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?19,$C(7),"*** THIS PATIENT WAS A PRISONER OF WAR ***"
  • Line Location: FLG+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: FLG+4
Function Call: WRITE
  • Prompt: ?24,"POW PERIOD: ",X
  • Line Location: FLG+5
Function Call: WRITE
  • Prompt: !!,"FORWARD A DUPLICATE SET OF SLIDES,BLOCKS AND REPRESENTATIVE "
  • Line Location: FLG+7
Function Call: WRITE
  • Prompt: "WET TISSUE TO:"
  • Line Location: FLG+8
Function Call: WRITE
  • Prompt: !!,?3,"DIRECTOR,JOINT PATHOLOGY CENTER"
  • Line Location: FLG+10
Function Call: WRITE
  • Prompt: !,?3,"ATTENTION: FORMER POW REGISTRY"
  • Line Location: FLG+12
Function Call: WRITE
  • Prompt: !,?3,"606 STEPHEN SITTER AVENUE"
  • Line Location: FLG+14
Function Call: WRITE
  • Prompt: !,?3,"SILVER SPRING, MD 20910-1290",!,"<A POW label (VA Form 10-5558) may "
  • Line Location: FLG+16
Function Call: WRITE
  • Prompt: "be attached to packaged specimens>"
  • Line Location: FLG+17
Function Call: WRITE
  • Prompt: !!,"MARK CASE CLEARLY AS:"
  • Line Location: FLG+19
Function Call: WRITE
  • Prompt: " FORMER POW ",X
  • Line Location: FLG+20
Function Call: WRITE
  • Prompt: !,"NOTE IN APPROPRIATE FORM THAT MATERIAL HAS BEEN SENT TO THE JPC"
  • Line Location: FLG+22
Function Call: WRITE
  • Prompt: !!
  • Line Location: FLG+24
Function Call: WRITE
  • Prompt: !!,"Follow Guidelines for Performing Autopsy Examination on Former "
  • Line Location: NOTE+2
Function Call: WRITE
  • Prompt: "Prisoners of War (POW's) PROFESSIONAL SERVICES LETTER IL 11-82-17"
  • Line Location: NOTE+3
Function Call: WRITE
  • Prompt: !,"Be sure to take appropriate samples of:"
  • Line Location: NOTE+5
Function Call: WRITE
  • Prompt: !,"BRAIN, NERVE, TESTES, PROSTATE, URINARY BLADDER, and KIDNEY"
  • Line Location: NOTE+7
Function Call: WRITE
  • Prompt: $C(7),!!,$$CJ^XLFSTR(LRTMP,IOM)
  • Line Location: R+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: R+6
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("***************",IOM)
  • Line Location: R+8
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR(LRTMP,IOM)
  • Line Location: R+12
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR(LRTMP,IOM)
  • Line Location: R+16
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("the JPC using the JPC Requisition form. ",IOM)
  • Line Location: R+18
Function Call: WRITE
  • Prompt: !!
  • Line Location: R+20
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("***************",IOM)
  • Line Location: R+22
Function Call: WRITE
  • Prompt: !
  • Line Location: R+24

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(22 - [#22] FLG+5
^DPT - [#2] LRAPPOW+10, LRAPPOW+13

Label References

Name Line Occurrences
FLG LRAPPOW+12
NOTE FLG+23
PAGE FLG+1, FLG+3, FLG+6, FLG+9, FLG+11, FLG+13, FLG+15, FLG+18, FLG+21, NOTE+1
, NOTE+4, NOTE+6, R+2, R+5, R+7, R+9, R+13, R+17, R+19, R+21
, R+23
R LRAPPOW+15

Naked Globals

Name Field # of Occurrence
^( LRAPPOW+10, LRAPPOW+11, LRAPPOW+14
^(0 FLG+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN LRAPPOW+10, LRAPPOW+13
IOM R+4, R+8, R+12, R+16, R+18, R+22
IOSL PAGE+2
>> LR("Q" LRAPPOW+9*, LRAPPOW+10, FLG+1, FLG+3, FLG+6, FLG+9, FLG+11, FLG+13, FLG+15, FLG+18
, FLG+21, NOTE+1, NOTE+4, NOTE+6, R+2, R+5, R+7, R+9, R+13, R+17
, R+19, R+21, R+23
>> LRSF515 LRAPPOW+8*, PAGE+1
>> LRSS FLG+23
LRTMP R+1~, R+3*, R+4, R+10*, R+11*, R+12, R+14*, R+15*, R+16
U LRAPPOW+10, LRAPPOW+11, FLG+5
>> X LRAPPOW+11*, LRAPPOW+14*, LRAPPOW+15, FLG+5*, FLG+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All