Routine: AQAOPCX

Information

AQAOPCX ; IHS/ORDC/LJF - EXTRA SCREENS ON REPORTS ;

Source file <AQAOPCX.m>

Package	Total	Call Graph
IHS VA Utilities	1	$$VAL^XBDIQ1
VA Fileman	1	EN^DIQ1

Package	Total	Caller Graph
Quality Assurance	4	AQAOPC11 AQAOPC21 AQAOPC41 AQAOPC71

Name	Comments	DBIA/ICR reference
MAINCHK	; >> SUBRTN to screen by items selected by user ; find data within occurrence for sort requested
CLASS()	; -- EXTRN VAR to return provider class if any
CHK(AQAOL)
XTRACHK	; >> SUBRTN to check xtra screen requested by user
TYPE()	; -- EXTRN VAR to return provider, person, or vendor

Name	Field # of Occurrence
EN^DIQ1	MAINCHK+5
$$VAL^XBDIQ1	CLASS+2

Name	Line Occurrences (* Changed, ! Killed)
^AQAO1(9 - [#9002169.9]	MAINCHK+2, MAINCHK+4, XTRACHK+3
^UTILITY("DIQ1"	MAINCHK+5!, MAINCHK+6, MAINCHK+7, MAINCHK+16!

Name	Field # of Occurrence
^(0	MAINCHK+4

Name	Field # of Occurrence
AQAOARS	CHK+4!, CHK+6
AQAOARS(	MAINCHK+14, MAINCHK+15
>> AQAOFD	MAINCHK+4*, MAINCHK+6, MAINCHK+7
>> AQAOFL	MAINCHK+4*, MAINCHK+6, MAINCHK+7
AQAOFLG	CHK+3~, CHK+4, CHK+6, CHK+7, MAINCHK+10, MAINCHK+12, XTRACHK+2, XTRACHK+4, XTRACHK+5*
AQAOICD0	CHK+3~
AQAOL	CHK~, MAINCHK+2, MAINCHK+4, XTRACHK+3
AQAONOD	CHK+3~, MAINCHK+2, MAINCHK+3
AQAOX	CHK+3~, MAINCHK+3*, MAINCHK+5, MAINCHK+6, MAINCHK+7
>> AQAOXS(	XTRACHK+2, XTRACHK+5
>> AQAOXS(0	MAINCHK+10, MAINCHK+13
>> AQAOXS(1	MAINCHK+10, MAINCHK+13
>> AQAOXSM	MAINCHK+14
AQAOY	CHK+3~, MAINCHK+6*, MAINCHK+10, MAINCHK+13, MAINCHK+14, CLASS+1, CLASS+2, TYPE+1
>> AQAOY1	MAINCHK+7*, MAINCHK+15
>> DA	MAINCHK+5*
>> DIC	MAINCHK+4*
>> DIQ(0	MAINCHK+5*
>> DR	MAINCHK+4*
I	CHK+3~, XTRACHK+1, XTRACHK+2, XTRACHK+5
U	MAINCHK+4
X	CHK+3~, MAINCHK+2, CLASS+2, CLASS+3
Y	CHK+3~, XTRACHK+3*
Z	CHK+3~, XTRACHK+4, XTRACHK+5