Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: AZX2RXP1

Package: Phoenix Devel Center

Routine: AZX2RXP1


Information

AZQ2RXP1 ;IHS/ASU/RPL;PRINT PVT INS. AND PRESCRIPTION INFO; ; 8/31/89 10:33 AM

Source Information

Source file <AZX2RXP1.m>

Entry Points

Name Comments DBIA/ICR reference
SCRIP
HEAD1
PRNT
HEAD
SUBHD
START ;
DONE
C2
C1
PI

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$J(AZQ2HRN,6),?8,AZQ2NAME,?40,Y
  • Line Location: C1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: C2+3
Function Call: WRITE
  • Prompt: !!,?8,$P(^AUTNINS(+AZQ2PRV,0),"^"),?40,$P(AZQ2PRV,"^",2)
  • Line Location: PI+4
Function Call: WRITE
  • Prompt: !,?8,$P(AZQ2PRV,"^",4)
  • Line Location: PI+5
Function Call: WRITE
  • Prompt: ?40,$P(^AUTTRLSH($P(AZQ2PRV,"^",5),0),"^")
  • Line Location: PI+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PI+6
Function Call: WRITE
  • Prompt: !,?8,Y
  • Line Location: PRNT+3
Function Call: WRITE
  • Prompt: ?21,$P(^PSDRUG(AZQ2DDFN,0),"^")
  • Line Location: PRNT+4
Function Call: WRITE
  • Prompt: ?50,AZQ2NDC
  • Line Location: PRNT+5
Function Call: WRITE
  • Prompt: !,?21,AZQ2QTY_" "_AZQ2DU_" at $"_$J(AZQ2PPDU,6,3)_" each",?64,$J(AZQ2CST,6,2),?72,$J(AZQ2BILL,6,2),!
  • Line Location: PRNT+7
Function Call: READ
  • Prompt: "Press <RETURN> to continue. "
  • Timeout: DTIME
  • Variable: X
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD1+0
Function Call: WRITE
  • Prompt: $P(^DIC(4,DUZ(2),0),"^"),?59,AZQ2DTP,?73,"Page ",AZQ2PG,!
  • Line Location: HEAD1+1
Function Call: WRITE
  • Prompt: !,"Prescriptions between "_AZQ2SDY_" and "_AZQ2FDY_" for Prvt. Insurance Eligibles."
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !!,?2,"HRCN",?8,"Patient Name",?40,"DOB",!!,?8,"Insurer",?40,"Policy Number",!,?8,"Name of Insured",?40,"Relationship"
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !,AZQ280D
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: !,?8,"Fill Date",?21,"Drug",?50,"NDC Code",?66,"Cost",?74,"Bill",!,?8,"-----------",?21,"---------------------------",?50,"------------",?64,"------",?72,"------"
  • Line Location: SUBHD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPRVT - [#9000006] C2, PI
^AUTNINS - [#9999999.18] PI+4
^AUTTRLSH - [#9999999.36] PI+5
^DD("DD" START+2, C1+1, PRNT+2
^DIC(4 - [#4] HEAD1+1
^DPT - [#2] C1+1
^PSDRUG - [#50] PRNT+4, PRNT+5, PRNT+6
^PSRX - [#52] PRNT+1, PRNT+6
^UTILITY($J START+4, SCRIP, C2+2

Label References

Name Line Occurrences
C1 START+4
C2 SCRIP
DONE START+4
HEAD START+3, C1+2, PI+3, PRNT, SUBHD
HEAD1 HEAD
PI C2
PRNT C2+2
SUBHD C2+1

Naked Globals

Name Field # of Occurrence
^(0 PRNT+6
^(2 PRNT+5
^(660 PRNT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AZQ280D START+1*, HEAD1+4
>> AZQ2BILL PRNT+6*, PRNT+7
>> AZQ2CST PRNT+6*, PRNT+7
>> AZQ2DDFN PRNT+1*, PRNT+4, PRNT+5, PRNT+6
>> AZQ2DFN START+4*, C1, SCRIP, C2+2
>> AZQ2DPT C1+1*
>> AZQ2DT SCRIP*, C2+2, PI+2, PRNT+2
>> AZQ2DTP START+2*, HEAD1+1
>> AZQ2DU PRNT+6*, PRNT+7
>> AZQ2FD START+2
>> AZQ2FDY START+2*, HEAD1+2
>> AZQ2HRN C1*, C1+3
>> AZQ2N0 PRNT+1*
>> AZQ2NAME C1+1*, C1+3
>> AZQ2NDC PRNT+5*
>> AZQ2PDFN C2+2*, PRNT+1, PRNT+6
>> AZQ2PG START+3*, HEAD*, HEAD1+1
>> AZQ2PPDU PRNT+6*, PRNT+7
>> AZQ2PRV PI*, PI+1, PI+4, PI+5
>> AZQ2PRVE PI+1*
>> AZQ2PRVI C2*, PI
>> AZQ2PRVS PI+1*, PI+2
>> AZQ2QTY PRNT+1*, PRNT+6, PRNT+7
>> AZQ2QUIT START+4, C1+2, SCRIP, C2, C2+1, C2+2, PRNT, HEAD+1*, SUBHD, DONE
>> AZQ2S PI+1
>> AZQ2SD START+2
>> AZQ2SDY START+2*, HEAD1+2
>> DFN C1*, C1+1, C2, PI
DT START+2
DTIME HEAD+1, DONE
DUZ(2 HEAD1+1
>> I START+4*
IO HEAD+1, DONE
IO(0 HEAD+1, DONE
IOF HEAD1
IOSL C1+2, PI+3, PRNT, SUBHD
IOST HEAD+1, DONE
>> J C2*
>> K SCRIP*
>> L C2+2*
>> X HEAD+1*, DONE*
>> Y START+2*, C1+1*, C1+3, PRNT+2*, PRNT+3
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All