Finding the Length of a string

4 posts / 0 new

Last post

10 July 2011

Anonymous

I have to find the length of a string. Lets say the variable is defined as

01 WS-EMP-NAME PIC X(20).

Now this employee name may have a name as small as "DEEPAK"

so if I find the length of this variable using

COMPUTE LENGTH OF WS-EMP-NAME

then I would get the length as 20, while I am looking for the

exact length of item contained in the variable i.e 6 as in this case

Regards

Deepak

"; ; ; ;

Mon, 07/11/2011 - 15:42

Anonymous

Cobol/JCL opporunity

I have a Cobol/JCL Lead developer opening with my client in Charlotte, NC. IF you have any additional experience working with high volume document applications or have these application experience (HP Exstream Dialogue or Streamweaver) then you are a great fit for this position. It is a lead position. Please contact me at the following address: bgaudioso@volt.com Best regards, Brian Gaudioso Volt Workforce Solutions

Mon, 07/11/2011 - 20:26

Anonymous

Actual length of the string.

Various ways of doing this not sure which would be more efficient, it may depend on the average lenght of the string and the rules around how you want to split it up.

Simplest method:

01 i pic s9(4) comp.

perform varying i from +20 by -1 until Ws-emp-name(i:1) not = space end-perform

or string ws-emp-name delimited by space into ws-work-space pointer ws-emp-name-length end-string

not sure of the exact syntax of the string command please look at the cobol manual. but the ws-emp-name-length will be the string length +1.

Tue, 07/12/2011 - 19:03

Alan.R.Wynne

Offline

Joined: 07/07/2011 - 19:59

Determine the length of the string

use the iuspect statement:

01 ws-emp-name-length pic s9(4) comp.
move 0 to ws-emp-name-length
inspect ws-emp-name tallying ws-emp-name-length before initial ' '