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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AQAOUT

Package: Quality Assurance

Routine: AQAOUT


Information

AQAOUT ; IHS/ORDC/LJF - UTILITIES FOR QAI PKG ;

Source Information

Source file <AQAOUT.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
IHS VA Utilities 1 ($$VAL,$$VALI)^XBDIQ1  
VA Fileman 1 Y^DIQ  

Entry Points

Name Comments DBIA/ICR reference
CRIT ;ENTRY POINT for output transform on name field in
; qi occ criteria file; code too long (>255 characters)
Q ;quit
LEVEL ; -- SUBRTN to print prov/vendor/person type & level
DRUG ;ENTRY POINT for identifier on drug in data entry
PROV ;ENTRY POINT to print identifiers on qi occ provider entries

External References

Name Field # of Occurrence
Y^DIQ DRUG+5
$$VAL^XBDIQ1 PROV+4, PROV+7, PROV+11, PROV+12, PROV+15, LEVEL+2
$$VALI^XBDIQ1 PROV+2, PROV+5, LEVEL+1, LEVEL+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?65," >>",$P(AQAOX,U,7),"<<"
  • Line Location: CRIT+12
Function Call: WRITE
  • Prompt: " CHS ",Z
  • Line Location: PROV+6
Function Call: WRITE
  • Prompt: " CHS ",$$VAL^XBDIQ1(9999999.34,Y,.02)
  • Line Location: PROV+7
Function Call: WRITE
  • Prompt: " ",$$VAL^XBDIQ1(200,+X,9999999.01)," "
  • Line Location: PROV+11
Function Call: WRITE
  • Prompt: $$VAL^XBDIQ1(200,+X,53.5)
  • Line Location: PROV+12
Function Call: WRITE
  • Prompt: " ",$$VAL^XBDIQ1(200,+X,8)
  • Line Location: PROV+15
Function Call: WRITE
  • Prompt: " [",$$VALI^XBDIQ1(9002166.7,AQAOXX,.05)
  • Line Location: LEVEL+1
Function Call: WRITE
  • Prompt: "/",$$VAL^XBDIQ1(9002166.7,AQAOXX,.07),"]"
  • Line Location: LEVEL+2
Function Call: WRITE
  • Prompt: "*"
  • Line Location: LEVEL+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AQAO1(4 - [#9002169.4] CRIT+7, CRIT+8
^AQAOCC(5 - [#9002166.5] CRIT+3
^AQAOCC(6 - [#9002166.6] DRUG+3
^DD(9002166.6 DRUG+4
^XUSEC("PROVIDER" PROV+10

Label References

Name Line Occurrences
LEVEL PROV+8, PROV+13
Q CRIT+4, CRIT+7, CRIT+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AQAOK CRIT+2~, CRIT+9*, CRIT+10, CRIT+11
AQAOX CRIT+2~, CRIT+3*, CRIT+4, CRIT+5, CRIT+7, CRIT+8, CRIT+9, CRIT+12
>> AQAOXX CRIT+3, DRUG+3, PROV+2, LEVEL+1, LEVEL+2, LEVEL+3
C DRUG+2~, DRUG+4*
U CRIT+4, CRIT+5, CRIT+7, CRIT+8, CRIT+9, CRIT+12, DRUG+3, DRUG+4
X PROV+1~, PROV+2*, PROV+3, PROV+4, PROV+5, PROV+10, PROV+11, PROV+12, PROV+15
Y DRUG+2~, DRUG+3*, DRUG+5, PROV+1~, PROV+5*, PROV+7
>> Z PROV+4*, PROV+6
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All