//º¯¼ö¼±¾ð
var prcpclscd = 2;
var prcpKindCdCol = 3;   //ó¹æÁ¾·ù index
var prcpnmCol = 5;       //ó¹æ¸í Ä÷³ index
var prcpVolCol = 6;      //¿ë·® Ä÷³ index
var prcpQtyCol = 8;      //¼ö·® Ä÷³ index
var prcpTimsCol = 10;    //Ƚ¼ö Ä÷³ index
var prcpDayNoCol = 11;   //Àϼö Ä÷³ index
var prcpDeliveFactCol = 15; //Àü´Þ»çÇ× Ä÷³ index
var prcpHopeHdCol = 18;  //Èñ¸ÁÀÏÀÚ Ä÷³ index
var ContPrcpDdRow = 6; //ÁöÁ¤ÀÏ instance row

var prcpNode = "/root/main/prcp/prcplist";
var diagNode = "/root/main/diaginfo/diagcdlist";

var prcpgenrflag = "";                  //¿Ü·¡ÀÔ¿ø±¸ºÐ

/**
 * @desc   : ó¹æÈ­¸é ÃʱâÈ­
 * @param  :
 * @id     : model1
 * @event  : xforms-ready
 * @return : void
 * @authur : ¸¶Á¤¹Î 2007. 3. 14
 * @---------------------------------------------------
 */
function fInitializeReady() {  
  model.recalculate();
  model.setfocus( "grd_prcplist" );
  grd_prcplist.dispatch("onentercell");
}

//HomeCarePrcp
function fHomeCarePrcpSrch(srchflag) {

	if(event.keyCode == "13") {

		if ( model.getValue(prcpNode+"["+grd_prcplist.row+"]/prcpflag") == "2" && model.getValue(prcpNode+"["+grd_prcplist.row+"]/drugmastspec") =="Y" ){
			return;
		}

		var prcpnm = model.getValue ( prcpNode + "[" + grd_prcplist.row+ "]/prcpnm" );

		if ( srchflag ==  "prcpcd") {
			prcpnm = model.getValue ( prcpNode + "[" + grd_prcplist.row+ "]/prcpcd" );
		} 

		var isHangul = fIsHangul (prcpnm);
		//ÇѱÛÀ϶§´Â 1±ÛÀÚ¸¸ ³Ö¾îµµ °Ë»ö°¡´É        
		if ( isNull(prcpnm)) {
			messageBox ( "°Ë»ö¾î¸¦", "C001" );
			return;
		} else if ( isHangul == "E" ){
		//¿µ¹®,¼ýÀÚÀ϶§´Â 3±ÛÀÚ ³Ö¾î¾ß °Ë»ö°¡´É
            if ( prcpnm.length < 2 ){
				messageBox ( "2±ÛÀÚ ÀÌ»ó", "C001" );
				return;
            }   
		} else if ( isHangul == "H" ) {
            if ( prcpnm.length < 2 ){
				messageBox ( "ÇѱÛÀº 2±ÛÀÚ ÀÌ»ó",  "C001" );
				return;
            }   
		}

		if (prcpnm.charAt ( 0 ) == "/"){
			
			if ( prcpnm.length == 1 ){
				messageBox ( "°Ë»öÇÒ ¼ö¼ú¸íÀÌ", "I004" );
				return;
			}
			
			var curRow =  grd_prcplist.row;
			var srchRow = grd_prcplist.rows -1;
			fPrcpModal ( "SPMMO05100", 180, 80 );

		} else {
			
			if ( srchflag ==  "prcpcd") {
	            fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMB00201", "", false, "getPrcpCdOldSrchInfo", isHangul );
			} else if ( srchflag ==  "prcpnm") {
	            fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMB00201", "", false, "getPrcpNmSrchInfo", isHangul );
			} else {
	            fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMB00201", "", false, "getPrcpSrchInfo", isHangul );
			}
			
			var srchLength = model.instances(0).selectNodes( "/root/prcpsrch/prcplist" ).length;
			var	curRow = grd_prcplist.row;
			var nextRow = grd_prcplist.row + 1;
			var prcpdd = model.getValue("/root/init/prcpdd");
			
			model.setValue(prcpNode+"["+grd_prcplist.row+"]/prcphopedd" , getCurrentDate());

			if( srchLength > 1) {

				grd_prcpsrchlist.attribute ( "height" ) = 278;
				btn_copy.attribute ( "top" ) = 281;
				btn_cancel.attribute ( "top" ) = 281;
				import1.attribute ( "height" ) = 306;

				if ( grd_prcplist.row <= 12) {
					import1.attribute ( "top" ) =  71 + ( grd_prcplist.row - 1) * 23;
				} else if (  grd_prcplist.row <= 25) {
					import1.attribute ( "top" ) =  (grd_prcplist.row - 1) * 23 - 260;
				} else if ( grd_prcplist.row > 25 ) {
					import1.attribute ( "top" ) =  24 * 23 - 240;
				}
				import1.visible = true;
				model.refresh();
			    model.setfocus( "grd_prcpsrchlist" );				
				grd_prcpsrchlist.select( 1, 1, 1, 1) = true;


			} else if( srchLength == 1) {
				srchRow = addPrcpDetl ( "import" , "/root/prcpsrch/prcplist" , "/root/main/prcp" , 1 , grd_prcplist.row, "00" );
				if (srchRow !=0 ) {
					focusMain ( srchRow );
				}
			} else {
				messageBox ( "°Ë»öµÈ ³»¿ëÀÌ", "I004" );
				grd_prcplist.dispatch("onentercell");
			}					
		}
	}				
}

