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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCLW2

Package: Patient Care Component Reports

Routine: APCLW2


Information

APCLW2 ; IHS/CMI/LAB - AGE BUCKET/DIAGNOSIS REPORT ;

Source Information

Source file <APCLW2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Patient Care Component Reports 2 ^APCLSTMP  DEMOCHK^APCLUTL  
VA Fileman 2 ^DIC  ^DIR  
IHS VA Utilities 1 ^XBDBQUE  

Entry Points

Name Comments DBIA/ICR reference
SORT ;
C ;
IDENT ;
E ;
ZIS ;
DEMO ;
AGE ;
BMIR ;range of BMIs
SEX ;
START ;
B ;
EXIT ;
T ;
TEMPLATE ;If Template was selected
V ;
REPORT ;
INDBEN ;
STMP ;

External References

Name Field # of Occurrence
^APCLSTMP STMP+2
DEMOCHK^APCLUTL DEMO+1
^DIC TEMPLATE+2
^DIR START+8, SEX+1, INDBEN+2, AGE+3, BMIR+6, REPORT+2, SORT+1, IDENT+1
^XBDBQUE DEMO+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?15,"***** RISK FOR OVERWEIGHT PREVALENCE REPORT *****",!!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !
  • Line Location: INDBEN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: AGE+1
Function Call: WRITE
  • Prompt: !!,"No age range entered. All ages will be included."
  • Line Location: AGE+5
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"Enter an age range in the format nnn-nnn. E.g. 2-5, 12-74, 5-20."
  • Line Location: AGE+6
Function Call: WRITE
  • Prompt: !,$C(7),"Cannot run for patients under 2."
  • Line Location: AGE+7
Function Call: WRITE
  • Prompt: !,$C(7),"Cannot run for patients over 74."
  • Line Location: AGE+8
Function Call: WRITE
  • Prompt: !!,"If you want to include only patients whose BMI is within a certain range"
  • Line Location: BMIR+2
Function Call: WRITE
  • Prompt: !,"please enter that range below. For example to include only patients"
  • Line Location: BMIR+3
Function Call: WRITE
  • Prompt: !,"whose BMI is between 30 and 40 enter 30-40. To include only patients"
  • Line Location: BMIR+4
Function Call: WRITE
  • Prompt: !,"whose BMI is over 25 enter 25-99.",!
  • Line Location: BMIR+5
Function Call: WRITE
  • Prompt: !!,"No BMI range entered. All BMI values will be included."
  • Line Location: BMIR+8
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"Enter a BMI range in the format nnn-nnn. E.g. 20-25, 30.5-99."
  • Line Location: BMIR+9
Function Call: WRITE
  • Prompt: !,$C(7),"Cannot run for BMI values under 1."
  • Line Location: BMIR+10
Function Call: WRITE
  • Prompt: !,$C(7),"Cannot run for BMI values over 99."
  • Line Location: BMIR+11
Function Call: WRITE
  • Prompt: ?26,"LIST OF PATIENTS AT NHANES 85-94TH PERCENTILE"
  • Line Location: V+1
Function Call: WRITE
  • Prompt: !,"This report will produce a listing of all patients of the age and sex ",!,"that you specify, who are, based on the BMI, considered overweight.",!
  • Line Location: V+2
Function Call: WRITE
  • Prompt: ?24,"LIST OF PATIENTS >=NHANES 95TH PERCENTILE"
  • Line Location: B+1
Function Call: WRITE
  • Prompt: !,"This report will produce a listing of all patients of the age and sex ",!,"that you specify, who are, based on the BMI, considered obese.",!
  • Line Location: B+2
Function Call: WRITE
  • Prompt: ?18,"COMBINED LIST OF PATIENTS NHANES 85-100TH PERCENTILE"
  • Line Location: C+1
Function Call: WRITE
  • Prompt: !,"This report will produce a listing of all patients of the age and sex ",!,"that you specify, who are, based on the BMI, considered overweight or obese.",!
  • Line Location: C+2
Function Call: WRITE
  • Prompt: ?33,"PATIENT LIST"
  • Line Location: T+1
Function Call: WRITE
  • Prompt: !,"This report will produce a listing of all patients of the age and sex ",!,"that you specify. The report will list their weight, height and BMI.",!
  • Line Location: T+2
Function Call: WRITE
  • Prompt: ?5,"LIST OF PATIENTS WITH POTENTIAL HEIGHT OR WEIGHT ERROR"
  • Line Location: E+1
Function Call: WRITE
  • Prompt: !,"This report will produce a listing of all patients of the age and sex ",!,"that you specify, whose BMI falls below or exceeds the reasonable data check",!,"limits as shown in the BMI Standard reference table.",!
  • Line Location: E+2
Function Call: WRITE
  • Prompt: "These patient records should be checked for possible inaccurate height or ",!,"weight entries.",!
  • Line Location: E+3
Function Call: WRITE
  • Prompt: !
  • Line Location: TEMPLATE+2
Routine Call
  • DIC
  • Line Location:
    • TEMPLATE+2
