Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSSNCPDP

Package: Pharmacy Data Management

Routine: PSSNCPDP


Information

PSSNCPDP ;BIR/LE - Pharmacy Data Management DD Utility ;10/30/97 9:41

Source Information

Source file <PSSNCPDP.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
HDR ;
EACH ;Each help text
GRAM ;Gram help text
MILL ;Milliliter help text
12 ;CHECK BCMA Prompt for removal flag
D12 ;
D13 ;

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
  • Formatting: !?5
  • Prompt: "Enter to continue: "
  • Variable: ZZX
  • Timeout: 60
  • 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
  • Formatting: !?5
  • Prompt: "Enter to continue: "
  • Variable: ZZX
  • Timeout: 60
  • 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
  • Formatting: !?5
  • Prompt: "Enter to continue: "
  • Variable: ZZX
  • Timeout: 60
  • 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
Info |  Source |  Entry Points |  Interaction Calls