function fGetHomeCarePrcp() {
	model.setValue ( "/root/send/cond1", model.getValue ("/root/init/formrecseq"));
	submit("TRMMB00501", false);
	appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ); //°Ë»ö¶óÀÎÃß°¡ 		
	model.refresh();
	model.recalculate();
}

/**
 * @desc   : ó¹æ¼öÁ¤.
 * @       : ½Å±ÔÀ϶§´Â ¼öÁ¤Ç¥½Ã ¾ÈÇÔ.
 * @       : »èÁ¦,D/C »óÅÂÀ϶§´Â Ãë¼ÒÈÄ ¼öÁ¤.
 * @param  :
 * @id     : grd_prcplist
 * @event  : xforms-value-changed
 * @return : void
 * @authur : ¸¶Á¤¹Î 2007. 6. 4
 * @---------------------------------------------------
 */
function fPrcpUpdate() {
	var status = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.row+ "]/status" );

	if (status=="-") {
		model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.row+ "]/status", "U" );
		model.refresh();
		model.recalculate();
	}
}

/**
 * @desc   : ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ »èÁ¦
 * @       : ½Å±ÔÀÏ ¶§´Â removeNode
 * @       : ¼öÁ¤ÁßÀÏ ¶§ ¿øº¹½ÃŲ ÈÄ »èÁ¦, D/C Ç¥½Ã
 * @       : »èÁ¦, D/C ¿øº¹½Ãų·Á¸é ? ¿À¸¥ÂÊ ¸¶¿ì½º¿¡ »èÁ¦ ¹× D/C ¿øº¹
 * @       : D/C ÈÄ »èÁ¦´Â ºÒ°¡
 * @param  : 
 * @id     : grd_prcplist
 * @event  : ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ »èÁ¦
 * @return : void
 * @authur : ¸¶Á¤¹Î 2007. 6. 4
 * @---------------------------------------------------
 */

function fDirecDeleteRow() {
	
	var selectedRows = grd_prcplist.selectedRows;
    var node = instance1.selectSingleNode("/root/main/prcp");
    var cnt=0;

	for (i= selectedRows-1; i >= 0; i--) {
		var status = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i) + "]/status" );
		if (status=="-") {
			model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i)+ "]/status", "D" );
		} else if ( status =="I" ) {
			//½Å±ÔÀÔ·Â(I)Àº removeNode ÀÌ´Ù.
			model.removeNode ( "/root/main/prcp/prcplist[" +  grd_prcplist.selectedrow(i) + "]" );
			//»èÁ¦½Ã µ¥ÀÌÅ͸¦ 
		} else if (status=="S")	{
			model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i) + "]/prcpnm", "" );
		} else if (status=="D") {
			model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i)+ "]/status", "-" );
		} else if (status=="U") {
			model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i)+ "]/status", "D" );
		}		
	}

	model.refresh();
	model.recalculate();
}

/**
 * @desc   : ó¹æ ¿À¸¥ÂÊ ¸¶¿ì½º Æ˾÷ ó¸®
 * @param  :
 * @id     : grd_prcplist
 * @event  : onmousedown
 * @return : void
 * @authur : ¸¶Á¤¹Î 2007. 6. 4
 * @---------------------------------------------------
 */
function fMouseRghtBtnPopup() {

	if (event.button == 3) {

		if(grd_prcplist.isCell(event.target) && grd_prcplist.mouseRow >= grd_prcplist.fixedRows){
            app.showPopupMenu(true);
			window.setPopupMenu(true, "/root/init/msrght/mouserght", "label", "func", false);
		} else {
		    window.setPopupMenu(false);
		}
	}
}

