prog

        if (m_bDebugEnable)
        {
            bool bOk = false;
            if (wcslen(script_name) == 0 || (m_setScriptName.find(script_name) == m_setScriptName.end()))
                bOk = true;

            if (bOk)
            {
                if (wcslen(script_name) > 0)
                    m_setScriptName.insert(script_name);
                COM_CHECK(m_spDebugDocHelper->AddDBCSText(CString(script)), COM_HERE,"");
                DWORD dw;
                UINT uLen = SysStringLen(script);
                m_spDebugDocHelper->DefineScriptBlock(0, uLen, m_Engine, FALSE, &dw);
            }
        }//if (m_bDebugEnable)

        // Parse the code scriptlet...
        hr = this->m_Parser->ParseScriptText( script, ctx_name, NULL, NULL, NULL, 0, 0L , NULL, &ei);