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

     ȯÀÚ ½Ã¼úÀü óġ ¹× °£È£»óÅ ȮÀÎ »çÇ×

     - Version :
         1)  : Ver.1.00.01
             : Created By  AYS
             : 2015.03.18
  ----------------------------------------------------------------------  */
  
var xPath_curenurgstatspec       = "/root/main/ssminfo/ssmlist/curenurgstatspec/ItemCheckLists" ;    // ȯÀÚ ¼ö¼úÀü óġ ¹× °£È£»óÅ ȮÀÎ »çÇ×
var xPath_famyinfo       = "/root/main/ssminfo/ssmlist/famyinfo/famylist"               ;    //°¡Á·»çÇ×
var xPath_spcinfo        = "/root/main/ssminfo/ssmlist/spcinfo/spclists"                ;    //°Ëü»çÇ×
var xPath_Infecinfo      = "/root/main/ssminfo/ssmlist/infecinfo/InfectionLists"       ;    //°¨¿°Á¤º¸
var xPath_PatBaseInfo		 = "/root/init/patbaseinfo/patinfo"															;		 //ȯÀڱ⺻Á¤º¸


var xPath_Fmt_curenurgstatspec   = "/root/init/cureiteminfo" ; // ȯÀÚ ¼ö¼úÀü óġ ¹× °£È£»óÅ ȮÀÎ »çÇ×
var xPath_MnpmcssrList           = "/root/main/ssminfo/ssmlist"                                ;    // ȯÀÚ ¼ö¼úÀü óġ ¹× °£È£»óÅ ȮÀÎ »çÇ× Á¤º¸


function fInit() {
	
	var spid  = "";
	var sorddd = "";
	var scretno = "";
	
	node = getGlobalVariable("paminfo");
  setCSVToNode("/root/main/paminfo", node);
  var spid =  model.getValue("/root/main/paminfo/list/pid");
  var orddd =  model.getValue("/root/main/paminfo/list/orddd");
  var indd =  model.getValue("/root/main/paminfo/list/indd");
  var hngnm =  model.getValue("/root/main/paminfo/list/hngnm");
  
	if  (spid == "") {
    messageBox("»ó´Ü¿¡ ȯÀÚÁ¤º¸°¡ ¾ø½À´Ï´Ù", "I");
    window.close();
    return;
    
  }
  
  // È­¸é ¿ìÃø»ó´Ü ȯÀÚÁ¤º¸ È£Ãâ
  fGetPatBaseInfo();
  var sPatBaseInfo = model.getValue(xPath_PatBaseInfo+"/wardnm"  	 ) + "  "   	// º´µ¿
                   + model.getValue(xPath_PatBaseInfo+"/roomcd"  	 ) + "  "   	// º´½Ç
                   + model.getValue(xPath_PatBaseInfo+"/patnm" 		 ) + "("   	 	// ȯÀÚ¸í
                   + model.getValue(xPath_PatBaseInfo+"/pid"  		 ) + ")  "    // µî·Ï¹øÈ£
                   + model.getValue(xPath_PatBaseInfo+"/sexage"    ) + "  "   	// SA
                   + model.getValue(xPath_PatBaseInfo+"/orddeptnm" ) + "  "   	// Áø·á°ú
                   + model.getValue(xPath_PatBaseInfo+"/medispclnm") + "  "   	// ÁÖÄ¡ÀÇ
                   + model.getValue(xPath_PatBaseInfo+"/atdoctnm"  ) + "  "   	// ´ã´çÀÇ
                   + model.getValue(xPath_PatBaseInfo+"/pdano"     );         	// ´ã´çÀÇ¿¬¶ôó
  
  model.makeValue("/root/init/patinfo", sPatBaseInfo);
  
  fGetNursHardCdInfo("'S06'",getCurrentDate());
  
  fAddSSList();
  
  model.makeValue("/root/init/ssbfcureseqno",model.getValue("/root/init/ssinfo[1]/sslist/ssbfcureseqno"));
  
  var ssbfcureseqno = model.getValue("/root/init/ssbfcureseqno");
  
  if ( ssbfcureseqno =="" || isNull(ssbfcureseqno) ) {
  	fNew();
  }
  else {
  	fGetData();
  }
  
  //fControlGridAttr(grd_ItemCheckList);
  
  grd_ItemCheckList.fixedcellcheckbox(1,grd_ItemCheckList.colRef("pyes")) = true;
  grd_ItemCheckList.fixedcellcheckbox(1,grd_ItemCheckList.colRef("syes")) = true;
  
  model.refresh();
	
}

function fAddSSList() {
	
	var spid =  model.getValue("/root/main/paminfo/list/pid");
  var sorddd =  model.getValue("/root/main/paminfo/list/orddd");
  var sindd =   model.getValue("/root/main/paminfo/list/indd");
  var scretno =  model.getValue("/root/main/paminfo/list/cretno");
  var sordtype =  model.getValue("/root/main/paminfo/list/ordtype");
  var sinstcd = getUserInfo("dutplceinstcd");
  
  
  if (!(sordtype == "S" || sordtype =="O")) {
  	 sorddd = sindd;
  }
	
	model.makeValue("/root/send/pid",spid);
  model.makeValue("/root/send/orddd",sorddd);
  model.makeValue("/root/send/cretno",scretno);
  model.makeValue("/root/send/instcd", sinstcd);
  model.makeValue("/root/send/flag"  , 2);
  
	if(submit("TRMNP00213",false)){
	}
}

function fGetData() {
	
	
	model.removeNodeset("/root/send");
  model.makeValue("/root/send/ssbfcureseqno",cmb_sslist.value);
  
  if(submit("TRMNP00214",false)) {
  	
  }
  
  if (getNodeSetCnt(xPath_curenurgstatspec) == 0 ) {
	  fGetBaseCheckList();
	}
  model.refresh();
  
  fSetBtn();
  
}

