.title	'Folder Create Action Routine'
;
;
;		F O C R E . S B L
;
;

;	Ver/Edit	 Edit Date	By	Reason
;
;	V1.0-00A
;

SUBROUTINE	FOCRE
%REF(USERDATA)	,I4	;Address of an optional longword containing userdata.
FOLDNAME	,A	;Address of a descriptor of the folder name.

RECORD	MISC
STATUS		,I4	;Status returned from call
SUCCESS		,I4,1	;Success

	PROC

	RETURN