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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: APCLDF0

Package: Patient Care Component Reports

Routine: APCLDF0


Information

APCLDF0 ; IHS/CMI/LAB -IHS -INTERACTIVE ROUTINE FOR DATA FETCHER ;

Source Information

Source file <APCLDF0.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Patient Care Component Reports 2 $$START1^APCLDF  ^APCLDF2  
IHS VA Utilities 1 ^XBKVAR  
VA Fileman 1 ^DIC  

Entry Points

Name Comments DBIA/ICR reference
ASK ;
START

External References

Name Field # of Occurrence
$$START1^APCLDF ASK+5
^APCLDF2 ASK+13
^DIC START
^XBKVAR APCLDF0+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !!,*7,"Do not enter the words 'DATE' or 'VALUE' before your script. This is done",!,"only for use with the report template utility.",!
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+5
Function Call: WRITE
  • Prompt: ?45
  • Line Location: ASK+9
Function Call: WRITE
  • Prompt: " "
  • Line Location: ASK+10
Function Call: WRITE
  • Prompt: !,"No ",$S($E("PATIENT",1,$L($P(APCLX," ")))=$P(APCLX," ")!($P(APCLX," ")="PT"):"demographic value",1:"clinical occurrence")," for this patient"
  • Line Location: ASK+12
Function Call: WRITE
  • Prompt: *7,!," => ",$P($T(@APCLER^APCLDF2),";",3)
  • Line Location: ASK+13
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+14
Routine Call
  • DIC
  • Line Location:
    • START

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Label References

Name Line Occurrences
ASK ASK+3, ASK+14
START ASK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASK+4~*
APCLDFVR ASK+5!
APCLDFVR( ASK+7
APCLER ASK+2!, ASK+5*, ASK+12, ASK+13!
APCLINT ASK+2!, ASK+5*
APCLPDFN START*, ASK+2!, ASK+5
APCLTYPE ASK+2!, ASK+5, ASK+8
APCLX ASK+1*, ASK+2!, ASK+3, ASK+4*, ASK+5*, ASK+8, ASK+12
APCLY ASK+2!, ASK+5*
DIC START*!
DIC(0 START*
DTIME ASK+1
I ASK+6~, ASK+7*
T ASK+7*, ASK+8, ASK+9, ASK+11!
U ASK+2, ASK+5, ASK+7
VALUE ASK+6~
Y START, ASK+7*, ASK+8, ASK+11!
Z ASK+6~, ASK+7*, ASK+8, ASK+9, ASK+11!

Marked Items

Name Field # of Occurrence
$T(@APCLER^APCLDF2 ASK+13
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  Marked Items |  All