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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCLVL04

Package: Patient Care Component Reports

Routine: APCLVL04


Information

APCLVL04 ; IHS/CMI/LAB - SCREEN LOGIC ;

Source Information

Source file <APCLVL04.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Patient Care Component Reports 2 $$DATE^APCLVLU  $$DATE^APCLVLU1  
VA Fileman 2 DD^%DT  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
BD ;
SETRPT ;
CMPRT ;EP - called from pgen item
EDDCD ;
EDDAPRT ;EP
ED ;get ending date
EDDSCR ;EP - CALLED FROM EDD (ALL TYPES)
EDDSEL ;EP - measurements and values
EDDSORT ;EP
GETEDD1 ;
EDDDATE ;GET VALUE RANGE
GETEDD ;

External References

Name Field # of Occurrence
DD^%DT ED+1
$$DATE^APCLVLU EDDAPRT+4, EDDAPRT+5, EDDAPRT+6, EDDAPRT+7, EDDAPRT+8
$$DATE^APCLVLU1 CMPRT+7, CMPRT+8
^DIR BD+1, ED+1, GETEDD1+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"With this selection item you will be prompted to enter the date range"
  • Line Location: EDDSEL+2
Function Call: WRITE
  • Prompt: !,"to search for Estimated Date of Delivery. You will then be prompted"
  • Line Location: EDDSEL+3
Function Call: WRITE
  • Prompt: !,"to select the Type of EDD estimation (LMP, Ultrasound or Clinical"
  • Line Location: EDDSEL+4
Function Call: WRITE
  • Prompt: !,"Parameters).",!
  • Line Location: EDDSEL+5
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !,"No date selected. Choose again."
  • Line Location: BD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !,"Please choose the type of EDD Determination. You will be given the"
  • Line Location: GETEDD1+1
Function Call: WRITE
  • Prompt: !,"chance to choose more than one."
  • Line Location: GETEDD1+2
Function Call: WRITE
  • Prompt: !,"No Types Selected. EDD not used as a selection item."
  • Line Location: GETEDD1+4
