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

Package: Integrated Billing

Routine: IBOHLD1


Information

IBOHLD1 ;ALB/CJM - REPORT OF CHARGES ON HOLD W/INS INFO ;MARCH 3 1992

Source Information

Source file <IBOHLD1.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
QUEUED ; entry point if queued
EXIT ;
DEVICE ;
CHRGS ; charges on hold
PAT ; patient name
BILLS ; find bills for charges on hold
FNDBTYP(IBACTIEN) ;Determine what type of 3rd party bill to try and match the
; held charge to.
; INPUT - IB Action Type IEN (350.1,.01)
INP ; inpatient bills
INPTCK ; does bill belong to charge? returns IBOK=0 if no
CK1 ; for same patient?
CK2 ; same type- inp or opt?
CK3 ; overlap in date range?
CK4 ; insurance bill?
OTP ; outpatient bills
RX ; rx refill bills

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"*** Margin width of this output is 132 ***"
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !,"*** This output should be queued ***"
  • Line Location: DEVICE+3
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"REQUEST QUEUED TASK="_ZTSK,1:"REQUEST CANCELLED")
  • Line Location: DEVICE+11
Info |  Source |  Entry Points |  Interaction Calls