IBCNBUH ;ALB/ARH-Ins Buffer: Help Text ;1 Jun 97
;;2.0;INTEGRATED BILLING;**82,184**;21-MAR-94
;;Per VHA Directive 10-93-142, this routine should not be modified.
;
;
HELP D HELP1,HELP3
Q
WAIT N DIR,DIRUT,X,Y W !! S DIR(0)="E" D ^DIR W !! Q
;
HELP1 ;
W !!,"The left side of the display contains data from a buffer file entry."
W !,?3,"BOLD: buffer data that is printed in bold will be added to the existing ",!,?10,"insurance entry if the MERGE option is used."
W !!,"The right side of the display contains data from an existing insurance entry."
W !,?3,"BOLD: existing insurance data that is printed in bold will be replaced with ",!,?10,"the corresponding buffer entry data if the OVERWRITE option is used."
Q
;
HELP2 W !!,"When a buffer entry is determined to be a match with an existing insurance ",!,"entry, these are the options that may be used to move the data from the buffer ",!,"entry to the insurance entry:"
W !!,"MERGE:",?11,"Data from the buffer entry will be saved to the insurance entry ",!,?11,"ONLY if the corresponding data field in the insurance entry is blank."
W !,?11,"Therefore only blank fields in the insurance entry will be filled, ",!,?11,"any existing data in the insurance entry will remain unchanged."
W !!,"OVERWRITE:",?11,"ALL non-blank data in the buffer entry will be saved to the insurance"
W !,?11,"entry. If a buffer entry field has a value it will be saved to the ",!,?11,"corresponding insurance entry field. Therefore blank insurance ",!,?11,"fields will be filled and existing insurance data replaced."
W !!,"REPLACE:",?11,"ALL fields in the buffer entry will be saved to the insurance entry, "
W !,?11,"including blank fields. Therefore all data in the insurance entry ",!,?11,"will be deleted then completely replaced by the buffer entry."
W !!,"NO CHANGE: This option may be used to identify the Insurance entry that",!,?11,"corresponds to a buffer entry without actually changing any of",!,?11,"the Insurance Information. The Buffer data is ignored."
D WAIT^IBCNBAA
W !!,"INDIVIDUALLY ACCEPT (SKIP BLANKS): This option may be used to accept only",!,?11,"non-blank specific fields from the buffer entry into the Insurance",!,?11,"entry. Only those values accepted by the user will replace the"
W !,?11,"corresponding fields in the Insurance entry."
Q
;
HELP3 W !!,"Options for moving Buffer data to Insurance files:"
W !!,"MERGE: Save buffer data only if Insurance field is blank."
W !!,"OVERWRITE: Save all non-blank fields in Buffer to Insurance fields."
W !!,"REPLACE: All data deleted from Insurance fields and replaced with Buffer data."
W !!,"NO CHANGE: The buffer data is ignored, the Insurance entry will not be changed."
W !!,"INDIVIDUALLY ACCEPT (SKIP BLANKS): Save non-blank user-confirmed Buffer fields."
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBCNBUH 2844 printed Oct 16, 2024@18:14:56 Page 2
IBCNBUH ;ALB/ARH-Ins Buffer: Help Text ;1 Jun 97
+1 ;;2.0;INTEGRATED BILLING;**82,184**;21-MAR-94
+2 ;;Per VHA Directive 10-93-142, this routine should not be modified.
+3 ;
+4 ;
HELP DO HELP1
DO HELP3
+1 QUIT
WAIT NEW DIR,DIRUT,X,Y
WRITE !!
SET DIR(0)="E"
DO ^DIR
WRITE !!
QUIT
+1 ;
HELP1 ;
+1 WRITE !!,"The left side of the display contains data from a buffer file entry."
+2 WRITE !,?3,"BOLD: buffer data that is printed in bold will be added to the existing ",!,?10,"insurance entry if the MERGE option is used."
+3 WRITE !!,"The right side of the display contains data from an existing insurance entry."
+4 WRITE !,?3,"BOLD: existing insurance data that is printed in bold will be replaced with ",!,?10,"the corresponding buffer entry data if the OVERWRITE option is used."
+5 QUIT
+6 ;
HELP2 WRITE !!,"When a buffer entry is determined to be a match with an existing insurance ",!,"entry, these are the options that may be used to move the data from the buffer ",!,"entry to the insurance entry:"
+1 WRITE !!,"MERGE:",?11,"Data from the buffer entry will be saved to the insurance entry ",!,?11,"ONLY if the corresponding data field in the insurance entry is blank."
+2 WRITE !,?11,"Therefore only blank fields in the insurance entry will be filled, ",!,?11,"any existing data in the insurance entry will remain unchanged."
+3 WRITE !!,"OVERWRITE:",?11,"ALL non-blank data in the buffer entry will be saved to the insurance"
+4 WRITE !,?11,"entry. If a buffer entry field has a value it will be saved to the ",!,?11,"corresponding insurance entry field. Therefore blank insurance ",!,?11,"fields will be filled and existing insurance data replaced."
+5 WRITE !!,"REPLACE:",?11,"ALL fields in the buffer entry will be saved to the insurance entry, "
+6 WRITE !,?11,"including blank fields. Therefore all data in the insurance entry ",!,?11,"will be deleted then completely replaced by the buffer entry."
+7 WRITE !!,"NO CHANGE: This option may be used to identify the Insurance entry that",!,?11,"corresponds to a buffer entry without actually changing any of",!,?11,"the Insurance Information. The Buffer data is ignored."
+8 DO WAIT^IBCNBAA
+9 WRITE !!,"INDIVIDUALLY ACCEPT (SKIP BLANKS): This option may be used to accept only",!,?11,"non-blank specific fields from the buffer entry into the Insurance",!,?11,"entry. Only those values accepted by the user will replace the"
+10 WRITE !,?11,"corresponding fields in the Insurance entry."
+11 QUIT
+12 ;
HELP3 WRITE !!,"Options for moving Buffer data to Insurance files:"
+1 WRITE !!,"MERGE: Save buffer data only if Insurance field is blank."
+2 WRITE !!,"OVERWRITE: Save all non-blank fields in Buffer to Insurance fields."
+3 WRITE !!,"REPLACE: All data deleted from Insurance fields and replaced with Buffer data."
+4 WRITE !!,"NO CHANGE: The buffer data is ignored, the Insurance entry will not be changed."
+5 WRITE !!,"INDIVIDUALLY ACCEPT (SKIP BLANKS): Save non-blank user-confirmed Buffer fields."
+6 QUIT
