123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419 |
- /*
- - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
- 업무협조문 SMMMO16300_업무협조문.xrw - JScript )
- - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
- */
- var sNodeList_Path = "/root/main/info/list";
- /*
- * @desc : 업무협조문 기본조건 초기화
- * @
- * @param :
- * @return :
- * @author : 김영학
- * @---------------------------------------------------
- */
- function fSetBaseInit() {
-
- model.setValue("/root/main/cond/orddeptcd" , "-");
- model.setValue("/root/main/cond/wardcd" , "-");
-
- var jobkind = getUserInfo("jobkindcd");
- if ( jobkind == "0330" || jobkind == "1411" )
- {
- grd_prcplist.colHidden(grd_prcplist.colRef("wardnm")) = true;
- model.toggle("case1");
- model.toggle("case3");
-
- mmbfGetDeptCodeComboList("/root/send/reqdata" , "/root/init/orddept", "A");
- addComboInstance("/root/init/orddept" , "deptcd^depthngnm", "-^전체", "dept"); //부서콤보 Item '전체'추가
- model.setValue("/root/main/cond/orddeptcd" , "-");
- }
- else
- {
- grd_prcplist.colHidden(grd_prcplist.colRef("wardnm")) = false;
- model.toggle("case2");
- model.toggle("case4");
- submit("TRMNR01002", false);
- addComboInstance("/root/init/wardcdgrup" , "wardcd^wardnm", "-^전체", "wardcdgruplist"); //부서콤보 Item '전체'추가
- model.setValue("/root/main/cond/wardcd" , "-");
- }
- model.setValue("/root/main/cond/fromdd" , getCurrentDate());
- model.setValue("/root/main/cond/todd" , getCurrentDate());
- }
-
- /*
- * @desc : 업무협조문 처방코드나 상병코드 선택시 그리드 초기화
- * @
- * @param :
- * @return :
- * @author : 김영학
- * @---------------------------------------------------
- */
- function fGrdInit() {
- model.removeNodeset("/root/main/patprcpinfo/patprcplist");
- var code = model.getValue("/root/main/cond/code");
- if (code =="P" ) { // 처방 코드 조회
- //grd_prcplist.caption="환자번호^환자명^S/A^주민번호^처방일^처방의^수량^용량^횟수^일수^용법/검체^처방코드^진단코드^진료과^우편번호^주소"
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpqty")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpvol")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcptims")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpdayno")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("drugmthdspccdnm")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpcd")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("icd10cd")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("diagcd")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("diagengnm")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpnm")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("rgstdd")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("kindcd")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("kindcdflag")) = true;
- //grd_prcplist.colHidden(grd_prcplist.colRef("rsrvflag")) = false;
-
- } else { // 진단코드로 조회
- //grd_prcplist.caption="환자번호^환자명^S/A^주민번호^진료일^처방의^수량^용량^횟수^일수^용법/검체^처방코드^진단코드^진료과^우편번호^주소"
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpqty")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpvol")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcptims")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpdayno")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpnm")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("drugmthdspccdnm")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("prcpcd")) = true;
- grd_prcplist.colHidden(grd_prcplist.colRef("icd10cd")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("diagcd")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("diagengnm")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("rgstdd")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("kindcd")) = false;
- grd_prcplist.colHidden(grd_prcplist.colRef("kindcdflag")) = false;
- //grd_prcplist.colHidden(grd_prcplist.colRef("rsrvflag")) = true;
-
- }
- grd_prcplist.rebuild();
- }
-
- /**
- * @desc : 진단용어코드 검색
- * @
- * @param :
- * @return :
- * @author : 오지훈 -- 2008. 12. 08 . 업무협조문에 맞게 내용수정
- * @---------------------------------------------------
- */
- function fSearchDiagTermCD(){
- var icd10cd = ipt_code.currentText;
- var diagengnm = ipt_name.currentText;
- if(icd10cd == "" && diagengnm == ""){ //아무 값도 입력하지 않는 경우 return
- return;
- }
-
- if (isNull(icd10cd)) {
- setParameter("SPMMO00800_cond1", 2);
- setParameter("SPMMO00800_cond2", 4);
- setParameter("SPMMO00800_cond3", fIsHangul(diagengnm));
- setParameter("SPMMO00800_cond4", getCurrentDate());
- setParameter("SPMMO00800_cond5", diagengnm);
- } else if (isNull(diagengnm)) {
- setParameter("SPMMO00800_cond1", 1);
- setParameter("SPMMO00800_cond2", 4);
- setParameter("SPMMO00800_cond3", "E");
- setParameter("SPMMO00800_cond4", getCurrentDate());
- setParameter("SPMMO00800_cond5", icd10cd);
- }
-
- modal("SPMMO00850");
- //lyj 수정
- //modal("SPMMO00800");
-
- var useyn = getParameter("SPMMO00800_rtn_useyn");
- if(useyn == "Y"){
- setParameter("SPMMO00800_rtn_useyn", "");
- fSetDiagTermCD();
- }else{
- setParameter("SPMMO00800_rtn_useyn", "");
- model.setValue(root.main.cond.code , "");
- model.setValue(root.main.cond.name , "");
- model.refresh();
- }
- }
-
- /**
- * @desc : 진단용어코드 설정
- * @
- * @param :
- * @return :
- * @author : 오지훈 -- 2008. 12. 08 . 업무협조문에 맞게 내용수정
- * @---------------------------------------------------
- */
- function fSetDiagTermCD(){
-
- var rtnparam = getParameter("SPMMO00800_rtn");
-
- rtnparam = rtnparam.split("▩");
-
- for(i = 1; i< rtnparam.length-1; i++){
- var tmpstr = rtnparam[i];
- tmpstr = tmpstr.split("▦");
-
- var currow = grd_prcplist.rows;
- grd_prcplist.addRow(false);
-
- model.makeValue(sNodeList_Path + "[" + currow + "]/code" , tmpstr[3]);
- model.makeValue(sNodeList_Path + "[" + currow + "]/engnm" , tmpstr[6]);
- model.makeValue(sNodeList_Path + "[" + currow + "]/hngnm" , tmpstr[5]);
-
- }
-
- model.recalculate();
- model.refresh();
- }
-
- /**
- * @desc : 진단팝업 open
- * @
- * @param :
- * @return :
- * @author : 오지훈
- * @---------------------------------------------------
- */
- function fOpenDiagPopUp(){
- modal("SPMMO03200");
-
- var useyn = getParameter("SPMMO03200_rtn_useyn");
- if(useyn == "Y"){
- setParameter("SPMMO03200_rtn_useyn", "");
- var totcnt = getNodeSetCnt("/root/temp/selectdiaglist");
- for(var i = 1; i <= totcnt; i++){
- var diagcd = model.getValue("/root/temp/selectdiaglist[" + i + "]/diagcd");
- var dispdiagcd = model.getValue("/root/temp/selectdiaglist[" + i + "]/dispdiagcd");
- var diagengnm = model.getValue("/root/temp/selectdiaglist[" + i + "]/diagengnm");
- var diaghngnm = model.getValue("/root/temp/selectdiaglist[" + i + "]/diaghngnm");
- }
- }
- model.refresh();
- }
-
-
- /*
- * @desc : 업무협조문 코드조회 초기화
- * @
- * @param :
- * @return :
- * @author : 김영학
- * @---------------------------------------------------
- */
- function fCodeSrchInit() {
- model.removeNodeset("/root/main/info/list");
- if (code == "P") {
- cap_code.value = "처방코드 :";
- cap_name.value = "처 방 명 :"
- cap_subtitle.value = "처방코드조회"
- grd_prcplist.caption = "처방코드^처방명^처방한글명"
- } else {
- cap_code.value = "진단코드 :";
- cap_name.value = "진 단 명 :"
- cap_subtitle.value = "진단코드조회"
- grd_prcplist.caption = "진단코드^진단명^진단한글명"
- }
- model.refresh();
- }
-
-
-
-
- /**
- * @desc : 처방코드 검색
- * @
- * @param :
- * @return :
- * @author : 김영학 (2008.12.10)
- * @---------------------------------------------------
- */
- function fSearchPrcpTermCD(){
- var icd10cd = ipt_code.currentText;
- var diagengnm = ipt_name.currentText;
- var fromdd = model.getValue("/root/main/cond/fromdd");
- var todd = model.getValue("/root/main/cond/todd");
-
- if(icd10cd == "" && diagengnm == ""){ //아무 값도 입력하지 않는 경우 return
- return;
- }
- if (isNull(icd10cd)) {
- setParameter("SPMMO00800_cond1", 2);
- setParameter("SPMMO00800_cond5", diagengnm);
- setParameter("SPMMO00800_fromdd", fromdd);
- setParameter("SPMMO00800_todd" , todd);
- } else if (isNull(diagengnm)) {
- setParameter("SPMMO00800_cond1", 1);
- setParameter("SPMMO00800_cond5", icd10cd);
- setParameter("SPMMO00800_fromdd", fromdd);
- setParameter("SPMMO00800_todd" , todd);
- }
- modal("SPMMO16700");
-
- var useyn = getParameter("SPMMO00800_rtn_useyn");
- if(useyn == "Y"){
- setParameter("SPMMO00800_rtn_useyn", "");
- fSetPrcpTermCD();
- }else{
- setParameter("SPMMO00800_rtn_useyn", "");
- model.setValue(root.main.cond.code , "");
- model.refresh();
- }
- }
-
-
-
- /**
- * @desc : 처방코드 설정
- * @
- * @param :
- * @return :
- * @author : 김영학 (2008.12.10)
- * @---------------------------------------------------
- */
- function fSetPrcpTermCD(){
-
- var rtnparam = getParameter("SPMMO00800_rtn");
- rtnparam = rtnparam.split("▩");
-
- for(i = 1; i< rtnparam.length-1; i++){
- var tmpstr = rtnparam[i];
- tmpstr = tmpstr.split("▦");
- var currow = grd_prcplist.rows;
- grd_prcplist.addRow(false);
- model.makeValue(sNodeList_Path + "[" + currow + "]/code" , tmpstr[1]);
- model.makeValue(sNodeList_Path + "[" + currow + "]/engnm" , tmpstr[2]);
- model.makeValue(sNodeList_Path + "[" + currow + "]/hngnm" , tmpstr[3]);
-
- }
-
- model.recalculate();
- model.refresh();
- }
-
- /**
- * @desc : Modal 창에서 데이터를 선택한 것을 나눠어 줌
- * @
- * @param :
- * @return :
- * @author : 김영학 (2008.12.10)
- * @---------------------------------------------------
- */
- function getCodeNodeListCSV(nodeList) {
- if( nodeList.length == 0 ){
- return;
- }
-
- var sColSep = "▦";
- var sRowSep = "▩";
-
- var rCSV = "";
-
- var childNodeList = nodeList.item(0).childNodes;
- var childNodeCnt = childNodeList.length;
- if( childNodeCnt == 0 ){
- return;
- }
-
- var i, j;
- for( i = 0; i < childNodeCnt - 1; i++) {
- rCSV += childNodeList.item(i).nodeName + sColSep;
- }
- rCSV += childNodeList.item(i).nodeName + sRowSep;
-
- var node;
- var cnt = 1;
- var selCnt = 0;
- while( node = nodeList.nextNode() ) {
- childNodeList = node.childNodes;
- for( i = 0; i < childNodeCnt - 1; i++) {
- rCSV += childNodeList.item(i).text + sColSep;
- }
- rCSV += childNodeList.item(i).text + sRowSep;
- selCnt++;
- }
- if ( selCnt == 0 ) {
- return "N"
- } else {
- return rCSV;
- }
- }
- /**
- * @desc : 코드를 콤보 인스턴스에 매핑
- * @
- * @param :
- * @return :
- * @author : 김영학 (2008.12.10)
- * @---------------------------------------------------
- */
- function fSetComboCodeCD(){
-
- var rtnparam = getParameter("SPMMO16300");
- rtnparam = rtnparam.split("▩");
-
- for(i = 1; i< rtnparam.length-1; i++){
- var tmpstr = rtnparam[i];
- tmpstr = tmpstr.split("▦");
- model.makeValue("/root/init/code/prcpcd[" + i + "]/codecd" , tmpstr[0]);
- model.makeValue("/root/init/code/prcpcd[" + i + "]/codenm" , tmpstr[0]);
-
- }
-
-
- model.refresh();
- }
-
- /**
- * @desc : 코드조회
- * @
- * @param :
- * @return :
- * @author : 김영학 (2008.12.12)
- * @---------------------------------------------------
- */
- function fGetData() {
- if (code == "P") {
- fSearchPrcpTermCD();
- var sRtnMsg = messageBox("추가로 코드를 검색", "S001");
- if (sRtnMsg == "6" ) {
- } else {
- var rtn1 = getCodeNodeListCSV ( model.instances(0).selectNodes( "/root/main/info/list" ));
- opener.javascript.setParameter( "SPMMO16300", rtn1 );
- window.close();
- }
- } else {
- fSearchDiagTermCD();
- var sRtnMsg = messageBox("추가로 코드를 검색", "S001");
- if (sRtnMsg == "6" ) {
- } else {
- var rtn1 = getCodeNodeListCSV ( model.instances(0).selectNodes( "/root/main/info/list" ));
- opener.javascript.setParameter( "SPMMO16300", rtn1 );
- window.close();
- }
- }
- }
- /**
- * @desc : 엑셀저장
- * @
- * @param :
- * @return :
- * @author : 김영학 (2008.12.18)
- * @---------------------------------------------------
- */
- function fsaveGridToExcel(grdObj, title){
- var sTitle = "코드별 환자조회 " + title;
- var fileName = window.fileDialog("save", ",", false, sTitle, "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
- if (fileName != ""){
- grdObj.saveExcel(fileName, sTitle, true, true, "", "", true);
- }
- }
|