IBJTRX ;ALB/ESG - TPJI ePharmacy ECME claim information ;22-Oct-2010
Source file <IBJTRX.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 8 | $$COBN^IBCEF $$ISRX^IBCEF1 $$RXSITE^IBCEF73A $$FO^IBCNEUT1 $$HOD^IBCNHUT1 HDR^IBJTU1 $$RXAPI1^IBNCPUT1 $$ECME^IBTRE |
| Kernel | 3 | $$FMTE^XLFDT DISP^XQORM1 $$NPI^XUSNPI |
| List Manager | 3 | EN^VALM ($$SETSTR,FULL,PAUSE)^VALM1 (CLEAN,CNTRL,KILL)^VALM10 |
| E Claims Management Engine | 2 | $$CLAIM^BPSBUTL ^BPSVRX |
| VA FileMan | 1 | GETS^DIQ |
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 3 | IBJT ECME RESP INFO IBJT ECME RESP INFO SCREEN IBJT VIEW ECME RX |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point for IBJT ECME RESP INFO
|
|
| EX | ;
|
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| INITX | ;
|
|
| VER | ; Action to launch the View ePharmacy Rx report
|
|
| VERX | ;
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| SETL(TEXT,DATA,LABEL,LEND,LENL,COL) | ; build line of text
; TEXT - existing line of text data ; DATA - field data ; LABEL - field label ; LEND - max length of data ; LENL - length of label (label will be right justified so the colons line up) ; COL - starting column for insert |
|
| SET(TEXT,VID) | ; set data in variable TEXT into ListMan display
; VID is video attribute data of line if any ; Format: type;start column;width ; type=1 (reverse video) ; type=2 (bold) ; type=3 (underline) |
|
| SETX | ;
|
|
| AMT(VAL,L,P) | ; convert dollar amount to external display
; VAL can be a number or the Fileman external version of the number ; L is the $J field length (default 8) ; P is a flag indicating the number should be enclosed within parentheses ; strip $ and spaces |
| Name | Field # of Occurrence |
|---|---|
| $$CLAIM^BPSBUTL | INIT+11 |
| ^BPSVRX | VER+13 |
| GETS^DIQ | INIT+35, INIT+36 |
| $$COBN^IBCEF | INIT+10 |
| $$ISRX^IBCEF1 | EN+4 |
| $$RXSITE^IBCEF73A | INIT+18 |
| $$FO^IBCNEUT1 | SETL+10 |
| $$HOD^IBCNHUT1 | INIT+30 |
| HDR^IBJTU1 | HDR+1 |
| $$RXAPI1^IBNCPUT1 | INIT+19, INIT+56 |
| $$ECME^IBTRE | EN+5 |
| EN^VALM | EN+13 |
| $$SETSTR^VALM1 | SETL+11 |
| FULL^VALM1 | EN+2, VER+3 |
| PAUSE^VALM1 | EN+3, EN+4, EN+5, EN+8, EN+11, VER+4 |
| CLEAN^VALM10 | EXIT+2 |
| CNTRL^VALM10 | SET+15 |
| KILL^VALM10 | EXIT+2 |
| $$FMTE^XLFDT | INIT+53, INIT+68 |
| DISP^XQORM1 | HELP+1 |
| $$NPI^XUSNPI | INIT+21, INIT+22 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| 9002313.0301 | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BPSR - [#9002313.03] | INIT+30, INIT+32 |
| ^DGCR(399 - [#399] | INIT+13, INIT+14, INIT+15, INIT+29, INIT+60 |
| ^IBA(362.4 - [#362.4] | EN+7, EN+9, INIT+6, INIT+7 |
| ^TMP("BPSVRX-TPJI" | VER+2!, VER+7*, VER+8*, VER+9*, VER+17, VER+18, VER+19, VERX+2! |
| ^TMP("IBJTCA" | VER+7, VER+17* |
| ^TMP("IBJTRX" | INIT+3!, VER+8, VER+18*, EXIT+1!, SET+8* |
| ^TMP($J | VER+9, VER+19* |
| Name | Line Occurrences |
|---|---|
| $$AMT | INIT+60, INIT+83, INIT+84, INIT+85, INIT+86, INIT+92, INIT+93, INIT+94, INIT+97, INIT+98 , INIT+99, INIT+102, INIT+104, INIT+111, INIT+112, INIT+115, INIT+116, INIT+119 |
| $$SETL | INIT+40, INIT+41, INIT+44, INIT+45, INIT+48, INIT+52, INIT+53, INIT+56, INIT+57, INIT+60 , INIT+61, INIT+68, INIT+69, INIT+80, INIT+83, INIT+84, INIT+85, INIT+86, INIT+89, INIT+92 , INIT+93, INIT+94, INIT+97, INIT+98, INIT+99, INIT+102, INIT+104, INIT+108, INIT+111, INIT+112 , INIT+115, INIT+116, INIT+119, INIT+134, INIT+136, INIT+137, INIT+139, INIT+140, INIT+142, INIT+143 , INIT+145, INIT+147 |
| EX | EN+3, EN+4, EN+5, EN+8, EN+11 |
| INITX | INIT+75, INIT+123 |
| SET | INIT+42, INIT+46, INIT+49, INIT+51, INIT+54, INIT+58, INIT+62, INIT+64, INIT+70, INIT+76 , INIT+77, INIT+81, INIT+83, INIT+84, INIT+85, INIT+86, INIT+88, INIT+90, INIT+95, INIT+100 , INIT+103, INIT+105, INIT+107, INIT+109, INIT+113, INIT+117, INIT+120, INIT+124, INIT+125, INIT+131 , INIT+133, INIT+135, INIT+138, INIT+141, INIT+144, INIT+146, INIT+148, INITX+1 |
| SETX | SET+9 |
| VERX | VER+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BPSM | INIT+1~ |
| BPSM( | INIT+83, INIT+84, INIT+85, INIT+86, INIT+92, INIT+93, INIT+94, INIT+97, INIT+98, INIT+99 , INIT+102, INIT+104, INIT+111, INIT+112, INIT+115, INIT+116, INIT+119 |
| BPSMCOB | INIT+1~ |
| BPSMCOB( | INIT+123, INIT+128, INIT+129, INIT+134, INIT+136, INIT+137, INIT+139, INIT+140, INIT+142, INIT+143 , INIT+145, INIT+147 |
| BPSVRX | VER+1~ |
| BPSVRX("FILL#" | VER+12* |
| BPSVRX("RXIEN" | VER+11* |
| COL | SETL~, SETL+8*, SETL+11 |
| D1 | SETL+8~*, SETL+9*, SETL+10*, SETL+11 |
| DATA | SETL~, SETL+10 |
| >> DFN | HDR+1 |
| DOCIEN | INIT+1~, INIT+19*, INIT+22 |
| DOCNPI | INIT+1~, INIT+20*, INIT+22*, INIT+24*, INIT+45 |
| ECME | INIT+1~, INIT+16*, INIT+40 |
| ECMEAP | INIT+1~, INIT+17*, INIT+44 |
| IB0 | INIT+2~, INIT+14*, INIT+29, INIT+67 |
| IBBPS | INIT+2~, INIT+11*, INIT+26 |
| IBCOBN | INIT+2~, INIT+10*, INIT+11, INIT+61 |
| IBCPY | INIT+2~, INIT+29*, INIT+30 |
| IBHPD | INIT+2~, INIT+30*, INIT+48 |
| >> IBIFN | EN+3, EN+4, EN+5, EN+7, HDR+1, INIT+6, INIT+10, INIT+13, INIT+14, INIT+15 , INIT+18, INIT+29, INIT+60 |
| IBLINE | INIT+1~, INIT+40*, INIT+41*, INIT+42, INIT+44*, INIT+45*, INIT+46, INIT+48*, INIT+49, INIT+52* , INIT+53*, INIT+54, INIT+56*, INIT+57*, INIT+58, INIT+60*, INIT+61*, INIT+62, INIT+68*, INIT+69* , INIT+70, INIT+80*, INIT+81, INIT+83*, INIT+84*, INIT+85*, INIT+86*, INIT+89*, INIT+90, INIT+92* , INIT+93*, INIT+94*, INIT+95, INIT+97*, INIT+98*, INIT+99*, INIT+100, INIT+102*, INIT+103, INIT+104* , INIT+105, INIT+108*, INIT+109, INIT+111*, INIT+112*, INIT+113, INIT+115*, INIT+116*, INIT+117, INIT+119* , INIT+120, INIT+132*, INIT+133, INIT+134*, INIT+135, INIT+136*, INIT+137*, INIT+138, INIT+139*, INIT+140* , INIT+141, INIT+142*, INIT+143*, INIT+144, INIT+145*, INIT+146, INIT+147*, INIT+148 |
| IBM0 | INIT+2~, INIT+29* |
| IBM1 | INIT+1~, INIT+13*, INIT+16, INIT+17 |
| IBRXDATA | EN+1~, EN+9*, EN+10, INIT+2~, INIT+7*, INIT+8, INIT+9, INIT+52, INIT+53, INIT+57 , VER+4, VER+11, VER+12 |
| IBRXFILL | INIT+2~, INIT+9*, INIT+11, INIT+52 |
| IBRXIEN | EN+1~, EN+10*, EN+11, INIT+2~, INIT+8*, INIT+11, INIT+19, INIT+56 |
| IBS | INIT+2~, INIT+15*, INIT+68, INIT+69 |
| IBVL | INIT+2~, INIT+30*, INIT+48* |
| IBZ | EN+1~, EN+7*, EN+8, EN+9, INIT+2~, INIT+6*, INIT+7 |
| >> IOINHI | SET+13 |
| >> IOINORM | SET+14 |
| >> IORVOFF | SET+14 |
| >> IORVON | SET+13 |
| >> IOUOFF | SET+14 |
| >> IOUON | SET+13 |
| L | AMT~, AMT+6*, AMT+7, AMT+8 |
| LABEL | SETL~, SETL+9 |
| LEND | SETL~, SETL+10 |
| LENL | SETL~, SETL+9 |
| OFF | SET+12~, SET+14*, SET+15 |
| ON | SET+12~, SET+13*, SET+15 |
| P | AMT~, AMT+7 |
| PHARMNPI | INIT+1~, INIT+20*, INIT+21*, INIT+23*, INIT+41 |
| RESPIEN | INIT+1~, INIT+26*, INIT+27, INIT+30, INIT+31, INIT+32, INIT+34, INIT+75 |
| RSPSUB | INIT+1~, INIT+32*, INIT+33, INIT+34 |
| RXORG | INIT+1~, INIT+18*, INIT+21 |
| STR | SETL+8~, SETL+11*, SETL+13 |
| TEXT | SETL~, SETL+11, SET~, SET+8 |
| U | EN+10, INIT+8, INIT+9, INIT+16, INIT+17, INIT+21, INIT+22, INIT+26, INIT+29, INIT+30 , INIT+48, INIT+52, INIT+53, INIT+57, INIT+60, INIT+67, INIT+68, INIT+69, VER+11, VER+12 |
| VAL | AMT~, AMT+5*, AMT+7, AMT+8 |
| >> VALMBCK | EX+1*, VERX+1* |
| >> VALMCNT | INIT+4*, SET+7*, SET+8, SET+15 |
| >> VALMEVL | EXIT+2 |
| VID | SET~, SET+9, SET+13, SET+14, SET+15 |
| X | EN+1~, HELP+1* |
| Y | EN+1~ |
| ZC | INIT+1~, INIT+128*, INIT+129*, INIT+134, INIT+136, INIT+137, INIT+139, INIT+140, INIT+142, INIT+143 , INIT+145, INIT+147 |
| ZCN | INIT+1~, INIT+129*, INIT+130*, INIT+132 |
| ZCTOT | INIT+1~, INIT+128*, INIT+132 |
| ZM | INIT+1~, INIT+34*, INIT+35, INIT+36, INIT+83, INIT+84, INIT+85, INIT+86, INIT+92, INIT+93 , INIT+94, INIT+97, INIT+98, INIT+99, INIT+102, INIT+104, INIT+111, INIT+112, INIT+115, INIT+116 , INIT+119 |
| ZR | INIT+1~, INIT+31* |