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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: ORDEA01B

Package: Order Entry Results Reporting

Routine: ORDEA01B


Information

ORDEA01B ;ISP/RFR - DEA REPORTS 02;10/15/2014 08:02

Source Information

Source file <ORDEA01B.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 4 $$FMTE^XLFDT  ($$NAMEFMT,NAMECOMP)^XLFNAME  ($$CJ,$$LJ,$$REPEAT,$$UP)^XLFSTR  $$ACTIVE^XUSER  
Order Entry Results Reporting 3 $$DISPRMPT^ORDEA01  $$STRIP^ORDEA01A  ($$DIVPRMPT,$$HASDIV,$$HEADER,$$PAD,DEVICE,FMERROR,WRAP)^ORUTL  
VA FileMan 3 LIST^DIC  $$GET1^DIQ  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
FEEDEA ;List those Fee Basis and C & A providers without a DEA number
FEEDEAQ ;TASKMAN ENTRY POINT
AUDIT ;Display the audit data for OE/RR EPCS PARAMTERS file (#100.7)
AUDITQ ;TASKMAN ENTRY POINT
LAST ;List those providers that contain a space and/or punctuation in the last name
LASTQ ;TASKMAN ENTRY POINT

External References

Name Field # of Occurrence
LIST^DIC FEEDEAQ+6
$$GET1^DIQ AUDITQ+23, AUDITQ+26, AUDITQ+38, AUDITQ+57, LASTQ+18
^DIR AUDIT+8, AUDIT+15, LAST+20
$$DISPRMPT^ORDEA01 FEEDEA+7, LAST+13
$$STRIP^ORDEA01A LASTQ+20, LASTQ+24
$$DIVPRMPT^ORUTL FEEDEA+9, AUDIT+18, LAST+23
$$HASDIV^ORUTL FEEDEAQ+19, AUDITQ+14, LASTQ+14
$$HEADER^ORUTL FEEDEAQ+14, FEEDEAQ+30, FEEDEAQ+35, FEEDEAQ+43, FEEDEAQ+49, FEEDEAQ+52, AUDITQ+36, AUDITQ+45, AUDITQ+51, AUDITQ+55
, LASTQ+35, LASTQ+44, LASTQ+55, LASTQ+58
$$PAD^ORUTL AUDITQ+31
DEVICE^ORUTL FEEDEA+12, AUDIT+21, LAST+27
FMERROR^ORUTL FEEDEAQ+9
WRAP^ORUTL AUDITQ+32, LASTQ+41, LASTQ+42
$$FMTE^XLFDT FEEDEAQ+26, AUDITQ+25
$$NAMEFMT^XLFNAME LASTQ+22
NAMECOMP^XLFNAME LASTQ+19, LASTQ+23
$$CJ^XLFSTR FEEDEAQ+16, FEEDEAQ+38, FEEDEAQ+39, FEEDEAQ+51, FEEDEAQ+54, LASTQ+47, LASTQ+48, LASTQ+57, LASTQ+60
$$LJ^XLFSTR FEEDEAQ+12, FEEDEAQ+26, FEEDEAQ+27, LASTQ+4, LASTQ+50
$$REPEAT^XLFSTR FEEDEAQ+11, FEEDEAQ+39, LASTQ+48
$$UP^XLFSTR FEEDEA+12, AUDIT+21, LAST+27
$$ACTIVE^XUSER FEEDEAQ+21, LASTQ+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report identifies Fee Basis and C & A providers who do not have a DEA# ",!
  • Line Location: FEEDEA+2
Function Call: WRITE
  • Prompt: "value in the NEW PERSON file (#200). These providers will need a valid DEA ",!
  • Line Location: FEEDEA+3
Function Call: WRITE
  • Prompt: "number entered into the NEW DEA# (#53.21) field in the NEW PERSON file (#200) ",!
  • Line Location: FEEDEA+4
Function Call: WRITE
  • Prompt: "before they can order controlled substances.",!
  • Line Location: FEEDEA+5
Function Call: WRITE
  • Prompt: !
  • Line Location: FEEDEAQ+45
Function Call: WRITE
  • Prompt: !!,"This report displays the audit data for the logical access control feature.",!
  • Line Location: AUDIT+2
Function Call: WRITE
  • Prompt: "SITE: "_ORSITE
  • Line Location: AUDITQ+40
Function Call: WRITE
  • Prompt: !!,"This report identifies providers with one or more space or punctuation",!
  • Line Location: LAST+2
Function Call: WRITE
  • Prompt: "characters in their family (last) name. These providers may not be able to",!
  • Line Location: LAST+3
Function Call: WRITE
  • Prompt: "link their PIV card using CPRS GUI. For these providers, someone may have",!
  • Line Location: LAST+4
Function Call: WRITE
  • Prompt: "to use the Data Entry for e-Prescribing Controlled Substances GUI and",!
  • Line Location: LAST+5
Function Call: WRITE
  • Prompt: "manually enter the subject alternative name stored on the provider's PIV",!
  • Line Location: LAST+6
Function Call: WRITE
  • Prompt: "card.",!!
  • Line Location: LAST+7
Function Call: WRITE
  • Prompt: "Additionally, it is recommended that for those providers who's NAME COMPONENTS",!
  • Line Location: LAST+8
Function Call: WRITE
  • Prompt: "file (#20) entry does not exactly match the value in the NAME field (#.01) in",!
  • Line Location: LAST+9
Function Call: WRITE
  • Prompt: "the NEW PERSON file (#200), either the NAME COMPONENTS file entry or the value",!
  • Line Location: LAST+10
Function Call: WRITE
  • Prompt: "in the NAME field in the NEW PERSON file are modified so that both are the same.",!
  • Line Location: LAST+11
Function Call: WRITE
  • Prompt: !
  • Line Location: LAST+15
Function Call: WRITE
  • Prompt: OUT(OUT)
  • Line Location: LASTQ+51
Function Call: WRITE
  • Prompt: !
  • Line Location: LASTQ+51
Routine Call
  • DIC
  • Line Location:
    • FEEDEAQ+6
Routine Call
  • DIR
  • Line Location:
    • AUDIT+8
    • AUDIT+15
    • LAST+20

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(100.7 - [#100.7] GET1^DIQ
^DIC(19 - [#19] GET1^DIQ
^VA(200 - [#200] GET1^DIQ,  LIST^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIA(100.7 AUDITQ+6, AUDITQ+8, AUDITQ+10, AUDITQ+11, AUDITQ+12, AUDITQ+15, AUDITQ+16, AUDITQ+17, AUDITQ+18, AUDITQ+20
, AUDITQ+22, AUDITQ+23, AUDITQ+24, AUDITQ+26, AUDITQ+27, AUDITQ+30
^ORD(100.7 - [#100.7] AUDITQ+38
^TMP("DILIST" FEEDEAQ+3
^TMP($J FEEDEAQ+4, AUDITQ+3, LASTQ+3
^XUSEC("ORES" LASTQ+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CBUFFER FEEDEAQ+35, FEEDEAQ+42, AUDITQ+44, AUDITQ+50, AUDITQ+54, LASTQ+43
CNAME LASTQ+17~, LASTQ+22*, LASTQ+23, LASTQ+28, LASTQ+32
CNAME( LASTQ+30
CNAME("FAMILY" LASTQ+24, LASTQ+26
CNAME("FIELD" LASTQ+21*
CNAME("FILE" LASTQ+21*
CNAME("IENS" LASTQ+21*
CNAME("STRIPPED" LASTQ+24*, LASTQ+26
COL FEEDEAQ+2~, FEEDEAQ+14, FEEDEAQ+30, FEEDEAQ+35, FEEDEAQ+43, FEEDEAQ+49, FEEDEAQ+52, LASTQ+2~, LASTQ+35, LASTQ+44
, LASTQ+55, LASTQ+58
COL(1 FEEDEAQ+29*, LASTQ+34*
COL(2 FEEDEAQ+11*, LASTQ+4*
COL(3 FEEDEAQ+12*
DATA FEEDEAQ+2~, FEEDEAQ+4*, FEEDEAQ+27, FEEDEAQ+28, FEEDEAQ+33, FEEDEAQ+40, FEEDEAQ+41, FEEDEAQ+44, FEEDEAQ+55, LASTQ+2~
, LASTQ+3*, LASTQ+25, LASTQ+27, LASTQ+28, LASTQ+31, LASTQ+32, LASTQ+33, LASTQ+39, LASTQ+40, LASTQ+42
, LASTQ+50, LASTQ+61
DATE FEEDEAQ+26~*, FEEDEAQ+27
DHEADER LASTQ+2~, LASTQ+37*, LASTQ+43, LASTQ+45, LASTQ+49*
DIR AUDIT+3~, LAST+12~
DIR("?" AUDIT+6*, AUDIT+7*, AUDIT+13*, AUDIT+14*
DIR("A" AUDIT+5*, AUDIT+12*, LAST+17*, LAST+18*
DIR("B" LAST+19*
DIR(0 AUDIT+4*, LAST+16*
DIROUT AUDIT+3~, AUDIT+11!, LAST+12~
DIRUT AUDIT+3~, AUDIT+11!, LAST+12~, LAST+21
DISINC FEEDEA+6~, FEEDEA+7*, FEEDEA+8, FEEDEAQ+22, LAST+12~, LAST+13*, LAST+14, LASTQ+10
DIV FEEDEA+6~, FEEDEA+9, FEEDEAQ+19, AUDIT+3~, AUDIT+18, AUDITQ+14, LAST+12~, LAST+23, LASTQ+14
DIVISION FEEDEAQ+19~*, FEEDEAQ+20, FEEDEAQ+27, FEEDEAQ+28~*, FEEDEAQ+29, FEEDEAQ+33, FEEDEAQ+40, FEEDEAQ+41, FEEDEAQ+44, LASTQ+14~*
, LASTQ+15, LASTQ+25, LASTQ+27, LASTQ+28, LASTQ+31, LASTQ+32, LASTQ+33~*, LASTQ+34, LASTQ+39, LASTQ+40
, LASTQ+42, LASTQ+50
DT AUDIT+4, AUDITQ+4
DTOUT AUDIT+3~, AUDIT+9, AUDIT+11!, AUDIT+16, LAST+12~
DUOUT AUDIT+3~, AUDIT+9, AUDIT+11!, AUDIT+16, LAST+12~
ERROR FEEDEAQ+2~, FEEDEAQ+8, FEEDEAQ+9
IDATE FEEDEAQ+26~*, FEEDEAQ+27, FEEDEAQ+40*, FEEDEAQ+41, FEEDEAQ+44
IDX FEEDEAQ+2~, FEEDEAQ+18*, FEEDEAQ+19, FEEDEAQ+21, FEEDEAQ+26, FEEDEAQ+27
IN FEEDEAQ+2~, FEEDEAQ+3*, FEEDEAQ+13, FEEDEAQ+18, FEEDEAQ+19, FEEDEAQ+21, FEEDEAQ+26, FEEDEAQ+27, FEEDEAQ+55
IOM FEEDEAQ+16, FEEDEAQ+38, FEEDEAQ+39, FEEDEAQ+51, FEEDEAQ+54, LASTQ+47, LASTQ+48, LASTQ+57, LASTQ+60
IOSL FEEDEAQ+35, FEEDEAQ+42, FEEDEAQ+45, FEEDEAQ+52, AUDITQ+44, AUDITQ+50, AUDITQ+54, LASTQ+43, LASTQ+51, LASTQ+58
ITEM LASTQ+17~, LASTQ+29*, LASTQ+30
NAME FEEDEAQ+41~*, FEEDEAQ+44, LASTQ+39~*, LASTQ+40, LASTQ+42, LASTQ+50
NAMEC LASTQ+40~*, LASTQ+41, LASTQ+42
ONAME LASTQ+17~, LASTQ+18*, LASTQ+19, LASTQ+25, LASTQ+27, LASTQ+28, LASTQ+31, LASTQ+32
ONAME( LASTQ+30
ONAME("FAMILY" LASTQ+20, LASTQ+25, LASTQ+26
ONAME("STRIPPED" LASTQ+20*, LASTQ+25, LASTQ+26
ORACTION AUDITQ+9~, AUDITQ+15*, AUDITQ+16*, AUDITQ+18*, AUDITQ+19*, AUDITQ+25, AUDITQ+27
ORCDATE AUDIT+3~, AUDIT+10*, AUDIT+14, AUDITQ+6
ORCOUNT AUDITQ+9~, AUDITQ+33*, AUDITQ+34
ORDATA AUDITQ+2~, AUDITQ+3*, AUDITQ+22*, AUDITQ+29, AUDITQ+30, AUDITQ+39, AUDITQ+41, AUDITQ+43, AUDITQ+46, AUDITQ+48
, AUDITQ+53, AUDITQ+54, AUDITQ+58, AUDITQ+60, AUDITQ+62, AUDITQ+63, AUDITQ+64
ORDATE AUDITQ+2~, AUDITQ+6*, AUDITQ+8, AUDITQ+25
ORDDATE AUDIT+3~, AUDIT+17*, AUDITQ+4*, AUDITQ+5*, AUDITQ+6
ORDIEN AUDITQ+41*, AUDITQ+43, AUDITQ+46, AUDITQ+56~, AUDITQ+60*, AUDITQ+62, AUDITQ+63
ORDIVISION AUDITQ+2~, AUDITQ+13, AUDITQ+14*, AUDITQ+29, AUDITQ+48*, AUDITQ+49, AUDITQ+52, AUDITQ+53, AUDITQ+54, AUDITQ+58
, AUDITQ+60, AUDITQ+62, AUDITQ+63
ORDUZ AUDITQ+2~, AUDITQ+53*, AUDITQ+54, AUDITQ+57, AUDITQ+58, AUDITQ+60, AUDITQ+62, AUDITQ+63
ORFIELD AUDITQ+9~, AUDITQ+10*, AUDITQ+13, AUDITQ+18, AUDITQ+21, AUDITQ+27, AUDITQ+29, AUDITQ+35
ORIEN AUDITQ+7~, AUDITQ+8*, AUDITQ+10, AUDITQ+11, AUDITQ+12, AUDITQ+15, AUDITQ+16, AUDITQ+17, AUDITQ+18, AUDITQ+20
, AUDITQ+22, AUDITQ+23, AUDITQ+24, AUDITQ+26, AUDITQ+27, AUDITQ+29, AUDITQ+30, AUDITQ+31, AUDITQ+34
ORITM AUDITQ+9~, AUDITQ+31*
ORLINE AUDITQ+42~, AUDITQ+43*, AUDITQ+46, AUDITQ+61~, AUDITQ+62*, AUDITQ+63
ORNAME AUDITQ+9~, AUDITQ+11*, AUDITQ+12*, AUDITQ+14, AUDITQ+29
ORNAME("USER" AUDITQ+23*, AUDITQ+24*, AUDITQ+25
ORNAME(1 AUDITQ+15*, AUDITQ+16*, AUDITQ+20*, AUDITQ+22, AUDITQ+27, AUDITQ+35
OROUTPUT AUDITQ+9~, AUDITQ+29*, AUDITQ+30*, AUDITQ+31, AUDITQ+32, AUDITQ+33, AUDITQ+34*, AUDITQ+35*
ORSITE AUDITQ+2~, AUDITQ+38*, AUDITQ+39*, AUDITQ+40
ORSITE(1 AUDITQ+38*, AUDITQ+39, AUDITQ+41, AUDITQ+43, AUDITQ+46
ORTEXT AUDITQ+9~, AUDITQ+25*, AUDITQ+26*, AUDITQ+27*, AUDITQ+28*, AUDITQ+31*, AUDITQ+32
ORUSER AUDITQ+56~, AUDITQ+57*, AUDITQ+58*, AUDITQ+59
OUT LASTQ+2~, LASTQ+40~, LASTQ+41*, LASTQ+43, LASTQ+51*
OUT( LASTQ+51
OUTPUT FEEDEAQ+2~, FEEDEAQ+46*, FEEDEAQ+48, LASTQ+2~, LASTQ+52*, LASTQ+54
PGNUM FEEDEAQ+2~, FEEDEAQ+14, FEEDEAQ+30, FEEDEAQ+35, FEEDEAQ+43, FEEDEAQ+49, FEEDEAQ+52, AUDITQ+2~, AUDITQ+36, AUDITQ+45
, AUDITQ+51, AUDITQ+55, LASTQ+2~, LASTQ+35, LASTQ+44, LASTQ+55, LASTQ+58
PROVIDERS FEEDEAQ+2~
REASON LASTQ+2~, LASTQ+5*, LASTQ+6*, LASTQ+32
>> REP FEEDEA+12, AUDIT+21, LAST+27
>> REP( FEEDEA+12, AUDIT+21, LAST+27
SAVE FEEDEA+6~, FEEDEA+12, AUDIT+21, LAST+12~, LAST+27
SAVE("DISINC" FEEDEA+11*, LAST+25*
SAVE("DIV(" FEEDEA+11*, AUDIT+20*, LAST+25*
SAVE("ORCDATE" AUDIT+20*
SAVE("ORDDATE" AUDIT+20*
SAVE("SCREEN2" LAST+26*
SCREEN2 LAST+12~, LAST+22*, LAST+26, LASTQ+16
STATUS FEEDEAQ+2~, FEEDEAQ+21~*, FEEDEAQ+22, FEEDEAQ+24, FEEDEAQ+25*, FEEDEAQ+27, FEEDEAQ+32~*, FEEDEAQ+33, FEEDEAQ+34, FEEDEAQ+40
, FEEDEAQ+41, FEEDEAQ+44, LASTQ+9~*, LASTQ+10, LASTQ+12, LASTQ+13*, LASTQ+25, LASTQ+27, LASTQ+28, LASTQ+31
, LASTQ+32, LASTQ+38~*, LASTQ+39, LASTQ+40, LASTQ+42, LASTQ+43, LASTQ+45, LASTQ+50
STATUS("TEXT" FEEDEAQ+24*, FEEDEAQ+27, LASTQ+12*, LASTQ+25, LASTQ+27, LASTQ+31
STOP FEEDEAQ+2~, FEEDEAQ+14*, FEEDEAQ+15, FEEDEAQ+28, FEEDEAQ+30*, FEEDEAQ+31, FEEDEAQ+32, FEEDEAQ+34, FEEDEAQ+35*, FEEDEAQ+36
, FEEDEAQ+40, FEEDEAQ+41, FEEDEAQ+42, FEEDEAQ+43*, FEEDEAQ+47, FEEDEAQ+48, FEEDEAQ+49*, FEEDEAQ+50, FEEDEAQ+52*, FEEDEAQ+53
, AUDITQ+36*, AUDITQ+37, AUDITQ+41, AUDITQ+43, AUDITQ+44, AUDITQ+45*, AUDITQ+47, AUDITQ+48, AUDITQ+50, AUDITQ+51*
, AUDITQ+53, AUDITQ+54, AUDITQ+55*, LASTQ+2~, LASTQ+33, LASTQ+35*, LASTQ+36, LASTQ+38, LASTQ+39, LASTQ+40
, LASTQ+43, LASTQ+44*, LASTQ+53, LASTQ+54, LASTQ+55*, LASTQ+56, LASTQ+58*, LASTQ+59
U FEEDEA+8, FEEDEAQ+19, FEEDEAQ+21, FEEDEAQ+22, FEEDEAQ+24, FEEDEAQ+26, FEEDEAQ+27, AUDIT+4, AUDITQ+10, AUDITQ+11
, AUDITQ+12, AUDITQ+22, AUDITQ+23, AUDITQ+24, AUDITQ+26, AUDITQ+30, AUDITQ+31, AUDITQ+34, AUDITQ+35, AUDITQ+39
, AUDITQ+58, LAST+14, LAST+16, LASTQ+10, LASTQ+12
X FEEDEA+6~, FEEDEA+9*, FEEDEA+10, AUDIT+3~, AUDIT+11!, AUDIT+18*, AUDIT+19, LAST+12~, LAST+23*, LAST+24
Y AUDIT+3~, AUDIT+10, AUDIT+11!, AUDIT+17, LAST+12~, LAST+22, LASTQ+2~, LASTQ+8*, LASTQ+9, LASTQ+14
, LASTQ+18, LASTQ+21
>> ZTQUEUED FEEDEAQ+10, FEEDEAQ+17, FEEDEAQ+56, AUDITQ+65, LASTQ+62
>> ZTREQ FEEDEAQ+10*, FEEDEAQ+17*, FEEDEAQ+56*, AUDITQ+65*, LASTQ+62*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All