RE: [sqr-users] write 1 from $1 -> in header

["Mezzullo, Paul" <pmezzull@esboces.org>]

Ben,

Try placing an error condition in your 'file opening code' to verify the 
files status, I've included my working example code below for you -->



!******************************************
! PROCEDURE: open_File                          ((Procedure))  
!******************************************
! open file for writing 
!******************************************
begin-procedure open_File
  open 'c:\file.txt' as 10 
  for-writing 
  ! len was 73
  record=150:Fixed   
  status = #open1
  if #open1 = -1 
    display 'Open File Error'
    stop quiet 
  end-if
end-procedure open_File






-----Original Message-----
From: Ben Anderson [mailto:pegandersonbd1@hotmail.com]
Sent: Tuesday, July 15, 2003 11:32 AM
To: sqr-users@sqrug.org
Subject: [sqr-users] write 1 from $1 -> in header


I'm writing to a flat file and getting this error when I try to write in the

BEGIN-HEADING section:
   (SQR 3202) Specified file number not opened for writing.

I've tried putting this:

  open $full_name as 2
    for-writing
    record=900:vary

in the HEADING and at the very beginning of BEGIN-REPORT, but it just errors

on different line numbers.  I also tried switching BEGIN-REPORT to 
BEGIN-PROGRAM.  Any guidance?

Thanks,
Ben Anderson

_________________________________________________________________
MSN 8 with e-mail virus protection service: 2 months FREE*  
http://join.msn.com/?page=features/virus

_______________________________________________
sqr-users mailing list
sqr-users@sqrug.org
http://www.sqrug.org/mailman/listinfo/sqr-users

_______________________________________________
sqr-users mailing list
sqr-users@sqrug.org
http://www.sqrug.org/mailman/listinfo/sqr-users