// JScript File
function CPLLoad(clientId, cid) 
{

    var result = Webscene.UI.CPL.CPLLoad(sessionId, gs(clientId,'n'), cid, gs(clientId,'af'), gs(clientId,'lc'), 0, clientId, gs(clientId,'df'), gs(clientId,'sp'), '', gs(clientId,'ct'), gs(clientId,'atpc'));
                
    if (result) {
        if (result.value) {
            var e = dge(clientId);
            if (e) {
                e.innerHTML = result.value;
            }
        }
    }

}

function CPLAdd(clientId, n) {

    var result = Webscene.UI.CPL.CPLAdd(sessionId, gs(clientId,'n'), n, gs(clientId,'ct'));
    
    if (result) {
        var cid = result.value;
        if (cid) {
            if (cid != '') {
                CPLLoad(clientId, cid);    
            }
        }
    }
}

function CPLDel(clientId, n) {

    var result = Webscene.UI.CPL.CPLDel(clientId, sessionId, gs(clientId,'n'), n, gs(clientId,'ct'));
    
    if (result) {
        if (result.value) {
            AL(result.value);
        }
        CPLLoad(clientId,'');    
    }

}

function CPLUpdateCB(result) {

    if (result) {
        var clientId = result.context;
        if (result.value) {
            AL(result.value);
        }
        TIHide(clientId);
    }
}

function CPLUpdate(clientId, cid) {

    TIShow(clientId);
    var catid = '';
    var cpl = dge(clientId + '_cat');
    if (cpl) {
        catid = cpl.value;
    }
    var pc = '';
    var cplpc = document.forms[0].CPLPc;
    if (cplpc) {
        pc = '-1';
        for (var i = 0; i < cplpc.length; i++) {
            if (cplpc[i].checked) {
                if (pc != '') {
                    pc = pc + ",";
                }
                pc = pc + cplpc[i].value.toString();
            }
        }
    }
    Webscene.UI.CPL.CPLUpdate(clientId, sessionId, nodeId, cid, catid, pc, CPLUpdateCB, clientId);


}