IBCU2 ;ALB/MRL - BILLING UTILITY ROUTINE (CONTINUED) ;01 JUN 88 12:00
Source file <IBCU2.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 1 | ^%DT |
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 | 9 | IBCDE IBCDP IBXS63 IBXS74 IBXSC68 IBXSC79 IBXX25 IBXX6 REVENUE CODE |
Name | Comments | DBIA/ICR reference |
---|---|---|
TC | ||
TCL | ||
TC1 | ||
FY | ;S DGTCX1=$S($D(^DGCR(399,DA,"U1")):^("U1"),1:0) I +X>+DGTCX1 W !?4,*7,"Exceeds 'Total Charges' for this bill." K X Q
|
|
21 | ;set logic for CHARGES subfield x-ref (399.042;.02)
|
|
22 | ;kill logic for CHARGES subfield x-ref (399.042;.02)
; DEM;432 - Changed Z*Z1 to $FN(Z*Z1,"",2) for inclusion of decimal point. |
|
31 | ;set logic for UNITS OF SERVICE subfield x-ref (399.042;.03)
; DEM;432 - Changed Z*Z1 to $FN(Z*Z1,"",2) for inclusion of decimal point. |
|
32 | ;kill logic for UNITS OF SERVICE subfield x-ref (399.042;.03)
; DEM;432 - Changed Z*Z1 to $FN(Z*Z1,"",2) for inclusion of decimal point. |
|
FMDATES(PROMPT) | ; ask for date range
|
|
FMDQ |
Name | Field # of Occurrence |
---|---|
^%DT | FMDATES+3, FMDATES+5 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | FMDATES+1~, FMDATES+3*!, FMDATES+5*! |
%DT("A" | FMDATES+3*, FMDATES+5* |
%DT("B" | FMDATES+4* |
%DT(0 | FMDATES+4* |
DA | TC+1~, TC+2*, TCL, TCL+3, 21+1, 21+3, 22+2, 31+2, 32+2 |
DA(1 | TCL, TCL+3, 21+1, 21+3, 22+2, 31+2, 32+2 |
DGI | TC+3!, TCL+3* |
DGI(1 | TC+2, TCL+3* |
DGJ | TC+2*, TC+3! |
DGJ1 | TC1*, TC1+1! |
DGTCX | TC+3!, TCL*, TCL+1, TCL+2, TCL+3* |
DGTCX1 | TC+2, TC+3!, TCL*, TCL+1*, TCL+2*, TCL+3 |
DGTCX11 | TC1, TC1+1!, 21+3*, 22+2*, 31+2*, 32+2* |
DGTCX2 | TC+3!, TCL* |
DGXRF | TC+2, TC+3!, TCL+1 |
>> DGXRF1 | TC1, 21+3*, 22+2*, 31+2*, 32+2* |
DGXRF11 | TC1+1! |
DT | FMDATES+4 |
DT1 | FMDATES+1~*, FMDATES+6*, FMDQ |
DT2 | FMDATES+1~, FMDATES+4*, FMDATES+6 |
IB1 | FMDATES+1~*, FMDATES+2*, FMDATES+3 |
IB2 | FMDATES+1~*, FMDATES+2*, FMDATES+5 |
PROMPT | FMDATES~, FMDATES+2 |
X | TC+1~, TC+2*, TCL+1, TCL+3, TC1*, TC1+1*, 21+3, 22+2, 31+2, 32+2 , FMDATES+1~ |
Y | TC+1~, FMDATES+1~, FMDATES+3, FMDATES+4, FMDATES+5, FMDATES+6 |
>> Z | 21+3*, 22+2*, 31+2*, 32+2* |
>> Z1 | 21+3*, 22+2*, 31+2*, 32+2* |