Hi EGL professionals,

I'm trying to update and XML type column from EGL on Mainframe and DB2 11. I'm using an UPDATE SQL with XMLMODIFY which is working well from SQL script (QMF, DataStudio)

UPDATE LOGT SET LOGXML =    XMLMODIFY('insert node $log/text as last into /nlslog',       XMLPARSE(DOCUMENT '<text>my log 1</text>') as "log")WHERE ID=75;

I tried to implement it in EGL, like this (and many other ways)

function LOGTEXT(LOGTEXT string)        LOGXMLSTR String;                LOGXMLSTR = "UPDATE LOGT";        LOGXMLSTR = LOGXMLSTR + " SET LOGXML =";        LOGXMLSTR = LOGXMLSTR + " XMLMODIFY('insert node $log/text as last into /nlslog', XMLPARSE(DOCUMENT '<text>my log 1</text>') as \"log\"),";        LOGXMLSTR = LOGXMLSTR + " RUNID = '0002'";        LOGXMLSTR = LOGXMLSTR + " WHERE ID = ?";        try            prepare MYSQLSTATEMENT from LOGXMLSTR;                execute MYSQLSTATEMENT using LOGT.ID;                        //            execute #sql{//                UPDATE LOGT//                SET LOGXML =//                    XMLMODIFY('insert node $log as last into /nlslog', XMLPARSE(DOCUMENT '<text>my log 1</text>') as "log")//                WHERE ID = :LOGT.ID//            }//            for NLSLOGT;                onException            LOGERROR();        end    end

I also tried the query several ways in SQL it's working, but not in EGL:

XMLMODIFY('insert node $log as last into /nlslog', XMLPARSE(DOCUMENT '<logg><text>my log 1</text></logg>') as "log")

XMLMODIFY('insert node $log/text as last into /nlslog', XMLPARSE(DOCUMENT '<?xml version=\"1.0\" encoding=\"IBM037\"?><logg><text>my log 1</text></logg>') as "log")

Unfortunatelly we are not able to run Stored Procedures

Please help!

Not any idea?

Is this an EGL cobolGen situation or javaGen? 

I don't see any information in your text about what is going wrong. Are you getting an error somewhere? What are the details of the error?

Sorry,

I forgot to update this. The problem caused by the $ sign. When the code was run on the MVS it was changed to something else in EBCDIC.

so, the solution is:

 dollar char(1);dollar = strLib.intAsChar(103);logXMLStr string;    logXMLStr = "UPDATE LLFT.NLSLOGT";    logXMLStr = logXMLStr + " SET LOGXML =";    logXMLStr = logXMLStr + " XMLMODIFY('insert node " + dollar +            "logelement as last into /nlslog" + actualPath +            "', XMLPARSE(DOCUMENT '<" + logBlockName + " time=\"" +            dateTimeLib.currentTimeStamp() + "\">" + logBlockTxt + "</" +            logBlockName + ">') as \"logelement\")";    logXMLStr = logXMLStr + " WHERE ID = ?";    try        prepare logBlocKSQL from logXMLStr;        execute logBlockSQL using NLSLOGT.ID;    onException        LOGERROR();    end