EQU ALGORITHM$SHA1 TO "SHA1" EQU DATALOC$STRING TO 1 EQU DATALOC$FILE TO 2 RESULT = "" ERRCODE = DIGEST(ALGORITHM$SHA1, TEXT, DATALOC$STRING, RESULT) RESULT = UPCASE(OCONV(RESULT, "MX"))
rex _______________________________________________ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users