IBCF11 ;ALB/MJB - PRINT UB-82 BILL (CONT.) ;25 JAN 89 12:54
Source file <IBCF11.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 1 | BSTAT^IBCDC |
VA Fileman | 1 | ^DIE |
Name | Comments | DBIA/ICR reference |
---|---|---|
HCFA | ;W !!,"5"
|
|
13 | ;I $D(IBIP),$D(IBPR) W !!,$S($P(IB(0),"^",9)]"":$P(IB(0),"^",9),1:9)
|
|
15 | ||
14 | ||
16 | ||
PROC | ; -print first 3-5 procedure codes
|
|
ICD | ;W !!,"9"
|
|
CPT | ;W !!,"4"
|
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 |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | 14+2, 16+3 |
^DGCR(399.3 - [#399.3] | 14+2 |
Name | Line Occurrences |
---|---|
PROC | HCFA+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DA | 16+3* |
DIC | 16+3*! |
DIE | 16+3*! |
>> DR | 16+3* |
DT | 16+2 |
>> I | 14*, 16*, PROC+2*, PROC+3, PROC+4 |
>> IB("S" | 16+2 |
>> IB("U" | 14+1 |
>> IB("U1" | 14+1, 15+2 |
>> IB(0 | 13+1 |
>> IBEPAR(1 | 15+1, 16+1 |
>> IBIFN | 14+2, 16+3, 16+4 |
IBMA | 16+5! |
>> IBPNT | 16+2 |
>> IBPROC( | PROC+2, PROC+3 |
>> IBRATY | 14+2*, 15 |
IBXDT | 16+2*, 16+5! |
IBYY | 16+3*! |
>> J | PROC+2*, PROC+3 |
>> TAB | PROC+1*, PROC+4 |
U | 14+1, 14+2, 15+1, 16+1, 16+2, PROC+2 |
>> VADM(2 | 15 |
>> X | PROC+2*, PROC+3, PROC+4 |
>> Y | PROC+2*, PROC+4 |