alias test {
hadd -m test sam appleroom|98732457
echo -s $hget(test,sam)
hadd -m test sam $hget(teste,sam) banaroom|0928734
echo -s The entire value -> $hget(test,sam)
var %Firts $gettok( $hget(test,sam), 1, 32)
echo -s The firts data --> data1a = $gettok( %Firts, 1, 124) data1b = $gettok( %Firts, 2, 124)
var %Second $gettok( $hget(test,sam), 2, 32)
echo -s The second data --> data2a = $gettok( %Second, 1, 124) data2b = $gettok( %Second, 2, 124)
hfree test
}