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 ;AVAMC/REG/WTY - POW PATIENT LOOK-UP ;10/16/2001

Source Information

Source file <LRAPPOW.m>

Call Graph

Call Graph Total: 2

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 2 LRAPLG  LRSPT  

Entry Points

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

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,ARMED FORCES INSTITUTE OF PATHOLOGY"
  • Line Location: FLG+10
Function Call: WRITE
  • Prompt: !,?3,"ATTENTION: FORMER POW REGISTRY"
  • Line Location: FLG+12
Function Call: WRITE
  • Prompt: !,?3,"WASHINGTON, D.C. 20306",!,"<A POW label (VA Form 10-5558) may "
  • Line Location: FLG+14
Function Call: WRITE
  • Prompt: "be attached to packaged specimens>"
  • Line Location: FLG+15
Function Call: WRITE
  • Prompt: !!,"MARK CASE CLEARLY AS:"
  • Line Location: FLG+17
Function Call: WRITE
  • Prompt: " FORMER POW ",X
  • Line Location: FLG+18
Function Call: WRITE
  • Prompt: !,"NOTE IN APPROPRIATE FORM THAT MATERIAL HAS BEEN SENT TO THE AFIP"
  • Line Location: FLG+20
Function Call: WRITE
  • Prompt: !!
  • Line Location: FLG+22
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 AFIP using the AFIP 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+11, LRAPPOW+14

Label References

Name Line Occurrences
FLG LRAPPOW+13
NOTE FLG+21
PAGE FLG+1, FLG+3, FLG+6, FLG+9, FLG+11, FLG+13, FLG+16, FLG+19, 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+16

Naked Globals

Name Field # of Occurrence
^( LRAPPOW+11, LRAPPOW+12, LRAPPOW+15
^(0 FLG+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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