PSSNCPDP ;BIR/LE - Pharmacy Data Management DD Utility ;10/30/97 9:41
;;1.0; PHARMACY DATA MANAGEMENT; **127**;9/30/97;Build 41
;
Q
EN ;
N ZZX
I $G(PSSNQM3) K PSSNQM3 Q ;killing PSSNQM3 so that a secondary ? entered would get full help text message
D HDR
D EACH:$P($G(^PSDRUG(DA,"EPH")),"^",2)="EA"
D GRAM:$P($G(^PSDRUG(DA,"EPH")),"^",2)="GM"
D MILL:$P($G(^PSDRUG(DA,"EPH")),"^",2)="ML"
W !
Q
;
;Help text for NCPDP QUANTITY MULTIPLIER field (#83) of DRUG file (#50).
HDR ;
W !?5,"The value in the NCPDP QUANTITY MULTIPLIER field is multiplied by the"
W !?5,"VISTA dispensed quantity of the drug for ePharmacy prescriptions,"
W !?5,"resulting in the NCPDP quantity that should be electronically billed"
W !?5,"to a Third Party Insurance Company."
Q
;
EACH ;Each help text
W !!?5,"Most products with a NCPDP DISPENSE UNIT of EA (EACH) should have the"
W !?5,"NCPDP QUANTITY MULTIPLIER field set to 1 (one) because the VA dispensed"
W !?5,"quantity is the same quantity that should be billed to the Third Party"
W !?5,"Insurance Companies. HOWEVER some exceptions require a value different"
W !?5,"than 1 (one). See examples below:"
W !!?10,"Drug: ORTHO TRI-CYCLEN TAB,28 Quantity Dispensed: 3 CYCLES"
W !!?5,"The Quantity Dispensed above indicates how many 28-day cycles are"
W !?5,"being dispensed (3). However, the Third Party Insurance Companies need"
W !?5,"to know how many TABLETS are being dispensed. Therefore, the correct"
W !?5,"value for the NCPDP QUANTITY MULTIPLIER would be 28. The correct quantity"
R !?5,"Enter to continue: ",ZZX:60 W $C(13)
W ?5,"to submit electronically is 3 x 28 = 84 tablets."
W !!?5,"A similar case is METHYLPREDNISOLONE 4MG TAB DOSEPAK,21, which is"
W !?5,"dispensed in packages (PKG) and not in tablets. The NCPDP QUANTITY"
W !?5,"MULTIPLIER for this product is 21."
Q
;
GRAM ;Gram help text
W !!?5,"Most products with a NCPDP DISPENSE UNIT of GM (GRAMS) should have the"
W !?5,"NCPDP QUANTITY MULTIPLIER set to 1 (one). HOWEVER for products dispensed"
W !?5,"in units such as TUBE, the NCPDP QUANTITY MULTIPLIER field should contain"
W !?5,"the number of GRAMS contained in 1 TUBE. See examples below:"
W !!?10,"Drug: GENTAMICIN SO4 0.3% OINT,OPH Quantity Dispensed: 1 TUBE"
W !!?5,"The Quantity Dispensed above indicates how many tubes are being dispensed"
W !?5,"(1). However, the Third Party Insurance Companies need to know how many"
W !?5,"GRAMS are being dispensed. The correct value for the NCPDP QUANTITY"
R !?5,"Enter to continue: ",ZZX:60 W $C(13)
W ?5,"MULTIPLIER field for this product is 3.5, because there are 3.5 grams in"
W !?5,"each tube. The correct quantity to submit electronically will be"
W !?5,"3.5 x 1 = 3.5 grams."
W !!?5,"Another example is IPRATROPIUM BR 17MCG/SPRAY AEROSOL,INHL., which is"
W !?5,"dispensed by the number of inhalers used to fill the prescription. Each"
W !?5,"inhaler contains 12.9 grams of IPRATROPIUM, so the NCPDP QUANTITY"
W !?5,"MULTIPLIER for this product will be 12.9."
Q
;
MILL ;Milliliter help text
W !!?5,"Most products with a NCPDP DISPENSE UNIT of ML (Milliliters) should have"
W !?5,"this field set to 1 (one). HOWEVER for some drugs that are dispensed in"
W !?5,"units such as VIAL or BOTTLE, the NCPDP QUANTITY MULTIPLIER field should"
W !?5,"contain the number of MILILLITERS contained in 1 VIAL or BOTTLE for this"
W !?5,"drug. See examples below:"
W !!?10,"Drug: INSULIN,NPH,HUMAN 100UNT/ML INJ Quantity Dispensed 3 VIALS"
W !!?5,"The Quantity Dispensed above indicates how many vials are being dispensed"
W !?5,"(3). However, the Third Party Insurance Companies need to know how many"
W !?5,"milliliters are being dispensed. The correct value for the NCPDP QUANTITY"
W !?5,"MULTIPLIER field for this product is 10, because there are 10 milliliters"
W !?5,"in each vial. The correct quantity to submit electronically will be "
W !?5,"3 x 10 = 30 milliliters."
R !?5,"Enter to continue: ",ZZX:60 W $C(13) W " "
W !?5,"Another example is DARBEPOETIN ALFA,RECOMBINANT 150MCG/0.3ML SYR INJ,"
W !?5,"SURECLICK which is dispensed by the number of syringes used for the "
W !?5,"prescription. Each syringe contains 0.3 ML of DARBEPOETIN, so the NCPDP"
W !?5,"QUANTITY MULTIPLIER for this product will be 0.3. Notice in this case the"
W !?5,"NCPDP QUANTITY MULTIPLIER is less than 1."
W !
Q
;
PSSNCPDP ;BIR/LE - Pharmacy Data Management DD Utility ;10/30/97 9:41
+1 ;;1.0; PHARMACY DATA MANAGEMENT; **127**;9/30/97;Build 41
+2 ;
+3 QUIT
EN ;
+1 NEW ZZX
+2 ;killing PSSNQM3 so that a secondary ? entered would get full help text message
IF $GET(PSSNQM3)
KILL PSSNQM3
QUIT
+3 DO HDR
+4 IF $PIECE($GET(^PSDRUG(DA,"EPH")),"^",2)="EA"
DO EACH
+5 IF $PIECE($GET(^PSDRUG(DA,"EPH")),"^",2)="GM"
DO GRAM
+6 IF $PIECE($GET(^PSDRUG(DA,"EPH")),"^",2)="ML"
DO MILL
+7 WRITE !
+8 QUIT
+9 ;
+10 ;Help text for NCPDP QUANTITY MULTIPLIER field (#83) of DRUG file (#50).
HDR ;
+1 WRITE !?5,"The value in the NCPDP QUANTITY MULTIPLIER field is multiplied by the"
+2 WRITE !?5,"VISTA dispensed quantity of the drug for ePharmacy prescriptions,"
+3 WRITE !?5,"resulting in the NCPDP quantity that should be electronically billed"
+4 WRITE !?5,"to a Third Party Insurance Company."
+5 QUIT
+6 ;
EACH ;Each help text
+1 WRITE !!?5,"Most products with a NCPDP DISPENSE UNIT of EA (EACH) should have the"
+2 WRITE !?5,"NCPDP QUANTITY MULTIPLIER field set to 1 (one) because the VA dispensed"
+3 WRITE !?5,"quantity is the same quantity that should be billed to the Third Party"
+4 WRITE !?5,"Insurance Companies. HOWEVER some exceptions require a value different"
+5 WRITE !?5,"than 1 (one). See examples below:"
+6 WRITE !!?10,"Drug: ORTHO TRI-CYCLEN TAB,28 Quantity Dispensed: 3 CYCLES"
+7 WRITE !!?5,"The Quantity Dispensed above indicates how many 28-day cycles are"
+8 WRITE !?5,"being dispensed (3). However, the Third Party Insurance Companies need"
+9 WRITE !?5,"to know how many TABLETS are being dispensed. Therefore, the correct"
+10 WRITE !?5,"value for the NCPDP QUANTITY MULTIPLIER would be 28. The correct quantity"
+11 READ !?5,"Enter to continue: ",ZZX:60
WRITE $CHAR(13)
+12 WRITE ?5,"to submit electronically is 3 x 28 = 84 tablets."
+13 WRITE !!?5,"A similar case is METHYLPREDNISOLONE 4MG TAB DOSEPAK,21, which is"
+14 WRITE !?5,"dispensed in packages (PKG) and not in tablets. The NCPDP QUANTITY"
+15 WRITE !?5,"MULTIPLIER for this product is 21."
+16 QUIT
+17 ;
GRAM ;Gram help text
+1 WRITE !!?5,"Most products with a NCPDP DISPENSE UNIT of GM (GRAMS) should have the"
+2 WRITE !?5,"NCPDP QUANTITY MULTIPLIER set to 1 (one). HOWEVER for products dispensed"
+3 WRITE !?5,"in units such as TUBE, the NCPDP QUANTITY MULTIPLIER field should contain"
+4 WRITE !?5,"the number of GRAMS contained in 1 TUBE. See examples below:"
+5 WRITE !!?10,"Drug: GENTAMICIN SO4 0.3% OINT,OPH Quantity Dispensed: 1 TUBE"
+6 WRITE !!?5,"The Quantity Dispensed above indicates how many tubes are being dispensed"
+7 WRITE !?5,"(1). However, the Third Party Insurance Companies need to know how many"
+8 WRITE !?5,"GRAMS are being dispensed. The correct value for the NCPDP QUANTITY"
+9 READ !?5,"Enter to continue: ",ZZX:60
WRITE $CHAR(13)
+10 WRITE ?5,"MULTIPLIER field for this product is 3.5, because there are 3.5 grams in"
+11 WRITE !?5,"each tube. The correct quantity to submit electronically will be"
+12 WRITE !?5,"3.5 x 1 = 3.5 grams."
+13 WRITE !!?5,"Another example is IPRATROPIUM BR 17MCG/SPRAY AEROSOL,INHL., which is"
+14 WRITE !?5,"dispensed by the number of inhalers used to fill the prescription. Each"
+15 WRITE !?5,"inhaler contains 12.9 grams of IPRATROPIUM, so the NCPDP QUANTITY"
+16 WRITE !?5,"MULTIPLIER for this product will be 12.9."
+17 QUIT
+18 ;
MILL ;Milliliter help text
+1 WRITE !!?5,"Most products with a NCPDP DISPENSE UNIT of ML (Milliliters) should have"
+2 WRITE !?5,"this field set to 1 (one). HOWEVER for some drugs that are dispensed in"
+3 WRITE !?5,"units such as VIAL or BOTTLE, the NCPDP QUANTITY MULTIPLIER field should"
+4 WRITE !?5,"contain the number of MILILLITERS contained in 1 VIAL or BOTTLE for this"
+5 WRITE !?5,"drug. See examples below:"
+6 WRITE !!?10,"Drug: INSULIN,NPH,HUMAN 100UNT/ML INJ Quantity Dispensed 3 VIALS"
+7 WRITE !!?5,"The Quantity Dispensed above indicates how many vials are being dispensed"
+8 WRITE !?5,"(3). However, the Third Party Insurance Companies need to know how many"
+9 WRITE !?5,"milliliters are being dispensed. The correct value for the NCPDP QUANTITY"
+10 WRITE !?5,"MULTIPLIER field for this product is 10, because there are 10 milliliters"
+11 WRITE !?5,"in each vial. The correct quantity to submit electronically will be "
+12 WRITE !?5,"3 x 10 = 30 milliliters."
+13 READ !?5,"Enter to continue: ",ZZX:60
WRITE $CHAR(13)
WRITE " "
+14 WRITE !?5,"Another example is DARBEPOETIN ALFA,RECOMBINANT 150MCG/0.3ML SYR INJ,"
+15 WRITE !?5,"SURECLICK which is dispensed by the number of syringes used for the "
+16 WRITE !?5,"prescription. Each syringe contains 0.3 ML of DARBEPOETIN, so the NCPDP"
+17 WRITE !?5,"QUANTITY MULTIPLIER for this product will be 0.3. Notice in this case the"
+18 WRITE !?5,"NCPDP QUANTITY MULTIPLIER is less than 1."
+19 WRITE !
+20 QUIT
+21 ;