Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSNDELTE

Package: National Drug File

Routine: PSNDELTE


Information

PSNDELTE ;BIRM/WRT-Deletes PMI files for PMI Update Patches ; 10/27/03 10:27

Source Information

Source file <PSNDELTE.m>

Entry Points

Name Comments DBIA/ICR reference
START ; Begin update process
BEGIN
TEXT
SECND ; Ask a second time
DELETE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will run the auto-mapping process. This will be accomplished by",!,"taking NDCs from NDC/UPN file #50.67 and the VA Products tied to these NDCs"
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !,"in file #50.68 AND attempt to find a match in PMI NDC/GCNSEQNO file #50.628."
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"You must be a valid user with DUZ(0)=""@"""
  • Line Location: BEGIN+1
Function Call: WRITE
  • Prompt: !,"This option will automatically DELETE all Patient Medication Information Sheet",!,"data from your system."
  • Line Location: TEXT+0
Function Call: WRITE
  • Prompt: !!,"If you are not absolutely sure what you are about to do, exit this option",!,"immediately by entering ""^"" at the next prompt."
  • Line Location: TEXT+1
Function Call: WRITE
  • Prompt: !!,"This option should only be used when installing a update Patient Medication",!,"Information Sheet Data Update patch."
  • Line Location: TEXT+2
Function Call: WRITE
  • Prompt: "Immediately after running this option, the",!,"new data global MUST be installed using instructions from the Patient Medication",!,"Sheet Data Update patch."
  • Line Location: TEXT+3
Function Call: WRITE
  • Prompt: !,"You are about to DELETE ALL Patient Medication Sheet data from the following",!,"files:",!
  • Line Location: TEXT+4
Function Call: WRITE
  • Prompt: !!,?7,"50.621 PMI-ENGLISH ^PS(50.621,"
  • Line Location: TEXT+5
Function Call: WRITE
  • Prompt: !,?7,"50.622 PMI-SPANISH ^PS(50.622,"
  • Line Location: TEXT+6
Function Call: WRITE
  • Prompt: !,?7,"50.623 PMI MAP-ENGLISH ^PS(50.623,"
  • Line Location: TEXT+7
Function Call: WRITE
  • Prompt: !,?7,"50.624 PMI MAP-SPANISH ^PS(50.624,"
  • Line Location: TEXT+8
Function Call: WRITE
  • Prompt: !,?7,"50.625 WARNING LABEL-ENGLISH ^PS(50.625,"
  • Line Location: TEXT+9
Function Call: WRITE
  • Prompt: !,?7,"50.626 WARNING LABEL-SPANISH ^PS(50.626,"
  • Line Location: TEXT+10
Function Call: WRITE
  • Prompt: !,?7,"50.627 WARNING LABEL MAP ^PS(50.627,"
  • Line Location: TEXT+11
Function Call: WRITE
  • Prompt: !
  • Line Location: TEXT+12
Function Call: WRITE
  • Prompt: !!,"Because running this process inadvertently could cause serious problems, you",!,"will be asked to confirm that you want to proceed."
  • Line Location: SECND+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SECND+2
Function Call: WRITE
  • Prompt: !!,"Deleting all Patient Medication Information Sheet data...",!,"The deletion process has completed.",!!,"Now, IMMEDIATELY install (restore) the new data global from the latest"
  • Line Location: DELETE+1
Function Call: WRITE
  • Prompt: !,"Patient Medication Information Sheet data update patch."
  • Line Location: DELETE+2
Info |  Source |  Entry Points |  Interaction Calls