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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ORDEA01

Package: Order Entry Results Reporting

Routine: ORDEA01


Information

ORDEA01 ;ISP/RFR - DEA TOOLS;10/15/2014 08:09

Source Information

Source file <ORDEA01.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 (,$$FIND1)^DIC  (,FILE,UPDATE)^DIE  $$GET1^DIQ  ^DIR  
Kernel 2 $$LOW^XLFSTR  ($$VDEA,$$VDEADNA,$$VDEADNM)^XUSER  
Order Entry Results Reporting 1 WRAP^ORUTL  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Order Entry Results Reporting 6 OR EPCS PROVIDER CONFIG CHECK  OR EPCS SITE PARAMETER  OR EPCS USERS PARAMETER  OR EPCS VALIDATION REPORTS  ORDEA01A  ORDEA01B  

Entry Points

Name Comments DBIA/ICR reference
SITE ;Edit the site-level parameter
USER ;Edit user-level parameter
PRVCHK ;CHECK SINGLE PROVIDER IS PROPERLY SETUP
CHKSWIT(RETURN,IEN,RETVAL) ;CHECK THE LITTLE SWITCH
REPORTS ;PROMPT THE USER FOR THE REPORT TO RUN
DISPRMPT() ;PROMPT THE USER TO INCLUDE DISUSERED AND TERMINATED USERS

External References

Name Field # of Occurrence
^DIC USER+15, PRVCHK+4
$$FIND1^DIC USER+31
^DIE SITE+21
FILE^DIE USER+60
UPDATE^DIE SITE+7, USER+42
$$GET1^DIQ SITE+14, USER+10, USER+31, USER+32, USER+34
^DIR USER+23, REPORTS+11, DISPRMPT+6
WRAP^ORUTL USER+56, USER+70, PRVCHK+22, PRVCHK+24, PRVCHK+26, PRVCHK+28
$$SITE^VASITE SITE+5
$$LOW^XLFSTR USER+45, USER+47
$$VDEA^XUSER USER+33, PRVCHK+10
$$VDEADNA^XUSER USER+33
$$VDEADNM^XUSER PRVCHK+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option is used to enable or disable electronic prescribing of outpatient",!
  • Line Location: SITE+16
Function Call: WRITE
  • Prompt: "controlled substances for your entire site. Yes enables it and No disables it.",!
  • Line Location: SITE+17
Function Call: WRITE
  • Prompt: !,"CONFIGURING SITE "_SITE,!
  • Line Location: SITE+18
Function Call: WRITE
  • Prompt: !!,"This option is used to enable or disable electronic prescribing of outpatient",!
  • Line Location: USER+8
Function Call: WRITE
  • Prompt: "controlled substances for individual users.",!
  • Line Location: USER+9
Function Call: WRITE
  • Prompt: !,"CONFIGURING SITE "_$$GET1^DIQ(100.7,DA_",",.01),!
  • Line Location: USER+10
Function Call: WRITE
  • Prompt: OUTPUT(COUNT),!
  • Line Location: USER+57
Function Call: WRITE
  • Prompt: OUTPUT(COUNT),!
  • Line Location: USER+72
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRVCHK+6
Function Call: WRITE
  • Prompt: USING,!
  • Line Location: PRVCHK+15
Function Call: WRITE
  • Prompt: OUTPUT(LINE),!
  • Line Location: PRVCHK+29
Function Call: WRITE
  • Prompt: !,"However, the following item"_$S(LAST=1:" was",1:"s were")_" noted:",!
  • Line Location: PRVCHK+31
Function Call: WRITE
  • Prompt: LAST(LINE),!
  • Line Location: PRVCHK+32
Routine Call
  • DIC
  • Line Location:
    • USER+15
    • PRVCHK+4
Routine Call
  • DIC
  • Line Location:
    • USER+31
Routine Call
  • DIE
  • Line Location:
    • SITE+21
Routine Call
  • DIE
  • Line Location:
    • USER+60
Routine Call
  • DIE
  • Line Location:
    • SITE+7
    • USER+42
