IBM Mainframe Forum

by **samb01** » Tue Mar 20, 2012 3:06 pm

hello,

how can i test an empty member without usin macro edit.

I tried this but it doesn't work...

X = SYSDSN('VSFGT.FTD.KNJ(VGTE)')
SAY 'X =' X
IF X ^= 'OK' THEN
DO
SAY 'EMPTY MEMBER'
END
EXIT

Thank's for your help.

by **MrSpock** » Tue Mar 20, 2012 4:07 pm

I'd stick with the usual method and attempt to read one record.

by **steve-myers** » Tue Mar 20, 2012 7:58 pm

samb01 wrote:hello,

how can i test an empty member without usin macro edit.

I tried this but it doesn't work...

X = SYSDSN('VSFGT.FTD.KNJ(VGTE)')
SAY 'X =' X
IF X ^= 'OK' THEN
DO
SAY 'EMPTY MEMBER'
END
EXIT

Thank's for your help.

Your Rexx exec checks if the dataset and member in the dataset exists, but it does not determine if there is any data in the member. As MrSpock says, in order to determine if there any data in the member, your Rexx exec must actually read the member in some way.

by **samb01** » Tue Mar 20, 2012 8:50 pm

OK, thanks for your answer.

IBM Mainframe Forum

Testing an emptty member

Testing an emptty member

Re: Testing an emptty member

Re: Testing an emptty member

Re: Testing an emptty member