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
Print Page as PDF
Routine: IBARXEU5

Package: Integrated Billing

Routine: IBARXEU5


Information

IBARXEU5 ;AAS/ALB - RX EXEMPTION UTILITY ROUTINE (CONT.) ; 2-NOV-92

Source Information

Source file <IBARXEU5.m>

Entry Points

Name Comments DBIA/ICR reference
DIFF ; -- supported call for mas
; -- compare current exemption reason and date with what currently
; computes from the patient record. Automatically update if needed.
; input: dfn = patient to update
; Ibdt = date of change (optional, default is dt)
; output: none
DIFFQ
MTCOMP(STATUS,IBDATA) ; -- compare income determination with current mt status
MTDONE
MTCOMPQ
MOSTR(X1,IBEXREA) ; -- if status date is most recent but last exemption date
; is later, inactivate last exemption
REGAUTO ; -- will automatically update in background autoexempt
; called from registration
  • ICR #4524
    • Status: Active
    • Usage: Private
    REGQ
    Info |  Source |  Entry Points