Routine: PSNNGR

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

PSNNGR ;BIR/WRT-creates UTILITY GLOBAL OF INGREDIENTS FOR EACH VAPN FROM ^PSNDF(50.6, ;09/21/98 7:54

Source Information

Source file <PSNNGR.m>

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
National Drug File	1	$$VAP^PSNAPIS

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 4

Package	Total	Caller Graph
Adverse Reaction Tracking	4	GMRAOR GMRAOR0 GMRAOR9 GMRAPES1

Entry Points

Name	Comments	DBIA/ICR reference
START
BEGIN
VAPN
GETLIST
BLD
INGR		ICR #5728 Status: Active Usage: Private
DISPDRG		ICR #151 Status: Active Usage: Private
STRT
FNDING

External References

Name	Field # of Occurrence
$$VAP^PSNAPIS	VAPN

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.416 - [#50.416]	INGR, FNDING
^PSNDF(50.6 - [#50.6]	BEGIN, STRT
^PSNDF(50.68 - [#50.68]	STRT
^TMP("PSN"	START!, INGR*
^TMP("PSNDD"	DISPDRG!, FNDING*

Label References

Name	Line Occurrences
BEGIN	START
BLD	GETLIST
FNDING	STRT
GETLIST	VAPN
INGR	BLD
STRT	DISPDRG
VAPN	BEGIN

Naked Globals

Name	Field # of Occurrence
^(0	INGR, FNDING

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	VAPN*
>> HH	GETLIST*
J	START+1!, INGR, INGR+1!, DISPDRG+1!, FNDING, FNDING+1!
K	START+1!, INGR, INGR+1!, DISPDRG+1!, FNDING, FNDING+1!
>> LIST	VAPN
>> LIST(	GETLIST
PSNDA	START+1!, BEGIN, VAPN, BLD, DISPDRG+1!, STRT
PSNDD	DISPDRG!, DISPDRG+1!, STRT*, FNDING
PSNID	START!, START+1!, BLD*, INGR
PSNPN	START+1!, GETLIST*, BLD
PSNVPN	DISPDRG+1!, STRT
X	START+1!, VAPN, INGR, INGR+1!, DISPDRG+1!, FNDING*, FNDING+1!