| 1 | IBJDF8H ;ALB/RRG - AR PRODUCTIVITY REPORT (HELP);29-AUG-00
 | 
|---|
| 2 |  ;;2.0;INTEGRATED BILLING;**123**;21-MAR-94
 | 
|---|
| 3 |  ;
 | 
|---|
| 4 | HELP N IBTEXT
 | 
|---|
| 5 |  F  S IBTEXT=$P($T(TEXT+IBOFF),";",3) Q:IBTEXT="*END*"  D
 | 
|---|
| 6 |  .W !,IBTEXT S IBOFF=IBOFF+1
 | 
|---|
| 7 |  W !
 | 
|---|
| 8 |  Q
 | 
|---|
| 9 |  ;
 | 
|---|
| 10 | TEXT ; - 'FROM Transaction Date' prompt (offset=1).
 | 
|---|
| 11 |  ;;  Please enter the beginning date in the range to be considered
 | 
|---|
| 12 |  ;;  in this report.
 | 
|---|
| 13 |  ;;  example:  MMDDYY  or  'T' = Today  'T+30' = Today + 30 days
 | 
|---|
| 14 |  ;;                                     'T-30' = Today - 30 days
 | 
|---|
| 15 |  ;;            '^'  - to quit this option
 | 
|---|
| 16 |  ;;
 | 
|---|
| 17 |  ;;  NOTE: It is NOT possible to enter a future date.
 | 
|---|
| 18 |  ;;*END*
 | 
|---|
| 19 |  ;
 | 
|---|
| 20 |  ; - 'TO Transaction Date' prompt (offset=11)
 | 
|---|
| 21 |  ;;  Please enter the ending date in the range to be considered in
 | 
|---|
| 22 |  ;;  this report.
 | 
|---|
| 23 |  ;;  example:  MMDDYY or 'T' = Today   'T+30' - Today + 30 days
 | 
|---|
| 24 |  ;;                                    'T-30' - Today - 30 days
 | 
|---|
| 25 |  ;;            '^'  - to quit this option
 | 
|---|
| 26 |  ;;
 | 
|---|
| 27 |  ;;  NOTE: This date MUST follow the date entered above.
 | 
|---|
| 28 |  ;;*END*
 | 
|---|
| 29 |  ;
 | 
|---|
| 30 |  ; - 'Do you wish to print with Clerk name...' prompt (offset=21)
 | 
|---|
| 31 |  ;;      Enter:  'N'  -  To display clerk name
 | 
|---|
| 32 |  ;;              'I'  -  To display clerk identifier (numeric)
 | 
|---|
| 33 |  ;;              '^'  -  To quit this option
 | 
|---|
| 34 |  ;;*END*
 | 
|---|
| 35 |  ;
 | 
|---|
| 36 |  ; - 'Do you want to print the summary by Clerk?' prompt (offset=27)
 | 
|---|
| 37 |  ;;      Enter:  'Y'  -  Display summary by Clerk
 | 
|---|
| 38 |  ;;              'N'  -  Do not display summary by Clerk
 | 
|---|
| 39 |  ;;              '^'  -  To quit this option
 | 
|---|
| 40 |  ;;*END*
 | 
|---|
| 41 |  ;
 | 
|---|
| 42 |  ; - 'Start with Patient Name/Last 4 of SSN... ' prompt (Offset=33).
 | 
|---|
| 43 |  ;;      Enter a valid field value, or
 | 
|---|
| 44 |  ;;              <CR> -  To start from the 'First' value of this field
 | 
|---|
| 45 |  ;;              '@'  -  To return field to null value
 | 
|---|
| 46 |  ;;              '^'  -  To quit this option
 | 
|---|
| 47 |  ;;*END*
 | 
|---|
| 48 |  ;
 | 
|---|
| 49 |  ; - 'Go To Patient Name/Last 4 of SSN...' prompt (Offset=40).
 | 
|---|
| 50 |  ;;      Enter a valid field value, or
 | 
|---|
| 51 |  ;;              <CR> -  To go to the 'last' value for this field
 | 
|---|
| 52 |  ;;              '@'  -  To return field to null value
 | 
|---|
| 53 |  ;;              '^'  -  To quit this option
 | 
|---|
| 54 |  ;;*END*
 | 
|---|
| 55 |  ;
 | 
|---|
| 56 |  ; - 'Start with Insurance Carrier...' prompt (Offset=47).
 | 
|---|
| 57 |  ;;      Enter a valid field value, or
 | 
|---|
| 58 |  ;;              <CR> -  To start from the 'first' value for this field
 | 
|---|
| 59 |  ;;              '@'  -  To return field to null value
 | 
|---|
| 60 |  ;;              '^'  -  To quit this option
 | 
|---|
| 61 |  ;;*END*
 | 
|---|
| 62 |  ;
 | 
|---|
| 63 |  ; - 'Go to Insurance Carrier...' prompt  (offset=54).
 | 
|---|
| 64 |  ;;      Enter a valid field value, or
 | 
|---|
| 65 |  ;;              <CR> -  To go to the 'last' value for this field
 | 
|---|
| 66 |  ;;              '@'  -  To return field to null value
 | 
|---|
| 67 |  ;;              '^'  -  To quit this option
 | 
|---|
| 68 |  ;;*END*
 | 
|---|
| 69 |  ;
 | 
|---|
| 70 |  ; - 'Run list for (S)pecific or (A)ll Clerks...' prompt (offset=61)
 | 
|---|
| 71 |  ;;      Enter:  <CR> -  To select ALL clerks
 | 
|---|
| 72 |  ;;               'S' -  To select one or more clerks
 | 
|---|
| 73 |  ;;               '^' -  To quit this option
 | 
|---|
| 74 |  ;;*END*
 | 
|---|
| 75 |  ;
 | 
|---|
| 76 |  ; - 'Exclude receivables referred to Regional...' prompt  (offset=67)
 | 
|---|
| 77 |  ;;      Enter:   'N' -  Do not exclude Receivables referred
 | 
|---|
| 78 |  ;;                         to Regional Counsel
 | 
|---|
| 79 |  ;;               'Y' -  Exclude Receivables referred to 
 | 
|---|
| 80 |  ;;                         Regional Counsel
 | 
|---|
| 81 |  ;;               '^' -  To quit this option
 | 
|---|
| 82 |  ;;*END*
 | 
|---|
| 83 |  ;
 | 
|---|