* 			:---------------------------------------
      * ------------------------: CopyBook for CreatDirectory
      * 			: This api is used to create a directory
      * 			: given a directory name.
      * 			:
      * 			: Also, unlike most Compiler utilities,
      * 			: this API will create an entire tree
      * 			: structure up to and including the
      * 			: final directory, even if the higher
      * 			: nodes do not yet exist. This obviates
      * 			: the need to build successivly deeper
      * 			: nodes with multiple calls.
      * 			:---------------------------------------
      *
      * 			:Client Server:-------------------------
      * 			: You may use this in all applications
      * 			: but will find it essential for make
      * 			: new directories on the CLIENT when the
      * 			: application is running under the
      * 			: client server layer.
      * 			: To force it to run on the server side
      * 			: you can include this line:
      * 			:  SET WIN32API-EXECUTE-API-ON-SERVER
      * 			:	    TO TRUE.
      * 			:---------------------------------------
      *  To use:
      *
      *    COPY WIN32API.
      *    COPY CREATDIR.
      *       .
      *       .
      *
      *    MOVE 'C:\PROGRAM FILES\MY APPLICATION\SAMPLES'
      * 	 TO CREATEDIRECTORY-NAME
      *
      * ------------------------: Call the GUI ScreenIO API routine:
      *
      *    SET API-CREATEDIRECTORY TO TRUE
      *    CALL 'GSWINAPI' USING WIN32API-PARMS
      * 			 CREATEDIRECTORY-NAME
      * 			 DUMMY
      * 			 DUMMY
      * 			 DUMMY
      * 			 DUMMY
      * 			 DUMMY
      *
      *    IF WIN32API-FAILED
      *      -- invalid directory name or non-existant drive letter
      * 	or invalid path strucutre or no rights to create...
      * 	WIN32API-ERROR-CODE will contain actual code from	050121ja
      * 	microsoft						050121ja
      *    END-IF
      *
      * ----------------------------------------------------------------
      *
       01  CREATEDIRECTORY-NAME 	  PIC X(255).