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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: AZP3RP

Package: Portland Private Insurance package

Routine: AZP3RP


Information

AZP3RP ;PRINT HCFA 1500 FORMS [ 01/24/91 3:55 PM ]

Source Information

Source file <AZP3RP.m>

Call Graph

Call Graph Total: 1

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

Caller Graph

Caller Graph Total: 1

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All