Calling LISTC function

[rajesh082]

On issuing this code:-
CTELOG = 'TTZY.LOG'
parse value listc(CTELOG) with rc dsncount

I am getting the following message:-

System abend code 66D, reason code 00000002.
Abend in external function LISTC.
IEA995I SYMPTOM DUMP OUTPUT
SYSTEM COMPLETION CODE=66D REASON CODE=00000002
TIME=16.05.21 SEQ=30851 CPU=0040 ASID=0328
PSW AT TIME OF ERROR 071C0000 8AB67CC6 ILC 2 INTC 0D
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 0AB67CC0 - 41F00002 0A0D5850 B2584160
AR/GR 0: 00000000/00000000_80000005 1: 00000000/00000000_0466D000
2: 00000000/00000000_009F4000 3: 00000000/00000000_00000000
4: 00000000/00000000_0093D768 5: 00000000/00000000_009F3A88
6: 00000000/00000000_00000001 7: 00000000/00000000_00F36700
8: 00000000/00000000_8AB67BF6 9: 00000000/00000000_0000001A

I am not sure what has gone wrong, this used to work perfectly fine before. Can somebody suggest me what is teh problem here.

 

[rexxhead]

I suspect that "LISTC" was a REXX external routine (since there's no way real-LISTC could be called so as to return RC and DSNCOUNT) and that it has been moved, renamed, or deleted, likely the latter.

It is considered very bad practice (did I say 'very'?) to name a user-written routine the same as a system-routine. It may have caused a problem to another user, they complained to the system programmers, and the system programmers corrected the problem.


Frank Clarke
Support the Troops:
-- Bring them home.

http://www.RonPaul2008.com

 

[rajesh082]

Frank,
The LISTC is a this routine is not a a user built routine. It is something which is system provided.

Can you think of any other scenario where this problem could have been generated from?

 

[rexxhead]

If

parse value listc(CTELOG) with rc dsncount

"...used to work perfectly fine before" then you were not calling the system-provided LISTC when it was working perfectly fine. You can't call the system-provided LISTC as "LISTC(CTELOG)". Can't. You were calling something else with the same name.

Want proof? Issue "tso help listc" and see if you can derive from the system-provided HELP-text a way to call LISTCat the way you originally showed.


Frank Clarke
Support the Troops:
-- Bring them home.

http://www.RonPaul2008.com

 

[rajesh082]

Hi Frank,

The LISTC used here is Provided by OPEN SOFTWARE REXXTOOLS SYNTAX.

http://www.open-softech.com/rxtweb/gi.htm

Could it be that the license of this function has expired or something?

 

[rajesh082]

I have the following Datasets:-
TTOI.RAWATR.EXEC
TTOI.RAWATR.EXEC.BKP
TTOI.RAWATR.EXEC.BKUP
TTOI.RAWATR.EXEC.FUNC

If I Do write:-

ADDRESS TSO                           
"LISTC ENTRIES('TTOI.RAWATR.EXEC.*')"

or

ADDRESS TSO                           
"LISTC LEVEL('TTOI.RAWATR.EXEC')"

Then My OutPut is
TTOI.RAWATR.EXEC.BKP
TTOI.RAWATR.EXEC.BKUP
TTOI.RAWATR.EXEC.FUNC

If I Do Write:-

ADDRESS TSO   
LISTC ENTRIES('TTOI.RAWATR.EXEC')"

Then My output is only
TTOI.RAWATR.EXEC

What Should I write to get the following Out put:-
TTOI.RAWATR.EXEC
TTOI.RAWATR.EXEC.BKP
TTOI.RAWATR.EXEC.BKUP
TTOI.RAWATR.EXEC.FUNC

Any pointers would be very helpful.

 

[rexxhead]

Try

"LISTC ENTRIES('TTOI.RAWATR.EXEC*')"

Frank Clarke
Support the Troops:
-- Bring them home.

http://www.RonPaul2008.com

 

[rajesh082]

"LISTC ENTRIES('TTOI.RAWATR.EXEC*')" 
[/Cde]

Hi Frank,

That should give me only 
TTOI.RAWATR.EXEC

According to the logic of 3.4 Panel, or am i Making some basic mistake here?

 

[Bartym]

Try

"LISTC LEVEL('TTOI.RAWATR.EXEC')" 
[/Cde]

Regards

Barry