/* ---------------------------------------------------------------------

      ¼ö¼ú¸¶Ãë¸ÞÀÎ (SMMNP00100.xfm - JScript )

      - Version :
          1)  : Ver.1.00.01
              : Create By  Francis Choi
              : 2015.05.02
   ----------------------------------------------------------------------  */

 var s1="";

 /**
 * @group  :
 * @ver    : 2007.04.17
 * @by     : Choi HakRok
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¼ö¼ú ¿¹¾àÁ¤º¸ °¡Á®¿À±â
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function fInit(){
 	
    //grp_opm.visible    =  true;
    //roundrect1.visible = true;
    //cap_state.visible  = true;
    //¼ö¼ú¸í, Áø´Ü¸í,¼ö¼úÈÄ ¼ö¼ú¸í ¸ðµÎ º¸À̱â.2012.01.17_ ¼Õ¼ºÈÆ.
    chk_opnmen.value = "Y";
    chk_diagnmkr.value = "Y";
    chk_diagnmen.value = "Y";		
    chk_opnmkr.value = "Y";
    chk_afopnm.value = "Y";
    group1.visible = true;
    grp_opmdisc.visible = true;
    group5.visible = false;

    var param = getScreenMenuParameter();
    var node = getGlobalVariable("operation");
    setCSVToNode("/root/main/operation", node);
    inp_opddfr.value  = getCurrentDate();
    inp_opddto.value  = getCurrentDate();

    grd_oppatlist.explorerbar  = "sortshow";

    model.setValue("/root/main/cond/usernm", getUserName()   );
    model.setValue("/root/main/cond/orddd" , getCurrentDate());//¾÷¹«ÀÏÀÚ(Order Manage Á¶È¸ÀÏÀÚ)

    model.removenode("/root/send");
    model.makeValue("/root/send/flag"      , "X"    );
    model.makeValue("/root/send/searchitem", "XX"   );
    model.makeValue("/root/send/deptflag"  , "011"  );

    submit("TRMNP00107", false);
    submit("TRMNP03004", false) // ¼ö¼ú½Ç(Rosette) °¡Á®¿À±â
    model.removenode("/root/send");
	  model.makeNode("/root/send");
	  model.makeValue("/root/send/opcnfmdd" ,model.getValue("/root/main/cond/opddfr") );
	  model.makeValue("/root/send/rosette" ,model.getValue("/root/main/cond/oprosette"));
	  submit("TRMNP03002", false); // ¼ö¼ú½ÇÄÚµå °¡Á®¿À±â
	  addComboItem("cmb_oproomlist","Àüü","","above");

    //addComboItem("cmb_oproomlist", "Àü ü", "", "above" );   //2009-03-16 TRMNP03004 Ãß°¡·Î ÀÎÇÏ¿© »èÁ¦ ó¸®
    addComboItem("cmb_orddept"      , "Àü ü" , "" , "above" );
    addComboItem("cmb_ccrtstatlist" , "Àü ü" , "" , "above" ); //2009/01/07 Ãß°¡ºÎºÐ
    addComboItem("cmb_rosette"      , "Àü ü" , "" , "above" );

    if( param == "ordmn" ) {//¸Þ´º¸¦ ÅëÇØ Order Manage¸¦ ¼±ÅÃÇÑ °æ¿ì
      fSeletedToggle( param );
    }else {
      fSelectPos();
    }
 }

/* --------------------------------------------------*/
/* type   : function                                 */
/* access : public                                   */
/* desc   : ¼ö¼ú/¸¶Ãë ¸ÞÀÎ Á¶È¸                      */
/* param  :                                          */
/* return :                                          */
/* --------------------------------------------------*/
function fSelectPos() {
    var iRows = -1;
    var opflagcd, callyn;

    model.removenode("/root/send");
    model.makeNode("/root/send/reqdata"                                   );   //ÀúÀå ÈÄ Á¶È¸Á¶°Ç
    model.copyNode("/root/send/reqdata", "/root/main/cond");
    submit("TRMNP00100");

    iRows = getNodesetCount("/root/main/opPatlist/opPatInfo");

    var refMsg = model.getValue("/root/properties/error/msg");
    var refMsgCnt = refMsg.substring(0, 1);

    if( refMsgCnt == "0" ) {
        model.removeNodeset("/root/main/opPatlist/opPatInfo");
        if(chk_opnmen.value == "Y"){
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdenm")) = false;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "115";
    	}else{
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdenm")) = true;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "0";
    	}
    	if(chk_opnmkr.value == "Y"){
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdknm")) = false;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "115";
    	}else{
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdknm")) = true;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "0";
    	}
    	if(chk_afopnm.value == "Y"){
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("afopnm")) = false;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("afopnm")) = "115";
    	}else{
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("afopnm")) = true;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("afopnm")) = "0";
    	}
        model.refresh();
        return;
    }else {
        var ii      = 0 ;
        var wCnfmDT = "";
        var sRoomCd = "";
        var sPrcpCnt = 0;
        var sDispCnt = 0;
        var wRoomCd = model.getValue("/root/main/opPatlist/opPatInfo[1]/oproomcd");

        for(var i = 1; i<=iRows; i++) {
            wCnfmDT  =  model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/opcnfmdd")
                     +  model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/fstrgstdt").substr(0,4);

            model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/fstrgstdt", wCnfmDT);

            sRoomCd  = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/oproomcd");
            callyn   = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/callyn");
            opflagcd = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/opflagcd");

            if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/delivefact") != "") {
              grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("delivefactyn")) = "../../../com/commonweb/images/icon_list.gif";
            }else{
            	grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("delivefactyn")) = "";
            }

            if(model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp1") == "Y" ||
               model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp2") == "Y" ||
               model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp3") == "Y" ){
               sDispCnt++;
            }

            //°¨¿°Á¤º¸
            if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp1") == "Y") {
              grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp1img")) = "../../../com/hismainweb/images/injector_en.gif";
            }else{
            	  grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp1img")) = "";
            }
            if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp2") == "Y") {
              grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp2img")) = "../../../com/hismainweb/images/touch_en.gif";
            }else{
            	  grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp2img")) = "";
            }
            if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp3") == "Y") {
              grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp3img")) = "../../../com/hismainweb/images/air_en.gif";
            }else{
            	  grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp3img")) = "";
            }

            if(model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/uncnfm") != "0/0/0"){
            	 sPrcpCnt++;
            }

            //º¯°æ¿©ºÎ
            var cnfmcnclresncd = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd");
            if( ( cnfmcnclresncd == "302" )||( cnfmcnclresncd == "303" ) ) {//¼ö¼ú½Ã°£º¯°æ(ȯÀÚ, º´¿ø»çÀ¯)
                model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨à");
            }else if( cnfmcnclresncd == "305" ) {//¼ö¼úÁýµµÀÇ º¯°æ
                model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Û");
            }else if( cnfmcnclresncd == "301" ) {//¼ö¼ú¸í º¯°æ
                model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Ú");
            }else if( cnfmcnclresncd == "307" ) {//¸¶Ãë¹æ¹ý º¯°æ
                model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Í");
            }else if( cnfmcnclresncd == "306" ) {//¼ö¼ú¹æ º¯°æ
                model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Þ");
            }else if( cnfmcnclresncd == "308" ) {//¼ö¼úÁýµµ°ú º¯°æ
                model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Ð");
            }else if( cnfmcnclresncd == "309" ) {//¼ö¼úüÀ§ º¯°æ
                model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨ß");
            }else{
                model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "");
            }

            if( wRoomCd != sRoomCd ) {
                ii++;
                wRoomCd  = sRoomCd;
            }

            if( ii % 2 == 0 ) {//¦¼ö
               grd_oppatlist.rowstyle( i , "data", "background-color") = "#FFFFFF";
            }else {
               grd_oppatlist.rowstyle( i , "data", "background-color") = "#F7FFF7";
            }

            if( (opflagcd == "1")||(opflagcd == "3") ){//Á¤±Ô, Ãß°¡
               grd_oppatlist.rowstyle( i , "data", "color") = "#2D2D2D";
            }
            if( opflagcd == "2" ) {//ÀÀ±Þ
               grd_oppatlist.rowstyle( i , "data", "color") = "#D22D2D";
            }
            // 2008-03-13 ¼öÁ¤ ¿äûÀ¸·Î... // 2008-08-22 ¿ÀÀü 10:27:32 ÁÖ¼®ÇØÁ¦
            //if( opflagcd == "3" ) {//Ãß°¡
            //  grd_oppatlist.rowstyle( i , "data", "color") = "#000000";
            //}
            if( callyn == "Y" ) {//È£Ãâ¿©ºÎ
               grd_oppatlist.rowstyle( i , "data", "background-color") = "#c9d6b9";
            }
            if( opflagcd == "4" ) {//Ãë¼Ò
               grd_oppatlist.rowstyle( i , "data", "color") = "#2D2DD2";
            }
            if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/opstatcd").substr(1,1)=="9") {//ÀÓ½ÃÃë¼Ò
               grd_oppatlist.rowstyle( i , "data", "color") = "#2D2DD2";
            }
        }
        model.setValue("/root/temp/sPrcpCnt", sPrcpCnt);
        model.setValue("/root/temp/sDispCnt", sDispCnt);
        opt_prcpcnt.refresh();
        opt_dispcnt.refresh();
        if(chk_opnmen.value == "Y"){
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdenm")) = false;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "115";
    	}else{
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdenm")) = true;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "0";
    	}
    	if(chk_opnmkr.value == "Y"){
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdknm")) = false;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "115";
    	}else{
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdknm")) = true;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "0";
    	}
    	   	
    	if(chk_diagnmen.value == "Y"){
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("diagengnm")) = false;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "115";
    	}else{
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("diagengnm")) = true;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "0";
    	}    	
    	if(chk_diagnmkr.value == "Y"){
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("diagcdnm")) = false;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "115";
    	}else{
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("diagcdnm")) = true;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "0";
    	}
    	
    	if(chk_afopnm.value == "Y"){
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("afopnm")) = false;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("afopnm")) = "115";
    	}else{
    		grd_oppatlist.colHidden(grd_oppatlist.colRef("afopnm")) = true;
    		//grd_oppatlist.colWidth(grd_oppatlist.colRef("afopnm")) = "0";
    	}
    }
    model.refresh();
}