function fNew() {
	model.makeValue("/root/init/ssbfcureseqno","");
	model.removeNodeset("/root/main/ssminfo/ssmlist/famyinfo");
	model.removeNodeset("/root/main/ssminfo/ssmlist/spcinfo");
	//16.03.17_Ãß°¡_AYS
	model.removeNodeset("/root/main/ssminfo/ssmlist/infecinfo");
	model.removeNodeset(xPath_curenurgstatspec);
	model.makeNode(xPath_curenurgstatspec);
	model.resetInstanceNode("/root/main/ssminfo");
	
	model.makeValue(xPath_MnpmcssrList+"/pid",model.getValue("/root/main/paminfo/list/pid"));
	model.makeValue(xPath_MnpmcssrList+"/orddd",model.getValue("/root/main/paminfo/list/orddd"));
	model.makeValue(xPath_MnpmcssrList+"/cretno",model.getValue("/root/main/paminfo/list/cretno"));
	model.makeValue(xPath_MnpmcssrList+"/indd",model.getValue("/root/main/paminfo/list/indd"));
	model.makeValue(xPath_MnpmcssrList+"/orddeptcd",model.getValue("/root/main/paminfo/list/orddeptcd"));
	model.makeValue(xPath_MnpmcssrList+"/ordtype",model.getValue("/root/main/paminfo/list/ioflag"));
	model.makeValue(xPath_MnpmcssrList+"/orddrid",model.getValue("/root/main/paminfo/list/orddrid"));
	model.makeValue(xPath_MnpmcssrList+"/medispclid",model.getValue("/root/main/paminfo/list/medispclid"));
	
	model.makeValue(xPath_MnpmcssrList+"/emeryn", 'N');
	
	fGetBaseCheckList();
	
	//ȯÀÚÁ¤º¸
	var nodelist = instance1.selectNodes("/root/init/patbaseinfo/MnwmpfifList");
  var nodePath ="/root/main/ssminfo/ssmlist/famyinfo/famylist";
         
  model.makeNode(nodePath);
         
  var desnode = instance1.selectSingleNode(nodePath);
  
  if(nodelist.length > 0) {
   	while(node = nodelist.nextNode()) {
   		model.duplicate(desnode, node);
   	}
  }
  
  //°¨¿°Á¤º¸
  var nodelist2 = instance1.selectNodes("/root/init/patbaseinfo/InfectionList");
  var nodePath2 ="/root/main/ssminfo/ssmlist/infecinfo/InfectionLists";
         
  model.makeNode(nodePath2);
         
  var desnode2 = instance1.selectSingleNode(nodePath2);
         
  if(nodelist2.length > 0) {
   	while(node = nodelist2.nextNode()) {
   		model.duplicate(desnode2, node);
   	}
  }
	
  model.refresh();
  
}

function fGridCheckConfirm() {
     var BoolCheck = false;
     var GridNm = grd_ItemCheckList;
     var opchkyn ="";
     var cnt = 0;
     
     for (var iRow = GridNm.fixedrows; iRow < GridNm.rows; iRow++){
     	  opchkyn = model.getValue(GridNm.nodeset + "[" + (iRow-1) + "]/opchkyn");   
     	  
     	
          if (chk_stay.value == "1") {
                 if ((GridNm.valueMatrix(iRow, GridNm.colRef("Syes"))== "false" || GridNm.valueMatrix(iRow, GridNm.colRef("Syes"))== "") &&
                     (GridNm.valueMatrix(iRow, GridNm.colRef("Sno"))== "false"  || GridNm.valueMatrix(iRow, GridNm.colRef("Sno"))== "") &&
                     (GridNm.valueMatrix(iRow, GridNm.colRef("Snothing"))== "false"  || GridNm.valueMatrix(iRow, GridNm.colRef("Snothing"))== "")) {
                      BoolCheck = true;
                      break;
                 }
         } else if (chk_stay.value == "2") {
                 if ((GridNm.valueMatrix(iRow, GridNm.colRef("Oyes"))== "false" || GridNm.valueMatrix(iRow, GridNm.colRef("Oyes"))== "") &&
                     (GridNm.valueMatrix(iRow, GridNm.colRef("Ono"))== "false"  || GridNm.valueMatrix(iRow, GridNm.colRef("Ono"))== "") &&
                     (GridNm.valueMatrix(iRow, GridNm.colRef("Onothing"))== "false"  || GridNm.valueMatrix(iRow, GridNm.colRef("Onothing"))== "") && 
                     (opchkyn == "Y" ||opchkyn == "" || opchkyn == null) ) {
                      BoolCheck = true;
                      break;
                 }
         } else {

             if ((GridNm.valueMatrix(iRow, GridNm.colRef("pyes"))== "false"     || GridNm.valueMatrix(iRow, GridNm.colRef("pyes"))== "") &&
                 (GridNm.valueMatrix(iRow, GridNm.colRef("Pno"))== "false"      || GridNm.valueMatrix(iRow, GridNm.colRef("Pno"))== "") &&
                 (GridNm.valueMatrix(iRow, GridNm.colRef("Pnothing"))== "false" || GridNm.valueMatrix(iRow, GridNm.colRef("Pnothing"))== "")) {
                 	
                  BoolCheck = true;
                  break;
             }
         }
     }
     
     return BoolCheck;
 }

