Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PSN533D

Package: National Drug File

Routine: PSN533D


Information

PSN533D ;BIR/DMA-post install routine to load data ; 04 Oct 2017 3:46 PM

Source Information

Source file <PSN533D.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
VA FileMan 6 FILE^DICN  FIELD^DID  (,FILE,UPDATE,WP)^DIE  (,ENALL)^DIK  $$ROOT^DILFD  $$GET1^DIQ  
Kernel 4 ^%ZTLOAD  $$FMTE^XLFDT  UPDATE^XPDID  $$PATCH^XPDUTL  
National Drug File 2 ^PSNCLEAN  ING^PSNXREF  
Adverse Reaction Tracking 1 EN2^GMRAUIX0  
MailMan 1 ^XMD  
Pharmacy Data Management 1 PSN^PSSHUIDG  

Entry Points

Name Comments DBIA/ICR reference
DRUGFILE ;
QUIT ;
REINDEX ;Make sure APC xref is correct
GROUP ;
STRIP(X) ; Strip control characters
LOAD ;GET DOSE STUFF
HAZWASTE ;
WP ;
LOAD1 ;BUILD THE MESSAGE
WORD ;
MESSAGE ;
MORE ;REINDEXING

External References

Name Field # of Occurrence
^%ZTLOAD DRUGFILE+28
FILE^DICN PSN533D+22
FIELD^DID PSN533D+45
^DIE DRUGFILE+8, DRUGFILE+10, DRUGFILE+13, DRUGFILE+14, DRUGFILE+15, DRUGFILE+23, HAZWASTE+3
FILE^DIE PSN533D+21, PSN533D+73
UPDATE^DIE PSN533D+60
WP^DIE WP+7
^DIK PSN533D+32, PSN533D+37
ENALL^DIK REINDEX+9
$$ROOT^DILFD PSN533D+19, PSN533D+27, PSN533D+66
$$GET1^DIQ PSN533D+21
EN2^GMRAUIX0 REINDEX+1
^PSNCLEAN MORE+11
ING^PSNXREF PSN533D+75
PSN^PSSHUIDG DRUGFILE+28
$$FMTE^XLFDT DRUGFILE+7, LOAD1+6
^XMD GROUP+7, GROUP+17, DRUGFILE+23
UPDATE^XPDID PSN533D+23, PSN533D+61, PSN533D+74, DRUGFILE+16, QUIT+1
$$PATCH^XPDUTL DRUGFILE+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(120.8 - [#120.8] Classic Fileman Calls
^PSDRUG - [#50] Classic Fileman Calls
^PSNDF(50.68 - [#50.68] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( PSN533D+56, PSN533D+70
^GMR(120.8 - [#120.8] REINDEX+3, REINDEX+4, REINDEX+5!
^PS(50.416 - [#50.416] MORE+2!*, MORE+5, MORE+6, MORE+7, MORE+8
^PS(50.605 - [#50.605] DRUGFILE+14
^PS(50.607 - [#50.607] LOAD+1
^PS(56 - [#56] MORE+4!, MORE+9*
^PSDRUG - [#50] DRUGFILE+5, DRUGFILE+9!, DRUGFILE+10, DRUGFILE+11!, DRUGFILE+12, DRUGFILE+15, LOAD+1, LOAD+2, LOAD+3, LOAD+4
, LOAD+5
^PSNDF(50.68 - [#50.68] PSN533D+31, PSN533D+32, PSN533D+36, PSN533D+37, DRUGFILE+6, DRUGFILE+13, DRUGFILE+14, DRUGFILE+15
^TMP("PPSN.WP" PSN533D+10!, PSN533D+49!, PSN533D+50*, PSN533D+51*, WP+1, WP+2, WP+3, WP+5, WP+6, WP+8!
^TMP("PPSN.WPXRF" PSN533D+10!, PSN533D+41*, PSN533D+49!
^TMP("PSN" PSN533D+10!, DRUGFILE+18!, QUIT+4!, LOAD1+1*, LOAD1+2*, LOAD1+3*, LOAD1+5*, LOAD1+6*, LOAD1+7*
^TMP("PSNN" PSN533D+10!, PSN533D+62*, PSN533D+75, QUIT+4!
^TMP($J PSN533D+10!, MESSAGE+1!*, GROUP+9!*, DRUGFILE+2!, DRUGFILE+7*, DRUGFILE+28, QUIT+4!, LOAD+1*, LOAD+2*, LOAD+3*
, LOAD+4*, LOAD+5*, LOAD1+5, LOAD1+6, LOAD1+7
^XMB("NETNAME" GROUP+1, GROUP+11, DRUGFILE+20
^XUSEC("PSNMGR" GROUP+2, GROUP+12, DRUGFILE+21

Label References

Name Line Occurrences
$$STRIP PSN533D+50, PSN533D+51
@( DRUGFILE+25
HAZWASTE PSN533D+33, PSN533D+68
LOAD DRUGFILE+9
LOAD1 DRUGFILE+18
MORE REINDEX+1

Naked Globals

Name Field # of Occurrence
^( DRUGFILE+10*, DRUGFILE+15*, MORE+2, MORE+4, LOAD+2*, LOAD+3*, LOAD+4*, LOAD+5*, LOAD1+6, LOAD1+7
^("DOS1" DRUGFILE+9!, DRUGFILE+11!
^("DOS2" DRUGFILE+9!, DRUGFILE+11!
^("I" DRUGFILE+5
^("ND" DRUGFILE+5
^("POST" DRUGFILE+25
^(0 MORE+4, LOAD1+6*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CL PSN533D+7~, QUIT+2!
CLA PSN533D+7~, DRUGFILE+5*, QUIT+2!
CLASS REINDEX+2~, REINDEX+5*
CMOP PSN533D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
>> CNT1 PSN533D+36*, PSN533D+37*
CT PSN533D+7~, WORD+1*, WORD+2*, QUIT+2!
DA PSN533D+7~, PSN533D+20*, PSN533D+21, PSN533D+22, PSN533D+32*, PSN533D+37*, PSN533D+58*, PSN533D+60, PSN533D+75*, GROUP+2*
, GROUP+12*, DRUGFILE+4*, DRUGFILE+5*, DRUGFILE+7, DRUGFILE+9, DRUGFILE+10, DRUGFILE+11, DRUGFILE+12, DRUGFILE+15, DRUGFILE+21*
, DRUGFILE+23*, REINDEX+2~, MORE+2*, MORE+4*, MORE+9, QUIT+2!, LOAD+1, LOAD+2, LOAD+3, LOAD+4
, LOAD+5, HAZWASTE+2~*, HAZWASTE+3*
DA(1 PSN533D+32*, PSN533D+37*, PSN533D+75*, REINDEX+6*
DA1 PSN533D+7~, QUIT+2!, LOAD+2*, LOAD+3*, LOAD+4*, LOAD+5*
DD PSN533D+22!
DIA PSN533D+7~, PSN533D+19*, PSN533D+20, PSN533D+27*, PSN533D+28, PSN533D+31, PSN533D+32, PSN533D+33, PSN533D+36, PSN533D+37
, PSN533D+40, PSN533D+42, PSN533D+50, PSN533D+56, PSN533D+57, PSN533D+62, PSN533D+66*, PSN533D+67, PSN533D+68, PSN533D+70
, PSN533D+71, QUIT+2!, HAZWASTE+3
DIC PSN533D+7~, PSN533D+22*, QUIT+2!
DIC("DR" PSN533D+22*
DIC(0 PSN533D+22*
DIE PSN533D+7~, DRUGFILE+8*!, DRUGFILE+10*!, DRUGFILE+13*, DRUGFILE+14*, DRUGFILE+15*!, DRUGFILE+23*, QUIT+2!, HAZWASTE+2~*, HAZWASTE+3*
DIFROM GROUP+7~, GROUP+17~, DRUGFILE+23~
DIK PSN533D+7~, PSN533D+32*, PSN533D+37*, REINDEX+2~, REINDEX+7*, QUIT+2!
DIK(1 REINDEX+8*
DINUM PSN533D+7~, PSN533D+22*, QUIT+2!
DO PSN533D+22!
DR PSN533D+7~, DRUGFILE+8*!, DRUGFILE+10*!, DRUGFILE+13*, DRUGFILE+14*, DRUGFILE+15*!, DRUGFILE+23*, QUIT+2!, HAZWASTE+3*
DT DRUGFILE+5
DUZ GROUP+3, GROUP+13, DRUGFILE+22
ERR WP+4!
FDA PSN533D+7~, PSN533D+20!, PSN533D+28!, PSN533D+42!, PSN533D+67!, QUIT+2!
FDA( PSN533D+21*, PSN533D+60*, PSN533D+73*
FILE PSN533D+7~, PSN533D+17*, PSN533D+19*, PSN533D+21, PSN533D+25*, PSN533D+27*, PSN533D+28, PSN533D+30, PSN533D+36, PSN533D+41
, PSN533D+42, PSN533D+45, PSN533D+49, PSN533D+50, PSN533D+51, PSN533D+62, PSN533D+64*, PSN533D+66*, PSN533D+67, PSN533D+68
, WP+1*, WP+2, WP+3, WP+5, WP+6, WP+7, QUIT+2!
FLDS PSN533D+7~, PSN533D+28*, PSN533D+31, PSN533D+36, PSN533D+42*, PSN533D+45, PSN533D+48, PSN533D+49, PSN533D+54, PSN533D+67*
, PSN533D+69, PSN533D+72*, PSN533D+73, WP+3*, WP+5, WP+6, WP+7, QUIT+2!
GE PSN533D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
GMRAIEN REINDEX+2~, REINDEX+4*, REINDEX+5
GROOT PSN533D+7~, PSN533D+17*, PSN533D+19, PSN533D+25*, PSN533D+27, PSN533D+64*, PSN533D+66, QUIT+2!
GROOT1 PSN533D+7~, PSN533D+19*, PSN533D+27*, PSN533D+66*, QUIT+2!
I STRIP+1~, STRIP+2*
IEN PSN533D+28!, PSN533D+42!, PSN533D+67!
IEN( PSN533D+60*
IENS PSN533D+7~, PSN533D+20!, PSN533D+28*, PSN533D+31, PSN533D+36, PSN533D+42*, PSN533D+48, PSN533D+49, PSN533D+57*, PSN533D+58
, PSN533D+60, PSN533D+67*, PSN533D+71*, PSN533D+73, WP+2*, WP+3, WP+5, WP+6, WP+7, QUIT+2!
IN PSN533D+7~, DRUGFILE+5*, DRUGFILE+7*, QUIT+2!, LOAD+1, LOAD+2, LOAD+3, LOAD+4, LOAD+5
INA PSN533D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
IND PSN533D+7~, DRUGFILE+10*, DRUGFILE+15*, QUIT+2!
INDX PSN533D+7~, DRUGFILE+7*, DRUGFILE+18*, QUIT+2!, LOAD+1, LOAD+2, LOAD+3, LOAD+4, LOAD+5, LOAD1+2
, LOAD1+5, LOAD1+6, LOAD1+7
INV PSN533D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
J PSN533D+7~, PSN533D+56*, PSN533D+57*, PSN533D+70*, PSN533D+71*, QUIT+2!, LOAD+1*, LOAD+2*, LOAD+3*, LOAD+4*
, LOAD+5*, LOAD1+3*, LOAD1+6*, LOAD1+7*
JJ PSN533D+7~, PSN533D+19*, PSN533D+27*, PSN533D+48, PSN533D+52*, PSN533D+66*, PSN533D+75*, WP+5*, WP+6, QUIT+2!
K PSN533D+7~, MORE+2*, QUIT+2!
LI PSN533D+7~, PSN533D+56*, PSN533D+57*, PSN533D+70*, PSN533D+71*, QUIT+2!
LINE PSN533D+7~, DRUGFILE+18*, QUIT+2!, LOAD1+1*, LOAD1+2*, LOAD1+3*, LOAD1+5*, LOAD1+6*, LOAD1+7*
MFLDS PSN533D+9~, PSN533D+40*, PSN533D+41
MIENS PSN533D+9~, PSN533D+40*, PSN533D+41
MJJ PSN533D+9~, PSN533D+48*, PSN533D+50*, PSN533D+51*
NA PSN533D+7~, DRUGFILE+5*, DRUGFILE+7, MORE+5*, MORE+6*, MORE+7*, MORE+8*, QUIT+2!, LOAD+1, LOAD+2
, LOAD+3, LOAD+4, LOAD+5, LOAD1+5*, LOAD1+6*, LOAD1+7
NAME PSN533D+7~, WORD+2*, QUIT+2!
ND PSN533D+7~, DRUGFILE+12*, DRUGFILE+13, QUIT+2!
NEW PSN533D+7~, PSN533D+19*, PSN533D+21, PSN533D+22, PSN533D+27*, PSN533D+33, PSN533D+41, PSN533D+51, PSN533D+52, PSN533D+60
, PSN533D+66*, PSN533D+68, PSN533D+73, QUIT+2!
NFI PSN533D+7~, DRUGFILE+13*, QUIT+2!
OFLDS PSN533D+9~, PSN533D+41, PSN533D+48*, PSN533D+49, PSN533D+50, PSN533D+51
OIENS PSN533D+9~, PSN533D+41, PSN533D+48*, PSN533D+49, PSN533D+50, PSN533D+51
POST PSN533D+7~, DRUGFILE+25*, QUIT+2!
PR PSN533D+7~, DRUGFILE+5*, DRUGFILE+6, DRUGFILE+7, DRUGFILE+11, DRUGFILE+12*, DRUGFILE+13, DRUGFILE+14, DRUGFILE+15, QUIT+2!
PSN PSN533D+7~, DRUGFILE+3*, DRUGFILE+9, DRUGFILE+11, QUIT+2!
PSN1 PSN533D+7~, DRUGFILE+3*, DRUGFILE+10, MORE+4!*, MORE+5, MORE+6, MORE+9*, QUIT+2!
PSN1( MORE+5*, MORE+6*, MORE+9
PSN11 PSN533D+7~, MORE+6*, QUIT+2!
PSN2 MORE+4!*, MORE+7, MORE+8, MORE+9*
PSN2( MORE+7*, MORE+8*, MORE+9
PSN21 PSN533D+7~, MORE+8*, QUIT+2!
>> PSNCPCNT PSN533D+31*, PSN533D+32*
PSNDF PSN533D+7~, PSN533D+12*, QUIT+2!
PSNMULTI PSN533D+9~, PSN533D+39, PSN533D+41*, PSN533D+45, PSN533D+46, PSN533D+47, PSN533D+51*
R1 PSN533D+7~, QUIT+2!
RES1 PSN533D+44!
RES1("TYPE" PSN533D+46
ROOT PSN533D+7~, PSN533D+19*, PSN533D+22, PSN533D+27*, PSN533D+28*, PSN533D+42*, PSN533D+56*, PSN533D+60, PSN533D+66*, PSN533D+67*
, PSN533D+70*, PSN533D+73, QUIT+2!
ROOT1 PSN533D+7~, WORD+1*, WORD+2, DRUGFILE+4*, DRUGFILE+7, QUIT+2!
ROOT2 PSN533D+7~, WORD+1*, WORD+2*, DRUGFILE+4*, DRUGFILE+7, QUIT+2!
ROOT3 PSN533D+7~, WORD+2*, DRUGFILE+4*, DRUGFILE+11, QUIT+2!
SUB REINDEX+2~, REINDEX+3*, REINDEX+4, REINDEX+5, REINDEX+6
SUBS PSN533D+7~, QUIT+2!
TMP WP+4!
TMP( WP+6*
TREC PSN533D+8~, PSN533D+12*, PSN533D+23*, PSN533D+61*, PSN533D+74*, DRUGFILE+16*
U REINDEX+4
VAC PSN533D+7~, DRUGFILE+14*, QUIT+2!
VAIN PSN533D+7~, DRUGFILE+6*, DRUGFILE+7, QUIT+2!
VAPN PSN533D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
X PSN533D+8~, PSN533D+22*, GROUP+1*, GROUP+11*, DRUGFILE+5*, DRUGFILE+7*, DRUGFILE+20*, MORE+2*, QUIT+3!, LOAD+1*
, LOAD+3*, LOAD+5*, LOAD1+6*, STRIP~, STRIP+2
XMDUZ PSN533D+8~, GROUP+6*, GROUP+16*, DRUGFILE+19*, QUIT+3!
XMSUB PSN533D+8~, GROUP+5*, GROUP+15*, DRUGFILE+19*, QUIT+3!
XMTEXT PSN533D+8~, GROUP+7*, GROUP+17*, DRUGFILE+19*, QUIT+3!
XMY PSN533D+8~, GROUP+1!, GROUP+11!, DRUGFILE+20!, QUIT+3!
XMY( GROUP+2*, GROUP+3*, GROUP+12*, GROUP+13*, DRUGFILE+21*, DRUGFILE+22*
XMY("G." GROUP+1*, GROUP+11*, DRUGFILE+20*
XMZ PSN533D+8~, DRUGFILE+23, QUIT+3!
>> XPDGREF PSN533D+12, PSN533D+17, PSN533D+25, PSN533D+64, WORD+1, MESSAGE+1, GROUP+1, GROUP+9, GROUP+11, DRUGFILE+4
, DRUGFILE+20, DRUGFILE+25, LOAD1+3
>> XPDIDTOT PSN533D+12*, QUIT+1
XUMF PSN533D+8~, PSN533D+13*, QUIT+3!
Y STRIP+1~, STRIP+2*, STRIP+3
ZTDESC PSN533D+9~, DRUGFILE+28*, QUIT+3!
ZTDTH PSN533D+9~, DRUGFILE+28*, QUIT+3!
ZTIO PSN533D+9~, DRUGFILE+28*, QUIT+3!
ZTRTN PSN533D+9~, DRUGFILE+28*, QUIT+3!
ZTSAVE PSN533D+9~, QUIT+3!
ZTSAVE("^TMP($J,""^""," DRUGFILE+28*

Marked Items

Name Field # of Occurrence
$T(EN2^GMRAUIX0 REINDEX+1
$T(PSN^PSSHUIDG DRUGFILE+28
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All