YNU_JEUS/app_home/himed/xpapps/ast/infcmngtxp/xp/SPASI09100_질병관리본부법정감염병신고.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMD99100" position="absolute 0 0 1150 860" titletext="질병관리본부 감염병환자 신고" oninit="SPMMD99100_oninit" scrollbars="none" onload="SPMMD99100_onload">
    <Layouts>
      <Layout>
        <WebBrowser id="WebBrowser00" text="WebBrowser00" position="absolute 0 0 1150 850" anchor="default" taborder="2" useautobitmapcache="1" onloadcompleted="WebBrowser00_onloadcompleted"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="opentype" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="wrtedt" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="lglydiscd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cdclglydisinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="wrtedt" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="ogcr" type="STRING" size="256"/>
          <Column id="patnt_nm" type="STRING" size="256"/>
          <Column id="patnt_ihidnum" type="STRING" size="256"/>
          <Column id="patnt_regist_no" type="STRING" size="256"/>
          <Column id="prtctor_nm" type="STRING" size="256"/>
          <Column id="patnt_sexdstn_cd" type="STRING" size="256"/>
          <Column id="patnt_telno" type="STRING" size="256"/>
          <Column id="patnt_mbtlnum" type="STRING" size="256"/>
          <Column id="patnt_rn_zip" type="STRING" size="256"/>
          <Column id="patnt_rdnmadr" type="STRING" size="256"/>
          <Column id="patnt_rdnmadr_dtl" type="STRING" size="256"/>
          <Column id="resdnc_indstnct_at" type="STRING" size="256"/>
          <Column id="idnty_uknwn_at" type="STRING" size="256"/>
          <Column id="patnt_occp_cd" type="STRING" size="256"/>
          <Column id="occp_dtl_info" type="STRING" size="256"/>
          <Column id="icdgrp_cd" type="STRING" size="256"/>
          <Column id="icd_cd" type="STRING" size="256"/>
          <Column id="eids_symptms" type="STRING" size="256"/>
          <Column id="atfss_de" type="STRING" size="256"/>
          <Column id="dgnss_de" type="STRING" size="256"/>
          <Column id="sttemnt_de" type="STRING" size="256"/>
          <Column id="dsndgnss_inspct_result_ty_cd" type="STRING" size="256"/>
          <Column id="hsptlz_ty_cd" type="STRING" size="256"/>
          <Column id="patnt_cl_cd" type="STRING" size="256"/>
          <Column id="death_at_cd" type="STRING" size="256"/>
          <Column id="mdlcnst_kcn_instt_id" type="STRING" size="256"/>
          <Column id="doctr_nm" type="STRING" size="256"/>
          <Column id="hsptl_swbser" type="STRING" size="256"/>
          <Column id="hsptl_swknd" type="STRING" size="256"/>
          <Column id="dplct_at" type="STRING" size="256"/>
          <Column id="rspns_mssage_ty" type="STRING" size="256"/>
          <Column id="paratyphoid_germ_info" type="STRING" size="256"/>
          <Column id="dysentery_germ_info" type="STRING" size="256"/>
          <Column id="entgerm_germ_info" type="STRING" size="256"/>
          <Column id="entgerm_germ_etc_info" type="STRING" size="256"/>
          <Column id="scrbtyph_inspct_mth" type="STRING" size="256"/>
          <Column id="scrbtyph_inspct_rate" type="STRING" size="256"/>
          <Column id="scrbtyph_inspct_rate_etc" type="STRING" size="256"/>
          <Column id="sfts_tick_bite" type="STRING" size="256"/>
          <Column id="sfts_symptms" type="STRING" size="256"/>
          <Column id="sfts_hsptlz_info" type="STRING" size="256"/>
          <Column id="rabies_bite_info" type="STRING" size="256"/>
          <Column id="rabies_hsptlz_info" type="STRING" size="256"/>
          <Column id="rabies_trtmnt" type="STRING" size="256"/>
          <Column id="rubella_type" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-01-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "com_commodulexp::SSZFM00901.xjs";

function SPMMD99100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  // 화면공통
}