function fSave(pFlag){
		
		
		var pid                = model.getValue(xPath_MnpmcssrList + "/pid"           ); // ȯÀÚ¹øÈ£
		var instcd             = model.getValue(xPath_MnpmcssrList + "/instcd"        ); // ¿ø¹«¿Ü·¡/ÀÔ¿øµî·ÏÁ¤º¸ PK
		var ordtype            = model.getValue(xPath_MnpmcssrList + "/ordtype"       ); // ¿Ü·¡ÀÔ¿ø±¸ºÐ
		var orddd              = model.getValue(xPath_MnpmcssrList + "/orddd"         ); // Áø·áÀÏÀÚ
		var indd               = model.getValue(xPath_MnpmcssrList + "/indd"          ); // ÀÔ¿øÀÏÀÚ
		
		var orddrid            = model.getValue(xPath_MnpmcssrList + "/orddrid"          ); // Áø·áÀÇ»ç
		var medispclid         = model.getValue(xPath_MnpmcssrList + "/medispclid"          ); // ÁÖÄ¡±³¼ö
		
		var cretno             = model.getValue(xPath_MnpmcssrList + "/cretno"        ); // ¿ø¹«»ý¼º¹øÈ£
		var orddeptcd          = model.getValue(xPath_MnpmcssrList + "/orddeptcd"     ); // Áø·áºÎ¼­
		var ssdd           		 = model.getValue(xPath_MnpmcssrList + "/ssdd"              ); // ½Ã¼úÀÏ
		//var ssplace          = model.getValue(xPath_MnpmcssrList + "/ssplace"           ); // ½Ã¼úÀå¼Ò
		var ssnm          		 = model.getValue(xPath_MnpmcssrList + "/ssnm"              ); // ½Ã¼ú¸í
		var ssnmetc            = model.getValue(xPath_MnpmcssrList + "/ssnmetc"        ); // ½Ã¼ú¸í
		var nrecnm             = model.getValue(xPath_MnpmcssrList + "/nrecnm"            ); // °£È£´ÜÀ§±â·ÏÀÚ
		var nrecdt             = model.getValue(xPath_MnpmcssrList + "/nrecdt"            ); // °£È£´ÜÀ§±â·ÏÀϽÃ
		var nrecdept           = model.getValue(xPath_MnpmcssrList + "/nrecdept"          ); // °£È£´ÜÀ§±â·Ï ºÎ¼­ÄÚµå
		var srecnm             = model.getValue(xPath_MnpmcssrList + "/srecnm"            ); // ½Ã¼ú½Ç ±â·ÏÀÚ
		var srecdt             = model.getValue(xPath_MnpmcssrList + "/srecdt"            ); // ½Ã¼ú½Ç ±â·ÏÀϽÃ
		var srecdept           = model.getValue(xPath_MnpmcssrList + "/srecdept"          ); // ½Ã¼ú½Ç±â·Ï ºÎ¼­ÄÚµå
		
		var semeryn            = model.getValue(xPath_MnpmcssrList + "/emeryn"            ); // ÀÀ±Þ¿©ºÎ
		var strans             = model.getValue(xPath_MnpmcssrList + "/trans"             ); // À̵¿¼ö´Ü
		var snrectel           = model.getValue(xPath_MnpmcssrList + "/nrectel"             ); // °£È£´ÜÀ§ ÀüÈ­¹øÈ£
		var ssrectel           = model.getValue(xPath_MnpmcssrList + "/srectel"             ); // ½Ã¼ú½Ç ÀüÈ­¹øÈ£
		
		if (ssdd == "" || isNull(ssdd)) {
			messageBox("½Ã¼úÀÏÀÌ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
			return;
		}
		
		if (ssdd.length != 8) {
			messageBox("½Ã¼úÀÏÀÌ Á¤È®È÷ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
			return;
		}
		
		//if (ssplace == "" || isNull(ssplace)) {
		//	messageBox("½Ã¼úÀå¼Ò°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
		//	return;
		//}
		
		if (nrecdept == "" || isNull(nrecdept)) {
			messageBox("°£È£´ÜÀ§ ±â·ÏºÎ¼­°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
			return;
		}
		
		if (nrecnm == "" || isNull(nrecnm)) {
			messageBox("°£È£´ÜÀ§ ±â·ÏÀÚ°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
			return;
		}
		
		if (nrecdt == "" || isNull(nrecdt)) {
			messageBox("°£È£´ÜÀ§ ±â·ÏÀϽð¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
			return;
		}
		
		if (semeryn == "" || isNull(semeryn)) {
			messageBox("ÀÀ±Þ¿©ºÎ°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
			return;
		}
		
		if (strans == "" || isNull(strans)) {
			messageBox("À̵¿¼ö´ÜÀÌ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
			return;
		}
		
		if (snrectel == "" || isNull(snrectel)) {
			messageBox("°£È£´ÜÀ§ ÀüÈ­¹øÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
			return;
		}
		
//		if (ssrectel == "" || isNull(ssrectel)) {
//			messageBox("°£È£´ÜÀ§ ÀüÈ­¹øÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
//			return;
//		}
		
//		if (srecdept == "" || isNull(srecdept)) {
//			messageBox("½Ã¼ú´ÜÀ§ ±â·ÏºÎ¼­°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
//			return;
//		}
//		
//		if (srecnm == "" || isNull(srecnm)) {
//			messageBox("½Ã¼ú´ÜÀ§ ±â·ÏÀÚ°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
//			return;
//		}
//		
//		if (srecdt == "" || isNull(srecdt)) {
//			messageBox("½Ã¼ú´ÜÀ§ ±â·ÏÀϽð¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù","I");
//			return;
//		}
		
		
		if (!(ordtype == "S" || ordtype =="O")) {
	  	 orddd = indd;
	  	 orddrid = medispclid;
	  } 

//		if (fGridCheckConfirm()) {
//				messageBox("È®ÀλçÇ×À» Check ÇÏÁö ¾ÊÀº Ç׸ñÀÌ ÀÖ½À´Ï´Ù. ","I000");
//				return;
//		}
 		
		var curenurgstatspec = "";
		var famyinfo = "";
		var spcinfo = "";
		
		if(getNodeSetCnt(xPath_curenurgstatspec) > 0) {
				var curenurgstatspec = instance1.selectSingleNode(xPath_curenurgstatspec).xml;
		}
		
		if(getNodeSetCnt(xPath_famyinfo) > 0) {
				var famyinfo = instance1.selectSingleNode(xPath_famyinfo).xml;
		}
		
		// °ËüÁ¤º¸ »èÁ¦('16.03.17 - AYS)
		//if(getNodeSetCnt(xPath_spcinfo) > 0) {
		//		var spcinfo = instance1.selectSingleNode(xPath_spcinfo).xml;
		//}
		
		// °¨¿°Á¤º¸ Ãß°¡('16.03.17 - AYS)
		if(getNodeSetCnt(xPath_Infecinfo) > 0) {
				var infecinfo = instance1.selectSingleNode(xPath_Infecinfo).xml;
		}
		
		var nmemo          = model.getValue(xPath_MnpmcssrList + "/nmemo"                    );     // °£È£´ÜÀ§¸Þ¸ð
		var smemo          = model.getValue(xPath_MnpmcssrList + "/smemo"                    );     // ¼ö¼ú,´ë±â ´ÜÀ§¸Þ¸ð
		var signno         = model.getValue(xPath_MnpmcssrList + "/signno"                   );     // ÀÎÁõ¹øÈ£
		var ssbfcureseqno   = model.getValue(xPath_MnpmcssrList + "/ssbfcureseqno"           );     // ÀÇ·Ú¹øÈ£(³âµµ(4) + ÀϷùøÈ£(6))
		
		if (ssbfcureseqno == "" || isNull(ssbfcureseqno)) {
			var stat = "I";
		}
		else {
			var stat = "U";
		}
		
		if ( pFlag == "D" ) {
			var stat = "D";
		}
		
		var wUserId   = getUserInfo("userid"   );            // »ç¿ëÀÚ
		var wUserNm   = getUserInfo("usernm"   );            // »ç¿ëÀÚ ¸í
		var wDeptCd   = getUserInfo("dutplcecd");            // »ç¿ëÀÚ ºÎ¼­ÄÚµå
		var wDeptNm   = getUserInfo("dutplcenm");            // »ç¿ëÀÚ ºÎ¼­¸í
		var wRecoDate = getCurrentDate() + getCurrentTime(); // ½Ã½ºÅÛÀÏÀÚ ±â·Ï
		var wSaveDate = getCurrentDate() + getCurrentTime(); // ½Ã½ºÅÛÀÏÀÚ ±â·Ï

		
		model.removenode("/root/send");
		
		
		// Title Set
		var sMnpmcssrData = "pid"                + "¢Ë"    // ȯÀÚ¹øÈ£
											+ "instcd"             + "¢Ë"    // ¿ø¹«¿Ü·¡/ÀÔ¿øµî·ÏÁ¤º¸ PK
											+ "ordtype"            + "¢Ë"      // ¿Ü·¡ÀÔ¿ø±¸ºÐ
											+ "orddd"              + "¢Ë"    // Áø·áÀÏÀÚ
											+ "cretno"             + "¢Ë"   // ¿ø¹«»ý¼º¹øÈ£
											+ "orddeptcd"          + "¢Ë"    // Áø·áºÎ¼­
											+ "orddrid"            + "¢Ë"    // Áø·áÀÇ»ç
											+ "curenurgstatspec"   + "¢Ë"    // óġ¹×°£È£»óÅÂÁ¤º¸
											+ "certflag"           + "¢Ë"    // 
											+ "ssdd"               + "¢Ë"    // 
											+ "ssnm"               + "¢Ë"    // 
											+ "ssnmetc"            + "¢Ë"    // 
											+ "nrecnm"             + "¢Ë"    // °£È£´ÜÀ§±â·ÏÀÚ
											+ "nrecdt"             + "¢Ë"    // °£È£´ÜÀ§±â·ÏÀϽÃ
											+ "nrecdept"           + "¢Ë"    // °£È£´ÜÀ§±â·ÏºÎ¼­
											+ "srecnm"             + "¢Ë"    // ½Ã¼ú½Ç ±â·ÏÀÚID
											+ "srecdt"             + "¢Ë"    // ½Ã¼ú½Ç ±â·ÏÀϽÃ
											+ "srecdept"           + "¢Ë"    // ½Ã¼ú½Ç ±â·ÏºÎ¼­
											+ "nmemo"              + "¢Ë"    // °£È£´ÜÀ§¸Þ¸ð
											+ "smemo"              + "¢Ë"    // ¼ö¼ú,´ë±â ´ÜÀ§¸Þ¸ð
											+ "signno"             + "¢Ë"    // ÀÎÁõ¹øÈ£
											+ "ssbfcureseqno"      + "¢Ë"    // ½Ã¼ú¿¡´ëÇÑÀÇ·Ú¹øÈ£(³âµµ(4) + ÀϷùøÈ£(6))
											+ "stat"               + "¢Ë"    // ÁøÇà»óÅÂ
											+ "famyinfo"           + "¢Ë"    // °¡Á·Á¤º¸
											+ "infecinfo"          + "¢Ë"    // °¨¿°Á¤º¸
											+ "emeryn"             + "¢Ë"    // ÀÀ±Þ¿©ºÎ
											+ "trans"              + "¢Ë"    // À̵¿¼ö´ç
											+ "nrectel"            + "¢Ë"    // °£È£´ÜÀ§ ÀüÈ­¹øÈ£
											+ "srectel"            + "¢Ì";   // ½Ã¼ú½Ç ÀüÈ­¹øÈ£
		// Title Set
		sMnpmcssrData		 += pid                 + "¢Ë"     // ȯÀÚ¹øÈ£
											+ instcd              + "¢Ë"     // ¿ø¹«¿Ü·¡/ÀÔ¿øµî·ÏÁ¤º¸ PK
											+ ordtype             + "¢Ë"     // ¿Ü·¡ÀÔ¿ø±¸ºÐ
											+ orddd               + "¢Ë"     // Áø·áÀÏÀÚ
											+ cretno              + "¢Ë"     // ¿ø¹«»ý¼º¹øÈ£
											+ orddeptcd           + "¢Ë"     // Áø·áºÎ¼­
											+ orddrid             + "¢Ë"     // Áø·áÀÇ»ç
											+ curenurgstatspec    + "¢Ë"     // óġ¹×°£È£»óÅÂÁ¤º¸
											+ pFlag               + "¢Ë"     // ÀÎÁõÀúÀ屸ºÐ
											+ ssdd                + "¢Ë"     // ½Ã¼úÀÏ
											+ ssnm                + "¢Ë"     // ½Ã¼ú¸í
											+ ssnmetc             + "¢Ë"     // ½Ã¼ú¸í
											+ nrecnm              + "¢Ë"     // °£È£´ÜÀ§±â·ÏÀÚ
											+ nrecdt              + "¢Ë"     // °£È£´ÜÀ§±â·ÏÀϽÃ
											+ nrecdept            + "¢Ë"     // °£È£´ÜÀ§±â·ÏºÎ¼­
											+ srecnm              + "¢Ë"     // ½Ã¼ú½Ç ±â·ÏÀÚ
											+ srecdt              + "¢Ë"     // ½Ã¼ú½Ç ±â·ÏÀϽÃ
											+ srecdept            + "¢Ë"    // ½Ã¼ú½Ç ±â·ÏºÎ¼­
											+ nmemo               + "¢Ë"     // °£È£´ÜÀ§¸Þ¸ð
											+ smemo               + "¢Ë"     // ¼ö¼ú,´ë±â ´ÜÀ§¸Þ¸ð
											+ signno              + "¢Ë"     // ÀÎÁõ¹øÈ£
											+ ssbfcureseqno       + "¢Ë"     // ¼ö¼ú¿¡´ëÇÑÀÇ·Ú¹øÈ£(³âµµ(4) + ÀϷùøÈ£(6))
											+ stat                + "¢Ë"     // ÁøÇà»óÅÂ
											+ famyinfo            + "¢Ë"    // °¡Á·Á¤º¸
											+ infecinfo           + "¢Ë"    // °¨¿°Á¤º¸
											+ semeryn             + "¢Ë"    // ÀÀ±Þ¿©ºÎ
											+ strans              + "¢Ë"    // À̵¿¼ö´ç
											+ snrectel            + "¢Ë"    // °£È£´ÜÀ§ ÀüÈ­¹øÈ£
											+ ssrectel            + "¢Ì";   // ½Ã¼ú½Ç ÀüÈ­¹øÈ£
											
		
		
		model.makeValue("/root/send/MnpmcssrList",sMnpmcssrData);
		
		if(pFlag == 'C') {
			var CertFlag = true;
	
			CertFlag = fSignProcessSet();
			
			if (CertFlag == false){
					//2008-10-01 ¿ÀÀü 5:54:13 taebum ÀÎÁõÀú Ãë¼Ò½Ã ÅëÇÕ±â·Ï Á¶È¸°ü·Ã ¿ä±¸»çÇ× Ã³¸®·Î ÀÎÇÑ ¿À·ù¹ß»ý .
					//È­¸é close ½ÃÅ´.
					window.close();
					return;    // ÀÎÁõ½ÇÆÐ
			}
		}
		
		if(submit("TXMNP00213")){
			fAddSSList();
			
			if(stat == 'I' || stat == 'U'){
				if(ssbfcureseqno != "" || !isNull(ssbfcureseqno)) {
					//alert("ssbfcureseqno_1 : " + ssbfcureseqno);
					model.makeValue("/root/init/ssbfcureseqno", ssbfcureseqno);
					cmb_sslist.dispatch("xforms-value-changed");
				} else {
					var ssbfcureseqno_new = model.getValue("/root/temp/retdata/ssbfcureseqno");
					//alert("ssbfcureseqno_2 : " + ssbfcureseqno_new);
					model.makeValue("/root/init/ssbfcureseqno", ssbfcureseqno_new);
					cmb_sslist.dispatch("xforms-value-changed");
				}
				messageBox("ÀúÀåÀÌ ", "I001");
			}
				
			if (pFlag =="D") {
				fNew();
				messageBox("»èÁ¦°¡ ", "I001");
			}
			
			model.refresh();
			
		}
}

// ¡Ø ÀüÀÚ¼­¸í È£Ãâ
function fSignProcessSet() {
    //2009-02-25 YCD ÀÎÁõ¼­ È£Ãâ ¼³Á¤ ÁÖ¼® ó¸®
    //Sign.certreload = true;

    var ordtype          = model.getValue(xPath_MnpmcssrList + "/ordtype"     );        // 07 ¿Ü·¡ÀÔ¿ø±¸ºÐ
    
    if( Sign.signprocess() == true ){           // ¢º ÀüÀÚÀÎÁõ °ü·Ã ȯÀÚ ÀÎÀû Á¤º¸¸¦ º¸³»ÁÜ.

        var wSigninfo = "pid"                                          +"¢Ë"  // µî·Ï¹øÈ£
                      + "orddd"                                        +"¢Ë"  // ÀÔ¿øÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
                      + "cretno"                                       +"¢Ë"  // »ý¼º¹øÈ£
                      + "signno"                                       +"¢Ë"  // ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
                      + "recdd"                                        +"¢Ë"  // ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
                      + "rectm"                                        +"¢Ë"  // ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
                      + "recsaveflag"                                  +"¢Ë"  // ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
                      + "signflag"                                     +"¢Ë"  // ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
                      + "signgenrflag"                                 +"¢Ë"  // ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
                      + "formcd"                                       +"¢Ë"  // °¢ ±â·ÏÁöº° ¼­½ÄÄÚµå  0000002473	N57	°£È£	¼ö¼ú°£È£±â·Ï
                      + "orddeptcd"                                    +"¢Ë"  // Áø·áºÎ¼­ÄÚµå
                      + "orddrid"                                      +"¢Ë"  // Áø·áÀÇ»çID (ÁýµµÀÇ)
                      + "signbfcnts"                                   +"¢Ë"  // ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
                      + "signaftcnts"                                  +"¢Ì"  // ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ
                      + model.getValue(xPath_MnpmcssrList+"/pid"      )+"¢Ë"  // µî·Ï¹øÈ£
                      + model.getValue(xPath_MnpmcssrList+"/indd"    ) + model.getValue(xPath_MnpmcssrList+"/orddd"    )+"¢Ë"  // Áø·áÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
                      + model.getValue(xPath_MnpmcssrList+"/cretno"   )+"¢Ë"  // »ý¼º¹øÈ£
                      + model.getValue(xPath_MnpmcssrList+"/signno"   )+"¢Ë"  // ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
                      + getCurrentDate()                               +"¢Ë"  // ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
                      + getCurrentTime()                               +"¢Ë"  // ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
                      + "N"                                            +"¢Ë"  // ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
                      + "02"                                           +"¢Ë"  // ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
                      + model.getValue(xPath_MnpmcssrList+"/ordtype"  )+"¢Ë"  // ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
                      + "1500016488"                                   +"¢Ë"  // ½Ã¼úÀü ÁغñÈ®ÀÎ
                      + model.getValue(xPath_MnpmcssrList+"/orddeptcd")+"¢Ë"  // Áø·áºÎ¼­ÄÚµå
                      + model.getValue(xPath_MnpmcssrList+"/medispclid"  ) + model.getValue(xPath_MnpmcssrList+"/orddrid"  )+"¢Ë"  // Áø·áÀÇ»çID (ÁÖÄ¡±³¼ö)
                      + Sign.signedInfos[1]                            +"¢Ë"  // ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
                      + Sign.signedInfos[2]                            +"¢Ì"; // ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ

        model.makeValue("/root/send/signinfo"         , wSigninfo);

              // model.makeValue("/root/send/signinfo/pid"         , model.getValue(xPath_MnpmcssrList+"/pid"         ));  // µî·Ï¹øÈ£
              // model.makeValue("/root/send/signinfo/orddd"       , model.getValue(xPath_MnpmcssrList+"/orddd"       ));  // ÀÔ¿øÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
              // model.makeValue("/root/send/signinfo/cretno"      , model.getValue(xPath_MnpmcssrList+"/cretno"      ));  // »ý¼º¹øÈ£
              // model.makeValue("/root/send/signinfo/signno"      , model.getValue(xPath_MnpmcssrList+"/certno"      ));  // ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
              // model.makeValue("/root/send/signinfo/recdd"       , getCurrentDate()                                  );  // ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
              // model.makeValue("/root/send/signinfo/rectm"       , getCurrentTime()                                  );  // ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
              // model.makeValue("/root/send/signinfo/recsaveflag" , "N"                                               );  // ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
              // model.makeValue("/root/send/signinfo/signflag"    , "02"                                              );  // ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
              // model.makeValue("/root/send/signinfo/signgenrflag", model.getValue(xPath_MnpmcssrList+"/inoutflag"   ));  // ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
              // model.makeValue("/root/send/signinfo/formcd"      , "0000002431"                                      );  // °¢ ±â·ÏÁöº° ¼­½ÄÄÚµå  0000002473	N57	°£È£	¼ö¼ú°£È£±â·Ï
              // model.makeValue("/root/send/signinfo/orddeptcd"   , model.getValue(xPath_MnpmcssrList+"/orddeptcd"   ));  // Áø·áºÎ¼­ÄÚµå
              // model.makeValue("/root/send/signinfo/orddrid"     , model.getValue(xPath_MnpmcssrList+"/perfdrid"    ));  // Áø·áÀÇ»çID (ÁýµµÀÇ)
              // model.makeValue("/root/send/signinfo/signbfcnts"  , Sign.signedInfos[1]);  // ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
              // model.makeValue("/root/send/signinfo/signaftcnts" , Sign.signedInfos[2]);  // ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ
    }else{
        return false;
    }
}

function fMake_SignData(){

          // ¢º ±â·Ï °ü·Ã ÀνºÅϽº Àüü¸¦ copy, ÀÎÁõ¿¡ ÀúÀåÇÒ ¸ðµç Instance AddNodeÇÑ´Ù.
          Sign.addnode(xPath_MnpmcssrList);
  
 }
 
function fGetBaseCheckList() {
	
	model.removeNodeset("/root/send");
  model.makeValue("/root/send/cdgrupid", 'S05');
  model.makeValue("/root/send/currentdate",getCurrentDate());
	if(submit("TRMNP00215",false)) {
		//
  }
	model.copyNode(xPath_curenurgstatspec  , xPath_Fmt_curenurgstatspec  );    // ȯÀÚ ¼ö¼úÀü óġ ¹× °£È£»óÅ ȮÀÎ »çÇ×
	
	grd_ItemCheckList.refresh();
	
	fSetBtn();
}


/* --------------------------------------------------*/
 /* type   : function                                 */
 /* access : public                                   */
 /* desc   : GRID CheckBox °ªº¯°æ                     */
 /* param  : pGridNm     : DataGrid Name              */
 /*          pRow        : DataGrid Row               */
 /*          pCol        : DataGrid Col               */
 /*          pTrueFase   : ³í¸®°ª                     */
 /* return :                                          */
 /* --------------------------------------------------*/
 function fCheckBox(pGridNm,pRow,pCol,pTrueFase){
          pGridNm.valueMatrix(pRow,pCol) = pTrueFase;
 }

 /* ------------------------------------------------- */
 /* type   : function                              */
 /* access : public                                */
 /* desc   : GRID CheckBox °ªº¯°æ            */
 /* param  : pGridNm     : DataGrid Name  */
 /* return :                                        */
 /* -------------------------------------------------*/
function fGridValueChangedCheckBox(pGridNm){
          var wTrueFase
          GridNm = eval(pGridNm) 
          if (GridNm.col > 2) {
              wTrueFase = GridNm.valueMatrix(GridNm.row ,GridNm.col);
              if (wTrueFase == "true") {
                  switch(GridNm.col){
                    case GridNm.colRef("pyes") :
                    		if( GridNm.row == "1" ) {	// Àüü '¿¹' üũ ½Ã
                    			fCheckBox(GridNm, ITM002 ,GridNm.colRef("pyes"),"false");
                    			fCheckBox(GridNm, ITM022 ,GridNm.colRef("pyes"),"false");
                    		}
                            fCheckBox(GridNm, GridNm.row ,GridNm.colRef("pno"),"false");
                            fCheckBox(GridNm, GridNm.row ,GridNm.colRef("pna"),"false");
                            break;
                    case GridNm.colRef("pno") :
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("pyes"),"false");
                            fCheckBox(GridNm, GridNm.row ,GridNm.colRef("pna"),"false");
                            break;
                    case GridNm.colRef("pna") :
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("pyes"),"false");
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("pno"),"false");
                            break;
                    case GridNm.colRef("syes") :
                    		if( GridNm.row == "1" ) {	// Àüü '¿¹' üũ ½Ã
                    			fCheckBox(GridNm, ITM002 ,GridNm.colRef("syes"),"false");
                    			fCheckBox(GridNm, ITM022 ,GridNm.colRef("syes"),"false");
                    		}
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("sno"),"false");
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("sna"),"false");
                            break;
                    case GridNm.colRef("sno") :
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("syes"),"false");
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("sna"),"false");
                            break;
                    case GridNm.colRef("sna") :
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("syes"),"false");
                            fCheckBox(GridNm,GridNm.row ,GridNm.colRef("sno"),"false");
                            break;
                  }
              }
          }
}

