Routine: PSSNCPDP

Package	Total	Caller Graph
Pharmacy Data Management	1	^PSDRUG

Entry Points

Name	Comments	DBIA/ICR reference
GRAM	;Gram help text
MILL	;Milliliter help text
EN	;
HDR	;
EACH	;Each help text

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN+7
Function Call: WRITE	Prompt: !?5,"The value in the NCPDP QUANTITY MULTIPLIER field is multiplied by the" Line Location: HDR+1
Function Call: WRITE	Prompt: !?5,"VISTA dispensed quantity of the drug for ePharmacy prescriptions," Line Location: HDR+2
Function Call: WRITE	Prompt: !?5,"resulting in the NCPDP quantity that should be electronically billed" Line Location: HDR+3
Function Call: WRITE	Prompt: !?5,"to a Third Party Insurance Company." Line Location: HDR+4
Function Call: WRITE	Prompt: !!?5,"Most products with a NCPDP DISPENSE UNIT of EA (EACH) should have the" Line Location: EACH+1
Function Call: WRITE	Prompt: !?5,"NCPDP QUANTITY MULTIPLIER field set to 1 (one) because the VA dispensed" Line Location: EACH+2
Function Call: WRITE	Prompt: !?5,"quantity is the same quantity that should be billed to the Third Party" Line Location: EACH+3
Function Call: WRITE	Prompt: !?5,"Insurance Companies. HOWEVER some exceptions require a value different" Line Location: EACH+4
Function Call: WRITE	Prompt: !?5,"than 1 (one). See examples below:" Line Location: EACH+5
Function Call: WRITE	Prompt: !!?10,"Drug: ORTHO TRI-CYCLEN TAB,28 Quantity Dispensed: 3 CYCLES" Line Location: EACH+6
Function Call: WRITE	Prompt: !!?5,"The Quantity Dispensed above indicates how many 28-day cycles are" Line Location: EACH+7
Function Call: WRITE	Prompt: !?5,"being dispensed (3). However, the Third Party Insurance Companies need" Line Location: EACH+8
Function Call: WRITE	Prompt: !?5,"to know how many TABLETS are being dispensed. Therefore, the correct" Line Location: EACH+9
Function Call: WRITE	Prompt: !?5,"value for the NCPDP QUANTITY MULTIPLIER would be 28. The correct quantity" Line Location: EACH+10
Function Call: READ	Prompt: "Enter to continue: " Formatting: !?5 Timeout: 60 Variable: ZZX Line Location: EACH+11
Function Call: WRITE	Prompt: $C(13) Line Location: EACH+11
Function Call: WRITE	Prompt: ?5,"to submit electronically is 3 x 28 = 84 tablets." Line Location: EACH+12
Function Call: WRITE	Prompt: !!?5,"A similar case is METHYLPREDNISOLONE 4MG TAB DOSEPAK,21, which is" Line Location: EACH+13
Function Call: WRITE	Prompt: !?5,"dispensed in packages (PKG) and not in tablets. The NCPDP QUANTITY" Line Location: EACH+14
Function Call: WRITE	Prompt: !?5,"MULTIPLIER for this product is 21." Line Location: EACH+15
Function Call: WRITE	Prompt: !!?5,"Most products with a NCPDP DISPENSE UNIT of GM (GRAMS) should have the" Line Location: GRAM+1
Function Call: WRITE	Prompt: !?5,"NCPDP QUANTITY MULTIPLIER set to 1 (one). HOWEVER for products dispensed" Line Location: GRAM+2
Function Call: WRITE	Prompt: !?5,"in units such as TUBE, the NCPDP QUANTITY MULTIPLIER field should contain" Line Location: GRAM+3
Function Call: WRITE	Prompt: !?5,"the number of GRAMS contained in 1 TUBE. See examples below:" Line Location: GRAM+4
Function Call: WRITE	Prompt: !!?10,"Drug: GENTAMICIN SO4 0.3% OINT,OPH Quantity Dispensed: 1 TUBE" Line Location: GRAM+5
Function Call: WRITE	Prompt: !!?5,"The Quantity Dispensed above indicates how many tubes are being dispensed" Line Location: GRAM+6
Function Call: WRITE	Prompt: !?5,"(1). However, the Third Party Insurance Companies need to know how many" Line Location: GRAM+7
Function Call: WRITE	Prompt: !?5,"GRAMS are being dispensed. The correct value for the NCPDP QUANTITY" Line Location: GRAM+8
Function Call: READ	Prompt: "Enter to continue: " Formatting: !?5 Timeout: 60 Variable: ZZX Line Location: GRAM+9
Function Call: WRITE	Prompt: $C(13) Line Location: GRAM+9
Function Call: WRITE	Prompt: ?5,"MULTIPLIER field for this product is 3.5, because there are 3.5 grams in" Line Location: GRAM+10
Function Call: WRITE	Prompt: !?5,"each tube. The correct quantity to submit electronically will be" Line Location: GRAM+11
Function Call: WRITE	Prompt: !?5,"3.5 x 1 = 3.5 grams." Line Location: GRAM+12
Function Call: WRITE	Prompt: !!?5,"Another example is IPRATROPIUM BR 17MCG/SPRAY AEROSOL,INHL., which is" Line Location: GRAM+13
Function Call: WRITE	Prompt: !?5,"dispensed by the number of inhalers used to fill the prescription. Each" Line Location: GRAM+14
Function Call: WRITE	Prompt: !?5,"inhaler contains 12.9 grams of IPRATROPIUM, so the NCPDP QUANTITY" Line Location: GRAM+15
Function Call: WRITE	Prompt: !?5,"MULTIPLIER for this product will be 12.9." Line Location: GRAM+16
Function Call: WRITE	Prompt: !!?5,"Most products with a NCPDP DISPENSE UNIT of ML (Milliliters) should have" Line Location: MILL+1
Function Call: WRITE	Prompt: !?5,"this field set to 1 (one). HOWEVER for some drugs that are dispensed in" Line Location: MILL+2
Function Call: WRITE	Prompt: !?5,"units such as VIAL or BOTTLE, the NCPDP QUANTITY MULTIPLIER field should" Line Location: MILL+3
Function Call: WRITE	Prompt: !?5,"contain the number of MILILLITERS contained in 1 VIAL or BOTTLE for this" Line Location: MILL+4
Function Call: WRITE	Prompt: !?5,"drug. See examples below:" Line Location: MILL+5
Function Call: WRITE	Prompt: !!?10,"Drug: INSULIN,NPH,HUMAN 100UNT/ML INJ Quantity Dispensed 3 VIALS" Line Location: MILL+6
Function Call: WRITE	Prompt: !!?5,"The Quantity Dispensed above indicates how many vials are being dispensed" Line Location: MILL+7
Function Call: WRITE	Prompt: !?5,"(3). However, the Third Party Insurance Companies need to know how many" Line Location: MILL+8
Function Call: WRITE	Prompt: !?5,"milliliters are being dispensed. The correct value for the NCPDP QUANTITY" Line Location: MILL+9
Function Call: WRITE	Prompt: !?5,"MULTIPLIER field for this product is 10, because there are 10 milliliters" Line Location: MILL+10
Function Call: WRITE	Prompt: !?5,"in each vial. The correct quantity to submit electronically will be " Line Location: MILL+11
Function Call: WRITE	Prompt: !?5,"3 x 10 = 30 milliliters." Line Location: MILL+12
Function Call: READ	Prompt: "Enter to continue: " Formatting: !?5 Timeout: 60 Variable: ZZX Line Location: MILL+13
Function Call: WRITE	Prompt: $C(13) Line Location: MILL+13
Function Call: WRITE	Prompt: " " Line Location: MILL+13
Function Call: WRITE	Prompt: !?5,"Another example is DARBEPOETIN ALFA,RECOMBINANT 150MCG/0.3ML SYR INJ," Line Location: MILL+14
Function Call: WRITE	Prompt: !?5,"SURECLICK which is dispensed by the number of syringes used for the " Line Location: MILL+15
Function Call: WRITE	Prompt: !?5,"prescription. Each syringe contains 0.3 ML of DARBEPOETIN, so the NCPDP" Line Location: MILL+16
Function Call: WRITE	Prompt: !?5,"QUANTITY MULTIPLIER for this product will be 0.3. Notice in this case the" Line Location: MILL+17
Function Call: WRITE	Prompt: !?5,"NCPDP QUANTITY MULTIPLIER is less than 1." Line Location: MILL+18
Function Call: WRITE	Prompt: ! Line Location: MILL+19

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	EN+4, EN+5, EN+6
PSSNQM3	EN+2!
ZZX	EN+1~, EACH+11, GRAM+9, MILL+13*

Customize PDF page

Package: Pharmacy Data Management

Routine: PSSNCPDP

Information

Source Information

Caller Graph

Caller Graph Total: 1

Entry Points

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: