YNU_JEUS/app_home/himed/xpapps/pam/rcptteamstatsxp/xp/SPPAS00780_미수안내.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPAS00780" position="absolute 0 0 525 184" titletext="미수안내" onload="SPPAS00780_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 25 520 62" id="grp" class="div_SA">
          <Layouts>
            <Layout width="530" height="37">
              <Static text="환자번호 :" position="absolute 10 10 101 27" id="caption4" class="search_name" anchor="default"/>
              <Edit position="absolute 100 9 205 28" id="ipt_pid" onkeydown="grp_ipt_pid_onkeydown" autoselect="true" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static text="환자정보" position="absolute 0 67 89 83" id="caption2" class="tit_2"/>
        <Static text="환자명" position="absolute 0 88 70 108" id="caption1" class="cell_1"/>
        <Shape position="absolute 0 83 520 89" linetype="horizontal" id="line2" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
        <Static text="주민번호" position="absolute 0 111 70 131" id="caption3" class="cell_1"/>
        <Static text="안내여부" position="absolute 0 134 70 154" id="caption5" class="cell_1"/>
        <Shape position="absolute 0 107 520 113" linetype="horizontal" id="line3" class="line_2"/>
        <Shape position="absolute 0 130 520 136" linetype="horizontal" id="line4" class="line_2"/>
        <Static text="연락처" position="absolute 180 88 280 108" id="caption6" class="cell_1"/>
        <Static text="휴대폰번호" position="absolute 180 111 280 131" id="caption7" class="cell_1"/>
        <Static text="주소" position="absolute 180 134 280 154" id="caption8" class="cell_1"/>
        <Edit readonly="true" position="absolute 75 88 175 107" id="output1"/>
        <Edit readonly="true" position="absolute 75 111 175 130" id="output2"/>
        <Edit readonly="true" position="absolute 285 88 385 107" id="output4"/>
        <Edit readonly="true" position="absolute 285 111 385 130" id="output5"/>
        <Edit readonly="true" position="absolute 285 134 520 153" id="output6"/>
        <Combo position="absolute 75 134 175 153" id="combo1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="combo1_onitemchanged">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">Y</Col>
                <Col id="datacolumn">안내</Col>
              </Row>
              <Row>
                <Col id="codecolumn">N</Col>
                <Col id="datacolumn">안내안함</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Button position="absolute 404 158 460 180" id="button1" class="btn4" text="확인" onclick="button1_onclick"/>
        <Button position="absolute 464 158 520 180" id="button2" class="btn4" text="취소" onclick="button2_onclick"/>
        <Static id="caption60" text="미수안내" class="tit_1" position="absolute 0 0 140 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
          <Column id="pid" type="STRING" size="256" sumtext="환자등록번호"/>
          <Column id="bindyn" type="STRING" size="256" sumtext="환자등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="한글이름"/>
          <Column id="hngnm2" type="STRING" size="256" sumtext="표시이름"/>
          <Column id="engnm" type="STRING" size="256" sumtext="영문이름"/>
          <Column id="chinm" type="STRING" size="256" sumtext="영문이름"/>
          <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호앞6자리"/>
          <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호뒤7자리"/>
          <Column id="rrgstno3" type="STRING" size="256" sumtext="주민번호뒤4자리와별표3자리"/>
          <Column id="lastinsukind" type="STRING" size="256" sumtext="최근보험유형"/>
          <Column id="brthdd" type="STRING" size="256" sumtext="생년월일"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="age" type="STRING" size="256" sumtext="나이"/>
          <Column id="bindpid" type="STRING" size="256" sumtext="합본등록번호"/>
          <Column id="hometel" type="STRING" size="256" sumtext="집전화번호"/>
          <Column id="mpphontel" type="STRING" size="256" sumtext="휴대전화번호"/>
          <Column id="etctel1" type="STRING" size="256" sumtext="기타전화번호1"/>
          <Column id="etctel2" type="STRING" size="256" sumtext="기타전화번호2"/>
          <Column id="smsaprvyn" type="STRING" size="256" sumtext="SMS전송 승인 여부"/>
          <Column id="email" type="STRING" size="256" sumtext="이메일 게정"/>
          <Column id="zipcd1" type="STRING" size="256" sumtext="우편번호 앞 3자리"/>
          <Column id="zipcd2" type="STRING" size="256" sumtext="우편번호 뒤 3자리"/>
          <Column id="zipcdseq" type="STRING" size="256" sumtext="우편일련번호"/>
          <Column id="addr" type="STRING" size="256" sumtext="기본주소"/>
          <Column id="detladdr" type="STRING" size="256" sumtext="상세주소"/>
          <Column id="btype" type="STRING" size="256" sumtext="혈액형"/>
          <Column id="rh" type="STRING" size="256" sumtext="RH혈액형"/>
          <Column id="forgeryn" type="STRING" size="256" sumtext="외국인여부"/>
          <Column id="nati" type="STRING" size="256" sumtext="국적"/>
          <Column id="psptno" type="STRING" size="256" sumtext="여권번호"/>
          <Column id="recmyn" type="STRING" size="256" sumtext="추천여부"/>
          <Column id="recmerid" type="STRING" size="256" sumtext="추천인ID"/>
          <Column id="recmernm" type="STRING" size="256" sumtext="추천인명"/>
          <Column id="recmerrela" type="STRING" size="256" sumtext="추천인과의 관계"/>
          <Column id="vipyn" type="STRING" size="256" sumtext="VIP여부"/>
          <Column id="viprem" type="STRING" size="256" sumtext="VIP비고"/>
          <Column id="religncd" type="STRING" size="256" sumtext="종교코드"/>
          <Column id="baptnm" type="STRING" size="256" sumtext="세례명"/>
          <Column id="chchnm" type="STRING" size="256" sumtext="성당명"/>
          <Column id="dethyn" type="STRING" size="256" sumtext="사망여부"/>
          <Column id="dethdt" type="STRING" size="256" sumtext="사망일시"/>
          <Column id="dethdd" type="STRING" size="256" sumtext="사망일자"/>
          <Column id="dethtm" type="STRING" size="256" sumtext="사망시간"/>
          <Column id="chosresn" type="STRING" size="256" sumtext="내원사유"/>
          <Column id="animyn" type="STRING" size="256" sumtext="동물여부"/>
          <Column id="exptresncd" type="STRING" size="256" sumtext="원외예외사유코드"/>
          <Column id="inhospyn" type="STRING" size="256" sumtext="재원여부"/>
          <Column id="handicapryn" type="STRING" size="256" sumtext="장애인여부"/>
          <Column id="pidflag" type="STRING" size="256" sumtext="등록번호구분"/>
          <Column id="remfact" type="STRING" size="256" sumtext="참고사항"/>
          <Column id="ptunyn" type="STRING" size="256" sumtext="미수안내"/>
          <Column id="lastorddd" type="STRING" size="256" sumtext="최근내원일"/>
          <Column id="lastorddeptcd" type="STRING" size="256" sumtext="최근내원과"/>
          <Column id="outuncoamt" type="STRING" size="256" sumtext="외래미수금"/>
          <Column id="dschuncoamt" type="STRING" size="256" sumtext="입원미수금"/>
          <Column id="kioskrcptnoyn" type="STRING" size="256" sumtext="무인수납불가여부"/>
          <Column id="carnum" type="STRING" size="256" sumtext="차량번호"/>
          <Column id="acptdd" type="STRING" size="256" sumtext="가예약 접수일자"/>
          <Column id="acptno" type="STRING" size="256" sumtext="가예약 접수일련번호"/>
          <Column id="patspcfyn" type="STRING" size="256" sumtext="특이환자여부"/>
          <Column id="tdaydsch" type="STRING" size="256" sumtext="특이환자여부"/>
          <Column id="mig" type="STRING" size="256" sumtext="마이그레이션여부"/>
          <Column id="scanyn" type="STRING" size="256" sumtext="동의서출력여부"/>
          <Column id="spifscanyn" type="STRING" size="256" sumtext="선택진료신청서스캔여부"/>
          <Column id="isolinfo" type="STRING" size="256" sumtext="격리환자정보"/>
          <Column id="builno" type="STRING" size="256" sumtext="도로명주소 코드"/>
          <Column id="gugang_ptbs_scanyn" type="STRING" size="256" sumtext="장애인구강센터동의서여부"/>
          <Column id="hieocrtag" type="STRING" size="256" sumtext="HIE관련"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="engnm"/>
            <Col id="chinm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
            <Col id="brthdd"/>
            <Col id="sex"/>
            <Col id="age"/>
            <Col id="bindpid"/>
            <Col id="hometel"/>
            <Col id="mpphontel"/>
            <Col id="etctel1"/>
            <Col id="etctel2"/>
            <Col id="smsaprvyn"/>
            <Col id="email"/>
            <Col id="zipcd1"/>
            <Col id="zipcd2"/>
            <Col id="zipcdseq"/>
            <Col id="addr"/>
            <Col id="detladdr"/>
            <Col id="recmyn"/>
            <Col id="recmerid"/>
            <Col id="recmerrela"/>
            <Col id="vipyn"/>
            <Col id="viprem"/>
            <Col id="forgeryn"/>
            <Col id="ptunyn"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rrgstno" type="STRING" size="256"/>
          <Column id="zipaddr" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" 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="ptunyn" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp.ipt_pid" propid="value" datasetid="ds_patinfolist" columnid="pid"/>
      <BindItem id="item1" compid="output1" propid="value" datasetid="ds_patinfolist" columnid="hngnm"/>
      <BindItem id="item2" compid="output4" propid="value" datasetid="ds_patinfolist" columnid="hometel"/>
      <BindItem id="item3" compid="output2" propid="value" datasetid="ds_temp" columnid="rrgstno"/>
      <BindItem id="item4" compid="output5" propid="value" datasetid="ds_patinfolist" columnid="mpphontel"/>
      <BindItem id="item5" compid="combo1" propid="value" datasetid="ds_patinfolist" columnid="ptunyn"/>
      <BindItem id="item6" compid="output6" propid="value" datasetid="ds_temp" columnid="zipaddr"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include 'com_commonxp::comm_main.xjs';