function fSetBtn() {
	
	for(var i = 1 ; i < grd_ItemCheckList.rows; i++) {
			if ( grd_ItemCheckList.valueMatrix(i, grd_ItemCheckList.colRef("itemcode")) == "02") {
				grd_ItemCheckList.cellstyle("background-image",i,2) = "../../../com/commonweb/images/icon_startend.gif";
				grd_ItemCheckList.cellstyle("cursor",i,2) = "hand";
			}
			
			if ( grd_ItemCheckList.valueMatrix(i, grd_ItemCheckList.colRef("itemcode")) == "03") {
				grd_ItemCheckList.cellstyle("background-image",i,2) = "../../../com/commonweb/images/icon_startend.gif";
				grd_ItemCheckList.cellstyle("cursor",i,2) = "hand";
			}
			
			if ( grd_ItemCheckList.valueMatrix(i, grd_ItemCheckList.colRef("itemcode")) == "09") {
				grd_ItemCheckList.cellstyle("background-image",i,2) = "../../../com/commonweb/images/icon_startend.gif";
				grd_ItemCheckList.cellstyle("cursor",i,2) = "hand";
			}
			
			// '16.03.30 - ¹Ú¹ÎÁö ¼±»ý´Ô ¿äûÀ¸·Î Invisible ó¸®
//			if ( grd_ItemCheckList.valueMatrix(i, grd_ItemCheckList.colRef("itemcode")) == "04") {
//				grd_ItemCheckList.cellstyle("background-image",i,4) = "../../../com/commonweb/images/icon_list.gif";
//				grd_ItemCheckList.cellstyle("cursor",i,4) = "hand";
//			}
//			
			// 16.09.19_º¸Á¶±â±¸, Àå½Å±¸ Á¦°Å Ç׸ñ Ãß°¡
			if ( grd_ItemCheckList.valueMatrix(i, grd_ItemCheckList.colRef("itemcode")) == "05") {
				grd_ItemCheckList.cellstyle("background-image",i,4) = "../../../com/commonweb/images/icon_list.gif";
				grd_ItemCheckList.cellstyle("cursor",i,4) = "hand";
			}
			
			if ( grd_ItemCheckList.valueMatrix(i, grd_ItemCheckList.colRef("itemcode")) == "06") {
				grd_ItemCheckList.cellstyle("background-image",i,4) = "../../../com/commonweb/images/icon_list.gif";
				grd_ItemCheckList.cellstyle("cursor",i,4) = "hand";
			}
	}
}

