123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480 |
- <?xml version="1.0" encoding="utf-8"?>
- <FDL version="1.5">
- <TypeDefinition url="..\..\..\default_typedef.xml"/>
- <Form id="SPMMO21500" position="absolute 0 0 791 478" titletext="사전심사 요구 -- 문의사항이 있을 경우 심사실(본원.T5076, 칠곡.T2184)로 문의 바랍니다.!!" oninit="SPMMO21500_oninit" onload="SPMMO21500_onload">
- <Layouts>
- <Layout>
- <Button position="absolute 400 0 456 20" id="button1" class="btn4" visible="false" text="확인" onclick="button1_onclick"/>
- <Grid position="absolute 0 25 791 130" id="errlist2" binddataset="ds_err2_prcpmsglist" autofittype="col" selecttype="multiarea">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="0"/>
- <Column size="80"/>
- <Column size="287"/>
- <Column size="423"/>
- </Columns>
- <Rows>
- <Row size="24" band="head"/>
- <Row size="24"/>
- </Rows>
- <Band id="head">
- <Cell/>
- <Cell col="1" text="처방코드"/>
- <Cell col="2" text="처방명"/>
- <Cell col="3" text="심사내용"/>
- </Band>
- <Band id="body">
- <Cell displaytype="checkbox" edittype="checkbox" text="bind:prcppkspec"/>
- <Cell col="1" displaytype="normal" edittype="none" style="align:left middle;" text="bind:prcpcd" wordwrap="word" suppress="1" suppressalign="middle,over"/>
- <Cell col="2" style="align:left middle;" text="bind:prcpnm" wordwrap="word" suppress="1" suppressalign="middle,over"/>
- <Cell col="3" style="align:left middle;" text="bind:errmsg" suppress="1" suppressalign="middle,over"/>
- </Band>
- </Format>
- </Formats>
- </Grid>
- <Grid position="absolute 0 161 791 451" id="errlist1" binddataset="ds_err1_prcpmsglist" autofittype="col" oncelldblclick="errlist1_oncelldblclick" selecttype="multiarea" autosizingtype="row" cellsizingtype="row">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="0"/>
- <Column size="80"/>
- <Column size="200"/>
- <Column size="250"/>
- <Column size="0"/>
- <Column size="261"/>
- <Column size="0"/>
- </Columns>
- <Rows>
- <Row size="24" band="head"/>
- <Row size="24"/>
- </Rows>
- <Band id="head">
- <Cell/>
- <Cell col="1" text="처방코드"/>
- <Cell col="2" text="처방명"/>
- <Cell col="3" text="심사내용"/>
- <Cell col="4" text="사유코드"/>
- <Cell col="5" text="처방사유(심사팀전달)"/>
- <Cell col="6" text="cnfrmk"/>
- </Band>
- <Band id="body">
- <Cell displaytype="checkbox" edittype="checkbox" text="bind:prcppkspec"/>
- <Cell col="1" displaytype="normal" edittype="none" style="align:left middle;linespace:3;" text="bind:prcpcd" wordwrap="word" suppress="1" suppressalign="middle,over"/>
- <Cell col="2" style="align:left middle;linespace:3;" text="bind:prcpnm" wordwrap="word" suppress="1" suppressalign="middle,over"/>
- <Cell col="3" style="align:left middle;linespace:3;" text="bind:errmsg" wordwrap="word" suppress="1" suppressalign="middle,over"/>
- <Cell col="4" style="align:left middle;" text="bind:cnfcd"/>
- <Cell col="5" style="align:left middle;" text="bind:cnfmsg"/>
- <Cell col="6" text="bind:cnfrmk"/>
- </Band>
- </Format>
- </Formats>
- </Grid>
- <Static text="사전심사 대상 처방에 대해" position="absolute 5 458 155 478" id="cap_inform" style="color:red;"/>
- <Button position="absolute 160 458 348 478" id="btn_bfjudg" class="btn3" enable="false" text="심사 요구 하시겠습니까?" onclick="btn_bfjudg_onclick"/>
- <Button position="absolute 366 458 554 478" id="btn_chgpayflag" class="btn3" text="본인 100%로 하시겠습니까?" onclick="btn_chgpayflag_onclick"/>
- <Button position="absolute 571 458 791 478" id="btn_close" class="btn3" text="처방변경을 하시겠습니까? (닫기)" onclick="btn_close_onclick"/>
- <Static id="Static00" text="무조건 비급여대상" position="absolute 0 0 138 25" class="tit_1"/>
- <Static id="Static01" text="사전심사 대상" class="tit_1" position="absolute 0 136 114 161"/>
- </Layout>
- </Layouts>
- <Objects>
- <Dataset id="ds_result_prcperrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="flag" type="STRING" size="256" sumtext="에러구분: 1:에러, 2:병용금기, 3:연령금기"/>
- <Column id="prcpcd" type="STRING" size="256" sumtext="에러처방코드"/>
- <Column id="prcpnm" type="STRING" size="256" sumtext="에러처방이름"/>
- <Column id="errmsg" type="STRING" size="256" sumtext="에러내용"/>
- <Column id="errrow" type="STRING" size="256" sumtext="오류Row.병용금기 약품묶음"/>
- <Column id="prcppkspec" type="STRING" size="256" sumtext="D/C처방오류정보:D/C처방 오류시 색변경을 위해..."/>
- <Column id="delflag" type="STRING" size="256" sumtext="삭제flag"/>
- </ColumnInfo>
- </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" sumtext="환자번호"/>
- <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
- <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
- </ColumnInfo>
- <Rows>
- <Row/>
- </Rows>
- </Dataset>
- <Dataset id="ds_result_prcpmsglist" 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="msgdd" type="STRING" size="256" sumtext="메세지일자"/>
- <Column id="msgno" type="STRING" size="256" sumtext="메세지번호"/>
- <Column id="histno" type="STRING" size="256" sumtext="메세지이력번호"/>
- <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
- <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
- <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
- <Column id="ordtype" type="STRING" size="256" sumtext="진료구분 (O:외래, I:입원, E:응급, S:건진)"/>
- <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
- <Column id="msgseq" type="STRING" size="256" sumtext="메세지상세번호"/>
- <Column id="msgcls" type="STRING" size="256" sumtext="메세지종류"/>
- <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
- <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
- <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
- <Column id="errcd" type="STRING" size="256" sumtext="오류코드"/>
- <Column id="errmsg" type="STRING" size="256" sumtext="오류메세지"/>
- <Column id="errdisc" type="STRING" size="256" sumtext="오류설명"/>
- <Column id="cnfcd" type="STRING" size="256" sumtext="확인코드"/>
- <Column id="cnfmsg" type="STRING" size="256" sumtext="확인메세지"/>
- <Column id="cnfrmk" type="STRING" size="256" sumtext="확인비고"/>
- <Column id="errrow" type="STRING" size="256" sumtext="오류Row.병용금기 약품묶음"/>
- <Column id="prcppkspec" type="STRING" size="256" sumtext="D/C처방오류정보:D/C처방 오류시 색변경을 위해..."/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_result_saveflaginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_err1_prcpmsglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_err2_prcpmsglist" 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"/>
- </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";
- function SPMMO21500_oninit(obj:Form, e:InitEventInfo)
- {
- frmf_initForm(obj);
- }
- function SPMMO21500_onload(obj:Form, e:LoadEventInfo)
- {
- try {
- ds_result_saveflaginfo.copyData(arg_ds_result_saveflaginfo);
- ds_result_savedrprcplist.copyData(arg_ds_result_savedrprcplist);
- ds_result_prcperrlist.copyData(arg_ds_result_prcperrlist);
- } catch(e) {
- sysf_catchTrace(e);
- }
-
- var sPrcpPkSpec = ""; //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- var waitCnt = 0;
- var cnclCnt = 0;
- //var srcErrNodeList = model.instances(0).selectNodes ("/root/result/prcperrlist");
-
- //무조건비급여 대상 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 없으면, 리스트 조회 (2011.03.17 JJE)
-
- if( ds_result_saveflaginfo.rowcount < 1 ){
- ds_send.setColumn(0, "pid", opener.ds_paminfo.getColumn(0, "pid"));
- ds_send.setColumn(0, "cretno", opener.ds_paminfo.getColumn(0, "cretno"));
- ds_send.setColumn(0, "orddd", opener.ds_paminfo.getColumn(0, "orddd"));
-
- var oParam = {};
- oParam.id = "TRMMO21501";
- oParam.service = "bfjudgcareapp.BfJudgCareMngt";
- oParam.method = "reqGetWaitBfJudgPrcpList";
- oParam.inds = "req=ds_send";
- oParam.outds = "ds_result_prcperrlist=prcperrlist"; // ds_result_prcperrlist
- oParam.async = false;
- tranf_submit(oParam);
-
- // 허만호, 2015.09.16, TRMMO21501에서는 ref가 TRMMO21502와 달라 그리드에 데이터 셋팅을 위함
- for(var i = 0; i < ds_result_prcperrlist.rowcount; i++) {
- ds_result_prcpmsglist.addRow();
- ds_result_prcpmsglist.setColumn(i, "errmsg", ds_result_prcperrlist.getColumn(i, "prcperr"));
- ds_result_prcpmsglist.setColumn(i, "prcppkspec", ds_result_prcperrlist.getColumn(i, "dcprcppkspec"));
- ds_result_prcpmsglist.setColumn(i, "prcpcd", ds_result_prcperrlist.getColumn(i, "prcpcd"));
- ds_result_prcpmsglist.setColumn(i, "prcpnm", ds_result_prcperrlist.getColumn(i, "prcpnm"));
- ds_result_prcpmsglist.setColumn(i, "errrow", ds_result_prcperrlist.getColumn(i, "errrow"));
- ds_result_prcpmsglist.setColumn(i, "delflag", ds_result_prcperrlist.getColumn(i, "delflag"));
- }
-
- // ds_result_prcperrlist 컬럼중 errmsg, prcppkspec은 맵파일에서 이름이 서로 다른데 실제 쿼리에선 둘 다 없다.
- } else {
- var oParam = {};
- oParam.id = "TRMMO21502";
- oParam.service = "prcpmngtapp.PrcpMngt";
- oParam.method = "reqGetPrcpBfJudgMsgList";
- oParam.inds = "req=ds_result_saveflaginfo";
- oParam.outds = "ds_result_prcpmsglist=prcpmsglist";
- oParam.async = false;
- tranf_submit(oParam);
- }
-
- dsf_copyColInfo(ds_err1_prcpmsglist, ds_result_prcpmsglist);
- dsf_copyColInfo(ds_err2_prcpmsglist, ds_result_prcpmsglist);
-
- //화면 그리드에 데이터 셋팅
- for ( var i = 0; i < ds_result_prcpmsglist.rowcount; i++ ) {
- sPrcpPkSpec = ds_result_prcpmsglist.getColumn(i, "prcppkspec"); //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- if( sPrcpPkSpec == "Y" || sPrcpPkSpec == "2" ){
- var row = ds_err2_prcpmsglist.addRow();
- ds_err2_prcpmsglist.copyRow(row, ds_result_prcpmsglist, i);
- cnt2++;
- }else{ //else : W
- var row = ds_err1_prcpmsglist.addRow();
- ds_err1_prcpmsglist.copyRow(row, ds_result_prcpmsglist, i);
- cnt1++;
- }
- }
-
- if ( cnt2 > 0 ) {
- ds_err2_prcpmsglist.rowposition = -1;
- //btn_err2.selected = true;
- }
-
- if ( cnt1 > 0 ) {
- ds_err1_prcpmsglist.rowposition = -1;
- btn_bfjudg.visible = true;
- btn_bfjudg.enable = true;
- //btn_err1.selected = true;
- }
-
- // 처방리스트중 사전심사중인지
- // 사전심사 거부된 리스트인지 조회해서
- // 버튼을 hidden 시킨다.
- var sCnts = ds_result_savedrprcplist.rowcount;
- if (sCnts > 0 ) {
- for (var i = 0; i < sCnts; i++ ) {
- var drprcpetc9 = ds_result_savedrprcplist.getColumn(0, "drprcpetc9");
- if (drprcpetc9 == "W") {
- waitCnt ++;
- }
- if (drprcpetc9 == "X") {
- cnclCnt++;
- }
- }
- }
-
- // 무조건 비급여 대상과 사전심사대상에 같은 수가만 존재할경우 심사요구를 막고 본인100% 저장을 유도 노회식
- if(ds_err1_prcpmsglist.rowcount > 1 && ds_err2_prcpmsglist.rowcount > 1) {
- var vflag = 1;
- var vprcpcnt = 0;
- for(var i = 0 ; i < ds_err1_prcpmsglist.rowcount; i++) {
- var vprcpcd = ds_err1_prcpmsglist.getColumn(i, "prcpcd");
- vprcpcnt = 0;
- for(var j = 0 ; j < ds_err2_prcpmsglist.rowcount ; j++) {
- if(ds_err2_prcpmsglist.getColumn(j, "prcpcd") == vprcpcd) {
- vprcpcnt++;
- }
- }
- if(vprcpcnt == 0) {
- vflag = 0
- }
- }
- if(vflag > 0) {
- btn_bfjudg.enable = false;
- }
- }
- }
- function button1_onclick(obj:Button, e:ClickEventInfo)
- {
- close();
- }
- function errlist1_oncelldblclick(obj:Grid, e:GridClickEventInfo)
- {
- if(e.row < 0 || e.col < 0) return;
-
- var nRow = e.row;
- var sPrcpCd = ds_err1_prcpmsglist.getColumn(nRow, "prcpcd");
- var sCnfRmk = ds_err1_prcpmsglist.getColumn(nRow, "cnfrmk"); // EMR.MMOHRESN 처방 사유 테이블의 resnflag 사유구분(M0530)
- var sHardCdNo = "";
-
- if(sCnfRmk == "015") { // PET/CT 처방 사유
- sHardCdNo = "455";
- } else {
- sHardCdNo = "457"; // 기본 사유
- }
-
- frmf_setParameter ("SPMMO90300_hardcdno" , sHardCdNo);
-
- frmf_modal("SPMMO90300", "SPMMO90300", null, null, null, null, null, null, null, null, null, null, "M");
-
- if(frmf_getParameter ("SPMMO90300_rtn" ) == "Y") {
- var sHardCd = frmf_getParameter ("SPMMO90300_hardcd" ) ;
- var sHardNm = frmf_getParameter ("SPMMO90300_hardnm" ) ;
-
- var checkLength = ds_err1_prcpmsglist.rowcount;
- var resnCnt = 0;
- var sUserId = "";
-
- for ( var i = 0; i < checkLength; i++ ) {
- if ( sPrcpCd == ds_err1_prcpmsglist.getColumn(i, "prcpcd") ) {
- ds_err1_prcpmsglist.setColumn(i, "cnfcd", sHardCd);
- ds_err1_prcpmsglist.setColumn(i, "cnfmsg", sHardNm);
- }
- }
- }
-
- frmf_clearParameter ("SPMMO90300_rtn");
- frmf_clearParameter ("SPMMO90300_hardcd");
- frmf_clearParameter ("SPMMO90300_hardnm");
- }
- function btn_bfjudg_onclick(obj:Button, e:ClickEventInfo)
- {
- // 처방사유, 심사팀 전달사항 저장 2014.11.12 엄영만
- var checkLength = ds_err1_prcpmsglist.rowcount;
- var resnCnt = 0;
- var sUserId = "";
-
- if ( checkLength > 0 ) {
- sUserId = sysf_getUserInfo("userid");
-
- ds_err1_prcpmsglist.addColumn("userid", "string");
-
- for ( var i = 0; i < checkLength; i++ ) {
- ds_err1_prcpmsglist.setColumn(i, "userid", sUserId);
- if ( "016" != ds_err1_prcpmsglist.getColumn(i, "cnfrmk" ) && "-" == ds_err1_prcpmsglist.getColumn(i, "cnfcd")) {
- resnCnt++;
- }
- }
- if (resnCnt > 0) {
- sysf_messageBox ( "처방사유(심사팀전달) '필수입력 항목' 중 사유가 선택되지 않은 처방이", "I010" );
- return;
- }
-
- dsf_setDefaultVal(ds_err1_prcpmsglist, "cnfcd:-,cnfmsg:-,cnfrmk:-");
-
- dsf_createDs("ds_temp_TXMMO21502");
- dsf_copyColInfo(ds_temp_TXMMO21502, ds_err1_prcpmsglist);
-
- if( utlf_isNull(ds_err1_prcpmsglist.getColumn(0, "msgdd")) ){
- ds_temp_TXMMO21502.clearData();
- }else{
- ds_temp_TXMMO21502.copyData(ds_err1_prcpmsglist);
- }
-
- var oParam = {};
- oParam.id = "TXMMO21502";
- oParam.service = "prcpmngtapp.PrcpMngt";
- oParam.method = "reqExeBfJudeMsgList";
- oParam.inds = "req=ds_temp_TXMMO21502";
- oParam.async = false;
- tranf_submit(oParam);
- } // End of 처방사유, 심사팀 전달사항 저장 2014.11.12 엄영만
- var prcpcd = "";
- var dcprcppkspec = ""; //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- var errrow = 0;
- var srcNodeListMainLength = opener.ds_main_prcplist.rowcount;
-
- opener.ds_main_prcplist.enableevent = false;
-
- for (var i = 0; i < ds_err1_prcpmsglist.rowcount ; i++) {
- prcpcd = ds_err1_prcpmsglist.getColumn(i, "prcpcd");
- errrow = ds_err1_prcpmsglist.getColumn(i, "errrow");
- for ( var j = 0; j < srcNodeListMainLength; j++ ) {
- if ( prcpcd == opener.ds_main_prcplist.getColumn(j, "prcpcd" ) && (j + 1 == errrow || errrow == 0)) {
- opener.ds_main_prcplist.setColumn(j, "drprcpetc9", "W");
-
- if( opener.ds_main_prcplist.getColumn(j, "status") == "-" ){ //만일 이미 임시저장해놓은 처방인 경우 저장할 처방이 없어서 블러킹되므로, status를 U로 바꿔준다 (2011.02.14 JJE)
- opener.ds_main_prcplist.setColumn(j, "status", "U");
- }
- }
- }
- }
-
- for (var i = 0; i < ds_err2_prcpmsglist.rowcount; i++) {
- prcpcd = ds_err2_prcpmsglist.getColumn(i, "prcpcd");
- prcppkspec = ds_err2_prcpmsglist.getColumn(i, "prcppkspec"); //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- errrow = ds_err2_prcpmsglist.getColumn(i, "errrow");
- for ( var j = 0; j < srcNodeListMainLength; j++ ) {
- if ( prcpcd == opener.ds_main_prcplist.getColumn(j, "prcpcd" ) && (j + 1 == errrow || errrow == 0)) {
- if( prcppkspec == "2" ) { //무조건 사전심사 항목은 선택에 무관하게 본인부담으로 변경. 단, 처방코드로 비교하고 있으므로.. 하나의 처방코드가 2개 이상의 룰에 해당되고 일부는 무조건비급여, 일부는 사전심사인 경우 각각의 처리가 안됨. (2010.12.24 전지은)
- opener.ds_main_prcplist.setColumn(j, "payflagcd", "2"); //일반
- } else {
- opener.ds_main_prcplist.setColumn(j, "payflagcd", "1"); //본인부담
- }
- opener.ds_main_prcplist.setColumn(j, "drprcpetc9", "Y");
-
- if( opener.ds_main_prcplist.getColumn(j, "status" ) == "-" ){ //만일 이미 임시저장해놓은 처방인 경우 저장할 처방이 없어서 블러킹되므로, status를 U로 바꿔준다 (2011.02.14 JJE)
- opener.ds_main_prcplist.setColumn(j, "status", "U");
- }
- }
- }
- }
-
- opener.ds_main_prcplist.enableevent = true;
-
- opener.frmf_setParameter("SPMMO21500_rntValue", "REQ");
- close();
- }
- function btn_chgpayflag_onclick(obj:Button, e:ClickEventInfo)
- {
- var prcpcd = "";
- var prcppkspec = ""; //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- var errrow = 0;
- var srcNodeListMainLength = opener.ds_main_prcplist.rowcount;
-
- opener.ds_main_prcplist.enableevent = false;
-
- for (var i = 0; i < ds_err1_prcpmsglist.rowcount; i++) {
- prcpcd = ds_err1_prcpmsglist.getColumn(i, "prcpcd");
- prcppkspec = ds_err1_prcpmsglist.getColumn(i, "prcppkspec"); //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- errrow = ds_err1_prcpmsglist.getColumn(i, "errrow");
-
- for ( var j = 0; j < srcNodeListMainLength; j++ ) {
- if ( prcpcd == opener.ds_main_prcplist.getColumn(j, "prcpcd") && (j + 1 == errrow || errrow == 0)){
- if( prcppkspec == "2" || prcppkspec == "W2" ) {
- opener.ds_main_prcplist.setColumn(j, "payflagcd", "2"); //일반
- } else {
- opener.ds_main_prcplist.setColumn(j, "payflagcd", "1"); //본인부담
- }
- opener.ds_main_prcplist.setColumn(j, "drprcpetc9", "Y");
- }
- }
- }
-
-
- for (var i = 0; i < ds_err2_prcpmsglist.rowcount; i++) {
- prcpcd = ds_err2_prcpmsglist.getColumn(i, "prcpcd");
- prcppkspec = ds_err2_prcpmsglist.getColumn(i, "prcppkspec"); //Y: 무조건비급여, 2:무조건일반, W:심사요구->비급여변경, W2:심사요구->일반변경
- errrow = ds_err2_prcpmsglist.getColumn(i, "errrow");
- for ( var j = 0; j < srcNodeListMainLength; j++ ) {
- if ( prcpcd == opener.ds_main_prcplist.getColumn(j, "prcpcd" ) && (j + 1 == errrow || errrow == 0) ) {
- //무조건 사전심사 항목은 선택에 무관하게 본인부담으로 변경. 단, 처방코드로 비교하고 있으므로.. 하나의 처방코드가 2개 이상의 룰에 해당되고 일부는 무조건비급여, 일부는 사전심사인 경우 각각의 처리가 안됨. (2010.12.24 전지은)
- if( prcppkspec == "2" || prcppkspec == "W2" ) {
- opener.ds_main_prcplist.setColumn(j, "payflagcd", "2"); //일반
- } else {
- opener.ds_main_prcplist.setColumn(j, "payflagcd", "1"); //본인부담
- }
- opener.ds_main_prcplist.setColumn(j, "drprcpetc9", "Y");
- }
- }
- }
-
- opener.ds_main_prcplist.enableevent = true;
-
- opener.frmf_setParameter("SPMMO21500_rntValue", "chgPayFlag");
- close();
- }
- function btn_close_onclick(obj:Button, e:ClickEventInfo)
- {
- opener.frmf_setParameter("SPMMO21500_rntValue", "PrcpChg");
- close();
- }
- ]]></Script>
- </Form>
- </FDL>
|