Routine: PSOPATLK

Information

PSOPATLK ;BIR/JAM - Patient Lookup utility ;7/21/08

Source file <PSOPATLK.m>

Name	Comments	DBIA/ICR reference
EN	;Entry point - Prompts for Patient, Prescription Number or Barcode ; ; Input - DIC(0) & DIC("A") [Optional] ; Used by DIR if defined by the calling routine.
PATHLP	;Help text for patient prompt
PATVAL()	;Validate user input
RXLK	;Prescription Lookup
INST()	;get institution number

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7),"No prescription number entered." Line Location: RXLK+3

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^DIC(4 - [#4]	GET1^DIQ