function fSearchDetlInfo() {
	
	
	//½Ã¼ú ¹× ¼ö¼úµ¿ÀǼ­
	if ( grd_ItemCheckList.valueMatrix(grd_ItemCheckList.row, grd_ItemCheckList.colRef("itemcode")) == "02" && grd_ItemCheckList.col == 2 ){
				model.makeValue("/root/send/instcd", 	getUserInfo("dutplceinstcd"));
				model.makeValue("/root/send/pid",			model.getValue(xPath_MnpmcssrList + "/pid"));
				model.makeValue("/root/send/cretno", 	model.getValue(xPath_MnpmcssrList + "/cretno"));
				model.makeValue("/root/send/orddd",		model.getValue(xPath_MnpmcssrList + "/indd")+ model.getValue(xPath_MnpmcssrList + "/orddd"));
				model.makeValue("/root/send/itemindxseq", "132184");
				model.makeValue("/root/send/sortkind", 	"D");
				model.makeValue("/root/send/pagingyn", "");
				model.makeValue("/root/send/keyfromdd", "");
				model.makeValue("/root/send/keytodd", "");
				model.makeValue("/root/send/keys", "");
				
				submit("TRMRI03009"); 
				var Prtrecinfo = "";
				
				for( i=1; i <= getNodesetCount("/root/tmp/keys"); i++){
					Prtrecinfo += model.getValue("/root/tmp/keys["+i+"]/kind")
								+ "¢Ë" + model.getValue("/root/tmp/keys["+i+"]/signno") 
								+ "¢Ë" + model.getValue("/root/tmp/keys["+i+"]/formcd")
								+ "¢Ì";
				}
				
				setParameter("SPMRI02400_prtrecinfo", Prtrecinfo);
				setParameter("SPMRI02400_prtyn", "N");
				setParameter("SPMRI02400_NurProg", "Y");
				
				modal("SPMRI02400");
	}
	
	//ADR
	if  (grd_ItemCheckList.valueMatrix(grd_ItemCheckList.row, grd_ItemCheckList.colRef("itemcode")) == "09"  &&  grd_ItemCheckList.col == 2) {
			open("SPMMD03300");
	}
	
	//ÁøÁ¤µ¿ÀǼ­
	if ( grd_ItemCheckList.valueMatrix(grd_ItemCheckList.row, grd_ItemCheckList.colRef("itemcode")) == "03" && grd_ItemCheckList.col == 2 ) {
							
				model.makeValue("/root/send/instcd", 	getUserInfo("dutplceinstcd"));
				model.makeValue("/root/send/pid",			model.getValue(xPath_MnpmcssrList + "/pid"));
				model.makeValue("/root/send/cretno", 	model.getValue(xPath_MnpmcssrList + "/cretno"));
				model.makeValue("/root/send/orddd",		model.getValue(xPath_MnpmcssrList + "/indd")+ model.getValue(xPath_MnpmcssrList + "/orddd"));
				model.makeValue("/root/send/itemindxseq", "132185");
				model.makeValue("/root/send/sortkind", 	"D");
				model.makeValue("/root/send/pagingyn", "");
				model.makeValue("/root/send/keyfromdd", "");
				model.makeValue("/root/send/keytodd", "");
				model.makeValue("/root/send/keys", "");
				
				submit("TRMRI03009"); 
				var Prtrecinfo = "";
				
				for( i=1; i <= getNodesetCount("/root/tmp/keys"); i++){
					if( model.getValue("/root/tmp/keys["+i+"]/formcd") == "1100010977"){
						Prtrecinfo += model.getValue("/root/tmp/keys["+i+"]/kind")
									+ "¢Ë" + model.getValue("/root/tmp/keys["+i+"]/signno") 
									+ "¢Ë" + model.getValue("/root/tmp/keys["+i+"]/formcd")
									+ "¢Ì";
					}
				}
				
				setParameter("SPMRI02400_prtrecinfo", Prtrecinfo);
				setParameter("SPMRI02400_prtyn", "N");
				setParameter("SPMRI02400_NurProg", "Y");
				
				modal("SPMRI02400");
	}
	
	
	if (grd_ItemCheckList.valueMatrix(grd_ItemCheckList.row, grd_ItemCheckList.colRef("itemcode")) == "04" && grd_ItemCheckList.col == 4) {
		var parammsg = "B@½Ã¼úºÎÀ§Ç¥½Ã@HPCD2"; 
		setParameter("SPMQR06000_param", parammsg);  // ÆĶó¹ÌÅÍ ¼³Á¤     	
		modal("SPMQR06000");                         // º´¿øÄÚµå Æ˾÷
		
	}
	if (grd_ItemCheckList.valueMatrix(grd_ItemCheckList.row, grd_ItemCheckList.colRef("itemcode")) == "05" && grd_ItemCheckList.col == 4) {
		var parammsg = "B@°Ë»ç½Ã È®ÀÎ »çÇ×@HPCD3"; 
		setParameter("SPMQR06000_param", parammsg);  // ÆĶó¹ÌÅÍ ¼³Á¤     	
		modal("SPMQR06000");                         // º´¿øÄÚµå Æ˾÷
	}
	
	if (grd_ItemCheckList.valueMatrix(grd_ItemCheckList.row, grd_ItemCheckList.colRef("itemcode")) == "06" && grd_ItemCheckList.col == 4) {
		var parammsg = "B@Á¤¸ÆÁÖ»ç È®º¸±âÁØ@HPCD4"; 
		setParameter("SPMQR06000_param", parammsg);  // ÆĶó¹ÌÅÍ ¼³Á¤     	
		modal("SPMQR06000");                         // º´¿øÄÚµå Æ˾÷
	}
}

