MVSFORUMS.com

Nancy · Beginner Joined: 23 May 2003 Posts: 77 Topics: 26

Hi,

I want to eliminate the trailing spaces from a variable called WW-USR-SNME. I am using TRIM function for the same but it is not recognised by the compiler. My code is below -

STRING TRIM (WW-USR-SNME,RIGHT)
DELIMITED BY SIZE
INTO WW-USR-SNME1

Please suggest a way to do so.

Thanks
Nancy

ofer71 · Posted: Tue Feb 07, 2006 2:26 am Post subject:

I think you're missing the word FUNCTION before the function name.

O.
________
Grand Cherokee 5.9

Nancy · Beginner Joined: 23 May 2003 Posts: 77 Topics: 26

Well, I've tried with that option too. Its not working Sad

Nancy

vst · Beginner Joined: 23 Jan 2006 Posts: 11 Topics: 0

Nancy,

could you please let us know
1) what compiler/version are you using?
2) what does exactly mean "Its not working"? (compiler message(s) regarding TRIM function; DISPLAY WW-USR-SNME/WW-USR-SNME1)

There are too many cases leading to "not working".
(May be some copybook is missing if your compiler does not define intrinsic TRIM function)

Nancy · Beginner Joined: 23 May 2003 Posts: 77 Topics: 26

vst,

I am not sure of the Compiler version but copying few of the details below from the JCL output.

*************************************************************
*
* COMPILE LISTING - KEYWORD **CM
*
*************************************************************
PP 5648-A25 IBM COBOL for OS/390 & VM 2.2.2
Invocation parameters:
FLAG(I,E),MAP,NOSEQ,XREF,NODYNAM,TRUNC(BIN),FSRT
PROCESS(CBL) statements:
CBL SQL("HOST(IBMCOB),APOST,APOSTSQL,VERSION(AUTO)")
CBL TEST(NONE,SYM)

PP 5648-A25 IBM COBOL for OS/390 & VM 2.2.2

The error message is --> IGYPS2121-S "TRIM" was not defined as a data-name.

Please let me know if you need any more details. I would try to provide the same.

Nancy

ofer71 · Posted: Tue Feb 07, 2006 6:39 am Post subject:

According to my manual, there is no TRIM function in COBOL for OS/390 & VM 2.2

O.
________
medical marijuana patient

Nancy · Beginner Joined: 23 May 2003 Posts: 77 Topics: 26

Oh, but I got this code in net. Can you please suggest which version supports the TRIM function in Cobol ?

Nancy

ofer71 · Posted: Tue Feb 07, 2006 7:21 am Post subject:

It's probably one of the "PC based" versions of COBOL. Unfortunatilly, I don't have the manuals for these. Very Happy

O.
________
Ford Windstar

vst · Beginner Joined: 23 Jan 2006 Posts: 11 Topics: 0

I would add a link containing similar discussion.
http://www.codecomments.com/archive266-2004-12-348732.html

I do not see TRIM function in my Enterprise COBOL V3R2 language reference.
You probably have to write your own (or find any or find workaround).

kolusu · Posted: Tue Feb 07, 2006 9:28 am Post subject:

Bithead · Posted: Tue Feb 07, 2006 10:31 am Post subject:

Just a thought.

You could use STRING WW-USR-SNME DELIMITED BY SPACES INTO WW-USR-SNME1.

However, if WW-USR-SNME1 is longer than the truncated value of WW-USR-SNME, COBOL will pad it with trailing spaces.

exitroutine · Posted: Thu Feb 09, 2006 3:20 am Post subject: