>Hi Allen,
>
>>And finally, how does one calculate a Longitudinal Redundancy Check of this packet?
>>Allen
>
>One method:
>

PROCEDURE dolrc
>LPARAMETERS cinstring
>
>cinput = cinstring
>numbytes = LEN(cinput)
>
>* Takes the input string, a character at a time,
>* convert to ANSI numeric and XOR with following character.
>* Do the first pair to prime crcval
>
>crcval = BITXOR(ASC(SUBSTR(cinput,1,1)),ASC(SUBSTR(cinput,2,1)))
>
>* Now, loop through the rest
>
>FOR x = 3 TO numbytes
>  crcval = BITXOR(crcval,ASC(SUBSTR(cinput,x,1)))
>ENDFOR
>
>RETURN crcval
>

>Just pass in your string, this will return the LRC value.

That's just what I was looking for..Thanks
Allen