function fGetPatBaseInfo() {
	var spid =  model.getValue("/root/main/paminfo/list/pid");
  var sorddd =  model.getValue("/root/main/paminfo/list/orddd");
  var sindd =   model.getValue("/root/main/paminfo/list/indd");
  var scretno =  model.getValue("/root/main/paminfo/list/cretno");
  var sordtype =  model.getValue("/root/main/paminfo/list/ordtype");
  
  if (!(sordtype == "S" || sordtype =="O")) {
  	 sorddd = sindd;
  }
	
	model.makeValue("/root/send/pid",spid);
  model.makeValue("/root/send/orddd",sorddd);
  model.makeValue("/root/send/cretno",scretno);
	if(submit("TRMNP00216",false)){
	}
}

function fControlGridAttr(pGrid) {
    var menuParameter = getScreenMenuParameter();
    var sBool1 = "";
    var sBool2 = "";
        
    if(menuParameter == 'NM') {
    	sBool1 = false;
    	sBool2 = true;
    } else if(menuParameter == 'IM') {
    	sBool1 = true;
    	sBool2 = false;
    } else {
    	sBool1 = false;
    	sBool2 = false;
    }
    
    for (var iRow = pGrid.fixedrows; iRow <= pGrid.rows; iRow++){
    	   //opchkyn = model.getValue(pGrid.nodeset + "[" + (iRow-1) + "]/opchkyn");
    	   //onochkyn = model.getValue(pGrid.nodeset + "[" + (iRow-1) + "]/onochkyn");
    	
	        pGrid.isReadOnly(iRow, pGrid.colRef("pyes"), iRow, pGrid.colRef("pna"))=sBool1;	
  	      pGrid.isReadOnly(iRow, pGrid.colRef("syes"), iRow, pGrid.colRef("sna"))=sBool2;         
//       
//        if(sBool3 == false && (onochkyn == "N" || onochkyn == "" || onochkyn == null) ) {
//            pGrid.isReadOnly(iRow, pGrid.colRef("Onothing"), iRow, pGrid.colRef("Onothing"))= false;
//        } else {
//            pGrid.isReadOnly(iRow, pGrid.colRef("Onothing"), iRow, pGrid.colRef("Onothing"))=true;	
//        }
//        
//        if(opchkyn == "N") {
//        	  pGrid.isReadOnly(iRow, pGrid.colRef("Oyes"), iRow, pGrid.colRef("Ono"))= true;	
//        }
//        
//        if(pGrid.row == 1 && pGrid.col == pGrid.colRef("Oyes") && opchkyn=="N") {
//    			pGrid.valueMatrix(iRow, pGrid.colRef("Oyes")) = false;
//    		}      
    }
    
    grd_ItemCheckList.fixedcellcheckbox(1,pGrid.colRef("pyes")) = ((sBool1) ? "false" : "true");
    grd_ItemCheckList.fixedcellcheckbox(1,pGrid.colRef("syes")) = ((sBool2) ? "false" : "true");

}