YNU_JEUS/app_home/himed/xpapps/pam/insucomxp/xp/SMPIZ00200.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type ="xscript4.0"><![CDATA[/*
- 상병관련 Function
--------------------------------
- fDiagSeqUp					: 상병순서 위로
- fDiagSeqDown					: 상병순서 아래로			
- fSortDiagNo                   : 상병SORT
- fDiagGridInsertRow            : 행삽입
- fDiagGridInsertRowMulti       : 행추가(5줄)
- fDiagGridDeleteRow            : 행삭제
- fDiagGridDeleteCancel         : 삭제취소
- fSearchDiageCode				: 상병코드 PopUp 조회
- fSearchSPPIZ00400				: 상병코드 PopUp 조회호출
- fSetDiagCdNm					: 상병코드 PopUp 반영
*/
var gToday = new Date();
var gBaseyear  = gToday.getDateFormat("YYYY");	// (dateHelper.js)에서 제공하는 함수를 사용하여 해당 년를 구한다.
var gBasemonth = gToday.getDateFormat("MM");
var gBaseday   = gToday.getDateFormat("DD");
var gCurrentdd  = gBaseyear + gBasemonth + gBaseday;
var gCurrentym  = gBaseyear + gBasemonth;

var gClopSize = "AUTO"; // 현재상태 DEFAULT, FULL, AUTO, CHANGE

// 20100614 환경초기화를 위한 로딩상태 저장
var gCldihist_refdata = "";
var gCldihist_sizedata = "";
var gClodhist_refdata = "";
var gClodhist_sizedata = "";
var gClophist_refdata = "";
var gClophist_sizedata = "";

///////////////////////////////////////////////////////////////////////////
	// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "상병순서 위로"
	function fDiagSeqUp() {
		var rowstatus = grd_cldihist.rowstatus(grd_cldihist.row);
		if (rowstatus == 4) {		// 4 : delete
			return;
		}
		var diagseq = parseInt(model.getValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagseq"));	// 선택된 줄의 NO
		if (diagseq > 1) {	// 첫번째 줄이 아닌 경우
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagseq", --diagseq);
			if (rowstatus == 0 || rowstatus == 2) {
				grd_cldihist.rowstatus(grd_cldihist.row) = 2;	// 2 : update
			}
			// 바로 위 상병순서와 중복되는 경우
			var nextrow = grd_cldihist.row - 1;
			var nextdiagseq = model.getValue(grd_cldihist.nodeset + "["+ nextrow +"]_diagseq");
			if (diagseq == nextdiagseq) {
				model.setValue(grd_cldihist.nodeset + "["+ nextrow +"]_diagseq", ++diagseq);
				rowstatus = grd_cldihist.rowstatus(nextrow);
				if (rowstatus == 0 || rowstatus == 2) {
					grd_cldihist.rowstatus(nextrow) = 2;		// 2 : update
				}
			}

			// 20100329 MT002 입력체크
			if (   model.getValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagseq") == "1"
			    && model.getValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_vcode")   != ""
			   ) {
				fSetDiagMT002(model.getValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_vcode"));
			}

			fSortDiagNo(false);
		}
	}
	// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "상병순서 아래로"
	function fDiagSeqDown() {
		var rowstatus = grd_cldihist.rowstatus(grd_cldihist.row);
		if (rowstatus == 4) {		// 4 : delete
			return;
		}
		// 삭제 상태가 아닌 마지막 줄을 찾는다.
		var lastRow = grd_cldihist.rows - 1;
		for (var i = 1; i < grd_cldihist.rows; i++) {
			if (grd_cldihist.rowstatus(i) == 4) {	// delete
				lastRow = i - 1;
				i = grd_cldihist.rows;
			}
		}
		var diagseq = parseInt(model.getValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagseq"));	// 선택된 줄의 NO
		if (diagseq < lastRow) {	// 마지막 줄이 아닌 경우
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagseq", ++diagseq);
			if (rowstatus == 0 || rowstatus == 2) {
				grd_cldihist.rowstatus(grd_cldihist.row) = 2;	// 2 : update
			}
			// 바로 아래 상병순서와 중복되는 경우
			var nextrow = grd_cldihist.row + 1;
			var nextdiagseq = model.getValue(grd_cldihist.nodeset + "["+ nextrow +"]_diagseq");
			if (diagseq == nextdiagseq) {
				model.setValue(grd_cldihist.nodeset + "["+ nextrow +"]_diagseq", --diagseq);

				rowstatus = grd_cldihist.rowstatus(nextrow);
				if (rowstatus == 0 || rowstatus == 2) {
					grd_cldihist.rowstatus(nextrow) = 2;		// 2 : update
				}
			}

			// 20100329 MT002 입력체크
			if (   model.getValue(grd_cldihist.nodeset + "["+ nextrow +"]_diagseq") == "1"
			    && model.getValue(grd_cldihist.nodeset + "["+ nextrow +"]_vcode")   != ""
			   ) {
				fSetDiagMT002(model.getValue(grd_cldihist.nodeset + "["+ nextrow +"]_vcode"));
			}

			fSortDiagNo(false);
		}
	}

	// "상병순서 위로_아래로" 순서 변경 후에 상병 순서 NO에 따라 sorting 작업
	function fSortDiagNo(isNumbering) {

		var delcnt = 0;

		for (var i = 1; i < grd_cldihist.rows; i++) {
			grd_cldihist.rowHidden(i) = false;		
		}

		if (isNumbering == false) {
			var maxRow = parseInt(grd_cldihist.rows) - 1;	// rows는 타이틀부분 부터 개수를 센다
			grd_cldihist.sort(1, grd_cldihist.colRef("diagseq"), maxRow, grd_cldihist.colRef("diagseq")) = "asc";		// 타이틀을 제외한 data 부분의 첫 줄의 row = 1 / col = 3 : no
			// Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.
			grd_cldihist.gridToInstance();
		}				

		var cldino = 1;
		for (var i = 1; i < grd_cldihist.rows; i++) {
			// 2.----------------------------------------------------------------------
			if (grd_cldihist.rowstatus(i) != 4) {	// delete
				var diagseq = model.getValue(grd_cldihist.nodeset + "["+ i +"]_diagseq");
				if (grd_cldihist.rowstatus(i) == 0 && diagseq != cldino) {
					grd_cldihist.rowstatus(i) = 2;	// 2 : update
				}
				model.setValue(grd_cldihist.nodeset + "["+ i +"]_diagseq", cldino++);
			} else {
				delcnt++;
			}
		}

		var maxRow = parseInt(grd_cldihist.rows) - 1;	// rows는 타이틀부분 부터 개수를 센다
		grd_cldihist.sort(1, grd_cldihist.colRef("diagseq"), maxRow, grd_cldihist.colRef("diagseq")) = "asc";		// 타이틀을 제외한 data 부분의 첫 줄의 row = 1 / col = 3 : no

		if (delcnt > 0) {
			grd_cldihist.sort(1, grd_cldihist.colRef("diagseq"), maxRow - delcnt, grd_cldihist.colRef("diagseq")) = "asc";		// 타이틀을 제외한 data 부분의 첫 줄의 row = 1 / col = 3 : no
		}

		// Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.
		grd_cldihist.gridToInstance();											

		/*	
		grd_cldihist.setFocus();
		grd_cldihist.row = 1;				
		*/

		var rowstatus;
		for (var i = 1; i < grd_cldihist.rows; i++) {
			rowstatus = grd_cldihist.rowstatus(i);
			if (rowstatus > 3) {		// 삭제상태
				grd_cldihist.rowHidden(i) = true;
			} else {
				grd_cldihist.rowHidden(i) = false;
			}
		}			
	}

	// 사용자가 입력한 숫자를 기준으로 상병순서 부여
	function fChangeDiagNo() {
		var row = grd_cldihist.row;
		if (grd_cldihist.rowstatus(row) != 1 && grd_cldihist.rowstatus(row) != 3) {		// 1 : insert, 3 : insert & new
			grd_cldihist.rowstatus(row) = 2;			// 2 : update
		}
		var newseq = model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagseq");
		var oldseq = ds_hidden_list1_cldi.getColumn(0, "oldseq");
		var vcode  = model.getValue(grd_cldihist.nodeset + "["+ row +"]_vcode");
		if (newseq) {
			newseq = parseInt(model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagseq"), 10);		// '09' 와 같은 형식으로 입력한 경우 -> 9로 처리
			// 삭제상태가 아닌 중복된 번호가 있는지 체크한다.
			var sameRow = 0;
			for (var i = 1; i < grd_cldihist.rows; i++) {
				var diagseq = model.getValue(grd_cldihist.nodeset + "["+ i +"]_diagseq");
				if (row != i && diagseq == newseq) {
					sameRow = i;
					i = grd_cldihist.rows;
				}
			}
			if (sameRow > 0) {		// 중복된 상병순서의 row가 있음
				if (newseq < oldseq) {		// 이전보다 앞번호를 입력한 경우
					for (var j = sameRow; j < row; j++) {
						var rowstatus = grd_cldihist.rowstatus(j);
						if (rowstatus != 4) {
							var curseq = parseInt(model.getValue(grd_cldihist.nodeset + "["+ j +"]_diagseq"), 10);
							if (rowstatus != 1 && rowstatus != 3) {
								if (model.getValue(grd_cldihist.nodeset + "["+ j +"]_diagseq") != (curseq+1)) {
									grd_cldihist.rowstatus(j) = 2;
								}
							}
							model.setValue(grd_cldihist.nodeset + "["+ j +"]_diagseq", curseq+1);
						}
					}
				}
				else {	// 이전보다 뒷번호를 입력한 경우
					for (var j = row+1; j <= sameRow; j++) {
						var rowstatus = grd_cldihist.rowstatus(j);
						if (rowstatus != 4) {
							var curseq = parseInt(model.getValue(grd_cldihist.nodeset + "["+ j +"]_diagseq"), 10);
							if (rowstatus != 1 && rowstatus != 3) {
								if (model.getValue(grd_cldihist.nodeset + "["+ j +"]_diagseq") != (curseq-1)) {
									grd_cldihist.rowstatus(j) = 2;
								}
							}
							model.setValue(grd_cldihist.nodeset + "["+ j +"]_diagseq", curseq-1);
						}
					}
				}
				fSortDiagNo(false);
				fDiagGridInsertRow("Y", "N"); // 상병마지막 그리드에 한 20090918 정승우

				// 20100329 MT002 입력체크
				if ( newseq == "1" && oldseq != "1" && vcode != "") {
					fSetDiagMT002(vcode);
				}

			} else {		// 중복된 상병순서의 row가 없는 경우
				fSortDiagNo(false);		// 현재 부여된 순번으로 sort 후
				fDiagGridInsertRow("Y", "N"); // 상병마지막 그리드에 한 20090918 정승우
			}
		} else {		// 순번을 삭제한 경우
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagseq", oldseq);
			grd_cldihist.rowstatus(row) = ds_hidden_list1_cldi.getColumn(0, "oldrowstat");
			//
//model.refresh();

//grd_cldihist.refresh();

			fDiagGridInsertRow("Y", "N"); // 상병마지막 그리드에 한
		}
	}

	// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 삽입"
	function fDiagGridInsertRow(addyn, selectyn) {
		var iInsertRow = 0;		
		if (grd_cldihist.rows == 1 || addyn == "Y") {
			iInsertRow = grd_cldihist.row;					
			grd_cldihist.addRow(true, false);
		} else {
			iInsertRow = grd_cldihist.row;
			grd_cldihist.insertRow(iInsertRow, "below", true);
		}

		var nowRow = 0;
		nowRow = grd_cldihist.row;		

		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagkindcd", "C");
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagseq", grd_cldihist.row);
		// 청구과, 진료개시일은 주상병을 기준으로 부여한다.
		var clamdeptcd = model.getValue(grd_cldihist.nodeset + "_clamdeptcd");
		if (clamdeptcd == "") {	// 주상병의 진료과가 입력되지 않은 경우 인적사항의 청구과를 입력한다.
			clamdeptcd = model.getValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_clamdeptcd");
		}
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_clamdeptcd", clamdeptcd);

		var ordfromdd = model.getValue(grd_cldihist.nodeset + "_ordfromdd");
		if (ordfromdd) {
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_ordfromdd", ordfromdd);
		} else {
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_ordfromdd", model.getValue(grd_diaghistlist.nodetset + "[" + grd_diaghistlist.row + "]_ordfromdd"));
		}
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_toot", "-");
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_vcode", ""); // 20100308 추가

		// 상병이력조회에서 호출된 경우가 아니면
		if (selectyn != "Y") {
			fSortDiagNo(true);
		}

		// edit mode 설정위한것임 절대 지우지 말것.

//grd_cldihist.refresh();

		if (addyn != "Y") {
			grd_cldihist.row = nowRow;		
			grd_cldihist.col = grd_cldihist.colRef("diagcd");		
			grd_cldihist.dispatch("onentercell");
		}

	}

	// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
	function fDiagGridAddRow() {

		grd_cldihist.insertRow(grd_cldihist.rows - 1, "below", false);
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagkindcd", "C");
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagseq", grd_cldihist.row);
		// 청구과, 진료개시일은 주상병을 기준으로 부여한다.
		var clamdeptcd = model.getValue(grd_cldihist.nodeset + "_clamdeptcd");
		if (clamdeptcd == "") {	// 주상병의 진료과가 입력되지 않은 경우 인적사항의 청구과를 입력한다.
			clamdeptcd = model.getValue(grd_cldihist.nodeset + "_clamdeptcd");
		}
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_clamdeptcd", clamdeptcd);
		var ordfromdd = model.getValue(grd_cldihist.nodeset + "_ordfromdd");
		if (ordfromdd) {
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_ordfromdd", ordfromdd);
		} else {
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_ordfromdd", model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_ordfromdd"));
		}
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_toot", "-");
		model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_vcode", ""); // 20100308 추가

//grd_cldihist.refresh();

		fSortDiagNo(true);

		// edit mode 설정위한것임 절대 지우지 말것.

//grd_cldihist.refresh();

		grd_cldihist.row = grd_cldihist.rows -1;
		grd_cldihist.col = grd_cldihist.colRef("diagcd");						
		grd_cldihist.dispatch("onentercell");

	}

	// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가(5줄)"
	function fDiagGridInsertRowMulti() {

		for (var i = 1; i <= 5; i++) {
			grd_cldihist.insertRow(grd_cldihist.rows - 1, "below", false);
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagkindcd", "C");
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagseq", grd_cldihist.row);
			// 청구과, 진료개시일은 주상병을 기준으로 부여한다.
			var clamdeptcd = model.getValue(grd_cldihist.nodeset + "_clamdeptcd");
			if (clamdeptcd == "") {	// 주상병의 진료과가 입력되지 않은 경우 인적사항의 청구과를 입력한다.
				clamdeptcd = model.getValue(grd_cldihist.nodeset + "_clamdeptcd");
			}
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_clamdeptcd", clamdeptcd);
			var ordfromdd = model.getValue(grd_cldihist.nodeset + "_ordfromdd");
			if (ordfromdd) {
				model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_ordfromdd", ordfromdd);
			} else {
				model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_ordfromdd", model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_ordfromdd"));
			}
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_toot", "-");
			model.setValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_vcode", ""); // 20100308 추가
		}

//grd_cldihist.refresh();

		fSortDiagNo(true);

		// edit mode 설정위한것임 절대 지우지 말것.

//grd_cldihist.refresh();

		grd_cldihist.row = grd_cldihist.rows - 5;
		grd_cldihist.col = grd_cldihist.colRef("diagcd");						
		grd_cldihist.dispatch("onentercell");

	}			

	// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 삭제"
	function fDiagGridDeleteRow() {
		// 여러 row를 동시에 선택하고 삭제하는 기능을 부여한다.
		for (var i = 0; i < grd_cldihist.selectedRows; i++) {
			var row = grd_cldihist.selectedrow(i);
			var rowstatus = grd_cldihist.rowstatus(row);
			if (rowstatus == 4) {		// 4 : delete
				//return;
			}
			else if ( (rowstatus == 1 || rowstatus == 3) && rowstatus != 0) {	// 1 : insert, 3 : insert & new
				model.resetInstanceNode(grd_cldihist.nodeset + "["+ row +"]_diagcd");
				model.resetInstanceNode(grd_cldihist.nodeset + "["+ row +"]_diagnm");
				model.resetInstanceNode(grd_cldihist.nodeset + "["+ row +"]_diagengnm");
				grd_cldihist.deleteRow(row, false);		// 해당 라인을 Grid에서 삭제한다.
			} else {							// 0 : new, 2 : update
				model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagseq", "D"+row);
				grd_cldihist.rowstatus(row) = 4;		// 4 : delete 상태로 stat를 변경한다.
			}
		}
		fSortDiagNo(true);
	}

	// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "삭제 취소" 
	function fDiagGridDeleteCancel() {
		// 여러 row를 동시에 선택하고 삭제취소하는 기능을 부여한다.
		for (var i = 0; i < grd_cldihist.selectedRows; i++) {
			var row = grd_cldihist.selectedrow(i);
			var rowstatus = grd_cldihist.rowstatus(row);
			if (rowstatus == 4) {		// 4 : delete
				grd_cldihist.rowstatus(row) = 2		// 2 : update 상태로 stat를 변경한다.
			}
		}
		fSortDiagNo(true);
	}

	// 상병코드를 조회하여 해당 정보를 표시하거나 상병코드 조회용 Popup을 호출한다.
	function fSearchDiageCode() {
		var row = grd_cldihist.row;
		var diagcd = model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagcd");
		if (diagcd) {
			ds_hidden_sppiz00400_rslt.clearData();
			// 상병 Data가 2007년 이후로 설정되어 있으므로 임시로 현재 날짜를 넘긴다.
			//dsf_makeValue( ds_hidden_sppiz00400_cond, "basedd", "string",  ds_main_item1_clbs.getColumn(0, "clamym"));
			ds_hidden_sppiz00400_cond.clearData(); ds_hidden_sppiz00400_cond.addRow();
			dsf_makeValue( ds_hidden_sppiz00400_cond, "basedd", "string",  utlf_getCurrentDate());	// (dateHelper.js) 현재날짜 반환
			dsf_makeValue( ds_hidden_sppiz00400_cond, "diagcd", "string",  diagcd);
			dsf_makeValue( ds_hidden_sppiz00400_cond, "diagnm", "string",  "");
			dsf_makeValue( ds_hidden_sppiz00400_cond, "selectedrdodiagkind", "string", "1");

//			submit("TRPID20306");		// 입력된 상병코드로 emr.mrtmicd10 테이블을 조회한다.
var oParam = {};
    oParam.id          = "TRPID20306";
    oParam.service     = "aftjudgapp.InAftJudg";
    oParam.method      = "reqGetSickAndWounded";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=cond ds_=rslt";
    oParam.async       = false;
    oParam.callback    = "cf_TRPID20306";

tranf_submit(oParam);
/*
function cf_TRPID20306(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPID20306(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPID20306") > -1
arErrorCode.pop("TRPID20306") < 0
*/



			/*
			var nodeList = instance1.selectNodes("ds_init_diagcd_diagcdlist[diagcd='" + diagcd + "']");

			if (nodeList.length == 1) {
				//dsf_makeValue( ds_hidden, "srchdiagcd", "string", "" );
				//model.copyNode("ds_hidden_srchdiagcd", nodeList);
				var diagListCSV = getNodeListCSV(nodeList);

				diagList1 = diagListCSV.split("▩");
				diagList2 = diagList1[1].split("▦");
				dsf_makeValue( ds_hidden_sppiz00400_rslt, "diagcd", "string", 		diagList2[0]);
				dsf_makeValue( ds_hidden_sppiz00400_rslt, "diaghngnm", "string", 	diagList2[1]);
				dsf_makeValue( ds_hidden_sppiz00400_rslt, "diagengnm", "string", 	diagList2[2]);						
			}			
			*/

			var rsltList = instance1.selectSingleNode("ds_hidden_sppiz00400_rslt");
			if (rsltList != null && rsltList.length == 0) {
				// 조회된 결과가 1건이면
				fSetDiagCdNm();

				// 다음칸에 자동 포커스 2008-11-26
				row++;
				grd_cldihist.row = row;
				grd_cldihist.col = grd_cldihist.colRef("diagcd");
				grd_cldihist.dispatch("onentercell");
			} else {
				// 조회된 결과가 없거나 여러 건이면
				// 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
				fSearchSPPIZ00400();

				if (model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagnm") == "" && model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagengnm") == "") {
					model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagcd", ds_hidden_list1_cldi.getColumn(0, "olddiagcd"));
					model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagnm", ds_hidden_list1_cldi.getColumn(0, "olddiagnm"));
					model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagengnm", ds_hidden_list1_cldi.getColumn(0, "oldengnm"));
					grd_cldihist.rowstatus(row) = ds_hidden_list1_cldi.getColumn(0, "oldrowstat");

//grd_cldihist.refresh();

					return;
				} else {				
					// 다음칸에 자동 포커스 2008-11-26
					row++;
					if (row < grd_cldihist.rows) {
						grd_cldihist.row = row;
						grd_cldihist.col = grd_cldihist.colRef("diagcd");
						grd_cldihist.dispatch("onentercell");				
					}
				}					
			}
		} else {
			// 상병 Grid에 상병코드를 입력하지 않고 Enter 친 경우
			// 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
			fSearchSPPIZ00400();

			// 다음칸에 자동 포커스 2008-11-26
			row++;
			grd_cldihist.row = row;
			grd_cldihist.col = grd_cldihist.colRef("diagcd");
			grd_cldihist.dispatch("onentercell");

			if (model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagcd") == "") {
				model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagcd", ds_hidden_list1_cldi.getColumn(0, "olddiagcd"));
				model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagnm", ds_hidden_list1_cldi.getColumn(0, "olddiagnm"));
				model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagengnm", ds_hidden_list1_cldi.getColumn(0, "oldengnm"));
				grd_cldihist.rowstatus(row) = ds_hidden_list1_cldi.getColumn(0, "oldrowstat");

//grd_cldihist.refresh();

				return;
			}
		}
		// 삭제 상태였던 상병코드를 조회하여 수정한 경우를 위해 순번을 다시 부여한다.
		// 2008-11-26
		// fSortDiagNo(true);
	}

	// 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
	function fSearchSPPIZ00400() {
		ds_hidden_sppiz00400_rslt.clearData();
		dsf_makeValue( ds_hidden_sppiz00400_rslt, "diagcd", "string", "" );
		dsf_makeValue( ds_hidden_sppiz00400_rslt, "diaghngnm", "string", "" );
		dsf_makeValue( ds_hidden_sppiz00400_rslt, "diagengnm", "string", "" );

		ds_hidden_sppiz00400_cond.clearData(); ds_hidden_sppiz00400_cond.addRow();
		ds_hidden_sppiz00400_cond.setColumn( 0, "basedd", utlf_getCurrentDate());	// (dateHelper.js) 현재날짜 반환
		ds_hidden_sppiz00400_cond.setColumn( 0, "diagcd", model.getValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagcd"));
		ds_hidden_sppiz00400_cond.setColumn( 0, "diagnm", "");
		ds_hidden_sppiz00400_cond.setColumn( 0, "selectedrdodiagkind","3");		// 사용자가 직접검색하여 입력 할수 있도록 임의의 값(3)을 넣어줌
		frmf_modal("SPPIZ00400", "SPPIZ00400", "ds_hidden_sppiz00400_cond""-"ds_init"", "", "1", "10", "10", "", "", "", "", "", "M");	// SPPIZ00400_상병코드조회.xrw
	}

	// [SPPIZ00400_상병코드조회.xrw 에서 호출] 상병코드조회 팝업에서 선택한 상병을 상병 그리드에 반영
	function fSetDiagCdNm() {			
		var row = grd_cldihist.row;
		if (row > 0) {
			var diagcd = ds_hidden_sppiz00400_rslt.getColumn(0, "diagcd");
			var diaghngnm = ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm");
			var diagengnm = ds_hidden_sppiz00400_rslt.getColumn(0, "diagengnm");
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagcd", diagcd);
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagnm", diaghngnm);
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagengnm", diagengnm);
			// 해당 상병의 한글상병명과 영문상병명이 Message 용 output 컨트롤에 표시된다.
			ds_hidden_list3.setColumn( 0, "msgspclformat", "상병코드 - "+ diagcd +" / "+ diaghngnm +" / "+ diagengnm);

			// 20100308 특정내역 조회 추가
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_vcode", fGetDiagVcode(diagcd));

			// 20100329 MT002 입력체크
			if (   model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagseq") == "1" 
			    && model.getValue(grd_cldihist.nodeset + "["+ row +"]_vcode")   != "" 
			   ) {
				fSetDiagMT002(model.getValue(grd_cldihist.nodeset + "["+ row +"]_vcode"));
			}

			//20090918 정승우 행추가
			var addval1 = ds_main_list1_diag.getColumn(row, "rowstat"));
		     var addval2 = grd_cldihist.rowstatus(row);

			var rowstatus = grd_cldihist.rowstatus(row);
			if (rowstatus != 1 && rowstatus != 3) {	// 1 : insert, 3 : insert & new
				grd_cldihist.rowstatus(row) = 2;		// 2 : update
			}
			// 4. 빈 row에 대한 입력은 행 추가를 발생시킨다. (그외에는 행추가가 일어나지 않는다.) 
			//20090918 정승우 행추가
		if (addval1 == "" && (addval2 == 1 || addval2 == 3)) fDiagGridInsertRow("Y", "N");

		}
	}

	// 20100329 김용민 추가 상병row 로 MT002 입력
	// incode null 경우는 주상병의 특정기호 체크, null아니면 바로입력체크
	function fSetDiagMT002(incode) {
		var gridrowstatus = "";
		var existsyn = "N";
		var vcode = "";

		if ( incode == "" ) {
			for (var i = 1; i < grd_cldihist.rows; i++) {
				if (   grd_cldihist.rowHidden(i) == false
			         && model.getValue(grd_cldihist.nodeset + "["+ i +"]_diagseq") == "1"
			    	    && model.getValue(grd_cldihist.nodeset + "["+ i +"]_vcode")   != ""
			        ) {
					vcode = model.getValue(grd_cldihist.nodeset + "["+ i +"]_vcode")
					break; 
				}
			}
		} else {
			vcode = incode; 
		}

		if ( vcode != "" ) {
			for (var i = 1; i < grd_clsphist.rows; i++) {
				spclcd   = ds_main_list3_clsp.getColumn(i, "spclcd");
				spclspec = ds_main_list3_clsp.getColumn(i, "spclspec");
				gridrowstatus = grd_clsphist.rowstatus(i);

				if ( vcode == spclspec && spclcd == "MT002" && gridrowstatus != 4 ) {
					existsyn = "Y";
				}
			}

			if ( existsyn != "Y" ) {
				var ans = sysf_messageBox(  vcode + " 상병입니다.\n\n"
				                     + "MT002 특정내역을 \n\n"
				                     + "입력"
				                     , "S001");
				if ( ans == 6 ) { // yes 
					var clsprow = grd_clsphist.rows - 1;	// 특정내역 Grid 가장 마지막 줄에 추가한다.
					grd_clsphist.insertRow(clsprow++, true);
					ds_main_list3.setColumn( clsprow , "unitflag", 		"M");
					ds_main_list3.setColumn( clsprow , "edilnno", 		0);
					ds_main_list3.setColumn( clsprow , "snglcalcscorcd", "-");
					ds_main_list3.setColumn( clsprow , "spclcd", 		"MT002");
					ds_main_list3.setColumn( clsprow , "cdnm", 		"특정기호");
					ds_main_list3.setColumn( clsprow , "spclspec", 		vcode);
					ds_main_list3.setColumn( clsprow , "spclformat", 	"X(4)");
					ds_main_list3.setColumn( clsprow , "detldesc", 		"");
					ds_main_list3.setColumn( clsprow , "oldedilnno", 	"");
					ds_main_list3.setColumn( clsprow , "clodseqno", 	"");							
					// 특정내역 줄번호_특정코드에 따라 sorting 작업
					fSortSpclNo();

//grd_clsphist.refresh();

				}
			}
		}
	}

	// 20100308 김용민 추가 (상병코드로 특정기호 조회)
	function fGetDiagVcode(diagcd) {
		var vcode = "";
		var spclcd = "";
		var spclspec = "";
		var gridrowstatus = "";
		var existsyn = "N";

		ds_hidden_getvcode.clearData();
		dsf_makeValue( ds_hidden_getvcode_cond, "diagcd", "string", diagcd);
		dsf_makeValue( ds_hidden_getvcode_cond, "ioflag", "string", model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_ioflagcd"));
		dsf_makeValue( ds_hidden_getvcode_cond, "insukind", "string", model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_insukindcd"));
		dsf_makeValue( ds_hidden_getvcode_cond, "suppkind", "string", model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_suppkindcd"));
		dsf_makeValue( ds_hidden_getvcode_cond, "ordfromdd", "string", model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_ordfromdd"));

		dsf_makeValue( ds_hidden_getvcode_rslt, "vcode", "string", "");

//		submit("TRPID20313");	// 상병코드로 특정기호 조회
var oParam = {};
    oParam.id          = "TRPID20313";
    oParam.service     = "aftjudgapp.InAftJudg";
    oParam.method      = "reqGetDiagcdVcode";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=cond ds_=rslt";
    oParam.async       = false;
    oParam.callback    = "cf_TRPID20313";

tranf_submit(oParam);
/*
function cf_TRPID20313(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPID20313(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPID20313") > -1
arErrorCode.pop("TRPID20313") < 0
*/



		vcode = ds_hidden_getvcode_rslt.getColumn(0, "vcode")

/*
		//////////////////////////////////////////
		// 반환전에 특정내역 입력한다.
		//////////////////////////////////////////
		if ( vcode != "" ) {
			for (var i = 1; i < grd_clsphist.rows; i++) {
				spclcd   = ds_main_list3_clsp.getColumn(i, "spclcd");
				spclspec = ds_main_list3_clsp.getColumn(i, "spclspec");
				gridrowstatus = grd_clsphist.rowstatus(i);

				if ( vcode == spclspec && spclcd == 'MT002' && gridrowstatus != 4 ) {
					existsyn = "Y";
				}
			}

			if ( existsyn != "Y" ) {
				var ans = sysf_messageBox(  vcode + " 상병입니다.\n\n"
				                     + "MT002 특정내역을 \n\n"
				                     + "입력"
				                     , "S001");
				if ( ans == 6 ) { // yes 
					var clsprow = grd_clsphist.rows - 1;	// 특정내역 Grid 가장 마지막 줄에 추가한다.
					grd_clsphist.insertRow(clsprow++, true);
					ds_main_list3.setColumn( clsprow , "unitflag", 		"M");
					ds_main_list3.setColumn( clsprow , "edilnno", 		0);
					ds_main_list3.setColumn( clsprow , "snglcalcscorcd", "-");
					ds_main_list3.setColumn( clsprow , "spclcd", 		"MT002");
					ds_main_list3.setColumn( clsprow , "cdnm", 		"특정기호");
					ds_main_list3.setColumn( clsprow , "spclspec", 		vcode);
					ds_main_list3.setColumn( clsprow , "spclformat", 	"X(4)");
					ds_main_list3.setColumn( clsprow , "detldesc", 		"");
					ds_main_list3.setColumn( clsprow , "oldedilnno", 	"");
					ds_main_list3.setColumn( clsprow , "clodseqno", 	"");							
					// 특정내역 줄번호_특정코드에 따라 sorting 작업
					fSortSpclNo();

//grd_clsphist.refresh();

				}
			}
		}
		//////////////////////////////////////////
*/

		return vcode;
	}

	///////////////////////////////////////////////////////////////////////////
	// 팝업 화면 호출
	function fLinkPopMenu(trgtWindow, cond, send) {

		var trgtManWindow = getChildWindow(trgtWindow);
		if (trgtManWindow == null) {
			var childCnt = window.children.length;
			if (childCnt < 4) {
				frmf_open("trgtWindow", "trgtWindow", "cond"-"send", "", "2", "10", "10", "", "", "", "", "", "M");
			} else {
				sysf_messageBox("최대 4개의 팝업 화면을 표시할 수 있으니 현재 열려있는 화면을", "I007");		///최대 4개의 팝업 화면을 표시할 수 있으니 현재 열려있는 화면을 확인하십시오.
			}
		} else {
			activateChild(trgtWindow);
		}
	}
	// 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
	function fSearchSPPIZ00400() {
		ds_hidden_sppiz00400_rslt.clearData();
		dsf_makeValue( ds_hidden_sppiz00400_rslt, "diagcd", "string", "" );
		dsf_makeValue( ds_hidden_sppiz00400_rslt, "diaghngnm", "string", "" );
		dsf_makeValue( ds_hidden_sppiz00400_rslt, "diagengnm", "string", "" );
		dsf_makeValue( ds_hidden_sppiz00400, "cond", "string", "" );

		ds_hidden_sppiz00400_cond.clearData(); ds_hidden_sppiz00400_cond.addRow();
		dsf_makeValue( ds_hidden_sppiz00400_cond, "basedd", "string",  utlf_getCurrentDate());	// (dateHelper.js) 현재날짜 반환
		dsf_makeValue( ds_hidden_sppiz00400_cond, "diagcd", "string",  model.getValue(grd_cldihist.nodeset + "["+ grd_cldihist.row +"]_diagcd"));
		dsf_makeValue( ds_hidden_sppiz00400_cond, "diagnm", "string",  "");
		dsf_makeValue( ds_hidden_sppiz00400_cond, "selectedrdodiagkind", "string", "3");		// 사용자가 직접검색하여 입력 할수 있도록 임의의 값(3)을 넣어줌
		frmf_modal("SPPIZ00400", "SPPIZ00400", "ds_hidden_sppiz00400_cond""-"ds_init"", "", "1", "10", "10", "", "", "", "", "", "M");	// SPPIZ00400_상병코드조회.xrw
	}

	// [SPPIZ00400_상병코드조회.xrw 에서 호출] 상병코드조회 팝업에서 선택한 상병을 상병 그리드에 반영
	function fSetDiagCdNm() {			
		var row = grd_cldihist.row;
		if (row > 0) {
			var diagcd = ds_hidden_sppiz00400_rslt.getColumn(0, "diagcd");
			var diaghngnm = ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm");
			var diagengnm = ds_hidden_sppiz00400_rslt.getColumn(0, "diagengnm");
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagcd", diagcd);
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagnm", diaghngnm);
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_diagengnm", diagengnm);
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_clamdeptcd", model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_clamdeptcd"));
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_ordfromdd", model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_ordfromdd"));
			// 해당 상병의 한글상병명과 영문상병명이 Message 용 output 컨트롤에 표시된다.
//			ds_hidden_list3.setColumn( 0, "msgspclformat", "상병코드 - "+ diagcd +" / "+ diaghngnm +" / "+ diagengnm);

			// 20100308 특정내역 조회 추가
			model.setValue(grd_cldihist.nodeset + "["+ row +"]_vcode", fGetDiagVcode(diagcd));

			// 20100329 MT002 입력체크
			if (   model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagseq") == "1" 
			    && model.getValue(grd_cldihist.nodeset + "["+ row +"]_vcode")   != "" 
			   ) {
				fSetDiagMT002(model.getValue(grd_cldihist.nodeset + "["+ row +"]_vcode"));
			}

			//20090918 정승우 행추가
			var addval1 = model.getValue(grd_cldihist.nodeset + "["+ row +"]_rowstat");
		     var addval2 = grd_cldihist.rowstatus(row);

			var rowstatus = grd_cldihist.rowstatus(row);
			if (rowstatus != 1 && rowstatus != 3) {	// 1 : insert, 3 : insert & new
				grd_cldihist.rowstatus(row) = 2;		// 2 : update
			}
			// 4. 빈 row에 대한 입력은 행 추가를 발생시킨다. (그외에는 행추가가 일어나지 않는다.) 
			//20090918 정승우 행추가
		if (addval1 == "" && (addval2 == 1 || addval2 == 3)) fDiagGridInsertRow("Y", "N");

		}
	}

///////////////////////////////////////////////////////////////////////////
	// 상병 및 처방 치식 입력
	function fDiagOrderToothInput(flag) {
		if (flag == "Diag") {
			var row = grd_cldihist.row;
			var diagcd = model.getValue(grd_cldihist.nodeset + "["+ row +"]_diagcd");
			if (diagcd) {
				dsf_makeValue( ds_hidden_sppiz00600_cond, "clamym", "string",  model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_clamym"));
				dsf_makeValue( ds_hidden_sppiz00600_cond, "clamdg", "string",  model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_clamdg"));
				dsf_makeValue( ds_hidden_sppiz00600_cond, "pid", "string",  model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_pid"));								
				dsf_makeValue( ds_hidden_sppiz00600_cond, "pidsn", "string",  model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_pidsn"));
				dsf_makeValue( ds_hidden_sppiz00600_cond, "indd", "string",  model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_indd"));
				dsf_makeValue( ds_hidden_sppiz00600_cond, "cretno", "string",  model.getValue(grd_diaghistlist.nodeset + "[" + grd_diaghistlist.row + "]_cretno"));													
				dsf_makeValue( ds_hidden_sppiz00600_cond, "toot", "string",  model.getValue(grd_cldihist.nodeset + "[" + row + "]_toot"));						
				fSetToothPop(row, "1");
				ds_hidden_sppiz00600_rslt.clearData();	// SPPIZ00600_상병및처방별치식 에서 선택된 결과가 copyNode되는 경로임
				frmf_modal("SPPIZ00600", "SPPIZ00600", "ds_hidden_sppiz00600_cond""-"ds_hidden_cond"", "", "1", "10", "10", "", "", "", "", "", "M");	// SPPIZ00600_상병및처방별치식.xrw
				fGetToothPop();
			}
		}
		else if (flag == "Order") {
			var row = grd_clodhist.row;
			var edilnno = ds_main_list2_clod.getColumn(row, "edilnno"));
			if (edilnno) {
				ds_hidden_sppiz00600_cond.setColumn( 0, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
				ds_hidden_sppiz00600_cond.setColumn( 0, "clamdg", ds_main_item1_clbs.getColumn(0, "clamdg"));
				ds_hidden_sppiz00600_cond.setColumn( 0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));						
				ds_hidden_sppiz00600_cond.setColumn( 0, "pidsn", ds_main_item1_clbs.getColumn(0, "pidsn"));
				ds_hidden_sppiz00600_cond.setColumn( 0, "indd", ds_main_item1_clbs.getColumn(0, "indd"));
				ds_hidden_sppiz00600_cond.setColumn( 0, "cretno", ds_main_item1_clbs.getColumn(0, "cretno"));						
				ds_hidden_sppiz00600_cond.setColumn( 0, "toot", ds_main_list2_clod.getColumn(row, "toot")));						
				fSetToothPop(row, "2");
				ds_hidden_sppiz00600_rslt.clearData();	// SPPIZ00600_상병및처방별치식 에서 선택된 결과가 copyNode되는 경로임
				frmf_modal("SPPIZ00600", "SPPIZ00600", "ds_hidden_sppiz00600_cond""-"ds_hidden_cond"", "", "1", "10", "10", "", "", "", "", "", "M");	// SPPIZ00600_상병및처방별치식.xrw
				fGetToothPop();
			}
		}
	}

	//대상자에서 치식자동팝업체크시 타는 로직
	function fDiagOrderToothInputDiret(flag) {

		var trgtManWindow = getChildWindow("SPPIZ00600ML");	// SPPIZ00600_상병및처방별치식.xrw
		var row = "1";

		if (flag == "Diag") {

			//var diagcd = ds_main_list1_cldi.getColumn(row, "diagcd"));
			//if (diagcd) {
				ds_hidden_sppiz00600_cond.setColumn( 0, "clamym", 	ds_main_item1_clbs.getColumn(0, "clamym"));
				ds_hidden_sppiz00600_cond.setColumn( 0, "clamdg",	ds_main_item1_clbs.getColumn(0, "clamdg"));
				ds_hidden_sppiz00600_cond.setColumn( 0, "pid", 	ds_main_item1_clbs.getColumn(0, "pid"));								
				ds_hidden_sppiz00600_cond.setColumn( 0, "pidsn", 	ds_main_item1_clbs.getColumn(0, "pidsn"));
				ds_hidden_sppiz00600_cond.setColumn( 0, "indd", 	ds_main_item1_clbs.getColumn(0, "indd"));
				ds_hidden_sppiz00600_cond.setColumn( 0, "cretno", 	ds_main_item1_clbs.getColumn(0, "cretno"));													
				ds_hidden_sppiz00600_cond.setColumn( 0, "toot", 	ds_main_list1_cldi.getColumn(row, "toot")));						
				ds_hidden_sppiz00600_cond.setColumn( 0, "popyn", 	"SMPID20500");
				fSetToothPop(row, "1");
				ds_hidden_sppiz00600_rslt.clearData();	// SPPIZ00600_상병및처방별치식 에서 선택된 결과가 copyNode되는 경로임
				if ( trgtManWindow == null ) {
					//frmf_open("SPPIZ00600", "SPPIZ00600", "ds_hidden_sppiz00600_cond""-"ds_hidden_cond"", "", "1", "10", "10", "", "", "", "", "", "M");	// SPPIZ00600_상병및처방별치식.xrw
					//frmf_open("SPPIZ00600", "SPPIZ00600", "ds_hidden_sppiz00600_cond""-"ds_hidden_cond"", "", "2", "10", "10", "", "", "", "", "", "M");	// SPPIZ00600_상병및처방별치식.xrw
					frmf_open("SPPIZ00600", "SPPIZ00600ML", "ds_hidden_sppiz00600_cond""-"ds_hidden_cond"", "", "2", "10", "10", "", "", "", "", "", "M");	// SPPIZ00600_상병및처방별치식.xrw
				} else {
					trgtManWindow.model.copyNode("ds_hidden_cond",root.hidden.sppiz00600.cond);
					activateChild("SPPIZ00600ML");
					trgtManWindow.javascript.fInitialize();
				}
				//fGetToothPop(); // 모달리스 타입이라..여기선 의미없음
			//}
		}

	}

	// 현재 상병, 처방 Grid 상에서 입력상태의 치식을 팝업 화면에 전달하기 위해 리스트 형태로 만든다.
	function fSetToothPop(row, flag) {
		ds_hidden_sppiz00600_cond_list.clearData();
		dsf_makeValue( ds_hidden_sppiz00600_cond, "list", "string", "" );
//		ds_hidden_sppiz00600_cond_list.clearData(); ds_hidden_sppiz00600_cond_list.addRow();
		// 상병
		var cntcldi = getNodesetCount(grd_cldihist.nodeset);
		// 처방
//		var cntclod = ds_main_list2_clod.rowcount;
		// grd_clodhist.rows는 타이틀을 포함하지만 getNodesetCount는 타이틀을 제외한 data 갯수를 반환
		var cd = "";
		var cdnm = "";
		var orddd = "";
		var toot = "";
		var rowcnt = 1;
//		for (i=1; i<cntcldi; i++) {
		for (var i = 1; i <= cntcldi; i++) {
			cd = model.getValue(grd_cldihist.nodeset + "["+  i + "]_diagcd");
			cdnm = model.getValue(grd_cldihist.nodeset + "["+  i + "]_diagnm");
			orddd = model.getValue(grd_cldihist.nodeset + "["+  i + "]_ordfromdd");
			toot = model.getValue(grd_cldihist.nodeset + "["+  i + "]_toot");

			if (toot != "-" && toot != "" && toot != " ") {
				var milktoothstr = "ABCDE000";
				var subTootStr = "";

				for (var inx = 0; inx < 32; inx++) {
					var tootnum = toot.substr(inx,1);
					if (tootnum == "*") {		// 선택된 영구치의 경우 1~8 사이 숫자로 표시한다.
						if (inx < 8) {
							subTootStr += (8 - inx);
						}
						else if (inx > 7 && inx < 16) {
							subTootStr += (inx - 7);
						}
						else if (inx > 15 && inx < 24) {
							subTootStr += (24 - inx);
						} else {
							subTootStr += (inx - 23);
						}
					} else if (tootnum == "#") {		// 선택된 유치의 경우 A~E 사이 알파벳으로 표시한다.
						if (inx < 8) {
							subTootStr += milktoothstr.charAt(7 - inx);
						}
						else if (inx > 7 && inx < 16) {
							subTootStr += milktoothstr.charAt(inx - 8);
						}
						else if (inx > 15 && inx < 24) {
							subTootStr += milktoothstr.charAt(23 - inx);
						} else {
							subTootStr += milktoothstr.charAt(inx - 24);
						}
					} else {	// if (tootnum == "0") 선택되지 않은 경우 공백으로 처리한다.
						subTootStr += " ";
					}
				}
				model.makeNode("ds_hidden_sppiz00600_cond_list_toothapplist[" + rowcnt + "]_chos");
				//치식 표기를 설정한다.
				if (row == i && flag == "1") {
					ds_hidden_sppiz00600_cond_list.setColumn( rowcnt , "chos", "true");
				} else {
					ds_hidden_sppiz00600_cond_list.setColumn( rowcnt , "chos", "false");
				}
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "flag", "상병");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cd", cd);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cdnm", cdnm);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightupper", subTootStr.substr(0, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftupper", subTootStr.substr(8, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightlower", subTootStr.substr(16, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftlower", subTootStr.substr(24, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "orddd", orddd);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "toot", toot);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "row", i);
				rowcnt = rowcnt+1;
			} else {
				if (row == i && flag == "1") {
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "chos", "true");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "flag", "상병");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cd", cd);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cdnm", cdnm);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightupper", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftupper", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightlower", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftlower", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "orddd", orddd);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "toot", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "row", i);
					rowcnt = rowcnt+1;
				}
			}
		}

		/*
		for (var i = 1; i <= cntclod; i++) {
			cd = ds_main_list2_clod.getColumn(i, "snglcalcscorcd");
			cdnm = ds_main_list2_clod.getColumn(i, "hngnm");
			orddd = ds_main_list2_clod.getColumn(i, "orddd");
			toot = ds_main_list2_clod.getColumn(i, "toot");
			estmcls = ds_main_list2_clod.getColumn(i, "estmcls");

			if ((toot != "-" && toot != "") || estmcls == "U"){
				var milktoothstr = "ABCDE000";
				var subTootStr = "";

				var tmpStr  = "";
				for (var inx = 0; inx < 32; inx++) {
					var tootnum = toot.substr(inx,1);
					if (tootnum == "*") {		// 선택된 영구치의 경우 1~8 사이 숫자로 표시한다.
						if (inx < 8) {
							subTootStr += (8 - inx);
						}
						else if (inx > 7 && inx < 16) {
							subTootStr += (inx - 7);
						}
						else if (inx > 15 && inx < 24) {
							subTootStr += (24 - inx);
						} else {
							subTootStr += (inx - 23);
						}
					} else if (tootnum == "#") {		// 선택된 유치의 경우 A~E 사이 알파벳으로 표시한다.
						if (inx < 8) {
							subTootStr += milktoothstr.charAt(7 - inx);
						}
						else if (inx > 7 && inx < 16) {
							subTootStr += milktoothstr.charAt(inx - 8);
						}
						else if (inx > 15 && inx < 24) {
							subTootStr += milktoothstr.charAt(23 - inx);
						} else {
							subTootStr += milktoothstr.charAt(inx - 24);
						}
					} else {	// if (tootnum == "0") 선택되지 않은 경우 공백으로 처리한다.
						subTootStr += " ";
					}
				}
				model.makeNode("ds_hidden_sppiz00600_cond_list_toothapplist[" + rowcnt + "]_chos");
				//치식 표기를 설정한다.
				if (row == i && flag == "2") {
					ds_hidden_sppiz00600_cond_list.setColumn( rowcnt , "chos", "true");
				} else {
					ds_hidden_sppiz00600_cond_list.setColumn( rowcnt , "chos", "false");
				}
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "flag", "처방");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cd", cd);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cdnm", cdnm);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightupper", subTootStr.substr(0, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftupper", subTootStr.substr(8, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightlower", subTootStr.substr(16, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftlower", subTootStr.substr(24, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "orddd", orddd);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "toot", toot);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "row", i);
				rowcnt = rowcnt+1;
			} else {
				if (row == i && flag == "2") {
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "chos", "true");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "flag", "처방");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cd", cd);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cdnm", cdnm);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightupper", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftupper", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightlower", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftlower", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "orddd", orddd);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "toot", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "row", i);
					rowcnt = rowcnt+1;
				}
			}
		}
		*/
	}
	// SPPIZ00600_상병및처방별치식 선택 결과를 반영한다.
	function fGetToothPop() {
		var tootSelectcnt = ds_hidden_sppiz00600_rslt_list.rowcount;
		var flag = "";
		var row = "";
		var toot = "";
		tootSelectcnt = eval(tootSelectcnt) + 1;

		for (var i = 1; i < tootSelectcnt; i++) {
			flag = ds_hidden_sppiz00600_rslt_list.getColumn(i, "flag");
			row = ds_hidden_sppiz00600_rslt_list.getColumn(i, "row");
			var rlsttoot = ds_hidden_sppiz00600_rslt_list.getColumn(i, "toot");
			var rlsttoot1 = ds_hidden_sppiz00600_rslt_list.getColumn(i, "toot1");

			if (rlsttoot == "") {
				rlsttoot = "-";
			}
			if (rlsttoot1 == "") {
				rlsttoot1 = "-";
			}

			if (flag == "1") {
				toot = model.getValue(grd_cldihist.nodeset + "["+ row +"]_toot");
				model.setValue(grd_cldihist.nodeset + "["+ row +"]_toot", rlsttoot);
				model.setValue(grd_cldihist.nodeset + "["+ row +"]_toot1", rlsttoot1);
				if (rlsttoot != toot) {	// 치식번호가 변경된 경우
					var cldistatus = grd_cldihist.rowstatus(row);
					if (cldistatus == 0 || cldistatus == 2) {	// 0 : new, 2 : update
						grd_cldihist.rowstatus(row) = 2;		// 2 : update
					}
				}
			} else if (flag == "2") {
				toot = model.getValue(grd_cldihist.nodeset + "["+ row +"]_toot");
				model.setValue(grd_cldihist.nodeset + "["+ row +"]_toot", rlsttoot);
				model.setValue(grd_cldihist.nodeset + "["+ row +"]_toot1", rlsttoot1);
				if (rlsttoot != toot) {	// 치식번호가 변경된 경우
					// 처방의 수정된 row 상태를 표시한다.

				}
			}
		}
	}
]]></Script>