|
View previous topic :: View next topic
|
| Author |
Message |
sri_mf
Active User
Joined: 31 Aug 2006
Posts: 218
Location: India
|
|
|
|
I have tried to set up a PF key (PF13) to execute REXX programs on ISPF.
I have written the code in "'SRINI.REXX.EXEC(SETUP)'.
Code is
| Code: |
=COLS> ---1----+----2----+----3----+----4----+----5----+----6----+----7--
****** ***************************** Top of Data ******************************
000100 /* REXX SETUP */
000200 TRACE C
000300 "ALTLIB DEACTIVATE APPL(EXEC)"
000400 "ALTLIB ACTIVATE APPL(EXEC) DSN('SRINI.REXX.EXEC')"
****** **************************** Bottom of Data ****************************
|
When i try to activate this using shift + F1 i ma getting the following Error.
| Code: |
INVALID COMMAND NAME SYNTAX
1 *-* 000100/* REXX SETUP */
+++ RC(-3) +++
***
INVALID COMMAND NAME SYNTAX
2 *-* 000200 TRACE C
+++ RC(-3) +++
INVALID COMMAND NAME SYNTAX
3 *-* 000300 "ALTLIB DEACTIVATE APPL(EXEC)"
+++ RC(-3) +++
INVALID COMMAND NAME SYNTAX
4 *-* 000400 "ALTLIB ACTIVATE APPL(EXEC) DSN('SRINI.REXX.EXEC')"
|
Can anyone help me out on this. |
|
| Back to top |
|
 |
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
| Should the PFkey not contain "TSO EXEC ................................." |
|
| Back to top |
|
|
sri_mf
Active User
Joined: 31 Aug 2006
Posts: 218
Location: India
|
|
|
|
| expat wrote: |
| Should the PFkey not contain "TSO EXEC ................................." |
Thanks Exzpect for your reply.
Yes i have set up that also.
| Code: |
Key Definition Format Label
F11 . .
F12 . . CANCEL SHORT Cancel
F13 . . TSO EXEC 'SRINI.REXX.EXEC(SETUP)' EXEC SHORT Help
F14 . . SPLIT LONG Split
F15 . . END SHORT End
F16 . . RETURN SHORT Return
F17 . . RFIND SHORT Rfind
F18 . . RCHANGE SHORT Rchange
F19 . . UP LONG Up
F20 . . DOWN LONG Down
|
|
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10872
Location: italy
|
|
|
|
| Quote: |
| 000100/* REXX SETUP */ |
looks like You have ...
"NUMBER ON" for a VB dataset
or
"NUMBER COB" for a FB dataset |
|
| Back to top |
|
|
sri_mf
Active User
Joined: 31 Aug 2006
Posts: 218
Location: India
|
|
|
|
| enrico-sorichetti wrote: |
| Quote: |
| 000100/* REXX SETUP */ |
looks like You have ...
"NUMBER ON" for a VB dataset
or
"NUMBER COB" for a FB dataset |
Enrico,
Sorry for the delay.
This is the Profile i have for my PDS member.
| Code: |
....EXEC (FIXED - 80)....RECOVERY ON....NUMBER ON STD COB..............
....CAPS ON....HEX OFF....NULLS OFF....TABS OFF........................
....AUTOSAVE ON....AUTONUM OFF....AUTOLIST OFF....STATS ON.............
....PROFILE UNLOCK....IMACRO NONE....PACK OFF....NOTE ON...............
....HILITE REXX CURSOR FIND............................................
|
|
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley
|
|
|
|
| Did you copy your exec from a VB dataset to a FB? Your post clearly shows line numbers to the left of the rexx statements. Those numbers should not be there for a FB dataset. |
|
| Back to top |
|
|
sri_mf
Active User
Joined: 31 Aug 2006
Posts: 218
Location: India
|
|
|
|
| Pedro wrote: |
| Did you copy your exec from a VB dataset to a FB? Your post clearly shows line numbers to the left of the rexx statements. Those numbers should not be there for a FB dataset. |
I got the code from google and copied that in to my PDS member.
Pls let me knowt the mistake that i have commited. |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley
|
|
|
|
It is not necessarily a mistake. Some systems are setup to use FB datasets and others are setup to use VB datasets for rexx programs.
You should be aware that there are differences between VB and FB. And that there is an opportunity to copy from one type to another. In your case, probably the original was VB but you copied to FB. You need to manually remove all of the line numbers from cols 1 - 8. |
|
| Back to top |
|
|
sri_mf
Active User
Joined: 31 Aug 2006
Posts: 218
Location: India
|
|
|
|
| Pedro wrote: |
It is not necessarily a mistake. Some systems are setup to use FB datasets and others are setup to use VB datasets for rexx programs.
You should be aware that there are differences between VB and FB. And that there is an opportunity to copy from one type to another. In your case, probably the original was VB but you copied to FB. You need to manually remove all of the line numbers from cols 1 - 8. |
I tried to blank them but i can not.. How to remove them |
|
| Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006
Posts: 1353
Location: Israel
|
|
|
|
You can do: UNNUM then SAVE, that should be enough.
From the PROFILE result, I can see the file type is EXEC and it is F80.
The default should be without numbers, but it can happen.
I usualy set the PROFILE as I like (AUTOSAVE OFF PROMPT and RECOVERY ON for example) then I do a PROF LOCK to save it as my default profile. |
|
| Back to top |
|
|
sri_mf
Active User
Joined: 31 Aug 2006
Posts: 218
Location: India
|
|
|
|
| Marso wrote: |
You can do: UNNUM then SAVE, that should be enough.
From the PROFILE result, I can see the file type is EXEC and it is F80.
The default should be without numbers, but it can happen.
I usualy set the PROFILE as I like (AUTOSAVE OFF PROMPT and RECOVERY ON for example) then I do a PROF LOCK to save it as my default profile. |
Marso,
I tried UNUM.I am getting this Message "Not in number mode". |
|
| Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006
Posts: 1353
Location: Israel
|
|
|
|
It was before:
| Code: |
....EXEC (FIXED - 80)....RECOVERY ON....NUMBER ON STD COB..............
....CAPS ON....HEX OFF....NULLS OFF....TABS OFF........................
....AUTOSAVE ON....AUTONUM OFF....AUTOLIST OFF....STATS ON.............
....PROFILE UNLOCK....IMACRO NONE....PACK OFF....NOTE ON...............
....HILITE REXX CURSOR FIND............................................ |
I guess this means the problem is solved? |
|
| Back to top |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA
|
|
|
|
| If you did an UNNUMBER, your profile should have changed to NUMBER OFF and the numbering should have been removed from columns 1-6 and 73-80. |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley
|
|
|
|
| Quote: |
| should have been removed from columns 1-6 |
Are you sure it would remove columns 1-6 from a FB dataset? It seems unlikely to me.
| Quote: |
| I tried to blank them but i can not.. How to remove them |
What did you try?
Make sure there is no data in cols 1-6 and if none, shift all lines to the left using edit line commands. |
|
| Back to top |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA
|
|
|
|
| Quote: |
| Are you sure it would remove columns 1-6 from a FB dataset? |
It did when I tested it using a profile like the one shown. |
|
| Back to top |
|
|
|
|
