123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565 |
- <?xml version="1.0" encoding="utf-8"?>
- <Script type="xscript4.0"><![CDATA[/***************************************************************************************
- * System Name : DBS
- * Job Name :
- * File Name : SPMMR07000.xjs
- * Creator : jaewon.choe
- * Make Date : 2014-07-31
- *
- * Description :
- *---------------------------------------------------------------------------------------
- * Modify Date Modifier Modify Description
- *---------------------------------------------------------------------------------------
- * 2014-07-31 DBS Converting Program(TF->XP)
- *
- *---------------------------------------------------------------------------------------
- ****************************************************************************************/
- function lf_getGridObj(){
- return parent.ds_medireclist;
- }
- /**
- * @desc : 메인화면 로딩
- * @id :
- * @event : onclick
- * @return : void
- * @authur : 박종훈
- */
- function fReadyForm()
- {
- fReadyFormInitData();
- grp_sea.cp_multiCal00.setDiffdt(12);
- //grp_sea.cp_multiCal00.ufn_addDateReq("today"); // default
-
- var defltdeptcd = sysf_getUserInfo("dutplcecd");
- var defltdeptcd_idx = ds_deptCodeList.findRow("deptcd", defltdeptcd);
- var defltdeptnm = "";
-
- if( defltdeptcd_idx != -1 ) defltdptcd = ds_deptCodeList.getColumn( defltdeptcd_idx, "depthngnm");
-
- if (defltdeptcd == "2280000000" || defltdeptnm == "")
- {
- defltdeptcd = "ALL";
- }
-
- grp_sea.cbo_deptlist.value = defltdeptcd;
-
- div_reccnts.fInitPage(parseInt(div_reccnts.position.width), parseInt(div_reccnts.position.height));
- div_reccnts1.fInitPage(parseInt(div_reccnts1.position.width), parseInt(div_reccnts1.position.height));
-
- //파라이터 처리(등록번호, 기록순번)
- var parampid = opener.frmf_getParameter("SPMMR07000_param_pid") ; //opener.window.javascript.getParameter("SPMMR07000_param_pid");
- var paramformrecseq = opener.frmf_getParameter("SPMMR07000_param_formrecseq"); //opener.window.javascript.getParameter("SPMMR07000_param_formrecseq");
- var srcformcd = opener.frmf_getParameter("SPMMR07000_param_srcformcd"); //opener.window.javascript.getParameter("SPMMR07000_param_srcformcd");
- var lastyn = opener.frmf_getParameter("SPMMR07000_param_lastyn"); //opener.window.javascript.getParameter("SPMMR07000_param_lastyn");
-
-
- ipt_srcformcd.value = utlf_isNull(srcformcd) ? "" : srcformcd;
- bol_1.value = utlf_isNull(lastyn) ? "N" : lastyn;
-
- if(!utlf_isNull(paramformrecseq))
- {
- div_reccnts.fClear();
- div_reccnts1.fClear();
-
- ds_reqmedireclist.clearData();
- ds_reqmedireclist.addRow();
-
- ds_reqmedireclist.setColumn(0, "pid", "");
- ds_reqmedireclist.setColumn(0, "formrecseq", paramformrecseq);
- ds_reqmedireclist.setColumn(0, "formnm", "-");
- var oParam = {};
- oParam.id = "TRMMR07001";
- oParam.service = "medirecapp.ComnMediRec";
- oParam.method = "reqGetPatRecMastList";
- oParam.inds = "req=" + "ds_reqmedireclist";
- oParam.outds = "ds_medireclist" + "=medireclist" + " ds_visitdept" + "=visitdept";
- oParam.async = true;
- oParam.callback = "cf_TRMMR07001"
- tranf_submit(oParam);
-
- }
- else if (!utlf_isNull(parampid))
- {
- grp_sea.ipt_pid.value = parampid;
- fPidKeyPress(); //등록번호로 환자 정보조회
- fRefMediRecList();
- }
- else
- {
- var pamInfoCvs = sysf_getGlobalVariable("paminfo"); //상단정보가 있을 경우는 검색
- if(!utlf_isNull(pamInfoCvs) && !utlf_isNull(pamInfoCvs))
- { //cvs가 null이 아닌 경우에만 처리함.
- ds_result_patinfolist.clearData();
- dsf_setCSVToDs("ds_result_patinfolist", pamInfoCvs);
- var pid = ds_result_patinfolist.getColumn(0, "pid");
-
- grp_sea.ipt_pid.value = pid;
- fPidKeyPress(); //등록번호로 환자 정보조회
- fRefMediRecList();
- }
- }
- }
- function cf_TRMMR07001(sSvcId, nErrorCode, sErrorMsg){
- if(nErrorCode > -1) {
-
- var cnt = ds_medireclist.rowcount;
-
- //sysf_trace( "***** ds_medireclist.rowcount() : " + cnt );
-
- if (cnt > 0)
- {
- grp_sea.cbo_deptlist.value = "ALL";
- var sPid = ds_medireclist.getColumn(0, "pid");
- grp_sea.ipt_pid.value = sPid;
- fPidKeyPress(); //등록번호로 환자 정보조회
- }
- }
- }
- /**
- * @desc : 기록 목록 조회
- * @id :
- * @event :
- * @return : void
- * @authur : 박종훈
- */
- function fRefMediRecList()
- {
- if( utlf_isNull(ds_patinfolist.getColumn(0, "pid")) )
- {
- sysf_messageBox("환자정보가 존재하지 않아 진행 ", "E001");
- return;
- }
-
- div_reccnts.fClear();
- div_reccnts1.fClear();
-
-
- ds_medireclist.clearData();
- ds_rechistlist.clearData();
-
- var fromTo = new Array(2);
- fromTo = grp_sea.cp_multiCal00.getData();
-
- ds_reqmedireclist.clearData();
- ds_reqmedireclist.addRow();
- ds_reqmedireclist.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
- ds_reqmedireclist.setColumn(0, "recfromdt", fromTo[0] );
- ds_reqmedireclist.setColumn(0, "rectodt", fromTo[1]);
- ds_reqmedireclist.setColumn(0, "formrecdeptcd", grp_sea.cbo_deptlist.value);
- ds_reqmedireclist.setColumn(0, "formrecseq", "0");
- ds_reqmedireclist.setColumn(0, "srcformcd", ipt_srcformcd.value);
-
- var formnm = grp_sea.ipt_formnm.value;
- //if (formnm == "")
- if( utlf_isNull(formnm) )
- {
- formnm = "-";
- }
- ds_reqmedireclist.setColumn(0, "formnm", formnm);
-
- //sysf_trace(ds_reqmedireclist.saveXML());
-
- var oParam = {};
- oParam.id = "TRMMR07001";
- oParam.service = "medirecapp.ComnMediRec";
- oParam.method = "reqGetPatRecMastList";
- oParam.inds = "req=" + "ds_reqmedireclist";
- oParam.outds = "ds_medireclist" + "=medireclist" + " ds_visitdept" + "=visitdept";
- oParam.async = false;
-
- tranf_submit(oParam);
-
-
- var srcformcd = ipt_srcformcd.value;
-
- //sysf_trace("srcformcd : " + srcformcd);
-
- if ( srcformcd != null )
- {
- fGetRecHist(ds_medireclist.getColumn(0, "formrecseq"));
- fGetRecCntsHist(ds_rechistlist.getColumn(0, "rechistseq"), ds_rechistlist.getColumn(0, "rowcolor"));
- }
-
- cnt = 0;
- var cnt = ds_visitdept.rowcount;
- //sysf_trace(cnt);
- if (cnt > 0)
- {
- var orddd = ds_reqmedireclist.getColumn(0, "orddd");
- var cretno = ds_reqmedireclist.getColumn(0, "cretno");
- var cnt2 = ds_medireclist.rowcount;
-
- if (cnt2 == 0)
- {
-
- for (var i = 0; i < cnt; i++)
- {
-
- ds_medireclist.setColumn(i, "formrecdeptcd", ds_visitdept.getColumn(i, "orddeptcd"));
- ds_medireclist.setColumn(i, "formrecdeptnm", ds_visitdept.getColumn(i, "orddeptnm"));
-
- ds_medireclist.setColumn(i, "formnminfo", "호출과 미작성");
- ds_medireclist.setColumn(i, "orddd", orddd);
- ds_medireclist.setColumn(i, "cretno", cretno);
- }
- }
- else
- {
-
- var cond ="orddd=='#orddd#' and cretno=='#cretno#' and formrecdeptcd=='#deptcd#'";
- cond = cond.replace("#orddd#", orddd);
- cond = cond.replace("#cretno#", cretno);
-
- var stmt;
-
- for ( var i = 0; i < cnt; i++)
- {
- stmt = cond.replace("#deptcd#", ds_visitdept.getColumn(i, "orddeptcd"));
- if( ds_medireclist.findRowExpr(stmt) == -1){
- ds_medireclist.insertRow(0);
-
- ds_medireclist.setColumn(0, "formrecdeptcd", ds_visitdept.getColumn(i, "orddeptcd"));
- ds_medireclist.setColumn(0, "formrecdeptnm", ds_visitdept.getColumn(i, "orddeptnm"));
-
- ds_medireclist.setColumn(0, "formnminfo", "호출과 미작성");
- ds_medireclist.setColumn(0, "orddd", orddd);
- ds_medireclist.setColumn(0, "cretno", cretno);
-
- }
- }
- }
-
- for (var i = 0; i < ds_medireclist.rowcount; i++)
- {
- if( ds_medireclist.getColumn(i, "orddd") == orddd &&
- ds_medireclist.getColumn(i, "cretno") == cretno )
-
- grd_medireclist.setCellProperty("body", i, "color", "blue");
-
- }
- }
- if (ds_medireclist.rowcount > 0)
- {
- ds_medireclist.rowposition = 0;
- grd_medireclist.setFocus();
- }
- }
- /**
- * @desc : 기록 이력 조회
- * @id :
- * @event :
- * @return : void
- * @authur : 박종훈
- */
- function fGetRecHist(formrecseq)
- {
-
- div_reccnts.fClear();
- div_reccnts1.fClear();
-
- ds_reqrechistlist.clearData();
- ds_reqrechistlist.addRow();
-
- ds_reqrechistlist.setColumn(0, "formrecseq", formrecseq);
- ds_reqrechistlist.setColumn(0, "lastyn", bol_1.value );
-
- //trace(ds_reqrechistlist.saveXML());
-
- var oParam = {};
- oParam.id = "TRMMR07002";
- oParam.service = "medirecapp.ComnMediRec";
- oParam.method = "reqGetRecHistList";
- oParam.inds = "req=" + "ds_reqrechistlist";
- oParam.outds = "ds_rechistlist" + "=rechistlist";
- oParam.async = false;
-
- tranf_submit(oParam);
-
- //trace(ds_rechistlist.saveXML());
- }
- /**
- * @desc : 기록 목록 내용 조회
- * @id :
- * @event :
- * @return : void
- * @authur : 박종훈
- */
- function fGetRecCntsHist(rechistseq, rowcolor)
- {
-
- div_reccnts.fClear();
- div_reccnts.fRefRecViewByHistSeq(rechistseq);
-
- }
- /**
- * @group :
- * @ver : 2009.03.25
- * @by : jonghun
- * @---------------------------------------------------
- * @type : function
- * @access : private
- * @desc : 마우스 오른쪽 버튼 이벤트
- * @param :
- * @return :
- * @---------------------------------------------------
- */
- function fMouseRight(e)
- {
- var loginuserid = sysf_getUserId();
-
- // if (loginuserid == "97055522" || loginuserid == "99031128")
- // {
- pmn_popupMenu.trackPopup(e.screenX,e.screenY);
- // }
- }
- /**
- * @desc : 진료기록 리스트 조회조건의 진료과 조회 및 서식즐겨찾기 조회
- * @id :
- * @event :
- * @return : void
- * @authur : 박종훈
- */
- function fReadyFormInitData()
- {
- lf_mmbfGetDeptCodeComboList(ds_deptCodeList, "A");
- frmf_addComboItem("grp_sea.cbo_deptlist", "전체", "ALL");
- }
- /**
- * @group :
- * @ver : 2009.03.25
- * @by : jonghun
- * @---------------------------------------------------
- * @type : function
- * @access : private
- * @desc : 마우스 오른쪽 버튼 이벤트
- * @param :
- * @return :
- * @---------------------------------------------------
- */
- function fSetReplaceImg(e)
- {
- var rechistseq = ds_rechistlist.getColumn( e.row, "rechistseq");
-
- var objColInfo = new Array();
- objColInfo.push({col: "rechistseq", val: rechistseq});
- dsf_createDsRow("ds_reqrechistseq", objColInfo);
-
- objColInfo = new Array();
- objColInfo.push([{col: "updtcnt", type:"string", size:256}, {col: "updtcnfmcnt", type:"string", size:256}]);
- dsf_createDs("ds_cnfmcnt", objColInfo);
-
- var oParam = {};
- oParam.id = "TXMMR07001";
- oParam.service = "medirecapp.ComnMediRec";
- oParam.method = "reqExeRecImgeReplace";
- oParam.inds = "req=" + "ds_reqrechistseq";
- oParam.outds = "ds_cnfmcnt" + "=cnfmcnt";
- oParam.async = false;
- oParam.callback = "cf_TXMMR07001"
-
- tranf_submit(oParam);
-
- }
- function cf_TRPMC02500(sSvcId, nErrorCode, sErrorMsg){
- if(nErrorCode > -1) {
-
- ds_cnfmcnt.updateColID("updtcnt", "updtdd");
- ds_cnfmcnt.updateColID("updtcnfmcnt", "updttm");
-
- var cnt = ds_cnfmcnt.getColumn(0, "updtdd");
- cnt = parseInt(cnt);
-
- if (cnt > 0)
- {
- sysf_messageBox("수정", "I001");
- }
-
- /* Temp로 사용한 Dataset을 삭제 */
- var oRemoveDs = this.removeChild("ds_cnfmcnt");
- oRemoveDs = null;
-
- oRemoveDs = this.removeChild("ds_reqrechistseq");
- oRemoveDs = null;
-
- }
- }
- /**
- * @desc : 환자이름 정보조회
- * @id :
- * @event : onkeypress
- * @return : void
- * @authur : 박종훈
- */
- function fPnmKeyPress()
- {
- ds_source.setColumn(0, "srchcond", "2");
- ds_source.setColumn(0, "hngnm", grp_sea.ipt_hngnm.value);
-
- var e = new ClickEventInfo;
- frmf_inputEnterKey("grp_sea.btn_search", "onclick", e);
-
- }
- /**
- * @desc : 환자정보조회 팝업
- * @id :
- * @event : DOMActivate
- * @return : void
- * @authur : 박종훈
- */
- function fPopPtinfo()
- {
-
- var objArgs = new Object();
- objArgs.srchcond = utlf_isNull(ds_source.getColumnInfo("srchcond")) ? "" : ds_source.getColumn(0, "srchcond");
- objArgs.pid = utlf_isNull(ds_source.getColumnInfo("pid")) ? "" : ds_source.getColumn(0, "pid");
- objArgs.hngnm = utlf_isNull(ds_source.getColumnInfo("hngnm")) ? "" : ds_source.getColumn(0, "hngnm");
- objArgs.rrgstno1 = utlf_isNull(ds_source.getColumnInfo("rrgstno1")) ? "" : ds_source.getColumn(0, "rrgstno1");
- objArgs.rrgstno2 = utlf_isNull(ds_source.getColumnInfo("rrgstno2")) ? "" : ds_source.getColumn(0, "rrgstno2");
-
- frmf_modal("SPPMC02500", "SPPMC02500", objArgs, null, null, null, null, null, null, null, null, null, "M");
-
- /*
- modal("SPPMC02500", "1","150", "150", "SPPMC02500", "/root/source", "/root/send");
- model.resetInstanceNode("/root/source");
- */
- }
- /**
- * @desc : 환자번호 정보조회
- * @id :
- * @event : onkeypress
- * @return : void
- * @authur : 박종훈(튜닝)
- */
- function fPidKeyPress()
- {
- //grp_sea.ipt_pid.value = "3208769";
-
- grp_sea.ipt_pid.updateToDataset();
-
- ds_source.clearData();
- var nRow = ds_source.addRow();
-
- ds_source.setColumn(nRow, "srchcond", "1");
- ds_source.setColumn(nRow, "pid", grp_sea.ipt_pid.value);
-
- //환자등록번호 체크
- if(grp_sea.ipt_pid.value.length >= 1 )
- {
-
- ds_result_patinfolist.clearData();
- ds_result_patinfolist.addRow();
-
-
- var oParam = {};
- oParam.id = "TRPMC02500";
- oParam.service = "patinfomngtapp.PatBaseInfo";
- oParam.method = "reqGetPatInfo";
- oParam.inds = "req=" + "ds_source";
- oParam.outds = "ds_result_patinfolist" + "=patinfolist";
- oParam.async = false;
- oParam.callback = "cf_TRPMC02500"
- tranf_submit(oParam);
-
-
- }
- else
- {
- sysf_messageBox("등록번호를 정확히", "C001");
- }
- }
- function cf_TRPMC02500(sSvcId, nErrorCode, sErrorMsg){
- if(nErrorCode > -1) {
-
- //fSearch는 인적사항 화면을 임포트 해간 화면에서 구현해 주어야 하는 함수이다.
- if( ds_result_patinfolist.rowcount > 0 ){
-
- ds_patinfolist.copyData(ds_result_patinfolist);
-
- var agesex = ds_patinfolist.getColumn(0, "sex") + ds_patinfolist.getColumn(0, "age");
-
- var objColInfo = new Array();
- objColInfo.push({col: "agesex", val: agesex});
- dsf_createDsRow("ds_patinfo_agesex", objColInfo);
-
- objColInfo = new Array();
- objColInfo.push({col: "popupendflag", val: "ok"});
- dsf_createDsRow("ds_main_popupendflag", objColInfo);
-
- var oprnerId = opener.frmf_getScreenID();
- if(oprnerId == "SPMRC03200")
- {
- var keyparam = ds_patinfolist.getColumn(0, "pid") + "▦" + ds_patinfolist.getColumn(0, "hngnm") + "▦" + ds_patinfolist.getColumn(0, "age") + "▦";
- opener.fEnterPatinfo(keyparam);
-
- }
- }
- else
- {
- ds_patinfolist.clearData();
- ds_patinfolist.addRow();
- sysf_messageBox("없는 등록번호 입니다.", "E999", "");
- }
-
- }
- }
- /**
- * @desc : 미리보기 조회
- * @id :
- * @event :
- * @return : void
- * @authur : 박종훈
- */
- function fShowMediRecCnt(formrecseq)
- {
- // 상단정보 pid 확인 임시로 ds_paminfo 상단 내용 셋팅 후 수정 필요!
- if( utlf_isNull(ds_paminfo.getColumnInfo("pid")) ) return;
-
- var cond = new COMN_CONT_RECCNTS();
- cond.pid = ds_paminfo.getColumn(0, "pid");
- cond.formrecdeptcd = ds_reqmedireclist.getColumn(0, "formrecdeptcd");
- cond.chosflag = ds_reqmedireclist.getColumn(0, "chosflag");
- cond.reclistlength = ds_medireclist.rowcount;
- if (utlf_isNull(formrecseq))
- {
- cond.recfromdt = ds_reqmedireclist.getColumn(0, "recfromdt");
- cond.rectodt = ds_reqmedireclist.getColumn(0, "rectodt");
- }
- else
- {
- cond.recfromdt = "";
- cond.rectodt = "";
- }
- cond.formrecseq = formrecseq;
- ivw_reccnts.fRefMediRecCnts(cond);
- // swt_left.selectedIndex = 1;
- // button15.selected = true;
- }
- ]]></Script>
|