Writing file causes GPF error

The following code will generate the pages.  I have to press 'No' to a
GPF error because I am having to use Close rather than
Filemanager.Close()   I can't seem to get the module to work
correctly.  What is wrong?  I am about to rewrite in VB and leave
Clarion due to some of the problems and annoyances I keep running
into.

C5.5.08
~~~~~~~~~~~~~~~~~~~~~~~~~
loop picval = 2 to glo_pages
  ASCFILENAME = 'C:\temp\' & Clip(glo_stock_no) & '_' &
format(picval,@[EMAIL PROTECTED]
) & '.htm'

  Open(ASCFile)             !  create filename to store html code to
  IF ERRORCODE() = 2        ! File doesn't exist
     CREATE(ASCFile)
     open(ASCFile)
  END

! Code for Heading on subpages
! Code for proper picture on the page
! Code for 2 Hover Buttons
! Code for Footer - End of Page

  close(ascfile)

end ! loop

!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ End of Subpages generator


!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Start of Main Page generator

! Code Variable Setup
! create file name to store main html code to

  Open(ASCFile)             !  create filename to store html code to
  IF ERRORCODE() = 2        ! File doesn't exist
     CREATE(ASCFile)
     open(ASCFile)
  END

! Code for common stuff on page top
! Code for full rows, Do full rows
! Code for last row
! Code for 3 hover buttons, common from here on
! Footer


  close(ascfile)


! Update generation field on vehicle record
VEH:Generated= Today()
Display