/** * 파 일 명 : SPADT61100.js * 설 명 : (팝업)원외처방전출력 Javascriot * 설 계 자 : 공두경 * 작 성 자 : 공두경 * 수정이력 : 2007.09.21 / 최초작성 / 공두경 */ var sTxt; var qrsrc = "C:/Program Files/himed/components/" /** * 초기화 */ function fInit() { var opener_ID = opener.window.javascript.getParameter("opener_ID"); var sParam = model.getAttribute("params"); model.makeValue("/root/send/prcpinfo/drugdd", astfMatrixData(sParam, 1, 0)); model.makeValue("/root/send/prcpinfo/drugno", astfMatrixData(sParam, 1, 1)); model.makeValue("/root/send/prcpinfo/ioflag", "O"); model.makeValue("/root/send/prcpinfo/pid", astfMatrixData(sParam, 1, 2)); model.makeValue("/root/send/prcpinfo/orddd", astfMatrixData(sParam, 1, 3)); model.makeValue("/root/send/prcpinfo/cretno", astfMatrixData(sParam, 1, 4)); model.makeValue("/root/send/prcpinfo/orddeptcd", astfMatrixData(sParam, 1, 5)); model.makeValue("/root/send/prcpinfo/prcpgenrflag", astfMatrixData(sParam, 1, 6)); model.makeValue("/root/send/prcpinfo/hosoutmpsflag", astfMatrixData(sParam, 1, 7)); model.makeValue("/root/send/prcpinfo/reprintyn", astfMatrixData(sParam, 1, 8)); model.makeValue("/root/send/prcpinfo/prntflag", "Y"); //model.makeValue("/root/send/prcpinfo/printer", astfMatrixData(sParam, 1, 10)); //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 model.makeValue("/root/send/prcpinfo/eprntype", astfMatrixData(sParam, 1, 10)); // 2009.09.09 pymi model.makeValue("/root/send/prcpinfo/stocdeptcd", "Y"); // 20100310_laboru_실출고부서 원외 일때는 업데이트 안함. 실출고부서가 필요하면 astfMatrixData(sParam, 1, 10) model.makeValue("/root/send/prcpinfo/engprntflag", astfMatrixData(sParam, 1, 13)); // 20130429 ////////////2015년 8월3일 김치국 model.makeValue("/root/send/prcpinfo/reprnttype", astfMatrixData(sParam, 1, 14)); model.makeValue("/root/send/prcpinfo/reprntpat", astfMatrixData(sParam, 1, 15)); model.makeValue("/root/send/prcpinfo/elctsignkey", astfMatrixData(sParam, 1, 16)); model.makeValue("/root/send/prcpinfo/elctsigncnts", astfMatrixData(sParam, 1, 17)); model.makeValue("/root/send/prcpinfo/digcdskipyn", astfMatrixData(sParam, 1, 18)); model.refresh(); // alert("SPADT61100.js : "+ sParam); // alert(astfMatrixData(sParam, 1, 14)); // alert(astfMatrixData(sParam, 1, 15)); // alert(astfMatrixData(sParam, 1, 16)); // alert(astfMatrixData(sParam, 1, 17)); var engprntflag = model.getValue("/root/send/prcpinfo/engprntflag"); var printerno = astfMatrixData(sParam, 1, 13) ; var mdrugflag = astfMatrixData(sParam, 1, 12) ; // 20101124_laboru_경북대병원_마약/향정 외래 환자 원외 처방전 출력 여부 조회(R002) // 20101103_laboru_경북대병원_세종병원에서 수정한 내용 추가 var printer_name = "true"; if(opener_ID == "SMADT01101_원외처방전출력(원무)"){ printer_name = opener.window.javascript.getParameter("opener_printer_name"); printerno = opener.window.javascript.getParameter("opener_printer_tray"); } //messageBox("astfMatrixData(sParam, 1, 10)-->"+ astfMatrixData(sParam, 1, 10) ,"Q003") ; //messageBox("printerno-->"+ printerno ,"Q003") ; submit("TRADT61101"); // 테스트 시작 ----------------------------- //model.makeValue("/root/main/prcpdata/patinfo/qrcode", "QR 이미지"); // sTxt = "#EDC002L#A1 201606220000000000001 (주)EDB (031)8092-3000 (031)8092-3001 e-db@edb.co.kr 환자다 의사 12345 저환장 80050112345671 12345678900 10 V2527 01|A00001|B0003|||160730| #B11643901650 3 14 |10000|0|ABC #C11670603751 1 3 |10342|0|PO #E"; // 테스트 끝 ----------------------------- //QR 이미지 생성. // if (model.getValue("/root/main/prcpdata/patinfo/qrstr" ) != ""){ //C:\Program Files\himed\components\EDBel // fImageDelete('C:/Program Files/himed/components/EDBel/qrimg.bmp'); // Barcode 이미지 삭제 // fMakeQRSamStr(); // fCreateFile('C:/Program Files/himed/components/EDBel/qrsamfile.txt'); // fEDBmaker("\"C:/Program Files/himed/components/EDBel/EDBel.exe\" ,C:/Program Files/himed/components/EDBel/qrsamfile.txt,C:/Program Files/himed/components/EDBel/qrimg.bmp, true"); // fImageCheck('C:/Program Files/himed/components/EDBel/qrimg.bmp'); // 이미지 생성 여부 파악 // model.makeValue("/root/main/prcpdata/patinfo/qrcode" , QR_img_input.getBase64data() , true); // } //QR 이미지 생성 끝. --------------------- //QR 이미지 생성. if (model.getValue("/root/main/prcpdata/patinfo/qrstr" ) != ""){ fImageDelete(qrsrc+"EDBel/qrimg.bmp"); // Barcode 이미지 삭제 fMakeQRSamStr(); fCreateFile(qrsrc+"EDBel/qrsamfile.txt"); fQRmaker("\""+qrsrc+"EDBel/EDBel.exe\" ,"+qrsrc+"EDBel/qrsamfile.txt,"+qrsrc+"EDBel/qrimg.bmp, false"); if(fImageCheck(qrsrc+"EDBel/qrimg.bmp")){ // 이미지 생성 여부 파악 model.makeValue("/root/main/prcpdata/patinfo/qrcode" , QR_img_input.getBase64data() , true); } } //QR 이미지 생성 끝. --------------------- if(model.getValue("/root/main/prcpdata/patinfo/pid") != ""){ var cnt = getNodesetCount("/root/main/prcpdata/sumlist"); if(cnt > 0){ for(var a = 1; a <= cnt; a++){ model.setValue("/root/main/prcpdata/sumlist["+a+"]/totdrugqty", fChkFloat(model.getValue("/root/main/prcpdata/sumlist["+a+"]/totdrugqty"))); } } //이선경 수정 2008-08-26 start (사용기간 메시지창) var usedate = model.getValue("/root/main/prcpdata/patinfo/usedate"); var curdate = getCurrentDate(); var rtn = ""; var date = usedate.substr(0,4) + "년 " + usedate.substr(4,2) + "월 " + usedate.substr(6,2) + "일"; if(usedate < curdate) { rtn = messageBox("처방전 사용기간은 " + date + " 입니다. 출력을 ", "Q004"); if(rtn != 6){ window.close(); return; } } //이선경 수정 2008-08-26 end (사용기간 메시지창) makeReportPreview(0,0,1195, 784, "grp_pharmacy"); makeReportPreview(0,0,1195, 784, "grp_pat"); // 20101124_laboru_경북대병원_원외 마약 처방전 위해 추가 makeReportPreview(0,0,1195, 784, "grp_pharmacy2"); makeReportPreview(0,0,1195, 784, "grp_pat2"); //처방전에 DUR이 존재하면 RFADT61104 존재하지 않으면 RFADT61103 출력 var resn = model.getValue("/root/main/prcpdata/resn/resnnm"); //영문처방전의경우 DUR 사유를 출력하지 않음 //alert(model.getValue("/root/send/prcpinfo/eprntype")); if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { resn = ""; } // 20101123_laboru_경북대병원_외래 원외 일반약 처방과 마약/향정 처방을 분리 var list2cnt = 1; // 일반약 처방 var list3cnt = 1; // 마약, 향정 처방 var list4cnt = 1; // 이하 여백 if(mdrugflag == "Y") { if(cnt > 0){ for(var a = 1; a <= cnt; a++){ // 취소된 처방은 분리해서 보여주기_by.Shaun_16.02.01 var sPrcp = true; var sPrcphistcd = model.getValue("/root/main/prcpdata/sumlist[" + a + "]/prcphistcd"); if(sPrcphistcd == "C" || sPrcphistcd == "E" ){ sPrcp = false; } // 취소된 처방은 분리해서 보여주기 -- end if((model.getValue("/root/main/prcpdata/sumlist[" + a + "]/prcpcd") != "") && sPrcp ) { if(model.getValue("/root/main/prcpdata/sumlist[" + a + "]/spcldrug") == "M" ) { // 마약일때(조회는 내복, 외용만) model.makeNode("root/main/prcpdata/sumlist3[" + list3cnt + "]"); // 마약 처방 model.copyNode("root/main/prcpdata/sumlist3[" + list3cnt + "]", "root/main/prcpdata/sumlist[" + a + "]"); list3cnt++; } else { model.makeNode("root/main/prcpdata/sumlist2[" + list2cnt + "]"); // 일반약 처방 model.copyNode("root/main/prcpdata/sumlist2[" + list2cnt + "]", "root/main/prcpdata/sumlist[" + a + "]"); //copyNodesetType("root/main/prcpdata/sumlist2", "root/main/prcpdata/sumlist[" + a + "]", "after"); list2cnt++; } } else { model.makeNode("root/main/prcpdata/sumlist4[" + list4cnt + "]"); // 이하 여백 model.copyNode("root/main/prcpdata/sumlist4[" + list4cnt + "]", "root/main/prcpdata/sumlist[" + a + "]"); list4cnt++; } } } if(parseInt(list3cnt) >1 ) { // 마약 처방이 있다면 copyNodesetType("root/main/prcpdata/sumlist", "root/main/prcpdata/sumlist2", "replace"); copyNodesetType("root/main/prcpdata/sumlist", "root/main/prcpdata/sumlist4", "after"); var cntmdrug = getNodesetCount("/root/main/prcpdata/sumlist"); model.setValue("root/main/prcpdata/sumlist["+cntmdrug+"]/hngnm", "- 마약처방이 있습니다 -"); ////마약처방전 약국1곳에 사영 메세지 나타내기 //2015.7.7 김치국/ model.setValue("root/main/prcpdata/sumlist["+cntmdrug+"]/mthdnm", '마약처방전과 반드시 한곳(약국)'); model.makeValue("root/main/prcpdata/sumlist["+ (parseInt(cntmdrug) + 1 )+"]/mthdnm", '에서만 조제바랍니다.'); //// } } // (e) 20101123_laboru_경북대병원 // 20130429_영문처방전 출력 if(opener_ID == "SMADT01101_원외처방전출력(원무)" && engprntflag == "E"){ var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); exeReportPreview("RFADT61105", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } else { if( (list2cnt > 1) || mdrugflag != "Y" ) { // 마약 처방만 존재할 때는 일반약 출력 X if( resn == ""){ if(parseInt(model.getValue("/root/main/prcpdata/patinfo/prnttims"), 10)>0){ if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "1"){ if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용-재출력)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); } else if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "2"){ model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용-재출력)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } else { if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용-재출력)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용-재출력)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } } else { if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "1"){ if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); } else if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "2"){ model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } else { if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } } }else{ if(parseInt(model.getValue("/root/main/prcpdata/patinfo/prnttims"), 10)>0){ if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "1"){ if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용-재출력)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61102", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); } else if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "2"){ model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용-재출력)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } else { if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용-재출력)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61102", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용-재출력)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } } else { if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "1"){ if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61102", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); } else if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "2"){ model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } else { if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61102", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno); model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno); } } } } // (e) 마약 처방만 존재할 때는 일반약 출력 X } // 20101124_laboru_경북대병원_경북대병원_외래 환자 마약 원외 처방전 출력 할 때 if(mdrugflag = "Y" && parseInt(list3cnt) >1) { model.makeNode("/root/main/prcpdata/sumlist"); copyNodesetType("root/main/prcpdata/sumlist", "root/main/prcpdata/sumlist3", "replace"); copyNodesetType("root/main/prcpdata/sumlist", "root/main/prcpdata/sumlist4", "after"); var cntmdrug = getNodesetCount("/root/main/prcpdata/sumlist"); for(var a = 1 ; a <= cntmdrug ; a++) { var tempt = ""; var spcldrug = model.getValue("root/main/prcpdata/sumlist["+a+"]/spcldrug"); if(spcldrug == "M") { tempt = "(마약)"; } model.setValue("root/main/prcpdata/sumlist["+a+"]/hngnm", model.getValue("root/main/prcpdata/sumlist["+a+"]/hngnm") + tempt ); } // 마약 처방전에는 환자 주소 추가 var cntaddr = getNodesetCount("/root/main/prcpdata/sumlist"); model.makeNode("root/main/prcpdata/sumlist["+ (parseInt(cntaddr) + 1 )+"]"); model.makeValue("root/main/prcpdata/sumlist["+ (parseInt(cntaddr) + 1 )+"]/hngnm", model.getValue("root/main/prcpdata/patinfo/detladdr")); ////마약처방전 약국1곳에 사영 메세지 나타내기 //2015.7.7 김치국/ model.makeValue("root/main/prcpdata/sumlist["+ (parseInt(cntaddr) + 1 )+"]/mthdnm", '마약처방전입니다.'); model.makeValue("root/main/prcpdata/sumlist["+ (parseInt(cntaddr) + 2 )+"]/mthdnm", '반드시 한곳(약국)에서만 조제바랍니다.'); //// if( resn == ""){ if(parseInt(model.getValue("/root/main/prcpdata/patinfo/prnttims"), 10)>0){ if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "1"){ if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용-재출력)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); } else if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "2"){ model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용-재출력)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); } else { if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용-재출력)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용-재출력)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); } } else { if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "1"){ if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); } else if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "2"){ model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); } else { if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); } } }else{ if(parseInt(model.getValue("/root/main/prcpdata/patinfo/prnttims"), 10)>0){ if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "1"){ if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용-재출력)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); } else if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "2"){ model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용-재출력)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); } else { if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용-재출력)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용-재출력)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); } } else { if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "1"){ if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61102", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); } else if(model.getValue("/root/send/prcpinfo/hosoutmpsflag") == "2"){ model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); } else { if(model.getValue("/root/send/prcpinfo/eprntype") == "E") { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(영문명처방)"); // 20100219_laboru_영문처방전일 경우 사용기간 제거 model.setValue("/root/main/prcpdata/patinfo/usedayno",""); model.setValue("/root/main/prcpdata/patinfo/usedate",""); // 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리 var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } else { model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(약국제출용)"); // 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가 //var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); //model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pharmacy"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61102", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno); model.makeValue("/root/main/prcpdata/patinfo/hosoutmpsflagnm", "(본인보관용)"); if(astfMatrixData(sParam, 1, 9) == "Y") { var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); } //2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가 //exeReportPreview("RFADT61100", "XMLSTR", "", "", "true","","","","","true", "", "grp_pat"); //2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경 //exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno); } } } } } else { window.close(); } model.refresh(); //window.close(); } /** * */ function fChkFloat(qty) { var fQty = parseFloat(qty); var fRst = ""; if(fQty%1 == 0){ fRst = parseInt(qty); } else { fRst = qty; } return fRst; } // Create samfile // 생성경로 및 파일이름 상황에 맞게 수정해 주십시요. function fCreateFile(myPath) { var txtsrc = sTxt; var fso = new ActiveXObject("Scripting.FileSystemObject"); fso.CreateTextFile(myPath, true); var newFileObject = fso.GetFile(myPath); var text = newFileObject.OpenAsTextStream(2, 0); text.Write(txtsrc); text.Close(); } // Barcode Image 출력 function fQRmaker(myCommand) { var WshShell = new ActiveXObject("wscript.shell"); WshShell.Run(myCommand); } // Sleep 함수 function fMySleep(myTimeOut) { var start = new Date().getTime(); var cur = start; while (cur - start < myTimeOut) { cur = new Date().getTime(); } } // Barcode Image 존재여부 검사 function fImageCheck(myPath) { var objFSO; var wshshell = new ActiveXObject("wscript.shell"); var path = wshshell.ExpandEnvironmentStrings(myPath); objFSO = new ActiveXObject("Scripting.FileSystemObject"); var myTimeOut = 0; // 무한루프 while (1) { // 이미지 파일이 존재하면 루푸를 탈출 합니다. if (objFSO.FileExists(path) == true) { break; } else { fMySleep(500); // 0.5초간 대기 myTimeOut += 500; // 대기한 시간만큼 누적합니다. } // 누적시간이 5초가 넘으면 이미지가 생성되지 않았어도 루푸를 탈출 합니다. if (myTimeOut >= 5000) { break; } } //// 이미지가 존재하면 처방전에 출력. if (objFSO.FileExists(path)) { //alert('파일있음'); return true; } else { //alert('파일없음'); return false; } } // Barcode 이미지 삭제 function fImageDelete(myPath) { var objFSO; var wshshell = new ActiveXObject("wscript.shell"); var path = wshshell.ExpandEnvironmentStrings(myPath); objFSO = new ActiveXObject("Scripting.FileSystemObject"); // 디렉토리가 존재하면 삭제 - 예외처리 구현. if (objFSO.FileExists(path)) { objFSO.DeleteFile(path); //alert('파일삭제-완료'); } else { //alert('파일없음-실패'); } } function fMakeQRSamStr(){ sTxt = model.getValue("/root/main/prcpdata/patinfo/qrstr" ); }