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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: IBARXEI

Package: Integrated Billing

Routine: IBARXEI


Information

IBARXEI ;ALB/AAS - RX COPAY EXEMPTION INQUIRY ; 21-JAN-93

Source Information

Source file <IBARXEI.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Integrated Billing 4 $$TEXT^IBARXEU0  (DISP,STAT)^IBARXEX  $$PT^IBEFUNC  ($$DAT1,PAUSE)^IBOUTL  
VA Fileman 4 NOW^%DTC  ^DIC  (D,DT)^DIQ  ^DIR  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Integrated Billing 1 IB RX INQUIRE  

Entry Points

Name Comments DBIA/ICR reference
FULL ; -- print full inquiry for one exemption
PAT
HDR ; -- print header for full inquiry
DEV
1 ; -- brief view active exemptions
2 ; -- full view all exemptions
SET ; -- built tmp array ==> ^tmp($j, dfn, -eff date, -date/time added, da)
END
TYP ; -- inquire is active or all
DQ ;

External References

Name Field # of Occurrence
NOW^%DTC PAT+2
^%ZIS DEV
HOME^%ZIS %, DEV+1
^%ZISC END+1
^%ZTLOAD DEV+1
^DIC PAT+5
D^DIQ PAT+2, FULL+3
DT^DIQ FULL+11, FULL+12, FULL+13
^DIR TYP+3
$$TEXT^IBARXEU0 HDR+4
DISP^IBARXEX 1+1
STAT^IBARXEX 1+1
$$PT^IBEFUNC PAT+7
$$DAT1^IBOUTL HDR+4
PAUSE^IBOUTL DQ+3, FULL+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"Error, Missing Record - ",IBDA
  • Line Location: FULL+2
Function Call: WRITE
  • Prompt: !,"Charges Canceled: "
  • Line Location: FULL+12
Function Call: WRITE
  • Prompt: ?36," To: "
  • Line Location: FULL+12
Function Call: WRITE
  • Prompt: !," Prior Threshold: "
  • Line Location: FULL+13
Function Call: WRITE
  • Prompt: !," Patient DFN: ",$P(IBND,"^",2),?36,"Ex. Number: ",IBDA
  • Line Location: FULL+14
Routine Call
  • %ZIS
  • Line Location:
    • %
    • DEV+1
Routine Call
  • DIC
  • Line Location:
    • PAT+5
Routine Call
  • DIR
  • Line Location:
    • TYP+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(354.1 FULL+5, FULL+6, FULL+10
^IBA(354 - [#354] PAT+7
^IBA(354.1 - [#354.1] 2+5, SET+2
^IBE(354.2 - [#354.2] HDR+4, FULL+7
^TMP($J DQ+1!, 2+8, END!, SET+3*
^VA(200 - [#200] FULL+9

Label References

Name Line Occurrences
@( DQ+2
END PAT, PAT+1, PAT+6, TYP+3, DEV, DEV+1, DQ+4, DQ+5
FULL 2+8
HDR 2+1, FULL+1
PAT DEV+1, DQ+4
SET 2+5

Naked Globals

Name Field # of Occurrence
^( 2+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PAT+2
>> %ZIS DEV*
C END+2!
DFN PAT+7*, 2+5, 2+8, END+2!, SET+3
DIC PAT+5*!, END+2!
DIC("A" PAT+5*
DIC("S" PAT+5*
DIC("W" PAT+4*
DIC(0 PAT+5*
DIR TYP+3!, END+2!
DIR("?" TYP+1*
DIR("A" TYP+2*
DIR("B" TYP+2*
DIR(0 TYP+2*
DIRUT TYP+3, END+2!
DUZ(0 FULL+14
>> IBA 2+8*
IBCNT END+2!
IBDA 2+5*, 2+8*, END+2!, FULL+2, FULL+14, SET+2, SET+3
IBDT END+2!
IBFULL TYP+3*, DQ+2, END+2!
IBIDT 2+5*, 2+8*, END+2!, SET+3
IBJ END+2!
IBND 2+8*, END+2!, FULL+2, FULL+3, FULL+4, FULL+5, FULL+6, FULL+7, FULL+8, FULL+9
, FULL+10, FULL+11, FULL+12, FULL+13, FULL+14
IBP PAT+7*, END+2!, HDR+4
IBPAG PAT+2*, END+2!, HDR+1, HDR+2*, HDR+3
IBPBN PAT+7*, END+2!, HDR+4
IBPDAT PAT+2*, END+2!, HDR+3
IBQUIT PAT, PAT+2*, DQ+3, 2+5, 2+8, END+2!, FULL+1
IBSTAT END+2!
IBSTATR END+2!
IBT 2+2*, 2+5*, END+2!
IO DEV+2, DQ+3
IO("Q" DEV+1!
IO(0 DQ+3
IOF %, HDR+1
IOM HDR+3, HDR+5
IOSL FULL+1
IOST HDR+1
>> POP DEV
X END+2!, SET+1~, SET+2*, SET+3
Y PAT+2*, PAT+6, PAT+7, TYP+3, END+2!, FULL+3*, FULL+4, FULL+11*, FULL+12*, FULL+13*
>> ZTDESC DEV+1*
>> ZTQUEUED DQ+4, END
ZTREQ END*, END+2!
>> ZTRTN DEV+1*
>> ZTSAVE("DFN" DEV+1*
>> ZTSAVE("IB*" DEV+1*
ZTSK DEV+1!, END+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All