/* --------------------------------------------------*/
/* type   : function                                 */
/* access : public                                   */
/* desc   : ÄÞº¸¾ÆÀÌÅÛ Á¦°Å                          */
/* param  :                                          */
/* return :                                          */
/* --------------------------------------------------*/
function removeComboItem( comboID ) {

  var comboObj = document.all.item(comboID);
  var comboItemNodeSet = comboObj.choices.itemset.attribute("nodeset");
  model.removenode(comboItemNodeSet + "[1]");

  model.refresh();
}

/* --------------------------------------------------*/
/* type   : function                                 */
/* access : public                                   */
/* desc   : ÅÇ ¸Þ´º ¼±ÅÃó¸® ÇÔ¼ö                */
/* param  : selFlag : ¼±Åà ÅÇ ±¸ºÐ°ª           */
/* return :                                        */
/* --------------------------------------------------*/
function fSeletedToggle( selFlag ) {

	if(model.getValue("/root/main_om/cond/hopedd")==""){
		model.makeValue("/root/main_om/cond/hopedd",'4');
		model.makeValue("/root/main_om/cond/hopefmdd", '');
	  model.makeValue("/root/main_om/cond/hopetodd", '');
	}
		
  switch(selFlag) {
    case "opm" :
      model.toggle("opmain");
      fSelectPos();
      break;
    case "ordmn" :
      model.toggle("ordmanage");
      fGetOMPatList("op");
      break;
  }
}

