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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSO7E684

Package: Outpatient Pharmacy

Routine: PSO7E684


Information

PSO7E684 ;WILM/BDB - Environment routine for patch PSO*7*684 ;4/22/2022

Source Information

Source file <PSO7E684.m>

Entry Points

Name Comments DBIA/ICR reference
INITXTMP(HANDPSO,TITLE,LIFE)
P545CHK7() ; Have more than 7 days elapsed since PSO*7*545 was installed?
DEAWS ; Install DEA Web Service
; 1st: Makes an entry/update to the WEB SERVICE FILE #18.02 in global ^XOB(18.02,
; 2nd: Makes an entry/update to the WEB SERVICE FILE #18.02 in global ^XOB(18.02,
; 3nd: Makes an entry/update to the WEB SERVER FILE #18.12 in global ^XOB(18.12,
MSDTHLP ; Migration Start Date/Time Help
MSHLP ; Migration Start Help Text

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Enter the scheduled date/time to queue the DEA migration."
  • Line Location: MSDTHLP+1
Function Call: WRITE
  • Prompt: !,"The migration may several hours to run."
  • Line Location: MSDTHLP+2
Function Call: WRITE
  • Prompt: !," During the DEA migration, an attempt is made to migrate"
  • Line Location: MSHLP+1
Function Call: WRITE
  • Prompt: !," all DEA numbers from the NEW PERSON file (#200) to the"
  • Line Location: MSHLP+2
Function Call: WRITE
  • Prompt: !," DEA NUMBERS file (#8991.9). "
  • Line Location: MSHLP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: MSHLP+4
Function Call: WRITE
  • Prompt: !," DEA numbers successfully validated by the DEA web service"
  • Line Location: MSHLP+5
Function Call: WRITE
  • Prompt: !," (PSO DOJ/DEA WEB SERVICE) are migrated and linked to the"
  • Line Location: MSHLP+6
Function Call: WRITE
  • Prompt: !," associated provider in the NEW PERSON file."
  • Line Location: MSHLP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: MSHLP+8
Function Call: WRITE
  • Prompt: !," Providers that cannot be migrated are recorded in the "
  • Line Location: MSHLP+9
Function Call: WRITE
  • Prompt: !," DEA Migration Report [PSO DEA MIGRATION REPORT]."
  • Line Location: MSHLP+10
Function Call: WRITE
  • Prompt: !," Upon completion of the migration, a Mailman message is"
  • Line Location: MSHLP+11
Function Call: WRITE
  • Prompt: !," sent to holders of the PSDMGR key with the subject"
  • Line Location: MSHLP+12
Function Call: WRITE
  • Prompt: !," ""DEA Migration Complete MM/DD/YYYY"", where MM/DD/YYYY is"
  • Line Location: MSHLP+13
Function Call: WRITE
  • Prompt: !," the Date/Time the migration completed."
  • Line Location: MSHLP+14
Function Call: WRITE
  • Prompt: !
  • Line Location: MSHLP+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XOB(18.02 - [#18.02] FIND1^DIC,  GET1^DIQ
^XOB(18.12 - [#18.12] FIND1^DIC
^XTV(8991.9 - [#8991.9] FIELD^DID
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call