finding all OBTAINING USING .....

Discussion created by ca.portal.admin on Sep 1, 2009
Latest reply on Sep 1, 2009 by ca.portal.admin
when migrating from 15 to 17 (might have also happened had me migrated to
16) - we noted that all subsequent of cobol code ""OBTAIN .... USING"" now
requires a terminating period or semicolon (to enforce only one character
string to be interpreted as the sort-key element name. we have addressed
this as each program was compiled when a change is made.

we recently picked up a 3rd party productivity tool (i am really not sure
which one) - and our developers want to compile EVERY program abd are
complaining about the number of precompiles failing due to this issue -
and want all such programs pre-identified

has anyone written a program/script to examine program source repositories
looking for OBTAIN...USING .... DML? (and more importantly, willing to

Chris Hoelscher
Senior IDMS & DB2 Database Administrator
Humana Inc

you only need to test the programs that you want to work correctly

The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information.
IDMS 3rd-party providers forum


Re: finding all OBTAINING USING .....
"Not sure why you would need anything special to do the search. If you program source is in PANVALET, why couldn't you do a search for the string you want using a PANVALET utility? Same thing if the source libraries are in PDS format, simply use the IBM standard program ISRSUPC.

Now, if you want to also append the semicolon, then you could use File Aid or Macro 4 utilities if you have them.

Dan Miley
Lockheed Martin