/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : Choi HAkRok
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È­¸é»ó´ÜÁ¤º¸¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSetParam(){
    // ÀÔ¿øȯÀÚ È­¸é»ó´ÜÁ¤º¸ ¼³Á¤
    if(grd_oppatlist.rows == "1"){
        return;
    } else {
        var sPath = "/root/main/opPatlist/opPatInfo";
        var sPatFlag = model.getValue(sPath+"["+grd_oppatlist.row+"]/oppatflagcd");

        if (model.getValue(sPath+"["+grd_oppatlist.row+"]/opstatcd").substr(1,1)=="9") {
          messageBox('Ãë¼ÒµÈ ÀÚ·á´Â ¼±ÅÃ', 'E001');
          return;
        }

        //2008-08-28 ¿ÀÀü 9:26:44 taebum add ¼ö¼ú±â·Ï °ü·Ã ¿ä±¸»çÇ× Ã³¸®Áß
        var sOpenSusulOprsrvno = model.getAttribute("susulrec_oprsrvno");
        var sCurrentOprsrvno   = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/oprsrvno");

        if(sOpenSusulOprsrvno != null && sOpenSusulOprsrvno != "" && sOpenSusulOprsrvno != "undefined"){
            if(sOpenSusulOprsrvno != sCurrentOprsrvno){
                var sOpenSusulPid   = model.getAttribute("susulrec_pid"  );
                var sOpenSusulHngnm = model.getAttribute("susulrec_hngnm");
                messageBox("µî·Ï¹øÈ£ : "+sOpenSusulPid+"  "+sOpenSusulHngnm+"´ÔÀÇ ¼ö¼ú±â·Ï ÀÛ¼º Áß ÀÔ´Ï´Ù. ÀÛ¼º¿Ï·á ÈÄ ¼ö¼ú±â·ÏÀ» ´ÝÀ¸½Ã±â ¹Ù¶ø´Ï´Ù.", "");
                return;
            }
        }

        var sOpenTempOprsrvno = model.getAttribute("SuSulOrder_Temp_oprsrvno");
        if(sOpenTempOprsrvno != null && sOpenTempOprsrvno != "" && sOpenTempOprsrvno != "undefined"){
            if(sOpenTempOprsrvno != sCurrentOprsrvno){
                var sOpenTempPid   = model.getAttribute("SuSulOrder_Temp_pid");
                var sOpenTempHngnm = model.getAttribute("SuSulOrder_Temp_hngnm");

                messageBox("µî·Ï¹øÈ£ : "+sOpenTempPid+"  "+sOpenTempHngnm+"´ÔÀÇ ¼ö¼ú/¸¶Ãë °£È£Ã³¹æ ÀÛ¼º Áß ÀÔ´Ï´Ù. ÀÛ¼º¿Ï·á ÈÄ ¼ö¼ú/¸¶Ãë °£È£Ã³¹æÀ» ´ÝÀ¸½Ã±â ¹Ù¶ø´Ï´Ù.", "");
                return;
            }
        }

        //2008-08-30 ¿ÀÈÄ 2:52:48 taebum
        //ȯÀÚ±¸ºÐÀÌ DSCÀÏ °æ¿ì ¼ö¼ú±¸ºÐÀÌ Á¤±ÔÀ̸鼭 ÇöÀçÀÏÀÚ°¡ ¼ö¼úÀÏÀÚ ÀÌÀüÀÏ °æ¿ì CartList¸¸
        //ÀúÀåÇÒ ¼ö ÀÖµµ·Ï ¿Ü·¡»ó´ÜÁ¤º¸ ¼¼ÆÃ. ÈÄ ¼ö¼ú¸¶Ãë °£È£Ã³¹æ¿¡ parameter¸¦ Àü¼ÛÇÑ´Ù.
        /*
        var oppatflagnm = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/oppatflagnm");
        var opflagcdnm  = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/opflagcdnm");

        if((oppatflagnm == "DSC") && (opflagcdnm == "Á¤±Ô") && ( sCurrentdd < opcnfmdd ))
        */
        //2008-09-26 ¿ÀÀü 11:05:01 taebum DSC »Ó ¾Æ´Ï¶ó ¿Ü·¡·Î È®Á¤ÇÑ ÄÉÀ̽º¿¡µµ CartList ÀúÀå ¹× »ó´Ü Á¤º¸ »ý¼º¿äû Àû¿ëÁß.
        var sTmpIndd = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/iindd");
        var orddeptcd   = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/orddeptcd");
        var opcnfmdd    = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/opcnfmdd");
        var sCurrentdd  = getCurrentDate();
        var sInordtype  = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/inordtype");

        if(sTmpIndd == "" || sTmpIndd == null || sTmpIndd == "undefined"){
            var sTmpPid      = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/pid");

            model.removenode("/root/send");
            model.makeNode("/root/send/reqdata"            );   //ÀúÀå ÈÄ Á¶È¸Á¶°Ç
            model.makeValue("/root/send/reqdata/pid"     ,  sTmpPid);
            model.makeValue("/root/send/reqdata/opcnfmdd",  opcnfmdd);
            model.makeValue("/root/send/reqdata/orddeptcd", orddeptcd);

            submit("TRMNP00108");

            if(model.getValue("/root/HideData/otptinfo/pid") != ""&&model.getValue("/root/HideData/otptinfo/pid") != null &&model.getValue("/root/HideData/otptinfo/pid") != "undefined" ){
                if (sPatFlag == "") {
                    sPatFlag  = "O";
                }

                var param = "";
                if(sPatFlag == "D" || sPatFlag == "I" || sPatFlag == "E"){
                	 //¿Ü·¡È¯ÀÚ »ó´Ü¿Ã¸®±â
                	 //2009-05-11 YCD ¿Ü·¡ ȯÀÚ »ó´ÜÁ¤º¸ ¼¼Æà º¯°æ
                    param = model.getValue("/root/HideData/otptinfo/ordtype")  + "¢Ë"
                          + model.getValue("/root/HideData/otptinfo/pid")      + "¢Ë"
                          + model.getValue("/root/HideData/otptinfo/orddd")    + "¢Ë"
                          + model.getValue("/root/HideData/otptinfo/cretno")   + "¢Ë"
                          + model.getValue("/root/HideData/otptinfo/instcd")   + "¢Ë"
                          + ""      + "¢Ë"
                          + model.getValue("/root/HideData/otptinfo/orgorddd");
                }else {
                    param = "T¢Ë"                                                                   // 01 O:¿Ü·¡, I:ÀÔ¿ø±¸ºÐ, T:¼ö¼ú¿¹¾à
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/pid"        ) + "¢Ë"     // 02 µî·Ï¹øÈ£
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/opcnfmdd"   ) + "¢Ë"     // 03 ¼ö¼ú½ÃÀÛÀÏÀÚ
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/cretno"     ) + "¢Ë"     // 04 cretno(¾ø´Â °æ¿ì ""·Î ó¸®)
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/instcd"     ) + "¢Ë"     // 05 ±â°üÄÚµå
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/perfdeptcd" ) + "¢Ë"     // 06 Áýµµ°úºÎ¼­
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/perfdrid1"  ) + "¢Ë"     // 07 ÁýµµÀÇID
                          +  sPatFlag                                                    + "¢Ë"     // 08 ȯÀÚ±¸ºÐ
                          +                                                               "F¢Ë"     // 09 F -󸮱¸ºÐ ¹«Á¶°Ç F·Î ¼³Á¤
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/oprsrvno"   ) + "¢Ë"     // 10 ¼ö¼ú¿¹¾à¹øÈ£
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/ophistno"   ) + "¢Ë"     // 11 ¼ö¼úÀ̷¹øÈ£
                          +  model.getValue(sPath+"["+grd_oppatlist.row+"]/opcnfmdd"   ) + "¢Ë";    // 12 Á¶È¸ÀÏÀÚ   2007-09-13 ¿ÀÁöÈÆ Ãß°¡...
                }

                setParameter("condparam",  param);
                modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
            }
        }else {
          // sPatFlag  = (sPatFlag == "O" ) ? "O" : "I";
          // sPatFlag  = (sPatFlag == "D" ) ? "O" : sPatFlag;
						
						
					  if(sPatFlag != sInordtype) {
					  	var status1="";
              var status2="";
              
              if(sPatFlag == "I") {
              	status1="ÀÔ¿ø";
              } else if(sPatFlag == "E") {
              	status1="ÀÀ±Þ";
              } 
              
              if(sInordtype == "I") {
              	status2="ÀÔ¿ø";
              } else if(sInordtype == "E") {
              	status2="ÀÀ±Þ";
              } 
              
					  	messageBox(status2 + "ȯÀÚ°¡ " + "ȯÀÚ±¸ºÐÀÌ " + status1 + "À¸·Î µî·ÏµÇ¾îÀÖ½À´Ï´Ù.", "I");
					  	
					  	return;
					  }
						
            if (sPatFlag == "") {
                sPatFlag  = "I";
            }

            var param = "T¢Ë"                                                                   // 01 O:¿Ü·¡, I:ÀÔ¿ø±¸ºÐ, T:¼ö¼ú¿¹¾à
                      +  model.getValue(sPath+"["+grd_oppatlist.row+"]/pid"        ) + "¢Ë"     // 02 µî·Ï¹øÈ£
                      +  model.getValue(sPath+"["+grd_oppatlist.row+"]/opcnfmdd"   ) + "¢Ë"     // 03 ¼ö¼ú½ÃÀÛÀÏÀÚ
                      +                                                                "¢Ë"     // 04 cretno(¾ø´Â °æ¿ì ""·Î ó¸®)
                      +  model.getValue(sPath+"["+grd_oppatlist.row+"]/instcd"     ) + "¢Ë"     // 05 ±â°üÄÚµå
                      +  model.getValue(sPath+"["+grd_oppatlist.row+"]/perfdeptcd" ) + "¢Ë"     // 06 Áýµµ°úºÎ¼­
                      +  model.getValue(sPath+"["+grd_oppatlist.row+"]/perfdrid1"  ) + "¢Ë"     // 07 ÁýµµÀÇID
                      +  sPatFlag                                                    + "¢Ë"     // 08 ȯÀÚ±¸ºÐ
                      +                                                               "F¢Ë"     // 09 F -󸮱¸ºÐ ¹«Á¶°Ç F·Î ¼³Á¤
                      +  model.getValue(sPath+"["+grd_oppatlist.row+"]/oprsrvno"   ) + "¢Ë"     // 10 ¼ö¼ú¿¹¾à¹øÈ£
                      +  model.getValue(sPath+"["+grd_oppatlist.row+"]/ophistno"   ) + "¢Ë"     // 11 ¼ö¼úÀ̷¹øÈ£
                      +  model.getValue(sPath+"["+grd_oppatlist.row+"]/opcnfmdd"   ) + "¢Ë";    // 12 Á¶È¸ÀÏÀÚ   2007-09-13 ¿ÀÁöÈÆ Ãß°¡...

            setParameter("condparam",  param);
            modal("SPMMO08900", 1, "", "", "", "SPMMO08900", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
        }
        var curNurType2Obj   = getOpenWindow("SMMNP00200");
        if(curNurType2Obj != null){//ÁغñÈ®ÀÎÀÌ ¿­·ÁÀÖÀ¸¸é »ó´Ü ȯÀÚ·Î ÀçÁ¶È¸2010.01.04 K.J.M
            curNurType2Obj.javascript.fFormInit();
        }
    }
}

  //
  function fShowPopup(pData){
           var PopupName = "¼ö¼úÁغñÈ®ÀÎ     #"
                         + "¼ö¼ú°£È£±â·Ï     #"
                         + "ÀÓ»ó°üÂû±â·Ï     #"
                         + "¼ö¼ú°£È£Ã³¹æ     #"
                         + "½ÃÇàºÎ¼­Ã³¹æ     #"
                         + "¹ÙÄÚµå Ãâ·Â      #"
                         + "NAME LABEL Ãâ·Â  #"
                         + "´Ü¹®¸Þ¼¼Áö       #"
                         + "À̼ۿä¿øÈ£Ãâ     #"
                         + "º¸È£ÀÚÈ£Ãâ       #"
                         + "º¸È£ÀÚÈ£ÃâÃë¼Ò   #"
                         + "ÀÔ½ÇÃë¼Ò         ";


           var PopupNm = PopupName.split("#");

           var Idx     = Number(pData);
           var sPath = "/root/main/opPatlist/opPatInfo";
           
           if (Idx != 15 ){		// 15: 'ȯÀÚ±¸ºÐº¯°æ' ¿¡´Â »ó´Ü Á¤º¸ ¿Ã¸®Áö ¾Ê´Â´Ù._2012.10.31_¼Õ¼ºÈÆ.
             fSetParam();    // »ó´ÜÁ¤º¸ ¿Ã¸®±â
           }

             switch(Idx) {
                case 0://¼ö¼úÁغñÈ®ÀÎ
                  setParameter("OpMenu", "O");
                  open("SMMNP00200", "", "100", "100", "SMMNP00200", "", "");
                  break;
                case 1://¼ö¼ú°£È£±â·Ï
                  open("SMMNP00300", "", "100", "100", "SMMNP00300", "", "");
                  break;
                case 2://ÀÓ»ó°üÂû±â·Ï
                	setParameter("SMMNR00900_Param", "");
                	setParameter("SMMNR00900_SpParam", "");
                  if(model.getValue(sPath+"["+grd_oppatlist.row+"]/patinroomdt"  ) == "" ){
	                  setParameter("SMMNR00900_Param", "pid¢Ëindd¢Ëcretno¢Ëinstcd¢Ì"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/pid"          ) + "¢Ë"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/iindd"        ) + "¢Ë"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/icretno"      ) + "¢Ë"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/instcd"       ) + "¢Ì");
                  }else{
	                  setParameter("SMMNR00900_SpParam", "pid¢Ëindd¢Ëcretno¢Ëinstcd¢Ëinrmdt¢Ëdutplcecd¢Ì"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/pid"          ) + "¢Ë"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/iindd"        ) + "¢Ë"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/icretno"      ) + "¢Ë"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/instcd"       ) + "¢Ë"
	                                                     + model.getValue(sPath+"["+grd_oppatlist.row+"]/patinroomdt"  ) + "¢Ë"
	                                                     + getUserInfo("dutplcecd")                                      + "¢Ì");
	                }
                  open("SMMNR00900", "", "100", "100", "SMMNR00900", "", "");
                  break;
                case 3://¼ö¼ú°£È£Ã³¹æ
                /*
                  var oppatflagnm = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/oppatflagnm");
                  var opflagcdnm  = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/opflagcdnm");
                  var opcnfmdd    = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/opcnfmdd");
                  var sCurrentdd  = getCurrentDate();

                  if((oppatflagnm == "DSC") && (opflagcdnm == "Á¤±Ô") && ( sCurrentdd < opcnfmdd )){
                */
                //2008-09-26 ¿ÀÀü 11:05:01 taebum DSC »Ó ¾Æ´Ï¶ó ¿Ü·¡·Î È®Á¤ÇÑ ÄÉÀ̽º¿¡µµ CartList ÀúÀå ¹× »ó´Ü Á¤º¸ »ý¼º¿äû Àû¿ëÁß.
                  var sTmpIndd = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/iindd");
                  var orddeptcd   = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/orddeptcd");
                  var opcnfmdd    = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/opcnfmdd");
                  var sCurrentdd  = getCurrentDate();

                  if(sTmpIndd == "" || sTmpIndd == null || sTmpIndd == "undefined"){
                      var iCurrentrow = grd_oppatlist.row;
                      if(iCurrentrow > 0){
                          var sOprsrvno =   model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/oprsrvno");
                          var sInstcd   =   model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/instcd");
                          var sOphistno =   model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/ophistno");
                          var sOphistcd =   model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/ophistcd");
                          var sPid      =   model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/pid");
                          var sHngnm    =   model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/hngnm");
                          model.setAttribute("SuSulOrder_Oprsinfo_oprsrvno", sOprsrvno);
                          model.setAttribute("SuSulOrder_Oprsinfo_instcd"  , sInstcd);
                          model.setAttribute("SuSulOrder_Oprsinfo_ophistno", sOphistno);
                          model.setAttribute("SuSulOrder_Oprsinfo_ophistcd", sOphistcd);
                      }
                  }
                  open("SMMNP01800", "", "100", "100", "SMMNP01800", "", "");
                  break;
                case 4://½ÃÇàºÎ¼­Ã³¹æ
                  open("SMMMO00200", "", "100", "100", "SMMMO00200", "", "");
                  break;
                case 5://¹ÙÄÚµå Ãâ·Â
                  open("SMLLC00200", "", "100", "100", "SMLLC00200", "", "");
                  break;
                case 6://NAME LABEL Ãâ·Â
                    group5.visible = true;//Ãâ·ÂÀå¼ö ¼±ÅÃ
                	//var iRow   = -1;
                	//iRow       = grd_oppatlist.row;

                	//var pid    = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/pid");
                	//var hngnm  = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/hngnm");
                	//var sexage = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/sa");
                  	//fPrintNameLabel(pid, hngnm, sexage);
                    break;
                case 7://´Ü¹®¸Þ½ÃÁö ¹ß¼Û
                  open("SPZMS00100", "", "100", "100", "SPZMS00100", "", "");
                  break;
                case 8://À̼ۿä¿øÈ£Ãâ
                  var pid        = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/pid");
                  var prcpnm     = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/opcdknm");
                  var kind       = "5";//±âŸ
                  var arvposcd   = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/startposcd");
                  var rsrvdt     = "";
                  //var startposcd = "3070000000";//¼ö¼ú½Ç ºÎ¼­ÄÚµå
                  var startposcd = getUserInfo("dutplcecd");

                  fInsTranCallOP(pid, prcpnm, kind, rsrvdt, arvposcd, startposcd);
                  modal("SMMNB01800" ,"", "200", "200", "SMMNB01800", "", "");
                  break;
                case 9://º¸È£ÀÚ È£Ãâ
                  var iRow = -1;
                  var message = "";

                  iRow          = grd_oppatlist.row;
                  var pid       = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/pid"     );
                  var patnm     = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/hngnm"   );
                  var oproomcd  = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oproomcd");
                  var oprsrvno  = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oprsrvno");
                  var sa        = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/sa"      );
                  var opdd      = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opcnfmdd");
                  var callyn    = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/callyn");
                  var calltel   = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/calltel");
                  var opstatcd  = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opstatcd");
                  var curtDate  = getCurrentDate();
                  curtDate      = curtDate.substring(0, 8);
                  oproomcd      = oproomcd.setReplaceWord("0", ""); //'0'À» °ø¹éÀ¸·Î ´ëü

									// 2009-03-02 ycd È£Ãâ Message ¼±Åà ±â´É Ãß°¡·Î ÀÎÇÏ¿© »èÁ¦ ó¸®
                  //message = patnm + "(" + sa + ") º¸È£ÀÚºÐÀº ¼ö¼ú½Ç ÀÔ±¸·Î ¿À½Ã±â ¹Ù¶ø´Ï´Ù.";

                  if( (opstatcd == "10")||(opstatcd == "19")||(opstatcd == "20")||(opstatcd == "29")||(opstatcd == "39")||(opstatcd == "49")||(opstatcd == "50")||(opstatcd == "70") ){
                      messageBox("¼ö¼ú ¿¹Á¤, Ãë¼Ò, Á¾·á ȯÀÚ´Â º¸È£ÀÚ È£ÃâÀ»", "E001");
                      return;
                  }

                  if( opdd == curtDate ) {
                    if( oprsrvno != "" ) {
                      if( callyn == "Y" ) {
                        messageBox("ÀÌ¹Ì È£Ãâ Áß ", "E008");
                      }else {
                      	if( calltel == "" ) {//È£Ãâ ÀüÈ­¹øÈ£°¡ ¾øÀ¸¸é NÀ¸·Î ¼ÂÆÃ
                      		//calltel = "N";
                      		messageBox("È£Ãâ ÀüÈ­¹øÈ£°¡ ", "I004");
                      		return;
                      	}

                        //2009-03-02 YCD Message ¼±Åà ȭ¸é Parameter ¼³Á¤ ¹× È£Ãâ Ãß°¡
                        setParameter("SPMNP00101_Param", "patnm¢Ëoproomcd¢Ì" + patnm + "¢Ë" + oproomcd  + "¢Ì");
                        setParameter("SPMNP00101_RtnData", "");
                        modal("SPMNP00101");
											  message = getParameter("SPMNP00101_RtnData");

											  if(message == ""){
											  	return;
											  }

                        model.removenode("/root/send");
                        model.makeValue("/root/send/savedata/oprsrvno", oprsrvno);
                        model.makeValue("/root/send/savedata/message", message);
                        model.makeValue("/root/send/savedata/calltel", calltel);
                        model.makeValue("/root/send/savedata/patnm", patnm);
                        model.makeValue("/root/send/savedata/callyn", callyn);
                        model.makeValue("/root/send/savedata/stat", "I");
                        submit("TXMNP00101");

                        messageBox("È£Ãâ ", "I002");
                      }
                    }else {
                      messageBox("¼ö¼ú¿¹¾à¹øÈ£°¡ ", "I004");
                    }
                  }else {
                    messageBox("ÇöÀç ³¯Â¥ ÀÌ¿ÜÀÇ È¯Àڴ ȣÃâ ", "E001");
                  }

                  fSelectPos();
                  break;
                case 10://º¸È£ÀÚ È£ÃâÃë¼Ò
                     var iRow = -1;
                     iRow = grd_oppatlist.row;
                     var oprsrvno  = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oprsrvno");
                     var callyn    = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/callyn");
                     var opdd      = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opcnfmdd");
                     var curtDate  = getCurrentDate();
                     curtDate      = curtDate.substring(0, 8);

                     if( opdd == curtDate ) {
                       if( oprsrvno != "" ) {
                         if( callyn != "Y" ) {
                           messageBox("¹ÌÈ£Ãâ »óÅ ", "E008");
                         }else {
                         model.removenode("/root/send");
                         model.makeValue("/root/send/savedata/oprsrvno", oprsrvno);
                         model.makeValue("/root/send/savedata/stat", "C");
                         submit("TXMNP00101");

                         messageBox("È£Ãâ Ãë¼Ò¸¦ ", "I002");
                         }
                       }else {
                         messageBox("¼ö¼ú¿¹¾à¹øÈ£°¡ ", "I004");
                       }
                     }else {
                       messageBox("ÇöÀç ³¯Â¥ ÀÌ¿ÜÀÇ È¯Àڴ ȣÃâ Ãë¼Ò", "E001");
                     }

                     fSelectPos();

                  break;
                case 11://ÀÔ ½Ç Ãë ¼Ò

                     // Á÷À§ 1140:°£È£»ç, 1110:¼ö°£È£»ç
                     // if (getUserInfo("jobposcd") == "1140" ||
                     //     getUserInfo("jobposcd") == "1110"   ) {
                     //     fInOutRoomSave("9");     // ¼ö¼ú±â·Ï 1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò µî·Ï/¼öÁ¤/»èÁ¦ ¿äûÀ» ó¸®ÇÑ´Ù.
                     // } else {
                     //    alert("ÀÔ½Ç Ãë¼Ò´Â ¼ö°£È£»ç ¼±»ý´Ô¸¸ °¡´ÉÇÕ´Ï´Ù.("+getUserInfo("jobkindnm")+")");
                     //    return;
                     // }

                         fInOutRoomSave("9");     // ¼ö¼ú±â·Ï 1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò µî·Ï/¼öÁ¤/»èÁ¦ ¿äûÀ» ó¸®ÇÑ´Ù.
                   break;
                 case 12://¹Ì¼öÇàó¹æ°ü¸®
                   open("SMMNW10700", "", "100", "100", "SMMNW10700", "", "");
                   break;
                 case 13://Àç¼ö¼ú ½ÂÀÎ/Ãë¼Ò
                   // 2009-03-02 YCD Àç¼ö¼úÀÏ °æ¿ì ¼ö¼úÀüÁغñÈ®ÀÎ ¾øÀÌ °£È£±â·ÏÀÌ °¡´ÉÇϵµ·Ï ó¸® Çϱâ À§ÇÏ¿© Àç¼ö¼ú üũ ´©¶ô°Ç¿¡ ÇÑ¿¡¼­ °£È£¿¡¼­
                   //                Àç¼ö¼ú ½ÂÀÎÀ» ÇÒ ¼ö ÀÖµµ·Ï ó¸®Çϵµ·Ï ÇÔ. Ãë¼Ò´Â °£È£»ç°¡ Àç¼ö¼ú ½ÂÀÎÇÑ °æ¿ì¿¡¸¸ °¡´ÉÇÔ.
                     var iRow = -1;
                     iRow = grd_oppatlist.row;
                     var pid            = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/pid"            );
                     var patnm          = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/hngnm"          );
                     var oproomcd       = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oproomcd"       );
                     var oprsrvno       = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oprsrvno"       );
                     var sa             = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/sa"             );
                     var opdd           = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opcnfmdd"       );
                     var callyn         = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/callyn"         );
                     var calltel        = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/calltel"        );
                     var opstatcd       = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opstatcd"       );
                     var reopflag       = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/reopflag"       );
                     var nursreoprgstid = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/nursreoprgstid" );
                     var nursreoprgstdt = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/nursreoprgstdt" );
                     var nursreopcncldt = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/nursreopcncldt" );
                     var indd           = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/iindd"          );
                     var procflag = "E"; //R : Àç¼ö¼ú ó¸®, C : Àç¼ö¼ú Ãë¼Ò, E : ½ÇÇà Á¾·á ó¸®
                     var rtnmsg = "";

                     if(reopflag == "Y"){ //Àç¼ö¼ú üũ°¡ µÇ¾î ÀÖÀ» °æ¿ì
                       if(nursreoprgstid == "-"){
                         procflag = "E";
                       	 messageBox("ÀÇ»ç Àç¼ö¼ú ÁöÁ¤ ½ºÄÉÁìÀÔ´Ï´Ù.", "I000");
                         return;
                       }else{
                       	 procflag = "C";
                       }
                     }else{
                     	 procflag = "R";
                     }

                     if(procflag == "R"){
                       rtnmsg = messageBox("Àç¼ö¼ú 󸮸¦","Q004");
                     }else if(procflag == "C"){
                     	 rtnmsg = messageBox("Àç¼ö¼ú Ãë¼Ò 󸮸¦","Q004");
                     }else{
                       return;
                     }

                     if(rtnmsg == "6"){
                       model.removenode("/root/send");
                       model.makeValue("/root/send/savedata/oprsrvno"  , oprsrvno );
                       model.makeValue("/root/send/savedata/procflag"  , procflag );
                       model.makeValue("/root/send/savedata/pid"       , pid      );
                     	 model.makeValue("/root/send/savedata/opcnfmdd"  , opdd     );
                     	 submit("TXMNP00103");
                     }else{
                       return;
                     }

                     fSelectPos();
                   break;
                 case 14://¼ö¼ú½Ç Àü±¤ÆÇ°ü¸®
                   open("SMMNP06100", "", "100", "100", "SMMNP06100", "", "");
                   break;
                 
                 case 15: // ¼ö¼úȯÀÚ±¸ºÐ µ¿±âÈ­(ÀÔ¿ø, ÀÀ±Þ½Ç, ÀÏÀϼö¼ú½Ç)_2012.10.31_¼Õ¼ºÈÆ.
                   var iRow = -1;
                     
                     iRow = grd_oppatlist.row;
                     
                      if(iRow > 0){
                          var sOprsrvno 		=   model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oprsrvno");
                          var sInstcd   		=   model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/instcd");
                          var sOphistno 		=   model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/ophistno");
                          var sOppatflagcd  =   model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oppatflagcd");
                          var sOrdtype      = 	model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/inordtype");
                          
                          var status1="";
                          var status2="";
                          
                          if(sOppatflagcd == "I") {
                          	status1="ÀÔ¿ø";
                          } else if(sOppatflagcd == "E") {
                          	status1="ÀÀ±Þ";
                          } 
                          
                          if(sOrdtype == "I") {
                          	status2="ÀÔ¿ø";
                          } else if(sOrdtype == "E") {
                          	status2="ÀÀ±Þ";
                          } 
                          
	                        if(sOppatflagcd != sOrdtype)  {
	                        	
	                        	var rtn = messageBox("¼ö¼ú±¸ºÐÀ» " + status1 + "¿¡¼­ " + status2 + "À¸·Î º¯°æÇϽðڽÀ´Ï±î?", "Q");
	                        	
	                        	if(rtn == "6") {
	                        		
	                        	} else {
	                        		return;
	                        	} 
	                        	
	    											model.removenode("/root/send");
		                        model.makeValue("/root/send/chngedata/oprsrvno"  , 	sOprsrvno );
		                        model.makeValue("/root/send/chngedata/ophistno"  , 	sOphistno );
		                        model.makeValue("/root/send/chngedata/ordtype"  , 	sOrdtype );
		                        model.makeValue("/root/send/chngedata/oppatflagcd", sOppatflagcd      );
		                        
		                        model.removenode("/root/temp2");
		                        model.makeNode("/root/temp2");
			
	    											if ( submit("TXMNP00104") ){
	    												var sCnt = model.getValue("/root/temp2/tmp/cnt");
	    												if (sCnt == "1"){
	    													messageBox("ȯÀÚ±¸ºÐ º¯°æ ¿Ï·á µÇ¾ú½À´Ï´Ù.","I");
	    													fSelectPos();
	    												}else{
	    													messageBox("º¯°æ ³»¿ªÀÌ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.","I");
	    												}
	      										}
	      									}else{
	      										messageBox("ȯÀÚ±¸ºÐ º¯°æ ÇÒ ¼ö ¾ø´Â »óÅÂÀÔ´Ï´Ù. ȯÀÚÀÇ Àç¿ø »óŸ¦ È®ÀÎÇϼ¼¿ä!","E");
	      									}
	      							}
                   break;
                 case 16:
                    var iRow = grd_oppatlist.row;
                 		setParameter("SMMNP00208_PARM_OPRSRVNO", model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oprsrvno"));
										setParameter("SMMNP00208_PARM_PID", model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/pid"));
										modal("SMMNP00208"); 
										break;
								case 17:
									  fSetParam();    // ȯÀÚ È­¸é»ó´ÜÁ¤º¸ ¼³Á¤
                   	modal("SMMNR00600"); 
										break;
								case 18:
								    fSetParam();    // ȯÀÚ È­¸é»ó´ÜÁ¤º¸ ¼³Á¤
                    modal("SMMRF02300");
										break;
								case 19:								    
										modal("SPMRF02900"); 
										break;
								case 20:	
									 	var pid 			= model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/pid");
										var hngnm 		= model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/hngnm");
										var orddeptcd 	= model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/orddeptcd");
										var medispclid = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/medispclid");
										var diag			= model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/diagcdnm");
										var diagcd 		= model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/diagcd");
										var sexagestr 	= model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/sa").split("/");
										if( sexagestr[0] == "F" ){   var sex = "¿©ÀÚ"; }
										if( sexagestr[0] == "M" ){ var sex = "³²ÀÚ"; }	
										var age 			= sexagestr[1];
										var wardcd 		= model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/wardcd");
										var roomcd		= model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/patposplcecd");
										var ioflag		= "I";
										
										setParameter("SMMQR00100_PARAM", pid + "¢Ë" + hngnm + "¢Ë" + orddeptcd + "¢Ë" + medispclid + "¢Ë" + diag + "¢Ë" + diagcd + "¢Ë" + sex + "¢Ë" + age + "¢Ë" + wardcd + "¢Ë" + roomcd + "¢Ë" + ioflag);
										modal("../../../emr/qiweb/xrw/SMMQR00100", "","", "", "SMMQR00100", "", "");
					
										break;
								case 21:	
									 	//Á¶°Çüũ ÇÊ¿ä
									 	var selcnt = grd_oppatlist.selectedRows;
									 	
									 	if ( selcnt == 1 ) {
									 		messageBox("1°ÇÀÇ ¼ö¼ú¸¸ ¼±ÅÃÇϼ̽À´Ï´Ù","I");
									 		return;
									 	}
									 	
									 	if ( selcnt > 2 ) {
									 		messageBox("3°ÇÀÇ ÀÌ»óÀÇ ¼ö¼úÀ» ¼±ÅÃÇϼ̽À´Ï´Ù","I");
									 		return;
									 	}
									 	
									 	var row1 = grd_oppatlist.selectedRow(0);
									 	var row2 = grd_oppatlist.selectedRow(1);
									 	
									 	var oprsrvno1 = model.getValue("/root/main/opPatlist/opPatInfo[" +row1+ "]/oprsrvno");
									 	var oprsrvno2 = model.getValue("/root/main/opPatlist/opPatInfo[" +row2+ "]/oprsrvno");
									 	
									 	var pid1 = model.getValue("/root/main/opPatlist/opPatInfo[" +row1+ "]/pid");
									 	var pid2 = model.getValue("/root/main/opPatlist/opPatInfo[" +row2+ "]/pid");
									 	
									 	var cnstopflag1 = model.getValue("/root/main/opPatlist/opPatInfo[" +row1+ "]/cnstopflag");
									 	var cnstopflag2 = model.getValue("/root/main/opPatlist/opPatInfo[" +row2+ "]/cnstopflag");
									 	
									 	
									 	if (pid1 != pid2) {
									 		messageBox("µ¿ÀÏÇÑ È¯ÀÚÀÇ ¼ö¼ú°ÇÀÌ ¾Æ´Õ´Ï´Ù","I");
									 		return;
									 	}
									 	
//									 	if (cnstopflag1+cnstopflag2 != "Y" ) {
//									 		messageBox("ºÎ(ÇùÁø)¼ö¼ú ¹× ¸ÞÀμö¼ú °¢1°ÇÀÌ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù ","I");
//									 		return;
//									 	}
									 	
									 	model.makeNode("/root/main/opinfo/oplist");
									 	copyNodesetType("/root/main/opinfo/oplist","/root/main/opPatlist/opPatInfo[oprsrvno="+oprsrvno1+"or oprsrvno="+oprsrvno2+"]","replace", model, model);
									 	
									 	modal("SPMNP00306", "","", "", "SPMNP00306", "/root/main/opinfo", "/root/main");
									 	
									 	btn_srch.dispatch("DOMActivate");
									 	
									 	break;
							  case 22:	
									 	//ÇùÁø -> ÁÖ¼ö¼ú·Î
									 	var selcnt = grd_oppatlist.selectedRows;
									 	
									 	if ( selcnt != 1 ) {
									 		messageBox("ºÎ(ÇùÁø)¼ö¼ú 1°Ç¸¸ ¼±ÅõǾî¾ß ÇÕ´Ï´Ù","I");
									 		return;
									 	}
									 										 	
									 	var row1 = grd_oppatlist.selectedRow(0);
									 	var oprsrvno1 = model.getValue("/root/main/opPatlist/opPatInfo[" +row1+ "]/oprsrvno");
									 	var cnstopflag1 = model.getValue("/root/main/opPatlist/opPatInfo[" +row1+ "]/cnstopflag");
									 										 	
									 	if (cnstopflag1 != "Y" ) {
									 		messageBox("ºÎ(ÇùÁø)¼ö¼ú°ÇÀÌ ¾Æ´Õ´Ï´Ù ","I");
									 		return;
									 	}
									 	
									 	model.makeNode("/root/main/opinfo/oplist");
									 	copyNodesetType("/root/main/opinfo/oplist","/root/main/opPatlist/opPatInfo[oprsrvno="+oprsrvno1+"]","replace", model, model);
									 	
									 	modal("SPMNP00306", "","", "", "SPMNP00306", "/root/main/opinfo", "/root/main");
									 	
									 	btn_srch.dispatch("DOMActivate");
									 	
									 	break;
                default :
                    break;
              }
         // }
  }

 // ------------------------------------------------------------------------------------------------
 // ¼ö¼ú±â·Ï 1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò µî·Ï/¼öÁ¤/»èÁ¦ ¿äûÀ» ó¸®ÇÑ´Ù.
 // ÁøÇà»óÅ (opstatcd)°¡ 50º¸´Ù ÀÛÀº°Í¸¸ ÀÔ½ÇÃë¼Ò°¡ °¡´ÉÇÏ´Ù.(ÄÚµåÁ¤ÀǼ­ M0015)
 // 00 : ÀÓ½Ã,     10 : ÀÇ·Ú,     20 : È®Á¤,   30 : ´ë±â, 40 : ¼ö¼úÁß, 50 : Åð½Ç, 60 : ȸº¹Áß, 70 : Åð½Ç
 // 09 : ÀÓ½ÃÃë¼Ò,  19 : ÀÇ·ÚÃë¼Ò, 29 : È®Á¤Ãë¼Ò
 // ------------------------------------------------------------------------------------------------
 function fInOutRoomSave(pFlag){

 		//¼ö¼úÁøÇà»óÅ°¡ ¼ö¼úÁß ÀÌÀü±îÁö¸¸ ÀÔ½ÇÃë¼Ò°¡ °¡´ÉÇÏ´Ù.
 		var opstatcd = model.getValue('/root/main/opPatlist/opPatInfo[' + grd_oppatlist.row + ']/opstatcd');

 		//Ãë¼Òµ¥ÀÌÅÍ´Â ÁøÇà¾øÀÌ ¹Ù·Î¸®ÅÏ
 		if(opstatcd.substring(1) == '9'){
 			return;
 		}

 		if(opstatcd > 40){
 			messageBox('¼ö¼úÀÌ ³¡³­ ȯÀÚ´Â ÀÔ½ÇÃë¼Ò', 'E001');
 			return;
 		}

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

        var wRow      = grd_oppatlist.row;
        var wDataPath = "/root/main/opPatlist/opPatInfo[" + wRow + "]"

        sPid        = model.getValue(wDataPath + "/pid"     );     // 01 ȯÀÚ¹øÈ£
        sOprsrvno   = model.getValue(wDataPath + "/oprsrvno");     // 02 ¼ö¼ú¿¹¾à(ÀÇ·Ú)¹øÈ£(³âµµ+ÀϷùøÈ£)
        sOphistno   = model.getValue(wDataPath + "/ophistno");     // 03 ¿¹¾à¹øÈ£¿¡µû¸¥À̷¹øÈ£
        sInstcd     = model.getValue(wDataPath + "/instcd"  );     // 04 ±â°üÄÚµå

        sJobProc = "pid"           + "¢Ë"    // 01 ȯÀÚ¹øÈ£
                 + "oprsrvno"      + "¢Ë"    // 02 ¼ö¼ú¿¹¾à
                 + "ophistno"      + "¢Ë"    // 03 À̷¹øÈ£
                 + "instcd"        + "¢Ë"    // 04 ±â°üÄÚµå
                 + "jobflag"       + "¢Ì"    // 05 ÀÛ¾÷±¸ºÐ(1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò)
                 + sPid            + "¢Ë"    // 01 ȯÀÚ¹øÈ£
                 + sOprsrvno       + "¢Ë"    // 02 ¼ö¼ú¿¹¾à
                 + sOphistno       + "¢Ë"    // 03 À̷¹øÈ£
                 + sInstcd         + "¢Ë"    // 04 ±â°üÄÚµå
                 + pFlag           + "¢Ì"    // 05 ÀÛ¾÷±¸ºÐ(1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò)


        model.makeValue("/root/send/JobProc", sJobProc);

        if (submit("TXMNP00102")){       // ¼ö¼ú°£È£±â·ÏÁ¤º¸ ÀÔ½ÇÃë¼Ò
            messageBox("ÀÔ½ÇÃë¼Ò°¡", "I002");
            fSelectPos();//ÀçÁ¶È¸
        }
 }

