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

["Sengupta, Rajib (CAG-CC-Contractor)" <Rajib.Sengupta@conagrafoods.com>]

do some trimming and display:

let $full_name = RTRIM($full_name, ' ')     
display $full_name                
         
open $full_name as 2
    for-writing
    record=900:vary status=#filestatus
Then put:
if #filestatus != 0 
  display "error message"
else
  process...

by this way you will be sure that while opening the file it is erroring out..
then go back to check the file .
Check whether file already exits or not etc..depending on O/s it might 
overwrite or might cause open error.
rajib

Rajib Sengupta
Systems Analyst and Team Lead
Peoplesoft Financial Consultant
Conagra Business Systems
Phone: 402-595-5749


-----Original Message-----
From: Ben Anderson [mailto:pegandersonbd1@hotmail.com]
Sent: Tuesday, July 15, 2003 10: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