IBVCB ;LITS/MRD - VIEW CANCELLED BILL ;25-JUN-14
Source file <IBVCB.m>
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 | IB VIEW CANCEL BILL IBVCB1 IBVCB2 |
Kernel | 1 | ^DIC(19 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Main Entry Point.
|
|
EN1 | ;
|
|
ENQ | ;
|
|
SELECT | ; Prompt user for patient or bill.
|
|
SELECTQ | ;
|
|
DEVICE | ; Allow user to select the device.
|
|
DISPLAY | ; Display claim information to user.
|
|
HEADERA | ; Pull header information.
|
|
HEADERB | ; Print header information.
|
|
CONTINUE | ; Enter return to continue.
|
|
LINE(IBTEXT) | ; Print the lines of information in the IBTEXT array.
|
|
DOLLAR(X) | ; Function to return a formatted dollar amount.
|
|
PART1 | ; General Claim Data, Other Care, Codes.
|
Name | Field # of Occurrence |
---|---|
COMMA^%DTC | DOLLAR+5 |
^%ZIS | DEVICE+3 |
^%ZISC | ENQ+2 |
^DIC | SELECT+10 |
$$GET1^DIQ | HEADERA+4, HEADERB+7, PART1+9, PART1+10, PART1+11, PART1+14, PART1+18, PART1+22, PART1+23, PART1+24 , PART1+27, PART1+28, PART1+31, PART1+32, PART1+35, PART1+38, PART1+39, PART1+40, PART1+43, PART1+46 , PART1+47, PART1+50, PART1+51, PART1+54, PART1+55, PART1+58, PART1+59, PART1+62, PART1+63, PART1+66 , PART1+67, PART1+70, PART1+71, PART1+74, PART1+77, PART1+78, PART1+81, PART1+82, PART1+85, PART1+86 , PART1+89, PART1+90, PART1+93, PART1+96, PART1+97, PART1+100, PART1+103, PART1+104, PART1+107, PART1+110 , PART1+111, PART1+114, PART1+117, PART1+118, PART1+121, PART1+122, PART1+125, PART1+126, PART1+129, PART1+130 , PART1+131, PART1+142, PART1+143, PART1+159, PART1+170, PART1+171, PART1+172, PART1+183, PART1+184 |
^DIR | CONTINUE+5 |
$$PT^IBEFUNC | HEADERA+4 |
PART2^IBVCB1 | DISPLAY+5 |
PART3^IBVCB2 | DISPLAY+6 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | PART1+13, PART1+17, PART1+140, PART1+157, PART1+168, PART1+181 |
^DGCR(399.1 - [#399.1] | PART1+97 |
Name | Line Occurrences |
---|---|
$$DOLLAR | PART1+74, PART1+114 |
CONTINUE | HEADERB+3 |
DEVICE | EN1+6 |
DISPLAY | EN1+8 |
EN1 | EN1+10 |
ENQ | EN1+4, EN1+6 |
HEADERA | DISPLAY+2 |
HEADERB | HEADERA+7, LINE+21 |
LINE | PART1+7, PART1+15, PART1+19, PART1+25, PART1+29, PART1+33, PART1+36, PART1+41, PART1+44, PART1+48 , PART1+52, PART1+56, PART1+60, PART1+64, PART1+68, PART1+72, PART1+75, PART1+79, PART1+83, PART1+87 , PART1+91, PART1+94, PART1+101, PART1+105, PART1+108, PART1+112, PART1+115, PART1+119, PART1+123, PART1+127 , PART1+132, PART1+137, PART1+144, PART1+148, PART1+154, PART1+160, PART1+164, PART1+173, PART1+177, PART1+185 , PART1+189 |
PART1 | DISPLAY+4 |
SELECT | EN1+4 |
SELECTQ | SELECT+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | DEVICE+2* |
DIC | SELECT+2~, SELECT+5* |
DIC("A" | SELECT+7* |
DIC("S" | SELECT+9* |
DIC(0 | SELECT+6* |
DIR | CONTINUE+3~ |
DIR(0 | CONTINUE+4* |
IBBT | PART1+2~, PART1+96*, PART1+97*, PART1+99 |
IBFIND | PART1+2~, PART1+139*, PART1+141*, PART1+146, PART1+156*, PART1+158*, PART1+162, PART1+167*, PART1+169*, PART1+175 , PART1+180*, PART1+182*, PART1+187 |
IBHEADER | EN+2~, HEADERA+4*, HEADERB+5, HEADERB+6 |
IBIFN | EN+2~, SELECT+14*, SELECT+15, HEADERA+4, HEADERB+7, PART1+9, PART1+10, PART1+11, PART1+13, PART1+14 , PART1+17, PART1+18, PART1+22, PART1+23, PART1+24, PART1+27, PART1+28, PART1+31, PART1+32, PART1+35 , PART1+38, PART1+39, PART1+40, PART1+43, PART1+46, PART1+47, PART1+50, PART1+51, PART1+54, PART1+55 , PART1+58, PART1+59, PART1+62, PART1+63, PART1+66, PART1+67, PART1+70, PART1+71, PART1+74, PART1+77 , PART1+78, PART1+81, PART1+82, PART1+85, PART1+86, PART1+89, PART1+90, PART1+93, PART1+96, PART1+97 , PART1+100, PART1+103, PART1+104, PART1+107, PART1+110, PART1+111, PART1+114, PART1+117, PART1+118, PART1+121 , PART1+122, PART1+125, PART1+126, PART1+129, PART1+130, PART1+131, PART1+140, PART1+142, PART1+143, PART1+157 , PART1+159, PART1+168, PART1+170, PART1+171, PART1+172, PART1+181, PART1+183, PART1+184 |
IBPAGE | EN+2~, HEADERA+5*, HEADERB+2*, HEADERB+3, HEADERB+8 |
IBQUIT | EN+2~, EN1+2*, EN1+4, EN1+6, SELECT+12*, SELECT+15*, DEVICE+4*, DISPLAY+4, DISPLAY+5, CONTINUE+6* |
IBTEXT | EN+2~, LINE~, LINE+29!, PART1+7, PART1+15, PART1+19, PART1+25, PART1+29, PART1+33, PART1+36 , PART1+41, PART1+44, PART1+48, PART1+52, PART1+56, PART1+60, PART1+64, PART1+68, PART1+72, PART1+75 , PART1+79, PART1+83, PART1+87, PART1+91, PART1+94, PART1+101, PART1+105, PART1+108, PART1+112, PART1+115 , PART1+119, PART1+123, PART1+127, PART1+132, PART1+137, PART1+144, PART1+148, PART1+154, PART1+160, PART1+164 , PART1+173, PART1+177, PART1+185, PART1+189 |
IBTEXT( | LINE+24, LINE+26, LINE+27 |
IBTEXT("" | LINE+20 |
IBTEXT(1 | PART1+4*, PART1+9*, PART1+10*, PART1+18*, PART1+22*, PART1+23*, PART1+27*, PART1+28*, PART1+31*, PART1+32* , PART1+35*, PART1+38*, PART1+43*, PART1+46*, PART1+47*, PART1+50*, PART1+51*, PART1+54*, PART1+55*, PART1+58* , PART1+59*, PART1+62*, PART1+63*, PART1+66*, PART1+67*, PART1+70*, PART1+71*, PART1+74*, PART1+77*, PART1+78* , PART1+81*, PART1+82*, PART1+85*, PART1+86*, PART1+89*, PART1+90*, PART1+93*, PART1+99*, PART1+100*, PART1+103* , PART1+104*, PART1+107*, PART1+110*, PART1+111*, PART1+114*, PART1+117*, PART1+118*, PART1+121*, PART1+122*, PART1+125* , PART1+126*, PART1+129*, PART1+134*, PART1+142*, PART1+147*, PART1+151*, PART1+159*, PART1+163*, PART1+170*, PART1+171* , PART1+176*, PART1+183*, PART1+184*, PART1+188* |
IBTEXT(2 | PART1+5*, PART1+11*, PART1+12*, PART1+14*, PART1+24*, PART1+39*, PART1+40*, PART1+130*, PART1+135*, PART1+143* , PART1+152*, PART1+172* |
IBTEXT(3 | PART1+6*, PART1+131*, PART1+136*, PART1+153* |
IBX | LINE+10~, LINE+20*, LINE+21, LINE+23*, LINE+24*, LINE+26, LINE+27, PART1+2~, PART1+13*, PART1+14 , PART1+17*, PART1+18, PART1+139*, PART1+140*, PART1+142, PART1+143, PART1+156*, PART1+157*, PART1+159, PART1+167* , PART1+168*, PART1+170, PART1+171, PART1+172, PART1+180*, PART1+181*, PART1+183, PART1+184 |
IOF | HEADERB+4 |
IOSL | LINE+21 |
IOST | HEADERB+3 |
>> POP | DEVICE+4 |
U | SELECT+14, HEADERB+5, HEADERB+6, PART1+97 |
X | SELECT+2~, SELECT+12, DOLLAR~, DOLLAR+2, DOLLAR+6 |
X2 | DOLLAR+3~, DOLLAR+4* |
X3 | DOLLAR+3~, DOLLAR+4* |
Y | SELECT+2~, SELECT+14, CONTINUE+6 |