DELETE RIGHTSLIST_RECORD;
REDEFINE RECORD RIGHTSLIST_RECORD USING
01 RIGHTSLIST.
	03 KGB_IDENTIFIER USAGE LONG.
	03 KGB_ATTRIBUTES USAGE LONG.
	03 KGB_HOLDER1 USAGE LONG.
	03 KGB_HOLDER2 USAGE LONG.
	03 KGB_NAME PIC X(32).
	03 KGB_LEVEL USAGE WORD.
	03 FILLER PIC X(2).
	03 KGB_SYSID1 USAGE LONG.
	03 KGB_SYSID2 USAGE LONG.
	03 KGB_NEXT_ID USAGE LONG.
;