以下のHTTP 例には、必要なものはすべて含まれており、コンパイルを除き、その他の追加作業は必要ありません。ただし、サンプルの Web サイトが動作していることが前提です。
Function Options(*DIRECT)*
*JSMX_BEGIN*Use Builtin(JSMX_BEGIN)*
*JSMX_OPEN*Use Builtin(JSMX_OPEN) With_Args('LANSA01:7560') To_Get(#JSMXSTS #JSMXMSG #JSMXHDLE1)Execute Subroutine(CHECK) With_Parms(#JSMXSTS #JSMXMSG)*
*SERVICE_LOAD*#JSMXCMD := 'SERVICE_LOAD SERVICE(HTTPService) TRACE(*YES)'Use Builtin(JSMX_COMMAND) With_Args(#JSMXHDLE1 #JSMXCMD) To_Get(#JSMXSTS #JSMXMSG)Execute Subroutine(CHECK) With_Parms(#JSMXSTS #JSMXMSG)*
*SEND REQUEST*#JSMXCMD := 'SEND HOST(jsonplaceholder.typicode.com) HANDLER(OutboundNameValue) URI(/users) SECURE(*YES) SNISERVER(*HOST) METHOD(*GET)'Use Builtin(JSMX_COMMAND) With_Args(#JSMXHDLE1 #JSMXCMD) To_Get(#JSMXSTS #JSMXMSG)Execute Subroutine(CHECK) With_Parms(#JSMXSTS #JSMXMSG)*
*RECEIVE CONTENT*#JSMXCMD := 'RECEIVE HANDLER(InboundFile) TO(demo.json)'Use Builtin(JSMX_COMMAND) With_Args(#JSMXHDLE1 #JSMXCMD) To_Get(#JSMXSTS #JSMXMSG)Execute Subroutine(CHECK) With_Parms(#JSMXSTS #JSMXMSG)*
*SERVICE_UNLOAD*Use Builtin(JSMX_COMMAND) With_Args(#JSMXHDLE1 'SERVICE_UNLOAD') To_Get(#JSMXSTS #JSMXMSG)Execute Subroutine(CHECK) With_Parms(#JSMXSTS #JSMXMSG)*
*JSMX_CLOSE*Use Builtin(JSMX_CLOSE) With_Args(#JSMXHDLE1) To_Get(#JSMXSTS #JSMXMSG)Execute Subroutine(CHECK) With_Parms(#JSMXSTS #JSMXMSG)*
*JSMX_END*Use Builtin(JSMX_END)*
*サブルーチン*Subroutine Name(CHECK) Parms((#JSMXSTS *RECEIVED) (#JSMXMSG *RECEIVED))*If Cond('#JSMXSTS *NE OK')*Use Builtin(JSMX_CLOSE) With_Args(#JSMXHDLE1) To_Get(#JSMXSTS #JSMXMSG)*Menu Msgtxt('Java service error has occurred')*Endif*Endroutine