Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSOBPSSP

Package: Outpatient Pharmacy

Routine: PSOBPSSP


Information

PSOBPSSP ;BIRM/LE - ePharmacy Site Parameters Definition ;04/28/08

Source Information

Source file <PSOBPSSP.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  ($$GET1,GETS)^DIQ  
Outpatient Pharmacy 1 ^PSOLSET  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSO ePHARM SITE PARAMETERS  

Entry Points

Name Comments DBIA/ICR reference
DIV ; - Prompt for ePharmacy Site Parameters
CODES ;
EXIT ;
DIV2 ;
HELP ;Help text for CODES field (#.01) of REJECT CODE multiple(#52.8561)

External References

Name Field # of Occurrence
^DIC DIV2+5, CODES+17
^DIE DIV2+11, CODES+19
$$GET1^DIQ CODES+11
GETS^DIQ CODES+4
^PSOLSET DIV2+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Regardless of any parameters defined, Refill-Too-Soon, Drug Utilization"
  • Line Location: DIV+2
Function Call: WRITE
  • Prompt: !,"Review(DUR) and Tricare rejects will always be placed on the Third Party "
  • Line Location: DIV+3
Function Call: WRITE
  • Prompt: !,"Payer Rejects - Worklist, also known as Pharmacy Reject Worklist. These"
  • Line Location: DIV+4
Function Call: WRITE
  • Prompt: !,"parameters are uneditable and are the default parameters."
  • Line Location: DIV+5
Function Call: WRITE
  • Prompt: $C(7),!!,"Pharmacy Division Must be Selected!",!
  • Line Location: DIV2+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: DIV2+4
Function Call: WRITE
  • Prompt: !,"A division must be entered to proceed.",!!
  • Line Location: DIV2+6
Function Call: WRITE
  • Prompt: !!,"Previously defined override reject codes:",!!,"Code",?10,"Description",?70,"Auto Send"
  • Line Location: CODES+6
Function Call: WRITE
  • Prompt: !,"-----",?10,"----------------------------------",?70,"---------"
  • Line Location: CODES+7
Function Call: WRITE
  • Prompt: !,$J(DATA(52.8651,XX1,".01","E"),5)
  • Line Location: CODES+10
Function Call: WRITE
  • Prompt: ?10,$E($$GET1^DIQ(9002313.93,DATA(52.8651,XX1,".01","I")_",",.02),1,50)
  • Line Location: CODES+11
Function Call: WRITE
  • Prompt: ?70,$J(DATA(52.8651,XX1,1,"E"),6)
  • Line Location: CODES+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: CODES+13
Function Call: WRITE
  • Prompt: !!,"*** Enter a valid third party reject code from the previously entered codes"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"*** above, enter a new code, or enter one from the provided listing below."
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !,"*** Valid codes are those defined in BPS NCPDP REJECT CODES file (#900231.93).",!!
  • Line Location: HELP+3
Routine Call
  • DIE
  • Line Location:
    • DIV2+11
    • CODES+19
Routine Call
  • DIC
  • Line Location:
    • DIV2+5
    • CODES+17

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.86 - [#52.86] Classic Fileman Calls,  GETS^DIQ
^ABSPF(9002313.93 - [#9002313.93] GET1^DIQ

Label References

Name Line Occurrences
CODES CODES+21
DIV2 DIV2+6, CODES+17
EXIT DIV2+6, DIV2+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA DIV+1~, DIV2+1!, DIV2+10!, DIV2+11*, CODES+15!, CODES+17!, CODES+18*, CODES+20!, EXIT+1!
DA(1 CODES+16*
DATA CODES+2!, CODES+5, EXIT+1!
DATA( CODES+8, CODES+9, CODES+10, CODES+11, CODES+12
DIC DIV+1~, DIV2+1!, DIV2+5*, DIV2+6!, DIV2+10!, CODES+15!, CODES+16*, CODES+17!, CODES+19, EXIT+1!
DIC("A" DIV2+5*
DIC(0 DIV2+5*, DIV2+11*, CODES+16*
DIE DIV+1~, DIV2+1!, DIV2+10!, DIV2+11*, CODES+15!, CODES+19!*, CODES+20!, EXIT+1!
DIR EXIT+1!
DLAYGO DIV+1~, DIV2+5*, EXIT+1!
DR DIV2+11*, CODES+16*, CODES+19*, CODES+20!
DTOUT DIV+1~, DIV2+6, DIV2+12, CODES+17
DUOUT DIV+1~, DIV2+6, DIV2+12, CODES+17
PSODIV DIV+1~, DIV+6~, DIV2+1!*, DIV2+7*, DIV2+11, CODES+4, CODES+16
>> PSOPAR DIV2+3
>> PSOSITE DIV2+3
XX DIV+6~
XX1 CODES+3~, CODES+8*, CODES+9, CODES+10, CODES+11, CODES+12
XX2 CODES+3~, CODES+8*
XX3 CODES+3~, CODES+8*
Y DIV+1~, DIV2+1!, DIV2+6, DIV2+7, CODES+17, CODES+18, CODES+20!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All