/**
 * @group  :
 * @ver    : 2010.11.19
 * @by     : DARK9258
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ name¶óº§ Ãâ·Â
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPrintNameLabel(pid, hngnm, sexage, oproomcdnm, depthngnm, prncnt, pPort,roomcd){

////////////////////////////////////////////////////////////////////////////////////////// ¿øº»_20090522
//		//20080905 portã±â
//		//portÁ¤º¸ °¡Á®¿À±â
//		model.removenode('/root/send');
//		model.removenode('/root/main/barcdprntsetup');
//		model.makenode('/root/main/barcdprntsetup');
//		model.makeValue('/root/send/scrnid', 'SMMNP00100');
//		if(submit('TRLLC90101')){
//			pPort = model.getValue('/root/main/barcdprntsetup/prntsetupinfo/setupinfo[1]/comm02/comm');
//		}
//
//        if(document.all("CommAX") != null) {
//  			//¹ÙÄÚµå Ãâ·Â ½ÃÀÛ
//
//  			var portOpenTF = "";
//
//  			// CommPort ¼³Á¤
//  			if (pPort == "" || pPort == null || pPort == " ") {
//  			   CommAX.CommPort = "1";                                                              // default port setting
//  			} else {
//  			    CommAX.CommPort = pPort;                                                           //Port ¼³Á¤
//  			}
//
//  			CommAX.Settings = "9600,n,8,1";
//
//  			portOpenTF = CommAX.PortOpen("true");                                                  //Port Open
//
//            if(portOpenTF == "TRUE") {
//
//				var iLeft   = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/blank/left");
//				var iTop    = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/blank/top");
//
//				if(iLeft == "" || iLeft == "-"){
//					iLeft = 0;
//				}
//				if(iTop == ""  || iTop == "-"){
//					iTop  = 0;
//				}
//
//				var sData = "^XA^LH0,20";//Ãâ·Â½ÃÀÛÁ¡
//
//				//Ãâ·ÂÀÏ
//				var prndd = getCurrentDate().substr(0,4) + "/" + getCurrentDate().substr(4,2) + "/" + getCurrentDate().substr(6,2);
//				sData += "^CFA,20,20";//bold, height, width
//				sData += "^FO10,20";//À§Ä¡ÁöÁ¤(xÃà, yÃà)
//				sData += "^FD"+ prndd + "^FS";
//
//                //¼ö¼úÁ¤º¸
//                var opinfo = oproomcdnm + "R  " + depthngnm  + "  " + pid;
//                sData += CommAX.PrtImgOut(20, 60, opinfo, 1, 1);//PrtImgOut(xÃà, yÃà, data, width, heigt)
//				sData += CommAX.HanImageData();
//
//
//				//ȯÀÚ¸í
//				//±ÛÀÚ¼ö°¡ 4ÀÌ»óÀ̸é leftÁ¤·Ä 4ÀÌÇÏÀ̸é centerÁ¤·Ä
//				var hx = 20; var hy = 105;
//				/*var len = hngnm.length;
//				if(len > 4){
//					hx = 10;
//				}else if(len == 4){
//					hx = 90;
//				}else if(len == 3){
//					hx = 120;
//				}else if(len == 2){
//					hx = 150;
//				}else if(len == 1){
//					hx = 180;
//				}*/
//				sData += CommAX.PrtImgOut(hx, hy, hngnm, 2, 2);//PrtImgOut(xÃà, yÃà, data, width, heigt)
//				sData += CommAX.HanImageData();
//
//				//sexage
//				sData += "^CFE,20,20";
//				sData += "^FO300,120";//À§Ä¡ÁöÁ¤
//				sData += "^FD"+ sexage + "^FS";
//
//				sData += "^PQ"+ prncnt + "^XZ";//Ãâ·ÂÀå¼ö
//
//				CommAX.SendMessage(sData);                                                       	// Ãâ·Â
//                CommAX.PortOpen("false");                                                          	// Ãâ·ÂÁ¾·á
//
//
//            } else {
//                messageBox("¾Æ·¡ »çÇ×À» È®ÀÎÈÄ ÀçÃâ·ÂÇØÁֽʽÿÀ."
//                         + " \n 1.ÇÁ¸°Æ®¼³Á¤ È­¸é¿¡¼­ Åë½ÅÀ¯ÇüÀ» com À¸·Î ¼±ÅÃÇÑ °æ¿ì port ¹øÈ£ È®ÀÎ"
//                         + " \n 2.ÄÉÀ̺í È®ÀÎ"
//                         + " \n 3.¸ÕÀú Ãâ·ÂÁßÀÎ ¹ÙÄÚµå È®ÀÎ(¸ðµÎ Ãâ·ÂµÈ ÈÄ ÀçÃâ·ÂÇϽʽÿÀ.)", "I", "");
//                return;
//            }
//        }
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