Routine Call
  • DIR
  • Line Location:
    • USER+23
    • REPORTS+11
    • DISPRMPT+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(100.7 - [#100.7] Classic Fileman Calls,  GET1^DIQ
^VA(200 - [#200] Classic Fileman Calls,  GET1^DIQ
200.5321 GET1^DIQ
^XTV(8991.9 - [#8991.9] FIND1^DIC,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ORD(100.7 - [#100.7] SITE+2, USER+2, USER+18, USER+59, CHKSWIT+1
^VA(200 - [#200] USER+29, USER+30, USER+33, PRVCHK+10

Label References

Name Line Occurrences
$$CHKSWIT PRVCHK+13
@( REPORTS+15
PRVCHK PRVCHK+33

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION USER+13~, USER+18*, USER+19, USER+21, USER+27, USER+58, USER+68
COUNT USER+28~, USER+45*, USER+46, USER+48, USER+52*, USER+53, USER+54, USER+57*, USER+67~, USER+72*
DA SITE+1~, SITE+2*, SITE+3, SITE+13*, SITE+14, SITE+15, USER+1~, USER+2*, USER+3, USER+10
, USER+41, USER+59
DEANUM USER+28~, USER+31*
DELIMIT USER+28~, USER+51*, USER+53*, USER+54
DIC USER+13~, USER+14*, PRVCHK+1~, PRVCHK+2*
DIC("A" USER+14*, PRVCHK+3*
DIC(0 USER+14*, PRVCHK+2*
DIE SITE+19~, SITE+20*
DIR USER+13~, REPORTS+1~, DISPRMPT+3~
DIR("A" USER+21*, REPORTS+10*, DISPRMPT+4*, DISPRMPT+5*
DIR("B" USER+22*, DISPRMPT+5*
DIR(0 USER+21*, REPORTS+8*, REPORTS+9*, DISPRMPT+4*
DIROUT USER+13~, REPORTS+1~, DISPRMPT+3~
DIRUT USER+13~, USER+24, REPORTS+1~, REPORTS+12, DISPRMPT+3~, DISPRMPT+7
DR SITE+19~, SITE+20*
DTOUT USER+13~, PRVCHK+1~, REPORTS+1~, DISPRMPT+3~
DUOUT USER+13~, PRVCHK+1~, REPORTS+1~, DISPRMPT+3~
ERROR SITE+4~, SITE+8, USER+26~, USER+61, USER+66
ERROR("DIERR" SITE+10, SITE+11, SITE+12, USER+63, USER+64, USER+65
EXIT USER+11~, USER+12, USER+16*
FDA SITE+4~, USER+26~, USER+66
FDA( SITE+6*, USER+41*, USER+59*
IDX SITE+9~, SITE+10*, SITE+11, SITE+12, USER+62~, USER+63*, USER+64, USER+65
IEN SITE+4~, USER+13~, USER+18*, USER+19, USER+21, USER+29, USER+30, USER+31, USER+33, USER+34
, USER+41, USER+55, USER+59, USER+68, CHKSWIT~, CHKSWIT+1
IEN(1 SITE+13
INPFLG USER+28~, USER+32*
LAST PRVCHK+7~, PRVCHK+30, PRVCHK+31, PRVCHK+32
LAST( PRVCHK+32
LINE PRVCHK+7~, PRVCHK+29*, PRVCHK+32*
NDEAIEN USER+28~, USER+31*, USER+32, USER+33
OUTPUT USER+28~, USER+57, USER+67~, USER+72, PRVCHK+7~, PRVCHK+17*, PRVCHK+27*, PRVCHK+28, PRVCHK+29
OUTPUT( USER+57, USER+72, PRVCHK+27*, PRVCHK+29
OUTPUT(1 PRVCHK+17*
OUTPUT(2 PRVCHK+17*
PROBLEM USER+28~, USER+36*, USER+37, USER+38, USER+39*, USER+43*, USER+44, USER+45, USER+47, USER+48*
, USER+52, USER+53
PROBLEM( USER+45*, USER+46*, USER+54
REP REPORTS+1~, REPORTS+9*, REPORTS+14*
REP( REPORTS+9, REPORTS+13, REPORTS+15
REP("AUD" REPORTS+7*
REP("CFG" REPORTS+2*
REP("DUP" REPORTS+3*
REP("FEE" REPORTS+6*
REP("LAS" REPORTS+5*
RETURN USER+28~, USER+33*, USER+35, USER+39*, USER+40, USER+49, PRVCHK+7~, PRVCHK+10, PRVCHK+13, PRVCHK+19*
, PRVCHK+21, PRVCHK+22, PRVCHK+24, PRVCHK+26, PRVCHK+27, CHKSWIT~
RETURN( USER+36, USER+37!, USER+38!, USER+39, USER+43, PRVCHK+19
RETURN("" USER+39
RETURN("Has a n expired DEA number." , PRVCHK+14
RETURN("Is no t an ENABLED USER in the OE/RR EPCS PARAMETERS file." , CHKSWIT+2*
RETVAL CHKSWIT~, CHKSWIT+2*, CHKSWIT+3
SCHEDULES USER+26~, USER+47*, USER+69
SEX USER+26~, USER+34*, USER+55, USER+69
SFIEN USER+28~, USER+30*, USER+31
SITE SITE+1~, SITE+5*, SITE+6, SITE+14*, SITE+18
STATUS PRVCHK+7~, PRVCHK+10*, PRVCHK+11, PRVCHK+12*, PRVCHK+13*, PRVCHK+14*, PRVCHK+16, PRVCHK+17, PRVCHK+18, PRVCHK+20
, PRVCHK+25, PRVCHK+31
TEXT USER+28~, USER+54*, USER+55*, USER+56, USER+67~, USER+68*, USER+69*, USER+70, PRVCHK+7~, PRVCHK+16*
, PRVCHK+17, PRVCHK+18*, PRVCHK+22, PRVCHK+23*, PRVCHK+28
U SITE+5, USER+19, USER+21, USER+27, USER+55, USER+58, USER+68, REPORTS+9, DISPRMPT+4, DISPRMPT+7
USING PRVCHK+7~, PRVCHK+9*, PRVCHK+11*, PRVCHK+15
X USER+13~, USER+20!, PRVCHK+1~, REPORTS+1~, DISPRMPT+3~
Y USER+13~, USER+16, USER+17, USER+18, USER+20!, USER+25, PRVCHK+1~, PRVCHK+5, PRVCHK+10, PRVCHK+13
, REPORTS+1~, REPORTS+13, REPORTS+14, REPORTS+15, DISPRMPT+3~, DISPRMPT+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All