topic Re: CATCH SYSTEM-EXCEPTIONS file_access_errors in Application Development and Automation Discussions

CATCH SYSTEM-EXCEPTIONS file_access_errors

Former Member — Tue, 15 Nov 2005 17:56:35 GMT

Hi,

I use this Exception for checking a file-open like this:

CATCH SYSTEM-EXCEPTIONS file_access_errors = 8.

OPEN DATASET par_file FOR INPUT IN TEXT MODE.

ENDCATCH.

if sy-subrc = 8 ....

But it doesn't work.

System: 4.6c.

I have heard, that these kind of exceptions won't work

in my release.

Is this true?

Michael

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

RichHeilman — Tue, 15 Nov 2005 18:09:04 GMT

That is not a system exception. There is a list of [system exceptions, this is as of 46c|http://wiki.sdn.sap.com/wiki/x/Y4BMCg].

In your cases, you would just check sy-subrc.


OPEN DATASET par_file FOR INPUT IN TEXT MODE.
if sy-subrc = 8 ....
endif.

Regards,

Rich Heilman

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

Former Member — Tue, 15 Nov 2005 18:11:35 GMT

If you do an F1 on 'CATCH', you'll what exceptions can be caught. I didn't see this in either our 4.6C or 4.7 system.

Rob

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

RichHeilman — Tue, 15 Nov 2005 18:14:06 GMT

You might be able to use the system exception....

Catch system-exception DATASET_CANT_OPEN = 1

Regards,

Rich Heilman

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

Former Member — Tue, 15 Nov 2005 18:30:28 GMT

Hi Rich,

Thanks a lot for your answer.

I have tried allready DATASET_CANT_OPEN and

DATASET_READ_ERROR and so on ...

But nothing works as it should.

Sy-subrc is allways 0!

And the point is!

If I try DATASET_CANT_OPEN I will get SY-subrc = 0.

So I am starting DO. ...READ... ENDDO

And when I try there to catch DATASET_READ_ERROR

during the loop a dump occurs! Of course SY_SUBRC == 0,

but in fact it isn't.

If I don't use CATCH/ENDCATCH sy-subrc = 8. Which is ok!

Maybe it is a release problem? (4.6c)

Michael

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

RichHeilman — Tue, 15 Nov 2005 18:37:39 GMT

I always just check sy-subrc when opening a file. It always works for me.



report zrich_0001.

data: begin of ifile occurs 0,
      rec(150),
      end of ifile.

parameters: path(99) type c lower case default '/QDLS/ALH/PACKS.DAT'.

open dataset path for input in text mode.
if sy-subrc <> 0.
  write:/ 'File can not be opened'.
endif.

do.
  read dataset path into ifile-rec.
  if sy-subrc eq 0.
    append ifile.
  else.
    exit.
  endif.
enddo.

Regards,

Rich Heilman

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

Former Member — Tue, 15 Nov 2005 18:37:52 GMT

Hi Rob,

This was the first, what I hve done.

Otherwise I would'nt bother You

Anyway, I used all possible Exceptions include

File_access_errors (this was my last try)

I am using CATCH/ENDCATCH very often. And it works all the time; except the File-Accessing-Eceptions

Michaeö

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

RichHeilman — Tue, 15 Nov 2005 18:39:59 GMT

Of course, as soon as i posted last, my program does work and i am now getting the system exception.

Regards,

Rich Heilman

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

Former Member — Tue, 15 Nov 2005 18:40:27 GMT

Hi Rich,

Thanks, I own You some points

Well, I agree to you, I will do it in the old fashioned way.

If sy-subrc ....

But it would be very interesting to know, why it doesn't work

Michael

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

RichHeilman — Tue, 15 Nov 2005 18:42:00 GMT

Ok, here is the modified code.



report zrich_0001.

data: begin of ifile occurs 0,
      rec(150),
      end of ifile.

parameters: path(99) type c lower case
           default '/usr/sap/TST/SYS/Data1.txt'.

open dataset path for input in text mode.
if sy-subrc ne 0.
  write:/ 'File can not be opened'.

else.

  do.
    read dataset path into ifile-rec.
    if sy-subrc eq 0.
      append ifile.
    else.
      exit.
    endif.
  enddo.


endif.

Regards,

Rich Heilman

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

RichHeilman — Tue, 15 Nov 2005 18:43:53 GMT

This is now also working for me.



report zrich_0001.

data: begin of ifile occurs 0,
      rec(150),
      end of ifile.

parameters: path(99) type c lower case
           default '/usr/sap/TST/SYS/Data1.txt'.

open dataset path for input in text mode.
<b>
catch system-exceptions dataset_cant_open = 1.</b>
  do.
    read dataset path into ifile-rec.
    if sy-subrc eq 0.
      append ifile.
    else.
      exit.
    endif.
  enddo.
<b>endcatch.</b>

<b>if sy-subrc = 1.
write:/ 'File could not be opened'.
endif</b>.

Put the CATCH around the do loop when reading the file.

Please make sure to award points for helpful answers and mark you posts as solved when answered completely. Thanks.

Regards,

Rich Heilman

Message was edited by: Rich Heilman

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

Former Member — Tue, 15 Nov 2005 18:50:29 GMT

Wow!

Thanks a lot.

Michael

Re: CATCH SYSTEM-EXCEPTIONS file_access_errors

RichHeilman — Tue, 15 Nov 2005 18:51:50 GMT

No problem, Again, I never did it this way before, but definitly will in the future. Thanks for teaching me something new.

Regards,

Rich Heilman