Hello When i try this code :
// C
EXPORT int test(unsigned char* fld)
{
byte tmp[20];
memset(tmp, 0, 20);
tmp[0] = 'A';
tmp[6] = 'A';
unsigned char bn[80];
ugetbind(fld, bn);
ufput(bn, tmp, -20);
ufputc(bn, tmp, 0);
return 20;
}
// Uniface
trigger
public web
activate "CONV".test("T_RAW.HTML.WHEXA")
filedump/raw T_RAW.HTML.WHEXA, "test.dump"
putmess T_RAW.HTML.WHEXA
putmess $encode("HEX", T_RAW.HTML.WHEXA)
endIn trace I expect :
activate "CONV"."test"( "T_RAW.HTML.WHEXA" )
filedump/raw T_RAW.HTML, "test.dump"
putmess T_RAW.HTML
A{!{!{!{!{!A{!{!{!{!{!{!{!{!{!{!{!{!{!{!
putmess $encode("HEX",T_RAW.HTML)
4100000000004100000000000000000000000000
But I have :
activate "CONV"."test"( "T_RAW.HTML.WHEXA" )
filedump/raw T_RAW.HTML, "test.dump"
putmess T_RAW.HTML
A{!{!{!{!{!A
putmess $encode("HEX",T_RAW.HTML)
41000000000041