function SPMMD99100_onload(obj:Form, e:LoadEventInfo)
{
	var sOpenType = opener.frmf_getParameter("opentype");
	var navUrl    = "https://is.cdc.go.kr/tids/anids/sttemnt/reportAutoForm.vp?"; // 2017.07.17 법정 감염병 신고 링크 주소
	
	trace("navUrl(법정감염병) :" + navUrl);
	
	if(sOpenType == "prcp") { // 처방에서 호출
		var pamInfoCvs = sysf_getGlobalVariable("paminfo");
	
		if( !utlf_isNull(pamInfoCvs) ){  //상단정보
			ds_main_paminfo.clearData();
			dsf_setCSVToDs("ds_main_paminfo", pamInfoCvs);
		}
		
		if ( ds_main_paminfo.rowcount > 0 ) {
			ds_send_reqdata.setColumn(0, "opentype",  sOpenType);	
			ds_send_reqdata.setColumn(0, "pid", 	  ds_main_paminfo.getColumn(0, "pid"));	
			ds_send_reqdata.setColumn(0, "orddd", 	  ds_main_paminfo.getColumn(0, "orddd"));	
			ds_send_reqdata.setColumn(0, "cretno", 	  ds_main_paminfo.getColumn(0, "cretno"));	
			ds_send_reqdata.setColumn(0, "ordtype",   ds_main_paminfo.getColumn(0, "ordtype"));	
			ds_send_reqdata.setColumn(0, "lglydiscd", opener.frmf_getParameter("lglydiscd"));	
		} else {
			sysf_messageBox( "상단정보 조회에 실패 하였습니다. 전산실에 문의 하세요.", "E001");
			return;
		}
	} else {
		ds_send_reqdata.setColumn(0, "opentype", sOpenType);	
		ds_send_reqdata.setColumn(0, "pid", 	 opener.frmf_getParameter("pid"));	
		ds_send_reqdata.setColumn(0, "wrtedt", 	 opener.frmf_getParameter("wrtedt"));
		ds_send_reqdata.setColumn(0, "seqno", 	 opener.frmf_getParameter("seqno"));
	}
	
	if(utlf_isNull(ds_send_reqdata.getColumn(0, "pid")) ) {
		sysf_messageBox( "정상적인 화면 호출이 아닙니다. 전산실에 문의 하세요.", "E001");
		return;
	}
		
	var oParam = {};
		oParam.id          = "TRASI09101";
		oParam.service     = "infcmngtapp.LglyDisMngt";
		oParam.method      = "reqGetCdcLglyDisInfo";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_cdclglydisinfo=info";
		oParam.async       = false;

	tranf_submit(oParam);

	if ( ds_cdclglydisinfo.rowcount > 0 ) {
		navUrl = navUrl + "&ogcr="                         + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"ogcr")));                         // 사용자(기관) 인증정보             
		navUrl = navUrl + "&patnt_nm="                     + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_nm")));                     // 환자성명                          
		navUrl = navUrl + "&patnt_ihidnum="                + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_ihidnum")));                // 환자주민등록번호                  
		navUrl = navUrl + "&patnt_regist_no="              + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_regist_no")));              // 환자등록번호                      
		navUrl = navUrl + "&prtctor_nm="                   + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"prtctor_nm")));                   // 보호자성명                        
		navUrl = navUrl + "&patnt_sexdstn_cd="             + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_sexdstn_cd")));             // 환자성별코드                      
		navUrl = navUrl + "&patnt_telno="                  + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_telno")));                  // 환자전화번호                      
		navUrl = navUrl + "&patnt_mbtlnum="                + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_mbtlnum")));                // 환자이동전화번호                  
		navUrl = navUrl + "&patnt_rn_zip="                 + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_rn_zip")));                 // 환자우편번호                      
		navUrl = navUrl + "&patnt_rdnmadr="                + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_rdnmadr")));                // 환자도로명주소                    
		navUrl = navUrl + "&patnt_rdnmadr_dtl="            + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_rdnmadr_dtl")));            // 환자도로명주소상세                
		navUrl = navUrl + "&rm_info="                      + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"rm_info")));                      // 환자특이사항             
		navUrl = navUrl + "&resdnc_indstnct_at="           + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"resdnc_indstnct_at")));           // 거주지불명여부                    
		navUrl = navUrl + "&idnty_uknwn_at="               + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"idnty_uknwn_at")));               // 신원미상여부                      
		navUrl = navUrl + "&patnt_occp_cd="                + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_occp_cd")));                // 환자직업코드                      
		navUrl = navUrl + "&occp_dtl_info="                + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"occp_dtl_info")));                // 직업상세정보                      
		navUrl = navUrl + "&icdgrp_cd="                    + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"icdgrp_cd")));                    // 감염병군코드                      
		navUrl = navUrl + "&icd_cd="                       + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"icd_cd")));                       // 감염병코드                        
		navUrl = navUrl + "&eids_symptms="                 + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"eids_symptms")));                 // 신종감염병증후군증상              
		navUrl = navUrl + "&atfss_de="                     + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"atfss_de")));                     // 발병일자                          
		navUrl = navUrl + "&dgnss_de="                     + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"dgnss_de")));                     // 진단일자                          
		navUrl = navUrl + "&sttemnt_de="                   + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"sttemnt_de")));                   // 신고일자                          
		navUrl = navUrl + "&dsndgnss_inspct_result_ty_cd=" + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"dsndgnss_inspct_result_ty_cd"))); // 확진검사결과유형코드              
		navUrl = navUrl + "&hsptlz_ty_cd="                 + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"hsptlz_ty_cd")));                 // 입원유형코드                      
		navUrl = navUrl + "&patnt_cl_cd="                  + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"patnt_cl_cd")));                  // 환자분류코드                      
		navUrl = navUrl + "&death_at_cd="                  + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"death_at_cd")));                  // 사망여부코드                      
		navUrl = navUrl + "&mdlcnst_kcn_instt_id="         + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"mdlcnst_kcn_instt_id")));         // 요양기관기호                      
		navUrl = navUrl + "&doctr_nm="                     + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"doctr_nm")));                     // 의사성명                          
		navUrl = navUrl + "&hsptl_swbser="                 + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"hsptl_swbser")));                 // 병원소프트웨어개발사(사업자)      
		navUrl = navUrl + "&hsptl_swknd="                  + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"hsptl_swknd")));                  // 병원소프트웨어종류(버전)          
		navUrl = navUrl + "&dplct_at="                     + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"dplct_at")));                     // 중복여부                          
		navUrl = navUrl + "&rspns_mssage_ty="              + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"rspns_mssage_ty")));              // 응답메시지유형                    
		navUrl = navUrl + "&paratyphoid_germ_info="        + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"paratyphoid_germ_info")));        // 파라티푸스균주정보                
		navUrl = navUrl + "&dysentery_germ_info="          + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"dysentery_germ_info")));          // 세균성이질균주정보                
		navUrl = navUrl + "&entgerm_germ_info="            + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"entgerm_germ_info")));            // 장출혈성대장균감염증_균주정보     
		navUrl = navUrl + "&entgerm_germ_etc_info="        + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"entgerm_germ_etc_info")));        // 장출혈성대장균감염증균주기타정보  
		navUrl = navUrl + "&scrbtyph_inspct_mth="          + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"scrbtyph_inspct_mth")));          // 쯔쯔가무시증검사방법              
		navUrl = navUrl + "&scrbtyph_inspct_rate="         + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"scrbtyph_inspct_rate")));         // 쯔쯔가무시증검사비율              
		navUrl = navUrl + "&scrbtyph_inspct_rate_etc="     + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"scrbtyph_inspct_rate_etc")));     // 쯔쯔가무시증검사비율기타          
		navUrl = navUrl + "&sfts_tick_bite="               + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"sfts_tick_bite")));               // 중증열성혈소판감소증후군진드기교상
		navUrl = navUrl + "&sfts_symptms="                 + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"sfts_symptms")));                 // 중증열성혈소판감소증후군증상      
		navUrl = navUrl + "&sfts_hsptlz_info="             + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"sfts_hsptlz_info")));             // 중증열성혈소판감소증후군입원정보  
		navUrl = navUrl + "&rabies_bite_info="             + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"rabies_bite_info")));             // 공수병교상정보                    
		navUrl = navUrl + "&rabies_hsptlz_info="           + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"rabies_hsptlz_info")));           // 공수병입원정보                    
		navUrl = navUrl + "&rabies_trtmnt="                + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"rabies_trtmnt")));		           // 공수병처치
		navUrl = navUrl + "&rubella_type="                 + encodeURI(utlf_transNullToEmpty(ds_cdclglydisinfo.getColumn(0,"rubella_type")));		           // 200109_AYS_VRSA_코드 추가 입력
	} else {
		sysf_messageBox( "법정전염병 신고서 정보를 조회 할수 없습니다. 전산실에 문의 하세요.", "E001");
		return;	
	}
	
	//trace(navUrl);
	WebBrowser00.url = navUrl;
}


