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

Package: Outpatient Pharmacy

Routine: PSO7P274


Information

PSO7P274 ;SMT - PSO*7*274 Activity Log Cleanup ; 10/11/07 12:16pm

Source Information

Source file <PSO7P274.m>

Entry Points

Name Comments DBIA/ICR reference
QUIT ;
STATUS ;show status of job running
STOP ;stop job command
ST() ;status
INITXTMP(NAMSP,TITLE,LIFE) ;create ^Xtmp according to SAC std
NAMSP() ;
EN ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"This job has been run before to completion on "
  • Line Location: PSO7P274+20
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT($P($G(^XTMP(NAMSP,0,"LAST")),"^",2)),!!
  • Line Location: PSO7P274+21
Function Call: WRITE
  • Prompt: "If you want to run it again, the global subscript ^XTMP('"_NAMSP_"') must be",!
  • Line Location: PSO7P274+22
Function Call: WRITE
  • Prompt: "deleted prior to doing so.",!!
  • Line Location: PSO7P274+23
Function Call: WRITE
  • Prompt: !,"Halting..."
  • Line Location: PSO7P274+33
Function Call: WRITE
  • Prompt: !,"Currently processing:"
  • Line Location: STATUS+2
Function Call: WRITE
  • Prompt: !,"COMPLETED ON ",$$FMTE^XLFDT($P($G(^XTMP($$NAMSP,0,"LAST")),"^",2)),!
  • Line Location: STATUS+4
Function Call: WRITE
  • Prompt: !?5,"Date being processed > ",$$FMTE^XLFDT($P(^XTMP($$NAMSP,0,"LAST"),"^",3))
  • Line Location: STATUS+5
Function Call: WRITE
  • Prompt: !?5," RX # > ",$P(^XTMP($$NAMSP,0,"LAST"),"^",4)
  • Line Location: STATUS+6
Function Call: WRITE
  • Prompt: !,"COMPLETED ON ",$$FMTE^XLFDT($P($G(^XTMP($$NAMSP,0,"LAST")),"^",2)),!
  • Line Location: STATUS+10
Function Call: WRITE
  • Prompt: !,"TALLY MISSING EXPIRATION DATES Job - set to STOP Soon"
  • Line Location: STOP+2
Function Call: WRITE
  • Prompt: !!,"Check Status to be sure it has stopped and is not running..."
  • Line Location: STOP+3
Function Call: WRITE
  • Prompt: !," (D STATUS^PSOTEXP1)"
  • Line Location: STOP+4
Function Call: WRITE
  • Prompt: !,"*** NOT CURRENTLY RUNNING! ***",!
  • Line Location: ST+3
Info |  Source |  Entry Points |  Interaction Calls