// SATO¿ë Ãß°¡_20090522(ByJA)
        if(prncnt > 0){
            //1. ¹ÙÄÚµå ¶óº§  ¼³Á¤°ª Á¶È¸
            var scrnid    = "SMMNP00100";
            model.removeNodeset("/root/main/barcdprntsetup");
            fGetBarCodeInfo(scrnid);  // CareCom.js
            lzzfMakeBrcdPrntObjHanDo("CommAX");

            //2. ¹ÙÄÚµå ¶óº§ È¯°æ¼³Á¤
            var barcdRef =  "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
            var portOpenTF = fSetNursBarcdInfo(barcdRef); // CareCom.js ¹ÙÄÚµåÇÁ¸°Åͺ° ȯ°æ¼³Á¤(Zebra,SATO)
						
						/** <addon>
						*°³¹ßÀϽÃ: 2010.05.13
						*°³¹ßÀÚ: ¾çõ´ö
						*¿äûº´¿ø: ¼¼Á¾º´¿ø
						*¿äûÆÄÆ®: °£È£
						*°³¹ß³»¿ë: ¹ÙÄÚµå Ãâ·Â Çü½Ä º¯°æÀ¸·Î ¼öÁ¤ ó¸®(¼ö¼ú)
						</addon>
						*/
						fPrtORPatNameLabel(barcdRef, pid, hngnm, sexage, oproomcdnm, depthngnm, prncnt, roomcd);
						return;
				}		

}

