|
View previous topic :: View next topic
|
| Author |
Message |
sunilmfs
New User
Joined: 09 Nov 2010
Posts: 20
Location: hyderabad
|
|
|
|
Hi ,
I want to compare program which is in different PDS.by using 3.13 SuperC option we can compare. but my requirement is to compare the code from coloumn 7 to 72 only.please help me |
|
| Back to top |
|
 |
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8697
Location: Dubuque, Iowa, USA
|
|
|
|
| Why not use the ISPF help facility, which is quite extensive? Hint: look at CMPCOLM. |
|
| Back to top |
|
|
chandracdac
New User
Joined: 15 Jun 2007
Posts: 92
Location: bangalore
|
|
|
|
You can use the edit statements in 3.13 . Goto options tab in 3.13 and select edit statements and follow the instructions written over there.
Thanks,
Chandra. |
|
| Back to top |
|
|
sunilmfs
New User
Joined: 09 Nov 2010
Posts: 20
Location: hyderabad
|
|
|
|
Thanks a lot!!! Option is working fine..i need a rexx utility in that i need give input PDS names and Program name , utility should compare 7 to 72 only...
Thanks |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
| Why REXX when the functionality already exists using 3.13 |
|
| Back to top |
|
|
chandracdac
New User
Joined: 15 Jun 2007
Posts: 92
Location: bangalore
|
|
|
|
Yes why do we need REXX code for comparison. If you want to re use the code by changing the datasets only then just do the same thing as batch job( i mean submit 3.13 as batch job).
Thanks,
Chandra |
|
| Back to top |
|
|
sunilmfs
New User
Joined: 09 Nov 2010
Posts: 20
Location: hyderabad
|
|
|
|
| Ok |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
for crying out loud!
| Code: |
Listing DSN . . . . 'TTGI.BRENHOD.SUP315.COBOL'
Process Options . .ANYC
Statements Dsn . . . 'TTGI.BRENHOD.SRCHPARM(CMPCOLS)'
Update DSN . . . . .
|
in the statements dsn line, enter a pds member name (or ps file) which has the
cmpcols, (as well as any other statements you want). here is a partial list,
PF1 in 3.13 and enter and then 8 and enter (twice)
| Code: |
Line-Compare:
CHNGV CMPCOLM CMPCOLMN CMPCOLMO CMPLINE CMPSECT COLHEAD
DPLINE DPLINEC LNCT LSTCOLM NCHGT NEXCLUDE NFOCUS NTITLE
NY2AGE NY2C NY2D NY2P NY2Z OCHGT OEXCLUDE OFOCUS
OTITLE OY2AGE OY2C OY2D OY2P OY2Z REVREF
SELECT SLIST Y2PAST ".*" "*"
Word-Compare:
CHNGV CMPCOLM CMPCOLMN CMPCOLMO CMPLINE DPLINE
DPLINEC LNCT NCHGT NTITLE OCHGT OTITLE REVREF
SELECT SLIST ".*" "*"
Byte-Compare: File-Compare:
CHNGV CMPBOFS LNCT LNCT NEXCLUDE NFOCUS
NTITLE OTITLE NTITLE OEXCLUDE OFOCUS OTITLE
SELECT SLIST ".*" "*" SELECT SLIST ".*" "*"
|
there is also the process option input area, where you enter the options.
Found by PF1, enter, 7 and enter (twice)
| Code: |
1 Line-Compare:
ALLMEMS ANYC APNDLST APNDUPD CKPACKL CNPML COBOL COVSUM DLMDUP
DLREFM DPACMT DPADCMT DPBLKCL DPCBCMT DPCPCMT DPFTCMT DPMACMT DPPLCMT
DPPSCMT FMVLNS GWCBL LOCS LONGLN MIXED NARROW NOPRTCC NOSEQ
NOSUMS REFMOVR SEQ UPDCMS8 UPDCNTL UPDLDEL UPDMVS8 UPDPDEL UPDREV
UPDREV2 UPDSEQ0 UPDSUMO WIDE Y2DTONLY
2 Word-Compare:
ALLMEMS ANYC APNDLST APNDUPD CKPACKL COBOL COVSUM
DPACMT DPADCMT DPBLKCL DPCBCMT DPCPCMT DPFTCMT DPMACMT DPPLCMT DPPSCMT
GWCBL LOCS MIXED NOPRTCC NOSEQ NOSUMS SEQ
UPDCNTL UPDREV UPDREV2 UPDSUMO XWDCMP
3 Byte-Compare: 4 File-Compare:
ALLMEMS APNDLST APNDUPD COVSUM ALLMEMS APNDLST COVSUM FMSTOP
NOPRTCC NOSUMS LOCS LMCSFC LOCS NOPRTCC
UPDCNTL UPDSUMO
|
I often use ANYC because I work with idiots that sometimes write code in all caps, and then decide to use CamelScript,
which makes comparing files/source code a real pain in the butt.
LEARN ABOUT YOUR TOOLS
this is the second stupid comment about writing rexx tools,
to do something that is already available. |
|
| Back to top |
|
|
valyk
Active User
Joined: 16 Apr 2008
Posts: 104
Location: South Carolina
|
|
|
|
| dbzTHEdinosauer wrote: |
| because I work with idiots |
Made me  |
|
| Back to top |
|
|
don.leahy
Active Member
Joined: 06 Jul 2010
Posts: 765
Location: Whitby, ON, Canada
|
|
|
|
You can also use the ISPF Edit COMPARE subcommand.
I use it all the time when I want to merge changes from another version of the program I am working on. |
|
| Back to top |
|
|
|
|
