Cant get binary files to work

[WSinc]

I was trying to write a binary file, but it wont let me input a record number.

Why does NONE of the categories apply here above ?

It says "inconsistent with the way I opened it.

subroutine **bleep**up
integer(4) pr(6000)
open(2,file='**bleep**up2.dat',form='binary',  recl=6000)
do 10 irec=1,100
10 write(2,rec=irec)pr
rewind 2
do 20 irec=1,100
read(2,rec=irec)pr
20 print *,"rec ",irec," read"
pause
end

[Caguicla_Intel]

Hello WSinc,

Thank you for posting in Intel Ethernet Communities and we sincerely apologize for the delay on our response. We are now done with the system upgrade and we will be glad to continue assisting you.

Please share the model of the product you are requesting for an assistance so we can check on your query. 

Hoping to hear form you soon.

Should there be no reply, we will follow up after 3 business days. 

Best regards,

Crisselle C

Intel® Customer Support

[Caguicla_Intel]

Hello WSinc,

Good day!

We'd like to follow up the requested information for us to proceed checking your request. If you have any other assistance needed, feel free to let us know. 

Looking forward to your reply.

We will follow up after 3 business days in case we don't hear from you.

Best regards,

Crisselle C

Intel® Customer Support

[Caguicla_Intel]

Hello WSinc,

How are you today?

Please be informed that we will now close this request since we haven't received any response from our previous follow ups. If you need any additional information, please submit a new question as this thread will no longer be monitored. 

Best regards,

Crisselle C

Intel® Customer Support