! ********************************************************************************************************************************
!  Created: 30-AUG-2007 11:29:31 by OpenVMS SDL IA64-2     
!  Source:  30-AUG-2007 11:29:31 GEM$:[GEMGROUP.SHEILAM.FORSYSDEF.IVMS-V83]ACLEDIT$ROUTINES.SDI;1 
! ********************************************************************************************************************************
 
!*** MODULE ACLEDIT$ROUTINES IDENT X-1 ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !  Access Control List Editor (ACLEDIT) Routine
 ! 
 ! 
 !  ACLEDIT$EDIT - Edit Access Control List
 ! 
 !  status = ACLEDIT$EDIT (item_list)
 ! 
 !   item_list - Itemlist for operation
 ! 
	INTEGER*4 ACLEDIT$EDIT
	EXTERNAL ACLEDIT$EDIT
!DEC$ END OPTIONS