revise the procedure to create a file if not exist