123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202 |
- <?xml version="1.0" encoding="utf-8"?>
- <Script type="xscript4.0"><![CDATA[/***************************************************************************************
- * System Name : KNUH2.0
- * Job Name : EMR
- * Creator :
- * Make Date : 2015-02-10
- * Description :
- *---------------------------------------------------------------------------------------
- * Modify Date Modifier Modify Description
- *---------------------------------------------------------------------------------------
- * 2015-02-10 Live Converter TF->XP
- *
- *---------------------------------------------------------------------------------------
- ****************************************************************************************/
- // var sBMTPATINFO_PATH = "/root/main/info/bmtpatinfo"; ds_main_bmtpatinfo
- // var sBMTPATLIST_PATH = "/root/main/list/bmtpat/bmtpatlist" ds_main_bmtpatlist
- // var sDONORLIST_PATH = "/root/main/list/donor/donorlist" ds_main_donorlist
- // var sCONDITION_PATH = "/root/main/cond"; ds_main_cond
- var arErrorCode = new HashArray();
- //=======================================================================================
- // Function
- //---------------------------------------------------------------------------------------
- /***************************************************************************************************
- * Function : fInitialize
- * Description : 화면 초기화
- * Argument :
- * return type :
- * Creator :
- ***************************************************************************************************/
- function fInitialize(){
- ds_main_cond.setColumn(0,"fromdd",((utlf_getCurrentDate().toDate()).getAddDate(-12,"M")).getDateFormat()); //시작일자는 12개월 전
- ds_main_cond.setColumn(0,"todd" ,utlf_getCurrentDate());
- // zbcfGetCodeList(new Array("P0013"), new Array("/root/init/P0013"));
- var arrParam = [ {dsNm: "ds_init_P0013", cdGrpId: "M5205"} ]
- appf_getCodeList(arrParam);
- fSearch();
- }
- /***************************************************************************************************
- * Function : fSearch
- * Description : 조혈모세포 이식환자 조회
- * Argument :
- * return type :
- * Creator :
- ***************************************************************************************************/
- function fSearch(){
- ds_send_reqdata.copyData(ds_main_cond);
-
- var oParam = {};
- oParam.id = "TRMMO09601";
- oParam.service = "prcpmngtapp.ConcPatMngt";
- oParam.method = "reqGetBMTPatList";
- oParam.inds = "req=ds_send_reqdata";
- oParam.outds = "ds_main_bmtpatlist=bmtpatlist";
- oParam.async = false;
- oParam.callback = "cf_TRMMO09601";
- tranf_submit(oParam);
-
- if(arErrorCode.pop("TRMMO09601") > -1){
- ds_main_donorlist.clearData();
- ds_main_bmtpatlist.rowposition = -1;
- // ds_main_bmtpatinfo.clearData();
- // model.refreshpart(sBMTPATLIST_PATH);
- fNewRgst();
- }
- }
- /***************************************************************************************************
- * Function : cf_TRMMO09601
- * Description : TRMMO09601 콜백 함수
- * Argument :
- * return type :
- * Creator :
- ***************************************************************************************************/
- function cf_TRMMO09601(sSvcId, nErrorCode, sErrorMsg) {
- arErrorCode.push(sSvcId, nErrorCode);
- }
- /***************************************************************************************************
- * Function : fNewRgst
- * Description : 신규 BMT 등록
- * Argument :
- * return type :
- * Creator :
- ***************************************************************************************************/
- function fNewRgst(){
- ds_main_bmtpatinfo.clearData();
- ds_main_bmtpatinfo.addRow();
-
- ds_main_bmtpatinfo.setColumn(0,"status" , "I");
- ds_main_bmtpatinfo.setColumn(0,"bmtdd" , utlf_getCurrentDate());
- ds_main_bmtpatinfo.setColumn(0,"histcd" , "O"); // 문자 O
- ds_main_bmtpatinfo.setColumn(0,"abo" , "-");
- ds_main_bmtpatinfo.setColumn(0,"enddd" , "99991231");
- ds_main_bmtpatinfo.setColumn(0,"insureqdd" , "00000000");
- ds_main_bmtpatinfo.setColumn(0,"insuaprvdd" , "00000000");
- ds_main_bmtpatinfo.setColumn(0,"trnptdd" , "00000000");
- ds_main_bmtpatinfo.setColumn(0,"holddd" , "00000000");
-
- group_info.ipt_pid.enable = true;
- group_info.ipt_bmtdd.enable = true;
- group_info.btn_search.enable = true;
- }
- /***************************************************************************************************
- * Function : fSavePatInfo
- * Description : 조혈모세포 이식환자 저장
- * Argument :
- * return type :
- * Creator :
- ***************************************************************************************************/
- function fSavePatInfo(){
- var sStatus = ds_main_bmtpatinfo.getColumn(0,"status");
- if(sStatus != "I" && sStatus != "U" && sStatus != "D") {sysf_messageBox("처리할수 없는 작업 입니다. \n\n신규 작성 하시려면 신규 버튼 클릭후 저장 하세요.", "C999"); return; }
-
- if( utlf_isNull(group_info.ipt_pid.value) ) { sysf_messageBox("등록번호를" , "C001"); return; }
- if( utlf_isNull(group_info.opt_unitcd.value) ) { sysf_messageBox("환자명을" , "C001"); return; }
- if( utlf_isNull(group_info.ipt_bmtdd.value) ) { sysf_messageBox("등록일자를" , "C001"); return; }
- if( utlf_isNull(group_info.ipt_enddd.value) ) { sysf_messageBox("종료일자를" , "C001"); return; }
-
- ds_send_savedata.copyData(ds_main_bmtpatinfo);
- // ds_send_savedata_donorlist.copyData(grdf_getGridUpdateData(group_info.grd_donorlist));
- // dsf_makeValue(ds_send_savedata,"donorlist","string",grdf_getGridUpdateData(group_info.grd_donorlist));
-
- var oParam = {};
- oParam.id = "TXMMO09602";
- oParam.service = "prcpmngtapp.ConcPatMngt";
- oParam.method = "reqExeSaveBMTPatInfo";
- oParam.inds = "bmtpatinfo=ds_send_savedata donorlist=ds_main_donorlist:U";
- oParam.outds = "";
- oParam.async = false;
- oParam.typeStr = "m";
- oParam.callback = "cf_TXMMO09602";
- tranf_submit(oParam);
- if(arErrorCode.pop("TXMMO09602") > -1){
- if(sStatus == "I") {
- sysf_messageBox("저장 하였습니다.", "I999");
- } else if(sStatus == "U") {
- sysf_messageBox("수정 하였습니다.", "I999");
- } else if(sStatus == "D") {
- sysf_messageBox("삭제 하였습니다.", "I999");
- }
- fSearch(); // 목록 재조회
- }
- }
- /***************************************************************************************************
- * Function : cf_TXMMO09602
- * Description : TXMMO09602 콜백 함수
- * Argument :
- * return type :
- * Creator :
- ***************************************************************************************************/
- function cf_TXMMO09602(sSvcId, nErrorCode, sErrorMsg) {
- arErrorCode.push(sSvcId, nErrorCode);
- }
- /***************************************************************************************************
- * Function : fSelectPatInfo
- * Description : 환자정보 선택 - 상세 정보를 보여줌, 수정할 수 있도록 처리함
- * Argument :
- * return type :
- * Creator :
- ***************************************************************************************************/
- function fSelectPatInfo(){
- ds_main_bmtpatinfo.clearData();
- ds_main_bmtpatinfo.addRow();
-
- var currow = ds_main_bmtpatlist.rowposition;
-
- ds_main_bmtpatinfo.copyRow(0,ds_main_bmtpatlist,currow);
- dsf_makeValue(ds_main_bmtpatinfo,"status","string","U");
-
- ds_send_reqdata.copyData(ds_main_bmtpatinfo);
- var sOption = ds_main_cond.getColumn(0,"option");
- dsf_makeValue(ds_send_reqdata,"option","string",sOption);
-
- var oParam = {};
- oParam.id = "TRMMO09602";
- oParam.service = "prcpmngtapp.ConcPatMngt";
- oParam.method = "reqGetDonorList";
- oParam.inds = "req=ds_send_reqdata";
- oParam.outds = "ds_main_donorlist=donorlist";
- oParam.async = false;
- oParam.callback = "";
- tranf_submit(oParam);
-
- // if(submit("TRMMO09602")){
- // model.refreshpart(sDONORLIST_PATH);
- // }
-
- group_info.ipt_pid.enable = false;
- group_info.ipt_bmtdd.enable = false;
- group_info.btn_search.enable= false;
- }
- ]]></Script>
|