×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Hi,
even though I'm not using Cobol, I know it is possible to embed SQL in a
Cobol program.
In this way you may use the SQL scalar function REPLACE to remove blanks
from a String:
EXEC SQL SET :NEWSTRING = REPLACE(TRIM(:STRING), ' ', '')
END-EXEC
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
-----Ursprüngliche Nachricht-----
Von: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] Im Auftrag von Dan Rasch
Gesendet: Tuesday, 02. March 2010 22:44
An: midrange-l@xxxxxxxxxxxx
Betreff: embedded blanks in COBOL string
I have to 'scrunch' out blanks for a string in a COBOL program, and
used some INSPECT / TALLYING followed by substring logic, but I
kept thinking there must be and easier way to remove embedded
spaces from a string. Using COBOL.
Comments?
_________________________________________________________________
Hotmail: Trusted email with Microsoft?s powerful SPAM protection.
http://clk.atdmt.com/GBL/go/201469226/direct/01/
midrange.com
