edit cobol/DB2 in ISPF 1

[Truusvlugindewind]

1 tip and 1 question:

1st the tip:
- while editing inline SQL the syntax coloring does not work. But, while editing, you place an "." after the "exec sql" it will not know it is sql and treats it like cobol. Not very usefill but at least it will color the "(" and the matching ")" for you. Wait until you got a complex WHERE clause and you'll lean to appriciate. Do not forget to take it away...

2nd the question (Crox pay attention please):
- when you search your code for database fields, you've got to execute the "FIND" twice:
- "F CLIENT-NUMBER" for the cobol definition
- "F CLIENT_NUMBER" for the DB2 definition.
It would be nice to find both with 1 smart command.Anyone with "green fingers" in the ISPF soil?

0

 

[slade]

You can try f p'client$number' all or use PF5 instead of all for the 2nd find.

OR

x all;f p'client$number' all

The "$" means "any spec char".

Regards, Jack.

"A problem well stated is a problem half solved" -- Charles F. Kettering

 

[Truusvlugindewind]

GREAT thanks. 1 purple star coming up

 

[slade]

Thanx, I'll put it on my tree.

Regards, Jack.

"A problem well stated is a problem half solved" -- Charles F. Kettering

 

[Crox]

hi Truusje, I am not that often anymore on tek-tips, but if you like, I have a powerpoint presentation for you (NL) using ispf. It for example describes how to transform a list of identifiers and some lines of code around one template into the complete source for all the identifiers. Also a quick ref with commands. You know my personal email.....

btw: ever used the command HIDE X / dslist

or... instant macro from the commandline:

f work 8;:.w;f proc 8;:.p

to mark the working-storage with label .w and the procedure division with .p

lots of people forgot about

f 'something very long'

c * 'into somthing also long'

nice editing with spf. I use spfse on the pc. It works great doing changes on multiple sources recursive through directories......

Regards,

Crox

 

[Truusvlugindewind]

Hee Crox. I've been pruning my e-mail account... Can you please send it to me?

 

[Crox]

Perhaps you can look at my profile.....