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: IBTRH2

Package: Integrated Billing

Routine: IBTRH2


Information

IBTRH2 ;ALB/YMG - HCSR worklist expand entry ;18-JUN-2014

Source Information

Source file <IBTRH2.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Integrated Billing 8 FSTRNG^IBJU1  $$EXPAND^IBTRE  ($$LOCKEV,$$SELEVENT,PRMARK,UNLOCKEV)^IBTRH1  ($$STATUS,HDR,INIT)^IBTRH2  (ADDR,LOCKERR,STATMSG)^IBTRH2A  ($$CRT278,$$REQMISS)^IBTRH5I  EN^IBTRHLO  $$WP2STR^IBTRHLO2  
VA FileMan 5 FILE^DICN  ^DIE  ^DIK  ($$GET1,GETS)^DIQ  ^DIR  
List Manager 3 EN^VALM  (CLEAR,FULL,PAUSE)^VALM1  (CLEAN,CNTRL,MSG)^VALM10  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  
Registration 1 DEM^VADPT  

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: 15

Package Total Caller Graph
Integrated Billing 14 IBT HCSR ADD COMMENT  IBT HCSR ENTRY  IBT HCSR EXPAND ENTRY  IBT HCSR IN PROGRESS EE REM  IBT HCSR IN PROGRESS EE SET  IBT HCSR SEND 278 REQUEST  IBTRH1  IBTRH2  
IBTRH2A  IBTRH2B  IBTRH3  IBTRH5  IBTRH5I  IBTRH6  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; main entry point for IBT HCSR ENTRY
EN2(IBTRNM,IBTRIEN) ; Secondary entry point.
; IBTRNM is the calling routine name.
; IBTRIEN is the internal id for ^IBT(356.22)
HDR ; header code
INIT ; init variables and list array
HELP ; help code
EXIT ; exit code
BLD ; build screen array
SETL(LINE,DATA,LABEL,COL,LNG) ;
SET(LINE,SPEC) ;
ADDCMT(FROMWL) ; add entry comment
; called from action protocol IBT HCSR ADD COMMENT
; Input: FROMWL - Optional, only sent when adding a comment to entry
; directly from the main worklist.
; Defaults to 0
SEND278 ; send 278 request
STATUS(IBTRIEN) ; returns 356.22 entry status
; IBTRIEN - file 356.22 ien
PRMARK(WHICH)

External References

Name Field # of Occurrence
FILE^DICN ADDCMT+10
^DIE ADDCMT+12
^DIK ADDCMT+14
$$GET1^DIQ SEND278+14, SEND278+15, SEND278+17, SEND278+18
GETS^DIQ BLD+7, BLD+23, BLD+64, BLD+82, BLD+109
^DIR SEND278+40
FSTRNG^IBJU1 BLD+71, BLD+100, BLD+125
$$EXPAND^IBTRE BLD+55, BLD+56, BLD+60
$$LOCKEV^IBTRH1 EN+7
$$SELEVENT^IBTRH1 EN+4
PRMARK^IBTRH1 PRMARK+6
UNLOCKEV^IBTRH1 EN+10
$$STATUS^IBTRH2 PRMARK+8, PRMARK+11
HDR^IBTRH2 ADDCMT+20
INIT^IBTRH2 ADDCMT+20, SEND278+38, SEND278+46
ADDR^IBTRH2A BLD+17
LOCKERR^IBTRH2A EN+7
STATMSG^IBTRH2A SEND278+23, SEND278+27, SEND278+29, SEND278+44
$$CRT278^IBTRH5I SEND278+31
$$REQMISS^IBTRH5I SEND278+35
EN^IBTRHLO SEND278+42
$$WP2STR^IBTRHLO2 BLD+71
DEM^VADPT HDR+3
EN^VALM EN+8
CLEAR^VALM1 EXIT+2
FULL^VALM1 HELP+1, SEND278+10
PAUSE^VALM1 HELP+4, SEND278+36
CLEAN^VALM10 EXIT+2
CNTRL^VALM10 SET+3
MSG^VALM10 EN+7
$$FMTE^XLFDT BLD+50, BLD+53, BLD+58, BLD+68
$$NOW^XLFDT ADDCMT+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This screen displays an expanded view of a Healthcare Services Review Worklist entry."
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !!,"The actions allow editing of data and transmission of HCSR inquiry."
  • Line Location: HELP+3
Routine Call
  • DIE
  • Line Location:
    • ADDCMT+12
Routine Call
  • DIR
  • Line Location:
    • SEND278+40
