I did one time or another, did same excersise on SPL/Transact/COBOL/QUIZ
but, G memory fade way.

During the parsing of SQL to XML converter in VB/A

I came out this.

'len function to find out size of string
'Left to extracts only that size of string
'Rigt to pick up last 4 char)

Dim strIn as string   'InPut Buffer
Dim strOut as string  'outPut Buffer

strOut = Right(Left(strIn,Len(strIn)),4)

 

>>> "Newton, Ernie" <[log in to unmask]> 06/06/00 02:43PM >>>
Hi all,

I have a need to pluck out the four rightmost characters of a variable
length string.  The problem being that the string is alphanumeric and COBOL
left-justifies those type of things.  Somewhere in the deep recesses of my
aged mind, I seem to recall that there is a JUSTIFY command available in
COBOL.  I could do an algorithm to count the characters, but life would be
so much simpler if I could right-justify it.

Is there such a thing?  And if so, what is the syntax?

Thanks,


Ernie Newton
Computer Systems Specialist
Yolo County Office of Education
[log in to unmask]