function fHomeCareSave() { 
    for ( var i=1; i < grd_prcplist.rows-1; i++ ) {		
		//kimsj 100615 ³ëµå »èÁ¦(ÀúÀå½Ã ¿À·ùÇö»ó ¹ß»ý)
		model.removeNode ("/root/main/prcp/prcplist[" + i + "]/rgstdeptcd"); 
		if ( isNull(model.getValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol6" ))) {
			var prcpnm = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpnm" );
			messageBox ( prcpnm + " ó¹æÀÇ Àû¿ë½ÃÀÛÀÏÀÌ ÀԷµÇÁö", "E007" );
			return;
		} else if (isNull(model.getValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol7" ))) {
			var prcpnm = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpnm" );
			messageBox ( prcpnm + " ó¹æÀÇ Àû¿ëÁ¾·áÀÏÀÌ ÀԷµÇÁö", "E007" );
			return;
		}
		if ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/status" ) == "I" || model.getValue ( "/root/main/prcp/prcplist[" + i + "]/status" ) == "U" ) {
		    model.setValue("/root/main/prcp/prcplist[" + i + "]/prcpkindcd", "20" );
		    model.setValue("/root/main/prcp/prcplist[" + i + "]/tempcol8", model.getValue ( "/root/init/formrecseq" ));
		}
	}


	//var savePrcpInfo = model.instances(0).selectNodes( "/root/main/prcp/prcplist" );					
	//model.setValue ( "/root/send/cond1", getNodeListCSV(savePrcpInfo)); 
	
	model.removeNodeset ( "/root/send/cond1/prcplist" );
	fAppendSaveNode( "/root/send/cond1", "/root/main/prcp/prcplist" );
	model.setValue ( "/root/send/cond2", "2" );
	//20131107 ÀÌÁ¤ÅÃ
	model.makeValue("/root/send/screenid", getScreenID());
	//20131107 ÀÌÁ¤ÅÃ

	if ( !submit ( "TRMMB00205", false )){
		model.resetInstanceNode ( "/root/send" );
		model.refresh();
		return;
	}

	var prcpErrList = model.instances(0).selectNodes( "/root/result/prcperrlist" );

	var xpt = window.screenleft + 100;
	var ypt = window.screenTop + 50;					
	var coord = getRelativeCoordinate ( xpt, ypt );
	var mon = coord[0];
	xpt = coord[1];
	ypt = coord[2];	

	if ( prcpErrList.length > 0 ) {
		if ( !isNull(model.getValue ( "/root/result/prcperrlist[1]/prcpcd"))){
			modal ( "SPMMO00600", mon,  xpt, ypt, "prcpdetl", "/root/result", "/root/result" ); //¿À·ùÆ˾÷
			model.removeNodeset("/root/result/prcperrlist");
		} 
			return;
	}      

	if (submit("TXMMB00501", false)) {
		model.removeNodeset ( "/root/send/cond1/prcplist" );
		appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ); //°Ë»ö¶óÀÎÃß°¡ 		
		model.refresh();
		model.recalculate();
		messageBox ("ó¹æ ÀúÀåÀÌ ", "I002"); // 2011.08.08 °¡Á¤°£È£ prn ó¹æ ÀúÀåÈ®ÀÎ ¸Þ¼¼Áö .
	}
	
	model.removeNodeset ( "/root/send/cond1/prcplist" );
}


function fInitialize_SMMMB00500(){
    //ÀÇ·Ú¼­¹øÈ£, ½ÃÀÛÀÏÀÚ ¹Þ¾Æ¾ß ÇÔ
    if(isNull(opener.javascript.getParameter ( "SMMMB00500_formrecseq" ))){
        messageBox ("°¡Á¤°£È£ ÀÇ·ÚÁö¹øÈ£°¡", "I004");
        window.close();
    }else{
        model.setValue ( "/root/init/formrecseq", opener.javascript.getParameter ( "SMMMB00500_formrecseq" ));
        model.setValue ( "/root/init/prcpfromdd", opener.javascript.getParameter ( "SMMMB00500_prcpfromdd" ));				        
        if ( isNull(model.getValue ( "/root/init/prcpfromdd" ))) {
            model.setValue ( "/root/init/prcpfromdd", getCurrentDate());
        }
        btn_prcpsrch.selected = true;				          				        				        				        
        model.setValue ( "/root/main/prcp/prcplist/status", "S");
        var prcpfromdd = model.getValue ( "/root/init/prcpfromdd" );
        var prcptodd = prcpfromdd.toDate().getAddDate(90,"D").getDateFormat();	
        model.setValue ( "/root/init/prcptodd", prcptodd );
        			        				        
        model.setValue ( "/root/init/prcpdd" , getCurrentDate());		
        grd_prcplist.backcoloralternate = "transparent";
        var paminfocvs = getGlobalVariable("paminfo");
        model.removeNodeSet ( "/root/paminfo/list" ); //»ó´ÜÈ­¸é Á¤º¸ ÃʱâÈ­
        setCSVToNode ( "/root/paminfo", paminfocvs );
        
        fPrcpExecDeptSrch("all");
        zbcfGetCodeList(new Array( "M0029", "M0005" , "M0343" ), new Array( "/root/init/payflagcd", "/root/init/prcpclscd", "/root/init/hsctdelivepos"));   				        
        fGetHomeCarePrcp();	
        fInitSrch();						        				
    }
    
    if(opener.javascript.getParameter("SMMMB00500_scrnflag") == "D"){ //°¡Á¤°£È£Ã³¹æ display¿ëÀÎ °æ¿ì
        btn_homeprcpsave.disabled = true;
        btn_homeprcpdel.disabled  = true;
    }
    
}