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: AQALDG4

Package: Quality Assurance

Routine: AQALDG4


Information

AQALDG4 ; IHS/ORDC/LJF - AUTOLINK ADT OCCURRENCES ;

Source Information

Source file <AQALDG4.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 ^%DTC  ^DIC  EN^DIQ1  
Quality Assurance 2 ^AQALKILL  CREATE^AQALNK  
MailMan 1 ^XMB  

Entry Points

Name Comments DBIA/ICR reference
EXIT1
ERRORMSG ; >>> send bulletin if any error messages exist
CREATE ; >>> call ^aqalnk to create occurrence
CHECK ; >>> check results
ICUCHK ; >>SUBRTN to see which ICU parameter applies
EXIT ; >>> eoj
FIND ; >>> find variables for autolink rtn

External References

Name Field # of Occurrence
^%DTC ICUCHK+9, ICUCHK+14
^AQALKILL EXIT1+1
CREATE^AQALNK CREATE+1
^DIC FIND+14
EN^DIQ1 FIND+12
^XMB ERRORMSG+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"QAI Occurrence entry created for this transaction: "
  • Line Location: CHECK+3
Function Call: WRITE
  • Prompt: " (",$P($P(^DD(AQALF,AQALEV,0),U),"LINK"),")",!
  • Line Location: CHECK+4
Function Call: WRITE
  • Prompt: !!,*7,"ERROR IN QI PARAMETER FILE OR IN ADT CALL TO ^AQALDG. CALL YOUR SITE MANAGER.",!!
  • Line Location: EXIT+1
Routine Call
  • DIC
  • Line Location:
    • FIND+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AQAGP - [#9002166.4] Classic Fileman Calls
^AQAO(2 - [#9002168.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AQAGP - [#9002166.4] FIND+7, FIND+38, FIND+39, ICUCHK+1, ICUCHK+10, ICUCHK+15
^AQAO(9 - [#9002168.9] ERRORMSG+2
^AUPNPAT - [#9000001] ERRORMSG+5
^AUPNVSIT - [#9000010] FIND+28, FIND+29
^AUPNVSIT("AA" FIND+27
^DD( CHECK+4
^DIC(42 - [#42] FIND+34, ICUCHK+8, ICUCHK+13
^DIC(45.7 - [#45.7] FIND+37
^DPT - [#2] FIND+2, FIND+25, ERRORMSG+4, ICUCHK+3, ICUCHK+5, ICUCHK+6, ICUCHK+7, ICUCHK+9, ICUCHK+12, ICUCHK+14
^UTILITY("DIQ1" FIND+9!, FIND+12, FIND+13, FIND+17, FIND+45, EXIT1!

Label References

Name Line Occurrences
ERRORMSG CHECK+1
EXIT FIND+13, FIND+14, FIND+17, FIND+19, FIND+21, FIND+42, CREATE+2, CHECK+4
EXIT1 AQALDG4+11, AQALDG4+12, AQALDG4+13, AQALDG4+14, FIND+2, FIND+7, FIND+12, FIND+38
ICUCHK FIND+8

Naked Globals

Name Field # of Occurrence
^( FIND+13
^(0 FIND+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %Y ICUCHK+10, ICUCHK+15
>> AQALADM AQALDG4+11, FIND+25, ICUCHK+3, ICUCHK+5, ICUCHK+6, ICUCHK+7, ICUCHK+9, ICUCHK+12, ICUCHK+14
>> AQALAR( ERRORMSG+6*
>> AQALAR(1 ERRORMSG+4*
>> AQALAR(2 ERRORMSG+5*
AQALDT ICUCHK+2~, ICUCHK+3*, ICUCHK+4, ICUCHK+9, ICUCHK+14
>> AQALEV AQALDG4+12, AQALDG4+13, AQALDG4+14, FIND+8, FIND+11, FIND+12, FIND+13, FIND+17, FIND+39, FIND+45
, CHECK+4, ICUCHK+10*, ICUCHK+11, ICUCHK+15*
>> AQALF FIND+9*, FIND+12, FIND+13, FIND+17, FIND+45, CHECK+4
>> AQALHSV AQALDG4+12, FIND+37
AQALIFN FIND+1!, CHECK+1, EXIT+1
>> AQALNK("BUL" FIND+3*
>> AQALNK("DATE" FIND+20*, FIND+21
>> AQALNK("DUP O K" , FIND+45*, FIND+46!
>> AQALNK("FAC" FIND+42*
>> AQALNK("HSV" FIND+37*, FIND+38
>> AQALNK("IND" FIND+14*
>> AQALNK("PAT" FIND+4*
>> AQALNK("VSIT" FIND+31*
>> AQALNK("WARD" FIND+34*
AQALNKF FIND+1!, EXIT+1
AQALNKF( ERRORMSG+6
>> AQALPAT ERRORMSG+4, ERRORMSG+5
>> AQALTR AQALDG4+13, ICUCHK+3
AQALVST FIND+24!, FIND+27, FIND+30*, FIND+31
>> AQALWD FIND+34
AQALX ICUCHK+2~, ICUCHK+4*, ICUCHK+5*, ICUCHK+6
>> DA FIND+10*
>> DFN AQALDG4+11, FIND+2, FIND+4, FIND+25, FIND+27, ICUCHK+3, ICUCHK+5, ICUCHK+6, ICUCHK+7, ICUCHK+9
, ICUCHK+12, ICUCHK+14
DIC FIND+10!*, FIND+14!*
DIC(0 FIND+14*
DR FIND+10!, FIND+11*
DUZ(2 AQALDG4+11, FIND+7, FIND+10, FIND+12, FIND+13, FIND+17, FIND+38, FIND+39, FIND+42, FIND+45
, ERRORMSG+5, ICUCHK+1, ICUCHK+10, ICUCHK+15
>> I FIND+11*
U FIND+2, FIND+28, FIND+29, FIND+34, FIND+37, FIND+39, CHECK+4, ERRORMSG+4, ERRORMSG+5, ICUCHK+1
, ICUCHK+7, ICUCHK+8, ICUCHK+9, ICUCHK+10, ICUCHK+12, ICUCHK+13, ICUCHK+15
X FIND+13*, FIND+17*, FIND+18, FIND+25*, FIND+26*, FIND+27, FIND+38*, FIND+39, ERRORMSG+2*, ERRORMSG+3
, ERRORMSG+6*, ICUCHK+2~, ICUCHK+7*, ICUCHK+8, ICUCHK+10, ICUCHK+12*, ICUCHK+13, ICUCHK+15
>> X1 ICUCHK+9*, ICUCHK+14*
>> X2 ICUCHK+9*, ICUCHK+14*
XMB ERRORMSG+1*, ERRORMSG+7!
XMDUX ERRORMSG+7!
>> XMDUZ ERRORMSG+1*
XMTEXT ERRORMSG+7*!
XMY ERRORMSG+7!
XMY( ERRORMSG+3*
Y FIND+14, FIND+18*, FIND+19, FIND+20, FIND+26*, FIND+27*, FIND+28, FIND+29, FIND+30, ERRORMSG+6*
, ICUCHK+2~, ICUCHK+6*, ICUCHK+7, ICUCHK+9
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