Option for tracking code during compiling

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

i tried the rexx...it is not giving any error but it is not adding any displays to my source..can anyone help me with that

Anuj Dhawan · Posted: Thu Jun 10, 2010 5:56 pm

Well, how did you "try" it?

dbzTHEdinosauer · Posted: Thu Jun 10, 2010 5:58 pm

Anuj,

welcome to 99% of the problem of supplying code to rookies - support!

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

i executed the rexx by TSO TRACEON(i saved the rexx with this name in my SYSproc... it did not give any error ...but it did not insert any displays also

dbzTHEdinosauer · Posted: Thu Jun 10, 2010 6:01 pm

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

i executed some simple rexx like add two numbers and all..they executed well.. but this did not work..iam new to rexx..

dbzTHEdinosauer · Posted: Thu Jun 10, 2010 6:02 pm

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

Did not work after renaming also

dbzTHEdinosauer · Posted: Thu Jun 10, 2010 6:04 pm

rename it to something like ADDDISP

trace and derivatives are reserved words.

dbzTHEdinosauer · Posted: Thu Jun 10, 2010 6:07 pm

my using the term rookies has nothing to do with ethnic background.

is only has to do with experience.

and don't read anything else into my comment.

dbzTHEdinosauer · Posted: Thu Jun 10, 2010 6:54 pm

since this is an edit macro, you do not need (actually you should not)
type TSO macroname
simply type macroname on command line.

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

tried the above thign also..did not work...dont know what is the problem

Anuj Dhawan · Posted: Fri Jun 11, 2010 2:57 pm

When you say, "it did not work" - please tell us what exactly happened?

No display was added?
Macro ended with some error?
Nothing happened?
Something else, if yes, what was that?

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

Nothing happened...no displays added... but no error also..

Anuj Dhawan · Posted: Fri Jun 11, 2010 3:10 pm

Ok, so how did you do it?

In a PDS, opend a COBOL-program in view-mode (to avoid any side effect in start) and on comman-line typed "ADDDISP" and hit enter-key?
Opend some member (not a COBOL program)in view-mode (to avoid any side effect in start) and on comman-line typed "ADDDISP" and hit enter-key?
Were at ISPF START and on comman-line typed "ADDDISP" and hit enter-key?
Something else, if yes, what was that?

dbzTHEdinosauer · Posted: Fri Jun 11, 2010 3:11 pm

insert a TRACE ?R statement in the macro so that you/we can see what is happening.

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

added the member in the pds ...then ALLOC DD(SYSEXEC) DSN('aaa.aaa.aaa') SHR REUSE

then opened the cobol member in view mode and typed TSO ADDDISP and enter...but nothign happened..

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

did a Trace ?R statement in the rexx...but how to see whts the problem with that..for some statements i got RC=20 and for some statements i got RC=1..and later it ended

Anuj Dhawan · Posted: Fri Jun 11, 2010 3:21 pm

Well, Dick has already suggested not to prefix "TSO" as it's an edit macro. Have you tried using TRACE?

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

without TSO and just typing ADDDISP on the command prompt gives invaild command error...used trace and i got rc=20 and rc=1 messages...

expat · Posted: Fri Jun 11, 2010 3:36 pm

Then it is probable that the REXX macro code is NOT in a library concatenated to either SYSPROC or SYSEXEC.

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

if that is the case then "Invalid Command" should be coming.. i tried another simple rexx of adding two numbers and on the command prompt typed TSO Rexxname and it is workign fine..dont know why the ADDDISP rexx is not working for me

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

Guys...somethign got working now...now i got display after IDENTIFICATION SECTION but then got the below error...

Command in error . : LINE_AFTER .ZCSR = 'DISPLAY 'DISPLAY 'IDENTIFICATION

Invalid parameter
Extraneous or invalid parameter was specified for LINE_AFTER command.

Error message ID . : ISRE181

Last return code . : 20

Macro executing . : ADDDISP

Press ENTER key to terminate the macro.

Anuj Dhawan · Posted: Fri Jun 11, 2010 3:53 pm

So, what is changed from your previous run to last execution?

karz · New User Joined: 04 Feb 2010 Posts: 39 Location: Mumbai

Successs... but not entirely... Got all the displays at the PARA...but still the above error persists and also after running the rexx my IDENTIFiCATIOn DIVISION Looks like this

IDENTIFICATION DIVISION.
DISPLAY 'IDENTIFICATION DIVISION'
DISPLAY 'IDENTIFICATION DIVISION'
DISPLAY 'IDENTIFICATION DIVISION'