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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: AQAOYP3

Package: Quality Assurance

Routine: AQAOYP3


Information

AQAOYP3 ; IHS/ORDC/LJF - PATCH #3 DRIVER ;

Source Information

Source file <AQAOYP3.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 4 ^DIC  ^DIE  ^DIK  ^DIR  
Quality Assurance 2 CUMP2^AQAOYP2  ^AQAXINIT  
Kernel 1 $$REPLACE^XLFSTR  
MailMan 1 ^XMD  

Entry Points

Name Comments DBIA/ICR reference
CUMP3 ;EP -- to be called by future patches
1 ; -- SUBRTN edit qi data entry option
START ; -- Start of process to install patch #3
; -- install 3 print templates & 4 input templates
2 ; -- SUBRTN to edit help text on inactive fields
EXIT ; -- eoj
FILE ;;
MSG ;;
MAIL ; -- SUBRTN to send mail message

External References

Name Field # of Occurrence
CUMP2^AQAOYP2 START+21
^AQAXINIT START+11
^DIC 1+4
^DIE 1+6, 1+8
^DIK START+17
^DIR AQAOYP3+6
$$REPLACE^XLFSTR 2+6
^XMD MAIL+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,"QAI PATCH 3 DRIVER"
  • Line Location: AQAOYP3+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: AQAOYP3+4
Function Call: WRITE
  • Prompt: !!,"First I need to run an init to install some templates:"
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !?5,"Print templates: AQAO ACTION LIST"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !?5," AQAO FINDINGS LIST"
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !?5," AQAO WORKSHEET"
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !?5,"Input template: AQAO RATE REVIEW"
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !?5," AQAO PROV ACTION EDIT"
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !?5," AQAO PROV ACTION ADD"
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !?5," AQAO PROV LEVEL ADD"
  • Line Location: START+9
Function Call: WRITE
  • Prompt: !,"And the Help Frames detailing the QAI patches",!!
  • Line Location: START+10
Function Call: WRITE
  • Prompt: !!,"I will now delete the temporary entry in the PACKAGE file"
  • Line Location: START+14
Function Call: WRITE
  • Prompt: !,"used to install these templates and help frames. . ."
  • Line Location: START+15
Function Call: WRITE
  • Prompt: !,"No entry to DELETE!!"
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !,"Entry DELETED.",!
  • Line Location: START+17
Function Call: WRITE
  • Prompt: !!,"PATCH #3 INSTALLED!",!
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !!,"Updating QI Data Entry so provider add function works"
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !,"during review process.",!
  • Line Location: 1+2
Function Call: WRITE
  • Prompt: !!,"Fixing help text on Inactive fields.",!
  • Line Location: 2+1
Function Call: WRITE
  • Prompt: !!,"Mail message sent to all QAI users.",!
  • Line Location: MAIL+6
Routine Call
  • DIE
  • Line Location:
    • 1+6
    • 1+8
Routine Call
  • DIC
  • Line Location:
    • 1+4
Routine Call
  • DIR
  • Line Location:
    • AQAOYP3+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] Classic Fileman Calls
^AQAQX - [#9002166.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( 2+6*
^DIC(9.4 - [#9.4] START+16
^XUSEC("AQAOZMENU" MAIL+5

Label References

Name Line Occurrences
1 CUMP3+1
2 CUMP3+1
CUMP3 START+24
EXIT AQAOYP3+6
MAIL START+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AQAO 2+2~, 2+6, MAIL+1~
AQAO( MAIL+3*
AQAO("ACTIVATE" 2+3*
AQAO("activate" 2+3*
AQAOI 2+2~, 2+4*, MAIL+1~, MAIL+3*
DA START+16*, START+17, START+18!, 1+3~, 1+5*, 1+7*
DA(1 1+7*
DIC 1+3~, 1+4*
DIC(0 1+4*
DIE 1+3~, 1+5*, 1+7*
DIK START+17*, START+18!
DIR AQAOYP3+4!
DIR("A" AQAOYP3+5*
DIR("B" AQAOYP3+4*
DIR(0 AQAOYP3+4*
DR 1+3~, 1+5*, 1+8*
X 1+3~, 1+4*, 2+2~, 2+6*, MAIL+4*, MAIL+5*
XMSUB MAIL+1~, MAIL+2*
XMTEXT MAIL+1~, MAIL+2*
XMY MAIL+1~
XMY( MAIL+5*
Y AQAOYP3+6, 1+3~, 1+4, 1+5, 2+2~, 2+5*, 2+6
Z 2+2~, 2+5*, 2+6

Marked Items

Name Field # of Occurrence
$T(FILE+AQAOI 2+5
$T(MSG+AQAOI MAIL+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All