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: IBARXEPV

Package: Integrated Billing

Routine: IBARXEPV


Information

IBARXEPV ;ALB/AAS - RX COPAY EXEMPTION VERIFY STATUS ; 21-JAN-93

Source Information

Source file <IBARXEPV.m>

Call Graph

Call Graph Total: 14

Package Total Call Graph
Integrated Billing 6 $$STATUS^IBARXEU1  MOSTR^IBARXEU5  OLDAUT^IBARXEX1  ADDEX^IBAUTL6  $$PT^IBEFUNC  ($$DAT1,DATE,PAUSE)^IBOUTL  
VA Fileman 5 NOW^%DTC  DT^DICRW  ^DIE  D^DIQ  ^DIR  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Integrated Billing 2 IB RX PRINT VERIFY EXEMP  IBARXEU5  

Entry Points

Name Comments DBIA/ICR reference
SET ; -- set ^tmp node if not okay
END
HDR ; -- print header
CHK ; -- check if current status = computed status
REPORTQ
CHKQ
DEV
UP ; -- update current exemption status
REPORT ; -- print report
LINE ; -- write each line
UP1
UPQ
DQ ; -- entry point from task man to start comparison

External References

Name Field # of Occurrence
NOW^%DTC DQ+1
^%ZIS DEV+1
HOME^%ZIS %+4, DEV+2
^%ZISC END+2
^%ZTLOAD DEV+2
DT^DICRW %+2
^DIE UP+4
D^DIQ DQ+1
^DIR %+12
$$STATUS^IBARXEU1 CHK+12
MOSTR^IBARXEU5 UP1+5
OLDAUT^IBARXEX1 UP1+3
ADDEX^IBAUTL6 UP1+6
$$PT^IBEFUNC SET+2
$$DAT1^IBOUTL LINE+5, LINE+6
DATE^IBOUTL %+6
PAUSE^IBOUTL DQ+7, LINE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"HMMMM, LET ME THINK ABOUT THIS FOR A MINUTE"
  • Line Location: DEV+3
Function Call: WRITE
  • Prompt: !,"No discrepancies found in ",IBPCNT," exemptions checked."
  • Line Location: REPORT+2
Function Call: WRITE
  • Prompt: ?39,$S(X=3:"Exemption incorrect",X=1!(X=2)!(X=5):"Not Current Status",X=4:"Name Missing",1:"Hmmmm")
  • Line Location: LINE+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Routine Call
  • %ZIS
  • Line Location:
    • %+4
    • DEV+2
Routine Call
  • DIE
  • Line Location:
    • UP+4
Routine Call
  • DIR
  • Line Location:
    • %+12
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(354 - [#354] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBA(354 - [#354] CHK+4
^IBA(354.1 - [#354.1] DQ+6, CHK+2
^IBE(354.2 - [#354.2] LINE+5, LINE+6, CHK+8, UP1+3
^TMP($J DQ+2!, END!, REPORT+2, REPORT+5, SET+4, SET+5*

Label References

Name Line Occurrences
CHK DQ+6
CHKQ CHK+2, CHK+4, CHK+8
END %+7, %+13, DEV+1, DEV+2, DQ+8
HDR REPORT+1, LINE+2
LINE REPORT+5
REPORT DQ+7
REPORTQ REPORT+2
SET DQ+6
UP DQ+6
UPQ UP+3

Naked Globals

Name Field # of Occurrence
^( REPORT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DQ+1
>> %ZIS DEV+1*
DA END+3!, UP+4*, UP+5!
DFN END+3!, LINE+1*, CHK+3*, CHK+4, CHK+12, UP+4, SET+2, SET+3, SET+4
DIC END+3!, UP+5!
DIE END+3!, UP+4*, UP+5!
DIR %+12!, END+3!
DIR("?" %+11*
DIR("A" %+12*
DIR("B" %+12*
DIR(0 %+12*
DIRUT %+13, END+3!
DR END+3!, UP+4*, UP+5!
DT %+2, CHK+12
IBBDT %+7, DQ+5, END+4!
IBDA DQ+6*, END+4!, CHK+2
IBDATA END+4!
>> IBDCNT REPORT+1*, REPORT+7, LINE+1*
IBDEPEN END+4!
IBDFN END+4!, REPORT+5*, LINE+1, SET+3*, SET+4*, SET+5
IBDT DQ+5*, DQ+6*, END+4!
IBEDT %+7, DQ+6, END+4!
IBER END+4!, REPORT+5*, LINE+3, LINE+4, LINE+5, LINE+6, LINE+7
IBERR END+4!, CHK+1*, CHK+6*, CHK+9*, CHK+10*, CHK+11*, CHK+13*, UP+3, SET+5
IBEXREA END+4!
IBEXREAN END+4!, CHK+12*, CHK+13, UP1+3, UP1+4, UP1+5, UP1+6, SET+5
IBEXREAO END+4!, CHK+7*, CHK+8, CHK+13, SET+5
IBFORCE UP1+4*, UPQ!
IBJ END+4!
>> IBJOB UP+2*
IBMESS END+4!, CHK+1*, UP+6*, UP1+7*, SET+5
IBNAM END+4!, REPORT+4*, REPORT+5*, LINE+3
IBOK DQ+1*, DQ+6, END+4!, CHK+1*, CHK+6*, CHK+9*, CHK+10*, CHK+11*, CHK+13*, UP+1
, SET+1
IBOLDAUT UP1~*, UP1+6
IBP END+4!, SET+2*, SET+4, SET+5
IBPAG DQ+1*, END+4!, HDR+1, HDR+2*, HDR+3
IBPCNT DQ+1*, END+4!, REPORT+2, REPORT+7, CHK+5*, SET+4
IBPDAT DQ+1*, END+4!, HDR+3
IBQUIT %+3*, DQ+7, END+4!, REPORT+5, LINE+2
IBUP %+12*, DQ+6, END+4!
>> IBWHER UP+2*
IO DEV+4
IO("Q" DEV+2!
IOF %+4, %+5, HDR+1
IOM HDR+3, HDR+5
IOSL LINE+2
IOST HDR+1
>> POP DEV+1
X END+3!, LINE+4*, CHK+2*, CHK+3, CHK+4, CHK+7, CHK+9, CHK+10, CHK+11
Y %+12, DQ+1*, END+3!, CHK+4*, CHK+6, CHK+9, CHK+10, CHK+11
>> ZTDESC DEV+2*
>> ZTQUEUED DEV+3, END+1
>> ZTREQ END+1*
>> ZTRTN DEV+2*
>> ZTSAVE("IB*" DEV+2*
ZTSK DEV+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