IBTRH2 ;ALB/YMG - HCSR worklist expand entry ;18-JUN-2014
Source file <IBTRH2.m>
| 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 |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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) |
| 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 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine 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 |
| 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* |
| 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 |
| >> | 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* |