ESQL（Extended SQL）是IBM公司開發的一種專門用于處理XML和數據庫的編程語言。它擁有豐富的語法和內置函數，可以很方便地完成XML到JSON的轉換。以下是使用ESQL把XML轉換成JSON的代碼示例:

DECLARE jsonOutput REFERENCE TO OutputRoot.JSON.Data;
DECLARE xmlInput REFERENCE TO InputRoot.XML.Data;
SET jsonOutput = JSON.createEmptyObject();
SET jsonOutput."name" = xmlInput."name";
SET jsonOutput."age" = INTEGER(xmlInput."age");
SET jsonOutput."sex" = xmlInput."sex";
SET jsonOutput."address" = JSON.createEmptyObject();
SET jsonOutput."address"."city" = xmlInput."address"."city";
SET jsonOutput."address"."province" = xmlInput."address"."province";
IF LASTMOVE(xmlInput."hobbies") = 1 THEN
SET jsonOutput."hobbies" = JSON.createArray();
ELSE
SET jsonOutput."hobbies" = JSON.createObject();
FOR hobby IN xmlInput."hobbies".*
SET jsonOutput."hobbies".(hobby.pos) = hobby;
END FOR;
END IF;

以上代碼中，首先我們聲明了一個jsonOutput對象和一個xmlInput對象。接著，我們通過SET語句將xmlInput中的數據賦值給jsonOutput對象，實現了從XML到JSON的轉換。在賦值過程中，我們使用了ESQL內置函數JSON.createEmptyObject()和JSON.createArray()來創建空的JSON對象和數組。此外，我們還使用了IF和FOR語句來處理xmlInput中的hobbies節點，將其賦值給jsonOutput對象中的hobbies字段。通過這樣的處理，我們可以得到一個與XML內容相同的JSON對象。