Routine: PSNAUTO

Information

PSNAUTO ;BIR/WRT-Builds temporary file for matches (for new version 2.0 drugs and any unmatched drugs) ; 10/20/98 12:50

Source file <PSNAUTO.m>

Package	Total	Call Graph
National Drug File	2	AUTO^PSNHELP1 ^PSNNDC1
Kernel	1	T1^%ZOSV

Package	Total	Caller Graph
National Drug File	1	PSNAUTO

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This option will attempt to automatically match by NDC code, drugs which have",!,"not been" Line Location: MESSGE+0
Function Call: WRITE	Prompt: " matched to the National Drug File. These matches must be verified",!,"and merged.",! Line Location: MESSGE+1
Function Call: WRITE	Prompt: !!,"AUTOMATIC MATCH by NDC Code process will begin. It will attempt to match",!,"all items that are not presently MATCHED to the National Drug File.",!! Line Location: STWHN+0
Function Call: READ	Prompt: "Are you sure you want to continue ? N// " Timeout: DTIME Variable: ANS Line Location: STWHN+1

Name	Line Occurrences (* Changed, ! Killed)
^PS(59.7 - [#59.7]	STWHN+5

Name	Line Occurrences
KILL	STWHN+1, STWHN+5
PSNAUTO	STWHN+2, STWHN+3, STWHN+4

Name	Field # of Occurrence
ANS	STWHN+1*, STWHN+2!, STWHN+3, STWHN+4, STWHN+5, KILL!
DIC	KILL!
DOS	KILL+1!
DTIME	STWHN+1
II	KILL!
JJ	KILL!
KK	KILL+1!
MJL	KILL!
NBR	KILL!
NDP	KILL+1!
PS	KILL+1!
PSNB	KILL!
PSNCLASS	KILL!
PSND	KILL+1!
PSNDA	KILL!
PSNDDA	KILL!
PSNDEA	KILL+1!
PSNDFM	KILL+1!
PSNENT	KILL+1!
PSNF	KILL+1!
PSNFL	KILL!
PSNFLB	KILL!
PSNFNM	KILL!
PSNFORM	KILL!
PSNM	KILL+1!
PSNNAM	KILL!
PSNNAME	KILL!
PSNNDA	KILL!
PSNNDC	KILL!
PSNNDF	KILL!
PSNP	KILL+1!
PSNPD	KILL!
PSNSIZE	KILL!
PSNSP	KILL!
PSNSTDA	KILL!
PSNSZ	KILL!
PSNTRFL	KILL!
PSNTYP	KILL!
PSNTYPE	KILL!
PSNUNDA	KILL!
PSNVAR	KILL!
PSNVC	KILL+1!
PSNVCL	KILL+1!
PT	KILL+1!
STOP	KILL+1!
STR	KILL+1!
UNT	KILL+1!
VAR	KILL+1!
X	KILL+1!
>> XRT0	STWHN+5
>> XRTN	STWHN+5*
Y	KILL+1!

Name	Field # of Occurrence
$T(	STWHN+5