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

Package: Outpatient Pharmacy

Routine: PSODEARV


Information

PSODEARV ;WILM/BDB - EPCS Utilities and Reports; [5/7/02 5:53am] ;10/5/21 14:50

Source Information

Source file <PSODEARV.m>

Entry Points

Name Comments DBIA/ICR reference
DL ;Delimited File message
YN ;yes or no prompt if no audited fields found for a file
RUN(PSHEADER,PSCPRSSA,PSOEDS,PSOCPRSU)
COMPILE(PSCPRSSA,PSOEDS,PSOCPRSU,PSOPROB)
TEST(PSODNOBJ,PSONPOBJ,PSCPRSSA,PSOEDS,NPIEN,PSOCPRSU)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"You have selected the delimited file output."
  • Line Location: DL+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DL+3
Function Call: WRITE
  • Prompt: !,"The report output will be displayed on the screen in a delimited format, so"
  • Line Location: DL+4
Function Call: WRITE
  • Prompt: !,"it can be captured and exported. If you are using Reflections, you can turn"
  • Line Location: DL+5
Function Call: WRITE
  • Prompt: !,"logging on by selecting 'Tools' on the top of the screen, then"
  • Line Location: DL+6
Function Call: WRITE
  • Prompt: !,"select 'Logging' and capture to your desired location. To avoid undesired"
  • Line Location: DL+7
Function Call: WRITE
  • Prompt: !,"wrapping, you may need to set your terminal session display settings to"
  • Line Location: DL+8
Function Call: WRITE
  • Prompt: !,"512 columns. Please enter '0;512;9999' at the 'DEVICE:' prompt. Lines"
  • Line Location: DL+9
Function Call: WRITE
  • Prompt: !,"may need to be deleted at the top and bottom of the logged file before"
  • Line Location: DL+10
Function Call: WRITE
  • Prompt: !,"importing."
  • Line Location: DL+11
Function Call: WRITE
  • Prompt: !!,"The format of the output is as follows, using '|' as the delimiter:"
  • Line Location: DL+12
Function Call: WRITE
  • Prompt: !,"Term Date|Name|DEA|DEA Exp Dt|Last Sign-on|Title|Service/Section|Remarks"
  • Line Location: DL+13
Function Call: WRITE
  • Prompt: !
  • Line Location: YN+1
Function Call: WRITE
  • Prompt: "Term Date","|","Name","|","DEA","|","DEA Exp Dt","|","Last Sign-on","|","Title","|","Service/Section","|","Remarks"
  • Line Location: RUN+6
Function Call: WRITE
  • Prompt: !,"DEA Expiration Date Report"_" "
  • Line Location: RUN+7
Function Call: WRITE
  • Prompt: PSHEADER
  • Line Location: RUN+8
Function Call: WRITE
  • Prompt: "Run Date: ",$$FMTE^XLFDT(DT,"5DZ")
  • Line Location: RUN+9
Function Call: WRITE
  • Prompt: !!,"There is no Data to Print"
  • Line Location: RUN+10
Function Call: WRITE
  • Prompt: !,^TMP($J,"PSODEARP",PSOTD,PSONAME,PSCOUNT2,1),"|"
  • Line Location: RUN+14
Function Call: WRITE
  • Prompt: !,"*PROBLEM* INDICATES BAD CROSS REFERENCE IN NEW PERSON FILE.",!,"CONTACT PRODUCT SUPPORT TO RESOLVE.",!
  • Line Location: RUN+16
Function Call: WRITE
  • Prompt: !!,"End of Report. If 'Logging', please turn off 'Logging'.",!
  • Line Location: RUN+19

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ,  GETS^DIQ
200.5321 FIND1^DIC
^XTV(8991.9 - [#8991.9] GET1^DIQ,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call