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 |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 (FILE,UPDATE)^DIE  ^DIK  ($$GET1,GETS)^DIQ  ^DIR  
Integrated Billing 2 ALL^IBCNS1  ($$STATUS,SEND278)^IBTRH2  
Kernel 1 $$NOW^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Integrated Billing 4 IBT HCSR COPY 278 REQUEST  IBTRH2  IBTRH2B  IBTRH6  
Kernel 1 ^ORD(101  

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

External References

Name Field # of Occurrence
FILE^DIE COPY278+42
UPDATE^DIE MLTCPY+11, COPY278+41, COPY278+60, COPY278+72, COPY278+87
^DIK MLTCLEAR+6
$$GET1^DIQ ADDR+17
GETS^DIQ ADDR+15, COPY278+31, COPY278+39, COPY278+57, COPY278+66, COPY278+70, COPY278+84
^DIR LOCKERR+3, COPYERR+14, STATMSG+10, MSG215+12, COPY278+26, MSG+10
ALL^IBCNS1 COPY278+18
$$STATUS^IBTRH2 COPY278+16
SEND278^IBTRH2 COPY278+92
$$NOW^XLFDT COPY278+34

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
Routine Call
  • DIE
  • Line Location:
    • COPY278+42
Routine Call
  • DIE
  • Line Location:
    • MLTCPY+11
    • COPY278+41
    • COPY278+60
    • COPY278+72
    • COPY278+87
Routine Call
  • DIR
  • Line Location:
    • LOCKERR+3
    • COPYERR+14
    • STATMSG+10
    • MSG215+12
    • COPY278+26
    • MSG+10

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] COPY278+9, COPY278+22
^IBE(350.9 - [#350.9] COPY278+23
^IBT(356.22 - [#356.22] MLTCLEAR+6, COPY278+7, COPY278+13, COPY278+14, COPY278+55, COPY278+64, COPY278+82

Label References

Name Line Occurrences
$$MLTCPY COPY278+47, COPY278+49, COPY278+51, COPY278+53, COPY278+76, COPY278+78, COPY278+80
COPYERR MLTCPY+12, COPY278+32, COPY278+39, COPY278+43, COPY278+58, COPY278+61, COPY278+67, COPY278+70, COPY278+73, COPY278+85
, COPY278+88
FDACPY MLTCPY+10, COPY278+35, COPY278+59, COPY278+68, COPY278+86
MLTCLEAR COPY278+45
MSG COPY278+19, COPY278+94

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDRDATA ADDR+11~
ADDRDATA( ADDR+16, ADDR+17, ADDR+18, ADDR+22
CITFLD ADDR~, ADDR+14, ADDR+16
CNT ADDR+11~, ADDR+23*, ADDR+24*
COB COPY278+3~, COPY278+21*, COPY278+25
COBSTR COPY278+3~, COPY278+25*, COPY278+26
CSSTR ADDR+11~, ADDR+16*, ADDR+21*, ADDR+23
CURCOB COPY278+3~, COPY278+10*, COPY278+21
DA MLTCLEAR+2~, MLTCLEAR+6*
DA(1 MLTCLEAR+5*
DFN COPY278+3~, COPY278+8*, COPY278+9, COPY278+13, COPY278+18, COPY278+22
DIK MLTCLEAR+2~, MLTCLEAR+5*
DIR LOCKERR+1~, COPYERR+4~, STATMSG+2~, MSG215+3~, COPY278+3~, COPY278+26!, MSG+4~
DIR("A" LOCKERR+3*, COPYERR+14*, STATMSG+4*, STATMSG+5*, STATMSG+6*, STATMSG+7*, STATMSG+8*, STATMSG+9*, STATMSG+10*, MSG215+5*
, MSG215+6*, MSG215+7*, MSG215+8*, MSG215+9*, MSG215+10*, MSG215+11*, MSG215+12*, COPY278+26*, MSG+6*, MSG+7*
, MSG+8*, MSG+9*, MSG+10*
DIR("B" COPY278+26*
DIR(0 LOCKERR+3*, COPYERR+14*, STATMSG+3*, MSG215+4*, COPY278+26*, MSG+5*
DIROUT LOCKERR+1~, COPYERR+4~, STATMSG+2~, MSG215+3~, COPY278+3~, COPY278+27, MSG+4~
DIRUT LOCKERR+1~, COPYERR+4~, STATMSG+2~, MSG215+3~, COPY278+3~, MSG+4~
DRSTR ADDR+11~, ADDR+14*, ADDR+15
DTOUT LOCKERR+1~, COPYERR+4~, STATMSG+2~, MSG215+3~, COPY278+3~, COPY278+27, MSG+4~
DUOUT LOCKERR+1~, COPYERR+4~, STATMSG+2~, MSG215+3~, COPY278+3~, COPY278+27, MSG+4~
DUZ COPY278+37
ERROR COPYERR+5, MLTCPY+7~, MLTCPY+12, COPY278+3~, COPY278+32, COPY278+39, COPY278+43, COPY278+58, COPY278+61, COPY278+67
, COPY278+70, COPY278+73, COPY278+85, COPY278+88
ERROR("DIERR" COPYERR+8, COPYERR+9, COPYERR+10, COPYERR+11, COPYERR+12
EVENTDT COPY278+3~, COPY278+11*, COPY278+13, COPY278+18
FILE ADDR~, ADDR+15, ADDR+16, ADDR+17, ADDR+18, ADDR+22
FLD FDACPY+7~, FDACPY+8*, FDACPY+9, FDACPY+10, MLTCLEAR+2~, MLTCLEAR+4*, MLTCLEAR+5, MLTCLEAR+6
FN FDACPY~, FDACPY+8, FDACPY+9, FDACPY+10
IBRESP COPY278+4~
IBTRENT COPY278+4~, COPY278+92*
IBTRIEN MLTCLEAR~, MLTCLEAR+3, MLTCLEAR+5, MLTCLEAR+6, COPY278+6, COPY278+7, COPY278+30, COPY278+55, COPY278+56, COPY278+64
, COPY278+65, COPY278+82, COPY278+83, COPY278+92*
IEN ADDR~, ADDR+13
IEN312 COPY278+3~, COPY278+8*, COPY278+9, COPY278+16*, COPY278+21*, COPY278+22, COPY278+24, COPY278+33, COPY278+36, COPY278+44
, COPY278+92
IENARRY COPY278+3~, COPY278+72!
IENARRY(1 COPY278+74
IENS ADDR+11~, ADDR+13*, ADDR+15, ADDR+16, ADDR+17, ADDR+18, ADDR+22, COPY278+3~, COPY278+30*, COPY278+31
, COPY278+35, COPY278+39, COPY278+40, COPY278+56*, COPY278+57, COPY278+59, COPY278+65*, COPY278+66, COPY278+68, COPY278+70
, COPY278+71, COPY278+83*, COPY278+84, COPY278+86
INSDATA COPY278+3~
INSDATA("S" COPY278+21
INSDATA(0 COPY278+19
INSNODE0 COPY278+3~, COPY278+9*, COPY278+10
LIST COPY278+3~
LIST( COPY278+16*, COPY278+24, COPY278+33, COPY278+44*, COPY278+92
LN1FLD ADDR~, ADDR+14, ADDR+22
LN1STR ADDR+11~, ADDR+22*, ADDR+23
LN2FLD ADDR~, ADDR+14, ADDR+22
LN2STR ADDR+11~, ADDR+22*, ADDR+23
LN3FLD ADDR~, ADDR+14, ADDR+22
LN3STR ADDR+11~, ADDR+22*, ADDR+23
NEWENTRY MLTCPY+7~, MLTCPY+10!, FDACPY~, COPY278+4~, COPY278+35, COPY278+56!, COPY278+59, COPY278+68!, COPY278+83!, COPY278+86
NEWENTRY( FDACPY+10*, COPY278+34*, COPY278+36*, COPY278+37*, COPY278+40*, COPY278+71*
NEWIEN COPY278+4~
NEWIEN(1 COPY278+44
NEWIENS MLTCPY~, MLTCPY+10, FDACPY~, FDACPY+10
NIENS COPY278+4~, COPY278+33*, COPY278+34*, COPY278+35, COPY278+36, COPY278+37, COPY278+40, COPY278+41, COPY278+42, COPY278+44*
, COPY278+45, COPY278+47, COPY278+49, COPY278+51, COPY278+53, COPY278+59, COPY278+68, COPY278+71, COPY278+74
NIENS16 COPY278+4~, COPY278+74*, COPY278+76, COPY278+78, COPY278+80, COPY278+86
NODE0 COPY278+3~, COPY278+7*, COPY278+8, COPY278+11, COPY278+14*, COPY278+15, COPY278+16, COPY278+23
OLDENTRY MLTCPY+10, FDACPY~, COPY278+4~, COPY278+35, COPY278+56!, COPY278+59, COPY278+65!, COPY278+68, COPY278+83!, COPY278+86
OLDENTRY( MLTCPY+9, FDACPY+8, FDACPY+9
OLDIENS FDACPY~, FDACPY+8, FDACPY+9
OLDWP COPY278+4~, COPY278+70!
OLDWP( COPY278+40, COPY278+71
PAYIEN COPY278+4~, COPY278+22*, COPY278+23
RES MLTCPY+7~, MLTCPY+8*, MLTCPY+12*, MLTCPY+14, ADDR~, ADDR+12!
RES( ADDR+23, ADDR+24*
RES(1 ADDR+12*
SAVEIEN COPY278+4~, COPY278+92*
SFNUM MLTCPY~, MLTCPY+9, MLTCPY+10
STATE ADDR+11~, ADDR+17*, ADDR+20*, ADDR+21
STFLD ADDR~, ADDR+14, ADDR+17
STOP COPY278+4~, COPY278+23*, COPY278+24*, COPY278+29*, COPY278+94
STOPFLG MLTCPY+7~, MLTCPY+8*, MLTCPY+9, MLTCPY+12*, COPY278+4~, COPY278+20*, COPY278+21, COPY278+22*, COPY278+32*, COPY278+39*
, COPY278+43*, COPY278+47*, COPY278+49*, COPY278+51*, COPY278+53*, COPY278+55, COPY278+58*, COPY278+61*, COPY278+64, COPY278+67*
, COPY278+70*, COPY278+73*, COPY278+76*, COPY278+78*, COPY278+80*, COPY278+82, COPY278+85*, COPY278+88*
STR COPYERR+4~, COPYERR+9*, COPYERR+10*, COPYERR+11*
TMP ADDR+11~, ADDR+19*, COPY278+4~
TTYPE MSG215~, MSG215+6, MSG215+8
TYPE COPYERR~, COPYERR+7, STATMSG~, STATMSG+5, STATMSG+6, STATMSG+7, STATMSG+8, STATMSG+9, MSG215~, MSG215+6
, MSG215+7, MSG215+8, MSG215+9, MSG215+10, MSG215+11, MSG~, MSG+7, MSG+8, MSG+9
U COPY278+8, COPY278+10, COPY278+11, COPY278+15, COPY278+16, COPY278+24
>> VALMBCK COPY278+5*
VALUE FDACPY+7~, FDACPY+9*, FDACPY+10
X LOCKERR+1~, COPYERR+4~, STATMSG+2~, MSG215+3~, COPY278+4~, MSG+4~
Y LOCKERR+1~, COPYERR+4~, STATMSG+2~, MSG215+3~, COPY278+4~, COPY278+27, MSG+4~
Z COPYERR+4~, COPYERR+8*, COPYERR+9, COPYERR+10, COPYERR+11, MLTCPY+7~, MLTCPY+9*, MLTCPY+10, MLTCLEAR+2~, ADDR+11~
, ADDR+23*, ADDR+24, COPY278+4~, COPY278+13*, COPY278+14, COPY278+16, COPY278+55*, COPY278+56, COPY278+64*, COPY278+65
, COPY278+82, COPY278+83
Z1 COPYERR+4~, COPYERR+12*, ADDR+11~, ADDR+23*, ADDR+24, COPY278+4~, COPY278+82*, COPY278+83
Z2 ADDR+11~, ADDR+23*, ADDR+24*
ZIP ADDR+11~, ADDR+18*, ADDR+19*, ADDR+20
ZIPFLD ADDR~, ADDR+14, ADDR+18
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 |  Local Variables  | All