IBCSC4B ;ALB/MJB - MCCR PTF SCREEN (CONT.) ;24 FEB 89 9:52
Source file <IBCSC4B.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 | IBCSC4 IBXS4 IBXSC4 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PRO | ; display PTF procedures within date range of bill
; ^UTILITY is rebuilt because PCM may have changed since originally built |
|
PTFPDSP(IBIFN) | ; display PTF procedures within the date range of the bill
; Output: ^UTILITY($J,"IB") as defined by PTFPRDT^IBCSC4A ; includes ICD Surgeries (401) and ICD Procedures (601) or CPT Professional Services (801) |
|
DSPWDH(LN,RCOL) | ; Pad line to RCOL width
|
|
DSPHDR(LN,TYPE) | ; Format header line
|
|
DSPCOD(LN,TYPE,SG) | ; Format code line
|
|
Q |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | PTFPDSP+6, PTFPDSP+8 |
^UTILITY($J | PTFPDSP+3!, PTFPDSP+13, PTFPDSP+15, PTFPDSP+21, PTFPDSP+24, PTFPDSP+26, DSPCOD+2 |
^VA(200 - [#200] | DSPCOD+11 |
Name | Line Occurrences |
---|---|
$$DSPCOD | PTFPDSP+27 |
$$DSPHDR | PTFPDSP+22 |
$$DSPWDH | PTFPDSP+22, PTFPDSP+27, DSPCOD+7, DSPCOD+11 |
PTFPDSP | PRO+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | Q+1! |
A | Q+1! |
B | Q+1! |
DIC | Q+1! |
DIR | PTFPDSP+4~, PTFPDSP+30! |
DIR(0 | PTFPDSP+30* |
DIRUT | PTFPDSP+30! |
F | Q+1! |
I | Q+1! |
IB0 | PTFPDSP+3~, PTFPDSP+6*, PTFPDSP+7, PTFPDSP+8 |
IB3 | Q! |
IB4 | Q! |
IB5 | Q! |
IB6 | Q! |
IB7 | Q! |
IB8 | Q! |
IB9 | Q! |
IBAE | Q! |
IBAO | Q! |
IBC | PTFPDSP+4~, PTFPDSP+24*, PTFPDSP+26 |
IBCNT | PTFPDSP+4~, PTFPDSP+19*, PTFPDSP+22*, PTFPDSP+27* |
IBCODE | PTFPDSP+4~, PTFPDSP+26*, PTFPDSP+27 |
IBCT | Q! |
IBDIA | Q! |
IBDP | Q! |
IBDX | Q! |
IBDXC | Q! |
IBDXX | Q! |
IBDXY | Q! |
IBE | PTFPDSP+4~, PTFPDSP+19*, PTFPDSP+21, PTFPDSP+24, PTFPDSP+26 |
IBE1 | PTFPDSP+4~, PTFPDSP+15*, PTFPDSP+19 |
IBE2 | PTFPDSP+4~, PTFPDSP+15*, PTFPDSP+19, PTFPDSP+29* |
IBFDT | PTFPDSP+3~, PTFPDSP+8*, PTFPDSP+10 |
IBHEADER | PTFPDSP+4~, PTFPDSP+21*, PTFPDSP+22 |
IBI | PTFPDSP+4~, PTFPDSP+29*, Q! |
IBIFN | PRO+3, PTFPDSP~, PTFPDSP+6, PTFPDSP+8, PTFPDSP+10 |
IBINDTS | PTFPDSP+4~, PTFPDSP+7*, PTFPDSP+10 |
IBLCNT | PTFPDSP+4~, PTFPDSP+12*, PTFPDSP+29* |
IBLINE | PTFPDSP+4~, PTFPDSP+22*, PTFPDSP+27*, DSPHDR+1~*, DSPHDR+2*, DSPHDR+3*, DSPHDR+4*, DSPHDR+5*, DSPHDR+7*, DSPHDR+8 , DSPCOD+1~*, DSPCOD+4*, DSPCOD+7*, DSPCOD+10*, DSPCOD+11*, DSPCOD+12*, DSPCOD+14*, DSPCOD+15 |
IBNC | Q! |
IBNOR | Q! |
IBOP | Q! |
IBOPC | Q! |
IBOPX | Q! |
IBOPY | Q! |
IBP | Q! |
IBPB | DSPCOD+1~, DSPCOD+2*, DSPCOD+7 |
IBPCM | PTFPDSP+3~, PTFPDSP+6*, PTFPDSP+10 |
IBPP | Q! |
IBPRO | Q! |
IBPROT | Q! |
IBPTF | PTFPDSP+3~, PTFPDSP+6*, PTFPDSP+10 |
IBPX | Q! |
IBPY | Q! |
IBR | PTFPDSP+4~, PTFPDSP+19*, PTFPDSP+22, PTFPDSP+27 |
IBSD | Q! |
IBSGCD | PTFPDSP+4~, PTFPDSP+26*, PTFPDSP+27 |
IBSP | Q! |
IBTDT | PTFPDSP+3~, PTFPDSP+8*, PTFPDSP+10 |
IBU | PTFPDSP+3~, PTFPDSP+8* |
IBWE | Q! |
IBWO | Q! |
IBX | DSPHDR+1~, DSPHDR+5*, DSPCOD+1~, DSPCOD+6*, DSPCOD+7, DSPCOD+9*, DSPCOD+10 |
IOF | PTFPDSP+12 |
J | Q+1! |
K | Q+1! |
LN | DSPWDH~, DSPWDH+1*, DSPWDH+2, DSPHDR~, DSPHDR+5, DSPCOD~, DSPCOD+4, DSPCOD+6, DSPCOD+9, DSPCOD+10 , DSPCOD+11, DSPCOD+12 |
M | Q+1! |
N | Q+1! |
P | Q+1! |
PRTARR | PTFPDSP+4~, PTFPDSP+17! |
PRTARR( | PTFPDSP+22*, PTFPDSP+27*, PTFPDSP+29 |
PRTARR(1 | PTFPDSP+17* |
RCOL | DSPWDH~, DSPWDH+1 |
S | Q+1! |
SG | DSPCOD~, DSPCOD+2, DSPCOD+4, DSPCOD+7, DSPCOD+10 |
SGRP | PTFPDSP+4~, PTFPDSP+21*, PTFPDSP+26 |
TYPE | PTFPDSP+4~, PTFPDSP+21*, PTFPDSP+22, PTFPDSP+27, DSPHDR~, DSPHDR+2, DSPHDR+3, DSPHDR+4, DSPCOD~, DSPCOD+6 , DSPCOD+9 |
U | PTFPDSP+6, PTFPDSP+7, PTFPDSP+8, PTFPDSP+21, DSPHDR+5, DSPCOD+2, DSPCOD+7, DSPCOD+10, DSPCOD+11, DSPCOD+12 |
X | PTFPDSP+4~, Q+1! |
Y | PTFPDSP+4~, PTFPDSP+29, Q+1! |