IBCNSEH ;ALB/AAS - EXTENDED HELP FOR INSURANCE MANAGEMENT ;28-MAY-93
;;2.0;INTEGRATED BILLING;**6,28,371**;21-MAR-94;Build 57
;;Per VHA Directive 2004-038, this routine should not be modified.
;
INS ; -- Help for Insurance Type
Q:'$G(IBCNSEH)
W !!,"The way we store and think about patient insurance information has been"
W !,"dramatically changed. We are separating out information that is specific"
W !,"to an insurance company, specific to the patient, specific to the group plan,"
W !,"specific to the annual benefits available, and the annual benefits already"
W !,"used."
W !!,"To start, you must select the insurance company for the patient's policy.",!
Q
PAT ; -- Help for entering patient specific information
Q:'$G(IBCNSEH)
W !!,"Now you may enter the patient specific policy information.",!
Q
POL ; -- Help for policy specific information
Q:'$G(IBCNSEH)
W !!,"You can now edit information specific to the PLAN. Remember, updating"
W !,"PLAN information will affect all patients with this plan, if it is a"
W !,"group plan, and not just the current patient.",!
Q
;
SEL ; -- help for selecting a new HIP
Q:'$G(IBCNSEH)
W !!,"Each Insurance policy entry for a patient must be associated with an"
W !,"Insurance Plan offered by the Insurance company you just selected."
W !,"You will be given a choice of selecting previously entered Group Plans or"
W !,"you may enter a new one. If you enter a new Insurance Plan you"
W !,"must enter whether or not this is a group or individual plan.",!
Q
AB ;
Q:'$G(IBCNSEH)
Q
BU ;
Q:'$G(IBCNSEH)
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBCNSEH 1614 printed Oct 16, 2024@18:17:46 Page 2
IBCNSEH ;ALB/AAS - EXTENDED HELP FOR INSURANCE MANAGEMENT ;28-MAY-93
+1 ;;2.0;INTEGRATED BILLING;**6,28,371**;21-MAR-94;Build 57
+2 ;;Per VHA Directive 2004-038, this routine should not be modified.
+3 ;
INS ; -- Help for Insurance Type
+1 if '$GET(IBCNSEH)
QUIT
+2 WRITE !!,"The way we store and think about patient insurance information has been"
+3 WRITE !,"dramatically changed. We are separating out information that is specific"
+4 WRITE !,"to an insurance company, specific to the patient, specific to the group plan,"
+5 WRITE !,"specific to the annual benefits available, and the annual benefits already"
+6 WRITE !,"used."
+7 WRITE !!,"To start, you must select the insurance company for the patient's policy.",!
+8 QUIT
PAT ; -- Help for entering patient specific information
+1 if '$GET(IBCNSEH)
QUIT
+2 WRITE !!,"Now you may enter the patient specific policy information.",!
+3 QUIT
POL ; -- Help for policy specific information
+1 if '$GET(IBCNSEH)
QUIT
+2 WRITE !!,"You can now edit information specific to the PLAN. Remember, updating"
+3 WRITE !,"PLAN information will affect all patients with this plan, if it is a"
+4 WRITE !,"group plan, and not just the current patient.",!
+5 QUIT
+6 ;
SEL ; -- help for selecting a new HIP
+1 if '$GET(IBCNSEH)
QUIT
+2 WRITE !!,"Each Insurance policy entry for a patient must be associated with an"
+3 WRITE !,"Insurance Plan offered by the Insurance company you just selected."
+4 WRITE !,"You will be given a choice of selecting previously entered Group Plans or"
+5 WRITE !,"you may enter a new one. If you enter a new Insurance Plan you"
+6 WRITE !,"must enter whether or not this is a group or individual plan.",!
+7 QUIT
AB ;
+1 if '$GET(IBCNSEH)
QUIT
+2 QUIT
BU ;
+1 if '$GET(IBCNSEH)
QUIT
+2 QUIT