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

Package: Lab Service

Routine: LRACM4


Information

LRACM4 ; IHS/DIR/FJE - INIT CUM REPORTS CONT. 9/10/87 09:55 ;

Source Information

Source file <LRACM4.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^%DT  YN^DICN  
Lab Service 1 ^LRACFIX  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRACM  

Entry Points

Name Comments DBIA/ICR reference
DEL1
MOR
DEL ;from LRACM
OUT

External References

Name Field # of Occurrence
^%DT DEL1+2
YN^DICN MOR+1
^LRACFIX MOR+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Each day has a different set of patients for which cumulatives are printed.",!,"Your next response will be a beginning date for combining these sets of",!,"patients into the next cumulative (ending date is today). "
  • Line Location: DEL1+0
Function Call: WRITE
  • Prompt: !,"A cumulative will be printed for each patient that originally",!,"had a cumulative during this time period. The potential for duplicates",!,"is high because of patient movement within the time period."
  • Line Location: DEL1+1
Function Call: WRITE
  • Prompt: " ",LRDTX
  • Line Location: DEL1+3
Function Call: WRITE
  • Prompt: !!,"Re-cross referencing just the ""AC"" index will recapture the pointers to",!,"^LR from ^LRO(68,""AC""; thus, all data back to a given date (date of going",!,"live with cum) that is still on the system can be reprinted.",!
  • Line Location: MOR+0
Function Call: READ
  • Prompt: !
  • Timeout: %>0
  • Variable: "Do you want to re-cross reference the ""AC"" X-ref from a certain date" S %=1 D YN^DICN Q
  • Line Location: MOR+1
Function Call: WRITE
  • Prompt: !,"You must answer 'Y'es or 'N'o."
  • Line Location: MOR+1
Function Call: WRITE
  • Prompt: !!,$C(7),"NO COMBINING HAS OCCURRED!"
  • Line Location: OUT+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(64.5 - [#64.5] DEL+1, DEL1+2*
^LRO(68 - [#68] DEL+1!
^LRO(69 - [#69] DEL1+3!

Label References

Name Line Occurrences
MOR DEL+1
OUT DEL1+2

Naked Globals

Name Field # of Occurrence
^( DEL+1
^(0 DEL+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % MOR+1*, MOR+2
>> %DT DEL1+2*
>> %DT("A" DEL1+2*
>> I DEL+1*, MOR+1*
LRDTX DEL1+3*, DEL1+4!
U DEL+1, DEL1+2
>> Y DEL1+2, DEL1+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All