Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AMQQAVR

Package: PCC Medical Query

Routine: AMQQAVR


Information

AMQQAVR ; IHS/CMI/THL - RELATIVE DATE ;

Source Information

Source file <AMQQAVR.m>

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
PCC Medical Query 2 AMQQAV  AMQQSQA1  

Entry Points

Name Comments DBIA/ICR reference
R3RS
R4CK
HELPD
HELPA
R2RS
R3RE
DATE
R2RE
RT
R2CK
SET
R3CK
EN1 ; ENTRY POINT FOR VISITS
RG
R1RS
R1 ; BIRTHDAY
R2 ; DEATHDAY
R3 ; AGE
R1CK
R1RE
DATE1
HELPD1
R4RS
EXIT
TYPE
R4RE
D1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Relative to what date =>",!!
  • Line Location: TYPE+0
Function Call: WRITE
  • Prompt: ?3,I,") ",Y,!
  • Line Location: TYPE+2
Function Call: WRITE
  • Prompt: !,"Your choice (1-",I-1,"): 1// "
  • Line Location: RT+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: RT+1
Function Call: WRITE
  • Prompt: " (1)"
  • Line Location: RT+2
Function Call: WRITE
  • Prompt: !!!,"Results are screened by comparing the date of result with the ""relative"" date",!!
  • Line Location: RT+3
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: RT+6
Function Call: WRITE
  • Prompt: !
  • Line Location: R1+2
Function Call: WRITE
  • Prompt: !,"Time window begins how long after patient's birth: "
  • Line Location: R1RS+0
Function Call: WRITE
  • Prompt: !,"The window ends how long after birth: "
  • Line Location: R1RE+0
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: R1CK+0
Function Call: WRITE
  • Prompt: !
  • Line Location: R2+1
Function Call: WRITE
  • Prompt: !,"The window of time begins how long before each patient's death: "
  • Line Location: R2RS+0
Function Call: WRITE
  • Prompt: !,"The window ends how long before death: "
  • Line Location: R2RE+0
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: R2CK+0
Function Call: WRITE
  • Prompt: !
  • Line Location: R3+1
Function Call: WRITE
  • Prompt: !,"Enter the baseline age: "
  • Line Location: R3+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: R3+3
Function Call: WRITE
  • Prompt: " (years)"
  • Line Location: R3+7
Function Call: WRITE
  • Prompt: !,"Enter beginning of time window relative to each patient's age: "
  • Line Location: R3RS+0
Function Call: WRITE
  • Prompt: !,"Enter the end of the time window relative to the baseline age: "
  • Line Location: R3RE+0
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: R3CK+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: RG+0
Function Call: WRITE
  • Prompt: " (years)"
  • Line Location: RG+4
Function Call: WRITE
  • Prompt: !!,"You must also specify time units; e.g. 6 MONTHS or 30 YEARS",!!,*7
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: " (",C,$S(C=1:"st",C=2:"nd",C=3:"rd",1:"th")," BIRTHDAY)"
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: D1+0
Function Call: WRITE
  • Prompt: !!,"Enter a time period like ""6 MONTHS"" or ""30 DAYS"" or ""2 YEARS""",!!
  • Line Location: HELPD+0
Function Call: WRITE
  • Prompt: !!,"Enter a baseline age like ""3 YEARS"" or ""18 MONTHS""",!!
  • Line Location: HELPA+0
Function Call: WRITE
  • Prompt: !!,"Enter a time period relative to the ",$S($D(AMQQSQRD):"visit",1:"baseline age"),".",!
  • Line Location: HELPD1+0
Function Call: WRITE
  • Prompt: "For example, ""+3 YEARS"" includes a time period 3 years beyond the ",$S($D(AMQQSQRD):"visit",1:"baseline age"),".",!
  • Line Location: HELPD1+1
Function Call: WRITE
  • Prompt: "Similarly, ""-18 MONTHS"" includes the 18 month period before the ",$S($D(AMQQSQRD):"visit",1:"baseline age"),".",!!
  • Line Location: HELPD1+2
Function Call: WRITE
  • Prompt: !!,"You can specify a time window relative to the visit date.",!!
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: "Enter the start of the time window relative to the visit: "
  • Line Location: R4RS+0
Function Call: WRITE
  • Prompt: !,"Enter the end of the time window relative to the visit: "
  • Line Location: R4RE+0
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: R4CK+0

Label References

Name Line Occurrences
@( RT+5, R1RS+3, R1RE+3, R2RS+3, R2RE+3, R3RS+3, R3RE+3, RG+3, RG+6, R4RS+3
, R4RE+3
D1 DATE
DATE R3+9
EXIT RT+4, RT+5
HELPA R3+5
R1 R1CK
R2 R2CK
R3 R3+5, R3+10, R3CK
R4RS R4CK
RG R1RS+2, R1RE+2, R2RS+2, R2RE+2, R3RS+2, R3RE+2, R4RS+2, R4RE+2
RT RT+3, RT+7
SET R1CK+1, R2CK+1, R3CK+1, R4CK+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% TYPE+1*, TYPE+2, EXIT+2!, DATE+5*
>> AMQQCOMP EXIT*, EXIT+1, R1+1*, R1CK, R2+1*, R2CK, R3+1*, R3+6*, R3+7, R3+11*
, R3CK, RG+4, RG+8*, DATE+4, SET, SET+1*, R4CK
>> AMQQDEST R1RS+3, R1RE+3, R2RS+3, R2RE+3, R3RS+3, R3RE+3, RG+2*, RG+3*, RG+7*, RG+9*
, R4RS+3, R4RE+3
>> AMQQFROU SET*
>> AMQQQUIT RT+4*, EXIT, R3+4*, RG+2*
>> AMQQSQCV EXIT+1*
>> AMQQSQRD HELPD1, HELPD1+1, HELPD1+2
C EXIT+2!, DATE+3*, DATE+4, DATE+5
DTIME RT+1, R3+3, RG
F EXIT+2!, R3+8*, RG+5*, DATE1*, DATE1+1*, DATE+5
I TYPE+2*, RT, RT+5, EXIT+2!
U TYPE+2, RT+1, RT+4, R1CK, R2CK, R3+3, R3+4, R3+11, R3CK, RG
, RG+2, RG+3, RG+6, RG+7, RG+8, RG+9, SET, SET+1, R4CK
X RT+1*, RT+2*, RT+3, RT+4, RT+5, EXIT+2!, R3+3*, R3+4, R3+5, R3+6
, R3+7*, RG*, RG+1*, RG+2, RG+3, RG+4*, DATE1+1*, DATE, DATE+1, DATE+2*
, DATE+3*, DATE+4, DATE+5
Y TYPE+2*, EXIT+2!, R3+10, R3+11, RG+7, RG+8, DATE+1*, DATE+5*, D1+1*
Z EXIT+2!, R1RS+1*, R1RE+1*, R2RS+1*, R2RE+1*, R3RS+1*, R3RE+1*, RG+1, RG+3, RG+6
, RG+7, RG+8, RG+9, R4RS+1*, R4RE+1*
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Local Variables |  All