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

Package: DSS Extracts

Routine: ECXECMDI


Information

ECXECMDI ;ALB/NCD - Event Capture Pre-Extract Missing DSS Identifier Report ;Apr 28, 2022@21:50:31

Source Information

Source file <ECXECMDI.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point
START ; Find EC records in the date range
GETREC ;get data for report
PRINT ; Process the TMP file and print the report
PROCESS ; entry point for queued report
HEADER ;header and page control
SS ;SCROLL STOPS
GETDATE ;Get starting and ending date for sort

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report prints a list of records that are missing the DSS Identifier"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"that would be generated by the Event Capture Extract (ECS), so that corrective"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"action can be taken."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"The running of this report has no effect on the actual extracts and "
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"can be run as needed.",!
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,"Enter the date range for which you would like to scan the Event Capture records."
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!,"This report is formatted for 132-column line width."
  • Line Location: EN+17
Function Call: WRITE
  • Prompt: !!,"Enter 'Q' to queue report to TaskManager, then select printer."
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: !!,"No device selected...exiting.",!
  • Line Location: EN+20
Function Call: WRITE
  • Prompt: !!,"Queued as Task #"_ZTSK_"."
  • Line Location: EN+23
Function Call: WRITE
  • Prompt: !,?1,ECXSSN,?12,ECXPDIV,?25,ECXDSSU,?42,ECXDATE,?69,ECXPRCN,?83,ECXPROV,?105,ECXCLIN,?122,ECXSSID
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: !!,?8,"No Event Capture records with missing DSS Identifier to report for the date range.",!!
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: !,ECXDESC,?103,"Page: "_PG
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"Start Date: ",ECSTART,?92,"Report Run Date: "_ECRUN
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !," End Date: ",ECEND
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !!,?1,"SSN",?12,"FACILITY",?25,"DSS UNIT IEN",?45,"DATE/TIME",?68,"PROCEDURE",?83,"PROVIDER",?105,"CLINIC IEN",?122,"DSS ID"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,LN,!
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SS+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(40.7 - [#40.7] GET1^DIQ
^SC - [#44] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call