YNU_JEUS/app_home/himed/imsi/xpapps/pam/pamcomnxp/xp/PAM.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	KNUH2.0
 * Job Name 		:	PAM
 * Creator 	    :	
 * Make Date 		:	2014-11-25
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-11-25        TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"

//=======================================================================================
// Function
//---------------------------------------------------------------------------------------
 /****************************************************************************************
 * Function			: pamGetDeptCDDrIDList
 * Description		: 현재일자 시스템일자 기준으로 조회
 * Argument			: sDeptlist	 	: 과정보를 담을 Dataset Name
 *					: sDrlist		: 의사정보를 담을 Dataset Name
 *					: sCentlist	 	: 센터정보를 담을 Dataset Name
 *					: sSubdeptlist 	: 보조 과정보를 담을 Dataset Name
 * return type		: 
 * Creator			: 
 ****************************************************************************************/
function pamGetDeptCDDrIDList(sDeptlist, sDrlist, sCentlist, sSubdeptlist){

//	submit("TRPAM00101");
	dsf_createDs("ds_tmp_orddeptcdlist");
	dsf_createDs("ds_tmp_orddridlist");
	dsf_createDs("ds_tmp_centcdlist");
	dsf_createDs("ds_tmp_subdeptcdlist");
	
	var oParam = {};
		oParam.id       = "TRPAM00101";
		oParam.service  = "pamcomnapp.PamComn";
		oParam.method   = "reqGetDeptCDDrID";
		oParam.inds     = "req=ds_req";
		oParam.outds    = "ds_tmp_orddeptcdlist=orddeptcd ds_tmp_orddridlist=orddrid ds_tmp_centcdlist=centcd ds_tmp_subdeptcdlist=subdeptcd";
		oParam.async    = false;
		oParam.callback = "cf_TRPAM00101";

	tranf_submit(oParam);	
	
	// 주과정보
	if(utlf_isNull(sDeptlist)){		
		dsf_createDs("ds_init_orddeptcdlist");
		dsf_copyDs(ds_init_orddeptcdlist,ds_tmp_orddeptcdlist,"replace");
	}else{
		dsf_createDs(sDeptlist);
		dsf_copyDs(this.objects[sDeptlist],ds_tmp_orddeptcdlist,"replace");
	}
	
	// 주치의정보
	if(utlf_isNull(sDrlist)){		
		dsf_createDs("ds_init_orddridlist");
		dsf_copyDs(ds_init_orddridlist	,ds_tmp_orddridlist	 ,"replace");
	}else{
		dsf_createDs(sDrlist);
		dsf_copyDs(this.objects[sDrlist],ds_tmp_orddridlist,"replace");
	}
	
	// 센터정보
	if(utlf_isNull(sCentlist)){		
		dsf_createDs("ds_init_centcdlist");
		dsf_copyDs(ds_init_centcdlist	,ds_tmp_centcdlist	 ,"replace");
	}else{
		dsf_createDs(sCentlist);
		dsf_copyDs(this.objects[sCentlist],ds_tmp_centcdlist,"replace");
	}
	
	// 보조과정보
	if(utlf_isNull(sSubdeptlist)){		
		dsf_createDs("ds_init_subdeptcdlist");
		dsf_copyDs(ds_init_subdeptcdlist,ds_tmp_subdeptcdlist,"replace");
	}else{
		dsf_createDs(sSubdeptlist);
		dsf_copyDs(this.objects[sDeptlist],ds_tmp_subdeptcdlist,"replace");
	}
	
	dsf_deleteDs("ds_tmp_orddeptcdlist");
	dsf_deleteDs("ds_tmp_orddridlist");
	dsf_deleteDs("ds_tmp_centcdlist");
	dsf_deleteDs("ds_tmp_subdeptcdlist");
}

/****************************************************************************************
 * Function			: fApproveHeallifeAmt2
 * Description		: 자격조회 - 임플란트등록신청, 레진틀니등록신청에서 호출 의료급여자격조회승인화면이 만들어져야 가능.
 * Argument			: 
 *					:
 * return type		: 
 * Creator			: 
 ****************************************************************************************/
function fApproveHeallifeAmt2(){
	//보험증번호 조회(보험자격조회)
	var starttime = utlf_getCurrentTime();
	
	var ivrObjt = document.all("ivr_insupopup");
	if( utlf_isNull(ivrObjt) ){
		body.createChild("xforms:iviewer", "id:ivr_insupopup; src:../../../pam/pamcomnweb/xrw/SPPMC03900_의료급여자격조회승인.xrw");
		ivrObjt = document.all("ivr_insupopup");	
		//공통코드 초기화
		ivrObjt.window.javascript.fGetInitCode();
	}
	
	//팝업타입 - 아이뷰어로 세팅 메세지 처리시 필요
	frmf_setParameter("SPPMC03900_POPUPTYPE", "I");		//iviewer
	
	//데이터 초기화 및 자격조회
	if( ivrObjt.window.javascript.fInit() != true ){
		//messageBox("[보험 자격조회 오류]건유비청구가 정상적으로 되지 않았습니다. 건유비청구 팝업에서 직접 차감해주세요.", "E999", "");	
		//ivrObjt.window.javascript.fClose();
		//return false;	
	}

	ivrObjt.window.javascript.fClose();
	var finishtime = utlf_getCurrentTime();
	//alert(starttime + " ~ " + finishtime);
}]]></Script>