YNU_JEUS/app_home/himed/xpapps/pam/pamcomnxp/xp/PMC001.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[
/*
 * 입원등록 공통 함수
 * PMC001.js
 * 작성자 : 최병진
 * 작성일 : 2009.02.09
 * 수정이력
*/

function hasColumn(obj:Dataset, column){
	return utlf_isNull(obj.getColumnInfo(column));
}

/* 공단자격조회
 *
 * 전제조건 : com_nhicinterfaceweb_js_ZEH001.js include 필요
 * Parameter : pPid      - 환자번호
 *             pHngnm    - 환자성명
 *             pRgstno   - 주민번호
 *             pDate     - 조회일자
 *             pInduCd   - 기관기호
 *             pLoginId  - 공단로그인정보
 *             pPassWord - 공단로그인정보
 * Return : M2 - String
 */

function pmcfGetNhicQualification_ws(pPid, pSujinjaJuminNo, pYkiho, pSujinjaJuminNm, pDiagDt, pLoginId, pPassWord, pClientInfo, pOperatorJuminNo, pShowMsg) {
	
	if (utlf_isNull(this.objects["ds_temp_nhicrslt_m2"])) {
		var ds = new Dataset("ds_temp_nhicrslt_m2");
		ds.name = "ds_temp_nhicrslt_m2";
		this.addChild("ds_temp_nhicrslt_m2", ds);
    }
    
    if (utlf_isNull(this.objects["ds_tmp_sign"])) {
		var ds = new Dataset("ds_tmp_sign");
		ds.name = "ds_tmp_sign";
		this.addChild("ds_tmp_sign", ds);
    }
	
	ds_temp_nhicrslt_m2.clear();
	
	if (utlf_isNull(this.objects["ds_send_ws_m1"])) {
		var ds = new Dataset("ds_send_ws_m1");
		ds.name = "ds_send_ws_m1";
		this.addChild("ds_send_ws_m1", ds);
	}
	
	ds_send_ws_m1.clear();
	
	ds_send_ws_m1.addColumn("sujinjajuminno",  "string");
	ds_send_ws_m1.addColumn("ykiho",           "string");
	ds_send_ws_m1.addColumn("sujinjajuminnm",  "string");
	ds_send_ws_m1.addColumn("diagdt",          "string");
	ds_send_ws_m1.addColumn("clientinfo",      "string");
	ds_send_ws_m1.addColumn("operatorjuminno", "string");
	
	ds_send_ws_m1.addRow();
	
	ds_send_ws_m1.setColumn(0, "sujinjajuminno",  pSujinjaJuminNo);
	ds_send_ws_m1.setColumn(0, "ykiho",           pYkiho);
	ds_send_ws_m1.setColumn(0, "sujinjajuminnm",  pSujinjaJuminNm);
	ds_send_ws_m1.setColumn(0, "diagdt",          pDiagDt);
	ds_send_ws_m1.setColumn(0, "clientinfo",      pClientInfo);
	ds_send_ws_m1.setColumn(0, "operatorjuminno", pOperatorJuminNo);
	
	// 자격 조회 WebService 호출
	var oParam = {};
    oParam.id      = "TRPAC04001";
    oParam.service = "pamcomnapp.PamComn";
    oParam.method  = "reqQualification";
    oParam.inds    = "req=ds_send_ws_m1";
    oParam.outds   = "ds_temp_nhicrslt_m2=m2";
    oParam.async   = false;

	tranf_submit(oParam);
	
	if (ds_temp_nhicrslt_m2.rowcount < 1) {
		sysf_messageBox("정보 수신 실패", "E999", "");
		return false;
	}
	
	// 받아온 명칭과 저장 명칭이 다른 항목 설정
	dsf_makeValue(ds_temp_nhicrslt_m2, "rrgstno",          "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "sujinjajuminno"))); // 수진자 주민 등록번호
	dsf_makeValue(ds_temp_nhicrslt_m2, "hngnm",            "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "sujinjajuminnm"))); // 수진자 성명
	dsf_makeValue(ds_temp_nhicrslt_m2, "proccorpcd",       "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "ykiho")));          // 의료 급여 기관기호
	dsf_makeValue(ds_temp_nhicrslt_m2, "qualflag",         "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "qlftype")));        // 자격여부
	dsf_makeValue(ds_temp_nhicrslt_m2, "qualacqtdd",       "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "qlfchwidukdt")));   // 자격취득일
	dsf_makeValue(ds_temp_nhicrslt_m2, "hshdnm",           "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "sedaejunm")));      // 세대주 성명
	dsf_makeValue(ds_temp_nhicrslt_m2, "secuinstmark",     "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "protadminsym")));   // 보장기관기호(사업장기호)
	dsf_makeValue(ds_temp_nhicrslt_m2, "estmmark",         "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "asylmsym")));       // 시설기호(증번호)
	dsf_makeValue(ds_temp_nhicrslt_m2, "paylimdd",         "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "payrestricdt")));   // 급여제한일자(건강보험상실일자)
	dsf_makeValue(ds_temp_nhicrslt_m2, "ownbflag",         "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "sbrdntype")));      // 본인부담여부
	dsf_makeValue(ds_temp_nhicrslt_m2, "heallifeamtval",   "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "cfhcrem")));        // 건강생활유지비 잔액
	dsf_makeValue(ds_temp_nhicrslt_m2, "choicorpmark1",    "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "ykiho1")));         // 선택기관기호1(관할지사코드)
	dsf_makeValue(ds_temp_nhicrslt_m2, "choicorpmark2",    "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "ykiho2")));         // 선택기관기호2
	dsf_makeValue(ds_temp_nhicrslt_m2, "choicorpmark3",    "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "ykiho3")));         // 선택기관기호3
	dsf_makeValue(ds_temp_nhicrslt_m2, "choicorpmark4",    "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "ykiho4")));         // 선택기관기호4
	dsf_makeValue(ds_temp_nhicrslt_m2, "choicorpnm1",      "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "yoyangnm1")));      // 선택기관 이름1(관할지사명)
	dsf_makeValue(ds_temp_nhicrslt_m2, "choicorpnm2",      "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "yoyangnm2")));      // 선택기관 이름2
	dsf_makeValue(ds_temp_nhicrslt_m2, "choicorpnm3",      "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "yoyangnm3")));      // 선택기관 이름3
	dsf_makeValue(ds_temp_nhicrslt_m2, "choicorpnm4",      "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "yoyangnm4")));      // 선택기관 이름4
	dsf_makeValue(ds_temp_nhicrslt_m2, "dcntrypsnyn",      "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "dprtyn")));         // 출국자 여부
	dsf_makeValue(ds_temp_nhicrslt_m2, "handicaprrgstdd",  "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "obstregdt")));      // 장애인등록일자
	dsf_makeValue(ds_temp_nhicrslt_m2, "rareobsttrgtman",  "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson1")));   // 희귀난치대상자
	dsf_makeValue(ds_temp_nhicrslt_m2, "befwomntrgtman",   "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson2")));   // 산정특례(희귀)등록대상자
	dsf_makeValue(ds_temp_nhicrslt_m2, "scndsuptrgtman",   "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson3")));   // 차상위대상자
	dsf_makeValue(ds_temp_nhicrslt_m2, "serdiagtrgtman",   "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson4")));   // 산정특례(암)등록대상자
	dsf_makeValue(ds_temp_nhicrslt_m2, "burntrgtman",      "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson5")));   // 산정특례(화상)등록대상자
	dsf_makeValue(ds_temp_nhicrslt_m2, "sugartrgtman",     "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson6")));   // 제1형 당뇨병환자 대상자
	dsf_makeValue(ds_temp_nhicrslt_m2, "procdurdd",        "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson7")));   // 동일성분 의약품 제한자
	dsf_makeValue(ds_temp_nhicrslt_m2, "paylimrgstdd",     "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "sangsilprocdt")));  // 건강보험 수진자의 자격상실처리일자
	dsf_makeValue(ds_temp_nhicrslt_m2, "selfcathcatheter", "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson8")));   // 자가도뇨 카테타 대상자
	dsf_makeValue(ds_temp_nhicrslt_m2, "tbrcls",           "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "disregprson9")));   // 산정특례(결핵)등록대상자
	dsf_makeValue(ds_temp_nhicrslt_m2, "handicapyn",       "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "obstyn")));         // 장애인등록여부(Y_N)
	dsf_makeValue(ds_temp_nhicrslt_m2, "datainptdt",       "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "date")));           // 데이터 입력 일자( 년월일-시분초)
	dsf_makeValue(ds_temp_nhicrslt_m2, "msgcd",            "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "messagecode")));    // 서버로부터의 메시지 Code
	dsf_makeValue(ds_temp_nhicrslt_m2, "msg",              "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "message")));        // 서버로부터의 메시지
	dsf_makeValue(ds_temp_nhicrslt_m2, "clntuniqval",      "string", utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "clientinfo")));     // 화면 클라이언트의 개별 고유 값
	
	ds_temp_nhicrslt_m2.addColumn("rooargstno",           "string");
	ds_temp_nhicrslt_m2.addColumn("rooafromdd",           "string");
	ds_temp_nhicrslt_m2.addColumn("rooatodd",             "string");
	ds_temp_nhicrslt_m2.addColumn("srdgrgstno",           "string");
	ds_temp_nhicrslt_m2.addColumn("srdgfromdd",           "string");
	ds_temp_nhicrslt_m2.addColumn("srdgtodd",             "string");
	ds_temp_nhicrslt_m2.addColumn("burnrgstno",           "string");
	ds_temp_nhicrslt_m2.addColumn("burnfromdd",           "string");
	ds_temp_nhicrslt_m2.addColumn("burntodd",             "string");
	ds_temp_nhicrslt_m2.addColumn("tbrclsrgstno",         "string");
	ds_temp_nhicrslt_m2.addColumn("tbrclsfromdd",         "string");
	ds_temp_nhicrslt_m2.addColumn("tbrclstodd",           "string");
	ds_temp_nhicrslt_m2.addColumn("drp10rgstno",          "string");
	ds_temp_nhicrslt_m2.addColumn("drp10fromdd",          "string");
	ds_temp_nhicrslt_m2.addColumn("drp10todd",            "string");
	ds_temp_nhicrslt_m2.addColumn("drp11rgstno",          "string");
	ds_temp_nhicrslt_m2.addColumn("drp11fromdd",          "string");
	ds_temp_nhicrslt_m2.addColumn("drp11todd",            "string");
	ds_temp_nhicrslt_m2.addColumn("denttopno",            "string");
	ds_temp_nhicrslt_m2.addColumn("denttopkind",          "string");
	ds_temp_nhicrslt_m2.addColumn("denttopproccorpcd",    "string");
	ds_temp_nhicrslt_m2.addColumn("denttopfromdd",        "string");
	ds_temp_nhicrslt_m2.addColumn("denttoptodd",          "string");
	ds_temp_nhicrslt_m2.addColumn("dentbottomno",         "string");
	ds_temp_nhicrslt_m2.addColumn("dentbottomkind",       "string");
	ds_temp_nhicrslt_m2.addColumn("dentbottomproccorpcd", "string");
	ds_temp_nhicrslt_m2.addColumn("dentbottomfromdd",     "string");
	ds_temp_nhicrslt_m2.addColumn("dentbottomtodd",       "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl1rgstno",      "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl1kind",        "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl1proccorpcd",  "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl1fromdd",      "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl1todd",        "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl2rgstno",      "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl2kind",        "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl2proccorpcd",  "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl2fromdd",      "string");
	ds_temp_nhicrslt_m2.addColumn("dentimpl2todd",        "string");
	
	//조산아/저체중아 관련 추가(이정택 2017/02/15)
	ds_temp_nhicrslt_m2.addColumn("preinfromdd",        "string");
	ds_temp_nhicrslt_m2.addColumn("preintodd",          "string");
	ds_temp_nhicrslt_m2.addColumn("preinrgstno",        "string");
	
	//요양기관별 산정특례(결핵) 등록대상자 추가(이정택 2017/04/28)
	ds_temp_nhicrslt_m2.addColumn("drp12fromdd",          "string");
	ds_temp_nhicrslt_m2.addColumn("drp12todd",            "string");
	ds_temp_nhicrslt_m2.addColumn("drp12rgstno",          "string");
	
	/* 이정택 주석처리(2018/12/12)(해당 칼럼을 보여주는 곳이 없어서 세팅처리 안함)
	//산정특례(중증난치질환)등록대상자 (이정택 2018/12/07) 
	ds_temp_nhicrslt_m2.addColumn("drp18fromdd",          "string");
	ds_temp_nhicrslt_m2.addColumn("drp18todd",            "string");
	ds_temp_nhicrslt_m2.addColumn("drp18rgstno",          "string");
	
	//산정특례(기타염색체 이상질환)등록대상자 (이정택 2018/12/07) 
	ds_temp_nhicrslt_m2.addColumn("drp19fromdd",          "string");
	ds_temp_nhicrslt_m2.addColumn("drp19todd",            "string");
	ds_temp_nhicrslt_m2.addColumn("drp19rgstno",          "string");
	*/
	
	
	
	// 산정특례(희귀)등록대상자
	// 특정기호(4) + 등록번호(15) + 등록일(8) + 종료일(8) + 상병코드(10) + 상병일련번호(2)
	// 특정기호 = V
	// 의료급여 희귀난치등록제 정보제공 11.1일
	// 상병코드,일련번호 2014.10.01.제공(건강보험)
	// 상병코드,일련번호 2014.12.01.제공(의료급여)
	var disRegPrson2 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson2"));

	if (disRegPrson2.trim() != "" && disRegPrson2.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "rooargstno", disRegPrson2.substr(4,  15));
		ds_temp_nhicrslt_m2.setColumn(0, "rooafromdd", disRegPrson2.substr(19, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "rooatodd",   disRegPrson2.substr(27, 8));
	}

	// 차상위대상자
	// 특정기호(4) + 시작일(8) + 종료일(8) + 구분(1)
	// [구분] '1':차상위1종, '2':차상위2종
	// 2008.04.01 1종 시행(C)
	// 2009.04.01 2종 시행(E, F)
	var disRegPrson3 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson3"));
	if (disRegPrson3.trim() != "" && disRegPrson3.length >= 21) {
	}

	// 산정특례(암)등록대상자
	// 특정기호(4) + 등록번호(15) + 등록일(8) + 종료일(8)
	// 2009. 12. 1일부 상병기호 제거
	// 의료급여 : 중증암 등록대상자
	var disRegPrson4 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson4"));

	if (disRegPrson4.trim() != "" && disRegPrson4.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "srdgrgstno", disRegPrson4.substr(4,  15));
		ds_temp_nhicrslt_m2.setColumn(0, "srdgfromdd", disRegPrson4.substr(19, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "srdgtodd",   disRegPrson4.substr(27, 8));
	}

	// 산정특례(화상)등록대상자
	// 특정기호(4) + 등록번호(15) + 등록일(8) + 종료일(8)
	// 특정기호 : V247-250
	// 2010.11.1 신규 (건강보험, 의료급여 제공)
	var disRegPrson5 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson5"));

	if (disRegPrson5.trim() != "" && disRegPrson5.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "burnrgstno", disRegPrson5.substr(4,  15));
		ds_temp_nhicrslt_m2.setColumn(0, "burnfromdd", disRegPrson5.substr(19, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "burntodd",   disRegPrson5.substr(27, 8));
	}

	// 산정특례(결핵)등록대상자
	// 특정기호(4) + 등록번호(15) + 등록일(8) + 종료일(8) + 상병코드(10) + 상병일련번호(2)
	// 특정기호 = V
	// 의료급여 희귀난치등록제 정보제공 11.1일
	// 상병코드,일련번호 2014.10.01.제공(건강보험만)
	var disRegPrson9 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson9"));

	if (disRegPrson9.trim() != "" && disRegPrson9.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "tbrclsrgstno", disRegPrson9.substr(4,  15));
		ds_temp_nhicrslt_m2.setColumn(0, "tbrclsfromdd", disRegPrson9.substr(19, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "tbrclstodd",   disRegPrson9.substr(27, 8));
	}

	// 산정특례(극희귀)등록대상자
	// 특정기호(4) + 등록번호(15) + 등록일(8) + 종료일(8) + 상병코드(10) + 상병일련번호(2)
	// 2016.4.1
	var disRegPrson10 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson10"));

	if (disRegPrson10.trim() != "" && disRegPrson10.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "drp10rgstno", disRegPrson10.substr(4,  15));
		ds_temp_nhicrslt_m2.setColumn(0, "drp10fromdd", disRegPrson10.substr(19, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "drp10todd",   disRegPrson10.substr(27, 8));
	}

	// 산정특례(상세불명희귀)등록대상자
	// 특정기호(4) + 등록번호(15) + 등록일(8) + 종료일(8) + 상병코드(10) + 상병일련번호(2)
	// 2016.4.1
	var disRegPrson11 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson11"));

	if (disRegPrson11.trim() != "" && disRegPrson11.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "drp11rgstno", disRegPrson11.substr(4,  15));
		ds_temp_nhicrslt_m2.setColumn(0, "drp11fromdd", disRegPrson11.substr(19, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "drp11todd",   disRegPrson11.substr(27, 8));
	}

	// 노인틀니 대상자(상악)
	// 등록번호(15) + 등록요양기관기호(8) + 틀니장착일(8) + 무상사후기간 종료일(8) + 시작일(8) + 종료일(8)
	// 2012.7.1 시행
	var dentTop = String(utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "denttop")));

	if (dentTop.trim() != "") {

		ds_temp_nhicrslt_m2.setColumn(0, "denttopno",         dentTop.substr(0,  15));
		ds_temp_nhicrslt_m2.setColumn(0, "denttopkind",       dentTop.substr(1,  1));
		ds_temp_nhicrslt_m2.setColumn(0, "denttopproccorpcd", dentTop.substr(15, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "denttopfromdd",     dentTop.substr(39, 8));

		// 종료일자가 없는 경우 시작일자 + 7년으로 설정
		if (!utlf_isValidDateTime(dentTop.substr(47, 8), "YYYYMMDD")) {
			ds_temp_nhicrslt_m2.setColumn(0, "denttoptodd", dentTop.substr(39, 8).toDate().getAddDate(7, "Y"));
		} else {
			ds_temp_nhicrslt_m2.setColumn(0, "denttoptodd", dentTop.substr(47, 8));
		}
	}

	// 노인틀니 대상자(하악)
	// 등록번호(15) + 등록요양기관기호(8) + 틀니장착일(8) + 무상사후기간 종료일(8) + 시작일(8) + 종료일(8)
	// 2012.7.1 시행
	var dentBottom = String(utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "dentbottom")));

	if (dentBottom.trim() != "") {

		ds_temp_nhicrslt_m2.setColumn(0, "dentbottomno",         dentBottom.substr(0,  15));
		ds_temp_nhicrslt_m2.setColumn(0, "dentbottomkind",       dentBottom.substr(1,  1));
		ds_temp_nhicrslt_m2.setColumn(0, "dentbottomproccorpcd", dentBottom.substr(15, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "dentbottomfromdd",     dentBottom.substr(39, 8));

		// 종료일자가 없는 경우 시작일자 + 7년으로 설정
		if (!utlf_isValidDateTime(dentBottom.substr(47, 8), 'YYYYMMDD')) {
			ds_temp_nhicrslt_m2.setColumn(0, "dentbottomtodd", dentBottom.substr(39, 8).toDate().getAddDate(7, "Y"));
		} else {
			ds_temp_nhicrslt_m2.setColumn(0, "dentbottomtodd", dentBottom.substr(47, 8));
		}
	}

	// 자격 여부
	var qlfType = ds_temp_nhicrslt_m2.getColumn(0, "qlftype");

	// 임플란트 대상자정보 1
	// 등록번호(18) + 등록요양기관기호(8) + 최종단계시술일(8) + 사후점검종료일(8) + 시작유효일(8) + 상실유효일(8)
	// 2014.7.1 시행
	var dentImpl1 = String(utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "dentimpl1")));

	if (dentImpl1.trim() != '') {

		ds_temp_nhicrslt_m2.setColumn(0, "dentimpl1rgstno", dentImpl1.substr(0, 18));

		if (qlfType == "7" || qlfType == "8") { // 의료 급여
			ds_temp_nhicrslt_m2.setColumn(0, "dentimpl1kind",       dentImpl1.substr(3,  1));
			ds_temp_nhicrslt_m2.setColumn(0, "dentimpl1proccorpcd", dentImpl1.substr(18, 8));
		} else { // 건강 보험
			ds_temp_nhicrslt_m2.setColumn(0, "dentimpl1kind",       dentImpl1.substr(8, 1));
			ds_temp_nhicrslt_m2.setColumn(0, "dentimpl1proccorpcd", "");
		}

		ds_temp_nhicrslt_m2.setColumn(0, "dentimpl1fromdd", dentImpl1.substr(42, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "dentimpl1todd",   dentImpl1.substr(50, 8));
	}

	// 임플란트 대상자정보 2
	// 등록번호(18) + 등록요양기관기호(8) + 최종단계시술일(8) + 사후점검종료일(8) + 시작유효일(8) + 상실유효일(8)
	// 2014.7.1 시행
	var dentImpl2 = String(utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "dentimpl2")));

	if (dentImpl2.trim() != '') {

		ds_temp_nhicrslt_m2.setColumn(0, "dentimpl2rgstno", dentImpl2.substr(0, 18));

		if (qlfType == "7" || qlfType == "8") { // 의료 급여
			ds_temp_nhicrslt_m2.setColumn(0, "dentimpl2kind",       dentImpl2.substr(3,  1));
			ds_temp_nhicrslt_m2.setColumn(0, "dentimpl2proccorpcd", dentImpl2.substr(18, 8));
		} else { // 건강 보험
			ds_temp_nhicrslt_m2.setColumn(0, "dentimpl2kind",       dentImpl2.substr(8, 1));
			ds_temp_nhicrslt_m2.setColumn(0, "dentimpl2proccorpcd", "");
		}

		ds_temp_nhicrslt_m2.setColumn(0, "dentimpl2fromdd", dentImpl2.substr(42, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "dentimpl2todd",   dentImpl2.substr(50, 8));
	}
	
	// 조산아/저체중아 대상자 정보 관련
	// 등록번호(10) + 시작일자(8) + 종료일자(8)
	// 2017.02.17부터 자격조회 됨
	var preinfant = String(utlf_transNullToEmpty(ds_temp_nhicrslt_m2.getColumn(0, "preinfant")));

	if (preinfant.trim() != '') {

		ds_temp_nhicrslt_m2.setColumn(0, "preinfromdd", preinfant.substr(10,  8));
		ds_temp_nhicrslt_m2.setColumn(0, "preintodd", preinfant.substr(18, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "preinrgstno",   preinfant.substr(0, 10));
	}	
	
	//요양기관별 산정특례(결핵) 등록대상자 추가(이정택 2017/04/28)
	//특정기호(4)+산정특례등록번호(10)+치료시작일자(8)+치료종료일자(8)+의사면허번호(10)+의사성명(40)+종료요양기관기호(8)
	// 2017.02.17부터 자격조회 됨
	var disRegPrson12 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson12"));

	if (disRegPrson12.trim() != "" && disRegPrson12.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "drp12fromdd", disRegPrson12.substr(14, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "drp12todd",   disRegPrson12.substr(22, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "drp12rgstno", disRegPrson12.substr(4, 10));
	}
	
	/* 이정택 주석처리(2018/12/12)(해당 칼럼을 보여주는 곳이 없어서 세팅처리 안함)
	//산정특례(중증난치질환)등록대상자 (이정택 2018/12/07) 
	var disRegPrson18 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson18"));

	if (disRegPrson18.trim() != "" && disRegPrson18.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "drp18fromdd", disRegPrson18.substr(19, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "drp18todd",   disRegPrson18.substr(27, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "drp18rgstno", disRegPrson18.substr(4, 15));
	}
	
	//산정특례(기타염색체 이상질환)등록대상자 (이정택 2018/12/07) 
	var disRegPrson19 = String(ds_temp_nhicrslt_m2.getColumn(0, "disregprson19"));

	if (disRegPrson19.trim() != "" && disRegPrson19.substr(0, 1) == "V") {
		ds_temp_nhicrslt_m2.setColumn(0, "drp19fromdd", disRegPrson19.substr(19, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "drp19todd",   disRegPrson19.substr(27, 8));
		ds_temp_nhicrslt_m2.setColumn(0, "drp19rgstno", disRegPrson19.substr(4, 10));
	}
	*/
	

	// 자격 여부에 따른 저장 구분
	// 의료급여(7, 8)는 3개월, 건강보험은 3년 이내의 자료만 저장
	var saveFlag = true;

	if (( qlfType == "7" || qlfType == "8" ) && pDiagDt < utlf_getCurrentDate().toDate().getAddDate(-3, "M").getDateFormat("YYYYMMDD")) {

		saveFlag = false;

		if (pShowMsg) {
			sysf_messageBox("의료급여 자격자는 3개월 이전 자료 조회시 최종 자격이 표시되며,\n조회 내역이 저장되지 않습니다.", "E999");
		}

	} else if (pDiagDt < utlf_getCurrentDate().toDate().getAddDate(-3, "Y").getDateFormat("YYYYMMDD")) {

		saveFlag = false;

		if (pShowMsg) {
			sysf_messageBox("건강보험 자격자는 3년 이전 자료 조회시 최종 자격이 표시되며,\n조회 내역이 저장되지 않습니다.",   "E999");
		}
	}

	if (saveFlag) {

		var m0CSV = "msgtype▦pid▦orddd▦cretno▦loginid▦password▦empno▦mpsissno▦reqdeptno▦deptcd▦ordtype▩"
			      + "M1"        + "▦"
			      + pPid        + "▦"
			      + pDiagDt     + "▦"
			      + ""          + "▦"
			      + pLoginId    + "▦"
			      + pPassWord   + "▦"
			      + sysf_getUserId() + "▦"
			      + ""          + "▦"
			      + ""          + "▦"
			      + ""          + "▦"
			      + "" 			+ "▩";

		//dsf_makeValue( ds_main, "m0temp", "string",  m0CSV);

		ds_main_m0temp.clearData();
		dsf_setCSVToDs("ds_main_m0temp",  m0CSV);


		var m1CSV = "rrgstno▦proccorpcd▦orddd▦workdt▦hngnm▦loginid▦password▦datainptdt▦msgtype▦clntuniqval▦empno▦pgmtype▩"
		          + pSujinjaJuminNo                           + "▦"
		          + pYkiho                                    + "▦"
		          + pDiagDt                                   + "▦"
		          + ""                                        + "▦"
		          + pSujinjaJuminNm                           + "▦"
		          + pLoginId                                  + "▦"
		          + pPassWord                                 + "▦"
		          + utlf_getCurrentDate() + "-" + utlf_getCurrentTime() + "▦"
		          + "M1"                                      + "▦"
		          + pClientInfo                               + "▦"
		          + sysf_getUserId()                          + "▦"
		          + "3" 									  + "▩";

		//dsf_makeValue( ds_main, "m1temp", "string",  m1CSV);
		ds_main_m1temp.clearData();
		dsf_setCSVToDs("ds_main_m1temp",  m1CSV);


		//dsf_makeValue( ds_main, "m2temp", "string",  getNodeListCSV(instance1.selectNodes("_root_temp_nhicrslt_m2")));
		//dsf_setCSVToDs("ds_main_m2temp",  m1CSV);
		ds_main_m2temp.copyData(ds_temp_nhicrslt_m2);

		dsf_createDs("ds_main_m3temp", [
                                {col:"pid", type:"STRING", size:256}
                              , {col:"orddd", type:"STRING", size:256}
                              , {col:"execdd", type:"STRING", size:256}
                              , {col:"cretno", type:"STRING", size:256}
                              , {col:"workdt", type:"STRING", size:256}
                              , {col:"worktm", type:"STRING", size:256}
                              , {col:"msgtype", type:"STRING", size:256}
                              , {col:"rrgstno", type:"STRING", size:256}
                              , {col:"hngnm", type:"STRING", size:256}
                              , {col:"proccorpcd", type:"STRING", size:256}
                              , {col:"ordflag", type:"STRING", size:256}
                              , {col:"indayno", type:"STRING", size:256}
                              , {col:"medidayno", type:"STRING", size:256}
                              , {col:"ownpartbamt", type:"STRING", size:256}
                              , {col:"heallifeamtclamamt", type:"STRING", size:256}
                              , {col:"pregdmndamt", type:"STRING", size:256}
                              , {col:"pregsumamt", type:"STRING", size:256}
                              , {col:"instbamt", type:"STRING", size:256}
                              , {col:"heallifeamtval", type:"STRING", size:256}
                              , {col:"maindiagmark", type:"STRING", size:256}
                              , {col:"mpsissinstmark", type:"STRING", size:256}
                              , {col:"mpsissno", type:"STRING", size:256}
                              , {col:"ownbflag", type:"STRING", size:256}
                              , {col:"anoinstreqyn", type:"STRING", size:256}
                              , {col:"ordcnfmno", type:"STRING", size:256}
                              , {col:"deptcd", type:"STRING", size:256}
                              , {col:"prscgnoyn", type:"STRING", size:256}
                              , {col:"diagoutcd", type:"STRING", size:256}
                              , {col:"loginid", type:"STRING", size:256}
                              , {col:"password", type:"STRING", size:256}
                              , {col:"datainptdt", type:"STRING", size:256}
                              , {col:"clntuniqval", type:"STRING", size:256}
                              , {col:"empno", type:"STRING", size:256}
                              , {col:"status", type:"STRING", size:256}
                              , {col:"cnstchoicormark", type:"STRING", size:256}
                                ]);

	dsf_createDs("ds_main_m4temp", [
                                {col:"pid", type:"STRING", size:256}
                              , {col:"orddd", type:"STRING", size:256}
                              , {col:"execdd", type:"STRING", size:256}
                              , {col:"cretno", type:"STRING", size:256}
                              , {col:"ordflag", type:"STRING", size:256}
                              , {col:"workdt", type:"STRING", size:256}
                              , {col:"worktm", type:"STRING", size:256}
                              , {col:"instcd", type:"STRING", size:256}
                              , {col:"msgtype", type:"STRING", size:256}
                              , {col:"rrgstno", type:"STRING", size:256}
                              , {col:"hngnm", type:"STRING", size:256}
                              , {col:"proccorpcd", type:"STRING", size:256}
                              , {col:"aprvflag", type:"STRING", size:256}
                              , {col:"ordcnfmno", type:"STRING", size:256}
                              , {col:"ownpartbamt", type:"STRING", size:256}
                              , {col:"heallifeamtclamamt", type:"STRING", size:256}
                              , {col:"heallifeamtval", type:"STRING", size:256}
                              , {col:"pregdmndamt", type:"STRING", size:256}
                              , {col:"pregremamt", type:"STRING", size:256}
                              , {col:"datainptdt", type:"STRING", size:256}
                              , {col:"msgcd", type:"STRING", size:256}
                              , {col:"msg", type:"STRING", size:256}
                              , {col:"clntuniqval", type:"STRING", size:256}
                              , {col:"empno", type:"STRING", size:256}
                              , {col:"msgstat ", type:"STRING", size:256}
                              , {col:"ownbflag", type:"STRING", size:256}
                                ]);

		dsf_createDs("ds_main_m5temp", [
                                {col:"workdt", type:"STRING", size:256}
                              , {col:"worktm", type:"STRING", size:256}
                              , {col:"instcd", type:"STRING", size:256}
                              , {col:"msgtype", type:"STRING", size:256}
                              , {col:"ordcnfmno", type:"STRING", size:256}
                              , {col:"rrgstno", type:"STRING", size:256}
                              , {col:"hngnm", type:"STRING", size:256}
                              , {col:"proccorpcd", type:"STRING", size:256}
                              , {col:"orddd", type:"STRING", size:256}
                              , {col:"loginid", type:"STRING", size:256}
                              , {col:"password", type:"STRING", size:256}
                              , {col:"datainptdt", type:"STRING", size:256}
                              , {col:"clntuniqval", type:"STRING", size:256}
                              , {col:"empno", type:"STRING", size:256}
                              , {col:"status", type:"STRING", size:256}
                                ]);
		dsf_createDs("ds_main_m6temp", [
                                {col:"workdt", type:"STRING", size:256}
                              , {col:"worktm", type:"STRING", size:256}
                              , {col:"instcd", type:"STRING", size:256}
                              , {col:"msgtype", type:"STRING", size:256}
                              , {col:"ordcnfmno", type:"STRING", size:256}
                              , {col:"cnclflag", type:"STRING", size:256}
                              , {col:"heallifeamtval", type:"STRING", size:256}
                              , {col:"pregremamt", type:"STRING", size:256}
                              , {col:"rrgstno", type:"STRING", size:256}
                              , {col:"hngnm", type:"STRING", size:256}
                              , {col:"proccorpcd", type:"STRING", size:256}
                              , {col:"datainptdt", type:"STRING", size:256}
                              , {col:"msgcd", type:"STRING", size:256}
                              , {col:"msg", type:"STRING", size:256}
                              , {col:"clntuniqval", type:"STRING", size:256}
                              , {col:"empno", type:"STRING", size:256}
                                ]);


		//submit("TXPAC03901", false);

		var oParam = {};
		oParam.id          = "TXPAC03901";
		oParam.service     = "pamcomnapp.PamComn";
		oParam.method      = "reqSetinsMsg";
		//oParam.inds        = "/hidden/session=ds_hidden_session m0temp=ds_main_m0temp m1temp=ds_main_m1temp m2temp=ds_main_m2temp m3temp=ds_main_m3temp m4temp=ds_main_m4temp m5temp=ds_main_m5temp m6temp=ds_main_m6temp";
        oParam.inds        = "m0temp=ds_main_m0temp m1temp=ds_main_m1temp m2temp=ds_main_m2temp m3temp=ds_main_m3temp m4temp=ds_main_m4temp m5temp=ds_main_m5temp m6temp=ds_main_m6temp";
        // [dbs227] 입원등록 오류 수정, ds_temp_nhicrslt_m2 데이터셋을 덮어써서 장애인 조회 결과여부를 알 수 없다. 
        //oParam.outds       = "ds_temp_nhicrslt_m2=sign";
        oParam.outds       = "ds_tmp_sign=sign";
		oParam.async       = false;
		tranf_submit(oParam);


	}

	return true;
}



function pmcfGetNhicQualification(pPid, pHngnm, pRgstno, pDate, pProcCorpCd, pLoginId, pPassWord) {
    // 1. M0, M1 생성
    // 2. 자격조회
    // 3. M2생성
    // 4. M2 return String 생성 및 return

    var sReturnValue  = "";  // 헤더 + 값
    var sHeader       = "rrgstno▦hngnm▦proccorpcd▦qualflag▦qualacqtdd▦hshdnm▦secuinstmark▦estmmark▦paylimdd▦ownbflag▦heallifeamtval▦pregremamt▦choicorpmark1▦choicorpmark2▦choicorpmark3▦choicorpmark4▦choicorpnm1▦choicorpnm2▦choicorpnm3▦choicorpnm4▦dcntrypsnyn▦datainptdt▦msgcd▦msg▦msgtype▦clntuniqval▦handicaprrgstdd▦disregprson1▦disregprson2▦disregprson3▦disregprson4▦handicapyn▦rareobsttrgtman▦befwomntrgtman▦scndsuptrgtman▦serdiagtrgtman▩";  // 리턴할
																																																																																																															// 헤더
    var sValue        = "";  // 리턴할 값
    var sColSeperator = "▦";
    var sRowSeperator = "▩";

    // 모듈체크
    zehfCheckModule();

    // 1. M0, M1 생성

    var sM0_loginid         = pLoginId;
    var sM0_password        = pPassWord;
    var sM0_empno           = "1234561234567";

    var sM1_rrgstno         = pRgstno;
    var sM1_proccorpcd      = pProcCorpCd;
    var sM1_hngnm           = pHngnm;
    var sM1_orddd           = pDate;
    var sM1_msgtype         = "M1";
    var sM1_pgmtype         = "2";
    var sM1_datainptdt      = utlf_getCurrentDate() + "-" +utlf_getCurrentTime();
    var sM1_clntuniqval     = sysf_getUserId();

    var url                 = "http://nhic.codns.com:1443_services_nhic?WSDL";  // url

    // M2
    var sM2_rrgstno         = "";
    var sM2_hngnm           = "";
    var sM2_proccorpcd      = "";
    var sM2_qualflag        = "";
    var sM2_qualacqtdd      = "";
    var sM2_hshdnm          = "";
    var sM2_secuinstmark    = "";
    var sM2_estmmark        = "";
    var sM2_paylimdd        = "";
    var sM2_ownbflag        = "";
    var sM2_heallifeamtval  = "";
    var sM2_pregremamt      = "";
    var sM2_choicorpmark1   = "";
    var sM2_choicorpmark2   = "";
    var sM2_choicorpmark3   = "";
    var sM2_choicorpmark4   = "";
    var sM2_choicorpnm1     = "";
    var sM2_choicorpnm2     = "";
    var sM2_choicorpnm3     = "";
    var sM2_choicorpnm4     = "";
    var sM2_handicaprrgstdd = "";
    var sM2_datainptdt      = "";
    var sM2_dcntrypsnyn     = "";
    var sM2_msgcd           = "";
    var sM2_msg             = "";
    var sM2_msgtype         = "";
    var sM2_clntuniqval     = "";
    var sM2_disregprson1    = "";
    var sM2_disregprson2    = "";
    var sM2_disregprson3    = "";
    var sM2_disregprson4    = "";
    var sM2_handicapyn      = "";

    zehfAddParam("sujinjaJuminNo"   , sM1_rrgstno);         // 수진자 주민번호
    zehfAddParam("ykiho"            , sM1_proccorpcd);      // 의료급여 기관번호
    zehfAddParam("sujinjaJuminNm"   , sM1_hngnm);           // 수진자성명
    zehfAddParam("diagDt"           , sM1_orddd);           // 진료일자
    zehfAddParam("loginId"          , sM0_loginid);         // 공단포탈 로그인아이디
    zehfAddParam("password"         , sM0_password);        // 공단포탈 로그인패스워드
    zehfAddParam("date"             , sM1_datainptdt);      // 일자
    zehfAddParam("msgType"          , sM1_msgtype);         // 메시지 타입
    zehfAddParam("clientInfo"       , sM1_clntuniqval);     // 클라이언트 고유정보
    zehfAddParam("operatorJuminNo"  , sM0_empno);           // 조작자 주민번호
    zehfAddParam("pgmType"          , sM1_pgmtype);         // 프로그램 타입

    // 2. 자격조회
    var iCount = zehfQualify(url);

    // iCount <= 0
    if (iCount <= 0) {
        sysf_messageBox("정보 수신 실패", "E999", "");
        return;
    }

    // iCount == 1
    if (iCount == 1) {
        sM2_rrgstno         = zehfGetValue(0, "sujinjaJuminNo");
        sM2_hngnm           = zehfGetValue(0, "sujinjaJuminNm");
        sM2_proccorpcd      = zehfGetValue(0, "ykiho");
        sM2_qualflag        = zehfGetValue(0, "qlfType");
        sM2_qualacqtdd      = zehfGetValue(0, "qlfChwidukDt");
        sM2_hshdnm          = zehfGetValue(0, "sedaejuNm");
        sM2_secuinstmark    = zehfGetValue(0, "protAdminSym");
        sM2_estmmark        = zehfGetValue(0, "asylmSym");
        sM2_paylimdd        = zehfGetValue(0, "payRestricDt");
        sM2_ownbflag        = zehfGetValue(0, "sbrdnType");
        sM2_heallifeamtval  = zehfGetValue(0, "cfhcRem");
        sM2_pregremamt      = zehfGetValue(0, "pregRemAmt");
        sM2_choicorpmark1   = zehfGetValue(0, "ykiho1");
        sM2_choicorpmark2   = zehfGetValue(0, "ykiho2");
        sM2_choicorpmark3   = zehfGetValue(0, "ykiho3");
        sM2_choicorpmark4   = zehfGetValue(0, "ykiho4");
        sM2_choicorpnm1     = zehfGetValue(0, "yoyangNm1");
        sM2_choicorpnm2     = zehfGetValue(0, "yoyangNm2");
        sM2_choicorpnm3     = zehfGetValue(0, "yoyangNm3");
        sM2_choicorpnm4     = zehfGetValue(0, "yoyangNm4");
        sM2_handicaprrgstdd = zehfGetValue(0, "obstRegDt");
        sM2_datainptdt      = zehfGetValue(0, "date");
        sM2_dcntrypsnyn     = zehfGetValue(0, "dprtYn");
        sM2_msgcd           = zehfGetValue(0, "messageCode");
        sM2_msg             = zehfGetValue(0, "message");
        sM2_msgtype         = zehfGetValue(0, "msgType");
        sM2_clntuniqval     = zehfGetValue(0, "clientInfo");
        sM2_disregprson1    = zehfGetValue(0, "disRegPrson1");      //희귀난치대상자
        sM2_disregprson2    = zehfGetValue(0, "disRegPrson2");      //산전산모대상자
        sM2_disregprson3    = zehfGetValue(0, "disRegPrson3");      //차상위대상자
        sM2_disregprson4    = zehfGetValue(0, "disRegPrson4");      //중증암등록대상자
        sM2_handicapyn      = zehfGetValue(0, "obstYn");

        sValue = sM2_rrgstno         + sColSeperator +
                 sM2_hngnm           + sColSeperator +
                 sM2_proccorpcd      + sColSeperator +
                 sM2_qualflag        + sColSeperator +
                 sM2_qualacqtdd      + sColSeperator +
                 sM2_hshdnm          + sColSeperator +
                 sM2_secuinstmark    + sColSeperator +
                 sM2_estmmark        + sColSeperator +
                 sM2_paylimdd        + sColSeperator +
                 sM2_ownbflag        + sColSeperator +
                 sM2_heallifeamtval  + sColSeperator +
                 sM2_pregremamt      + sColSeperator +
                 sM2_choicorpmark1   + sColSeperator +
                 sM2_choicorpmark2   + sColSeperator +
                 sM2_choicorpmark3   + sColSeperator +
                 sM2_choicorpmark4   + sColSeperator +
                 sM2_choicorpnm1     + sColSeperator +
                 sM2_choicorpnm2     + sColSeperator +
                 sM2_choicorpnm3     + sColSeperator +
                 sM2_choicorpnm4     + sColSeperator +
                 sM2_handicaprrgstdd + sColSeperator +
                 sM2_datainptdt      + sColSeperator +
                 sM2_dcntrypsnyn     + sColSeperator +
                 sM2_msgcd           + sColSeperator +
                 sM2_msg             + sColSeperator +
                 sM2_msgtype         + sColSeperator +
                 sM2_clntuniqval     + sColSeperator +
                 sM2_disregprson1    + sColSeperator +
                 sM2_disregprson2    + sColSeperator +
                 sM2_disregprson3    + sColSeperator +
                 sM2_disregprson4    + sColSeperator +
                 sM2_handicapyn      + sRowSeperator;

        sReturnValue = sHeader + sValue;
    }

    var sM0_header = "msgtype▦pid▦orddd▦cretno▦loginId▦password▦empno▦mpsissno▦reqdeptno▦deptcd▦ordtype▩";
    var sM0_value  = sM1_msgtype  + sColSeperator +
                     pPid          + sColSeperator +
                     sM1_orddd     + sColSeperator +
                     ""            + sColSeperator +
                     sM0_loginid   + sColSeperator +
                     sM0_password  + sColSeperator +
                     sM0_empno     + sColSeperator +
                     ""            + sColSeperator +
                     ""            + sColSeperator +
                     ""            + sColSeperator +
                     ""            + sRowSeperator;

    var sM1_header = "rrgstno▦hngnm▦proccorpcd▦orddd▦msgtype▦clntuniqval▦empno▦datainptdt▦pgmtype▦url▦pid▩";
    var sM1_value  = sM1_rrgstno        + sColSeperator +
                     sM1_hngnm          + sColSeperator +
                     sM1_proccorpcd     + sColSeperator +
                     sM1_orddd          + sColSeperator +
                     sM1_msgtype        + sColSeperator +
                     sM1_clntuniqval    + sColSeperator +
                     sM0_empno          + sColSeperator +
                     sM1_datainptdt     + sColSeperator +
                     sM1_pgmtype        + sColSeperator +
                     url                + sColSeperator +
                     pPid               + sRowSeperator;

    // 자격조회 정보 저장
    //<submission id="TXPAC03901" mediatype="application_x-www-form-urlencoded" method="post" ref="_root_main_nhicinfo" resultref="_root_tmp"/>
    //dsf_makeValue( ds_main_nhicinfo, "m0temp", "string",  (sM0_header + sM0_value));
    dsf_setCSVToDs("ds_main_nhicinfo_m0temp",  (sM0_header + sM0_value));

    //dsf_makeValue( ds_main_nhicinfo, "m1temp", "string",  (sM1_header + sM1_value));
    dsf_setCSVToDs("ds_main_nhicinfo_m1temp",  (sM1_header + sM1_value));

    //dsf_makeValue( ds_main_nhicinfo, "m2temp", "string",  sReturnValue);
    dsf_setCSVToDs("ds_main_nhicinfo_m2temp",  (sReturnValue));

    dsf_createDs("ds_main_nhicinfo_m3temp", [
                                {col:"pid", type:"STRING", size:256}
                              , {col:"orddd", type:"STRING", size:256}
                              , {col:"execdd", type:"STRING", size:256}
                              , {col:"cretno", type:"STRING", size:256}
                              , {col:"workdt", type:"STRING", size:256}
                              , {col:"worktm", type:"STRING", size:256}
                              , {col:"msgtype", type:"STRING", size:256}
                              , {col:"rrgstno", type:"STRING", size:256}
                              , {col:"hngnm", type:"STRING", size:256}
                              , {col:"proccorpcd", type:"STRING", size:256}
                              , {col:"ordflag", type:"STRING", size:256}
                              , {col:"indayno", type:"STRING", size:256}
                              , {col:"medidayno", type:"STRING", size:256}
                              , {col:"ownpartbamt", type:"STRING", size:256}
                              , {col:"heallifeamtclamamt", type:"STRING", size:256}
                              , {col:"pregdmndamt", type:"STRING", size:256}
                              , {col:"pregsumamt", type:"STRING", size:256}
                              , {col:"instbamt", type:"STRING", size:256}
                              , {col:"heallifeamtval", type:"STRING", size:256}
                              , {col:"maindiagmark", type:"STRING", size:256}
                              , {col:"mpsissinstmark", type:"STRING", size:256}
                              , {col:"mpsissno", type:"STRING", size:256}
                              , {col:"ownbflag", type:"STRING", size:256}
                              , {col:"anoinstreqyn", type:"STRING", size:256}
                              , {col:"ordcnfmno", type:"STRING", size:256}
                              , {col:"deptcd", type:"STRING", size:256}
                              , {col:"prscgnoyn", type:"STRING", size:256}
                              , {col:"diagoutcd", type:"STRING", size:256}
                              , {col:"loginid", type:"STRING", size:256}
                              , {col:"password", type:"STRING", size:256}
                              , {col:"datainptdt", type:"STRING", size:256}
                              , {col:"clntuniqval", type:"STRING", size:256}
                              , {col:"empno", type:"STRING", size:256}
                              , {col:"status", type:"STRING", size:256}
                              , {col:"cnstchoicormark", type:"STRING", size:256}
                                ]);

	dsf_createDs("ds_main_nhicinfo_m4temp", [
                                {col:"pid", type:"STRING", size:256}
                              , {col:"orddd", type:"STRING", size:256}
                              , {col:"execdd", type:"STRING", size:256}
                              , {col:"cretno", type:"STRING", size:256}
                              , {col:"ordflag", type:"STRING", size:256}
                              , {col:"workdt", type:"STRING", size:256}
                              , {col:"worktm", type:"STRING", size:256}
                              , {col:"instcd", type:"STRING", size:256}
                              , {col:"msgtype", type:"STRING", size:256}
                              , {col:"rrgstno", type:"STRING", size:256}
                              , {col:"hngnm", type:"STRING", size:256}
                              , {col:"proccorpcd", type:"STRING", size:256}
                              , {col:"aprvflag", type:"STRING", size:256}
                              , {col:"ordcnfmno", type:"STRING", size:256}
                              , {col:"ownpartbamt", type:"STRING", size:256}
                              , {col:"heallifeamtclamamt", type:"STRING", size:256}
                              , {col:"heallifeamtval", type:"STRING", size:256}
                              , {col:"pregdmndamt", type:"STRING", size:256}
                              , {col:"pregremamt", type:"STRING", size:256}
                              , {col:"datainptdt", type:"STRING", size:256}
                              , {col:"msgcd", type:"STRING", size:256}
                              , {col:"msg", type:"STRING", size:256}
                              , {col:"clntuniqval", type:"STRING", size:256}
                              , {col:"empno", type:"STRING", size:256}
                              , {col:"msgstat ", type:"STRING", size:256}
                              , {col:"ownbflag", type:"STRING", size:256}
                                ]);

		dsf_createDs("ds_main_nhicinfo_m5temp", [
                                {col:"workdt", type:"STRING", size:256}
                              , {col:"worktm", type:"STRING", size:256}
                              , {col:"instcd", type:"STRING", size:256}
                              , {col:"msgtype", type:"STRING", size:256}
                              , {col:"ordcnfmno", type:"STRING", size:256}
                              , {col:"rrgstno", type:"STRING", size:256}
                              , {col:"hngnm", type:"STRING", size:256}
                              , {col:"proccorpcd", type:"STRING", size:256}
                              , {col:"orddd", type:"STRING", size:256}
                              , {col:"loginid", type:"STRING", size:256}
                              , {col:"password", type:"STRING", size:256}
                              , {col:"datainptdt", type:"STRING", size:256}
                              , {col:"clntuniqval", type:"STRING", size:256}
                              , {col:"empno", type:"STRING", size:256}
                              , {col:"status", type:"STRING", size:256}
                                ]);
		dsf_createDs("ds_main_nhicinfo_m6temp", [
                                {col:"workdt", type:"STRING", size:256}
                              , {col:"worktm", type:"STRING", size:256}
                              , {col:"instcd", type:"STRING", size:256}
                              , {col:"msgtype", type:"STRING", size:256}
                              , {col:"ordcnfmno", type:"STRING", size:256}
                              , {col:"cnclflag", type:"STRING", size:256}
                              , {col:"heallifeamtval", type:"STRING", size:256}
                              , {col:"pregremamt", type:"STRING", size:256}
                              , {col:"rrgstno", type:"STRING", size:256}
                              , {col:"hngnm", type:"STRING", size:256}
                              , {col:"proccorpcd", type:"STRING", size:256}
                              , {col:"datainptdt", type:"STRING", size:256}
                              , {col:"msgcd", type:"STRING", size:256}
                              , {col:"msg", type:"STRING", size:256}
                              , {col:"clntuniqval", type:"STRING", size:256}
                              , {col:"empno", type:"STRING", size:256}
                                ]);




    //if(submit("TXPAC03901")) {
    var oParam = {};
    oParam.id          = "TXPAC03901";
    oParam.service     = "pamcomnapp.PamComn";
    oParam.method      = "reqSetinsMsg";
//     oParam.inds        = "/hidden/session=ds_hidden_session " +
// 						 "m0temp=ds_main_nhicinfo_m0temp " +
// 						 "m1temp=ds_main_nhicinfo_m1temp " +
// 						 "m2temp=ds_main_nhicinfo_m2temp " +
// 						 "m3temp=ds_main_nhicinfo_m3temp " +
// 						 "m4temp=ds_main_nhicinfo_m4temp " +
// 						 "m5temp=ds_main_nhicinfo_m5temp " +
// 						 "m6temp=ds_main_nhicinfo_m6temp ";
	oParam.inds        = "m0temp=ds_main_nhicinfo_m0temp "
						 + "m1temp=ds_main_nhicinfo_m1temp "
						 + "m2temp=ds_main_nhicinfo_m2temp "
						 + "m3temp=ds_main_nhicinfo_m3temp "
 						 + "m4temp=ds_main_nhicinfo_m4temp "
 						 + "m5temp=ds_main_nhicinfo_m5temp "
 						 + "m6temp=ds_main_nhicinfo_m6temp ";

    oParam.outds       = "ds_temp_nhicrslt_m2=sign";
    oParam.async       = false;
    oParam.callback    = "cf_TXPAC03901";

    if(arErrorCode.pop("TXPAC03901") > -1) {

        ds_main_nhicinfo.clearData();
    }

    // 중증등록정보 마스터에 자동 입력
//    sM2_disregprson4 = "V1930108140327     2008092920130928D330 "; // 공단중증등록정보
    if( !utlf_isNull(sM2_disregprson4.trim()) && sM2_disregprson4.length == 40){
        //보험유형세팅
        if (sM2_qualflag == "7") { //의료급여1종
            dsf_makeValue( ds_send_srdginfo, "insukind", "string",  "21");
        }
        else if (sM2_qualflag == "8") {    //의료급여2종
            dsf_makeValue( ds_send_srdginfo, "insukind", "string",  "22");
        }
        else {  //건강보험
            dsf_makeValue( ds_send_srdginfo, "insukind", "string",  "11");
        }

        ds_send_srdginfo.clearData();
        //dsf_makeValue( ds_send, "srdginfo", "string", "" );
        dsf_makeValue( ds_send_srdginfo, "rrgstno1", "string",       sM1_rrgstno.substr(0,6));
        dsf_makeValue( ds_send_srdginfo, "rrgstno2", "string",       sM1_rrgstno.substr(6,7));
        dsf_makeValue( ds_send_srdginfo, "serdiagno", "string",      sM2_disregprson4.substr(4,15).trim());
        dsf_makeValue( ds_send_srdginfo, "serdiagfromdd", "string",  sM2_disregprson4.substr(19,8));
        dsf_makeValue( ds_send_srdginfo, "serdiagtodd", "string",    sM2_disregprson4.substr(27,8));
        dsf_makeValue( ds_send_srdginfo, "maindiagcd", "string",     sM2_disregprson4.substr(35,5));
        if(!utlf_isValidDateTime(ds_send_srdginfo.getColumn(0, "todd"), 'YYYYMMDD') ){
            dsf_makeValue( ds_send_srdginfo, "todd", "string",  '99991231');
        }

		//if(submit("TXPAC03903")){

        var oParam = {};
		oParam.id          = "TXPAC03903";
		oParam.service     = "pamcomnapp.PamComn";
		oParam.method      = "reqSetinsSrdgInfo";
		oParam.inds        = "req=ds_send_srdginfo";
		oParam.outds       = "";
		oParam.async       = false;
		oParam.callback    = "cf_TXPAC03903";

		tranf_submit(oParam);

		if(arErrorCode.pop("TXPAC03903") > -1){
        }

        ds_send_srdginfo.clearData();
    }

    // 2009.03.25 - 테스트데이터...반영 시 제거..
    //sM2_disregprson3 = "F   20080401        2";

    var sHandyCapMsgYN = "N";
    // 2009.03.25 - 차상위대상자일 경우 차상위마스터에 데이터 입력
    if( !utlf_isNull(sM2_disregprson3.trim()) && sM2_disregprson3.length == 21){
        ds_send_scndsuptrgtman.clearData();
        dsf_makeValue( ds_send_scndsuptrgtman, "rrgstno1", "string",  sM1_rrgstno.substr(0,6));
        dsf_makeValue( ds_send_scndsuptrgtman, "rrgstno2", "string",  sM1_rrgstno.substr(6,7));
        dsf_makeValue( ds_send_scndsuptrgtman, "fromdd", "string",    sM2_disregprson3.substr(4,8));
        dsf_makeValue( ds_send_scndsuptrgtman, "todd", "string",      sM2_disregprson3.substr(12,8));
        dsf_makeValue( ds_send_scndsuptrgtman, "scndflag", "string",  sM2_disregprson3.substr(20,1));
        dsf_makeValue( ds_send_scndsuptrgtman, "splccd", "string",    sM2_disregprson3.substr(0,4).trim());

        if(!utlf_isValidDateTime(ds_send_scndsuptrgtman.getColumn(0, "todd"), 'YYYYMMDD')){
            dsf_makeValue( ds_send_scndsuptrgtman, "todd", "string",  '99991231');
        }

        // 차상위2종 장애인 일 때 메시지 출력
        if (sM2_disregprson3.substr(0,1).trim() == "F") {
            sHandyCapMsgYN = "Y";
            sysf_messageBox("차상위2종 장애인 대상 환자입니다. 장애인 마스터 등록여부를 확인해주세요!", "I");
        }

        //if(submit("TXPAC03904")){

        var oParam = {};
		oParam.id          = "TXPAC03901";
		oParam.service     = "pamcomnapp.PamComn";
		oParam.method      = "reqSetinsScndSupTrgtman";
		oParam.inds        = "req=ds_send_scndsuptrgtman";
		oParam.outds       = "";
		oParam.async       = false;
		oParam.callback    = "cf_TXPAC03901";
		tranf_submit(oParam);

        if(arErrorCode.pop("TXPAC03901") > -1){
        }

        ds_send_scndsuptrgtman.clearData();
    }

    if (sM2_handicaprrgstdd.trim() != "" && sHandyCapMsgYN != "Y") {
        sysf_messageBox("장애인으로 등록된 환자입니다. 장애인 마스터 등록여부를 확인해주세요!", "I");
    }

    // iCount > 1   결과가 2건 이상일 때 메시지 처리 - 재원변경관리 화면에서 처리하도록 유도
    if (iCount > 1) {
        sysf_messageBox("공단조회결과가 [" + iCount + "]건입니다.\n자격조회화면에서 자격확인 하십시오!", "I");
    }

    // 조회된 M2설정

    // 메모리 Clear
    zehfClose();


    return sReturnValue;
}


function cf_TXPAC03901(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

function cf_TXPAC03903(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
function cf_TXPAC03901(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}








/* 중증등록정보 자동 저장
 *
 * 전제조건 :  TXMRD00901 submission이 추가되어야 한다.
 * Parameter : pPid             - 환자번호
 *             pIOFlag          - 입원외래구분
 *             pInsuKind        - 보험유형
 *             pDisRegPrson4    - 공단자격 중증정보
 *             pPtbsPath        - 환자기본정보 xpath (ex. "_root_main_ptbs")
 *             pSendPath        - send xpath (ex. "_root_send_data999") 노드명 형태 - ptbs_pid
 *             pSrdgPath        - srdg xpath (ex. "_root_main_srdg")
 * Return : true_false
 */

function pmcfSetSerDiagInfo(pPid, pIOFlag, pInsuKind, pDisRegPrson4, pPtbsPath, pSendPath, pSrdgPath) {
    var bResult       = false;
    var sPtbsXPath    = pPtbsPath;
    var sSendXPath    = pSendPath;
    var sSrdgXPath    = pSrdgPath;
    var sDisRegPrson4 = pDisRegPrson4;

    if (utlf_isNull(pPid)) {
        //sysf_messageBox("환자번호가 없습니다!!", "I");
        return false;
    }

    if (sPtbsXPath == null) {
        //sysf_messageBox("Ptbs XPath is null!!", "I");
        return false;
    }

    if (sSendXPath == null) {
        //sysf_messageBox("Send XPath is null!!", "I");
        return false;
    }

    if (sSrdgXPath == null) {
        //sysf_messageBox("Srdg XPath is null!!", "I");
        return false;
    }

    if (utlf_isNull(sDisRegPrson4)) {
        //sysf_messageBox("중증정보 is null!!", "I");
        return false;
    }

    if (pInsuKind != "11" && pInsuKind != "21" && pInsuKind != "22") {
        //sysf_messageBox("보험유형이 [건강보험][의료급여1종][의료급여2종]일 때만 적용됩니다[중증등록정보]!!", "I");
        return false;
    }

    // 중증등록정보 분리 로직
    var sSerDiagNo     = null;
    var sSerDiagFromdd = null;
    var sSerDiagTodd   = null;

    if (pInsuKind == "11" || pInsuKind == "21" || pInsuKind == "22") {
        // 중증등록번호 추출
        if (pInsuKind == "11") {                            // 건강보험 (10자리)
            sSerDiagNo = sDisRegPrson4.substring(4, 14);
        }

        if (pInsuKind == "21" || pInsuKind == "22") {       // 의료급여 (15자리)
            sSerDiagNo = sDisRegPrson4.substring(4, 19);
        }

        sSerDiagFromdd = sDisRegPrson4.substring(19, 27);    // 중증등록시작일자
        sSerDiagTodd   = sDisRegPrson4.substring(27, 35);    // 중증등록종료일자

//alert("sSerDiagNo: " + sSerDiagNo + "\n" + "sSerDiagFromdd: " + sSerDiagFromdd + "\n" + "sSerDiagTodd: " + sSerDiagTodd);
        // 화면에 중증정보 설정
        dsf_makeValue( eval(sSrdgXPath), "srdg_pid",        "string",  pPid);
        dsf_makeValue( eval(sSrdgXPath), "srdg_insukind",   "string",  pInsuKind);
        dsf_makeValue( eval(sSrdgXPath), "srdg_seridiagno", "string",  sSerDiagNo);
        dsf_makeValue( eval(sSrdgXPath), "srdg_fromdd",     "string",  sSerDiagFromdd);
        dsf_makeValue( eval(sSrdgXPath), "srdg_todd",       "string",  sSerDiagTodd);

        //model.removeNode(sSendXPath);
        eval(sSendXPath).clearData();
        //model.makeNode(sSendXPath);
        eval(sSendXPath).addRow();

        dsf_makeValue( eval(sSendXPath), "flag1",            "string",  "N");
        dsf_makeValue( eval(sSendXPath), "flag2",            "string",  "N");
        dsf_makeValue( eval(sSendXPath), "status",           "string",  "I");
        dsf_makeValue( eval(sSendXPath), "genrdd",           "string",  "");
        dsf_makeValue( eval(sSendXPath), "genrno",           "string",  "");
        dsf_makeValue( eval(sSendXPath), "histno",           "string",  "");
        dsf_makeValue( eval(sSendXPath), "instcd",           "string",  "");
        dsf_makeValue( eval(sSendXPath), "histcd",           "string",  "");
        dsf_makeValue( eval(sSendXPath), "anohosprgstflag",  "string",  "Y");
        dsf_makeValue( eval(sSendXPath), "genrflagcd",       "string",  pIOFlag);
        dsf_makeValue( eval(sSendXPath), "pid",              "string",  pPid);
        dsf_makeValue( eval(sSendXPath), "insukind",         "string",  pInsuKind);
        dsf_makeValue( eval(sSendXPath), "cncrdiagcnfmdd",   "string",  "");
        dsf_makeValue( eval(sSendXPath), "orddeptcd",        "string",  "-");
        dsf_makeValue( eval(sSendXPath), "orddrid",          "string",  "-");
        dsf_makeValue( eval(sSendXPath), "serdiagno",        "string",  sSerDiagNo);
        dsf_makeValue( eval(sSendXPath), "serdiagfromdd",    "string",  sSerDiagFromdd);
        dsf_makeValue( eval(sSendXPath), "serdiagtodd",      "string",  sSerDiagTodd);
        dsf_makeValue( eval(sSendXPath), "genrorddd",        "string",  "-");
        dsf_makeValue( eval(sSendXPath), "genrcretno",       "string",  0);
        dsf_makeValue( eval(sSendXPath), "ediflag",          "string",  "N");
        dsf_makeValue( eval(sSendXPath), "editretdd",        "string",  "00000000");
        dsf_makeValue( eval(sSendXPath), "editrettm",        "string",  "000000");
        dsf_makeValue( eval(sSendXPath), "maindiagcd",       "string",  "");
        dsf_makeValue( eval(sSendXPath), "rcptremfact",      "string",  "");
        dsf_makeValue( eval(sSendXPath), "zipcdhead",        "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_zipcd1"));
        dsf_makeValue( eval(sSendXPath), "zipcdfoot",        "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_zipcd2"));
        dsf_makeValue( eval(sSendXPath), "seqno",            "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_zipcdseq"));
        dsf_makeValue( eval(sSendXPath), "infromdd",         "string",  "00000000");
        dsf_makeValue( eval(sSendXPath), "intodd",           "string",  "000000");
        dsf_makeValue( eval(sSendXPath), "acptplcebaseaddr", "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_zipcdaddr"));
        dsf_makeValue( eval(sSendXPath), "acptplceaddr",     "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_detladdr"));
        dsf_makeValue( eval(sSendXPath), "acptplcetel",      "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_hometel"));
        dsf_makeValue( eval(sSendXPath), "acptplcempphon",   "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_mpphontel"));
        dsf_makeValue( eval(sSendXPath), "hngnm",            "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_hngnm"));
        dsf_makeValue( eval(sSendXPath), "sex",              "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_sex"));
        dsf_makeValue( eval(sSendXPath), "brthdd",           "string",  eval(sPtbsXPath).getColumn( 0, "ptbs_brthdd"));
        dsf_makeValue( eval(sSendXPath), "addr",             "string",  (eval(sPtbsXPath).getColumn( 0, "ptbs_zipcdaddr") + " " + eval(sPtbsXPath).getColumn( 0, "ptbs_detladdr")));
        dsf_makeValue( eval(sSendXPath), "roomcd",           "string",  "");
        dsf_makeValue( eval(sSendXPath), "remfact",          "string",  "");
        dsf_makeValue( eval(sSendXPath), "ioflag",           "string",  pIOFlag);

        //if (submit("TXMRD00901")) {

		var oParam = {};
		oParam.id          = "TXMRD00901";
		oParam.service     = "dschanalyapp.DschAnaly";
		oParam.method      = "reqExeSaveSerDiagRgst";
		oParam.inds        = "req=" + sSendXPath ;
		oParam.outds       = sSendXPath + "=serdiagrgstlist ds_main_patinfo_patinfolist=patinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TXMRD00901";
		tranf_submit(oParam);

        if (arErrorCode.pop("TXMRD00901") > -1) {
            //model.removeNode(sSendXPath);
            //model.makeNode(sSendXPath);

            bResult = true;
        } else {
            bResult = false;
        }

        //model.refresh();
    }

    return bResult;
}

function cf_TXMRD00901(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
]]></Script>