vartemplateoctetstringv_out:=v_t1;// FIXME How to sepcify an octetstring template such as '07D200'O followed by one or more bytes
returnv_out;
}
functionf_check_payload_cam(
inGeoNetworkingIndv_gnInd,
template(present)CAMp_cam
)returnboolean{
varbitstringv_btp_payload:=oct2bit(substr(v_gnInd.msgIn.gnPacket.packet.payload,0,4));// FIXMEM Skip BTP, check if it is acceptable in an ATS
varbitstringv_cam_payload:=oct2bit(substr(v_gnInd.msgIn.gnPacket.packet.payload,4,lengthof(v_gnInd.msgIn.gnPacket.packet.payload)-4));// FIXMEM Skip BTP, check if it is acceptable in an ATS
varCAMv_decoded_cam;
// TODO Check BTP
// Check Btp paylod
if(decvalue(v_cam_payload,v_decoded_cam)==0){
if(match(valueof(v_decoded_cam),p_cam)==true){
returntrue;
}
}
returnfalse;
}// End of function f_check_payload_cam
functionf_check_payload_denm(
inGeoNetworkingIndv_gnInd,
template(present)DENMp_denm
)returnboolean{
varbitstringv_btp_payload:=oct2bit(substr(v_gnInd.msgIn.gnPacket.packet.payload,0,4));// FIXMEM Skip BTP, check if it is acceptable in an ATS
varbitstringv_denm_payload:=oct2bit(substr(v_gnInd.msgIn.gnPacket.packet.payload,4,lengthof(v_gnInd.msgIn.gnPacket.packet.payload)-4));// FIXMEM Skip BTP, check if it is acceptable in an ATS