123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612 |
- <?xml version="1.0" encoding="utf-8"?>
- <Script type="xscript4.0"><![CDATA[
- var gToday = new Date();
- var gBaseyear = gToday.toFormatString("%Y");
- var gBasemonth = gToday.toFormatString("%m");
- var gBaseday = gToday.toFormatString("%d");
- var gCurrentdd = gBaseyear + gBasemonth + gBaseday;
- var gCurrentym = gBaseyear + gBasemonth;
- var gUserid = sysf_getUserId();
- var gClbsmast_refdata = "";
- var gClbsmast_sizedata = "";
- var offset; // paging 처리 변수
- var fv_nTotCount = 0; // 전체레코드수
- var lastPage = false; // 마지막페이지 체크 flag
- //초기화
- function lf_fInitialize()
- {
- var arrParam = [{dsNm: "ds_init_P0008", cdGrpId: "P0008"}
- ,{dsNm: "ds_init_P0010", cdGrpId: "P0010"}
- ,{dsNm: "ds_init_P0151", cdGrpId: "P0151"}
- ,{dsNm: "ds_init_P0291", cdGrpId: "P0291"}
- ,{dsNm: "ds_init_P0319", cdGrpId: "P0319"}
- ,{dsNm: "ds_init_P0155", cdGrpId: "P0155"}
- ,{dsNm: "ds_init_P0430", cdGrpId: "P0430"}]
-
- appf_getCodeList(arrParam);
-
- ds_temp_P0155.copyData(ds_init_P0155);
- ds_temp_P0151.copyData(ds_init_P0151);
-
- ds_init_P0291.insertRow(0);
- ds_init_P0010.insertRow(0);
- ds_init_P0155.insertRow(0);
- ds_init_P0319.insertRow(0);
-
- ds_init_P0008.insertRow(0);
- ds_init_P0008.insertRow(1);
- ds_init_P0008.setColumn(1, "cdid", "1");
- ds_init_P0008.setColumn(1, "cdnm", "보험+급여");
- ds_init_P0008.insertRow(2);
- ds_init_P0008.setColumn(2, "cdid", "2");
- ds_init_P0008.setColumn(2, "cdnm", "급여전체");
-
- var arrParam = new Array();
- arrParam = [{dsNm: "ds_init_P0201", cdGrpId: "P0201", showValue: false}
- ,{dsNm: "ds_init_PK032", cdGrpId: "PK032", showValue: true}];
- pamfGetCodeList(arrParam, false, "");
-
- ds_init_PK032.insertRow(0);
-
- var userid = sysf_getUserId();
-
- grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
-
- ds_hidden_item_all.setColumn(0, "clamym", gCurrentym);
- ds_hidden_item_all.setColumn(0, "ioflag", "I");
- ds_hidden_item_all.setColumn(0, "judgid", gUserid);
- ds_hidden_item_all.setColumn(0, "scrnid", "SMPID20200");
- ds_hidden_item_all.setColumn(0, "ordflag", "J");
- ds_hidden_item_all.setColumn(0, "clamtoym", "");
- var oParam = {};
- oParam.id = "TRPID20201";
- oParam.service = "aftjudgapp.InAftJudgTrgtMan";
- oParam.method = "reqGetInitComCd";
- oParam.inds = "req=ds_hidden_item_all";
- oParam.outds = "ds_init_judgrid=judgrid ds_init_suppkind=suppkind ds_init_orddrid=orddrid ds_init_orddrid2=orddrid2 ds_init_clamdept=clamdept ds_init_orddeptcd=orddeptcd ds_init_orddeptcd2=orddeptcd2 ds_init_item3=item3 ds_init_clamdg=clamdg ds_init_aftjudgerr=aftjudgerr ds_init_uuee=uuee";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20201";
- tranf_submit(oParam);
-
- var userid = sysf_getUserId();
- var usernm = sysf_getUserName();
- var frowCnt = ds_init_judgrid.findRow("judgrid",userid);
- if (frowCnt < 0) {
- var arow = ds_init_judgrid.addRow()
- ds_init_judgrid.setColumn(arow, "judgrid",userid);
- ds_init_judgrid.setColumn(arow, "judgrnm",usernm);
- }
-
- var patunitsrch1 = null;
-
- try
- {
- patunitsrch1 = args_ds_send.getColumn(0, "patunitsrch1");
- }
- catch(e)
- {
-
- }
- ds_send.setColumn(0, "patunitsrch1", patunitsrch1);
-
- if (!utlf_isNull(patunitsrch1))
- {
- lf_fSetPatUnitSrch1pidSrch(opener.ds_hidden_smpid20200_cond, opener.ds_hidden_smpid20200_rslt);
- }
-
- ds_send.setColumn(0, "clamym", gCurrentym);
- ds_send.setColumn(0, "ioflag", "I");
- ds_send.setColumn(0, "judgrid", gUserid);
-
- fn_cp_monthCal00();
-
- grp_biz.grp_sea.radio2.enable = true;
- ds_send.setColumn(0, "cutviewyn", "Y");
- ds_send.setColumn(0, "cutprcpsel", "1");
- ds_send.setColumn(0, "choicdsrch1", "4")
-
- appf_showValue(ds_init_P0155);
- grdf_sortNodeList(ds_init_P0155, "cdid", "asc" )
-
- appf_showValue(ds_init_P0151);
- appf_showValue(ds_init_PK032);
-
- ds_send.setColumn(0, "judgendyn", "ANB");
-
- ds_send.setColumn(0, "cmbtotordamt", "3");
- ds_send.setColumn(0, "cmbownbamt", "3");
-
- grp_biz.grp_sea.cmb_patmode.index = 0;
- ds_init_P0151.insertRow(0);
-
- grp_biz.cmb_srchcnt.index = 0;
- }
- //조회
- function fGetInAftJudgTrgtManList(srchMode)
- {
- grp_judgmemo.visible = false;
- ds_grid_grd_clbsmast.clearData();
-
- if (fCheckSrchCond(srchMode))
- {
- ds_send.setColumn(0, "lastclamym" , "");
- ds_send.setColumn(0, "lastclamdg" , "");
- ds_send.setColumn(0, "lastjudgno" , "");
- ds_send.setColumn(0, "lastpid" , "");
- ds_send.setColumn(0, "lastpidsn" , "");
- ds_send.setColumn(0, "lastordcd" , "");
- ds_send.setColumn(0, "lastclamkey", "");
- ds_send.setColumn(0, "lastedilnno", "");
- //ds_send.setColumn(0, "offset" , offset);
- dsf_setDefaultVal(ds_send, "ioflag:I,pagesize:100,selpiduseyn:N,srchcnt:500");
-
- var oParam = {};
- oParam.id = "TRPID20202";
- oParam.service = "aftjudgapp.InAftJudgTrgtMan";
- oParam.method = "reqGetInAftJudgTrgtManList";
- oParam.inds = "req=ds_send";
- oParam.outds = "ds_grid_grd_clbsmast=clbs";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20202";
- tranf_submit(oParam);
-
- lf_fSetSrchJudgTrgtMan();
- if (!utlf_isNull(frmf_getOpenerUID()))
- {
- //opener.ds_tmpmain_tmpmaininfo.clearSelect();
- }
- }
- }
- //조회조건검사
- function fCheckSrchCond(srchMode)
- {
- if (srchMode == "pidSrch")
- {
- var patunitsrch1 = ds_send.getColumn(0, "patunitsrch1");
- var patmode = ds_send.getColumn(0, "patmode");
-
- ds_send.setColumn(0, "patunitsrch1", patunitsrch1);
-
- if (utlf_isNull(patunitsrch1))
- {
- ds_send.setColumn(0, "patunitsrch2", "");
- }
- else if (patmode == "1")
- {
- ds_send.setColumn(0, "patunitsrch2", "pidSrch");
- }
- else
- {
- if (String(patunitsrch1).length > 1)
- {
- ds_send.setColumn(0, "patunitsrch2", "nmSrch");
- }
- else
- {
- sysf_messageBox("환자단위조회시 검색할 환자이름은 2글자 이상", "C001");
- grp_biz.grp_sea.ipt_patunitsrch.setFocus();
-
- ds_send.setColumn(0, "patunitsrch2", "");
-
- return false;
- }
- }
- }
- //명세서별로 조회하는 경우
- else if (srchMode == "docuSrch")
- {
- var docuseqno1 = ds_send.getColumn(0, "docuseqno1");
- var docuseqno2 = ds_send.getColumn(0, "docuseqno2");
-
- if (!utlf_isNull(docuseqno1) && !utlf_isNull(docuseqno2))
- {
- if (docuseqno1 > docuseqno2)
- {
- sysf_messageBox("명번호 검색 시작번호가 끝번호 보다 클 수", "I004"); ///명번호 검색 시작번호가 끝번호 보다 클 수 없습니다.
- return false;
- }
- model.setValue("/root/send/item1/patunitsrch2", "docuSrch");
- return true;
- }
- else
- {
- sysf_messageBox("명번호를", "C001"); ///명번호를 입력하십시오!
- return false;
- }
- }
- else
- {
- ds_send.setColumn(0, "patunitsrch2", "");
-
- var docuseqno1 = grp_biz.grp_sea.ipt_docuseqno1.value;
- var docuseqno2 = grp_biz.grp_sea.ipt_docuseqno2.value;
-
- if (!utlf_isNull(docuseqno1) && !utlf_isNull(docuseqno2))
- {
- if (docuseqno1 > docuseqno2)
- {
- sysf_messageBox("명번호 검색 시작번호가 끝번호 보다 클 수", "I004"); ///명번호 검색 시작번호가 끝번호 보다 클 수 없습니다.
- return false;
- }
- }
-
- var totordamt = grp_biz.grp_sea.ipt_totordamt.value;
-
- if (totordamt)
- {
- if (totordamt > 2147483647)
- {
- sysf_messageBox("입력 가능한 총진료비 범위를", "E003"); ///입력 가능한 총진료비 범위를 초과하였습니다.
- return false;
- }
- }
-
- var ownbamt = grp_biz.grp_sea.ipt_ownbamt.value;
-
- if (ownbamt)
- {
- if (ownbamt > 2147483647)
- {
- sysf_messageBox("입력 가능한 본인부담금 범위를", "E003"); ///입력 가능한 본인부담금 범위를 초과하였습니다.
- return false;
- }
- }
-
- var choicdsrch2 = grp_biz.grp_sea.ipt_choicdsrch.value;
-
- if(!utlf_isNull(choicdsrch2))
- {
- var choicdsrch1 = ds_send.getColumn(0, "choicdsrch1");
-
- if (utlf_isNull(choicdsrch1))
- {
- sysf_messageBox("선별심사 조건을 명칭, 수가, EDI 중에", "C002"); ///선별심사 조건을 명칭, 수가, EDI 중에 선택하십시오.
- return false;
- }
- else if (choicdsrch1 == "1")
- {
- for (var i = 0; i < choicdsrch2.length; i++)
- {
- if (choicdsrch2.charCodeAt(i) > 255)
- {
- ds_send.setColumn(0, "choicdsrch1", "2");
- }
- }
- }
- else
- {
- ds_send.setColumn(0, "choicdsrch2", choicdsrch2.toUpperCase());
- }
- }
- }
- return true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 청구차수를 구하기 위한 청구년월 달력 이벤트
- ****************************************************************************************/
- function fn_cp_monthCal00(r)
- {
- // 월달력으로 구현
- var clamym = grp_biz.grp_sea.cp_monthCal01.getData();
- if (r == "cp_monthCal01") {
- var clamtoym = clamym;
- } else {
- var clamtoym = clamym;
- }
- ds_send.setColumn(0,"clamym", clamym);
- ds_send.setColumn(0,"clamtoym", clamtoym);
-
- var sInDsName = dsf_createDsRow("ds_search"
- , [{col: "clamym", val: clamym}
- , {col: "clamtoym", val: clamtoym}
- , {col: "ioflag", val: "I"}
- //, {col: "insukind", val: grp_biz.grp_sea.cmb_insukind.value}
- ]);
- var oParam = {};
- oParam.id = "TRPID20407";
- oParam.service = "aftjudgapp.InAftJudgTrgtMan";
- oParam.method = "reqGetClamdg";
- oParam.inds = "req="+ sInDsName;
- oParam.outds = "ds_init_clamdg=clamdg";
- oParam.async = true;
- oParam.callback = "cf_TRPID20407";
- tranf_submit(oParam);
- }
- function cf_TRPID20407(sSvcId, nErrorCode, sErrorMsg) {
- if(nErrorCode < 0) return;
-
- frmf_addComboItem( "grp_biz.grp_sea.cmb_clamdg", "전체", "");
-
- if (ds_init_clamdg.findRowExpr("clamdgcd==1") > 0) {
- ds_send.setColumn(0, "clamdg", "1");
- } else {
- grp_biz.grp_sea.cmb_clamdg.index = 0;
- }
- }
- //
- // function fn_cp_monthCal00()
- // {
- // var month = grp_biz.grp_sea.cp_monthCal01.getData();
- // var valueChk = grp_biz.grp_sea.cmb_clamflagcd.value;
- //
- // if(utlf_isNull(valueChk))
- // {
- // valueChk = "-";
- // }
- // ds_send.setColumn(0,"clamym", month);
- // dsf_createDsRow("ds_search" , [{col: "clamflag" , val: valueChk}
- // , {col: "month" , val: month}]);
- //
- //
- // var oParam = {};
- // oParam.id = "TRPIB01705";
- // oParam.service = "insubasecdmngtapp.JudgDivStat";
- // oParam.method = "reqFromClamDegree";
- // oParam.inds = "req=ds_search"
- // oParam.outds = "ds_init_clamdg=degree";
- // oParam.async = false;
- // //oParam.callback = "cf_TRPIB01705";
- //
- // tranf_submit(oParam);
- //
- // ds_init_clamdg.deleteRow(0);
- //
- // grp_biz.grp_sea.cmb_clamdg.index = 0;
- // }
- // 수가명칭조회
- function fGetSnglcalcscorcd()
- {
- var ordfromdd = ds_send.getColumn(0, "insukindcd");
-
- if (ordfromdd)
- {
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con1_dd", ordfromdd);
- }
-
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con2_gsflag", "S");
-
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con3_search1", "hngnm");
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con4_search2", "");
-
- var insukindcd = ds_send.getColumn(0, "insukindcd");
-
- if (insukindcd == "11")
- {
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con5_insu", "insu");
- }
-
- else if (insukindcd == "21" || insukindcd == "22")
- {
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con5_insu", "proc");
- }
- else if (insukindcd == "31")
- {
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con5_insu", "autm");
- }
- else if (insukindcd == "41")
- {
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con5_insu", "indus");
- }
- else
- {
- ds_hidden_smpic00200_judgsrch.setColumn(0, "con5_insu", "insu");
- }
- var objArg = new Object();
- objArg.arg_ds_temp = ds_hidden_smpic00200_judgsrch;
-
- frmf_modal("SMPIC00200" , "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- if(ds_hidden_smpic00200_rslt_mech.getColumn(0, "ordinptflag") != "A")
- {
- sysf_messageBox("처방이 불가한 코드", "E008"); ///처방이 불가한 코드입니다.
- return;
- }
- if(ds_hidden_smpic00200_rslt_mech.getColumn(0, "grupsnglflag") != "S")
- {
- ds_send.setColumn(0, "choicdsrch2", ds_hidden_smpic00200_rslt_mech.getColumn(0, "calcscorcd"));
- }
- else
- {
- ds_send.setColumn(0, "choicdsrch2", ds_hidden_smpic00200_rslt_picmmech.getColumn(0, "picmmech_calcscorcd"));
- }
-
- ds_send.setColumn(0, "choicdsrch1", "3");
- }
- function fSetJudgEndYN()
- {
- var judgendyn = ds_hidden_item1.getColumn(0, "judgendyn");
-
- if(judgendyn == "B")
- {
- if(ds_grid_grd_clbsmast.rowcount > 0)
- {
- for (var i = 0; i < ds_grid_grd_clbsmast.rowcount; i++)
- {
- var clamym = ds_grid_grd_clbsmast.getColumn(i, "clamym");
- var clamdg = ds_grid_grd_clbsmast.getColumn(i, "clamdg");
- var pid = ds_grid_grd_clbsmast.getColumn(i, "pid");
- var pidsn = ds_grid_grd_clbsmast.getColumn(i, "pidsn");
-
- if(ds_grid_grd_clbsmast.getColumn(i, "judgendyn") == "B")
- {
- var cnt = ds_send_list1_endclbs.addRow();
-
- ds_send_list1_endclbs.setColumn(cnt, "clamym", clamym);
- ds_send_list1_endclbs.setColumn(cnt, "clamdg", clamdg);
- ds_send_list1_endclbs.setColumn(cnt, "pid", pid);
- ds_send_list1_endclbs.setColumn(cnt, "pidsn", pidsn);
- ds_send_list1_endclbs.setColumn(cnt, "judgendyn", "A");
- }
- }
- if ( ds_send_list1_endclbs.rowcount > 0 )
- {
- var ans = sysf_messageBox("조회된 모든 심사중 상태 " + ds_send_list1_endclbs.rowcount + "건을 해제", "S001");
-
- if (ans == 6)
- {
- var oParam = {};
- oParam.id = "TXPID20302";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqSetPidmclbsJudgEndYNAll";
- oParam.inds = "endclbs=ds_send_list1_endclbs";
- oParam.outds = "";
- oParam.async = false;
- //oParam.callback = "cf_TXPID20302";
- tranf_submit(oParam);
- if(String(ds_send.getColumn(0, "patunitsrch1")).length > 1)
- {
- fGetInAftJudgTrgtManList("pidSrch");
- }
- else
- {
- fGetInAftJudgTrgtManList();
- }
-
- }
- }
- }
- else
- {
- sysf_messageBox("심사중 해제 할 대상자를 조회", "I008");
- }
- return;
- }
- else
- {
- var rows = grdf_getSelectedRows(grp_biz.grd_clbsmast);
-
- if (rows.length == 0)
- {
- sysf_messageBox("심사중 해제를 할 대상자를", "C002");
- return;
- }
-
- for (var i = 0; i < rows.length; i++)
- {
- var row = rows[i];
-
- var sel_clamym = ds_grid_grd_clbsmast.getColumn(row, "clamym");
- var sel_clamdg = ds_grid_grd_clbsmast.getColumn(row, "clamdg");
- var sel_pid = ds_grid_grd_clbsmast.getColumn(row, "pid");
- var sel_pidsn = ds_grid_grd_clbsmast.getColumn(row, "pidsn");
- var sel_judgendyn = ds_grid_grd_clbsmast.getColumn(row, "judgendyn");
-
- if (sel_judgendyn == "B")
- {
- var cnt = ds_send_list1_endclbs.addRow();
-
- ds_send_list1_endclbs.setColumn(cnt, "clamym", sel_clamym);
- ds_send_list1_endclbs.setColumn(cnt, "clamdg", sel_clamdg);
- ds_send_list1_endclbs.setColumn(cnt, "pid", sel_pid);
- ds_send_list1_endclbs.setColumn(cnt, "pidsn", sel_pidsn);
- ds_send_list1_endclbs.setColumn(cnt, "judgendyn", "A");
- }
- }
- if (ds_send_list1_endclbs.rowcount > 0)
- {
- var ans = sysf_messageBox(cnt + "건을 심사중 해제", "S001");
-
- if (ans == 6)
- {
- var oParam = {};
- oParam.id = "TXPID20302";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqSetPidmclbsJudgEndYNAll";
- oParam.inds = "endclbs=ds_send_list1_endclbs";
- oParam.outds = "";
- oParam.async = false;
- //oParam.callback = "cf_TXPID20302";
- tranf_submit(oParam);
- fGetInAftJudgTrgtManList();
- }
- }
- else
- {
- sysf_messageBox("선택된 대상자 중 심사중 상태의 대상자가", "I004");
- }
- }
- }
- function fInitSrchData()
- {
- grp_biz.grp_sea.cmb_clamdeptcd.enable = true;
- grp_biz.grp_sea.cmb_orddrid.enable = false;
-
- ds_send.setColumn(0, "clamym", gCurrentym);
- ds_send.setColumn(0, "clamdg", "");
- ds_hidden_clbs.setColumn(0, "basedd", gCurrentdd);
-
- ds_send.setColumn(0, "cmbtotordamt", "3");
- ds_send.setColumn(0, "cmbownbamt", "3");
- ds_send.setColumn(0, "choicdsrch1", "4");
- ds_send.setColumn(0, "patmode", "1");
- ds_send.setColumn(0, "ioflag", "I");
-
- grp_judgmemo.visible = false;
-
- ds_grid_grd_clbsmast.clearData();
- }
- function fGetKDrgOpenPopup()
- {
- var srchmode = ds_hidden_clbs.getColumn(0, "srchmode");
-
- if (srchmode == "specclbs")
- {
- var cur_row = ds_grid_grd_clbsmast.rowposition;
- }
- else
- {
- var cur_row = ds_grid_grd_clbsmast.rowposition;
- }
-
- var pid = ds_grid_grd_clbsmast.getColumn(cur_row, "pid");
- var pidsn = ds_grid_grd_clbsmast.getColumn(cur_row, "pidsn");
- var clamdg = ds_grid_grd_clbsmast.getColumn(cur_row, "clamdg");
- var clamym = ds_grid_grd_clbsmast.getColumn(cur_row, "clamym");
- var ordrsltcd = ds_grid_grd_clbsmast.getColumn(cur_row, "ordrsltcd");
-
- frmf_setParameter("pid", pid);
- frmf_setParameter("pidsn", pidsn);
- frmf_setParameter("clamdg", clamdg);
- frmf_setParameter("clamym", clamym);
- frmf_setParameter("ordrsltcd", ordrsltcd);
-
- frmf_open("SPPID31000", "SPPID31000", "", "", "", "", "", "", "", "", "", "", "M");
- }
- function fGetEmrInformation()
- {
- var row = ds_grid_grd_clbsmast.rowposition;
- fOpenSMMMO02500_1(ds_grid_grd_clbsmast.getColumn(row, "pid"));
- }
- ]]></Script>
|