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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BLRAAORU

Package: IHS Changes To Lab

Routine: BLRAAORU


Information

BLRAAORU ;IHS/OIT/MKK - IHS LAB ASK-AT-ORDER UTILITIES ; JUL 06, 2011 3:15 PM

Source Information

Source file <BLRAAORU.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
IHS Changes To Lab 3 (ASKNOTCE,ASKQUES)^BLRAAORU  (HEADERDT,PRESSKEY)^BLRGMENU  (GETACCCP,SENDMAIL,SNDALERT)^BLRUTIL3  
VA Fileman 3 UPDATE^DIE  $$GET1^DIQ  ^DIR  
IHS VA Utilities 1 ^XBFMK  
Kernel 1 ($$FMTE,$$HTE)^XLFDT  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Lab Service 5 LROE  LRORD1  LROW2  LRVER4  LRWLST  
IHS Changes To Lab 2 BLRAAORU  BLRAG05  

Entry Points

Name Comments DBIA/ICR reference
ORDNSTOR(LRORD) ; EP -- Store Ask at Order questions given Lab Order Number
ERRSPURG ; EP - Purge Errors Global
LISTCOMA(LRAS) ; EP - List Comments from Lab Data File given Accession Number
ADDCOMNT(WOT,ERRCNT) ; EP - Add the comment
ASKATORD(LRORD) ; EP - If have Order Number, Lab Ask-At-Order Questions
ERRSPURI ; EP -- Initialize variables
LISTCOML(LRDFN,LRIDT) ; EP - List Comments from Lab Data File
UPDTCOML(LRDFN,LRIDT,LRODT,LRSP) ; EP - Update the Comment line(s)
ASKQUES(P60,LRODT,LRSP,ORDNUM) ; EP - Ask the question(s) for a SPECIFIC test
GETDTSP(ORDNUM,P60,LRODT,LRSP) ; EP -- Have Order # & Test: Need LRODT & LRSP
ADDERRS(WOT,ERRS,ERRCNT) ; EP -- Add Errors. Send Alert & Email
ASKNOTCE(P60)
SHOWANSA(ANSARRAY,HOWMANY) ; EP - Display ANSWERS Array
CORRAANS(ANSARRAY) ; EP - Determine if any changes are needed to answers
GETLRAS(LRORD) ; EP -- Get the Accession(s) tied to an Order
QUESASK(ANSWERS,DZERO,QUESORD,CNT,P60)
TASKPURG ; EP -- Tasked entry point for purging the ^BLRAAORE file.
ERRPURYN(QUES) ; EP -- Questions
UPDTAAOQ ; EP - Try to update the Lab Data file with entries in the BLRAAORD file
STOREANS(P60,ANSWERS,LRODT,LRSP) ; EP - Store Answers into AAO data file

External References

Name Field # of Occurrence
ASKNOTCE^BLRAAORU QUESASK+19
ASKQUES^BLRAAORU ASKATORD+12
HEADERDT^BLRGMENU ERRSPURG+3, ERRSPURG+7, ERRSPURG+10, ERRSPURG+13
PRESSKEY^BLRGMENU LISTCOMA+6, LISTCOMA+12, ERRSPURG+19, ERRPURYN+10
GETACCCP^BLRUTIL3 LISTCOMA+3
SENDMAIL^BLRUTIL3 ADDERRS+21, TASKPURG+11
SNDALERT^BLRUTIL3 ADDERRS+22, ADDERRS+28
UPDATE^DIE ADDCOMNT+14
$$GET1^DIQ QUESASK+8
^DIR QUESASK+26, CORRAANS+9, ERRPURYN+6
^XBFMK QUESASK+22, CORRAANS+6, ERRPURYN+3
$$FMTE^XLFDT QUESASK+30
$$HTE^XLFDT ADDCOMNT+9, TASKPURG+8, TASKPURG+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: CORRAANS+12
Function Call: WRITE
  • Prompt: !!!,?9,"Correct which Lab Ask-At-Order Answer?",!!
  • Line Location: SHOWANSA+1
Function Call: WRITE
  • Prompt: " #",?4,"Question",?66,"Answer",!
  • Line Location: SHOWANSA+2
