IBJDF5H ;ALB/RB - CHAMPVA/TRICARE FOLLOW-UP REPORT (HELP);15-APR-00
;;2.0;INTEGRATED BILLING;**123,240**;21-MAR-94
;
HELP W ! F S IBTEXT=$P($T(TEXT+IBOFF),";",3) Q:IBTEXT="*END*" D
.W !,IBTEXT S IBOFF=IBOFF+1
W !
Q
;
TEXT ; - 'Include (A)LL active AR's...' prompt (Offset=1).
;; Enter: '<CR>' - To include all active receivables on the
;; report
;; 'R' - To restrict receivables to those within
;; a certain age range
;; '^' - To quit this option
;;*END*
;
; - 'Enter the minimum age...' prompt (Offset=9).
;; Enter the minimum days in which the receivable should have been in
;; an active status, or '^' to quit this option.
;;*END*
;
; - 'Enter the maximum age...' prompt (Offset=14).
;; Enter the maximum days in which the receivable should have been in
;; an active status, or '^' to quit this option.
;;*END*
;
; - 'Print receivables with a minimum...' prompt (Offset=19).
;; Enter: 'Y' - To print just those receivables that are over
;; a certain balance amount
;; '<CR>' - To skip this question
;; '^' - To quit this option
;;*END*
;
; - 'Enter the minimum balance amount...' prompt (Offset=26).
;; Enter the minimum balance amount for the receivable, or '^' to quit
;; this option.
;;*END*
;
; - 'Include the Bill Comment history...' prompt (Offset=31).
;; Enter: '<CR>' - To exclude the bill comment history from the
;; report
;; 'Y' - To include the bill comment history to the
;; report (This history includes the date
;; and comments from comment transactions)
;; '^' - To quit this option
;;*END*
;
; - 'Print (A)ll comments...' prompt (Offset=40).
;; Enter: '<CR>' - To print ALL comments for a receivable
;; 'M' - To print the only the most recent comment
;; entered for a receivable
;; '^' - To quit this option
;;*END*
;
; - 'Minimum age of most recent...' prompt (Offset=47).
;; Enter the minimum age (number of days ago) of an AR's most recent
;; bill comment. AR's with recent comments that are at least this age
;; will be included on the report. Enter '<CR>' to skip this prompt,
;; or '^' to quit this option.
;;*END*
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBJDF5H 2489 printed Sep 23, 2025@19:59:13 Page 2
IBJDF5H ;ALB/RB - CHAMPVA/TRICARE FOLLOW-UP REPORT (HELP);15-APR-00
+1 ;;2.0;INTEGRATED BILLING;**123,240**;21-MAR-94
+2 ;
HELP WRITE !
FOR
SET IBTEXT=$PIECE($TEXT(TEXT+IBOFF),";",3)
if IBTEXT="*END*"
QUIT
Begin DoDot:1
+1 WRITE !,IBTEXT
SET IBOFF=IBOFF+1
End DoDot:1
+2 WRITE !
+3 QUIT
+4 ;
TEXT ; - 'Include (A)LL active AR's...' prompt (Offset=1).
+1 ;; Enter: '<CR>' - To include all active receivables on the
+2 ;; report
+3 ;; 'R' - To restrict receivables to those within
+4 ;; a certain age range
+5 ;; '^' - To quit this option
+6 ;;*END*
+7 ;
+8 ; - 'Enter the minimum age...' prompt (Offset=9).
+9 ;; Enter the minimum days in which the receivable should have been in
+10 ;; an active status, or '^' to quit this option.
+11 ;;*END*
+12 ;
+13 ; - 'Enter the maximum age...' prompt (Offset=14).
+14 ;; Enter the maximum days in which the receivable should have been in
+15 ;; an active status, or '^' to quit this option.
+16 ;;*END*
+17 ;
+18 ; - 'Print receivables with a minimum...' prompt (Offset=19).
+19 ;; Enter: 'Y' - To print just those receivables that are over
+20 ;; a certain balance amount
+21 ;; '<CR>' - To skip this question
+22 ;; '^' - To quit this option
+23 ;;*END*
+24 ;
+25 ; - 'Enter the minimum balance amount...' prompt (Offset=26).
+26 ;; Enter the minimum balance amount for the receivable, or '^' to quit
+27 ;; this option.
+28 ;;*END*
+29 ;
+30 ; - 'Include the Bill Comment history...' prompt (Offset=31).
+31 ;; Enter: '<CR>' - To exclude the bill comment history from the
+32 ;; report
+33 ;; 'Y' - To include the bill comment history to the
+34 ;; report (This history includes the date
+35 ;; and comments from comment transactions)
+36 ;; '^' - To quit this option
+37 ;;*END*
+38 ;
+39 ; - 'Print (A)ll comments...' prompt (Offset=40).
+40 ;; Enter: '<CR>' - To print ALL comments for a receivable
+41 ;; 'M' - To print the only the most recent comment
+42 ;; entered for a receivable
+43 ;; '^' - To quit this option
+44 ;;*END*
+45 ;
+46 ; - 'Minimum age of most recent...' prompt (Offset=47).
+47 ;; Enter the minimum age (number of days ago) of an AR's most recent
+48 ;; bill comment. AR's with recent comments that are at least this age
+49 ;; will be included on the report. Enter '<CR>' to skip this prompt,
+50 ;; or '^' to quit this option.
+51 ;;*END*
