Re: column variable usage

[Mark Boyd <mark@CG4.COM>]

I used the following piece of code to remove carriage returns from panels labels
in an SQR I wrote.  I am not sure if this is what you are trying to do, but I
was trying to write the labels to a flat file and ran into trouble with the
carriage return.

Hope this helps.

!************************
if instr($Label_Txt,chr(10),1) <> 0
      while #Cntr <= #Txt_Len
         let $Real = substr($Label_Txt,#Cntr,1)
         let #Char = ascii(substr($Label_Txt,#Cntr,1))
             if #Char <> 10
         let $LblText = $LblText || $Real
      end-if
  add 1 to #Cntr
      end-while
   else
      move $Label_Txt to $LblText
   end-if

!*****************8



the dragon wrote:

> Hi gurus,
>
> psoft 7.5x
> oracle 8.x
> solaris/NT
> sqr 4.3x
>
> We are replacing a unix script with an sqr which creates e-mail eft
> notifications of direct deposits based upon voucher records.
>
> I have the majority of the code complete.  The problem I have encountered is
> when I have to create the flat file which will be the 'input' for the text
> of the email; I am unable to use the carriage return/line feed to line up
> multiple vouchers because the write command interprets that as a carriage
> return/line feed.  is there any way around this????
>
> BTW, if this is any easy one, sorry in advance.  I am brain dead... watched
> the midnight showing of "Star Wars: The Phantom Menace" this morning......
> :-)
>
> clark
>
> _______________________________________________________________
> Get Free Email and Do More On The Web. Visit http://www.msn.com