function WebBrowser00_onloadcompleted(obj:WebBrowser, e:WebLoadCompEventInfo)
{
	if(e.id != "onloadcompleted") return;			// onloadcompleted 일 때만 동작	
	
	trace("e.url(법정감염병) :" + e.url);
	
	//var sUrl = e.url.substr(0, e.url.indexOf("?", 1));
	
	//trace("sUrl(infc) :" + sUrl);
	
	//var nIndex = e.url.indexOf("/indigo/InfctnRgstr");
	var nIndex = e.url.indexOf("/infectionsStatementAutoSaveForm");
	
	trace("nIndex(법정감염병) :" + nIndex);
	
	if(nIndex > 0) { // 등록후 결과 화면
		trace("(법정감염병)등록후 결과");
		WebBrowser00.visible = false;
		
		var objDom = obj.document.body;
		var sXml = objDom.innerText;
		trace("sXml bfr : " + sXml);
		
		sXml = sXml.replace("- <", " <");
		sXml = sXml.substr(sXml.indexOf("<root>", 1));
		
		trace("sXml aft : " + sXml);
		
		var sParamObj = new Object();
		sParamObj.pathYN       = 'N'; //dsvaluepath 컬럼 사용여부 
		sParamObj.nullColumnYN = 'Y'; //xml 노드가 빈값일 경우 dataset 컬럼 생성 여부
		
		var succYn = lf_convertXmlToDs(sXml, sParamObj);
		
		if(succYn != "success") {
			sysf_messageBox( "신고후 처리중 오류가 발행했습니다. 전산실에 문의 하세요.", "E001");
			return;			
		}
		
		var sCode     = ds_data_result.getColumn(0, "code");         // 결과코드
		var sDplct_At = ds_data_parameters.getColumn(0, "dplct_at"); // 중복_여부(0: 중복여부 테스트, 1: 신고정보 POST 요청  미 입력시 신고정보 POST 요청(1)처리)
		
		if( sDplct_At == "1" && sCode != "201") { // Post요청, 등록 실패이면
			var sCode_Dt  = ds_data_result.getColumn(0, "code_dt"); // 결과세부코드
			var sMessage  = ds_data_result.getColumn(0, "message"); // 결과메세지
			
			sysf_messageBox( "질병관리본부 저장오류 [" +sCode_Dt + "] " + sMessage, "E999");
			return;
		}
		
		ds_data_parameters.addColumn("ioeflag",    "string");
		ds_data_parameters.addColumn("pid",        "string");
		ds_data_parameters.addColumn("orddd",      "string");
		ds_data_parameters.addColumn("cretno",     "string");
		ds_data_parameters.addColumn("orddeptcd",  "string");
		ds_data_parameters.addColumn("orddrid",    "string");
		ds_data_parameters.addColumn("diagcd",     "string");
		ds_data_parameters.addColumn("wrtedt", 	   "string");
		ds_data_parameters.addColumn("seqno",  	   "string");
		
		ds_data_parameters.setColumn(0, "ioeflag",   ds_cdclglydisinfo.getColumn(0, "ioeflag"));
		ds_data_parameters.setColumn(0, "pid",       ds_cdclglydisinfo.getColumn(0, "pid"));
		ds_data_parameters.setColumn(0, "orddd",     ds_cdclglydisinfo.getColumn(0, "orddd"));
		ds_data_parameters.setColumn(0, "cretno",    ds_cdclglydisinfo.getColumn(0, "cretno"));
		ds_data_parameters.setColumn(0, "orddeptcd", ds_cdclglydisinfo.getColumn(0, "orddeptcd"));
		ds_data_parameters.setColumn(0, "orddrid",   ds_cdclglydisinfo.getColumn(0, "orddrid"));
		ds_data_parameters.setColumn(0, "diagcd",    ds_cdclglydisinfo.getColumn(0, "diagcd"));
		ds_data_parameters.setColumn(0, "wrtedt",    ds_cdclglydisinfo.getColumn(0, "wrtedt"));
		ds_data_parameters.setColumn(0, "seqno",     ds_cdclglydisinfo.getColumn(0, "seqno"));
		
		trace("(법정감염병)서브밋 전");
		
		var oParam = {};
		oParam.id          = "TXASI09101";
		oParam.service     = "infcmngtapp.LglyDisMngt";
		oParam.method      = "reqExeCdcLglyDisInfo";
		oParam.inds        = "req=ds_data_parameters";
		oParam.async       = false;
		oParam.callback    = "cf_TXASI09101";

		tranf_submit(oParam);
		
		trace("(법정감염병)서브밋 후");
	} else {
		nIndex = e.url.indexOf("/tids/anids/sttemnt/reportAutoForm");
		if(nIndex > 0) { // 등록 초기화면
			//trace("초기");
			return;
		} else {
			sysf_messageBox( "법정전염병 신고서 작성에 실패(알수없는 화면 호출) 하였습니다. 전산실에 문의 하세요.", "E001");
			return;
		}
	}
}

function cf_TXASI09101(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode != 0) {
		sysf_messageBox("법정전염병 신고서 정보 저장에 실패 하였습니다.", "E");
    } else {
		sysf_messageBox( "저장 되었습니다.", "I999");
		this.close();
    }
}]]></Script>
  </Form>
</FDL>