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: PSNPFN

Package: National Drug File

Routine: PSNPFN


Information

PSNPFN ;BIR/WRT-va product name report of matches made ; 10/31/98 19:21

Source Information

Source file <PSNPFN.m>

Entry Points

Name Comments DBIA/ICR reference
DVC
QUEUE
ENQ ;ENTRY POINT WHEN QUEUED
DONE
TITLE
LOOP
WRITE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,"This report can be run before and/or after the menu option ""Verify Matches"".",!,"It should be run before the menu option ""Merge National Drug File Data Into",!,"Local File"". This "
  • Line Location: PSNPFN+2
Function Call: WRITE
  • Prompt: "report may also be run after the auto-match process to review",!,"what was matched. "
  • Line Location: PSNPFN+3
Function Call: WRITE
  • Prompt: "It generates a hard copy of the matches selected in the menu",!,"option ""Automatic Match of Unmatched Drugs"" and the menu option ""Verify",!,"Matches"". This report requires 132 columns."
  • Line Location: PSNPFN+4
Function Call: WRITE
  • Prompt: !,"You may queue the report to print, if you wish.",!
  • Line Location: PSNPFN+5
Function Call: WRITE
  • Prompt: !,"No data has been generated.",!,"The ""Automatic Match of Unmatched Drugs"" should be run before selecting",!,"this option."
  • Line Location: PSNPFN+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DONE+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TITLE+0
Function Call: WRITE
  • Prompt: !,?33,"DRUG NAME FROM LOCAL DRUG FILE WITH MATCH FROM NATIONAL DRUG FILE"
  • Line Location: TITLE+1
Function Call: WRITE
  • Prompt: !,?100,"Date printed: ",Y,!?100,"Page: ",PSNPGCT,!
  • Line Location: TITLE+2
Function Call: WRITE
  • Prompt: !?4,"LOCAL DRUG NAME",?54,"VA PRODUCT NAME",!
  • Line Location: TITLE+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: TITLE+4
Function Call: WRITE
  • Prompt: !,?39,"Entered by: ",PSNNAME
  • Line Location: TITLE+5
Function Call: WRITE
  • Prompt: !,?38,"Verified by: ",PSNVNAME
  • Line Location: TITLE+6
Function Call: WRITE
  • Prompt: !!,?4,PSNOLD,?54,PSNNEW,!,?6,"ORDER UNIT: ",$S($D(PSNOUN):PSNOUN,1:""),?56,"PKG SIZE: ",PSNSZE
  • Line Location: WRITE+8
Function Call: WRITE
  • Prompt: !,?38,"** NOT VERIFIED **"
  • Line Location: WRITE+11
Info |  Source |  Entry Points |  Interaction Calls