123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278 |
- <?xml version="1.0" encoding="utf-8"?>
- <FDL version="1.5">
- <TypeDefinition url="..\..\..\default_typedef.xml"/>
- <Form id="SPMMO21501" position="absolute 0 0 794 481" titletext="사전심사 요구 -- 문의사항이 있을 경우 심사실(본원.T5076, 칠곡.T2182)로 문의 바랍니다.!!" oninit="SPMMO21501_oninit" onload="SPMMO21501_onload">
- <Layouts>
- <Layout>
- <Grid position="absolute 0 157 791 447" id="errlist1" binddataset="ds_result_err1" autofittype="col">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="121"/>
- <Column size="171"/>
- <Column size="423"/>
- </Columns>
- <Rows>
- <Row size="24" band="head"/>
- <Row size="24"/>
- </Rows>
- <Band id="head">
- <Cell displaytype="normal" text="처방코드"/>
- <Cell col="1" displaytype="normal" text="처방명"/>
- <Cell col="2" displaytype="normal" text="오류내용"/>
- </Band>
- <Band id="body">
- <Cell displaytype="normal" text="bind:prcpcd"/>
- <Cell col="1" displaytype="normal" text="bind:prcpnm"/>
- <Cell col="2" displaytype="normal" text="bind:prcperr"/>
- </Band>
- </Format>
- </Formats>
- </Grid>
- <Grid position="absolute 0 23 791 128" id="errlist2" binddataset="ds_result_err2" autofittype="col">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="107"/>
- <Column size="172"/>
- <Column size="454"/>
- </Columns>
- <Rows>
- <Row size="24" band="head"/>
- <Row size="24"/>
- </Rows>
- <Band id="head">
- <Cell displaytype="normal" text="처방코드"/>
- <Cell col="1" displaytype="normal" text="처방명"/>
- <Cell col="2" displaytype="normal" text="오류내용"/>
- </Band>
- <Band id="body">
- <Cell displaytype="normal" text="bind:prcpcd"/>
- <Cell col="1" displaytype="normal" text="bind:prcpnm"/>
- <Cell col="2" displaytype="normal" text="bind:prcperr"/>
- </Band>
- </Format>
- <Format id="format_copy"/>
- </Formats>
- </Grid>
- <Static text="사전심사 대상 처방에 대해" position="absolute 185 455 335 475" id="cap_inform"/>
- <Button position="absolute 340 455 528 477" id="btn_bfjudg" class="btn3" enable="false" text="심사 요구 하시겠습니까?" onclick="btn_bfjudg_onclick"/>
- <Button position="absolute 537 455 787 477" id="btn_close" class="btn3" text="급비변경을 취소 하시겠습니까? (닫기)" onclick="btn_close_onclick"/>
- <Button id="btn_err2" taborder="1" text="무조건 비급여대상" position="absolute 0 3 120 23" onclick="btn_err2_onclick" class="btn_sw"/>
- <Button id="btn_err1" taborder="2" text="사전심사 대상" position="absolute 0 137 101 157" onclick="btn_err1_onclick" class="btn_sw"/>
- </Layout>
- </Layouts>
- <Objects>
- <Dataset id="ds_errlist1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="dcprcppkspec" type="STRING"/>
- <Column id="prcpcd" type="STRING"/>
- <Column id="prcpnm" type="STRING"/>
- <Column id="prcperr" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_errlist2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="dcprcppkspec" type="STRING"/>
- <Column id="prcpcd" type="STRING"/>
- <Column id="prcpnm" type="STRING"/>
- <Column id="prcperr" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_result_err1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="dcprcppkspec" type="STRING"/>
- <Column id="prcpcd" type="STRING"/>
- <Column id="prcpnm" type="STRING"/>
- <Column id="prcperr" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_result_err2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="dcprcppkspec" type="STRING"/>
- <Column id="prcpcd" type="STRING"/>
- <Column id="prcpnm" type="STRING"/>
- <Column id="prcperr" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_result_prcperrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_result_savedrprcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_err1_prcperrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_send" 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 : 2014-12-10
- * Description :
- *---------------------------------------------------------------------------------------
- * Modify Date Modifier Modify Description
- *---------------------------------------------------------------------------------------
- * 2014-12-10 Live Converter TF->XP
- *
- *---------------------------------------------------------------------------------------
- ****************************************************************************************/
- include "com_commonxp::comm_main.xjs";
- include "emr_prcpmngtxp::MMO001.xjs";
- function SPMMO21501_oninit(obj:Form, e:InitEventInfo)
- {
- ds_result_err1.clearData(); //model.removenode ( "/root/err1/prcperrlist" );
- }
- function SPMMO21501_onload(obj:Form, e:LoadEventInfo)
- {
- var flag = "";
- var dcprcppkspec = ""; //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- var waitCnt = 0;
- var cnclCnt = 0;
- //var srcNodeList = model.instances(0).selectNodes ("/root/result/prcperrlist");
- var currow = 1;
- //무조건비급여 대상 instance
- //var destNode2 = model.instances(0).selectSingleNode( "/root/err2" );
- var cnt2 = 0;
- //사전심사 대상 instance
- //var destNode1 = model.instances(0).selectSingleNode( "/root/err1" );
- var cnt1 = 0;
-
- //opener에서 받은 instance 없으면, 창 닫음.
- if( ds_result_prcperrlist.rowcount < 1 ){ // srcNodeList.length <= 0
- close();
- }
-
- //화면 그리드에 데이터 셋팅
- for ( var i = 0; i < ds_result_prcperrlist.rowcount; i++ ) {
- currow = i + 1; // 왜 +1 이지? TF 로우가 1부터 시작해서?
- flag = ds_result_prcperrlist.getColumn(currow, "flag");
- dcprcppkspec = ds_result_prcperrlist.getColumn(currow, "dcprcppkspec"); //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- if ( flag == "9" ) {
- if( dcprcppkspec == "Y" || dcprcppkspec == "2" ){
- ds_result_err2.copyRow(ds_result_err2.addRow(), ds_result_prcperrlist, i); //destNode2.appendChild(srcNodeList.item(i).cloneNode(true));
- cnt2++;
- }else{ //else : W
- ds_result_err1.copyRow(ds_result_err1.addRow(), ds_result_prcperrlist, i); //destNode1.appendChild(srcNodeList.item(i).cloneNode(true));
- cnt1++;
- }
- }
- }
-
- if ( cnt2 > 0 ) {
- btn_err2.class = "btn4"; //selected = true;
-
- }
-
- if ( cnt1 > 0 ) {
- btn_bfjudg.visible = true;
- btn_bfjudg.enable = true;
- btn_err1.class = "btn4"; //selected = true;
- }
- // errlist2.rebuild();
- // errlist1.rebuild();
- /*
- errlist2.mergeCells = "bycol";
- errlist2.mergeCol(0) = true;
- errlist2.mergeCol(1) = true;
- errlist2.merge();
-
- errlist1.mergeCells = "bycol";
- errlist1.mergeCol(0) = true;
- errlist1.mergeCol(1) = true;
- errlist1.merge();
- errlist2.autoResize = true ; //2010.02.04 JJE 오류내용이 긴 경우 모두 보이지 않아서 resize시킴..
- errlist1.autoResize = true ; //2010.02.04 JJE 오류내용이 긴 경우 모두 보이지 않아서 resize시킴..
-
- */
-
-
- // 처방리스트중 사전심사중인지
- // 사전심사 거부된 리스트인지 조회해서
- // 버튼을 hidden 시킨다.
- var sCnts = ds_result_savedrprcplist.rowcount; // getNodesetCount("/root/result/savedrprcplist")
- if (sCnts > 0 ) {
- for (i = 0; i < sCnts; i++ ) {
- var drprcpetc9 = ds_result_savedrprcplist.getColumn(0, "drprcpetc9"); //model.getValue("/root/result/savedrprcplist/drprcpetc9");
- if (drprcpetc9 == "W") {
- waitCnt ++;
- }
- if (drprcpetc9 == "X") {
- cnclCnt++;
- }
- }
- }
-
- // 무조건 비급여 대상과 사전심사대상에 같은 수가만 존재할경우 심사요구를 막고 본인100% 저장을 유도 노회식
- if( ds_result_err1.rowcount > 1 && ds_result_err2.rowcount > 1 ) { // errlist1.rows > 1 && errlist2.rows > 1
- var vflag = 1;
- var vprcpcnt = 0;
- for(var i = 0 ; i < ds_result_err1.rowcount; i++) {
- var vprcpcd = ds_result_err1.getColumn(i, "prcpcd"); //errlist1.valueMatrix(i, errlist1.colRef("prcpcd"));
- vprcpcnt = 0;
- for(var j = 0 ; j < ds_result_err2.rowcount; j++) {
- if( ds_result_err2.getColumn(j, "prcpcd") == vprcpcd ) { // errlist2.valueMatrix(j, errlist2.colRef("prcpcd")) == vprcpcd
- vprcpcnt++;
- }
- }
- if(vprcpcnt == 0) {
- vflag = 0
- }
- }
- if(vflag > 0) {
- btn_bfjudg.enable = false; //disabled = true;
- }
- }
- }
- function fClose() {
- close();
- }
- /*
- function btn_err2_onclick(obj:Button, e:ClickEventInfo)
- {
- model.toggle ("case1" );
- }
- function btn_err1_onclick(obj:Button, e:ClickEventInfo)
- {
- model.toggle ("case1" );
- }
- */
- function btn_bfjudg_onclick(obj:Button, e:ClickEventInfo)
- {
- var prcpcd = "";
- var dcprcppkspec = ""; //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
-
- //var bfJudgInfo = model.instances(0).selectNodes( "/root/err1/prcperrlist" );
- if ( ds_err1_prcperrlist.rowcount > 0 ) { // bfJudgInfo.length > 0
- ds_send.copyData(ds_err1_prcperrlist); //model.setValue ( "/root/send/cond1", getNodeListCSV(bfJudgInfo));
-
- var oParam = {};
- oParam.id = "TXMMO21501";
- oParam.service = "prcpmngtapp.PrcpMngt";
- oParam.method = "reqExeSetBfJudgPayFlag";
- oParam.inds = "req=ds_send";
- oParam.async = false;
- oParam.callback = "cf_TXMMO21501";
- tranf_submit(oParam);
- }
- close();
- }
- function cf_TXMMO21501(sSvcId, nErrorCode, sErrorMsg) {
- if(nErrorCode < 0) {
- sysf_messageBox ( "심사 요구 처리중 오류가 발생하였습니다. 전산실로 문의 하세요.", "E999" );
- return;
- } else {
- sysf_messageBox ( "심사 요구 하였습니다. 심사완료 후 다시 급비 변경하시기 바랍니다.", "I999" );
- }
- }
- function btn_close_onclick(obj:Button, e:ClickEventInfo)
- {
- close();
- }
- ]]></Script>
- </Form>
- </FDL>
|