/**
 * @group  :
 * @ver    : 2008.08.01
 * @by     : dhkim
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ name¶óº§ Ãâ·Â
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPrtCareInjLabel_INJ(pid, hngnm, sexage, oproomcdnm, depthngnm, prncnt, pPort){

////////////////////////////////////////////////////////////////////////////////////////// ¿øº»_20090522
//		//20080905 portã±â
//		//portÁ¤º¸ °¡Á®¿À±â
//		model.removenode('/root/send');
//		model.removenode('/root/main/barcdprntsetup');
//		model.makenode('/root/main/barcdprntsetup');
//		model.makeValue('/root/send/scrnid', 'SMMNP00100');
//		if(submit('TRLLC90101')){
//			pPort = model.getValue('/root/main/barcdprntsetup/prntsetupinfo/setupinfo[1]/comm02/comm');
//		}
//
//        if(document.all("CommAX") != null) {
//  			//¹ÙÄÚµå Ãâ·Â ½ÃÀÛ
//
//  			var portOpenTF = "";
//
//  			// CommPort ¼³Á¤
//  			if (pPort == "" || pPort == null || pPort == " ") {
//  			   CommAX.CommPort = "1";                                                              // default port setting
//  			} else {
//  			    CommAX.CommPort = pPort;                                                           //Port ¼³Á¤
//  			}
//
//  			CommAX.Settings = "9600,n,8,1";
//
//  			portOpenTF = CommAX.PortOpen("true");                                                  //Port Open
//
//            if(portOpenTF == "TRUE") {
//
//				var iLeft   = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/blank/left");
//				var iTop    = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/blank/top");
//
//				if(iLeft == "" || iLeft == "-"){
//					iLeft = 0;
//				}
//				if(iTop == ""  || iTop == "-"){
//					iTop  = 0;
//				}
//
//				var sData = "^XA^LH0,20";//Ãâ·Â½ÃÀÛÁ¡
//
//				//Ãâ·ÂÀÏ
//				var prndd = getCurrentDate().substr(0,4) + "/" + getCurrentDate().substr(4,2) + "/" + getCurrentDate().substr(6,2);
//				sData += "^CFA,20,20";//bold, height, width
//				sData += "^FO10,20";//À§Ä¡ÁöÁ¤(xÃà, yÃà)
//				sData += "^FD"+ prndd + "^FS";
//
//                //¼ö¼úÁ¤º¸
//                var opinfo = oproomcdnm + "R  " + depthngnm  + "  " + pid;
//                sData += CommAX.PrtImgOut(20, 60, opinfo, 1, 1);//PrtImgOut(xÃà, yÃà, data, width, heigt)
//				sData += CommAX.HanImageData();
//
//
//				//ȯÀÚ¸í
//				//±ÛÀÚ¼ö°¡ 4ÀÌ»óÀ̸é leftÁ¤·Ä 4ÀÌÇÏÀ̸é centerÁ¤·Ä
//				var hx = 20; var hy = 105;
//				/*var len = hngnm.length;
//				if(len > 4){
//					hx = 10;
//				}else if(len == 4){
//					hx = 90;
//				}else if(len == 3){
//					hx = 120;
//				}else if(len == 2){
//					hx = 150;
//				}else if(len == 1){
//					hx = 180;
//				}*/
//				sData += CommAX.PrtImgOut(hx, hy, hngnm, 2, 2);//PrtImgOut(xÃà, yÃà, data, width, heigt)
//				sData += CommAX.HanImageData();
//
//				//sexage
//				sData += "^CFE,20,20";
//				sData += "^FO300,120";//À§Ä¡ÁöÁ¤
//				sData += "^FD"+ sexage + "^FS";
//
//				sData += "^PQ"+ prncnt + "^XZ";//Ãâ·ÂÀå¼ö
//
//				CommAX.SendMessage(sData);                                                       	// Ãâ·Â
//                CommAX.PortOpen("false");                                                          	// Ãâ·ÂÁ¾·á
//
//
//            } else {
//                messageBox("¾Æ·¡ »çÇ×À» È®ÀÎÈÄ ÀçÃâ·ÂÇØÁֽʽÿÀ."
//                         + " \n 1.ÇÁ¸°Æ®¼³Á¤ È­¸é¿¡¼­ Åë½ÅÀ¯ÇüÀ» com À¸·Î ¼±ÅÃÇÑ °æ¿ì port ¹øÈ£ È®ÀÎ"
//                         + " \n 2.ÄÉÀ̺í È®ÀÎ"
//                         + " \n 3.¸ÕÀú Ãâ·ÂÁßÀÎ ¹ÙÄÚµå È®ÀÎ(¸ðµÎ Ãâ·ÂµÈ ÈÄ ÀçÃâ·ÂÇϽʽÿÀ.)", "I", "");
//                return;
//            }
//        }
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

