How to run this assembler in rexx

satya12 · New User Joined: 25 Apr 2006 Posts: 32 Location: India

Hi all

I am coding a rexx program where i have to allocate a dataset.There's a chance that this dataset might be locked to another user who has exclusive access to that and it'll get freed eventually.Is there any option in ALLOC commnad like "WAIT" so that program will wait until resource get released or do i need do verify the resource status using SYSDSN RC and ALLOC RC in infitinite loop.I know infinite is not a good idea since im buring CPU time.Any thoughts here.

I came accross an assemmbler routine which uses "STIMER" option to get the program instructions out of real storage for specified period of time and we can run this using rexx.

Any idea about how to run this assembler in rexx.

Thanks for the help
Satya

jon_s_rice · Posted: Wed May 17, 2006 4:22 am

You can find a sleep routine on the internet.

satya12 · New User Joined: 25 Apr 2006 Posts: 32 Location: India

Hi

I have the sleep routine with me but not sure how to call it in REXX.You have any sample code with you and can you tell me the steps to execute it.

Thanks
Satya

jon_s_rice · Posted: Wed May 17, 2006 6:03 pm

if bpxwdyn('alloc fi(sdsfdd) new space(5,5) cyl',
'msg(2)')<>0 then do
say 'Temp data set allocation failed'
address syscall 'sleep 6'
return
end

satya12 · New User Joined: 25 Apr 2006 Posts: 32 Location: India

Hello jon_s_rice

Thank you very much.Its working.You are my Man.Now i have one more question.I have written a rexx script to display my own ISPF panel.If run this rexx in batch the panel is not getting diplayed.Is there anyway we can display panel using rexx through batch.

Thanks
Satya