View previous topic :: View next topic
|
Author |
Message |
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Then it is probable that the REXX macro code is NOT in a library concatenated to either SYSPROC or SYSEXEC. |
|
Back to top |
|
|
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 |
|
Back to top |
|
|
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. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
So, what is changed from your previous run to last execution? |
|
Back to top |
|
|
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' |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
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. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
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! |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
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 |
|
Back to top |
|
|
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 |
|
Back to top |
|
|
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... |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
Quote: |
we just need to Put REXXname after opening the member and doing NUMOFF |
general consideration on the code/jcl snippets posted
the samples posted are just that... samples that supposedly work in the environment in which they were developed
( most often quick and dirty, no error checking, untold assumptions )
see the NUMBER OFF/ON issue
it is the responsibility of the <user> of the sample to understand properly the code posted
and verify/understand the untold assumptions
|
|
Back to top |
|
|
karz
New User
Joined: 04 Feb 2010 Posts: 39 Location: Mumbai
|
|
|
|
Some old modules have the para names starting from 9 and 10th position also. This rexx doesnot add the display for such modules... What modification do we need to do to the rexx for such a scenario? |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Modify the code to accomodate all of the possible conditions. . . |
|
Back to top |
|
|
karz
New User
Joined: 04 Feb 2010 Posts: 39 Location: Mumbai
|
|
|
|
How to add full stop after the display statement...all the display without with '.' |
|
Back to top |
|
|
karz
New User
Joined: 04 Feb 2010 Posts: 39 Location: Mumbai
|
|
|
|
Folks, the repl to the question i asked is by this syntax
"LINE_AFTER .ZCSR = ' DISPLAY '"LINE3"'.'"
If you see the "." after the LINE3, this is used because after running the utility i got compilation errors, which said that
A period was required before procedure-name "AAAA-PROCEDURE NAME".
I got similar error for all the Para names. thats why i modified the above code...hope you find it useful |
|
Back to top |
|
|
karz
New User
Joined: 04 Feb 2010 Posts: 39 Location: Mumbai
|
|
|
|
The REMDISP Rexx is not removing displays...can anyone suggest what can be teh reason... |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Hi Karz,
If you moidify each REXX stmt that issues a COBOL DISPLAY so that it DISPLAYs:
DEBUG~ XXX-PROCEDURE-NAME in place of XXX-PROCEDURE-NAME
You can then use ISPF cmds to get rid of the procedure names displayed in the COBOL code, e.g.
x all;f all debug~;del all nx
It might be wise to check before you delete. |
|
Back to top |
|
|
|