6 FMSFRMFED200 7-AUG-1990 10:32:19 7-AUG-1990 10:32:19þ  ††% & 20'PJ SD_CREATE  ' @DOCNAME       .TYPE ARG /OVERLAY @ .TYPE1/HARD='Shared Document (create) selection screen' $ DOCNAME/PUT_SAVE=#SD_CURDOC P DOCNAME@/VALID=<.IF OA$DIR:"SHARED_LIBRARY:*.WPL".%WHOLE[DOCNAME] EQS "" \ DOCNAMEL THEN OA$VAL_SET_VALID ELSE DISPLAY A document with this name already exists : DOCNAME*/RECOG=OA$DIR:"SHARED_LIBRARY:*.WPL;".NAME  Document Name: H CEnter the name of the document you wish to create and press RETURN