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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSNUPN

Package: National Drug File

Routine: PSNUPN


Information

PSNUPN ;BIR/WRT-Allows user to lookup one or more entries from NDC/UPN file ; 11/06/98 9:12

Source Information

Source file <PSNUPN.m>

Entry Points

Name Comments DBIA/ICR reference
DONE
EXPLN
START
NCODE
INFO
DSPLY
DSPRT
DSPREV
DSPREV1
UCODE
DISC

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option allows you to pick an NDC or UPN and the corresponding",!,"information from NDC/UPN file will be displayed to the screen. ",!
  • Line Location: EXPLN+0
Function Call: WRITE
  • Prompt: !,"Do you want to Inquire on an NDC or UPN:"
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !!,?5,"When selecting by NDC, use a 12 character format for",!,?5,"the NDC. (i.e., 510000033058)",!!
  • Line Location: NCODE+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: INFO+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DSPLY+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DSPLY+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DSPLY+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DSPLY+0
Function Call: WRITE
  • Prompt: "UPN: ",UPN1
  • Line Location: DSPLY+1
Function Call: WRITE
  • Prompt: ?45,"OTX/RX Indicator: ",IND
  • Line Location: DSPLY+1
Function Call: WRITE
  • Prompt: !,"Manufacturer: ",MN
  • Line Location: DSPLY+2
Function Call: WRITE
  • Prompt: ?45,"Inactivation Date: "
  • Line Location: DSPLY+3
Function Call: WRITE
  • Prompt: Y
  • Line Location: DSPLY+3
Function Call: WRITE
  • Prompt: !,"Trade Name: ",TRAD
  • Line Location: DSPLY+4
Function Call: WRITE
  • Prompt: !,"VA Product Name: ",VAPN
  • Line Location: DSPLY+5
Function Call: WRITE
  • Prompt: !,"Package Size: ",PS,?45,"Package Type: ",PT
  • Line Location: DSPLY+6
Function Call: WRITE
  • Prompt: !,?27,RT
  • Line Location: DSPRT+0
Function Call: WRITE
  • Prompt: !?5,$P(^PSNDF(50.67,ENT,2,XX,0),"^")
  • Line Location: DSPREV+0
Function Call: WRITE
  • Prompt: !?5,$P(^PSNDF(50.67,ENT,3,QQ,0),"^")
  • Line Location: DSPREV1+0
Function Call: WRITE
  • Prompt: !,"***DISCLAIMER: This option is designed to give the user information on a NDC",!,"or UPN entry. Unfortunately, at this time, the UPN field has not been populated"
  • Line Location: DISC+0
Function Call: WRITE
  • Prompt: !,"with data. This disclaimer will be removed once the data is entered for this",!,"field.",!!
  • Line Location: DISC+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSNDF(50.67 - [#50.67] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call