Fetch RRN(file)Field with all other fields

[Peetluka]

Hey All !

Can i fetch the RRN(file)-information from the record with all other fields of the database-record ?

F.ex.
select *, rrn(file) from file where a = :fielda


I've test it on command-line-sql, but i't didn't work !

Thanks !

Peet

[arrow483]

Re: Fetch RRN(file)Field with all other fields

The rrn(file) is OK. Its the * that doesn't like other fields on the same line.

[jamief]

Re: Fetch RRN(file)Field with all other fields

so just select the fields by name

SELECT rrn(a) as recordNumber , AASL#, AASLNM FROM aracust A ORDER  
BY recordnumber 

[B.Hauser]

Re: Fetch RRN(file)Field with all other fields

Hi,

How about this:

Select MyFile.*, rrn(MyFile) 
    from MyFile 

or

Select rrn(a), a.*
   from MyFile a 

Birgitta

[jamief]

Re: Fetch RRN(file)Field with all other fields

Birgitta - Thanks once again!

[DeadManWalks]

Re: Fetch RRN(file)Field with all other fields

Thats nice!!

[Mercury]

Re: Fetch RRN(file)Field with all other fields

Birgitta,
I may be wrong but I believe that your examples in your last post don't work on a FETCH stm, i.e. you can't retrieve all together the RRN and all the fields using * on the same SELECT stm.

[B.Hauser]

Re: Fetch RRN(file)Field with all other fields

Hi,

it will work on a Fetch or Select ... into Statement, but you need two fields or a field (for the relative record no) and a data structure to receive the whole record.

D EDSMyFile     E DS                  ExtName(MyFile)  
D RRNMyFile       S             10I 0

C/EXEC SQL
C+   Select RRN(a), a.*
C+      into :RRNMyFile, :EDSMyFile 
C+      From MyFile a ....
C/End-Exec

C/EXEC SQL
C+ Fetch Next From MyCursor into :RRNMyFile, :EDSMyFile
C/End-Exec 

Birgitta

[Mercury]

Re: Fetch RRN(file)Field with all other fields

Yes it does work... My bad. I can't remember why I had the feeling it was not working. Thanks Brigitte.

[Peetluka]

Re: Fetch RRN(file)Field with all other fields

Perfekt, Birgitta, Danke schön !!
(perfect, birgitta, thank you !)

Hi,

it will work on a Fetch or Select ... into Statement, but you need two fields or a field (for the relative record no) and a data structure to receive the whole record.

D EDSMyFile     E DS                  ExtName(MyFile)  
D RRNMyFile       S             10I 0

C/EXEC SQL
C+   Select RRN(a), a.*
C+      into :RRNMyFile, :EDSMyFile 
C+      From MyFile a ....
C/End-Exec

C/EXEC SQL
C+ Fetch Next From MyCursor into :RRNMyFile, :EDSMyFile
C/End-Exec 

Birgitta

[gcraill]

Re: Fetch RRN(file)Field with all other fields

Thanks Birgitta - another great example bookmarked ....