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
Print Page as PDF
Routine: IVMBULK

Package: Income Verification Match

Routine: IVMBULK


Information

IVMBULK ;ALB/KCL - IVM/ENROLLMENT Extract ; 18-AUG-1997

Source Information

Source file <IVMBULK.m>

Entry Points

Name Comments DBIA/ICR reference
EN(IVMARRY1,IVMCONST) ; --
; Description: Entry point responsible for queuing off the enrollment extract job.
ENQ ;
; if job is not queued, unlock IVM EXTRACT MANAGEMENT file
ENV() ; --
; Description: This function performs an environment check for the enrollment initial data extract job.
PAUSE() ; --
; Description: End-of-Page, Press return to continue or "^" to exit.
PAUSEQ
EST(IVMARRY1,IVMCONST) ; --
; Description: Calculate extract size/time estimates.
ESTQ
TOTPAT(ESTIMATE) ; --
; Description: This function counts the number of records in the PATIENT file.
TIMEST(COUNT,PERCN,AVG100) ; --
; Description: This function will return a time estimate as to how long the initial data extract will run.
SIZEST(COUNT,PERCN,SIZE) ;
; Description: This function will return a size estimate for the initial data extract.
HDR1 ; --
; Description: Write extract user info.
HDR2(IVMCONST) ; --
; Description: Write extract estimate disclaimer
CLEAR(IVMARRAY) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This job has been queued. The task number is "_ZTSK_"."
  • Line Location: EN+63
Function Call: WRITE
  • Prompt: !,"Unable to queue this job."
  • Line Location: EN+64
Function Call: WRITE
  • Prompt: *7,!,"You must have a valid DUZ defined before running this routine!"
  • Line Location: ENV+12
Function Call: WRITE
  • Prompt: !,?7,"Estimated number of patients to be processed: "_X
  • Line Location: EST+22
Function Call: WRITE
  • Prompt: !,?7,"Estimated time of extract: "_$P(X,"^",1)_" Hours "_$P(X,"^",2)_" Minutes"
  • Line Location: EST+25
Function Call: WRITE
  • Prompt: !,?7,"Estimated amount of disk space (bytes): "_X
  • Line Location: EST+28
Function Call: WRITE
  • Prompt: !
  • Line Location: EST+29
Function Call: WRITE
  • Prompt: !!,"> > > E N R O L L M E N T D A T A E X T R A C T"
  • Line Location: HDR1+6
Function Call: WRITE
  • Prompt: !!,?5,"This job will loop through the Patient (#2) file to find patients"
  • Line Location: HDR1+7
Function Call: WRITE
  • Prompt: !,?5,"that meet the enrollment extract selection criteria.",!
  • Line Location: HDR1+8
Function Call: WRITE
  • Prompt: !,?5,"Due to the high integration with the Patient (#2) file, please"
  • Line Location: HDR1+9
Function Call: WRITE
  • Prompt: !,?5,"queue this job to run at non-peak hours.",!
  • Line Location: HDR1+10
Function Call: WRITE
  • Prompt: !,?15," * * * * * P L E A S E N O T E * * * * *"
  • Line Location: HDR2+9
Function Call: WRITE
  • Prompt: !,?5,"The following time and space estimates are based on the approximate"
  • Line Location: HDR2+10
Function Call: WRITE
  • Prompt: !,?5,"number of patients in your database. Of those patients, it is assumed"
  • Line Location: HDR2+11
Function Call: WRITE
  • Prompt: !,?5,"that approximately "_IVMCONST("PERCNT")_"% will meet the requirements to be included in"
  • Line Location: HDR2+12
Function Call: WRITE
  • Prompt: !,?5,"the extract. Also, the time estimate provided does not account for"
  • Line Location: HDR2+13
Function Call: WRITE
  • Prompt: !,?5,"the speed of your system or the load on your system.",!
  • Line Location: HDR2+14
Info |  Source |  Entry Points |  Interaction Calls