// SATO¿ë Ãß°¡_20090522(ByJA)
        if(prncnt > 0){
            //1. ¹ÙÄÚµå ¶óº§  ¼³Á¤°ª Á¶È¸
            var scrnid    = "SMMNP00100";
            model.removeNodeset("/root/main/barcdprntsetup");
            fGetBarCodeInfo(scrnid);  // CareCom.js
            lzzfMakeBrcdPrntObjHanDo("CommAX");

            //2. ¹ÙÄÚµå ¶óº§ È¯°æ¼³Á¤
            var barcdRef =  "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
            var portOpenTF = fSetNursBarcdInfo(barcdRef); // CareCom.js ¹ÙÄÚµåÇÁ¸°Åͺ° ȯ°æ¼³Á¤(Zebra,SATO)

            //3. ȯÀÚ¶óº§Ãâ·Â
            var esc = String.fromCharCode(27);
            var sPrntKind = model.getvalue(barcdRef + "/prntkind");
            var iLeft = model.getValue(barcdRef + "[1]/blank/left");
            var iTop  = model.getValue(barcdRef + "[1]/blank/top");
            var prndd = getCurrentDate().substr(0,4) + "/" + getCurrentDate().substr(4,2) + "/" + getCurrentDate().substr(6,2);
            if(iLeft == "" || iLeft == "-"){
               iLeft = 0;
            }
            if(iTop == ""  || iTop == "-"){
               iTop  = 0;
            }

            // SATOÀÏ °æ¿ì
            if(sPrntKind == "2" || sPrntKind == "6" || sPrntKind == "7"){
               // ½ÃÀÛÀ§Ä¡ ¼ÂÆà (A1aaaabbbb:Ãâ·Â ¿ëÁö ±Ô°Ý(aaaa:¼¼·ÎÅ©±â_ÃÖ´ë 2848, bbbb:°¡·ÎÅ©±â_ÃÖ´ë 832))
               var sSndMsg = esc + "A" + esc + "A103500500";

               // Ãâ·ÂÇÒ µ¥ÀÌÅÍ »ý¼º
               sSndMsg += esc + "V" + (parseInt(iTop)+20) + esc + "H" + (parseInt(iLeft)+50) + esc + "M" + prndd;
               sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+60 , parseInt(iLeft)+50, oproomcdnm + "R  " + depthngnm  + "  " + pid, 1, 1);  // ÇѱÛÃâ·Â½Ã PrtImgOutÇÔ¼ö ÀÌ¿ë
               sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+105, parseInt(iLeft)+50, hngnm, 2, 2);  // ÇѱÛÃâ·Â½Ã PrtImgOutÇÔ¼ö ÀÌ¿ë
               sSndMsg += esc + "V" + (parseInt(iTop)+120) + esc + "H" + (parseInt(iLeft)+320) + esc + "M" + sexage;

               // Á¾·á ¹× Ãâ·Â¹° Ãâ·Â¼ö·®
               sSndMsg += esc + "Q" + prncnt + esc + "Z";
               var a = CommAX.SendMsg(sSndMsg);
               CommAX.PortOpen("false");
            }
            // SATO°¡ ¾Æ´Ò °æ¿ì(±âÁ¸)
            else{
               if(portOpenTF == "TRUE"){
                  var sData = "^XA^LH0,20";//Ãâ·Â½ÃÀÛÁ¡
                  sData += "^CFA,20,20^FO"+(parseInt(iLeft)+10)+","+(parseInt(iTop)+20)+"^FD"+ prndd + "^FS"; //Ãâ·ÂÀÏ bold, height, width, À§Ä¡ÁöÁ¤(xÃà, yÃà)
                  sData += CommAX.PrtImgOut((parseInt(iLeft)+20),(parseInt(iTop)+60) , oproomcdnm + "R  " + depthngnm  + "  " + pid, 1, 1);//¼ö¼úÁ¤º¸ PrtImgOut(xÃà, yÃà, data, width, heigt)
                  sData += CommAX.HanImageData();
                  sData += CommAX.PrtImgOut((parseInt(iLeft)+20),(parseInt(iTop)+105), hngnm, 2, 2);//ȯÀÚ¸í ±ÛÀÚ¼ö°¡ 4ÀÌ»óÀ̸é leftÁ¤·Ä 4ÀÌÇÏÀ̸é centerÁ¤·Ä PrtImgOut(xÃà, yÃà, data, width, heigt)
                  sData += CommAX.HanImageData();
                  sData += "^CFE,20,20^FO"+(parseInt(iLeft)+300)+","+(parseInt(iTop)+120)+"^FD"+ sexage + "^FS";
                  sData += "^PQ"+ prncnt + "^XZ";//Ãâ·ÂÀå¼ö
                  CommAX.SendMessage(sData); // Ãâ·Â
                  CommAX.PortOpen("false"); // Ãâ·ÂÁ¾·á
               } else {
                  messageBox("¾Æ·¡ »çÇ×À» È®ÀÎÈÄ ÀçÃâ·ÂÇØÁֽʽÿÀ."
                           + " \n 1.ÇÁ¸°Æ®¼³Á¤ È­¸é¿¡¼­ Åë½ÅÀ¯ÇüÀ» com À¸·Î ¼±ÅÃÇÑ °æ¿ì port ¹øÈ£ È®ÀÎ"
                           + " \n 2.ÄÉÀ̺í È®ÀÎ"
                           + " \n 3.¸ÕÀú Ãâ·ÂÁßÀÎ ¹ÙÄÚµå È®ÀÎ(¸ðµÎ Ãâ·ÂµÈ ÈÄ ÀçÃâ·ÂÇϽʽÿÀ.)", "I", "");
                  return;
                }
            }
}


}

