/*

          È£½ºÇǽº ȯÀÚ°ü¸®(SMMNH02900.xfm - JScript )

          - Version :
              1)  : Ver.1.00.01
     */

    var currentdate = getCurrentDate();//ÇöÀçÀÏÀÚ
    var sdate = ((currentdate.toDate()).getAddDate(-1, "M")).getDateFormat(); //º¸¸§Àü

    /**
     * @group  :
     * @ver    : 2007.04.10
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : È£½ºÇǽº ȯÀÚ°ü¸® Á¶È¸
     *           Á¶È¸Á¶°Ç (Á¶È¸½ÃÀÛ,Á¾·áÀÏ, ȯÀÚ±¸ºÐ) Çʼö
     * @param  :
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */

    function fSearch(){


        var gubun;

        //xpath
        var xHospiceListPath = '/root/main/hospice/hospicelist';

        if(model.getValue("/root/temp/pamcgubun")==''){
            messageBox("ȯÀÚ±¸ºÐÀ» ","C002");
            return;
        }

        //»ó¼¼³»¿ª ¿µ¿ª ÃʱâÈ­
        model.resetInstanceNode("/root/main/hospiceinfo/hospicedetl");
        grp_buttom.refresh();

        //Á¶È¸Á¶°Ç set
        model.removenodeset(xHospiceListPath);
        model.removenode("/root/send");

        model.makeValue("/root/send/fbrthdd",       model.getValue("/root/main/cond/fbrthdd"));
        model.makeValue("/root/send/lbrthdd",       model.getValue("/root/main/cond/lbrthdd"));

        //ÀÏ¹Ý »êÀç ±¸ºÐ
        if((model.getValue("/root/temp/hospicegubun") == "1 2")||(model.getValue("/root/temp/hospicegubun") == "2 1")){
            gubun = "3"
        }else if(model.getValue("/root/temp/hospicegubun") == ""){
            gubun =  "0";
        }else {
            gubun =  model.getValue("/root/temp/hospicegubun");
        }

        model.makeValue("/root/send/hospicegubun",  gubun);
        model.makeValue("/root/send/pamcgubun",     model.getValue("/root/temp/pamcgubun"));

        //ȯÀÚ±¸ºÐÀÌ Á¦¿Ü(O)À̸é Á¦¿Ü»çÀ¯ Á¶È¸Á¶°Ç Ãß°¡
        if(model.getValue("/root/temp/pamcgubun")=="O"){
            model.makeValue("/root/send/M0066list",model.getValue("/root/init/M0066list"));
        }

        model.makeValue("/root/send/pid", model.getValue("/root/temp/pid"));

        model.removenode('/root/main/hospice');


        if(submit("TRMNH02901")){

            var RowCnt = grd_hospicelist.rows -  grd_hospicelist.fixedRows;
            if(RowCnt < 1){
                model.removeNodeset("/root/main/hospiceinfo/hospicedetl");
                messageBox("Á¶È¸µÈ ÀÚ·á°¡ ","I004");
            }

            //Á¾°áó¸® µÇÁö¾ÊÀº ÀÓÁ¾È¯ÀÚ¿¡ ´ëÇÑ ¸Þ¼¼Áö¸¦ Ãâ·ÂÇÑ´Ù.
            var dethMsg = '';//ÀÓÁ¾È¯ÀÚ¸Þ¼¼Áöº¯¼ö
            var dethNm, dethPid, dethDt; //ÀÓÁ¾È¯ÀÚ À̸§, µî·Ï¹øÈ£, ÀÓÁ¾ÀÏ º¯¼ö

            for(var i = 1; i <= RowCnt ; i++){

                //DETHYNÀÌ Y(AGONALDD´Â nullÀÌ°í DETHDT°¡ ÀÖÀ»¶§)
                if(model.getValue(xHospiceListPath + "[" + i + "]/dethyn") == 'Y'){

                    dethPid = model.getValue(xHospiceListPath + "[" + i + "]/pid");
                    dethNm = model.getValue(xHospiceListPath + "[" + i + "]/hngnm");
                    dethDt = model.getValue(xHospiceListPath + "[" + i + "]/dethdt");
                    dethDt = dethDt.substring(0, 4) + '/' + dethDt.substring(4, 6) + '/' + dethDt.substring(6,8);

                    dethMsg +=  dethPid + ' ' + dethNm+ '´Ô ÀÓÁ¾. ÀÓÁ¾ÀÏ:' + dethDt + '\r\n';
                }
            }
            if(dethMsg != ''){
                //alert(dethMsg);
                if(messageBox("»ç¸Áµî·ÏÇöȲ"+ '\r\n'+dethMsg+ '\r\n'+"»ç¸Áó¸® ÇϽðڽÀ´Ï±î?","Q") != 6) return;
                    fAgonalUpdate();
                    fSearch();
            }

            //ÀԽǴë±âÀÚ¼ö¸¦ Á¶È¸ÇÑ´Ù.
          //  fCntSearch();

        }else{
            messageBox('Á¶È¸¸¦', 'E009');
            return false;
        }

    }

    /**
     * @group  :
     * @ver    : 2008.05.22
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : »ç¸Áµî·Ï 󸮰¡ µÈ ȯÀÚ¸¦ È£½ºÇǽº Å×ÀÌºí¿¡ »ç¸Áµî·ÏÀ»¾÷µ¥ÀÌÆ® ÇÑ´Ù.
     * @param  :
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fAgonalUpdate(){
        var RowCnt = grd_hospicelist.rows -  grd_hospicelist.fixedRows;
        var xHospiceListPath = '/root/main/hospice/hospicelist';

        var sDethData =
              "pid"                                                         //01 µî·Ï¹øÈ£
            + "¢Ëcretdt"                                                    //02 »ý¼ºÀÏÀÚ
            + "¢Ëreqdeptcd"                                                 //03 ÀÇ·Ú°ú
            + "¢Ëreqdd"                                                     //04 ÀÇ·ÚÀÏ
            + "¢Ëinstcd"                                                    //05 º´¿ø±â°üÄÚµå
            + "¢Ëstat"                                                      //06 È£½ºÇǽº»óÅÂ
            + "¢Ëdethdt"                                                    //07 »ç¸Á½Ã°£
            + "¢Ëexptresn"                                                  //08 Á¦¿Ü»çÀ¯
            + "¢Ëdschtype"                                                  //09 Åð¿ø»çÀ¯
            + "¢Ì"   ;

        for(var i = 1; i <= RowCnt ; i++){
            //DETHYNÀÌ Y(AGONALDD´Â nullÀÌ°í DETHDT°¡ ÀÖÀ»¶§)
            if(model.getValue(xHospiceListPath + "[" + i + "]/dethyn") == 'Y'){

            // Á¦¿Ü»çÀ¯(exptresn)°¡ ÀÓÁ¾(03)
            // Åð½Ç»çÀ¯(dschtype)°¡ º´¿øÀÓÁ¾(01)
                sDethData +=
                             model.getValue(xHospiceListPath + "[" + i + "]/pid")                      //01 µî·Ï¹øÈ£
                    + "¢Ë" + model.getValue(xHospiceListPath + "[" + i + "]/cretdt")                   //02 »ý¼ºÀÏÀÚ
                    + "¢Ë" + model.getValue(xHospiceListPath + "[" + i + "]/reqdeptcd")                //03 ÀÇ·Ú°ú
                    + "¢Ë" + model.getValue(xHospiceListPath + "[" + i + "]/reqdd")                    //04 ÀÇ·ÚÀÏ
                    + "¢Ë" + model.getValue(xHospiceListPath + "[" + i + "]/instcd")                   //05 º´¿ø±â°üÄÚµå
                    + "¢Ë" + model.getValue(xHospiceListPath + "[" + i + "]/stat")                     //06 È£½ºÇǽº»óÅÂ
                    + "¢Ë" + (model.getValue(xHospiceListPath + "[" + i + "]/dethdt")).substring(0, 8) //07 »ç¸Á½Ã°£
                    + "¢Ë" + "03"                                                                      //08 Á¦¿Ü»çÀ¯
                    + "¢Ë" + "01"                                                                      //09 Åð¿ø»çÀ¯
                    + "¢Ì" ;
            }
        }

        model.removenode("/root/send");
        model.makeNode("/root/send");
        model.makeValue("/root/send/sDethData"        ,sDethData );

        submit('TXMNH02906');

    }



    /**
     * @group  :
     * @ver    : 2007.04.10
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : ±×¸®µå Ŭ¸¯½Ã..ȯÀÚ»ó¼¼Á¤º¸ Á¶È¸
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fClicedGrid(){
        if(grd_hospicelist.row == 0){
            return;
        }
        model.resetInstanceNode("/root/main/hospiceinfo/hospicedetl");
        model.refresh();
        var iRow = -1;
        iRow = grd_hospicelist.row;

        var RowCnt = grd_hospicelist.rows -  grd_hospicelist.fixedRows;
        if(RowCnt < 1){
            grd_hospicelist.row = 1;
            return;
        }
        model.removenode("/root/send");
        model.makeValue("/root/send/pid",           model.getValue("/root/main/hospice/hospicelist"+"["+iRow+"]/pid"));
        model.makeValue("/root/send/indd",          model.getValue("/root/main/hospice/hospicelist"+"["+iRow+"]/indd"));
        model.makeValue("/root/send/cretno",        model.getValue("/root/main/hospice/hospicelist"+"["+iRow+"]/cretno"));
        model.makeValue("/root/send/cretdt",        model.getValue("/root/main/hospice/hospicelist"+"["+iRow+"]/cretdt"));
        model.makeValue("/root/send/reqformrecseq", model.getValue("/root/main/hospice/hospicelist"+"["+iRow+"]/reqformrecseq"));
        model.makeValue("/root/send/pamcgubun",     model.getValue("/root/main/hospice/hospicelist"+"["+iRow+"]/stat"));
        model.makeValue("/root/send/reqdeptcd",     model.getValue("/root/main/hospice/hospicelist"+"["+iRow+"]/reqdeptcd"));
        model.makeValue("/root/send/reqdd",         model.getValue("/root/main/hospice/hospicelist"+"["+iRow+"]/reqdd"));

        if(submit("TRMNH02902")){

            //Áø´Ü¸í
            cmb_diagcd1.dispatch("xforms-value-changed");

            /*
            var indd = model.getValue('/root/main/hospiceinfo/hospicedetl/indd');
            if(indd == '00000000'){
                cmb_exptresn.disabled = false;
                cmb_dschtype.disabled = true;
            }else{
                cmb_exptresn.disabled = true;
                cmb_dschtype.disabled = false;
            }
            */

            //º»¿øŸ¿ø
            if(cmb_reqtypeflag.value=="1"){
                cmb_reqhospnm.disabled=true;
            }else if(cmb_reqtypeflag.value=="2"){
                cmb_reqhospnm.disabled=false;
            }
            if(ipt_intvdd.value == ""){
                ipt_intvdd.value = getCurrentDate();
            }
        }else{
            messageBox('Á¶È¸¸¦', 'E009');
            return false;
        }


        model.refresh();
    }

    /**
     * @group  :
     * @ver    : 2007.04.10
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : È­¸é ·Îµå½Ã
     * @param  :  7ÀÏ
     * @return : ÇöÀ糯¥¿¡¼­ -7ÀÏÇÑ ³¯Â¥
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
    */
     function getAddDay(addend){
        var backDate ="";
        var Now = new Date();
        // (¿À´Ã³¯Â¥ÀÇ  Time - (ÇÏ·ç * 7))
        Now.setTime(Now.getTime()-(86400000*addend));
        NowYear = Now.getYear();// ³â
        NowMonth = Now.getMonth()+1;// ¿ù
        NowDay = Now.getDate(); // ÀÏ
        backDate += NowYear ; //³âµµ
        if (NowMonth < 10 ) backDate += "0" + NowMonth ;
        else backDate += (Now.getMonth() + 1);
        if (NowDay < 10 ) backDate += "0" + NowDay ;
        else backDate += (Now.getDate());

        return backDate ;
    }


    /**
     * @group  :
     * @ver    : 2007.04.10
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : È£½ºÇǽº ȯÀÚ°ü¸® ÀúÀå
     * @param  :
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */

    var xDetlPath = '/root/main/hospiceinfo/hospicedetl';

    function fSave(waitstat){

        if(fIsValid(waitstat)){


            model.removenode("/root/send");
            model.makeNode("/root/send");
            model.copyNode("/root/send", xDetlPath);

            if(submit("TXMNH02903")){
                var RowCnt = grd_hospicelist.rows -  grd_hospicelist.fixedRows;
                if(RowCnt < 1){
                    return;
                }
            }

            fSearch();
        }

     }


    /**
     * @group  :
     * @ver    : 2007.11.19
     * @by     : dhkim
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @param  : saveWaitStat(ȯÀÚ°ü¸®³»¿ªÀúÀ屸ºÐ : S, ´ë±âÀÚÀüȯ±¸ºÐ : W)
     * @param  :
     * @return :
     * @desc   : È£½ºÇǽº ȯÀÚ°ü¸®³»¿ªÀ» ÀúÀåÇϱâ Àü À¯È¿¼º üũ¸¦ ½ÇÇàÇÑ´Ù.
     *       R  (ÀÇ·Ú) : ¸é´ãÀÏÀÌ(intvdd)ÀԷµȻóÅÂ
     *       W  (´ë±â) : ´ë±âÀÚ·Î ÀúÀå ¹öÆ° Ŭ¸¯Çؼ­ µé¾î¿Â °æ¿ì (ÀÇ·ÚÄÁ¼³Æ®·Î µé¾î¿Â ȯÀÚÀΰæ¿ì³ª ¿Ü·¡ÀÔ¿ø¿¹¾àÀ» ÇÏ¿© ÀÔ¿øÇØ Àִ ȯÀÚÀÇ °æ¿ì)
     *               ´ë±âÀÏÀÚ(waitdt)´Â ÇöÀçÀÏÀÚ, ÀÔ½ÇÀÏÀÚ(inrmdt), Åð½Ç(Á¦¿Ü)ÀÏ(enddd), Á¦¿Ü»çÀ¯(exptresn), Åð½Ç»çÀ¯(dschtype), ÀÓÁ¾ÀÏÀÚ(agonaldd)¸¦ null·Î ³Ñ±ä´Ù.
     *       I  (ÀÔ½Ç) : ÀÔ½ÇÀÏÀÚ(inrmdt)°¡ ÀԷµǾîÀÖ´Â »óÅÂ, ½ÇÁ¦ÀÔ¿øµÇ¾î Àִ ȯÀÚÁß È£½ºÇǽº º´µ¿(º´µ¿ÄÚµå : '3050136000')ÀÌ ¾Æ´Ò¶§ ÀÔ½ÇÀÏÀÚ°¡ ÀÔ·ÂµÇ¸é °æ°í¸Þ¼¼Áö¸¦ Ãâ·ÂÇÑ´Ù.
     *       L  (Åð½Ç) : Åð½Ç(Á¦¿Ü)ÀÏÀÌ ÀԷµǰí, Åð¿ø»çÀ¯°¡ ÀÔ·ÂµÈ »óÅÂ..
     *       O  (Á¦¿Ü) : Á¦¿Ü»çÀ¯°¡ ÀԷµǰí Åð½Ç(Á¦¿Ü)ÀÏÀÌ ÀÔ·ÂµÈ »óÅÂ...
     *
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
    */

    function fIsValid(saveWaitStat){


        var agonaldd    = model.getValue(xDetlPath + "/agonaldd");  //ÀÓÁ¾ÀÏ Ã¼Å©
        var enddd       = model.getValue(xDetlPath + "/enddd");     //Á¾°áÀÏ
        var status  = model.getValue(xDetlPath + "/status");    //»óÅÂ(ÄÁ¼³Æ®ÀÇ·ÚO, ÀÔ¿ø¿¹¾à¸¸I, ÀÔ¿ø¿¹¾àÇؼ­ Àç¿øS)
        var dschtype    = model.getValue(xDetlPath + "/dschtype");  //Åð¿ø»çÀ¯
        var exptresn    = model.getValue(xDetlPath + "/exptresn");  //Á¦¿Ü»çÀ¯
        var inrmdt  = model.getValue(xDetlPath + "/inrmdt");    //ÀÔ½ÇÀÏÀÚ
        var inrmtm  = model.getValue(xDetlPath + "/inrmtm");    //ÀԽǽð£

        if((inrmdt == "")||(inrmdt == null)){
            model.setValue(xDetlPath + "/inrmtm",   "");        //ÀԽǽð£
        }else{
            model.setValue(xDetlPath + "/inrmtm",   getCurrentTime().substr(0,4));  //ÀԽǽð£
        }

        var intvdd  = model.getValue(xDetlPath + "/intvdd");    //¸é´ãÀÏÀÚ
        var wardcd  = model.getValue(xDetlPath + "/wardcd");    //º´½ÇÄÚµå
        var waitstat    = model.getValue(xDetlPath + "/waitstat");  //´ë±â»óÅÂ(ÀÇ·ÚR, ´ë±âW, ÀÔ½ÇI, Åð½ÇL, Á¦¿ÜO)

        if(model.getValue("/root/main/hospiceinfo/hospicedetl/pid") == ""){
            messageBox("ÀúÀåÇÒ È¯ÀÚ¸¦ ","C002");
            return false;
        }

        //´ë±âÀÚÀúÀå
        if(saveWaitStat == "W"){
            if(model.getValue(xDetlPath + "/waitstat") == "W") {
                messageBox("´ë±âÀÚÀΠȯÀÚÀÔ´Ï´Ù.","E");
                return;
            }
            if(messageBox("´ë±âÀÚ·Î ÀüȯÇϽðڽÀ´Ï±î?","Q") != 6) return;

            //´ë±â»óÅ À϶§ ÀÇ·ÚÄÁ¼³Æ®, ÀÔ¿ø¿¹¾à+ÀÔ¿øȯÀÚÀÇ °æ¿ì
            //´ë±â»óÅ´ W, ´ë±âÀÏÀÚ´Â currentDate,
            //¸é´ãÀÏ, Á¾°áÀÏ, Á¦¿Ü»çÀ¯, Åð¿ø»çÀ¯, ÀÓÁ¾ÀÏ, ÀÓÁ¾Àå¼Ò nulló¸®

            model.setValue(xDetlPath + "/waitstat", "W");
            model.setValue(xDetlPath + "/waitdt",   getCurrentDate());
            model.setValue(xDetlPath + "/inrmdt",   "");
            model.setValue(xDetlPath + "/inrmtm",   "");
            model.setValue(xDetlPath + "/enddd",    "");
            model.setValue(xDetlPath + "/exptresn", "");
            model.setValue(xDetlPath + "/dschtype", "");
            model.setValue(xDetlPath + "/agonaldd", "");
            model.setValue(xDetlPath + "/agonaldd", "");


        }
        //saveWaitStat°¡ W(´ë±â)»óÅ »©°í´Â ÀüºÎ SÀÓ....(¸é´ã, ÀÔ¿ø, Á¾°á , Åð½Ç)
        else if(saveWaitStat == "S"){
            if(messageBox("","Q002") != 6) return;


            //¸é´ãÀÏÀÚ°¡ ÀԷµǸé waitstat´Â R(ÀÇ·Ú)
            if(intvdd != "" && waitstat != "W"){
                model.setValue(xDetlPath + "/waitstat", "R");
                model.setValue(xDetlPath + "/waitdt",   "");
            }

            //ÀÔ½ÇÀÏÀÚ ÀÖÀ¸¸é waitstat´Â I(ÀÔ½Ç),
            //Á¾°áÀÏÀÌ ÀԷµǾîÀÖÁö ¾ÊÀ¸¸é Á¦¿Ü»çÀ¯, Åð¿ø»çÀ¯, ÀÓÁ¾ÀÏ nulló¸®
            if(inrmdt!=""){

                //½ÇÁ¦ÀÔ¿øµÇ¾î Àִ ȯÀÚÁß È£½ºÇǽº º´µ¿(º´µ¿ÄÚµå : '3050136000')ÀÌ ¾Æ´Ò¶§ ÀÔ½ÇÀÏÀÚ°¡ ÀÔ·ÂµÇ¸é °æ°í¸Þ¼¼Áö¸¦ Ãâ·ÂÇÑ´Ù.
                if(wardcd == '3050136000'){
                    model.setValue(xDetlPath + "/waitstat","I") ;
                }else{
                    messageBox('È£½ºÇǽºº´µ¿¿¡ ÀÔ¿øÇÑ È¯ÀÚ°¡ ¾Æ´Ï¹Ç·Î ÀÔ½ÇÀÏÀ» ÀÔ·Â', 'E001');
                    model.setValue(xDetlPath + "/inrmdt", "");
                    model.setValue(xDetlPath + "/inrmtm", "");
                    return false;
                }
            }

            //Á¦¿ÜÀÏ(enddd)ÀÌ ÀԷµǾî ÀÖÀ¸¸é Á¦¿Ü»çÀ¯(exptresn)³ª Åð¿ø»çÀ¯(dschtype)Áß Çϳª°¡ ¹Ýµå½Ã ÀԷµǾî¾ßÇÑ´Ù.
            //Á¦¿ÜÀÏ(enddd)ÀÌ ÀԷµǾî ÀÖÀ»¶§ Á¦¿Ü»çÀ¯(exptresn)°¡ ÀÓÁ¾(03)À̸é agonaldd¿¡ enddd³Ö¾îÁÜ..
            //Á¦¿ÜÀÏ(enddd)ÀÌ ÀԷµǾî ÀÖÀ»¶§ Åð½Ç»çÀ¯(dschtype)°¡ º´¿øÀÓÁ¾(01)À̸é agonaldd¿¡ enddd³Ö¾îÁÜ..
            if(enddd==""){
                model.setValue(xDetlPath + "/exptresn","")
                model.setValue(xDetlPath + "/dschtype","")
                model.setValue(xDetlPath + "/agonaldd","")
            }else if(enddd!=""){
                //Åð½ÇÀÏ
                if(dschtype!=""){
                    if(dschtype == '01'){
                        model.setValue(xDetlPath + "/agonaldd", enddd);
                    }
                    model.setValue(xDetlPath + "/waitstat","O");

                }
                //Á¦¿ÜÀÏ
                if(exptresn!=""){
                    if(exptresn == '03'){
                        model.setValue(xDetlPath + "/agonaldd", enddd);
                    }
                    model.setValue(xDetlPath + "/waitstat","O");
                }
                if(dschtype == '' && exptresn == ''){//Åð½ÇÀÏ,Á¦¿ÜÀÏÀÌ ³ÎÀ϶§)
                    messageBox("Á¦¿Ü»çÀ¯³ª Åð¿ø»çÀ¯¸¦ ","C001");
                    return false;
                }
            }

        }

        return true;

    }


    /**
     * @group  :
     * @ver    : 2007.05.14
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : popup  ±â·ÏÁöµî·ÏÈ­¸éÀ» È£ÃâÇÑ´Ù.
     *       inpt¿¡ µî·ÏµÇ¾î Àִ ȯÀÚ¸¸ (status : O, S) ±â·ÏÁö¸¦ È£Ãâ ÇÒ ¼ö ÀÖ´Ù.
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fhospice_popmenu(){

        var hngnm = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/hngnm");

        if(model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/status") == "I"){
            messageBox(hngnm +" ȯÀÚ´Â ÀÔ½ÇȯÀÚ°¡ ¾Æ´Ï¹Ç·Î ±â·ÏÁö¸¦ ¿­ ¼ö","I004");
            return;
        }else if(model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/stat") == "R" ){
            messageBox(hngnm +" ȯÀÚ´Â ´ë±â(ÀÔ½Ç)ȯÀÚ°¡ ¾Æ´Ï¹Ç·Î ±â·ÏÁö¸¦ ¿­ ¼ö","I004");
            return;
        }


        var RowCnt = grd_hospicelist.rows -  grd_hospicelist.fixedRows;
        if(RowCnt < 1){
            grd_hospicelist.row = 1;
            return;
        }
        //È£½ºÇǽº ±â·ÏÁö¸¦ ¶ç¿ï¶§ pid, cretdt°¡ ÇÊ¿äÇÔ...

        setParameter("pid",    model.getValue("/root/main/hospice/hospicelist"+"["+(grd_hospicelist.row)+"]/pid"));
        setParameter("cretdt", model.getValue("/root/main/hospice/hospicelist"+"["+grd_hospicelist.row+"]/cretdt"));
        setParameter("reqdeptcd", model.getValue("/root/main/hospice/hospicelist"+"["+grd_hospicelist.row+"]/reqdeptcd"));
        setParameter("reqdd", model.getValue("/root/main/hospice/hospicelist"+"["+grd_hospicelist.row+"]/reqdd"));
        setParameter("wardcd", model.getValue("/root/main/hospice/hospicelist"+"["+grd_hospicelist.row+"]/wardcd"));


        modal("SMMNH01500",1,50,50);    //È£½ºÇǽº±â·ÏÁö

    }



    /**
     * @group  :
     * @ver    : 2007.05.14
     * @by     : ÇÏÀç·û


     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : ȯÀÚ±¸ºÐ¿¡µû¶ó ÀÎDz¹Ú½ºÈ°¼ºÈ­ ¿©ºÎ
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fPamcChange() {

        var idx = model.getValue("/root/temp/pamcgubun");
        if(idx=="A"){//Àüü
            caption26.visible   = false;
            cmb_expt.visible    = false;    //Á¦¿Ü»çÀ¯
            caption30.visible   = false;
            ipt_pid.visible     = false;    //µî·Ï¹øÈ£
            cmb_exptresn.disabled = false;
            cmb_dschtype.disabled = true;
        }else if(idx=="R"){//ÀÇ·Ú
            caption26.visible   = false;
            cmb_expt.visible    = false;    //Á¦¿Ü»çÀ¯
            caption30.visible   = false;
            ipt_pid.visible     = false;    //µî·Ï¹øÈ£
            cmb_exptresn.disabled = false;
            cmb_dschtype.disabled = true;
        }else if(idx=="W"){//´ë±â
            caption26.visible   = false;
            cmb_expt.visible    = false;    //Á¦¿Ü»çÀ¯
            caption30.visible   = false;
            ipt_pid.visible     = false;    //µî·Ï¹øÈ£
            cmb_exptresn.disabled = false;
            cmb_dschtype.disabled = true;
        }else if(idx=="I"){//ÀÔ½Ç
            caption26.visible   = false;
            cmb_expt.visible    = false;    //Á¦¿Ü»çÀ¯
            caption30.visible   = false;
            ipt_pid.visible     = false;    //µî·Ï¹øÈ£
            cmb_exptresn.disabled = true;
            cmb_dschtype.disabled = false;
        }else if(idx=="L"){//Åð½Ç
            caption26.visible   = false;
            cmb_expt.visible    = false;    //Á¦¿Ü»çÀ¯
            caption30.visible   = true;
            ipt_pid.visible     = true;     //µî·Ï¹øÈ£
            cmb_exptresn.disabled = true;
            cmb_dschtype.disabled = false;
        }else if(idx=="O"){//Á¦¿Ü
            caption26.visible   = true;
            cmb_expt.visible    = true;     //Á¦¿Ü»çÀ¯
            caption30.visible   = false;
            ipt_pid.visible     = false;    //µî·Ï¹øÈ£
            cmb_exptresn.disabled = false;
            cmb_dschtype.disabled = true;
        }

        model.removenodeset("/root/main/hospice/hospicelist");
        model.resetInstanceNode("/root/main/hospiceinfo/hospicedetl");
        model.refresh();
     }



    /**
     * @group  :
     * @ver    : 2007.11.19
     * @by     : dhkim
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   :
     * @access : public
     * @desc   : Á¦¿Ü»çÀ¯ÀԷ½à Åð¿ø»çÀ¯ÀԷºҰ¡Ã³¸®,
     *       Åð¿ø»çÀ¯ÀÔ·Á½Ã Á¦¿Ü»çÀ¯ÀԷºҰ¡Ã³¸®
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
     function fIsExptresnDisabledYn(){

        //Á¦¿Ü»çÀ¯
        var exptresn = model.getValue('/root/main/hospiceinfo/hospicedetl/exptresn');
        if(exptresn != ''){
            model.setValue('/root/main/hospiceinfo/hospicedetl/dschtype', '');
            model.setValue('/root/main/hospiceinfo/hospicedetl/enddd', currentdate);
            cmb_dschtype.disabled = false;
            cmb_exptresn.disabled = true;
        }else{
            cmb_dschtype.disabled = true;
            cmb_exptresn.disabled = false;
        }

        //Åð¿ø»çÀ¯
        var dschtype = model.getValue('/root/main/hospiceinfo/hospicedetl/dschtype');

        if(dschtype != ''){
            model.setValue('/root/main/hospiceinfo/hospicedetl/exptresn', '');
            model.setValue('/root/main/hospiceinfo/hospicedetl/enddd', currentdate);
            cmb_exptresn.disabled = false;
            cmb_dschtype.disabled = true;
        }else{
            cmb_exptresn.disabled = true;
            cmb_dschtype.disabled = false;
        }

        model.refresh();

     }



     /**
     * @group  :
     * @ver    : 2007.06.29
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : Hospice follow up sheet
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fhospice_follow(){
        var hngnm = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/hngnm");
        if( model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/inrmdt") == ""
        && model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/waitdt") == "" ){
            messageBox(hngnm +" ȯÀÚ´Â ´ë±â(ÀÔ½Ç) ÀÌ·ÂÀÌ ¾øÀ¸¹Ç·Î Hospice follow up sheet¸¦ ¿­ ¼ö","I004");
            return;
        }

        var RowCnt = grd_hospicelist.rows -  grd_hospicelist.fixedRows;
        if(RowCnt < 1){
            grd_hospicelist.row = 1;
            return;
        }

        var pid    = setParameter("pid",model.getValue("/root/main/hospice/hospicelist"+"["+grd_hospicelist.row+"]/pid"));
        var cretno = setParameter("cretno",model.getValue("/root/main/hospice/hospicelist"+"["+grd_hospicelist.row+"]/cretno"));
        var cretdt = setParameter("cretdt",model.getValue("/root/main/hospice/hospicelist"+"["+grd_hospicelist.row+"]/cretdt"));
        var indd   = setParameter("indd",model.getValue("/root/main/hospice/hospicelist"+"["+grd_hospicelist.row+"]/indd"));


        modal("SMMNH01400",1,50,50);

    }


     /**
     * @group  :
     * @ver    : 2007.06.29
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : »çº°°¡Á· °ü¸®
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fhospice_agonal(){

        var RowCnt = grd_hospicelist.rows -  grd_hospicelist.fixedRows;

        if(RowCnt < 1){
            grd_hospicelist.row = 1;
            return;
        }
        modal("SMMNH00700",1,50,50);

    }


     /**
     * @group  :
     * @ver    : 2007.06.29
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : ȯÀÚ°¡Á· µî·Ï
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fhospice_famy(){

        var pid = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/pid");
        var hngnm = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/hngnm");
        var sexage = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/sexage");
        var rrgstno = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/rrgstno");

        var RowCnt = grd_hospicelist.rows -  grd_hospicelist.fixedRows;
        if(RowCnt < 1){
            grd_hospicelist.row = 1;
            return;
        }

        setParameter("pid", pid);
        setParameter("hngnm", hngnm);
        setParameter("sexage", sexage);
        setParameter("rrgstno", rrgstno);

        modal("SMMNH03500",1,50,50);

    }




     /**
     * @group  :
     * @ver    : 2007.06.29
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : È£½ºÇǽº ȸ½Å±â·Ï
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fhospice_rec(){
        var hngnm         = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/hngnm");
        var status        = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/status");
        var reqformrecseq = model.getValue("/root/main/hospice/hospicelist["+ grd_hospicelist.row + "]/reqformrecseq");
        if(status != "O" ){
            messageBox(hngnm +" ȯÀÚ´Â ÄÁ¼³Æ® ÀÇ·ÚȯÀÚ°¡ ¾Æ´Ï¹Ç·Î ȸ½Å±â·Ï È­¸éÀ» º¼ ¼ö ","I004");
            return;
        }
        //setParameter("openmode", "recform");
        //setParameter("formrecseq", reqformrecseq);

        setParameter("openmode", "reccnstform");
        setParameter("formrecseq", reqformrecseq);  //¼­½Ä±â·ÏÅ×À̺íÀÇ formrecseq(±â·Ï¼ø¹ø)

        setParameter("userdeptcd", "2390000000");

        modal("../../../emr/medirecweb/xrw/SSMMR01100_¼­½Ä·Î´õ.xrw", 1, 0, 0 ,"", "", "");


    }


    /**
     * @group  :
     * @ver    : 2007.07.19
     * @by     : ÇÏÀç·û
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : È£½ºÇǽº ÀԽǴë±â ȯÀÚ¼ö¸¦ Á¶È¸
     *           ÀԽǴë±âÀÚ¼ö¸¦ Á¶È¸ÇÏ¿© ÀԽǴë±âÀÚ¼öÇʵ忡 Ä«¿îÆ®½ÃŲ´Ù.
     *           ÀԽǴë±âÀÚ¼ö´Â ´ë±âÀÚ¸í´ÜÁß¿¡ ÀÔ½Ç º´µ¿ÀÌ È£½ºÇǽºÀÎ °Í¸¸ Ä«¿îÆ® ½ÃŲ´Ù.
     *           ÀԽǴë±âÀÚ¼ö°¡ 1º¸´Ù ÀÛÀ¸¸é ÀԽǵî·Ï¹öÆ°À» ºñÈ°¼ºÈ­ÇÏ°í 0º¸´ÙÅ©¸é È°¼ºÈ­ ½ÃŲ´Ù.
     * @param  :
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */

    function fCntSearch(){
        if((model.getValue("/root/main/cond/fbrthdd")=='')||(model.getValue("/root/main/cond/lbrthdd")=='')){
            messageBox("Á¶È¸±â°£ÀÇ ³¯Â¥¸¦ ","C001");
            return;
        }

        model.removenode("/root/send");
        model.removenode("/root/hidden");

        model.makeValue("/root/send/fbrthdd", model.getValue("/root/main/cond/fbrthdd"));
        model.makeValue("/root/send/lbrthdd", model.getValue("/root/main/cond/lbrthdd"));

        if(!submit("TRMNH02904")){
            messageBox('Á¶È¸¸¦', 'E009');
            return false;
        }else{
            model.makeValue("/root/hidden/cnt", model.getValue("/root/temp/htfa/htfacnt/rownum"));

            opt_cnt.refresh();
            fromdd = model.getValue("/root/main/cond/fbrthdd");
            todd   = model.getValue("/root/main/cond/lbrthdd");

            var cnt = opt_cnt.value;
            if(Number(cnt) > 0)
                btn_ipt.disabled = false;
            else
                btn_ipt.disabled = true;
        }

     }



    

    /**
     * @group  :
     * @ver    : 2007.12.16
     * @by     : dhkim
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     * @type   : function
     * @access : public
     * @desc   : ÀԽǴë±âÀÚ°¡ ÀÖÀ»¶§ ÀԽǵî·Ï¹öÆ°À» Ŭ¸¯Çϸé È£ÃâµÈ´Ù.<b>
     *           ÀԽǴë±âÀÚ¼ö´Â µû·Î Á¶È¸¸¦ ÇØ ¿Í¼­ ÀԽǵî·Ï ¹öÆ°À» ´©¸£¸é ÇØ´ç ´ë±âȯÀÚµé Á¤º¸¸¦ °¡Áö°í ÀÖ´Ù°¡
     *           ÀԽǻóÅ waitstat : I, ÀÔ½ÇÀÏÀ» µî·ÏÀÏÀÚ·Î ¹Ù²ãÁØ´Ù.
     *           ÀԽǴë±âÀÚ¼ö°¡ 1º¸´Ù ÀÛÀ¸¸é ÀԽǵî·Ï¹öÆ°À» ºñÈ°¼ºÈ­ÇÏ°í 0º¸´ÙÅ©¸é È°¼ºÈ­ ½ÃŲ´Ù.
     * @param  :
     * @param  :
     * @return :
     * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     */
    function fWaitPsnInRoom(){

        model.removenode('/root/send');
        model.makeValue('/root/send/htfacnt', grd_htfawaitInfo.getUpdateDataAll('u'));

        if(!submit('TXMNH02905')){
            messageBox('Á¶È¸¸¦', 'E009');
            return false;
        }


    }