XUXTADPRT1 ;ESL/JAC/CM - UTL Printing subroutines & extrinsics #1 ; 06/26/2020@9:30
Source file <XUXTADPRT1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GXDATE(AXUXTADDATE,AXUXTADTIME,AXUXTADSECS,AXUXTADFORMAT) | ||
| DIERR(AXUXTADWIDTH,AXUXTADLFTMAR,AXUXTADMSGROOT,AXUXTADFRMRTN,AXUXTADNOPAUSE) | ||
| FMDATE() | ||
| FMNOW() | ||
| CNVDT | ||
| TOLW(AP) | ||
| FMDIFF(ATIMEEND,ATIMEBEG,ADS) | ||
| GETS(ADIQGR,ADA,ADR,ADIQGPARM,ADIQGTA,ADIQGERRA,ADIQGIPAR) | ||
| CENTER(XUXTADTEXT,XUXTADLF,XUXTADRM,XUXTADRVIDEO) | ;
 ; Line feed, then write heading (or any text) centered. Optionally ; display the text in reverse video.  | 
|
| CONTINUE(XUXTADLF,XUXTADTYPE) | ; Variations of Press <ENTER> to continue.
 | 
|
| INITPRT | ; Initialize printed report variables
 | 
|
| LINEWRAP(XUXTADVALUE) | ; Turn line wrapping off or on ; Used for data extraction
 | 
|
| NODATA(XUXTADLF) | ; Use for printouts when no data is in ^TMP global
 | 
|
| PAGEBRK(XUXTADRTN,XUXTADPG,XUXTADCHKSL,XUXTADNEWPG) | ; Generic page break logic
 | 
|
| PROCTIME(XUXTADTIMEBEG,XUXTADTIMEEND) | ; Display the amount of processing time for the rpt
 | 
|
| REVVIDEO(XUXTADVALUE) | ; Turn REVERSE VIDEO on or off depending upon ENVALUE
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  |