Option for tracking code during compiling

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'

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

If you've multiple DISPLAYs for Identification division, that means You've run the macro "ADDDISP" multiple times - each run will add one DISPLAY line unless you delete using other macro posted in the thread earlier.

Anuj Dhawan · Posted: Fri Jun 11, 2010 4:09 pm

One sec, with the macro you are using you won't get DISPLAY line added for IDENTIFICTION DIVISION, it'll add DISPLAY only for paragraph names! I'm confused!

enrico-sorichetti · Posted: Fri Jun 11, 2010 4:10 pm

the topic is going down the sink! waste of time for everybody

I wonder if it would be better to lock it or just delete it

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

Well, another observation... when i did NUM ON STD COB...i got displays like this

IDENTIFICATION DIVISION.
DISPLAY 'IDENTIFICATION DIVISION'
PROGRAM-ID. QQQQQQQ.
DISPLAY 'PROGRAM-ID'

but when i did NUM OFF and ran the macro...i got displays only at the start of the para....and its working fine now...

Thanks for all your support

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

Guys, thanks for your support, for new comers i would say...this helped me a lot..

TSO rexxname doesnot work...as this was an EDIT macro...we just need to Put REXXname after opening the member and doing NUMOFF...