1 | IBJDF7H ;ALB/MR - REPAYMENT PLAN REPORT (HELP);14-AUG-00
|
---|
2 | ;;2.0;INTEGRATED BILLING;**123,240**;21-MAR-94
|
---|
3 | ;
|
---|
4 | HELP W ! F S IBTEXT=$P($T(TEXT+IBOFF),";",3) Q:IBTEXT="*END*" D
|
---|
5 | .W !,IBTEXT S IBOFF=IBOFF+1
|
---|
6 | W !
|
---|
7 | Q
|
---|
8 | ;
|
---|
9 | TEXT ; - 'Sort Patients by (N)AME... ' prompt (Offset=1).
|
---|
10 | ;; Enter: 'N' - To select and sort patients by name
|
---|
11 | ;; 'L' - To select and sort patients by the last 4
|
---|
12 | ;; of the SSN
|
---|
13 | ;; '^' - To quit this option
|
---|
14 | ;;*END*
|
---|
15 | ;
|
---|
16 | ; - 'START WITH PATIENT...' prompt (Offset=8).
|
---|
17 | ;; Enter a valid field value, or
|
---|
18 | ;; '@' - To include null values
|
---|
19 | ;; '<CR>' - To start from the 'first' value for this field
|
---|
20 | ;; '^' - To quit this option
|
---|
21 | ;;*END*
|
---|
22 | ;
|
---|
23 | ; - 'GO TO PATIENT' prompt (Offset=16).
|
---|
24 | ;; Enter a valid field value, or
|
---|
25 | ;; '@' - To include only null values, if 'Start with'
|
---|
26 | ;; value is @
|
---|
27 | ;; '<CR>' - To go to the 'last' value for this field
|
---|
28 | ;; '^' - To quit this option
|
---|
29 | ;;*END*
|
---|
30 | ;
|
---|
31 | ; - 'Current or Defaulted Repayment Plan...' prompt (Offset=23).
|
---|
32 | ;; Enter the type of Repayment Plan to be listed:
|
---|
33 | ;;
|
---|
34 | ;; 'C' - To Current Repayment Plan
|
---|
35 | ;; 'D' - To Defaulted Repayment Plan
|
---|
36 | ;; 'B' - To Both (Current and Defaulted)
|
---|
37 | ;; '^' - To quit this option
|
---|
38 | ;;*END*
|
---|
39 | ;
|
---|
40 | ; - 'Minimum number of days defaulted:' prompt (Offset=32).
|
---|
41 | ;; Please, enter the minimum number of days defaulted on a payment
|
---|
42 | ;; for a Repayment Plan to be considered defaulted. The Repayment
|
---|
43 | ;; Plans with no defaulted payments or that defaulted fewer days
|
---|
44 | ;; than the number entered here, will be considered current.
|
---|
45 | ;;*END*
|
---|
46 | ;
|
---|
47 | ; - 'MCCR or NON-MCCR Receivables..." prompt (Offset=39).
|
---|
48 | ;; Enter the type of receivables to be listed:
|
---|
49 | ;;
|
---|
50 | ;; 'M' - To MCCR Receivables
|
---|
51 | ;; 'N' - To NON-MCCR Receivables
|
---|
52 | ;;
|
---|
53 | ;; The NON-MCCR Categories are:
|
---|
54 | ;;
|
---|
55 | ;; TRICARE TRICARE Patient TRICARE Third Party
|
---|
56 | ;; CHAMPVA CHAMPVA Subsistence CHAMPVA Third Party
|
---|
57 | ;; Ex-Employee Current Employee Military
|
---|
58 | ;; Vendor Interagency Sharing Agreements
|
---|
59 | ;; Federal Agencies-refund Federal Agencies-reimbursement
|
---|
60 | ;;
|
---|
61 | ;; All the others are MCCR.
|
---|
62 | ;;*END*
|
---|
63 | ; - 'Do you want to print TOTAL by Patient?' prompt (Offset=55).
|
---|
64 | ;; Enter: 'Y' - To print the total for patients with more
|
---|
65 | ;; than one entry
|
---|
66 | ;; 'N' - To NOT print the total by patient
|
---|
67 | ;; '^' - To quit this option
|
---|
68 | ;;*END*
|
---|