Routine Call
  • DIR
  • Line Location:
    • BD+1
    • ED+1
    • GETEDD1+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCLVRPT - [#9001003.8] SETRPT+3*, SETRPT+4*, SETRPT+5*, SETRPT+6*, EDDSCR+7, EDDSCR+8
^AUPNREP - [#9000017] EDDSCR+2, EDDSCR+9, EDDSCR+10, EDDSCR+11, EDDSCR+12, EDDSCR+13, EDDAPRT+4, EDDAPRT+5, EDDAPRT+6, EDDAPRT+7
, EDDAPRT+8, EDDSORT+4, EDDSORT+5, EDDSORT+6, EDDSORT+7, CMPRT+3, CMPRT+4, CMPRT+6, CMPRT+7, CMPRT+8
^AUTTCM - [#99999.11] CMPRT+5

Label References

Name Line Occurrences
BD ED+2
EDDCD EDDSCR+9, EDDSCR+10, EDDSCR+11, EDDSCR+12, EDDSCR+13
GETEDD BD+2
SETRPT GETEDD1+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A CMPRT+1~, CMPRT+2*, CMPRT+3*, CMPRT+4, CMPRT+6, CMPRT+7, CMPRT+8
>> APCLBDAT BD+3*, ED+1, GETEDD1+5
>> APCLCRIT SETRPT+3, SETRPT+4, SETRPT+5, SETRPT+6
>> APCLEDAT ED+3*, GETEDD1+5
APCLEDD GETEDD+1!, GETEDD1+4!
APCLEDD( GETEDD1+5*, SETRPT+1, SETRPT+4
>> APCLI EDDSCR+7, EDDSCR+8
>> APCLMSR(0 BD+2!
>> APCLPCNT CMPRT+10*, CMPRT+11
>> APCLPRNM( EDDAPRT+4*, EDDAPRT+5*, EDDAPRT+6*, EDDAPRT+7*, EDDAPRT+8*, CMPRT+11*
>> APCLPRNT EDDSORT+8*
>> APCLRPT SETRPT+3, SETRPT+4, SETRPT+5, SETRPT+6, EDDSCR+7, EDDSCR+8
>> APCLSPEC EDDSCR+4*
B EDDSCR+3~, EDDSCR+8*, EDDCD+1, CMPRT+1~, CMPRT+2*, CMPRT+4*, CMPRT+5*, CMPRT+6*, CMPRT+9
C EDDAPRT+2~, EDDAPRT+3*, EDDAPRT+4*, EDDAPRT+5*, EDDAPRT+6*, EDDAPRT+7*, EDDAPRT+8*, EDDSORT+2~, EDDSORT+3*, CMPRT+1~
, CMPRT+2*, CMPRT+9*, CMPRT+11
D EDDSCR+3~, EDDSCR+9*, EDDSCR+10*, EDDSCR+11*, EDDSCR+12*, EDDSCR+13*, EDDCD+1, EDDCD+2, EDDAPRT+2~, EDDAPRT+4*
, EDDAPRT+5*, EDDAPRT+6*, EDDAPRT+7*, EDDAPRT+8*, EDDSORT+2~, EDDSORT+4*, EDDSORT+5*, EDDSORT+6*, EDDSORT+7*, CMPRT+1~
, CMPRT+2*, CMPRT+7*, CMPRT+9
DA GETEDD1+3!
>> DFN EDDSCR+2, EDDSCR+9, EDDSCR+10, EDDSCR+11, EDDSCR+12, EDDSCR+13, EDDAPRT+4, EDDAPRT+5, EDDAPRT+6, EDDAPRT+7
, EDDAPRT+8, EDDSORT+4, EDDSORT+5, EDDSORT+6, EDDSORT+7, CMPRT+3, CMPRT+4, CMPRT+6, CMPRT+7, CMPRT+8
DIR BD+1!, ED+1!, GETEDD1+3!
DIR("A" BD+1*, ED+1*, GETEDD1+3*
DIR("B" ED+1*, GETEDD1+3*
DIR(0 BD+1*, ED+1*, GETEDD1+3*
>> DIRUT BD+1*, BD+2, ED+1*, ED+2, GETEDD1+4
>> DUOUT BD+1, ED+1
E EDDSCR+3~, EDDSCR+8*, EDDCD+2, EDDSORT+2~, EDDSORT+3*, EDDSORT+4*, EDDSORT+5*, EDDSORT+6*, EDDSORT+7*, EDDSORT+8
, CMPRT+1~, CMPRT+2*, CMPRT+8*, CMPRT+9
G EDDSCR+3~, EDDSCR+5*, EDDSCR+9, EDDSCR+10, EDDSCR+11, EDDSCR+12, EDDSCR+13, EDDCD+3*
U GETEDD1+5, EDDSCR+8, EDDSCR+9, EDDSCR+10, EDDSCR+11, EDDSCR+12, EDDSCR+13, EDDAPRT+4, EDDAPRT+5, EDDAPRT+6
, EDDAPRT+7, EDDAPRT+8, EDDSORT+4, EDDSORT+5, EDDSORT+6, EDDSORT+7, CMPRT+4, CMPRT+5, CMPRT+6, CMPRT+7
, CMPRT+8
X GETEDD1+5*, SETRPT+1*, SETRPT+4, SETRPT+5, EDDSCR+6!, EDDSCR+9*, EDDSCR+10*, EDDSCR+11*, EDDSCR+12*, EDDSCR+13*
X(1 EDDSCR+9*, EDDSCR+10*, EDDSCR+11*, EDDSCR+12*, EDDSCR+13*
Y BD+3, ED+1*, ED+3, GETEDD1+5, SETRPT+1*, SETRPT+2*, SETRPT+4, SETRPT+5, SETRPT+6, EDDSCR+3~
, EDDSCR+7*, EDDSCR+8
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All