123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216 |
- <?xml version="1.0" encoding="utf-8"?>
- <Script type="xscript4.0"><![CDATA[////////////////////////////////////////////////////
- /**
- - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
- 의료정보 - 사본유의환자관리 ( SPMRC03300_사본유의환자관리.xrw - JScript )
- - Version :
- 1) : Ver.1.00.01
- - Author : 이창록
-
- - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
- **/
- /**
- * @ver :
- * @desc : 화면초기화
- * @ : 2008-12-29
- * @by : 이창록
- * @ :
- * @param :
- * @return :
- * @---------------------------------------------------
- */
- function fInit()
- {
- ds_main_limresinfo_limreslist.clearData();
- fLimResSearch();
- }
- /**
- * @ver :
- * @desc : 유의 환자 등록
- * @ : 2008-12-29
- * @by : 이창록
- * @param :
- * @return :
- * @---------------------------------------------------
- */
- function fLimSave(flag)
- {
- if(flag =="i"){
-
- var limresn = ds_cond.getColumn(0, "limresn");
-
- if( utlf_isNull(limresn) ){
- sysf_messageBox("사유구분 없이 진행이 불가합니다","I");
- return;
- }
-
- dsf_makeValue(ds_send_savedata,"status","string", "i");
- dsf_makeValue(ds_send_savedata,"pid","string", ds_cond.getColumn(0, "pid"));
- dsf_makeValue(ds_send_savedata,"limrem","string", ds_cond.getColumn(0, "limrem"));
- dsf_makeValue(ds_send_savedata,"limdeptcd","string", sysf_getUserInfo("dutplcecd"));
- dsf_makeValue(ds_send_savedata,"limflag","string", ds_cond.getColumn(0, "limflag"));
- dsf_makeValue(ds_send_savedata,"limfromdd","string", ds_cond.getColumn(0, "limfromdd"));
- dsf_makeValue(ds_send_savedata,"limresn","string", limresn);
-
-
- if( !utlf_isNull(ds_send_savedata.getColumnInfo("cretno")) ){
- dsf_setTypeFormat(ds_send_savedata, "cretno:INT");
- }
- var oParam = {};
- oParam.id = "TXMRC03300";
- oParam.service = "chrtmngtapp.CopyIssMngt";
- oParam.method = "reqExeCopyLimResInfo";
- oParam.inds = "req=ds_send_savedata";
- oParam.outds = "ds_main_limresinfo_limreslist=status";
- oParam.async = false;
- oParam.callback = "cf_TXMRC03300";
- tranf_submit(oParam);
- if(arErrorCode.pop("TXMRC03300") > -1){
- sysf_messageBox("저장이", "I002");
- fLimResSearch();
- }else{
- sysf_messageBox("저장을", "E009");
- }
- ds_send_savedata.clearData();
- // var oprnerId = opener.frmf_getScreenID();
- // if(oprnerId == "SMMRC02200")// 제한 환자 등록시 사본 발급 리스트 강제 조회
- // {
- // opener.fDisPatchHistSearch();
- // }
- }else if(flag =="d"){
- dsf_makeValue(ds_send_savedata,"status","string", "d");
- dsf_makeValue(ds_send_savedata,"pid","string", ds_cond.getColumn(0, "pid"));
- var msg = sysf_messageBox("사본 유의환자 정보를","Q001");
- if(msg=="6"){
-
- if( !utlf_isNull(ds_send_savedata.getColumnInfo("cretno")) ){
- dsf_setTypeFormat(ds_send_savedata, "cretno:INT");
- }
-
- var oParam = {};
- oParam.id = "TXMRC03300";
- oParam.service = "chrtmngtapp.CopyIssMngt";
- oParam.method = "reqExeCopyLimResInfo";
- oParam.inds = "req=ds_send_savedata";
- oParam.outds = "ds_main_limresinfo_limreslist=status";
- oParam.async = false;
- oParam.callback = "cf_TXMRC03300";
- tranf_submit(oParam);
- if(arErrorCode.pop("TXMRC03300") > -1){
- sysf_messageBox("삭제가", "I001");
- }else
- sysf_messageBox("삭제를", "E009");
- }else{
- return;
- }
- ds_cond.clearData();
- ds_cond.addRow();
- // var oprnerId = opener.frmf_getScreenID();
- // if(oprnerId == "SMMRC02200") // 제한 환자 삭제시 사본 발급 리스트 강제 조회
- // {
- // opener.fDisPatchHistSearch();
- // }
- }
- }
- /**
- * @ver :
- * @desc : 환자 찾기 팝업
- * @
- * @by : 이창록
- * @param :
- * @return : 2008-12-29
- * @---------------------------------------------------
- */
- function fPatPopUp(pFlag)
- {
- if(pFlag == "1"){
- dsf_makeValue(ds_temp,"pid","string", ipt_pid.value);
- }else if(pFlag == "2"){
- dsf_makeValue(ds_temp,"hngnm","string", ipt_hngnm.value);
- }else if(pFlag == "3"){
- dsf_makeValue(ds_temp,"rrgstno1","string", ipt_rrgstno1.value);
- dsf_makeValue(ds_temp,"rrgstno2","string", ipt_rrgstno2.value);
- }
- dsf_makeValue(ds_temp,"srchcond","string", pFlag);
- dsf_makeValue(ds_temp,"autoflag","string", "Y");
-
- ds_patinfolist.clearData();
- var objArg = new Object();
- objArg.arg_ds_send = ds_temp;
- frmf_modal("SPPMC02500","SPPMC02500",objArg,"",1,10,10,"","","","","","M");
-
- ds_cond.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
- ds_cond.setColumn(0, "hngnm", ds_patinfolist.getColumn(0, "hngnm"));
- ds_cond.setColumn(0, "rrgstno1", ds_patinfolist.getColumn(0, "rrgstno1"));
- ds_cond.setColumn(0, "rrgstno2", ds_patinfolist.getColumn(0, "rrgstno2"));
- fLimResSearch();
-
- }
- /**
- * @ver :
- * @desc : 제한 환자 조회
- * @
- * @by : 이창록
- * @param :
- * @return : 2008-12-29
- * @---------------------------------------------------
- */
- function fLimResSearch()
- {
- dsf_makeValue(ds_send_reqdata, "pid" , "string" , ds_cond.getColumn(0, "pid"));
-
- var oParam = {};
- oParam.id = "TRMRC03300";
- oParam.service = "chrtmngtapp.CopyIssMngt";
- oParam.method = "reqGetCopyLimResInfo";
- oParam.inds = "req=ds_send_reqdata";
- oParam.outds = "ds_main_limresinfo_limreslist=limreslist";
- oParam.async = false;
- oParam.callback = "cf_TRMRC03300";
- tranf_submit(oParam);
- ds_main_limresinfo_limreslist.rowposition = -1;
- // if(arErrorCode.pop("TRMRC03300") > -1){
- // ds_cond.setColumn(0, "limrem", ds_main_limresinfo_limreslist.getColumn(0, "limrem"));
- // }
-
- }
- /**
- * @ver :
- * @desc : 제한 환자 조회
- * @
- * @by : 이창록
- * @param :
- * @return : 2008-12-29
- * @---------------------------------------------------
- */
- function fCopyLimResInfo(iRow)
- {
- ds_cond.setColumn(0, "pid", ds_main_limresinfo_limreslist.getColumn(iRow, "pid"));
- ds_cond.setColumn(0, "hngnm", ds_main_limresinfo_limreslist.getColumn(iRow, "hngnm"));
- ds_cond.setColumn(0, "rrgstno1", utlf_transNullToEmpty(ds_main_limresinfo_limreslist.getColumn(iRow, "rrgstno")).substring(0,6));
- ds_cond.setColumn(0, "rrgstno2", utlf_transNullToEmpty(ds_main_limresinfo_limreslist.getColumn(iRow, "rrgstno")).substring(7,14));
- ds_cond.setColumn(0, "limresn", ds_main_limresinfo_limreslist.getColumn(iRow, "limresn"));
- ds_cond.setColumn(0, "limrem", ds_main_limresinfo_limreslist.getColumn(iRow, "limrem"));
- ds_cond.setColumn(0, "limflag", ds_main_limresinfo_limreslist.getColumn(iRow, "limflag"));
- ds_cond.setColumn(0, "limfromdd", ds_main_limresinfo_limreslist.getColumn(iRow, "limfromdd"));
-
-
- }
- ]]></Script>
|