Function Call: WRITE
  • Prompt: ?4,$TR($J("",60)," ","-"),?66,$TR($J("",14)," ","-"),!
  • Line Location: SHOWANSA+3
Function Call: WRITE
  • Prompt: $J(QUESORD,2),")",?4,$E($P(STR,"^"),1,60),?66,$E($P(STR,"^",2),1,14),!
  • Line Location: SHOWANSA+7
Function Call: WRITE
  • Prompt: !,$J(HOWMANY,2),")",?4,"None. All Answers are correct.",!
  • Line Location: SHOWANSA+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: SHOWANSA+11
Function Call: WRITE
  • Prompt: !!,"NOTICE:",!
  • Line Location: ASKNOTCE+1
Function Call: WRITE
  • Prompt: ?4,"The test ",!
  • Line Location: ASKNOTCE+2
Function Call: WRITE
  • Prompt: ?9,$P($G(^LAB(60,P60,0)),"^")," [",P60,"]",!
  • Line Location: ASKNOTCE+3
Function Call: WRITE
  • Prompt: ?4,"has been designated a Lab Ask-At-Order test and, as such,",!
  • Line Location: ASKNOTCE+4
Function Call: WRITE
  • Prompt: ?4,"has questions that should be answered at ordering.",!!
  • Line Location: ASKNOTCE+5
Function Call: WRITE
  • Prompt: ?4,"Please note that if you press the RETURN key, a null",!
  • Line Location: ASKNOTCE+6
Function Call: WRITE
  • Prompt: ?4,"answer is stored.",!!
  • Line Location: ASKNOTCE+7
Function Call: WRITE
  • Prompt: !!,"Value in ^LR(",LRDFN,",",$C(34),"CH",$C(34),",",LRIDT,"):",!
  • Line Location: LISTCOML+1
Function Call: WRITE
  • Prompt: ?2,COMMENT,?4,$E($G(^LR(LRDFN,"CH",LRIDT,1,COMMENT,0)),1,77),!
  • Line Location: LISTCOML+4
Function Call: WRITE
  • Prompt: !,"Invalid Accession Number.",!
  • Line Location: LISTCOMA+5
Function Call: WRITE
  • Prompt: !,"Could not determine LRDFN and/or LRIDT.",!
  • Line Location: LISTCOMA+11
Function Call: WRITE
  • Prompt: !!,"Value in ^LR(",LRDFN,",",$C(34),"CH",$C(34),",",LRIDT,"):",!
  • Line Location: LISTCOMA+14
Function Call: WRITE
  • Prompt: ?2,COMMENT,?4,$E($G(^LR(LRDFN,"CH",LRIDT,1,COMMENT,0)),1,77),!
  • Line Location: LISTCOMA+17
Function Call: WRITE
  • Prompt: !!,"Very Well. LAAOE File Purged.",!!
  • Line Location: ERRSPURG+14
Function Call: WRITE
  • Prompt: !!!,?9,"Quit/No/Invalid response. Routine Ends."
  • Line Location: ERRPURYN+9
Function Call: WRITE
  • Prompt: "CNT:",CNT,!
  • Line Location: UPDTAAOQ+12
Function Call: WRITE
  • Prompt: LRORD
  • Line Location: GETLRAS+14
Function Call: WRITE
  • Prompt: ?9,$S(LRAA>0:LRAA,1:"")
  • Line Location: GETLRAS+15
Function Call: WRITE
  • Prompt: ?14,$S(LRAD>0:LRAD,1:"")
  • Line Location: GETLRAS+16
Function Call: WRITE
  • Prompt: ?24,$S(LRAN>0:LRAN,1:"")
  • Line Location: GETLRAS+17
Function Call: WRITE
  • Prompt: ?54,LRDFN
  • Line Location: GETLRAS+19
Function Call: WRITE
  • Prompt: ?64,LRIDT
  • Line Location: GETLRAS+20
Function Call: WRITE
  • Prompt: !
  • Line Location: GETLRAS+21
Routine Call
  • DIE
  • Line Location:
    • ADDCOMNT+14
