|
View previous topic :: View next topic
|
| Author |
Message |
CJT
New User
Joined: 02 Aug 2007
Posts: 83
Location: Here
|
|
|
|
Hi Does anyone know why this piece of code is not working
| Code: |
ADDRESS ISPEXEC "CONTROL ERRORS RETURN"
ADDRESS ISPEXEC
ADDRESS ISREDIT
"MACRO"
'isredit (CURRLINE) = LINENUM .ZCSR'
say "The Current Line is " CURRLINE
'isredit (ROWC, COLC) = CURSOR'
SAY ROWC COLC
Exit 0 |
|
|
| Back to top |
|
 |
ofer71
Global Moderator
Joined: 27 Dec 2005
Posts: 2358
Location: Israel
|
|
|
|
What do you mean by "not working"???
O. |
|
| Back to top |
|
|
CJT
New User
Joined: 02 Aug 2007
Posts: 83
Location: Here
|
|
|
|
Hi Ofer,
the output i get is
CURRLINE and ROWC COLC
----------------------------------
In other words, CURRLINE is not having the value of the current line in which the cursor is and ROWC and COLC does not have row or column
please let me know how this can be rectified. |
|
| Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005
Posts: 2358
Location: Israel
|
|
|
|
Do you have any previous experience with ISPF Edit Macros? Do you know how to invoke an edit macro? Do you know what are the functions of the commands? Have you tried to run it with trace?
O. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
Correct code
| Code: |
...
Address ISREDIT
"(LINE,CURS) = CURSOR"
say "(LINE,CURS) = " line "," curs
... |
|
|
| Back to top |
|
|
CJT
New User
Joined: 02 Aug 2007
Posts: 83
Location: Here
|
|
|
|
| Thanks its working for me. |
|
| Back to top |
|
|
|
|
