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* |