var arErrorCode = new HashArray();
//=======================================================================================
// Local methods
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: 
 * Description		: 
 ****************************************************************************************/
 
 
//=======================================================================================
// callback
//---------------------------------------------------------------------------------------
function callback(sSvcId, nErrorCode, sErrorMsg){
	arErrorCode.push(sSvcId, nErrorCode);
}

//=======================================================================================
// Events
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: 
 * Description		: onload
 ****************************************************************************************/
function SPPAS00780_onload(obj:Form, e:LoadEventInfo){
	// 폼 초기화
	frmf_initForm(obj);
	
	// dbs227 중복 초기화 문제로 블럭 설정
	//fInitialize();
	
	if(frmf_checkOpener()){
		// 추후 요청이 있을 경우 환자번호로 자동조회
		var SMPAM00100_PID_PARM = opener.frmf_getParameter('SMPAM00100_PID_PARM');
		opener.frmf_setParameter('SMPAM00100_PID_PARM', '');
		
		if (!utlf_isNull(SMPAM00100_PID_PARM) && SMPAM00100_PID_PARM != "" && SMPAM00100_PID_PARM != " " && SMPAM00100_PID_PARM != "-")
		{
			ds_patinfolist.setColumn(0, 'pid', SMPAM00100_PID_PARM);
			
			// 환자번호 조건으로 인적정보 조회
			dsf_createDsRow('ds_req', [
				{ col: 'srchcond', type: 'string', size: 256, val: '1' },
				{ col: 'checkfnexam', type: 'string', size: 256, val: '' },
				{ col: 'pid', type: 'string', size: 256, val: SMPAM00100_PID_PARM },
				{ col: 'hngnm', type: 'string', size: 256, val: '' },
				{ col: 'rrgstno1', type: 'string', size: 256, val: '' },
				{ col: 'rrgstno2', type: 'string', size: 256, val: '' },
				{ col: 'acptdd', type: 'string', size: 256, val: '' },
				{ col: 'instcd', type: 'string', size: 256, val: '' },
				{ col: 'insukind', type: 'string', size: 256, val: '' },
				{ col: 'inhospyn', type: 'string', size: 256, val: '' },
				{ col: 'sex', type: 'string', size: 256, val: '' },
				{ col: 'hiddenflag', type: 'string', size: 256, val: '' }
			], false);
			
			dsf_setTypeFormat(ds_req, "srchcond:INT^checkfnexam:INT");
			
			ds_patinfolist.clearData();
			ds_patinfolist.addRow();
			
			var oParam = {};
				oParam.id          = "TRPMC02500";
				oParam.service     = "patinfomngtapp.PatBaseInfo";
				oParam.method      = "reqGetPatInfo";
				oParam.inds        = "req=ds_req";
				oParam.outds       = "ds_patinfolist=patinfolist";
				oParam.async       = false;
				oParam.callback    = "callback";

			tranf_submit(oParam);
			
			if(arErrorCode.pop("TRPMC02500") > -1){
				var pid = ds_patinfolist.getColumn(0, 'pid');
				
				if(utlf_transNullToEmpty(pid) == '' || pid == ' ' || pid == '-'){
					sysf_messageBox('존재하지 않는 등록번호', 'E008');
					ds_patinfolist.clearData();
					ds_patinfolist.addRow();
					return;
				}
			}
		}
	}		// end of if(frmf_checkOpener())
	var rrgstno = ds_patinfolist.getColumn(0, 'rrgstno1') + '-' + ds_patinfolist.getColumn(0, 'rrgstno2');
	var zipaddr = ds_patinfolist.getColumn(0, 'addr') + ds_patinfolist.getColumn(0, 'detladdr');
	
	ds_temp.setColumn(0, 'rrgstno', rrgstno);
	ds_temp.setColumn(0, 'zipaddr', zipaddr);
	
	ds_send.setColumn(0, 'pid', ds_patinfolist.getColumn(0, 'pid'));
}