Routine Call
  • DIR
  • Line Location:
    • QUESASK+26
    • CORRAANS+9
    • ERRPURYN+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BLRUCUM - [#90475.3] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BLRAAOQ - [#90475.4] ASKQUES+14, QUESASK+1
^BLRAAOQ("B" ASKQUES+4
^BLRAAOQD( UPDTCOML+4, UPDTCOML+7, UPDTCOML+8, UPDTCOML+9, UPDTCOML+14!, ASKQUES+10, STOREANS+2!, STOREANS+4*, STOREANS+5*, STOREANS+10*
, ORDNSTOR+7, UPDTAAOQ+5, UPDTAAOQ+6, UPDTAAOQ+7, UPDTAAOQ+8
^BLRAAORE( ADDERRS+6*
^LAB(60 - [#60] ASKNOTCE+3
^LR - [#63] ADDCOMNT+11, LISTCOML+3, LISTCOML+4, LISTCOMA+16, LISTCOMA+17
^LRO( ADDERRS+8, ADDERRS+24
^LRO(68 - [#68] ADDERRS+26, LISTCOMA+8, LISTCOMA+9, ORDNSTOR+12, ORDNSTOR+15, ORDNSTOR+16, GETLRAS+11, GETLRAS+12, GETLRAS+13
^LRO(69 - [#69] GETDTSP+4, GETDTSP+6, GETDTSP+8, GETDTSP+9, ASKATORD+6, ASKATORD+8, ASKATORD+10, ASKATORD+11, ORDNSTOR+4, ORDNSTOR+6
, ORDNSTOR+9, ORDNSTOR+10, GETLRAS+4, GETLRAS+6, GETLRAS+8, GETLRAS+9
^VA(200 - [#200] STOREANS+5

Label References

Name Line Occurrences
$$ERRPURYN ERRSPURG+5, ERRSPURG+8, ERRSPURG+11
ADDCOMNT UPDTCOML+10
ADDERRS ADDCOMNT+16
CORRAANS ASKQUES+17
ERRSPURI ERRSPURG+2
GETDTSP ASKQUES+7
ORDNSTOR UPDTAAOQ+9
QUESASK ASKQUES+15, CORRAANS+13
SHOWANSA CORRAANS+5
STOREANS ASKQUES+19
UPDTCOML ORDNSTOR+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ALLOKAY CORRAANS+1~, CORRAANS+3*, CORRAANS+4, CORRAANS+10*
ANSARRAY CORRAANS~, CORRAANS+5, CORRAANS+13, SHOWANSA~
ANSARRAY( SHOWANSA+5, SHOWANSA+6
ANSWER UPDTCOML+1~
ANSWERS ASKQUES+1~, ASKQUES+15, ASKQUES+17, ASKQUES+19, QUESASK~, STOREANS~
ANSWERS( QUESASK+38*, STOREANS+8, STOREANS+10
ASKORDQ UPDTCOML+1~, UPDTCOML+9*, UPDTCOML+10
BAILOUT ASKQUES+1~, ASKQUES+12*, ASKQUES+14
CNT ASKQUES+1~, ASKQUES+12*, ASKQUES+15, QUESASK~, QUESASK+19, QUESASK+21*, STOREANS+1~, STOREANS+7*, STOREANS+9*, STOREANS+10
, UPDTAAOQ+1~, UPDTAAOQ+3*, UPDTAAOQ+10*, UPDTAAOQ+12
>> COMMENT LISTCOML+2*, LISTCOML+3*, LISTCOML+4, LISTCOMA+15*, LISTCOMA+16*, LISTCOMA+17
CURANS ASKQUES+1~, QUESASK+28*, QUESASK+31*, QUESASK+32*, QUESASK+34*, QUESASK+35*, QUESASK+38
DATANAME ASKQUES+1~
DEF ASKQUES+1~, QUESASK+5*, QUESASK+25
DIE UPDTCOML+1~
>> DIR("A" QUESASK+24*, ERRPURYN+5*
>> DIR("B" QUESASK+25*, CORRAANS+8*
>> DIR(0 QUESASK+23*, CORRAANS+7*, ERRPURYN+4*
DUZ STOREANS+5
DZERO ASKQUES+1~, ASKQUES+4*, ASKQUES+5, ASKQUES+14, ASKQUES+15, QUESASK~, QUESASK+1, CORRAANS+13
ERRCNT UPDTCOML+1~, UPDTCOML+6*, UPDTCOML+10, UPDTCOML+14, ADDCOMNT~, ADDCOMNT+16, ADDERRS~, ADDERRS+3*
ERRS UPDTCOML+1~, ADDCOMNT+16, ADDERRS~, ADDERRS+6
ERRS("DIERR" ADDCOMNT+16
FDA UPDTCOML+1~
FDA( ADDCOMNT+12*
FOUNDIT GETDTSP+1~, GETDTSP+3*, GETDTSP+4, GETDTSP+6, GETDTSP+8, GETDTSP+9*, GETDTSP+11
FOUNDIT("LRODT" GETDTSP+9*, GETDTSP+11
FOUNDIT("LRSP" GETDTSP+9*, GETDTSP+11
HEADER ERRSPURG+1~
HEADER(1 ERRSPURI+1*
HEADER(2 ERRSPURI+2*
HOWMANY CORRAANS+5, CORRAANS+7, CORRAANS+8, CORRAANS+10, SHOWANSA~, SHOWANSA+8*, SHOWANSA+9*, SHOWANSA+10
IENS UPDTCOML+1~
IENS(1 ADDCOMNT+11*
LINES ERRSPURG+1~, ERRSPURI+4*
LRAA ADDERRS+1~, ADDERRS+25*, ADDERRS+26, LISTCOMA+1~, LISTCOMA+3, LISTCOMA+4, LISTCOMA+8, LISTCOMA+9, ORDNSTOR+1~, ORDNSTOR+11*
, ORDNSTOR+12, ORDNSTOR+15, ORDNSTOR+16, GETLRAS+1~, GETLRAS+10*, GETLRAS+11, GETLRAS+12, GETLRAS+13, GETLRAS+15
LRAD ADDERRS+1~, ADDERRS+25*, ADDERRS+26, LISTCOMA+1~, LISTCOMA+3, LISTCOMA+4, LISTCOMA+8, LISTCOMA+9, ORDNSTOR+1~, ORDNSTOR+11*
, ORDNSTOR+12, ORDNSTOR+15, ORDNSTOR+16, GETLRAS+1~, GETLRAS+10*, GETLRAS+11, GETLRAS+12, GETLRAS+13, GETLRAS+16
LRAN ADDERRS+1~, ADDERRS+25*, ADDERRS+26, LISTCOMA+1~, LISTCOMA+3, LISTCOMA+4, LISTCOMA+8, LISTCOMA+9, ORDNSTOR+1~, ORDNSTOR+11*
, ORDNSTOR+12, ORDNSTOR+15, ORDNSTOR+16, GETLRAS+1~, GETLRAS+10*, GETLRAS+11, GETLRAS+12, GETLRAS+13, GETLRAS+17, GETLRAS+18
LRAS ADDERRS+1~, ADDERRS+26*, ADDERRS+28, LISTCOMA~, LISTCOMA+3, ORDNSTOR+1~, ORDNSTOR+12*, ORDNSTOR+13, GETLRAS+1~, GETLRAS+11*
, GETLRAS+18
LRDFN UPDTCOML~, ADDCOMNT+11, ADDCOMNT+12, ADDERRS+6, ADDERRS+14, LISTCOML~, LISTCOML+1, LISTCOML+3, LISTCOML+4, LISTCOMA+1~
, LISTCOMA+8*, LISTCOMA+10, LISTCOMA+14, LISTCOMA+16, LISTCOMA+17, ORDNSTOR+15*, ORDNSTOR+17, GETLRAS+12*, GETLRAS+19
LRIDT UPDTCOML~, ADDCOMNT+11, ADDCOMNT+12, ADDERRS+6, ADDERRS+15, LISTCOML~, LISTCOML+1, LISTCOML+3, LISTCOML+4, LISTCOMA+1~
, LISTCOMA+9*, LISTCOMA+10, LISTCOMA+14, LISTCOMA+16, LISTCOMA+17, ORDNSTOR+1~, ORDNSTOR+16*, ORDNSTOR+17, GETLRAS+1~, GETLRAS+13*
, GETLRAS+20
LRODT UPDTCOML~, UPDTCOML+4, UPDTCOML+7, UPDTCOML+8, UPDTCOML+9, UPDTCOML+14, ADDERRS+6, ADDERRS+8, ADDERRS+16, ADDERRS+24
, ASKQUES~, ASKQUES+7, ASKQUES+8, ASKQUES+10, ASKQUES+19, GETDTSP~, GETDTSP+3*, GETDTSP+4*, GETDTSP+6, GETDTSP+8
, GETDTSP+9, GETDTSP+11*, STOREANS~, STOREANS+2, STOREANS+4, STOREANS+5, STOREANS+10, ASKATORD+1~, ASKATORD+5*, ASKATORD+6*
, ASKATORD+8, ASKATORD+10, ASKATORD+11, ASKATORD+12, ORDNSTOR+1~, ORDNSTOR+3*, ORDNSTOR+4*, ORDNSTOR+6, ORDNSTOR+7, ORDNSTOR+9
, ORDNSTOR+10, ORDNSTOR+17, UPDTAAOQ+1~, UPDTAAOQ+4*, UPDTAAOQ+5*, UPDTAAOQ+6, UPDTAAOQ+7, UPDTAAOQ+8, GETLRAS+1~, GETLRAS+3*
, GETLRAS+4*, GETLRAS+6, GETLRAS+8, GETLRAS+9
LRORD ASKATORD~, ASKATORD+3, ASKATORD+6, ASKATORD+8, ASKATORD+12, ORDNSTOR~, ORDNSTOR+4, ORDNSTOR+6, UPDTAAOQ+1~, UPDTAAOQ+4*
, UPDTAAOQ+8*, UPDTAAOQ+9, GETLRAS~, GETLRAS+4, GETLRAS+6, GETLRAS+14
LRSP UPDTCOML~, UPDTCOML+4, UPDTCOML+7, UPDTCOML+8, UPDTCOML+9, UPDTCOML+14, ADDERRS+6, ADDERRS+8, ADDERRS+17, ADDERRS+24
, ASKQUES~, ASKQUES+7, ASKQUES+8, ASKQUES+10, ASKQUES+19, GETDTSP~, GETDTSP+5*, GETDTSP+6*, GETDTSP+8, GETDTSP+9
, GETDTSP+11*, STOREANS~, STOREANS+2, STOREANS+4, STOREANS+5, STOREANS+10, ASKATORD+1~, ASKATORD+7*, ASKATORD+8*, ASKATORD+10
, ASKATORD+11, ASKATORD+12, ORDNSTOR+1~, ORDNSTOR+5*, ORDNSTOR+6*, ORDNSTOR+7, ORDNSTOR+9, ORDNSTOR+10, ORDNSTOR+17, UPDTAAOQ+1~
, UPDTAAOQ+4*, UPDTAAOQ+6*, UPDTAAOQ+7, UPDTAAOQ+8, GETLRAS+1~, GETLRAS+5*, GETLRAS+6*, GETLRAS+8, GETLRAS+9
MAXLINES ERRSPURG+1~, ERRSPURI+4*
ORD UPDTCOML+1~, UPDTCOML+6*, UPDTCOML+8*, UPDTCOML+9, ADDERRS+6, ADDERRS+19, STOREANS+1~, STOREANS+7*, STOREANS+8*, STOREANS+10
ORDER ASKQUES+1~
ORDNUM ASKQUES~, ASKQUES+7, GETDTSP~, GETDTSP+4, GETDTSP+6
P60 UPDTCOML+1~, UPDTCOML+6*, UPDTCOML+7*, UPDTCOML+8, UPDTCOML+9, ADDERRS+6, ADDERRS+8, ADDERRS+18, ASKQUES~, ASKQUES+4
, ASKQUES+7, ASKQUES+10, ASKQUES+15, ASKQUES+19, QUESASK~, QUESASK+19, CORRAANS+13, GETDTSP~, GETDTSP+9, ASKNOTCE~
, ASKNOTCE+3, STOREANS~, STOREANS+4, STOREANS+5, STOREANS+10, UPDTAAOQ+1~, UPDTAAOQ+4*, UPDTAAOQ+7*, UPDTAAOQ+8
P60BORDR UPDTCOML+1~
P60DESC UPDTCOML+1~
PG ERRSPURG+1~, ERRSPURI+4*
PTR ASKQUES+1~, QUESASK+6*, QUESASK+12, QUESASK+31, GETDTSP+1~, ASKATORD+1~, ASKATORD+11*, ASKATORD+12, ORDNSTOR+1~, GETLRAS+1~
QFLG ERRSPURG+1~, ERRSPURI+4*
QUES ERRPURYN~, ERRPURYN+5
QUESCNT UPDTCOML+1~
QUESDESC ASKQUES+1~
QUESORD ASKQUES+1~, ASKQUES+12*, ASKQUES+14*, ASKQUES+15, QUESASK~, QUESASK+1, QUESASK+38, SHOWANSA+4*, SHOWANSA+5*, SHOWANSA+6
, SHOWANSA+7, SHOWANSA+8
QUEST ASKQUES+1~, QUESASK+2*, QUESASK+16*, QUESASK+24
>> QUESTCNT UPDTCOML+6*, UPDTCOML+11*
READWHAT ASKQUES+2~, QUESASK+10*, QUESASK+12*, QUESASK+13*, QUESASK+23, QUESASK+33
RESPONSE ERRPURYN+1~, ERRPURYN+7*, ERRPURYN+11
RJAMT ADDCOMNT+1~, ADDCOMNT+5*, ADDCOMNT+6*, ADDCOMNT+9
STORQUES ASKQUES+2~, QUESASK+2*, QUESASK+3*, QUESASK+38
STR ADDERRS+1~, ADDERRS+10!, ADDERRS+21, ADDERRS+24*, ADDERRS+25, ASKQUES+2~, QUESASK+1*, QUESASK+2, QUESASK+4, QUESASK+5
, QUESASK+6, QUESASK+7, SHOWANSA+6*, SHOWANSA+7, ERRSPURG+1~, ERRSPURG+16*, ERRSPURG+17, TASKPURG+1~, TASKPURG+3*, TASKPURG+4
, TASKPURG+11, ORDNSTOR+1~, ORDNSTOR+10*, ORDNSTOR+11, GETLRAS+1~, GETLRAS+9*, GETLRAS+10
STR(1 ADDERRS+12*, TASKPURG+6*
STR(2 ADDERRS+13*, TASKPURG+7*
STR(3 ADDERRS+14*, TASKPURG+8*
STR(4 ADDERRS+15*, TASKPURG+9*
STR(5 ADDERRS+16*
STR(6 ADDERRS+17*
STR(7 ADDERRS+18*
STR(8 ADDERRS+19*
STR(9 ADDERRS+20*
TAB ADDERRS+1~, ADDERRS+11*, ADDERRS+14, ADDERRS+15, ADDERRS+16, ADDERRS+17, ADDERRS+18, ADDERRS+19, ADDERRS+20
TEST GETDTSP+1~, GETDTSP+7*, GETDTSP+8*, GETDTSP+9
TST ADDERRS+1~, ADDERRS+8*, ADDERRS+9, ADDERRS+24, ASKATORD+9*, ASKATORD+10*, ASKATORD+11, ORDNSTOR+1~, ORDNSTOR+8*, ORDNSTOR+9*
, ORDNSTOR+10, GETLRAS+1~, GETLRAS+7*, GETLRAS+8*, GETLRAS+9
TSTORD ASKATORD+1~
TYPE ASKQUES+2~, QUESASK+4*, QUESASK+10, QUESASK+13, QUESASK+30
UCUM ASKQUES+2~, QUESASK+7*, QUESASK+8
UNITS ASKQUES+2~, QUESASK+8*, QUESASK+16, QUESASK+32
WOT ADDCOMNT~, ADDCOMNT+5, ADDCOMNT+9*, ADDCOMNT+12, ADDCOMNT+16, ADDERRS~, ADDERRS+20
>> X QUESASK+30*, QUESASK+31
>> Y QUESASK+29, QUESASK+30, QUESASK+31, CORRAANS+10, CORRAANS+13, ERRPURYN+7, ERRPURYN+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All