| 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 | ; | 
|---|