/****************************************************************************************
 * Argument			: 
 * Description		: 환자번호 키보드 입력 이벤트
 ****************************************************************************************/
function grp_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo){
	if(e.keycode == 13){
		obj.updateToDataset();
		
		// 환자번호 null체크
		var pid = ds_patinfolist.getColumn(0, 'pid');
		
		if(utlf_transNullToEmpty(pid) == '' || pid == ' ' || pid == '-'){
			ds_patinfolist.setColumn(0, 'pid', '');
			ds_patinfolist.setColumn(0, 'hngnm', '');
			ds_patinfolist.setColumn(0, 'rrgstno1', '');
			ds_patinfolist.setColumn(0, 'rrgstno2', '');
			
			fSearch();
			
			sysf_messageBox('환자등록번호가 입력되지', 'E007');
			return;
		}
		
		// 환자번호 조건으로 인적정보 조회
		dsf_createDsRow('ds_req', [
				{ col: 'srchcond', type: 'string', size: 256, val: '1' },
				{ col: 'checkfnexam', type: 'string', size: 256, val: '' },
				{ col: 'pid', type: 'string', size: 256, val: ds_patinfolist.getColumn(0, 'pid') },
				{ col: 'hngnm', type: 'string', size: 256, val: '' },
				{ col: 'rrgstno1', type: 'string', size: 256, val: '' },
				{ col: 'rrgstno2', type: 'string', size: 256, val: '' },
				{ col: 'acptdd', type: 'string', size: 256, val: '' },
				{ col: 'instcd', type: 'string', size: 256, val: '' },
				{ col: 'insukind', type: 'string', size: 256, val: '' },
				{ col: 'inhospyn', type: 'string', size: 256, val: '' },
				{ col: 'sex', type: 'string', size: 256, val: '' },
				{ col: 'hiddenflag', type: 'string', size: 256, val: '' }
			], false);
		
		
		ds_patinfolist.clearData();
		ds_patinfolist.addRow();
		
		var oParam = {};
			oParam.id          = "TRPMC02500";
			oParam.service     = "patinfomngtapp.PatBaseInfo";
			oParam.method      = "reqGetPatInfo";
			oParam.inds        = "req=ds_req";
			oParam.outds       = "ds_patinfolist=patinfolist";
			oParam.async       = false;
			oParam.callback    = "callback";

		tranf_submit(oParam);
		
		if(arErrorCode.pop("TRPMC02500") > -1){
			var pid = ds_patinfolist.getcolumn(0, 'pid');
			// 조회내역 체크
			if(utlf_transNullToEmpty(pid) == '' || pid == ' ' || pid == '-'){
				sysf_messageBox('존재하지 않는 등록번호', 'E008');
				ds_patinfolist.clearData();
				return;
			}
			// 재원환자 체크(계산진행 못하게 할 것인지는 추후 수납확인필요)
			var inhospyn = ds_patinfolist.getColumn(0, 'inhospyn');
			if(inhospyn == 'Y'){
				sysf_messageBox('[' + ds_patinfolist.getColumn(0, 'hngnm') + '] 환자는 재원 중인 환자', 'E008');
				 
			}
		}
	}
}

/****************************************************************************************
 * Argument			: 
 * Description		: 안내여부 콤보 아이템 변경 이벤트
 ****************************************************************************************/
function combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo){
	ds_send.setColumn(0, 'ptunyn', ds_patinfolist.getColumn(0, 'ptunyn'));
}

/****************************************************************************************
 * Argument			: 
 * Description		: 확인 버튼 클릭 이벤트
 ****************************************************************************************/
function button1_onclick(obj:Button,  e:ClickEventInfo){
	if(utlf_transNullToEmpty(ds_send.getColumn(0, 'ptunyn')) == ''){
		this.close();
	}
	else{
		var oParam = {};
			oParam.id          = "TRPAS00860";
			oParam.service     = "rcptteamstatsapp.rcptTeamOrdStats";
			oParam.method      = "reqGetPtunyn";
			oParam.inds        = "req=ds_send";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPAS00860";

		tranf_submit(oParam);
	}
}

/****************************************************************************************
 * Argument			: 
 * Description		: 취소 버튼 클릭 이벤트
 ****************************************************************************************/
function button2_onclick(obj:Button,  e:ClickEventInfo){
	this.close();
}
]]></Script>
  </Form>
</FDL>