123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137 |
- <?xml version="1.0" encoding="utf-8"?>
- <Script type="xscript4.0"><![CDATA[
- function fInit()
- {
- fResetInput();
- }
- function fResetInput()
- {
- fSetPatInfoValueInit();
- fSearch();
- }
- function fSetPatInfoValueInit()
- {
- ds_main_patinfo.setColumn(0, "pid", "");
- ds_main_patinfo.setColumn(0, "indd", "");
- ds_main_patinfo.setColumn(0, "valifromdt", utlf_getCurrentDate()+utlf_getCurrentTime().substr(0,4));
- ds_main_patinfo.setColumn(0, "valitodt", "999912312359");
- ds_main_patinfo.setColumn(0, "patcomment", "");
- }
- //조회
- function fSearch()
- {
- var oParam = {};
- oParam.id = "TRMRI03900";
- oParam.service = "unprepmngtapp.ChrtUnprepMngt";
- oParam.method = "reqGetPatInfoRecException";
- oParam.inds = "req=ds_send";
- oParam.outds = "ds_main_datalist_datainfo=datainfo";
- oParam.async = false;
- //oParam.callback = "cf_TRMRI03900";
- tranf_submit(oParam);
- }
- function fPatDelValue()
- {
- var row = ds_main_datalist_datainfo.rowposition;
-
- if(row > -1)
- {
- ds_send_save.addRow();
- ds_send_save.copyRow(0, ds_main_datalist_datainfo, row);
- ds_send_save.setColumn(0, "status", "d");
- var pid = ds_send_save.getColumn(0, "pid");
- var hngnm = ds_send_save.getColumn(0, "hngnm");
-
- var msgflag = sysf_messageBox(hngnm + "("+pid+")의 정보를", "Q001");
-
- if(msgflag == 6)
- {
- var oParam = {};
- oParam.id = "TXMRI03902";
- oParam.service = "unprepmngtapp.ChrtUnprepMngt";
- oParam.method = "reqSetPatInfoRecException";
- oParam.inds = "req=ds_send_save req_endflag=ds_send";
- oParam.outds = "ds_main_datalist_datainfo=datainfo";
- oParam.async = false;
- //oParam.callback = "cf_TXMRI03902";
- tranf_submit(oParam);
-
- ds_send_save.clearData();
- fResetInput();
- }
- }
- }
- function fPatSetValue()
- {
- var oParam = {};
- oParam.id = "TXMRI03901";
- oParam.service = "unprepmngtapp.ChrtUnprepMngt";
- oParam.method = "reqSetPatInfoRecException";
- oParam.inds = "req=ds_main_datalist_datainfo:U req_endflag=ds_send";
- oParam.outds = "ds_main_datalist_datainfo=datainfo";
- oParam.async = false;
- //oParam.callback = "cf_TXMRI03901";
- tranf_submit(oParam);
-
- fResetInput();
- }
- function fPatInsert()
- {
- if(utlf_isNull(ds_main_patinfo.getColumn(0, "indd")))
- {
- sysf_messageBox("해당환자의 입원 일자를 입력해 주세요.","E");
- return;
- }
- if(!utlf_isNull(ds_main_patinfo.getColumn(0, "pid")))
- {
- if(fGetPatinfo())
- {
- var oParam = {};
- oParam.id = "TXMRI03900";
- oParam.service = "unprepmngtapp.ChrtUnprepMngt";
- oParam.method = "reqInsPatInfoRecException";
- oParam.inds = "req=ds_main_patinfo req_endflag=ds_send";
- oParam.outds = "ds_main_datalist_datainfo=datainfo";
- oParam.async = false;
- //oParam.callback = "cf_TXMRI03900";
- tranf_submit(oParam);
-
- fResetInput();
- }
- }
- }
- function fGetPatinfo()
- {
- var bFlag = false;
-
- var oParam = {};
- oParam.id = "TRMRI03901";
- oParam.service = "unprepmngtapp.ChrtUnprepMngt";
- oParam.method = "reqGetPatInfoRecException_PatInfo";
- oParam.inds = "req=ds_main_patinfo";
- oParam.outds = "ds_temp_patinfo=patinfoyn";
- oParam.async = false;
- //oParam.callback = "cf_TRMRI03901";
- tranf_submit(oParam);
-
- if(ds_temp_patinfo.getColumn(0, "patinfoyn") == "Y")
- {
- sysf_messageBox("해당환자의 데이터가 존재합니다","E");
- bFlag = false;
- }
- else
- {
- bFlag = true;
- }
- return bFlag;
- }]]></Script>
|