PRCHLO4A ;WOIFO/RLL/DAP-EXTRACT ROUTINE CLO REPORT SERVER ;12/30/10 14:58
Source file <PRCHLO4A.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
GETDIR | ; Get directory from PRCPLO EXTRACT DIRECTORY system parameter for CLRS
|
|
CRTWIN | ; Create CLRSxxxWFTP.TXT file to transfer file(s)
|
|
BLDF1 | ; RLL/PRC*5.1*104 added logic to create separate FTP
; transfers (1 for each file) |
|
CKRPTSV | ; Check for availability of report server
; Several steps need to be performed ; 1. Set up script to perform PING ; 2. Capture log file during PING ; 3. Read logfile into working global ; 4. Determine Success/Failure of PING to server ; 5. If successful, continue processing (CLRSERR=0) ; 6. If problem occurs, S CLRSERR=3 and generate message |
|
VMSPING | ; need to PING report server to make sure it is available
|
|
UNXPING | ;PRC*5.1*172 added logic for Full Linux
; UNIX/LINUX PING |
|
WINPING | ; PING report server to make sure it is available
|
|
LOG2FILE | ; Set logfile to global, add to mail message
|
|
FTPCOM | ; Issue the FTP command after CLRSxxxWFTP.TXT file is built
; remain in CACHE during FTP Process using ; $ZF(-1) call |
|
RUNFTPT | ; Run the FTP transfer for Windows
|
|
DELWIN | ; Delete windows files
|
|
DELUNX | ;PRC*5.1*172 added logic for Full Linux
; Delete the FTP files, logs , and .TXT files |
|
DELUNX1 | ;PRC*5.1*172 added logic for Full Linux
; Delete UNIX Files |
|
DELFTPF | ; Delete the FTP files, logs , and .TXT files
|
|
;Builds mail messages to a defined mail group to notify users of the
|
||
MAILFTP | ;Builds mail messages to a defined mail group to notify users of
|
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 |
|
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 |
|
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |