A 일반 B ★★★★★ C ★(칭찬) <MaskEdit id="ipt_rrgstno" taborder="4" mask="999999-9" position="absolute 591 55 721 74"/> <Edit id="ipt_email" taborder="5" position="absolute 108 130 722 149"/> <Edit id="ipt_phone" taborder="6" position="absolute 349 55 479 74"/> <Edit id="ipt_PID" taborder="7" position="absolute 108 29 238 48"/> <Static id="caption21" text="환자명" class="cell_1" position="absolute 241 27 346 50" style="padding:0 0 0 0;align:center middle;"/> <Static id="caption11" text="대상구분" class="cell_1" position="absolute 483 27 588 50" style="padding:0 0 0 0;align:center middle;"/> <Edit id="ipt_detladdr" taborder="8" position="absolute 108 104 722 123"/> <Static id="caption22" text="등록번호" class="cell_1" position="absolute 0 27 105 50" style="padding:0 0 0 0;align:center middle;"/> <Static id="caption34" text="메모 내용" class="cell_1" position="absolute 0 180 105 284" style="padding:0 0 0 0;align:center middle;"/> <Edit id="ipt_mobile" taborder="9" position="absolute 108 55 238 74"/> <Static id="caption3" text="주민번호" class="cell_1" position="absolute 483 53 588 76" style="padding:0 0 0 0;align:center middle;"/> <Static id="caption4" text="이메일" class="cell_1" position="absolute 0 128 105 151" style="padding:0 0 0 0;align:center middle;"/> <Edit id="ipt_PatNm" taborder="10" position="absolute 349 29 476 48"/> <Static id="caption14" text="주소" class="cell_1" position="absolute 0 79 105 125" style="padding:0 0 0 0;align:center middle;"/> <Edit id="ipt_ZipCd1" taborder="11" position="absolute 108 80 163 99"/> <Edit id="ipt_ZipCd2" taborder="12" position="absolute 165 80 220 99"/> <Edit id="ipt_ZipCdAddr" taborder="13" position="absolute 222 80 721 99"/> <Static id="caption6" text="집 전화번호" class="cell_1" position="absolute 241 53 346 76" style="padding:0 0 0 0;align:center middle;"/> <Static id="caption26" text="휴대폰" class="cell_1" position="absolute 0 53 105 76" style="padding:0 0 0 0;align:center middle;"/> <Static id="caption9" text="관련민원인" class="cell_1" position="absolute 0 154 105 177" style="padding:0 0 0 0;align:center middle;"/> <Button id="btn_refresh" taborder="14" text="환자정보 갱신하기" class="btn5" position="absolute 0 287 119 306" onclick="btn_refresh_onclick"/> <Button id="btn_popVOC" taborder="15" text="VOC 등록이력 보기" class="btn2" position="absolute 122 287 249 306" onclick="btn_popVOC_onclick"/> <Button id="btn_save" taborder="16" text="저장" class="btn4" position="absolute 608 287 664 309" onclick="btn_save_onclick"/> <Button id="btn_close" taborder="17" text="닫기" class="btn4" position="absolute 666 287 722 309" onclick="btn_close_onclick"/> </Layout> </Layouts> <Objects> <Dataset id="ds_main_piddata" 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="hngnm" type="STRING" size="256"/> <Column id="mpphontel" type="STRING" size="256"/> <Column id="zipcd1" type="STRING" size="256"/> <Column id="zipcd2" type="STRING" size="256"/> <Column id="zipcdaddr" type="STRING" size="256"/> <Column id="detladdr" type="STRING" size="256"/> <Column id="rrgstno" type="STRING" size="256"/> <Column id="email" type="STRING" size="256"/> <Column id="hometel" type="STRING" size="256"/> </ColumnInfo> <Rows> <Row> <Col id="pid"/> <Col id="hngnm"/> <Col id="mpphontel"/> <Col id="zipcd1"/> <Col id="zipcd2"/> <Col id="zipcdaddr"/> <Col id="detladdr"/> <Col id="rrgstno"/> <Col id="email"/> <Col id="hometel"/> </Row> </Rows> </Dataset> <Dataset id="ds_main_mngdata" 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="mngtmanflag" type="STRING" size="256"/> <Column id="clntvalu" type="STRING" size="256"/> <Column id="relaclntnm" type="STRING" size="256"/> </ColumnInfo> <Rows> <Row> <Col id="pid"/> <Col id="mngtmanflag"/> <Col id="clntvalu"/> <Col id="relaclntnm"/> </Row> </Rows> </Dataset> <Dataset id="ds_main_temp_key" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/> <Dataset id="ds_temp_piddata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"> <ColumnInfo> <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/> <Column id="pid" type="STRING" size="256" sumtext="등록번호"/> <Column id="rrgstno" type="STRING" size="256" sumtext="주민번호"/> <Column id="mpphontel" type="STRING" size="256" sumtext="휴대폰번호"/> <Column id="hometel" type="STRING" size="256" sumtext="집전화번호"/> <Column id="zipcd1" type="STRING" size="256" sumtext="우편번호1"/> <Column id="zipcd2" type="STRING" size="256" sumtext="우편번호2"/> <Column id="zipcdaddr" type="STRING" size="256" sumtext="우편번호주소"/> <Column id="detladdr" type="STRING" size="256" sumtext="나머지주소"/> <Column id="email" type="STRING" size="256" sumtext="이메일"/> </ColumnInfo> </Dataset> <Dataset id="ds_main_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"> <ColumnInfo> <Column id="srchpid" type="STRING" size="256"/> </ColumnInfo> <Rows> <Row/> </Rows> </Dataset> </Objects> <Bind> <BindItem id="item0" compid="ipt_PID" propid="value" datasetid="ds_main_piddata" columnid="pid"/> <BindItem id="item1" compid="ipt_PatNm" propid="value" datasetid="ds_main_piddata" columnid="hngnm"/> <BindItem id="item2" compid="cmb_Mngtflag" propid="value" datasetid="ds_main_piddata" columnid="mngtmanflag"/> <BindItem id="item3" compid="ipt_rrgstno" propid="value" datasetid="ds_main_piddata" columnid="rrgstno"/> <BindItem id="item4" compid="ipt_phone" propid="value" datasetid="ds_main_piddata" columnid="hometel"/> <BindItem id="item5" compid="ipt_mobile" propid="value" datasetid="ds_main_piddata" columnid="mpphontel"/> <BindItem id="item6" compid="ipt_ZipCdAddr" propid="value" datasetid="ds_main_piddata" columnid="zipcdaddr"/> <BindItem id="item7" compid="ipt_ZipCd1" propid="value" datasetid="ds_main_piddata" columnid="zipcd1"/> <BindItem id="item8" compid="ipt_ZipCd2" propid="value" datasetid="ds_main_piddata" columnid="zipcd2"/> <BindItem id="item9" compid="ipt_detladdr" propid="value" datasetid="ds_main_piddata" columnid="detladdr"/> <BindItem id="item10" compid="ipt_email" propid="value" datasetid="ds_main_piddata" columnid="email"/> <BindItem id="item11" compid="ipt_rela" propid="value" datasetid="ds_main_mngdata" columnid="relaclntnm"/> <BindItem id="item12" compid="tar_ClntValu" propid="value" datasetid="ds_main_mngdata" columnid=""/> </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 * *--------------------------------------------------------------------------------------- ****************************************************************************************/ include "com_commonxp::comm_main.xjs"; var arErrorCode = new HashArray(); function SPCVO02900_oninit(obj:Form, e:InitEventInfo) { frmf_initForm(obj); } function SPCVO02900_onload(obj:Form, e:LoadEventInfo) { try { ds_main_temp_key.copyData(arg_ds_main_temp_key); } catch(e){} var resndPID = ds_main_temp_key.getColumn(0, "sndPID") if ( utlf_isNull(resndPID)) { var rtn = sysf_messageBox("조회에 필요한 항목이 전달되지", "E007"); if(rtn == 1) { this.close(); } } else { var oParam = {}; oParam.id = "TRCVP00303"; oParam.service = "vocapp.Voc"; oParam.method = "reqGetPatMngData"; oParam.inds = "req=ds_main_temp_key"; oParam.outds = "ds_main_mngdata=mngdata"; oParam.async = false; //oParam.callback = "cf_TRCVP00303"; tranf_submit(oParam); var oParam = {}; oParam.id = "TRCVP00304"; oParam.service = "vocapp.Voc"; oParam.method = "reqGetPIDMngData"; oParam.inds = "req=ds_main_temp_key"; oParam.outds = "ds_main_piddata=piddata"; oParam.async = false; //oParam.callback = "cf_TRCVP00304"; tranf_submit(oParam); } } function btn_refresh_onclick(obj:Button, e:ClickEventInfo) { var s_pid = ds_main_piddata.getColumn(0, "pid"); if (!utlf_isNull(s_pid)) { var rtn = sysf_messageBox(" 관리고객의 정보가 병원정보 시스템의 정보로 갱신되게 됩니다.", "Q004"); if(rtn == 6) { var oParam = {}; oParam.id = "TRCVP00302"; oParam.service = "vocapp.Voc"; oParam.method = "reqGetPatHisData"; oParam.inds = "req=ds_main_mngdata"; oParam.outds = "ds_temp_piddata=piddata"; oParam.async = false; oParam.callback = "cf_TRCVP00302"; tranf_submit(oParam); if(arErrorCode.pop("TRCVP00302") > -1) { if( ds_temp_piddata.rowcount > 0) { var pid_pid = ds_temp_piddata.getColumn(0, "pid"); var pid_patnm = ds_temp_piddata.getColumn(0, "hngnm"); var pid_mpphonno = ds_temp_piddata.getColumn(0, "mpphontel"); var pid_zipcd1 = ds_temp_piddata.getColumn(0, "zipcd1"); var pid_zipcd2 = ds_temp_piddata.getColumn(0, "zipcd2"); var pid_zipcdaddr = ds_temp_piddata.getColumn(0, "zipcdaddr"); var pid_detladdr = ds_temp_piddata.getColumn(0, "detladdr"); var pid_rrgstno = ds_temp_piddata.getColumn(0, "rrgstno"); var pid_hometel = ds_temp_piddata.getColumn(0, "hometel"); var pid_email = ds_temp_piddata.getColumn(0, "email"); ds_main_piddata.setColumn(0, "hngnm", pid_patnm); ds_main_piddata.setColumn(0, "mpphontel", pid_mpphonno); ds_main_piddata.setColumn(0, "zipcd1", pid_zipcd1); ds_main_piddata.setColumn(0, "zipcd2", pid_zipcd2); ds_main_piddata.setColumn(0, "zipcdaddr", pid_zipcdaddr); ds_main_piddata.setColumn(0, "detladdr", pid_detladdr); ds_main_piddata.setColumn(0, "rrgstno", pid_rrgstno); ds_main_piddata.setColumn(0, "hometel", pid_hometel); ds_main_piddata.setColumn(0, "email", pid_email); var oParam = {}; oParam.id = "TXCVP00302"; oParam.service = "vocapp.Voc"; oParam.method = "reqSetPatHisData"; oParam.inds = "req=ds_main_piddata"; oParam.outds = ""; oParam.async = false; oParam.callback = "cf_TXCVP00302"; tranf_submit(oParam); if(arErrorCode.pop("TXCVP00302") > -1) { sysf_messageBox("환자정보가 갱신 ", "I002"); } } else { sysf_messageBox("존재하지 않는 환자 등록번호 ", "E008"); ds_temp_piddata.clearData(); } } } } else { sysf_messageBox("등록번호가 없어 환자정보를 갱신 ", "E001"); } } function cf_TRCVP00302(sSvcId, nErrorCode, sErrorMsg) { arErrorCode.push(sSvcId, nErrorCode); } function cf_TXCVP00302(sSvcId, nErrorCode, sErrorMsg) { arErrorCode.push(sSvcId, nErrorCode); } function cf_TXCVP00301(sSvcId, nErrorCode, sErrorMsg) { arErrorCode.push(sSvcId, nErrorCode); } function btn_popVOC_onclick(obj:Button, e:ClickEventInfo) { var r_PID = ds_main_piddata.getColumn(0, "pid"); ds_main_search.setColumn(0, "srchpid", r_PID); var objArg = new Object(); objArg.arg_ds_main_search = ds_main_search; frmf_open("SPCVO00300", "SPCVO00300", objArg, "", "", "", "", "", "", "", "", "", "M"); } function btn_save_onclick(obj:Button, e:ClickEventInfo) { var s_pid = ds_main_piddata.getColumn(0, "pid"); if (!utlf_isNull(s_pid)) { arrCompId = new Array("cmb_Mngtflag"); if(frmf_isRequiredControls(arrCompId)) { var oParam = {}; oParam.id = "TXCVP00301"; oParam.service = "vocapp.Voc"; oParam.method = "reqSetPatMngData"; oParam.inds = "req=ds_main_mngdata"; oParam.outds = ""; oParam.async = false; oParam.callback = "cf_TXCVP00301"; tranf_submit(oParam); if(arErrorCode.pop("TXCVP00301") > -1) { var oParam = {}; oParam.id = "TXCVP00302"; oParam.service = "vocapp.Voc"; oParam.method = "reqSetPatHisData"; oParam.inds = "req=ds_main_piddata"; oParam.outds = ""; oParam.async = false; //oParam.callback = "cf_TXCVP00302"; tranf_submit(oParam); sysf_messageBox("저장이 ", "I002"); } } } else { sysf_messageBox("등록번호가 없어 저장 ", "E001"); } } function btn_close_onclick(obj:Button, e:ClickEventInfo) { this.close(); } ]]></Script> </Form> </FDL>