The sample report below is based on a request developed by Fausto Caceres at Los Angeles to process changes for active Graduate Assistants (class 2325, 2326, and 2355) whose time base and salary must be amended per a side-letter agreement between the USA and the CSU. For complete information, please refer to technical letter HR/EHDB 2005-10 on the Systemwide HR web site.
SOC DOC NEW NEW SEC POSIT TRAN PROC EFF TIME BASE NBR NBR CODE NBR DATE EH REMARKS BASE PAY --- -------- ---- --- ---- ---------- ---- ---- 123-45-6789 000-111-2325-001 405 0010 08/02/2005 HR/SA 2005-10 001002 $1,800.00 |
Note: The actual report contains additional fields that could not be displayed here due to the width.
The report request is available in the CIRS Common Library as FOC5006 and uses several defines to create new fields. The report can be used as-is from the common library, or copied to your personal library and modified (e.g., add or delete fields, format for downloading purposes, etc.). Please refer to the comments in the request for additional information.
EX AC
DEFINE FILE AC ADD
-*THE DEFINES BELOW ARE TEXT FIELDS TO BE PRINTED FOR EACH SELECTED RECORD
TRANCODE/A3 = '405';
EFFDATE/A10 = '08/02/05';
REMARKS/A14 = 'HR/SA 2005-10';
-*THE DEFINES BELOW CONVERT THE OLD TIME BASE TO THE NEW TIME BASE
TIMEBASE/A6 = IF AC:TIMEBASE EQ 'FT' THEN '0001001' ELSE AC:TIMEBASE;
OLDNUM/A3 = EDIT (TIMEBASE, '999$$$');
OLDDEN/A3 = EDIT (TIMEBASE, '$$$999');
NEWDEN1/I3 = EDIT (OLDDEN);
NEWDEN2/I3 = NEWDEN1*2;
NEWDEN3/A3 = EDIT(NEWDEN2);
NEWTB/A6 = OLDNUM|NEWDEN3;
-*THE DEFINE BELOW CALCULATES THE NEW BASE PAY
NEWBP/P12.2M = AC:BASEPAY*2;
END
-*
TABLE FILE AC
PRINT AC:SSA AS 'SOC,SEC,NBR'
AC:POSIT16 AS 'POSIT,NBR'
AC:DOCT AS 'DOCT,PROC,NBR'
TRANCODE AS 'TRAN,CODE'
EFFDATE AS 'EFF,DATE'
REMARKS AS 'EH REMARKS'
AC:TIMEBASE AS 'OLD,TIME,BASE'
NEWTB AS 'NEW,TIME,BASE'
AC:BASEPAY AS 'OLD,BASE,PAY'
NEWBP AS 'NEW,BASE,PAY'
IF AC:CLASS EQ 2355 OR 2325 OR 2326
IF AC:SEPCODE EQ ' '
END
Last Updated: March 1, 2024