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

Package: Integrated Billing

Routine: IBECUS3


Information

IBECUS3 ;RLM/DVAMC - CANCEL TRICARE PHARMACY TRANSACTION ; 14-AUG-96

Source Information

Source file <IBECUS3.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 3 $$CUS^IBACUS  ($$DATE,$$FILL,TASK)^IBECUS2  ($$ERRIEN,ERROR)^IBECUS22  
Kernel 1 SETUP^XQALERT  
Outpatient Pharmacy 1 $$TRANS^PSOCPTRI  

Entry Points

Name Comments DBIA/ICR reference
EN ; Transmit a cancellation transaction.
; Input: IBKEY -- 1 ; 2, where
; 1 = Pointer to the prescription in file #52
; 2 = Pointer to the refill in file #52.1, or
; 0 for the original fill
; IBKEYD -- 1 ^ 2 ^ 3 ^ 4, where
; 1 = Rx label printing device
; 2 = Pointer to the Pharmacy in file #59
; 3 = Pointer to the Pharmacy user in file #200
; 4 = Pointer to the billing transaction
; in file #351.5 (cancellations only)
ENQ
REJECT ; Send alert for a reject.

External References

Name Field # of Occurrence
$$CUS^IBACUS EN+27
$$DATE^IBECUS2 EN+49
$$FILL^IBECUS2 EN+48, EN+50
TASK^IBECUS2 EN+70
$$ERRIEN^IBECUS22 REJECT+3
ERROR^IBECUS22 EN+59, ENQ
$$TRANS^PSOCPTRI EN+17
SETUP^XQALERT REJECT+10

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: *IBI
  • Timeout: 0
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: IBLINE(1),!
  • Line Location: EN+53
Function Call: READ
  • Variable: IBRESP(1)#100
  • Timeout: 120
  • Line Location: EN+56

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] EN+32
^DPT - [#2] EN+31
^IBA(351.5 - [#351.5] EN+21, EN+66*, EN+67!, REJECT+13*

Label References

Name Line Occurrences
ENQ EN+17, EN+22, EN+24, EN+28, EN+33, EN+56, EN+59, EN+63
REJECT EN+63

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN EN+23*, EN+24, EN+27, EN+31, REJECT+9
DT EN+27
>> IBBIN EN+32*, EN+33, EN+48
>> IBCDFN EN+27*, EN+28, EN+31
>> IBCDFND EN+31*, EN+32
>> IBCHTRN EN+20*, EN+21, EN+66, REJECT+13
>> IBCHTRND EN+21*, EN+22, EN+23
IBDRX EN+16!, EN+17
IBDRX("DIV" EN+48
IBDRX("FDT" EN+49
IBDRX("RX#" EN+50, REJECT+8, REJECT+9
IBERR EN+16!, EN+17*, EN+22*, EN+24*, EN+28*, EN+33*, EN+56*, ENQ
IBERRP REJECT+3*, REJECT+4, REJECT+15!
>> IBI EN+13*
>> IBKEY EN+17, EN+67
>> IBKEYD EN+20, EN+66, REJECT+7
>> IBLINE(1 EN+48*, EN+49*, EN+50*, EN+53
IBREJ REJECT+1*, REJECT+4*, REJECT+5*, REJECT+8, REJECT+9, REJECT+13, REJECT+15!
>> IBRESP(1 EN+56*, EN+59, EN+62*, EN+63, EN+66, REJECT+2
IBRJ REJECT+2*, REJECT+15!
IBRJA REJECT+2*, REJECT+3, REJECT+15!
>> XQA( REJECT+7*
>> XQA("G.IB CHA MP RX REJ" , REJECT+7*
>> XQADATA REJECT+9*
>> XQAMSG REJECT+8*
>> XQAROU REJECT+9*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All