Routine Call
  • VALM
  • Line Location:
    • EN+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.3 - [#355.3] GETS^DIQ
^IBT(356 - [#356] GET1^DIQ
^IBT(356.22 - [#356.22] GETS^DIQ
^DIC(36 - [#36] GETS^DIQ
^DGPM - [#405] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] INIT+6, BLD+55, BLD+58, BLD+60
^IBE(365.017 - [#365.017] BLD+91
^IBE(365.018 - [#365.018] BLD+95
^IBE(365.027 - [#365.027] BLD+86
^IBT(356.018 - [#356.018] BLD+136
^IBT(356.021 - [#356.021] BLD+117
^IBT(356.22 - [#356.22] INIT+3, BLD+2, BLD+3, ADDCMT+14, SEND278+20, SEND278+44, STATUS+5
^TMP( INIT+1!, EXIT+1!, BLD+154!, SET+2*

Label References

Name Line Occurrences
$$SETL BLD+9, BLD+10, BLD+12, BLD+13, BLD+15, BLD+18, BLD+20, BLD+25, BLD+26, BLD+28
, BLD+29, BLD+31, BLD+32, BLD+34, BLD+35, BLD+37, BLD+38, BLD+40, BLD+43, BLD+46
, BLD+49, BLD+50, BLD+52, BLD+53, BLD+55, BLD+56, BLD+58, BLD+61, BLD+67, BLD+68
, BLD+70, BLD+72, BLD+87, BLD+89, BLD+91, BLD+93, BLD+95, BLD+99, BLD+101, BLD+113
, BLD+115, BLD+118, BLD+121, BLD+126, BLD+132, BLD+137, BLD+139, BLD+141, BLD+143, BLD+145
, BLD+146, BLD+148
$$STATUS BLD+2, SEND278+25
BLD INIT+9
INIT EN2+6
SET BLD+8, BLD+11, BLD+14, BLD+16, BLD+19, BLD+20, BLD+24, BLD+27, BLD+30, BLD+33
, BLD+36, BLD+39, BLD+41, BLD+42, BLD+44, BLD+46, BLD+48, BLD+51, BLD+54, BLD+57
, BLD+59, BLD+62, BLD+63, BLD+69, BLD+70, BLD+72, BLD+73, BLD+79, BLD+81, BLD+87
, BLD+89, BLD+91, BLD+93, BLD+95, BLD+99, BLD+101, BLD+103, BLD+111, BLD+112, BLD+114
, BLD+116, BLD+119, BLD+122, BLD+126, BLD+131, BLD+133, BLD+134, BLD+137, BLD+139, BLD+141
, BLD+143, BLD+145, BLD+147, BLD+149, BLD+150

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AAADATA BLD+1~
AAADATA( BLD+83, BLD+85, BLD+86, BLD+88, BLD+90, BLD+92, BLD+94, BLD+97
ADDR BLD+1~, BLD+17
ADDR( BLD+20
ADDR(1 BLD+18
ADMIEN SEND278+1~, SEND278+15*, SEND278+16, SEND278+17
CMTDATA BLD+1~
CMTDATA( BLD+65, BLD+66, BLD+67, BLD+68
CMTIEN ADDCMT+5~, ADDCMT+10*, ADDCMT+14
COL SETL~, SETL+1
DA ADDCMT+5~, ADDCMT+10*, ADDCMT+14*
DA(1 ADDCMT+9*, ADDCMT+12, ADDCMT+14*
DATA SETL~, SETL+1
DATA3553 BLD+1~
DATA3553( BLD+25, BLD+26, BLD+28, BLD+29, BLD+31, BLD+32, BLD+34, BLD+35, BLD+37, BLD+38
, BLD+40, BLD+45, BLD+46
DATA36 BLD+1~
DATA36(36 BLD+9, BLD+10, BLD+12, BLD+13, BLD+15
DD ADDCMT+5~, ADDCMT+10!
DDT SEND278+1~, SEND278+13*, SEND278+18*, SEND278+20
DFN EN+1~, EN2+5~, HDR+3, INIT+4*, INIT+6, BLD+55, BLD+58, BLD+60, SEND278+20
DIC ADDCMT+5~, ADDCMT+9*
DIC(0 ADDCMT+9*
DIE ADDCMT+5~, ADDCMT+12*, ADDCMT+14
DIK ADDCMT+5~, ADDCMT+14*
DINUM ADDCMT+5~
DIR SEND278+1~, SEND278+40!
DIR("A" SEND278+40*
DIR("B" SEND278+40*
DIR(0 SEND278+40*
DIROUT SEND278+1~, SEND278+41
DIRUT ADDCMT+5~, SEND278+1~
DISIEN SEND278+1~, SEND278+17*, SEND278+18
DLAYGO ADDCMT+5~, ADDCMT+9*
DLINE EN+1~, EN+4
DO ADDCMT+5~, ADDCMT+10!
DR ADDCMT+5~, ADDCMT+12*
DTOUT ADDCMT+5~, SEND278+1~, SEND278+41
DUOUT ADDCMT+5~, SEND278+1~, SEND278+41
DUZ ADDCMT+12
EDT SEND278+1~, SEND278+14*, SEND278+20
EVENTDT EN+1~, EN2+5~, INIT+8*
FROMWL ADDCMT~, ADDCMT+6*, ADDCMT+17
IBEXIT SEND278+1~, SEND278+31*, SEND278+32*, SEND278+35
IBL BLD+1~, BLD+9*, BLD+10*, BLD+12*, BLD+13*, BLD+15*, BLD+18*, BLD+20*, BLD+25*, BLD+26*
, BLD+28*, BLD+29*, BLD+31*, BLD+32*, BLD+34*, BLD+35*, BLD+37*, BLD+38*, BLD+40*, BLD+43*
, BLD+45*, BLD+46, BLD+49*, BLD+50*, BLD+52*, BLD+53*, BLD+55*, BLD+56*, BLD+58*, BLD+60*
, BLD+61, BLD+67*, BLD+68*, BLD+70*, BLD+72*, BLD+86*, BLD+87, BLD+88*, BLD+89, BLD+91*
, BLD+92*, BLD+93, BLD+95*, BLD+99*, BLD+101*, BLD+113*, BLD+115*, BLD+117*, BLD+118, BLD+121*
, BLD+122*, BLD+126*, BLD+132*, BLD+136*, BLD+137, BLD+138*, BLD+139, BLD+140*, BLD+141, BLD+142*
, BLD+143, BLD+144*, BLD+145, BLD+146*, BLD+148*
IBLINE BLD+1~, BLD+8*, BLD+9*, BLD+10*, BLD+11*, BLD+12*, BLD+13*, BLD+14*, BLD+15*, BLD+16*
, BLD+18*, BLD+19*, BLD+20*, BLD+24*, BLD+25*, BLD+26*, BLD+27*, BLD+28*, BLD+29*, BLD+30*
, BLD+31*, BLD+32*, BLD+33*, BLD+34*, BLD+35*, BLD+36*, BLD+37*, BLD+38*, BLD+39*, BLD+40*
, BLD+41*, BLD+43*, BLD+44*, BLD+46*, BLD+48*, BLD+49*, BLD+50*, BLD+51*, BLD+52*, BLD+53*
, BLD+54*, BLD+55*, BLD+56*, BLD+57*, BLD+58*, BLD+59*, BLD+61*, BLD+62*, BLD+63*, BLD+67*
, BLD+68*, BLD+69*, BLD+70*, BLD+72*, BLD+81*, BLD+87*, BLD+89*, BLD+91*, BLD+93*, BLD+95*
, BLD+99*, BLD+101*, BLD+111*, BLD+113*, BLD+114*, BLD+115*, BLD+116*, BLD+118*, BLD+119*, BLD+121*
, BLD+122*, BLD+126*, BLD+127*, BLD+132*, BLD+133*, BLD+137*, BLD+139*, BLD+141*, BLD+143*, BLD+145*
, BLD+146*, BLD+147*, BLD+148*, BLD+149*
>> IBRESP SEND278+8*
IBTRENT EN+1~, EN+3*, SEND278+7*, SEND278+11*, SEND278+31, SEND278+32, SEND278+38, SEND278+46
IBTRIEN EN+4*, EN+5, EN+7, EN+10, EN2~, EN2+4, INIT+2, INIT+3, BLD+2, BLD+3
, BLD+64, BLD+78, ADDCMT+9, ADDCMT+14, SEND278+11, SEND278+20*, SEND278+23, SEND278+25, SEND278+31, SEND278+35
, SEND278+42, SEND278+44, STATUS~, STATUS+5, PRMARK+6, PRMARK+8, PRMARK+11
>> IBTRN SEND278+12, SEND278+13
IBTRNM EN+1~, EN+3*, EN2~, EN2+3, INIT+1, EXIT+1, BLD+154, SET+2
IBY BLD+1~, BLD+8*, BLD+9*, BLD+10*, BLD+12*, BLD+13*, BLD+15*, BLD+18*, BLD+20*, BLD+24*
, BLD+25*, BLD+26*, BLD+28*, BLD+29*, BLD+31*, BLD+32*, BLD+34*, BLD+35*, BLD+37*, BLD+38*
, BLD+40*, BLD+43*, BLD+46*, BLD+48*, BLD+49*, BLD+50*, BLD+52*, BLD+53*, BLD+55*, BLD+56*
, BLD+58*, BLD+60*, BLD+61, BLD+63*, BLD+67*, BLD+68*, BLD+70*, BLD+72*, BLD+80*, BLD+81
, BLD+86*, BLD+87, BLD+88*, BLD+89, BLD+91*, BLD+92*, BLD+93, BLD+95*, BLD+99*, BLD+101*
, BLD+111*, BLD+113*, BLD+115*, BLD+117*, BLD+118, BLD+121*, BLD+126*, BLD+132*, BLD+136*, BLD+137
, BLD+138*, BLD+139, BLD+140*, BLD+141, BLD+142*, BLD+143, BLD+144*, BLD+145, BLD+146*, BLD+148*
IEN312 EN+1~, EN2+5~, INIT+5*, INIT+6, BLD+55, BLD+58, BLD+60
IEN3553 BLD+1~, BLD+2*, BLD+22
IEN36 EN+1~, INIT+7*, BLD+6, BLD+17
IENS BLD+1~, BLD+6*, BLD+7, BLD+9, BLD+10, BLD+12, BLD+13, BLD+15, BLD+22*, BLD+23
, BLD+25, BLD+26, BLD+28, BLD+29, BLD+31, BLD+32, BLD+34, BLD+35, BLD+37, BLD+38
, BLD+40, BLD+45, BLD+46, BLD+64*, BLD+78*, BLD+82, BLD+108*, BLD+109, BLD+110, BLD+113
, BLD+115, BLD+117, BLD+120, BLD+123, BLD+124, SEND278+1~, SEND278+13*, SEND278+14, SEND278+15
INSNODE0 EN+1~, EN2+5~, INIT+6*, INIT+7, BLD+2, BLD+49, BLD+50, BLD+52, BLD+53, BLD+56
>> IOINHI SET+3
>> IOINORM SET+3
LABEL SETL~, SETL+1
LINE SETL~, SETL+1*, SETL+2, SET~, SET+2
LNG SETL~, SETL+1
NODE0 EN+1~, EN2+5~, INIT+3*, INIT+4, INIT+5, INIT+8
PNDDATA BLD+1~
PNDDATA( BLD+110, BLD+113, BLD+115, BLD+117, BLD+120, BLD+123, BLD+124, BLD+130, BLD+135, BLD+136
, BLD+138, BLD+140, BLD+142, BLD+144, BLD+148
RES STATUS+3~, STATUS+4*, STATUS+5*, STATUS+6
RESPONSE BLD+1~, BLD+2*, BLD+3*, BLD+77, BLD+78, BLD+107, BLD+108
SPEC SET~, SET+3
STATUS BLD+1~, BLD+2*, BLD+76, BLD+77, BLD+78, BLD+80, BLD+84, BLD+99, SEND278+1~, SEND278+25*
, SEND278+27, SEND278+29
TMPARY BLD+1~, BLD+71!, BLD+72, BLD+100!, BLD+101, BLD+125!, BLD+126
TMPARY( BLD+72, BLD+101, BLD+126
U HDR+3, INIT+4, INIT+5, INIT+7, INIT+8, BLD+2, BLD+3, BLD+49, BLD+50, BLD+52
, BLD+53, BLD+55, BLD+56, BLD+58, BLD+60, BLD+86, BLD+91, BLD+95, BLD+117, BLD+136
, SEND278+44, STATUS+5
VA HDR+1~
VADM HDR+1~
VADM(1 HDR+3
VADM(2 HDR+3
VADM(3 HDR+3
VADM(4 HDR+3
VAERR HDR+1~
>> VALMBCK EN+2*, HELP+4*, ADDCMT+7*, SEND278+9*
>> VALMCNT BLD+4*, BLD+154*, SET+1*, SET+2, SET+3
>> VALMHDR(1 HDR+4*
>> VALMQUIT EN2+3*, EN2+4*, INIT+2*
>> VALMSG EN+7*, PRMARK+8*, PRMARK+9*, PRMARK+11*, PRMARK+12*
WHICH PRMARK~, PRMARK+6, PRMARK+7
X ADDCMT+5~, ADDCMT+9*, SEND278+1~
Y ADDCMT+5~, ADDCMT+10, SEND278+1~, SEND278+41
Z HDR+1~, HDR+2*, HDR+3*, HDR+4, BLD+1~, BLD+20*, BLD+135*, BLD+136, BLD+138, BLD+140
, BLD+142, BLD+144, BLD+148, BLD+154*
Z0 BLD+1~, BLD+45*, BLD+46, BLD+65*, BLD+66, BLD+67, BLD+68, BLD+71, BLD+83*, BLD+85
, BLD+86, BLD+88, BLD+90, BLD+92, BLD+94, BLD+97, BLD+123*, BLD+124
Z1 BLD+1~, BLD+72*, BLD+85*, BLD+86, BLD+90*, BLD+91, BLD+94*, BLD+95, BLD+97*, BLD+100
, BLD+124*, BLD+125
Z2 BLD+1~, BLD+101*, BLD+126*
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