Re: Writing Flat Files with SQR

[Sam Spritzer <SSpritzer@GW.CTG.COM>]

Joe...
You didn't show the Close-File procedure but within it should be
CLOSE 1

Sam

<<< Joe <jejohn1216@SURFREE.COM>  8/24 12:35p >>>
This is a follow-up to my earlier post about viewing LIS files with Excel -- Thanks to all who helped me out!

I am getting the error message:

'Specified file number not opened for writing.' when I run my SQR with the logic in it to create a TXT file with delimiters.  I have the following logic in the SQR:

   #DEFINE Del         ';'            ! After the #include statements

   LET $GMExecFile='ZFS04014.txt'     !In Begin-Report
   OPEN $GMExecFile as 1 For-Writing Record=500 Status=#OpenStat   !In Begin-Report

   DO Write-Output-Record             !In Begin-Report
   DO Close-File                      !In Begin-Report

begin-procedure Write-Output-Record
Write 1 From                          !This line brings the error

  $tl_cust_name        {Del}
  $tl_cust_id          {Del}
  $tl_product          {Del}
  $tl_project_id       {Del}
  $descr               {Del}
  $spn_sales_person

end-procedure !Write-Output-File

I have gone over the chapter in SQR in PeopleSoft dealing with this, and I have studied all the responses I got from my earlier post. I can't see what is missing or wrong here.

Help!?!

TIA Much!

Joe Johnson
jejohn1216@surfree.com

__________________________________________
$14.95 a month Unlimited Internet Access.
Get your first month for $1.00.
http://www.surfree.com/promo