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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSNPRE

Package: National Drug File

Routine: PSNPRE


Information

PSNPRE ;BIR/WRT-pre-init routine to ask question to kill off old reference files sent with the package ;29 Sep 98 / 12:07 PM

Source Information

Source file <PSNPRE.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 ($$PATCH,$$VERSION,BMES,MES)^XPDUTL  
VA FileMan 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
CKDUZ
MESSGE
GLB0
VR31
PATCHCHK

External References

Name Field # of Occurrence
^DIR MESSGE+3
$$PATCH^XPDUTL PATCHCHK, PATCHCHK+11, PATCHCHK+12, PATCHCHK+13, PATCHCHK+14, PATCHCHK+15, PATCHCHK+16, PATCHCHK+17, PATCHCHK+18, PATCHCHK+19
, PATCHCHK+20, PATCHCHK+21
$$VERSION^XPDUTL VR31, PATCHCHK, PATCHCHK+1, PATCHCHK+2, PATCHCHK+3, PATCHCHK+4, PATCHCHK+5, PATCHCHK+6, PATCHCHK+7, PATCHCHK+8
, PATCHCHK+9, PATCHCHK+10, PATCHCHK+11, PATCHCHK+12, PATCHCHK+13, PATCHCHK+14, PATCHCHK+15, PATCHCHK+16, PATCHCHK+17, PATCHCHK+18
, PATCHCHK+19, PATCHCHK+20, PATCHCHK+21
BMES^XPDUTL CKDUZ+4, GLB0, VR31, PATCHCHK, PATCHCHK+1, PATCHCHK+2, PATCHCHK+3, PATCHCHK+4, PATCHCHK+5, PATCHCHK+6
, PATCHCHK+7, PATCHCHK+8, PATCHCHK+9, PATCHCHK+10, PATCHCHK+11, PATCHCHK+12, PATCHCHK+13, PATCHCHK+14, PATCHCHK+15, PATCHCHK+16
, PATCHCHK+17, PATCHCHK+18, PATCHCHK+19, PATCHCHK+20, PATCHCHK+21
MES^XPDUTL CKDUZ+4, GLB0

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"DUZ MUST BE SET TO A VALID USER NUMBER AND",!,"DUZ(0) MUST BE SET TO THE ""@"" SIGN",!!
  • Line Location: CKDUZ+0
Function Call: WRITE
  • Prompt: !!,$C(7),"I need to delete the following files:",!!,?5,"DRUG INGREDIENTS (50.416)",!,?5,"VA DRUG CLASS (50.605)",!,?5,"DRUG UNITS (50.607)"
  • Line Location: MESSGE+0
Function Call: WRITE
  • Prompt: !?5,"PACKAGE TYPE (50.608)",!?5,"PACKAGE SIZE (50.609)",!?5,"DRUG MANUFACTURER (55.95)"
  • Line Location: MESSGE+1
Function Call: WRITE
  • Prompt: !!,"If you wish to retain a copy of these files, you may wish to backup these files",!,"before going any further."
  • Line Location: MESSGE+2
Function Call: WRITE
  • Prompt: !!,"If you start this Installation, you must let it run to completion."
  • Line Location: MESSGE+3
Routine Call
  • DIR
  • Line Location:
    • MESSGE+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(59.7 - [#59.7] CKDUZ+1
^PSNDF(50.6 - [#50.6] CKDUZ+4, GLB0
^VA(200 - [#200] CKDUZ

Label References

Name Line Occurrences
MESSGE CKDUZ+1
PATCHCHK CKDUZ+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR MESSGE+3!
DIR("A" MESSGE+3*
DIR(0 MESSGE+3*
>> DIRUT MESSGE+3
DUZ CKDUZ
DUZ(0 CKDUZ
NDF PATCHCHK+1*, PATCHCHK+2*, PATCHCHK+3*, PATCHCHK+4*, PATCHCHK+5*, PATCHCHK+6*, PATCHCHK+7*, PATCHCHK+8*, PATCHCHK+9*, PATCHCHK+10*
, PATCHCHK+11*, PATCHCHK+13*, PATCHCHK+22!
>> XPDQUIT CKDUZ*, CKDUZ+4*, MESSGE+3*, MESSGE+4*, GLB0*, VR31*, PATCHCHK*, PATCHCHK+1*, PATCHCHK+2*, PATCHCHK+3*
, PATCHCHK+4*, PATCHCHK+5*, PATCHCHK+6*, PATCHCHK+7*, PATCHCHK+8*, PATCHCHK+9*, PATCHCHK+10*, PATCHCHK+11*, PATCHCHK+12*, PATCHCHK+13*
, PATCHCHK+14*, PATCHCHK+15*, PATCHCHK+16*, PATCHCHK+17*, PATCHCHK+18*, PATCHCHK+19*, PATCHCHK+20*, PATCHCHK+21*
>> Y MESSGE+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All