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

Package: Patient Care Component Reports

Routine: APCLVL0


Information

APCLVL0 ; IHS/CMI/LAB - SCREEN LOGIC ;

Source Information

Source file <APCLVL0.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 4 DD^%DT  C^%DTC  MIX^DIC1  ^DIR  
PCC Medical Query 1 PEP^AMQQGTX0  
Patient Care Component Reports 1 (C,J,N,S,Y)^APCLVL01  

Entry Points

Name Comments DBIA/ICR reference
Q1
BD ;get beginning date
C ;EP
D ;DATE RANGE
F ;FREE TEXT RANGE
ED ;get ending date
J ;
N ;
Q ;EP
S ;
R ;EP
Y ;
TAXV ;for query cloning

External References

Name Field # of Occurrence
DD^%DT ED+1
C^%DTC ED+4
PEP^AMQQGTX0 Q+7
C^APCLVL01 C+1
J^APCLVL01 J+1
N^APCLVL01 N+1
S^APCLVL01 S+1
Y^APCLVL01 Y+1
MIX^DIC1 Q+3
^DIR R+1, BD+1, ED+1, F+2, TAXV+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "OOPS - QMAN NOT CURRENT - QUITTING"
  • Line Location: Q+3
Function Call: WRITE
  • Prompt: !!,$C(7),"** No ",$P(^APCLVSTS(APCLCRIT,0),U)," selected, all will be included."
  • Line Location: Q+8
Function Call: WRITE
  • Prompt: !!,"*** All items selected, if you want all then do not select this item."
  • Line Location: Q+9
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !!,"No range entered. All ",APCLTEXT," will be included."
  • Line Location: F+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: F+4
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"Enter an free text range in the format AAA:AAA. E.g. 94-01:94-200,CA:CZ, A:Z."
  • Line Location: F+5
Function Call: WRITE
  • Prompt: !!,"You entered a taxonomy name for this item. ["_$P(AMQQTAXN,U)_"]"
  • Line Location: TAXV+1
Function Call: WRITE
  • Prompt: !,"You have the option of sending the name of the taxonomy to each site and have"
  • Line Location: TAXV+2
Function Call: WRITE
  • Prompt: !,"the taxonomy resolved at the site OR to send the individual coded values"
  • Line Location: TAXV+3
Function Call: WRITE
  • Prompt: !,"for this taxonomy.",!
  • Line Location: TAXV+4
Function Call: WRITE
  • Prompt: !,"exiting......start over.."
  • Line Location: TAXV+6
Routine Call
  • DIR
  • Line Location:
    • R+1
    • BD+1
    • ED+1
    • F+2
    • TAXV+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMQQ(5 - [#9009075] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCLVRPT - [#9001003.8] Q+11*, Q+12*, Q+13*, R+5*, R+6*, ED+6*, ED+7*, F+1!, F+6*, F+7*
^APCLVSTS - [#9001003.7] Q+3, Q+5, Q+8, Q+10, R+1, F+4, F+5
^UTILITY("AMQQ DRUG CLASS" Q+2!
^UTILITY("AMQQ TAX" Q+2!
^XTMP("APCLVL" Q+2!, Q+8, Q+9!, Q+13, Q1+1!

Label References

Name Line Occurrences
BD ED+2
F F+4, F+5
Q1 Q+12
R R+7
TAXV Q+10

Naked Globals

Name Field # of Occurrence
^(0 R+1
^(21 F+4
^(22 F+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMQQSQNM Q+5*, Q1!
AMQQTAXN Q+1!, Q+10, Q+12, Q1!, TAXV+1
>> APCLBDAT BD+3*, ED+1, ED+4, ED+7
>> APCLBQC Q+10
APCLBQC1 Q+10!*, Q+12, TAXV+7*
>> APCLCNT R+6*, ED+7*, F+7*
>> APCLCRIT Q+3, Q+5, Q+8, Q+10, Q+11, Q+12, Q+13, R+1, R+5, R+6
, ED+6, ED+7, F+1, F+4, F+5, F+6, F+7
>> APCLEDAT ED+3*, ED+7
APCLQMAN Q+4*, Q+7, Q1!
>> APCLRPT Q+11, Q+12, Q+13, R+5, R+6, ED+6, ED+7, F+1, F+6, F+7
>> APCLSDAT ED+4*
>> APCLTEXT BD+1, ED+1, F+3
>> D Q+3*
DA Q+3!, TAXV+5!
DD Q+3!
DIC Q+3!*
DIC("S" Q+3*
DIC(0 Q+3*
DICR Q+3!
DINUM Q+3!
DIR R+1!, BD+1!, ED+1!, F+2!, TAXV+5!
DIR("A" R+1*, BD+1*, ED+1*, F+2*, TAXV+5*
DIR("B" ED+1*, TAXV+5*
DIR(0 R+1*, BD+1*, ED+1*, F+2*, TAXV+5*
>> DIRUT R+1*, R+2, BD+1*, BD+2, ED+1*, ED+2, F+2*, TAXV+6
>> DUOUT R+1, BD+1, ED+1, F+2
U Q+3, Q+5, Q+8, Q+10, Q+12, R+1, R+6, ED+7, F+7, TAXV+1
V Q1!
X Q+3!*, Q+13*, Q1!, ED+4, F+4*, F+7
>> X1 ED+4*
>> X2 ED+4*
Y Q+3!, Q+4, Q+13*, Q1!, R+3, R+4, R+6, BD+3, ED+1*, ED+3
, F+3, F+4, F+5, TAXV+7
Z Q1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All