|
View previous topic :: View next topic
|
| Author |
Message |
gowtham_srgp
New User
Joined: 09 Jun 2005
Posts: 38
|
|
|
|
hai. i've these two queries...
1. how to make a bookmark? i.e; i need to go to a particular line of my member. from there i should return to the original line from where the control was given. Note. I need not perform a particular para. i just want to view that line and return.
2. how to look for a particular word in a specific lines of a member. if there are some 50 lines in my member, i want to look only between 25 and 40. how can this be accomplished?
gowtham |
|
| Back to top |
|
 |
radhakrishnan82
Active User
Joined: 31 Mar 2005
Posts: 435
Location: chennai, India
|
|
|
|
For your first query,
set the tags for your identification like .a,.b and some known names which you can easily remember.
Go to the command line, Issue L .a---goes to the line where .a had been set up as a tag (line number 024549) .
similarly L .b goes to line number 24621.
| Code: |
024530 * *****************************
.A ACCEPT ACCEPT-DATE FROM DATE
024550 MOVE ' START DATE = ' TO XX-DISPLAY.
024560 PERFORM X1-DISPLAY.
024570 MOVE -ACCEPT-DATE TO XX-DISPLAY.
024580 PERFORM X1-DISPLAY.
024590 ACCEPT TIME-CURR FROM TIME
024600 MOVE 'START TIME = ' TO XX-DISPLAY.
024610 PERFORM X1-DISPLAY.
024620 MOVE TIME-CURR TO XX-DISPLAY.
.B PERFORM X1-DISPLAY. |
hoep this helps. |
|
| Back to top |
|
|
gowtham_srgp
New User
Joined: 09 Jun 2005
Posts: 38
|
|
|
|
| radhakrishnan82 wrote: |
For your first query,
set the tags for your identification like .a,.b and some known names which you can easily remember.
Go to the command line, Issue L .a---goes to the line where .a had been set up as a tag (line number 024549) .
similarly L .b goes to line number 24621.
| Code: |
024530 * *****************************
.A ACCEPT ACCEPT-DATE FROM DATE
024550 MOVE ' START DATE = ' TO XX-DISPLAY.
024560 PERFORM X1-DISPLAY.
024570 MOVE -ACCEPT-DATE TO XX-DISPLAY.
024580 PERFORM X1-DISPLAY.
024590 ACCEPT TIME-CURR FROM TIME
024600 MOVE 'START TIME = ' TO XX-DISPLAY.
024610 PERFORM X1-DISPLAY.
024620 MOVE TIME-CURR TO XX-DISPLAY.
.B PERFORM X1-DISPLAY. |
hoep this helps. |
hai radhakrishnan. your's is a logical method to accomplish. i suspect there is a command to perform my need. can any one help me?
I think you can recognise me? can you? sorry for this out of topic post.....  |
|
| Back to top |
|
|
MGIndaco
Active User
Joined: 10 Mar 2005
Posts: 432
Location: Milan, Italy
|
|
|
|
I think that radhakrishnan's method is the mainly used.
For your second question you can use vary utility both in foreground and background mode(JCL).
These are two samples:
Foreground:
if you are in a member of a PDS you can do this command:
| Code: |
| VIEW xxxxxx;COPY mymemb 25 40; |
Where xxxxxx is a name of a temporary member, and mymemb is the member you want to view from 25th to 40th line.(the ";" is my separator that in many case can be, as personal setting, "," o ".")
Background:
| Code: |
//STEP010I EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INPUT DD DISP=SHR,DSN=....
//OUTPUT DD SYSOUT=*
//SYSIN DD *
REPRO INFILE(INPUT) OUTFILE(OUTPUT) SKIP(24) COUNT(16) |
I hope in this help. |
|
| Back to top |
|
|
gowtham_srgp
New User
Joined: 09 Jun 2005
Posts: 38
|
|
|
|
hai MGIndago. thanks for the reply. that is wonderful.......
gowtham |
|
| Back to top |
|
|
|
|
