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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBTRH2A

Package: Integrated Billing

Routine: IBTRH2A


Information

IBTRH2A ;ALB/YMG - HCSR worklist expand entry cont. ;18-JUN-2014

Source Information

Source file <IBTRH2A.m>

Entry Points

Name Comments DBIA/ICR reference
LOCKERR ; display a lock error message
COPYERR(TYPE) ; display the error encountered while copying a request
; TYPE = 0 - error while reading data, TYPE = 1 - error while filing data
; ERROR - array used for FM error reporting, populated in the calling tag
MLTCPY(SFNUM,NEWIENS) ; copy a multiple
; SFNUM - sub-file number of a multiple to copy
; NEWIENS - iens of a new entry (copied to)
; OLDENTRY - FDA array to get data from (defined in the calling tag)
FDACPY(FN,OLDIENS,NEWIENS,OLDENTRY,NEWENTRY) ; copy FDA array, move data from "I" nodes to regular ones
; FN - file or subfile #
; OLDIENS - IENS for the OLDENTRY array
; NEWIENS - IENS for the NEWENTRY array
; OLDENTRY - array to copy from (passed by reference)
; NEWENTRY - array to copy into (passed by reference)
MLTCLEAR(IBTRIEN) ; delete entries from multiples in file 356.22
; IBTRIEN - file 356.22 ien
ADDR(FILE,IEN,LN1FLD,LN2FLD,LN3FLD,CITFLD,STFLD,ZIPFLD,RES) ; format address for output
; FILE - file number to get address from
; IEN - ien in FILE
; LN1FLD - field # for addr. line 1
; LN2FLD - field # for addr. line 2
; LN3FLD - field # for addr. line 3
; CITFLD - field # for city
; STFLD - field # for state
; ZIPFLD - field # for zip
; RES - array of formatted address lines this function returns
STATMSG(TYPE) ; display transmission status message
; TYPE - 1 if transmission successful, 0 otherwise
MSG215(TYPE,TTYPE) ; display transmission status message
; TYPE - 1 if transmission successful, 0 otherwise
; TTYPE - 'C' for 278x215 cancel transaction
COPY278 ; copy 278 request
; requires IBTRIEN to be defined and contain ien of the 356.22 entry being copied
MSG(TYPE) ;display status message
; TYPE = 1 No alternate insurance available for this patient
; = 2 alternate insurance not setup for 278 submission
; = 3 278 already created for alternate insurance

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!,"Some else is editing the event. Try again later."
  • Line Location: LOCKERR+2
Function Call: WRITE
  • Prompt: !,"Error code: "_STR
  • Line Location: COPYERR+9
Function Call: WRITE
  • Prompt: !,"File number: "_STR
  • Line Location: COPYERR+10
Function Call: WRITE
  • Prompt: !,"Field number: "_STR
  • Line Location: COPYERR+11
Function Call: WRITE
  • Prompt: !,ERROR("DIERR",1,"TEXT",Z1)
  • Line Location: COPYERR+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBT(356.22 - [#356.22] GETS^DIQ
356.2213 GETS^DIQ
356.2216 GETS^DIQ
356.22168 GETS^DIQ
^DIC(5 - [#5] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call