Routine: XUEPCSRT

Information

XUEPCSRT ;FO-OAKAND/REM - EPCS Utilities and Reports; [5/7/02 5:53am] ;08/06/2012

Name	Comments	DBIA/ICR reference
PRESCBR(XUSD0)	;called from print option - XU EPCS PRIVS
PRIVS(XUSD0)	;called from print option - XU EPCS PRIVS
XT30(XUSD0,ACT)	;called from print option - XU EPCS XDATE EXPIRES
RPT1	;ePCS report - setting or modifing to logical access controls.
RPT2	;ePCS report - allocation history for PSDRPH key
PSDKEY	;Allocated/de-allocate the PSDRPH key option
ASK(TYPE,NAME)	;Ask user if Allocate/De-allocate - returns y/n
RECORD(LINE,NOW)	;Record the edited data into audit file #8991.7
VUSER1(XUSD0,ACT)	;called from option - XU EPCS DISUSER EXP DATE,XU EPCS EXP DATE
VUSER2(XUSD0,ACT)	;called from option - XU EPCS PRIVS,XU EPCS DISUSER PRIVS

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"DEVICE NOT DEFINED! Set the parameter XUEPCS REPORT DEVICE." Line Location: RPT1+11
Function Call: WRITE	Prompt: !!,"DEVICE NOT DEFINED! Set the parameter XUEPCS REPORT DEVICE." Line Location: RPT2+11
Function Call: WRITE	Prompt: !,"You don't have privileges. See your package coordinator or site manager." Line Location: PSDKEY+4
Function Call: WRITE	Prompt: !,"PSDRPH key does not exist" Line Location: PSDKEY+5
Function Call: WRITE	Prompt: !,"Nothing done..." Line Location: PSDKEY+9
Function Call: WRITE	Prompt: $C(7)," ??",!,"Please enter 'Y' or 'N'" Line Location: ASK+7