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: PSAP54

Package: Drug Accountability

Routine: PSAP54


Information

PSAP54 ;VMP/RJS BUILD XTMP("PSAVSN" FROM A FLAT FILE ; 14MAR06

Source Information

Source file <PSAP54.m>

Entry Points

Name Comments DBIA/ICR reference
DIR
EN
END
ERRMSG ; ERROR MESSAGE IF FILE WAS DOWNLOAD IN BINARY FORMAT
POSINIT ; PATCH POST INSTALL
POSERR1 ; ERROR MESSAGE IF FILE COULD NOT BE OPENED
POSERR2 ; ERROR MESSAGE IF FILE WAS FUOUND BUT HAS ALREADY BEEN INSTALLED
POSERR3 ; ERROR MESSAGE IF THE FLAT FILE WAS DOWNLOADED IN BINARY FORMAT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Build McKesson VSN to Dispense Units Per Order Unit and Drug Description Data"
  • Line Location: PSAP54+6
Function Call: WRITE
  • Prompt: !!,"This Utility is used to build the ^XTMP(""PSAVSN"" global with then McKesson VSN,",!,"DUOU & Description. Please follow these steps prior to running this utility:",!
  • Line Location: PSAP54+7
Function Call: WRITE
  • Prompt: !,"1) Retrieve the MCKESSON_UPDATE.DAT in ASCII format directly from one of these",!,?5,"FTP servers:"
  • Line Location: PSAP54+8
Function Call: WRITE
  • Prompt: !,?5,"Albany ftp.fo-albany.domain.ext",!,?5,"Hines ftp.fo-hines.domain.ext",!,?5,"Salt Lake City ftp.fo-slc.domain.ext"
  • Line Location: PSAP54+9
Function Call: WRITE
  • Prompt: !," The preferred FTP server retrieve the file from download.vista.domain.ext",!," which will transmit the files from the first available FTP server."
  • Line Location: PSAP54+10
Function Call: WRITE
  • Prompt: !!,"2) At the HOST DIRECTORY: prompt enter the name of the directory that you",!," placed the file in. i.e. USER$:[TEMP]"
  • Line Location: PSAP54+11
Function Call: WRITE
  • Prompt: !!,?5,"If you enter an invalid directory this utility will return you to the",!,?5,"HOST DIRECTORY: prompt: Enter ^ to Quit:",!!
  • Line Location: PSAP54+12
Function Call: WRITE
  • Prompt: !,?5,"INVALID DIRECTORY NAME OR FILE DOES NOT EXIST",!,?5,"PLEASE ENTER THE DIRECTORY AGAIN"
  • Line Location: DIR+5
Function Call: WRITE
  • Prompt: !,"The McKesson Update for ",PSAFLDT," has already been installed",!,"Please try downloading the file again."
  • Line Location: DIR+9
Function Call: WRITE
  • Prompt: !!,"PROCESSING PLEASE WAIT "
  • Line Location: DIR+10
Function Call: WRITE
  • Prompt: "."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,"PROCESSING COMPLETE. The ^XTMP(""PSAVSN"" global has been updated"
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!,?10,"There was a problem with the input file."
  • Line Location: ERRMSG+2
Function Call: WRITE
  • Prompt: !,?9,"It may have been downloaded in BINARY mode."
  • Line Location: ERRMSG+3
Function Call: WRITE
  • Prompt: !,?6,"Please try downloading it again using ASCII mode.",!!
  • Line Location: ERRMSG+4
Info |  Source |  Entry Points |  Interaction Calls