[Date Prev][Date Next][Thread Prev][Thread Next]
[Author Index]
[Date Index]
[Thread Index]
[SQR-USERS Info]
[SQRUG Home Page]
Re: Problem Opening a File in SQR
- Subject: Re: Problem Opening a File in SQR
- From: Joan Hudson <joan@MEDIWARE.COM>
- Date: Thu, 27 Aug 1998 09:14:01 -0700
The problem now is that the successful open will
return a 0.
You want to check:
if #Open1 = 0
for success.
joan
>Hi,
> Thankx a lot for the info. I changed it even then it is giving the
>same error.This is what i gave :
>
>!******************************************************
> OPEN $d_file_Location as 1
> FOR-READING
> RECORD=10:fixed
> STATUS=#Open1
>
>if #Open1 != 0
>
>!******************************************************
>
>Could u tell me what the problem now .
>
>bye,
>
>Srini.
>---------------------- Forwarded by Srinivasan Seetharaman/DSI/DBAsia/DeuBa
>on 08/27/98 08:49 PM ---------------------------
>
>
>peterb@sqribe.com on 08/27/98 08:49:24 PM
>
>Please respond to peterb@sqribe.com
>
>To: Srinivasan Seetharaman/DSI/DBAsia/DeuBa
>cc:
>Subject: Re: Problem Opening a File in SQR
>
>
>
>
>Seetharaman,
>Change: if #filestat
>To: if #Open1
>Peter
>On 27 Aug 98, at 20:30, Srinivasan S wrote:
>Date sent: Thu, 27 Aug 1998 20:30:49 +0530
>Send reply to: SQR-USERS@USA.NET
>From: Srinivasan S <srinivasan.seetharaman@DB.COM>
>Subject: Problem Opening a File in SQR
>Originally to: SQR-USERS@usa.net
>To: Multiple recipients of list SQR-USERS
><SQR-USERS@list.iex.net>
>> Hi all,
>> I have a text file , and i'm trying to open the file in SQR, but it
>is
>> always failing.The SQR statement is as follows :
>> !*******************************************************
>> Let $d_file_location = 'c:\tst.txt'
>> OPEN $d_file_Location as 1
>> FOR-READING
>> RECORD=10:fixed
>> STATUS=#Open1
>> if #filestat != 0
>> read 1 into $emplid:10 status=#read_stat
>> if #read_stat != 0
>> print $emplid (+1,1)
>> print $name (+1,1)
>> print 'No Error Reading ' (+1,1)
>> else
>> print 'Error Reading ' (+1,1)
>> end-if
>> else
>> print 'Error Opening' (+1,1)
>> end-if
>>
>> !*******************************************************
>> The above code will always print 'Error Opening' . The text file is in
>the
>> specified path. And this is what it contains :
>>
>> 0000000001
>> 0000000002
>> 0000000003
>>
>> Could anyone tell me where i went wrong.
>>
>> Thankx in Advance,
>>
>> Srini.
>>