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

Package: Order Entry Results Reporting

Routine: ORWDBA10


Information

ORWDBA10 ; SLC/GDU - Billing Awareness - Phase I [11/24/04 13:42]

Source Information

Source file <ORWDBA10.m>

Entry Points

Name Comments DBIA/ICR reference
EN(CIDC) ;Entry point for this program
EXIT ;Exit point of this routine
SCRHDR ;Screen Header
SH ;;Enable Clinical Indicator Data Capture By Provider Parameter Management
SHE ;;Enable Parameter For All Active Providers Option
SHD ;;Disable Parameter For All Active Providers Option
OY ;;YES:Enter YES to begin process to
ON ;;NO:Enter NO to cancel process to
OYE ;; enable CIDC
ONE ;; enable CIDC and quit
OYD ;; disable CIDC
OND ;; disable CIDC and quit
A1 ;;active providers do not have this parameter assigned to them.
A2E ;;You have selected to enable Clinical Indictor Data Capture
A2D ;;You have selected to disable Clinical Indicator Data Capture
A3 ;;for all active providers. This may take some time.
A4 ;;Are you sure you want to do this? (YES/NO - must be all cap)
HY ;;Enter YES to begin the
HN ;;Enter No or '^' to cancel the
HYE ;; enable CIDC process.
HNE ;; enable CIDC process and quit.
HYD ;; disable CIDC process.
HND ;; disable CIDC process and quit.
EP ;;Now enabling CIDC functionality.
EC ;;CIDC parameter functionality enabling complete.
DP ;;Now disabling CIDC functionality.
DC ;;CIDC parameter functionality disabling complete.
CP ;;Process cancelled!

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),$P($T(CP),";",3)
  • Line Location: EN+39
Function Call: WRITE
  • Prompt: !!,$S(CIDC="E":$P($T(EP),";",3),1:$P($T(DP),";",3))
  • Line Location: EN+42
Function Call: WRITE
  • Prompt: "."
  • Line Location: EN+47
Function Call: WRITE
  • Prompt: "."
  • Line Location: EN+52
Function Call: WRITE
  • Prompt: !,$P($T(SH),";",3)
  • Line Location: SCRHDR+2
Function Call: WRITE
  • Prompt: !,$S(CIDC="E":$P($T(SHE),";",3),1:$P($T(SHD),";",3))
  • Line Location: SCRHDR+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call