Routine Call
  • DIR
  • Line Location:
    • START+8
    • SEX+1
    • INDBEN+2
    • AGE+3
    • BMIR+6
    • REPORT+2
    • SORT+1
    • IDENT+1

Label References

Name Line Occurrences
@( START+2
AGE AGE+6, AGE+7, AGE+8, BMIR+7, BMIR+10, BMIR+11, REPORT+3, SORT+2
BMIR AGE+5, BMIR+9
EXIT START+9, DEMO+5
INDBEN AGE+4
REPORT AGE+10, BMIR+8, STMP+3
SEX INDBEN+3, TEMPLATE+6
SORT IDENT+2
START START+12, SEX+2, TEMPLATE+3, TEMPLATE+5
STMP REPORT+5, DEMO+2
TEMPLATE START+11
ZIS IDENT+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCL1YR EXIT+1!
APCL3YR EXIT+1!
APCL80 EXIT+1!
APCLA EXIT+1!
APCLAGE EXIT+1!
APCLAGER AGE+2!, AGE+9*, EXIT+1!
APCLBD EXIT+1!
APCLBHGH EXIT+1!
APCLBMI EXIT+1!
APCLBMIR BMIR+1!, BMIR+12*
APCLBTH EXIT+1!
APCLCHT EXIT+1!
APCLCLAS EXIT+2!
APCLCWT EXIT+1!
>> APCLDEMO DEMO+1, DEMO+2
APCLDT EXIT+1!
APCLER EXIT+1!
APCLGHT EXIT+1!
APCLGRAN EXIT+1!
APCLGWT EXIT+1!
APCLHGHA EXIT+1!
APCLHRN EXIT+1!
APCLIBEN INDBEN+4*, EXIT+2!
APCLIDEN IDENT+3*, EXIT+1!
APCLJOB EXIT+2!
APCLLENG EXIT+2!
APCLMGI EXIT+2!
APCLMHT EXIT+2!
APCLMWT EXIT+2!
APCLNAME EXIT+2!
APCLNN EXIT+2!
APCLOBE EXIT+2!
APCLOVR EXIT+2!
APCLPG EXIT+2!
APCLQUIT EXIT+2!, TEMPLATE+3*
APCLREF EXIT+2!
APCLROHT EXIT+2!
APCLROWT EXIT+2!
APCLRPT START+2, AGE+10, EXIT+2!
>> APCLRTYP REPORT+1*, REPORT+4*, REPORT+5
APCLSEAT START+5*, EXIT+3!, TEMPLATE+4*
APCLSEX SEX+3*, EXIT+1!, EXIT+2!
APCLSEXP EXIT+2!
APCLSNAM STMP+1!
APCLSORT SORT+3*, EXIT+1!, EXIT+2!
APCLSRT EXIT+2!
APCLSTMP STMP+1!, STMP+3
APCLTEXT EXIT+2!
APCLTYPE START+4*, START+10*, START+11, EXIT+3!, TEMPLATE+3!
APCLX EXIT+2!
APCLY EXIT+2!
DA REPORT+2!, EXIT+3!, TEMPLATE+2!
DIC EXIT+3!, TEMPLATE+2*!
DIC("A" TEMPLATE+2*
DIC("S" TEMPLATE+2*
DIC(0 TEMPLATE+2*
DICR TEMPLATE+2!
DIR START+6!, START+8!, SEX+1!, INDBEN+2!, AGE+3!, BMIR+6!, REPORT+2!, SORT+1!, IDENT+1!, EXIT+3!
DIR("A" START+8*, SEX+1*, INDBEN+2*, AGE+3*, BMIR+6*, REPORT+2*, SORT+1*, IDENT+1*
DIR("B" SEX+1*, INDBEN+2*, REPORT+2*, SORT+1*, IDENT+1*
DIR(0 START+7*, SEX+1*, INDBEN+2*, AGE+3*, BMIR+6*, REPORT+2*, SORT+1*, IDENT+1*
>> DIRUT START+8*, START+9, SEX+1*, SEX+2, INDBEN+2*, INDBEN+3, AGE+3*, BMIR+6*, REPORT+3, SORT+1*
, SORT+2, IDENT+1*, IDENT+2, TEMPLATE+5
DR TEMPLATE+2!
>> DUOUT START+8, START+12, SEX+1, INDBEN+2, AGE+3, AGE+4, BMIR+6, BMIR+7, SORT+1, IDENT+1
J EXIT+3!
K EXIT+3!
M EXIT+3!
S EXIT+3!
X START+6!, EXIT+3!
>> XBNS DEMO+3*
>> XBRC DEMO+3*
>> XBRP DEMO+3*
>> XBRX DEMO+3*
Y START+6!, START+10, SEX+3, INDBEN+4, AGE+5, AGE+6, AGE+7, AGE+8, AGE+9, BMIR+8
, BMIR+9, BMIR+10, BMIR+11, BMIR+12, REPORT+4, SORT+3, IDENT+3, EXIT+3!, TEMPLATE+3, TEMPLATE+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All