AMX NETLINX PROGRAMMING LANGUAGE Manual page 230

Encoding and Decoding: Binary and XML
FILE_READ(slFile,sBinaryString,MAX_LENGTH_STRING(sBinaryString))
}
slFile = FILE_OPEN('XMLEncode.xml',nFileRead)
IF (slFile > 0)
{
}
}
}
(***********************************************************)
(*
(***********************************************************)
DEFINE_PROGRAM
(***********************************************************)
(*
(*
(***********************************************************)
214
slReturn =
IF (slReturn < 0) SEND_STRING 0,"'FILE WRITE FAIL RETURN=',ITOA(slReturn)"
slReturn = FILE_CLOSE(slFile)
IF (slReturn < 0) SEND_STRING 0,"'FILE CLOSE FAIL RETURN=',ITOA(slReturn)"
slReturn = FILE_READ(slFile,sXMLString,MAX_LENGTH_STRING(sXMLString))
IF (slReturn < 0) SEND_STRING 0,"'FILE WRITE FAIL RETURN=',ITOA(slReturn)"
slReturn = FILE_CLOSE(slFile)
IF (slReturn < 0) SEND_STRING 0,"'FILE CLOSE FAIL RETURN=',ITOA(slReturn)"
(* CONVERT TO BINARY *)
lPos = 1
slReturn = STRING_TO_VARIABLE (AlbumStruct2,sBinaryString,lPos)
SEND_STRING 0,"'POSITION=',ITOA(lPos),'; RETURN=',ITOA(slReturn)"
(* CONVERT TO XML *)
lPos = 1
slReturn = XML_TO_VARIABLE (AlbumStruct2,sXMLString,lPos,0)
SEND_STRING 0,"'POSITION=',ITOA(lPos),'; RETURN=',ITOA(slReturn)"
THE ACTUAL PROGRAM GOES BELOW
END OF PROGRAM
DO NOT PUT ANY CODE BELOW THIS COMMENT
*)
*)
*)
NetLinx Programming Language Reference Guide