Routine: AZP3RP

Package	Total	Call Graph
Portland Private Insurance package	1	(,KLL)^AZP3UTL

Package	Total	Caller Graph
Portland Private Insurance package	1	AZP3RP

Entry Points

Name	Comments	DBIA/ICR reference
C	;PRINTING
B	;SET PRINT VARIABLES
EXIT
B1	;PATIENT INSURANCE DATA
B2	;PATIENT DEMOGRAPHIC DATA
B3	;CLAIM DATA
VAR

External References

Name	Field # of Occurrence
^AZP3UTL	VAR
KLL^AZP3UTL	EXIT

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: C+1
Function Call: WRITE	Prompt: !?40,INS(1,L) Line Location: C+1
Function Call: WRITE	Prompt: " ",INS(1,4)," ",INS(1,5) Line Location: C+2
Function Call: WRITE	Prompt: !!!!!!!?3,NM,?34,$E(DOB,4,5),?40,$E(DOB,6,7),?46,$E(DOB,2,3),?52,INS(1,7) Line Location: C+3
Function Call: WRITE	Prompt: !!?3,STR,?40+SX,"X",?52,INS(1,9),!?3,CTY,?22,$E(ST,1,2),?25,ZIP Line Location: C+4
Function Call: WRITE	Prompt: !!!?3,INS(2,7),?52,"SAME AS BLOCK 4" Line Location: C+7
Function Call: WRITE	Prompt: !?3,INS(2,L) Line Location: C+7
Function Call: WRITE	Prompt: " ",INS(2,4)," ",INS(2,5),!?3,INS(2,6),!?3,INS(2,9)," ",INS(2,10) Line Location: C+8
Function Call: WRITE	Prompt: !?3,"Patient signature on file",?52,"Patient signature on file",!!!!?3,DT(3),?34,DT(5),?52,DT(4) Line Location: C+9
Function Call: WRITE	Prompt: ?74,"X" Condition for execution: EMG="Y" Line Location: C+9
Function Call: WRITE	Prompt: !!,?20,DT(6),?34,DT(7),!!?3,PHY,!!?3,FAC(1),?TB,"X",?65,$J(LABC,10,2),! Line Location: C+10
Function Call: WRITE	Prompt: !?3,$P(^ICD9(PICD,0),U)," ",$P(^(0),U,3) Line Location: C+11
Function Call: WRITE	Prompt: ! Line Location: C+12
Function Call: WRITE	Prompt: ?65,AUTH,!!! Line Location: C+13
Function Call: WRITE	Prompt: ! Line Location: C+19
Function Call: WRITE	Prompt: ?53,$J(TOT,10,2),?67,"0.00",?68,$J(TOT,8,2),!!?52,"Portland Area IHS",!?52,FAC(1) Line Location: C+20
Function Call: WRITE	Prompt: !?5,DATE,?52,FAC(2),!?52,FAC(3)," ",$E(FAC(4),1,2)," ",FAC(5),!?3,BDOC,?35,ARID,?52,FACID,! Line Location: C+21

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	B2+1
^AUPNPRVT - [#9000006]	B1+4
^AUTNINS - [#9999999.18]	B1+3
^AUTTCOM - [#9999999.05]	B3+2
^AUTTRLSH - [#9999999.36]	B1+6
^AZPPI(0 - [#2001060]	B3+1
^AZPPI(1 - [#2001060.01]	B+2, B+3, C+11, C+14, C+15
^AZPPI(2 - [#2001060.02]	C+16
^AZPPI(5 - [#2001060.05]	C+18
^AZPPI(6 - [#2001060.06]	C+18
^DD("DD"	B3+2, C+14
^DIC(16 - [#16]	B3+3
^DIC(4 - [#4]	B3+2
^DIC(5 - [#5]	B1+7, B2+2, B3+2
^DPT - [#2]	B2+1, B2+2, B2+3
^ICD9 - [#80]	C+11

Label References

Name	Line Occurrences
B1	B+3
EXIT	VAR, B+2

Naked Globals

Name	Field # of Occurrence
^(	B2+3, C+11, C+14, C+16
^(0	B1+4, C+11
^(1	B+3, B3+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ARID	B3+1*, C+21
>> AUTH	B3+4*, C+13
>> BDOC	B+1, B+2, B+3, C+21
>> BTSTDOC	B+2*
>> CTY	B2+2*, C+4
>> DATA	B+3*, B3+2
>> DATA1	B+3*, B1+1, B1+2, B3+3, B3+4
>> DATA2	B2+1, B2+2
>> DATA3	C+16*, C+17, C+18
>> DATA4	C+16*, C+17, C+18
>> DATAF	B3+1*
>> DATAF1	B3+1*
>> DATE	C+21
>> DFN	B+3*, B1+4, B2+1, B2+2, B2+3
>> DOB	B2+1*, C+3
>> DOCNO	B+1*
>> DOS	C+14*, C+18
DT(	B3+2*
DT(3	C+9
DT(4	C+9
DT(5	C+9
DT(6	C+10
DT(7	C+10
DUZ(2	B+3*, B2+1, B3+1
>> EMG	B3+4*, C+9
>> ETSTDOC	B+2
>> FAC(	B3+1*
>> FAC(1	B3+2*, C+10, C+20
>> FAC(2	C+21
>> FAC(3	B3+2*, C+21
>> FAC(4	B3+2*, C+21
>> FAC(5	C+21
>> FACID	B3+1*, C+21
>> HRN	B2+1*
>> ICD	C+11*
>> INS(	B1+1, B1+3, B1+4, B1+5, B1+6, B1+7
>> INS(1	C+1, C+2, C+3, C+4, C+6
>> INS(2	C+7, C+8
>> INSP(	B1+2*, B1+3, B1+4
IO	C+1
IOF	C+1
>> L	B1+1, B1+2, B1+3, B1+4, B1+5, B1+6, B1+7, B3+1, B3+2, C+1 , C+7, C+12, C+19*
>> L1	B1+1, B1+3, C+12, C+19
>> LAB	B3+4*, C+10
>> LABC	B3+4*, C+10
>> LEND	B1+1*, B1+2
>> ND	B+2, B+3, C+11, C+14, C+15
>> NM	B2+1*, C+3
>> PCPT	C+14, C+15, C+16
>> PDOS	C+14*, C+15
>> PFAC	B3+1*
>> PHN	B2+3*, C+6
>> PHY	B3+3*, C+10
>> PICD	C+11*
>> PT	B1+4*
>> RLS	B1+6*, C+6
>> RX	VAR*
>> RXCST	B3+4*, C+16
>> SEX	B2+1*
>> SSN	B2+1*
>> ST	B2+2*, C+4
>> STR	B2+2*, C+4
>> SX	B2+1, B2+4, C+4
>> TB	C+10*
>> TOT	C+14, C+18, C+20
>> TOTCPT	C+14, C+17, C+18
U	B+3, B1+1, B1+2, B1+3, B1+4, B1+6, B1+7, B2+1, B2+2, B2+3 , B3+1, B3+2, B3+3, B3+4, C+11, C+16, C+17, C+18
>> UNTS	C+17*, C+18
>> Y	B3+2, C+14
>> ZIP	B2+2*, C+4

Customize PDF page

Package: Portland Private Insurance package

Routine: AZP3RP

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: