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

Package: Lab Service

Routine: LRJSAU2


Information

LRJSAU2 ;ALB/GTS/DK/TMK - Lab Vista Audit Utilities;08/16/2010 15:53:28

Source Information

Source file <LRJSAU2.m>

Entry Points

Name Comments DBIA/ICR reference
KILL ;Kill off build data
LISTHLMM(LRHLARY) ; Store audit information in the display array
; INPUT -
; LRHLARY - Array of raw extract data
CRTRPTAR(LRHLARY,LRFROM,LRTO,LROUTPT,LRMMARY) ; Store info in the display array
; INPUT -
; LRHLARY - Array of raw extract data
; LRFROM - Start date for report
; LRTO - End date for report
; LROUTPT - "DISPLAY" for Listman; "MAIL" for mail message
; LRMMARY - Mail message output array
;
TSKMMARY(AUTYP,AUDES,AUFMT) ;TASKMAN API for Mail Message array
TSKERR ; Error trap to send bulletin if queued report encounters a system error
CRTMMARY(LRHLARY,AUTYP,AUDES,AURTN,LRMMARY) ;Load Mail Message array
SNDMSG(LRMSUBJ,XQSND,LRMSGARY,LRTOMM,LRTASK) ;Send message to requestor
CRTXTMM(LRHLARY,AUTYP,AUDES,AURTN) ;Load Mail Message array
SNDEXT(LRMSUBJ,XQSND,LREXTARY) ;Send extract to requestor
OUTLKARY(LRHLARY,LRHLOTLK,LRMSUBJ) ;Create array of attachments
UUBEGFN(LRFILENM) ; Construct uuencode "begin" coding
; Call with LRFILENM = name of uuencoded file attachment
ENCODE(LRSTR,LRDTANOD,LRHLOTLK) ;Encode a string, keep remainder for next line
UUEN(STR) ; Uuencode string passed in.
PARAMED(AUTYP,AUDES) ;Edit the Dates referenced by tasked Option "LRJ SYS MAP [autyp] TASKMAN RPT"

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?10,"First invoke ""DF"" option"
  • Line Location: CRTMMARY+19
Function Call: WRITE
  • Prompt: !,?10,"First invoke ""DF"" option"
  • Line Location: CRTXTMM+8
Function Call: WRITE
  • Prompt: !!,"Lab "_AUDES_" Audit extract dates record the report dates"
  • Line Location: PARAMED+10
Function Call: WRITE
  • Prompt: !," for the last extract created by the LRJ SYS MAP "_AUTYP_" TASKMAN RPT option."
  • Line Location: PARAMED+11
Function Call: WRITE
  • Prompt: !," The LRJ LSRP "_AUTYP_" LAST END DATE is the start date used by the next execution"
  • Line Location: PARAMED+12
Function Call: WRITE
  • Prompt: !," of the LRJ SYS MAP "_AUTYP_" TASKMAN RPT option.",!
  • Line Location: PARAMED+13
Function Call: WRITE
  • Prompt: !!,"WARNING: Editing the LRJ LSRP "_AUTYP_" LAST END DATE will affect the information"
  • Line Location: PARAMED+14
Function Call: WRITE
  • Prompt: !," reported by the LRJ SYS MAP "_AUTYP_" TASKMAN RPT option. This option makes"
  • Line Location: PARAMED+15
Function Call: WRITE
  • Prompt: !," assumptions about data previously reported based upon this date."
  • Line Location: PARAMED+16
Function Call: WRITE
  • Prompt: !!,"A USER CHANGING THE 'LRJ LSRP "_AUTYP_" LAST END DATE' MUST UNDERSTAND THE RESULT"
  • Line Location: PARAMED+17
Function Call: WRITE
  • Prompt: !," OF THE CHANGE MADE AND RECONCILE THE REPORTS CREATED AGAINST THE PREVIOUS"
  • Line Location: PARAMED+18
Function Call: WRITE
  • Prompt: !," REPORT CREATED!",!!
  • Line Location: PARAMED+19
Function Call: WRITE
  • Prompt: !!,"-------------------------------------------------------------------------------"
  • Line Location: PARAMED+22
Info |  Source |  Entry Points |  Interaction Calls