This fixed it. Thanks Ashok. 

code is in my last reply

this is the class:

Class REST.Test.Sample.AllItems Extends (%JSON.Adaptor, Ens.Response)
{ Property ItemtId As %String;

Property itemName As %String(MAXLEN = 100);

Property itemStockNumber As %String(MAXLEN = 150);

Property itemType As %String;

Property itemPriority As %String;

Property itemDetailData As %String(MAXLEN = 10000);
}

ClassMethod getItemData() As %Status [ PublicList = (U, ItemDetails, RESULTS) ]
{
Set tSC = $$$OK
s results=""
               
s AllItems=##class(REST.Test.Sample.ItemDetails).%New()
S (STATUS,XX)=0 F  S STATUS=$O(^GMR(123,"D",STATUS)) Q:STATUS'>0 f  s XX=$O(^GMR(123,"D",STATUS,XX)) Q:XX'>0 d
    .s CONERR=""
    .d GETS^DIQ(123,XX,"*","IE","ItemDetails","CONERR")
    .Q:"5,6"'[STATUS
    .Q:$P(^GMR(123,XX,0),"^",5)'=9
    .s Item=..%New()
    .s Item.ItemId=XX
    .s CONID=XX_","
    .s itemId=$g(ItemDetails(123,CONID,.02,"I"))
    .s ien=XX_","
    .s Item.ItemName=$g(ItemDetails(123,CONID,.02,"E"))
    .s Item.itemStockNumber=$G(ItemDetails(123,CONID,10,"I"))
    .s Item.itemType=$G(ItemDetails(123,CONID,10,"I"))
   .s Item.itemPriorty=$G(ItemDetails(123,CONID,11,"I"))

    .S X2=0 F  S X2=$O(ItemDetails(123,CONID,20,X2)) q:X2'>0 D
    ..s results=$g(results)_"|"_ItemDetails(123,CONID,20,X2)
    ..s Item.ItemData=$g(results)
    .;d Item.Consult.SetAt(XX,XX)
    .s AllItems.ItemId=XX
    .d AllItems.Item.SetAt(Item.ItemName,"ItemName")

    d AllItems.%JSONExport()
    q 200