/**
 * @group  :
 * @ver    : 2007.10.17
 * @by     : Grace
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Exel ÀúÀå
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSaveExcel(){

    var opfromdd = model.getValue("/root/main/cond/opddfr");
    var optodd   = model.getValue("/root/main/cond/opddto");
    model.removenode("/root/send");
    model.makeNode("/root/send/reqdata");
    model.copyNode("/root/send/reqdata", "/root/main/cond");
    if(submit("TRMNP00106")){
        grd_excel.refresh();

        var fileName = window.fileDialog("save", ",", false, "¼ö¼ú½ºÄÉÁì("+opfromdd+"~"+optodd+")", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");

        if (fileName != "") {
            grd_excel.saveExcel(fileName, "SheetName", true, true, "", "", false);
        }
    }
}

/**
 * @group  :
 * @ver    : 2008.07.19
 * @by     : Grace
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Ãâ·Â
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPrntSche(){

    model.removenode("/root/send");
    model.makeNode("/root/send/report/opnmflag");
    model.makeNode("/root/send/report/diagnmflag");
    
    var opnmen = model.getValue("/root/temp/opnmen");
    var diagnmen = model.getValue("/root/temp/diagnmen");
    
    if( opnmen == "Y" ) {
        model.setValue("/root/send/report/opnmflag", "E");
    }else {
        model.setValue("/root/send/report/opnmflag", "H");
    }
    // Áø´Ü¸í(¿µ¹®/ÇѱÛ)º° Ãâ·ÂÈ­¸é ´Þ¸® ¼³Á¤_¼Õ¼ºÈÆ.
		if( diagnmen == "Y" ) {
				model.setValue("/root/send/report/diagnmflag", "E");
		}else {
				model.setValue("/root/send/report/diagnmflag", "H");
		}    

    exeReportPreview("RPMNP00100", "XMLSTR", "/root/send/report"); //¹Ì¸®º¸±â

}

 /**
 * @group  :
 * @ver    : 2008.08.26
 * @by     : ±è Áø ¸í
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¼ö¼ú½Ç À̼ۿä¿ø È£Ãâ ÇÔ¼ö
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fInsTranCallOP(pid, prcpnm, kind, rsrvdt, arvposcd, startposcd){

	setParameter("status",	"OP");
	setParameter("pid",		pid);
	setParameter("prcpnm",	prcpnm);
	setParameter("kind",	kind);
	setParameter("rsrvdt",	rsrvdt);
	setParameter("arvposcd", arvposcd);
	setParameter("startposcd", startposcd);

	modal("SMMNB01810" ,"", "300", "150", "SMMNB01810", "", "");
}

/**
 * @desc   : È­¸éID¿¡ ÇØ´çÇÏ´Â Ä÷³¼ø¼­¸¦ Á¶È¸ÇÑ´Ù.
 * @
 * @param  :
 * @return :
 * @author : ±è¿µÇÐ
 * @---------------------------------------------------
 */
function reqOrderInfoOfCol(scrnid, grdid, compscd){
	model.removeNodeset("/root/send/reqdata");
	model.makeValue("/root/send/reqdata/scrnid"			, scrnid);
	model.makeValue("/root/send/reqdata/compscd"		, compscd);
	if(submit("TRMNB02401", false)){
		var refdata  = model.getValue("/root/init/userscrnenvinfo/gridseq/compsrefcnts");
		var sizedata = model.getValue("/root/init/userscrnenvinfo/gridseq/compssizecnts");

		if(refdata != "" || sizedata != ""){
			setOrderInfoOfCol(grdid , refdata, sizedata);
		}
	}
}

function setOrderInfoOfCol(grdID, refdata, sizedata){
	var grdObj    = document.controls.item(grdID);
	var refArray  = refdata.split("^");
	var sizeArray = sizedata.split("^");
	for(var i = 0; i < refArray.length; i++){
		var colcnt = grdObj.colref("" + refArray[i] + "");
		if (colcnt <0 ) colcnt = 0;
		// À̵¿ Ä÷³°ú ´ë»óÄ÷³ÀÇ À妽º°¡ °°Áö ¾ÊÀº °æ¿ì¸¸ À̵¿.
		if (colcnt != i) {
			grdObj.colMove(i,  colcnt, "before", false);
		}
		var size = sizeArray[i];
		if(size == 0){ // size of column 0 -> hidden
			grdObj.colHidden(i) = true;
		}else{
			grdObj.colHidden(i) = false;
		}
		grdObj.colWidth(i) = eval(size);

	}
   model.refresh();
}

function fColumSetMove(scrnid, grd_nm) {
	// Ä÷³ ¼ø¼­ ÀúÀå¿¡ µû¸¥ ºÒ·¯¿À±â Ãß°¡ : 2009. 10. 11 han19
	var sWardCD = getScreenMenuParameter();//model.getValue("/root/main/cond/wardcd") //20080725_¸Þ´º¼³Á¤¿¡ µû¸¥ ±×¸®µå µ¿Àû»ý¼ºÀ¸·Î º¯°Ï(ByJA)
	var prestimportid = model.getValue("/root/main/cond/prestimportid");
	var compscd =  "";
	if(prestimportid == "nm") {
		if (sWardCD == "Partrtn")  {     // ºÐ¸¸
			compscd = "PA";
		} else if(sWardCD == "NBaby"){  // ½Å»ý¾Æ
			compscd = "NB";
		} else if(sWardCD == "BMT"){    //BMT
			compscd = "BT";
		} else if(sWardCD == "spclinj"){  // Ư¼öÁÖ»ç½Ç
			compscd = "SJ";
		} else {
			compscd = "NM";
		}
	} else if (prestimportid == "td") {   // Todo List : Ä÷³¼³Á¤Àº ÇÏÁö ¾ÊÁö¸¸ ±¸ºÐ°ªÀº ³Ö¾î³õÀ½
		compscd = "TD";
	} else if (prestimportid =="om") {    // Order Manage
		compscd = "OM";
	} else {
		if (sWardCD == "Partrtn")  {     // ºÐ¸¸
			compscd = "PA";
		} else if(sWardCD == "NBaby"){  // ½Å»ý¾Æ
			compscd = "NB";
		} else if(sWardCD == "BMT"){    //BMT
			compscd = "BT";
		} else if(sWardCD == "spclinj"){  // Ư¼öÁÖ»ç½Ç
			compscd = "SJ";
		} else {
			compscd = "NM";
		}
	}
	reqOrderInfoOfCol(scrnid, grd_nm, compscd);
	// Ä÷³ ¼ø¼­ ÀúÀå¿¡ µû¸¥ ºÒ·¯¿À±â Ãß°¡ : 2009. 10. 11 han19
}

function fCalcdate(calcn, calcd){
					
	calcd = calcd.toDate("YYYYMMDD");
	calcd = calcd.getAddDate(calcn , "D");
	calcd = calcd.getDateFormat("YYYYMMDD");
	
	return calcd;
}

/* -------------------------------------------------  */
/* ------End Of List -------------------------------  */
/* -------------------------------------------------- */