Routine: AQAOPC82

Information

AQAOPC82 ; IHS/ORDC/LJF - PROVIDER PROFILE CALC ;

Package	Total	Call Graph
Quality Assurance	2	$$EXCEP^AQAOLKP ^AQAOPC83

Package	Total	Caller Graph
Quality Assurance	1	AQAOPC8

Name	Comments	DBIA/ICR reference
LOOP	; >> loop thru qi occ provider file for provider
NEXT	; >> go to print rtn

Name	Field # of Occurrence
$$EXCEP^AQAOLKP	LOOP+9
^AQAOPC83	NEXT+1

Name	Line Occurrences (* Changed, ! Killed)
^AQAO(2 - [#9002168.2]	LOOP+16, LOOP+19
^AQAO(6 - [#9002168.6]	LOOP+22
^AQAO(8 - [#9002168.8]	LOOP+21
^AQAO1(3 - [#9002169.3]	LOOP+6, LOOP+23, LOOP+24, LOOP+25
^AQAOC - [#9002167]	LOOP+8, LOOP+10, LOOP+20
^AQAOCC(7 - [#9002166.7]	LOOP+2, LOOP+3
^TMP("AQAOPC8"	AQAOPC82+6!, LOOP+30*
^TMP("AQAOPC8A"	AQAOPC82+6!, LOOP+34*
^TMP("AQAOPC8B"	AQAOPC82+6!, LOOP+36*

Name	Field # of Occurrence
>> AQAOA	LOOP+22, LOOP+27, LOOP+29, LOOP+33
>> AQAOAP	LOOP+4, LOOP+5, LOOP+27
>> AQAOBD	LOOP+13
>> AQAOCID	LOOP+10*, LOOP+29
>> AQAODT	LOOP+13*, LOOP+30
>> AQAOED	LOOP+13
>> AQAOF	LOOP+21, LOOP+27, LOOP+29, LOOP+33
>> AQAOIFN	LOOP+4*, LOOP+8, LOOP+9, LOOP+10, LOOP+20, LOOP+30
>> AQAOIND	LOOP+11, LOOP+12, LOOP+16, LOOP+19, LOOP+30, LOOP+34, LOOP+36
>> AQAOLV	LOOP+6, LOOP+7, LOOP+29, LOOP+33
>> AQAOM	LOOP+16*, LOOP+30
>> AQAOMSF	LOOP+16
>> AQAOMSF(	LOOP+12
>> AQAOMSF(0	LOOP+12
>> AQAOO	LOOP+24*, LOOP+29, LOOP+35
>> AQAOP	LOOP+23*, LOOP+29, LOOP+35
>> AQAOPROV	LOOP+2
>> AQAOS	LOOP+3, LOOP+4, LOOP+6, LOOP+10, LOOP+11, LOOP+13
>> AQAOTYP	LOOP+4, LOOP+7, LOOP+29, LOOP+33
>> AQAOU	LOOP+25*, LOOP+29, LOOP+35
>> AQAOX	LOOP+1, LOOP+2, LOOP+3
>> S	LOOP+20*, LOOP+21, LOOP+22, LOOP+23, LOOP+24, LOOP+25
U	LOOP+4, LOOP+6, LOOP+8, LOOP+10, LOOP+11, LOOP+13, LOOP+16, LOOP+19, LOOP+21, LOOP+22 , LOOP+23, LOOP+24, LOOP+25, LOOP+29
>> X	LOOP+21, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+29, LOOP+30, LOOP+33, LOOP+34, LOOP+35 , LOOP+36
>> Z	LOOP+28*, LOOP+29, LOOP+33, LOOP+35