/************************************************************************************************ @(#)AHA001.js @author : 손주연 @version : 2007-04-18 @desc : 건진업무에서 사용하는 공용함수 관리 *************************************************************************************************/ /************************************************************************************************ **fMoveFocus @author : 손주연 @version : 2007-04-18 @desc : enter key입력시 특정 control로 focus 이동 *************************************************************************************************/ function fMoveFocus(vCtrlID){ if( event.keyCode == 13 ) { if( vCtrlID != "" ) model.setFocus(vCtrlID); } } /************************************************************************************************ **fExcelUpload @author : 손주연 @version : 2007-04-18 @desc :Excel File을 grid로 load한다. @param : grid control id *************************************************************************************************/ function fExcelToGrid(grdObj){ /* if(grdObj == "xforms:datagrid"){*/ var fileName = window.fileDialog("open", ",", false, "", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls"); vId.loadExcel(fileName, 1, true); var cnt = grdObj.rows; var i = 0; for( i = 1; i < cnt +1 ; i++) { grdObj.addStatus(i, "insert"); } grdObj.deleteRow(1); grdObj.refresh(); } /** *====================================================================================================================================. @author : 손주연 @version : 2007-04-20 @desc : 건진구분 설정 => 추후 로그인 시 건진구분 세션관리가 되지 않을 경우를 대비. @param : grid control id @return : C: 종건/ G :일건 ====================================================================================================================================*/ function fGetHealExamFlag(){ var sFlag = getScreenMenuParameter(); var sFlagLen = parseInt(sFlag.length); //한자리 이하 인경우 ==> 건진장소구분(K,S)로 구분 if(sFlagLen <= 1){ if(sFlag == "") sFlag = "C"; }else{ // 한자리 초과인경우 => 건진상세구분 (CXX ,GXX)로 구분 sFlag = sFlag.substr(0, 1); } return sFlag; } /** *====================================================================================================================================. @author : 손주연 @version : 2007-04-20 @desc : 건진상세구분 설정 => 추후 로그인 시 건진구분 세션관리가 되지 않을 경우를 대비. @param : grid control id @return : C: 종건/ G :일건 ====================================================================================================================================*/ function fGetHealExamDetlFlag(){ var sFlag = getScreenMenuParameter() ; var sFlagLen = parseInt(sFlag.length); // 한자리 이하 인경우 ==> 건진장소구분(K,S)로 구분 if(sFlagLen <= 1) { if( sFlag == "" ) { sFlag = "C01"; } else { sFlag=sFlag +'01'; } }else { // 한자리 초과인경우 => 건진상세구분 (CXX ,GXX)로 구분 sFlag = sFlag } return sFlag ; } /** * 기관코드 및 사업체코드가져오기====================================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 기관코드 및 사업체코드가져오기 @param : *vOpenerID : 현재화면ID *vFlag : 코드구분 공통코드 A0114참조 ** 01 판정의 ** 02 건강보험공단 ** 03 관할군병원 ** 04 산업안전공단 ** 05 보건소 ** 06 노동청 ** 07 지도원 ** 08 사업체 * vCond : 검색구분(cd/nm) * vCdnm : 검색조건(코드/명칭) * vDesXPathCd: code값을 setting할 목적노드 * vDesXPathNm: name값을 setting할 목적노드 * SPAHA00500_PARAM1 : 코드구분 공통코드 A0114참조 * SPAHA00500_PARAM2 : 검색구분(cd/nm) * SPAHA00500_PARAM3 : 검색조건(코드/명칭) * SPAHA00500_PARAM4 : 기관코드 * SPAHA00500_PARAM5 : 코드구분 공통코드 A0114참조 * SPAHA00500_PARAM6 : code값을 setting할 목적노드 * SPAHA00500_PARAM7 : name값을 setting할 목적노드 */ function fGetComnCd(vOpenerID, vFlag , vCond, vCdnm , vDesXPathCd , vDesXPathNm ){ clearParameter("SPAHA00500_PARAM1"); clearParameter("SPAHA00500_PARAM2"); clearParameter("SPAHA00500_PARAM3"); clearParameter("SPAHA00500_PARAM4"); clearParameter("SPAHA00500_PARAM5"); clearParameter("SPAHA00500_PARAM6"); clearParameter("SPAHA00500_PARAM7"); setParameter ("SPAHA00500_PARAM1", vFlag); setParameter ("SPAHA00500_PARAM2", vCond); setParameter ("SPAHA00500_PARAM3", vCdnm); setParameter ("SPAHA00500_PARAM4", getUserInfo("dutplceinstcd")); setParameter ("SPAHA00500_PARAM5", vOpenerID); setParameter ("SPAHA00500_PARAM6", vDesXPathCd); setParameter ("SPAHA00500_PARAM7", vDesXPathNm); modal("SPAHA00500"); } /** * Node가 존재하지 않을 경우 make.====================================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : Node가 존재하지 않을 경우 make. @param : * xPath : node XPath * bMake : make 여부 @return : true/false (node 존재 여부 ) */ function fCheckNodeExist(xPath, bMake){ var node = instance1.selectSingleNode(xPath); if(node == null){ if(bMake == true){ model.makeNode(xPath); return true; }else{ return false; } } return true; } /** * 환자검색창 open===================================================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 환자검색창 open @param : * SPAHA00400_PARAM1 : 현재화면ID * SPAHA00400_PARAM2 : 검색조건 pnm/pid/rgstno * SPAHA00400_PARAM3 : 검색어 * SPAHA00400_PARAM4 : nodeset전체 copy여부 (N일경우 원무등록번호와 환자 한글명만 copy) * SPAHA00400_PARAM5 : nodeset전체 copy여부 Y 일경우 대상노드 * SPAHA00400_PARAM6 : nodeset전체 copy여부 N 일경우 원무등록번호 대상노드 * SPAHA00400_PARAM7 : nodeset전체 copy여부 N 일경우 환자 한글명 대상노드 * ===================================================================================================================================================== */ function fSearchPatInfo(vOpenerID, vCond, vCdnm, vSetYN, vDestXPath, vDestPid, vDestPnm, vRgstNo1, vRgstNo2, vHometel, vMpphontel, vSex, vAge){ clearParameter("SPAHA00400_PARAM1"); clearParameter("SPAHA00400_PARAM2"); clearParameter("SPAHA00400_PARAM3"); clearParameter("SPAHA00400_PARAM4"); clearParameter("SPAHA00400_PARAM5"); clearParameter("SPAHA00400_PARAM6"); clearParameter("SPAHA00400_PARAM7"); clearParameter("SPAHA00400_PARAM8"); clearParameter("SPAHA00400_PARAM9"); clearParameter("SPAHA00400_PARAM10"); clearParameter("SPAHA00400_PARAM11"); clearParameter("SPAHA00400_PARAM12"); clearParameter("SPAHA00400_PARAM13"); setParameter ("SPAHA00400_PARAM1", vOpenerID); setParameter ("SPAHA00400_PARAM2", vCond); setParameter ("SPAHA00400_PARAM3", vCdnm); setParameter ("SPAHA00400_PARAM4", vSetYN); setParameter ("SPAHA00400_PARAM5", vDestXPath); setParameter ("SPAHA00400_PARAM6", vDestPid); setParameter ("SPAHA00400_PARAM7", vDestPnm); setParameter ("SPAHA00400_PARAM8", vRgstNo1); setParameter ("SPAHA00400_PARAM9", vRgstNo2); setParameter ("SPAHA00400_PARAM10", vHometel); setParameter ("SPAHA00400_PARAM11", vMpphontel); setParameter ("SPAHA00400_PARAM12", vSex); setParameter ("SPAHA00400_PARAM13", vAge); modal("SPAHA00400"); } /** * 환자인적사항저장===================================================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 환자인적사항저장 @param : * vPidYN : 등록번호생성여부 */ function fSavePatInfo(vPidYN){ if(fCheckPatInfo() == false) return; fCheckNodeExist("/root/main/info/patinfo/item/pidcretfg", true); model.removenode("/root/send/save"); model.makeNode("/root/send/save"); model.setValue("/root/main/info/patinfo/item/pidcretfg", vPidYN); model.copyNode("/root/send/save", "/root/main/info/patinfo/item"); fCheckNodeExist("/root/send/save/userid", true); fCheckNodeExist("/root/send/save/instcd", true); model.setValue("/root/send/save/userid", getUserId()); model.setValue("/root/send/save/instcd", getUserInfo("dutplceinstcd")); model.makeNode("/root/send/save/healexamdetlflag"); model.setValue("/root/send/save/healexamdetlflag", model.getValue("/root/send/srchhealexamflag")); model.makeNode("/root/send/save/zipcdaddr"); model.setValue("/root/send/save/zipcdaddr", model.getValue("/root/main/info/patinfo/item/addr1")); model.makeNode("/root/send/save/builno"); model.setValue("/root/send/save/builno", model.getValue("/root/temp/address/builno")); //openLoadingBar("건진자 인적사항 저장 중입니다.."); //처리중 화면을 오픈한다. submit("TXAHA00101"); //closeLoadingBar() ;//처리중 화면을 close한다. } /** * 건진자인적사항 내용 check.========================================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 건진자인적사항 내용 check @param : */ function fCheckPatInfo(vFrom){ if(vFrom=="1"){ /** * 필수항목 입력여부 check. */ var vTmp = ipt_pnm.currentText.getTrim(); //model.getValue("/root/main/info/patinfo/pnm"); if(vTmp == ""){ messageBox("성명을 ", "C001"); model.setFocus("ipt_pnm"); return false; } /** * 외국인일 경우 별도의 구분 없이 주민번호 뒷번호가 남/여, 5/6으로 처리. */ vTmp = ipt_rgstno1.currentText; //model.getValue("/root/main/info/patinfo/rgstno1"); if(vTmp == ""){ messageBox("주민번호를 ", "C001"); model.setFous("ipt_rgstno1"); return false; } vTmp = ipt_rgstno2.currentText; //model.getValue("/root/main/info/patinfo/rgstno2"); if(vTmp == ""){ messageBox("주민번호를 ", "C001"); model.setFocus("ipt_rgstno2"); return false; } return true; }else{ return true; } } /** ========================================================================================================== * fCheckRgstNo @author : 손주연 @version : 2007-04-30 @desc : 주민번호 유효여부 check @param : ==========================================================================================================================*/ function fCheckRgstNo(){ var vTmp = ipt_rgstno1.currentText + ipt_rgstno2.currentText ; if( isResidentNo(vTmp) == false ){ if( messageBox("유효하지 않은 주민번호 입니다. ", "Q003") == 6 ) { return true; } model.setFocus("ipt_rgstno1"); return false; } if( isResidentNo(vTmp) == true && vTmp.substr(7, 6)=='000000'){ if( messageBox("외국인 입니다. ", "Q003") == 6 ) { cmb_forgneryn.value = "Y"; return true; } model.setFocus("ipt_rgstno1"); return false; } return true ; } /** ========================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 주민번호로 생년월일/성별/나이 기본 setting @param : * ==========================================================================================================*/ function fSetBrthDD(){ //if( ipt_brthdd.value != "" ) return ; var vrgstno1 = ipt_rgstno1.currentText; var vrgstno2 = ipt_rgstno2.currentText; var vSex = vrgstno2.substr( 0, 1) ; var vBrthdd = ""; if( ( vSex == 3 ) || (vSex == 4) ) { vBrthdd = "20" + vrgstno1; } else { vBrthdd = "19" + vrgstno1; } ipt_brthdd.value = vBrthdd; opt_sex.value = getGender(vrgstno1+ vrgstno2); opt_age.value = getFullAge(vrgstno1+ vrgstno2); } function isResidentNo(pResidnetNo){ if(isNaN(pResidnetNo)) return false; if(pResidnetNo.length != 13) return false; var c = pResidnetNo.substr(6,1); if(c == '5' || c == '6') return true; var c2 = pResidnetNo.substr(7,6); if(c2 == '000000') return true; last = pResidnetNo.substr(12,1); regNo = new Array(12); regNo[12] = 0; for(var i = 0; i < (regNo.length - 1); i++) { regNo[i] = eval(pResidnetNo.substr(i, 1)) * ((i % 8) + 2); } for(var i = 0; i < (regNo.length - 1); i++) { regNo[12] += regNo[i]; } var result = ((11 - (regNo[12] % 11)) % 10); if(result == eval(last)) { return true; } else { return false; } } /** ========================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 수진자 인적사항만 조회, 외국인일 경우 별도의 구분 없이 주민번호 뒷번호가 남/여, 5/6으로 처리. @param : * 조회조건 : vMode (0 -pnm:환자명, 1-rgstno: 주민번호, 2-pid:등록번호, 3-hpid:건진임시환자번호) * vPidXPath : pid node * vPnmXPath : pnm node * ==========================================================================================================*/ function fGetPatInfo(vMode){ var vCond = ""; var vChoiFlag = ""; vChoiFlag = model.getValue("/root/main/info/rsrvacptinfo/item/choiflag"); switch(vMode){ case 0: vCond = "pnm"; break; case 1: vCond = "rgstno"; if(fCheckRgstNo() == false){ ipt_rgstno1.value = ""; ipt_rgstno2.value = ""; return ; } break; case 2: vCond = "pid"; break; default : vCond = "hid"; break; } model.removeNodeSet("/root/send/save"); model.makeNode("/root/send/save"); fCheckNodeExist("/root/send/srchcond" , true ); fCheckNodeExist("/root/send/srchinstcd" , true ); fCheckNodeExist("/root/send/srchhealexampid" , true ); fCheckNodeExist("/root/send/srchrgstno1" , true ); fCheckNodeExist("/root/send/srchrgstno2" , true ); fCheckNodeExist("/root/send/srchpid" , true ); fCheckNodeExist("/root/send/srchpnm" , true ); model.setValue("/root/send/srchcond" , vCond); model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd")); if(vCond == "pnm"){ model.setValue("/root/send/srchpnm" , ipt_pnm.currentText); }else if(vCond == "pid"){ model.setValue("/root/send/srchpid" , ipt_pid.currentText); }else if(vCond == "rgstno"){ model.setValue("/root/send/srchrgstno1" , ipt_rgstno1.currentText); model.setValue("/root/send/srchrgstno2" , ipt_rgstno2.currentText); }else{ model.setValue("/root/send/srchhealexampid" , model.getValue("/root/main/info/patinfo/item/healexampid")); } fCheckNodeExist("/root/temp/patinfo/item", true); model.resetInstanceNode("/root/temp/patinfo/item"); submit("TRAHA00101", false); //node clear현상때문임... var tmpnode = model.instance1.selectSingleNode("/root/temp/patinfo/item/pid"); if(tmpnode != null){ model.copyNode("/root/main/info/patinfo/item", "/root/temp/patinfo/item"); model.makeValue("/root/main/info/rsrvacptinfo/item/choiflag", vChoiFlag); ipt_pid.disabled = true; }else{ model.makeValue("/root/main/info/rsrvacptinfo/item/choiflag", vChoiFlag); } model.refresh(); } function fGetPatInfo2(vMode ){ var vCond = ""; switch( vMode ){ case 0: vCond = "pnm"; break; case 1: vCond = "rgstno"; if( fCheckRgstNo() == false ){ ipt_rgstno1.value = ""; ipt_rgstno2.value = ""; return ; } break; case 2: vCond = "pid"; break; default : vCond = "hid"; break; } model.removeNodeSet("/root/send/save"); model.makeNode("/root/send/save"); fCheckNodeExist("/root/send/srchcond" , true ); fCheckNodeExist("/root/send/srchpnm" , true ); fCheckNodeExist("/root/send/srchpid" , true ); fCheckNodeExist("/root/send/srchrgstno1" , true ); fCheckNodeExist("/root/send/srchrgstno2" , true ); fCheckNodeExist("/root/send/srchhealexampid", true ); fCheckNodeExist("/root/send/srchinstcd" , true ); model.setValue("/root/send/srchcond" , vCond); if( vCond == "pnm") { model.setValue("/root/send/srchpnm" , ipt_pnm.currentText ); } else if( vCond == "pid") { model.setValue("/root/send/srchpid" , model.getValue("/root/send/healexampid")); } else if( vCond == "rgstno") { model.setValue("/root/send/srchrgstno1" , ipt_rgstno1.currentText ); model.setValue("/root/send/srchrgstno2" , ipt_rgstno2.currentText ); } else { model.setValue("/root/send/srchhealexampid" , model.getValue("/root/main/info/patinfo/item/healexampid")); } model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd")); fCheckNodeExist("/root/temp/patinfo/item", true); model.resetInstanceNode("/root/temp/patinfo/item"); submit("TRAHA00101") ; //node clear현상때문임... var tmpnode = model.instance1.selectSingleNode("/root/temp/patinfo/item/pid"); if( tmpnode != null ){ model.copyNode("/root/main/info/patinfo/item", "/root/temp/patinfo/item"); } else { //model.resetInstanceNode("/root/main/info/patinfo/item"); } model.refresh(); } function setPkgInfo(){ } /** ========================================================================================================== @author : 손주연 @version : 2007-09-30 @desc : 수진자 인적사항만 조회, 외국인일 경우 별도의 구분 없이 주민번호 뒷번호가 남/여, 5/6으로 처리. @param : * 조회조건: vMode (0 -pnm:환자명, 1-rgstno: 주민번호, 2-pid:등록번호, 3-hpid:건진임시환자번호) * vCond1 : 검색어1 * vCond2 : 검색어2 (주민번호일경우 ...) * vDestXPath : 대상 노드 * ==========================================================================================================*/ function ahafGetPatInfo(vMode, vCond1, vCond2 , vDestXPath ){ var vCond = ""; switch( vMode ){ case 0: vCond = "pnm"; break; case 1: vCond = "rgstno"; if( fCheckRgstNo() == false ){ ipt_rgstno1.value = ""; ipt_rgstno2.value = ""; return ; } break; case 2: vCond = "pid"; break; default : vCond = "hid"; break; } fCheckNodeExist(vDestXPath , true ); fCheckNodeExist("/root/send/srchcond" , true ); fCheckNodeExist("/root/send/srchpnm" , true ); fCheckNodeExist("/root/send/srchpid" , true ); fCheckNodeExist("/root/send/srchrgstno1" , true ); fCheckNodeExist("/root/send/srchrgstno2" , true ); fCheckNodeExist("/root/send/srchhealexampid" , true ); fCheckNodeExist("/root/send/srchinstcd" , true ); model.setValue("/root/send/srchcond" , vCond); if( vCond == "pnm") { model.setValue("/root/send/srchpnm" , vCond1); }else if( vCond == "pid") { model.setValue("/root/send/srchpid" ,vCond1); }else if( vCond == "rgstno") { model.setValue("/root/send/srchrgstno1" , vCond1 ); model.setValue("/root/send/srchrgstno2" , vCond2 ); }else{ model.setValue("/root/send/srchhealexampid" , vCond1 ); } model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd")); fCheckNodeExist("/root/temp/patinfo/item", true); model.resetInstanceNode("/root/temp/patinfo/item"); var ret = submit("TRAHA00101") ; if( ret == false ) return false; //node clear현상때문임... var tmpnode = model.instance1.selectSingleNode("/root/temp/patinfo/item/pid"); if( tmpnode != null ){ model.copyNode(vDestXPath, "/root/temp/patinfo/item"); return true ; } return false; } /** ========================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 예약/접수정보를 저장 @param : * Mode : 공통코드A0107참조 **A 예약 **B 예약보류 **C 예약확인 **D 예약취소 **E 접수 **F 접수취소 **G 결과 **H 판정 * ==========================================================================================================*/ function fSaveRsrvAcpt(vMode,vFrom){ } /** ========================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 건진자별 건진이력조회 @param : * vPid : 등록번호 * ==========================================================================================================*/ function ahafGetHistList(vPid){ //var node = instance1.selectSingleNode("/root/main/info/histlst/item"); model.removeNodeset("/root/main/info/histlst/item"); if( vPid == "" ) return ; var vhf = ""; if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")==""){ vhf = fGetHealExamFlag(); }else{ vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag"); } model.setValue("/root/send/srchhealexamflag" , vhf); model.setValue("/root/send/srchhealexamdetlflag" , cmb_healexamdetlflag.value ); model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd")); model.setValue("/root/send/srchpid" , vPid); submit("TRAHA00106"); } /** ========================================================================================================== @author : 김호익 @version : 2007-11-15 @desc : 검진페키지 상세조회(예약/접수) @param : * vPkgCd : 패키지 코드 * ==========================================================================================================*/ function ahafGetPkgDetlList(vPkgCd){ if( vPkgCd == "" ){ messageBox("선택된 패키지가 없습니다.", "E999"); return ; } model.makeValue("/root/send/PkgCd" , vPkgCd); model.makeValue("/root/send/cmpycd" , model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd")); model.makeValue("/root/send/conseq" , model.getValue("/root/main/info/rsrvacptinfo/item/conseq")); model.makeValue("/root/send/conhistseq" , model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq")); submit("TRAHA00113"); } function fSetInstance(svalue){ model.makeValue("/root/tmp/reqacpt/divflag", svalue); model.makeValue("/root/tmp/reqadd/divflag", svalue); model.makeValue("/root/tmp/reqpkg/divflag", svalue); model.makeValue("/root/tmp/reqacptold/divflag",svalue); model.makeValue("/root/tmp/reqaddold/divflag", svalue); model.makeValue("/root/tmp/opatvo/divflag", svalue); model.makeValue("/root/tmp/getvo/divflag", svalue); model.makeValue("/root/tmp/getsflag/divflag", svalue); model.makeValue("/root/tmp/reqords/divflag", svalue); model.makeValue("/root/tmp/retvo/divflag", svalue); model.makeValue("/root/tmp/retstd/divflag", svalue); model.makeValue("/root/tmp/reqpat/divflag", svalue); } /** ========================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 건진자별 건진이력조회 @param : * vPid : 등록번호 * ==========================================================================================================*/ function ahafGetHistList2(vPid, vHealExamDetlFlag , vStatFlag){ //var node = instance1.selectSingleNode("/root/main/info/histlst/item"); model.removeNodeset("/root/main/info/histlst/item"); if( vPid == "" ) return ; model.setValue("/root/send/srchhealexamflag" , vHealExamDetlFlag.substr(0,1)); model.setValue("/root/send/srchhealexamdetlflag" , vHealExamDetlFlag ); model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd")); model.setValue("/root/send/srchpid" , vPid); model.setValue("/root/send/srchstatflag" , vStatFlag); submit("TRAHA00106"); } /** ========================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 패키지 상세내역조회 @param : * sPkgcd : 패키지코드 * sPkgnm : 패키지명 * sSex : 건진자 성별 * sCmpycd : 단체코드 * iConseq : 계약번호 * iConHistseq : 계약이력번호 * ==========================================================================================================*/ function fGetConAddList(sPkgcd, sPkgnm, sSex, sCmpycd, iConseq,iConHistseq ){ model.removeNodeset("/root/temp/pkgtestcdlst"); if( ( (sCmpycd == "") || ( iConseq == "" ) || ( iConHistseq == "" )|| ( iConseq == "0" ) || ( iConHistseq == "0" )) && ( (sPkgcd == "") ||(sPkgnm == "")) ) return ; model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd") ); model.setValue("/root/send/srchpkgcd" , sPkgcd); var vhf = ""; if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")=="") { vhf = fGetHealExamFlag(); } else { vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag"); } model.setValue("/root/send/srchhealexamflag", vhf); model.setValue("/root/send/srchcmpycd" , sCmpycd); model.setValue("/root/send/srchconseq" , iConseq ); model.makeNode("/root/send/srchconhistseq" ); model.setValue("/root/send/srchconhistseq" , iConHistseq ); model.setValue("/root/send/srchsex" , sSex ); model.makeValue("/root/send/srchage" , ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1"),model.getValue("/root/main/info/patinfo/item/rgstno2"))); //2015/10/22 이정택 수정 model.makeValue("/root/send/forgneryn", model.getValue("/root/main/info/patinfo/item/forgneryn")); model.makeValue("/root/send/agencyrate", model.getValue("/root/main/info/rsrvacptinfo/item/agencyrate")); //2015/10/22 이정택 수정 submit("TRAHA00107",false); copyNodeListType("/root/temp2","/root/main/info/rsrvacptinfo/addlst"); //copyNodeListType("/root/temp2","/root/main/info/rsrvacptinfo/addlst[testflag='A']"); var node = instance1.selectSingleNode("/root/temp/pkgtestcdlst/addlst"); if( node != null ){ var i = grd_addlst.rows; model.removeNodeset("/root/main/info/rsrvacptinfo/addlst"); copyNodeListType("/root/main/info/rsrvacptinfo", "/root/temp/pkgtestcdlst/addlst", "after"); if(model.getValue("/root/temp2/addlst/testcd") != ""){ copyNodesetType("/root/main/info/rsrvacptinfo/addlst" , "/root/temp2/addlst","after"); } var cnt = getNodesetCount("/root/temp/pkgtestcdlst") + i; //model.refresh(); for( ; i < cnt ; i++) { grd_addlst.addStatus(i,"insert"); } }else{ model.removeNodeset("/root/main/info/rsrvacptinfo/addlst"); if(model.getValue("/root/temp2/addlst/testcd") != ""){ copyNodeListType("/root/main/info/rsrvacptinfo" , "/root/temp2/addlst","after"); } } } /** ========================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 예약접수 상세내역조회 @param : * vMode : 리스트 구분 * ==========================================================================================================*/ function ahafGetRsrvAcptDetl(vMode){ fInitInfo(); // 오른쪽 정보들 초기화 및 기본 값 셋팅 var vXpath = ""; var idx = -1; switch(vMode){ case 1: vXpath = "/root/main/list/rsrvlst["; idx = grd_rsrvlst.row; break; case 2: vXpath = "/root/main/list/rsrvlst["; idx = grd_rsrventlst.row; break; case 3: vXpath = "/root/main/list/acptlst["; idx = grd_acptlst.row; break; case 4: vXpath = "/root/main/list/cncllst["; idx = grd_cncllst.row; break; case 5: //일반건진 2차대상자 리스트 vXpath = "/root/main/list/sndlst["; idx = grd_sndlst.row; break; case 6 : //건진이력 vXpath = "/root/main/info/histlst/item["; //idx = grd_sndlst.row; idx = grd_hist.row; break; default: messageBox("인자가 잘못되었습니다", "E999"); return ; break; } if( idx < 1) { messageBox("건진내역을 ", "C002"); return ; } var vRsrvdd = model.getValue(vXpath + idx + "]/rsrvdd"); var vRsrvno = model.getValue(vXpath + idx + "]/rsrvno"); /* *가예약 일경우 환자정보 patm의 정보만으로 조회 * pid가 0일 경우 ptbs에 정보가 없을 수 있음 */ var vStatFlag = model.getValue(vXpath + idx + "]/statflag"); var vPid = model.getValue(vXpath + idx + "]/pid"); ahafGetRsrvAcpDetltInfo(vRsrvdd, vRsrvno , vStatFlag , vPid);// 바로 아래 함수 } /** ========================================================================================================== @author : 손주연 @version : 2007-04-30 @desc : 예약/접수 상세내역 조회 @param : * vRsrvdd : 예약등록일자 * vRsrvno : 예약번호 @return : 건진상세내역 * ==========================================================================================================*/ function ahafGetRsrvAcpDetltInfo(vRsrvdd, vRsrvno , vStatFlag , vPid){ if((vRsrvdd == "") || (vRsrvno == "")) return ; fCheckNodeExist("/root/send/srchhealexamflag" , true ); fCheckNodeExist("/root/send/srchrsrvdd" , true ); fCheckNodeExist("/root/send/srchrsrvno" , true ); fCheckNodeExist("/root/send/srchinstcd" , true ); fCheckNodeExist("/root/send/scrnnm" , true ); var vhf = ""; if(model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag") == ""){ vhf = fGetHealExamFlag(); }else{ vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag"); } model.setValue("/root/send/srchhealexamflag", vhf); model.setValue("/root/send/srchrsrvdd" , vRsrvdd); model.setValue("/root/send/srchrsrvno" , vRsrvno); model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd") ); model.setValue("/root/send/scrnnm" , vStatFlag == "A" && vPid == "0" ? "internet":"" ); //model.makeValue("/root/send/srchage" , ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1"), model.getValue("/root/main/info/patinfo/item/rgstno2"))); model.resetInstanceNode("/root/main/info/patinfo/item"); model.resetInstanceNode("/root/main/info/rsrvacptinfo/item"); model.resetInstanceNode("/root/temp/info/rsrvacptinfo"); model.resetInstanceNode("/root/temp/info/patinfo"); //TRAHA00102 -> 접수정보/ 메모/ 최근 건진 내역/ 개인정보(접수정보랑 겹치지 않나 생각됨) //검사코드 리스트// 추가검사내역? // 태그 넘버// 수납 내역 //상태 값을 넘겨서 조회를 해야할것와 하지 않아도 될것을 구분하면 좋을꺼 같음. if(submit("TRAHA00102", false) != true){ return; } var i = 0; //node clear현상때문임.. // 건진정보 var tmpnode = instance1.selectSingleNode("/root/temp/info/rsrvacptinfo"); if(tmpnode != null){ model.copyNode("/root/main/info/rsrvacptinfo/item", "/root/temp/info/rsrvacptinfo"); } //건진장소 확인 //건진자의 건진장소 구분이 없으면 Default 셋팅된 건진장소 구분을 등록 var patPlacecd = model.getValue("/root/main/info/rsrvacptinfo/item/healexamplacecd"); var defaultPlacecd = model.getValue("/root/init/place/healexamplacecd"); model.setValue("/root/main/info/rsrvacptinfo/item/healexamplacecd", patPlacecd == "" ? defaultPlacecd :patPlacecd) //추가검사내역 model.removeNodeset("/root/main/info/rsrvacptinfo/addlst"); var nodelst = instance1.selectNodes("/root/temp/info/addlst"); // 2008-06-11 이성인 //.refresh() 의 존재 이유를 모르기 때문에 일단 주석처리 -> 테스트 해본바 잘못된거 없는거 같음 //model.refresh(); if(nodelst.length > 0){ for(i=0; i 테스트 해본바 잘못된거 없는거 같음 //model.refresh(); if(nodelst.length > 0){ for(i=0; i 0){ for(i=0; i 0){ for(i=0; i 0){ for(i=0; i 0){ for(i=0; i 6) cal_col -= 7; var rsrvdd = ""; if( cal_row > 0 ){ var dd = model.getValue( grdObj.nodeset + "[" + cal_row + "]/" + grdObj.colAttribute( cal_col,"ref") ) ; if( dd.length < 2 ) { dd = "0" + dd; } rsrvdd = model.getValue("/root/temp/calendar/year") + model.getValue("/root/temp/calendar/month") + dd ; } return rsrvdd; } /**================================================================================================================== @author : 손주연 @version : 2007-06-30 @desc : Calendar 새로그리기 @param : * vDateFg : Y-년도, M-월 * vIncrease : 증감(+/-) @return : date (YYYYMMDD) *====================================================================================================================*/ function fHRefreshCalender(vDateFg, vIncrease){ if( (vDateFg != "Y" ) && (vDateFg != "M") ) { return ; } var iTerm = parseInt(vIncrease); var isMonth = model.getValue("/root/temp/calendar/month"); var isYear = model.getValue("/root/temp/calendar/year"); var isDate = (isYear+isMonth+1).toDate().getAddDate(iTerm,vDateFg); model.setValue("/root/temp/calendar/year", isDate.getDateFormat('YYYY')); model.setValue("/root/temp/calendar/month", isDate.getDateFormat('MM')); model.refresh(); setCalendar(isDate); } /**================================================================================================================== @author : 손주연 @version : 2007-04-18 @desc : fExcelUpload 엑셀파일을 해당 그리드로 in @param : grid object *====================================================================================================================*/ function fExcelUpload(grdObj){ if( grdObj == null ){ messageBox("grdObj is null!", "E999"); return ; } var fileName = window.fileDialog("open", ",", false, "", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls"); grdObj.loadExcel(fileName, 1, true); var cnt = grdObj.rows; var i = 0; for( i = 1; i < cnt +1 ; i++) { grdObj.addStatus(i, "insert"); } grdObj.deleteRow(1); grdObj.refresh(); } /**================================================================================================================== @author : 손주연 @version : 2007-04-18 @desc : 질환코드 선택 창 open @param : grid object * SPAHB00200_PARAM1 : 현재화면ID * SPAHB00200_PARAM2 : 질환코드 * SPAHB00200_PARAM3 : 질환명 * SPAHB00200_PARAM4 : 대상 nodeset count * SPAHB00200_PARAM5 : 대상 nodeset *====================================================================================================================*/ function ahafGetSickCd(vOpenerID, vCondCd, vCondNm, vDestCnt, vDestXPath, vMappSickCd ){ clearParameter("SPAHB00200_PARAM1"); clearParameter("SPAHB00200_PARAM2"); clearParameter("SPAHB00200_PARAM3"); clearParameter("SPAHB00200_PARAM4"); clearParameter("SPAHB00200_PARAM5"); clearParameter("SPAHB00200_PARAM6"); setParameter ("SPAHB00200_PARAM1", vOpenerID); setParameter ("SPAHB00200_PARAM2", vCondCd); setParameter ("SPAHB00200_PARAM3", vCondNm); setParameter ("SPAHB00200_PARAM4", vDestCnt); setParameter ("SPAHB00200_PARAM5", vDestXPath); setParameter ("SPAHB00200_PARAM6", vMappSickCd); modal("SPAHB00200"); } /**================================================================================================================== @author : 손범성 @version : 2007-12-18 @desc : 검사코드 선택 창 open @param : grid object * SPAHB00500_PARAM1 : 현재화면ID * SPAHB00500_PARAM2 : 검사코드 * SPAHB00500_PARAM3 : 검사명 * SPAHB00500_PARAM4 : 대상 nodeset count * SPAHB00500_PARAM5 : 대상 nodeset *====================================================================================================================*/ function ahafGetTestCd(vOpenerID, vCondCd, vCondNm, vDestCnt, vDestXPath,vjudgexmpcd ){ clearParameter("SPAHB00600_PARAM1"); clearParameter("SPAHB00600_PARAM2"); clearParameter("SPAHB00600_PARAM3"); clearParameter("SPAHB00600_PARAM4"); clearParameter("SPAHB00600_PARAM5"); clearParameter("SPAHB00600_PARAM6"); clearParameter("SPAHB00600_PARAM7"); clearParameter("SPAHB00600_PARAM8"); setParameter ("SPAHB00600_PARAM1", vOpenerID); setParameter ("SPAHB00600_PARAM2", vCondCd); setParameter ("SPAHB00600_PARAM3", vCondNm); setParameter ("SPAHB00600_PARAM4", vDestCnt); setParameter ("SPAHB00600_PARAM5", vDestXPath); setParameter ("SPAHB00600_PARAM6", vjudgexmpcd); modal("SPAHB00600"); } /**================================================================================================================== @author : 손주연 @version : 2007-04-18 @desc : 처방가져오기 @param : * vOpenerID : 현재화면ID * vPkgFg : * bMultiyn : 다중체크여부 * vCond : 검색구분(cd/nm) * vCdnm : 검색조건(코드/명칭) * vHeDetlFg : 건진상세구분 * vSex : 성별구분(M/F) * SPAHA00200_PARAM1 : P=>pkg, C=>단체pkg, A=>추가검사,S=>선택검사(추가검사와 동일한 검색조건임), T=>일반검사코드 * SPAHA00200_PARAM2 : 검색구분(cd/nm) * SPAHA00200_PARAM3 : 검색조건(코드/명칭) * SPAHA00200_PARAM4 : 기관코드 * SPAHA00200_PARAM5 : 건진구분( 공통코드 A0068참고) * SPAHA00200_PARAM6 : 건진구분( 공통코드 A0069, A0070 참고) * SPAHA00200_PARAM7 : vOpenerID * SPAHA00200_PARAM8 : 성별구분(M/F) * SPAHA00200_PARAM9 : 다중선택여부(Y/N) * SPAHA00200_PARAM10 : single 입력일 경우 대상 nodeset *====================================================================================================================*/ function fGetPkgCd(vOpenerID, vPkgFg, bMultiyn,vCond, vCdnm , vHealExamDetlFlag, vSex, vDestXPath, vSrchDisableYN,vFrom,vage,vbrthareacnts,vforgneryn, vagencyrate ){ clearParameter("SPAHA00200_PARAM1"); clearParameter("SPAHA00200_PARAM2"); clearParameter("SPAHA00200_PARAM3"); clearParameter("SPAHA00200_PARAM4"); clearParameter("SPAHA00200_PARAM5"); clearParameter("SPAHA00200_PARAM6"); clearParameter("SPAHA00200_PARAM7"); clearParameter("SPAHA00200_PARAM8"); clearParameter("SPAHA00200_PARAM9"); clearParameter("SPAHA00200_PARAM10"); clearParameter("SPAHA00200_PARAM11"); clearParameter("SPAHA00200_PARAM12"); clearParameter("SPAHA00200_PARAM13"); clearParameter("SPAHA00200_PARAM14"); clearParameter("SPAHA00200_PARAM15"); //2015/10/21 이정택 추가(외국인 MOU요율관련) clearParameter("SPAHA00200_PARAM16"); setParameter ("SPAHA00200_PARAM1" , vPkgFg); setParameter ("SPAHA00200_PARAM2" , vCond); setParameter ("SPAHA00200_PARAM3" , vCdnm); setParameter ("SPAHA00200_PARAM4" , getUserInfo("dutplceinstcd")); if(vHealExamDetlFlag!="G01"){ setParameter ("SPAHA00200_PARAM5" , fGetHealExamFlag() ); } else { setParameter ("SPAHA00200_PARAM5" , "G" ); } setParameter ("SPAHA00200_PARAM6" , vHealExamDetlFlag); setParameter ("SPAHA00200_PARAM7" , vOpenerID); setParameter ("SPAHA00200_PARAM8" , vSex); setParameter ("SPAHA00200_PARAM9" , bMultiyn); setParameter ("SPAHA00200_PARAM10" , vDestXPath); setParameter ("SPAHA00200_PARAM11" , vSrchDisableYN); setParameter ("SPAHA00200_PARAM12" , vFrom); setParameter ("SPAHA00200_PARAM13" , vage); setParameter ("SPAHA00200_PARAM14" , vbrthareacnts); setParameter ("SPAHA00200_PARAM15" , vforgneryn); //2015/10/21 이정택 추가(외국인 MOU요율관련) setParameter ("SPAHA00200_PARAM16" , vagencyrate); //2015/10/21 이정택 추가(외국인 MOU요율관련) modal("SPAHA00200"); } function fGetPkgCdAuto(vOpenerID, vPkgFg, bMultiyn,vCond, vCdnm , vHealExamDetlFlag, vSex, vDestXPath, vSrchDisableYN,vFrom,vage,vbrthareacnts,vforgneryn){ clearParameter("SPAHA00200_PARAM1"); clearParameter("SPAHA00200_PARAM2"); clearParameter("SPAHA00200_PARAM3"); clearParameter("SPAHA00200_PARAM4"); clearParameter("SPAHA00200_PARAM5"); clearParameter("SPAHA00200_PARAM6"); clearParameter("SPAHA00200_PARAM7"); clearParameter("SPAHA00200_PARAM8"); clearParameter("SPAHA00200_PARAM9"); clearParameter("SPAHA00200_PARAM10"); clearParameter("SPAHA00200_PARAM11"); clearParameter("SPAHA00200_PARAM12"); clearParameter("SPAHA00200_PARAM13"); clearParameter("SPAHA00200_PARAM14"); clearParameter("SPAHA00200_PARAM15"); setParameter ("SPAHA00200_PARAM1" , vPkgFg); setParameter ("SPAHA00200_PARAM2" , vCond); setParameter ("SPAHA00200_PARAM3" , vCdnm); setParameter ("SPAHA00200_PARAM4" , getUserInfo("dutplceinstcd")); if(vHealExamDetlFlag!="G01"){ setParameter ("SPAHA00200_PARAM5" , fGetHealExamFlag() ); } else { setParameter ("SPAHA00200_PARAM5" , "G" ); } setParameter ("SPAHA00200_PARAM6" , vHealExamDetlFlag); setParameter ("SPAHA00200_PARAM7" , vOpenerID); setParameter ("SPAHA00200_PARAM8" , vSex); setParameter ("SPAHA00200_PARAM9" , bMultiyn); setParameter ("SPAHA00200_PARAM10" , vDestXPath); setParameter ("SPAHA00200_PARAM11" , vSrchDisableYN); setParameter ("SPAHA00200_PARAM12" , vFrom); setParameter ("SPAHA00200_PARAM13" , vage); setParameter ("SPAHA00200_PARAM14" , vbrthareacnts); setParameter ("SPAHA00200_PARAM15" , vforgneryn); modal("SPAHA04012"); } /**================================================================================================================== @author : 손주연 @version : 2007-07-05 @desc : 검사코드 다중 선택 후 opener 화면에서 추가검사 setting. @param : * vGrdObj(대상grid ID) * vTestCdCol( TestCode Column 순번) * vSrcXPath(검사코드선택 창으로 입력한 대상노드와 동일.) *====================================================================================================================*/ function fSetAddList(vGrdObj, vTestCdCol, vSrcXPath, vDupCheck, vPkgYN , vPkgCd) { if( model.getValue("/root/temp/okflag") != "ok" ) return ; if( vGrdObj == null ) return ; if( vSrcXPath == "" ) return ; var cnt = getNodesetCount(vSrcXPath); var grdcnt = vGrdObj.rows; var vTestcd = ""; var vTestnm = ""; var i = 0; if( vPkgYN == "Y" ){ for( i = 1 ; i <= cnt ; i++ ){ vTestcd = model.getValue(vSrcXPath + "[" + i + "]/pkgcd" ); vTestnm = model.getValue(vSrcXPath + "[" + i + "]/pkgnm" ); if( vDupCheck == "Y" ) { if( fCheckDup(vGrdObj , vTestCdCol, vTestcd ) == false ){ if( messageBox("중복되는 Pkg코드[" + vTestcd + " - " + vTestnm +"] 를 추가 ", "S001") != 6 ){ continue ; } } } var danga = model.getValue(vSrcXPath + "[" + i + "]/scoreamt" ); /* 단체 원단위 절사하지 않도록 주석처리 if(model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag") == "Y") { danga = parseInt(parseFloat(danga)* 0.1)*10; }else { danga = danga; }*/ vGrdObj.addRow(); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/sel"); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/sel" , "Y" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/pkgcd" , vTestcd ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/pkgnm" ,vTestnm ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/uncocd" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/uncocd" , "V03" ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/scoreamt" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/scoreamt" ,danga); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/addtotamt" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/addtotamt" ,danga); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" ,model.getValue(vSrcXPath + "[" + i + "]/calcscorcd" ) ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/testdiscyn" ,model.getValue(vSrcXPath + "[" + i + "]/testdiscyn" ) ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/gndrflag" ,model.getValue(vSrcXPath + "[" + i + "]/gndrflag" ) ); grdcnt++; } } else { for( i = 1 ; i <= cnt ; i++ ){ vTestcd = model.getValue(vSrcXPath + "[" + i + "]/testcd" ); vTestnm = model.getValue(vSrcXPath + "[" + i + "]/testnm" ); if( vDupCheck == "Y" ) { if( fCheckDup(vGrdObj , vTestCdCol, vTestcd ) == false ){ if( messageBox("중복되는 검사코드[" + vTestcd + " - " + vTestnm +"] 를 추가 ", "S001") != 6 ){ continue ; } } } var danga = model.getValue(vSrcXPath + "[" + i + "]/scoreamt" ); /* 단체 원단위 절사하지 않도록 주석처리 if(model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag") == "Y") { danga = parseInt(parseFloat(danga)* 0.1)*10; }else { danga = danga; }*/ vGrdObj.addRow(); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/sel"); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/sel" , "Y" ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/testflag"); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/testflag" , "A" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/testcd" , vTestcd ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/testnm" ,vTestnm ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/uncocd" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/uncocd" , "V01" ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/scoreamt" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/scoreamt" ,danga ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/addtotamt" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/addtotamt" ,danga ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" ,model.getValue(vSrcXPath + "[" + i + "]/calcscorcd" ) ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/prcptims" , "1" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/prcpdayno" , "1" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/testdiscyn" , model.getValue(vSrcXPath + "[" + i + "]/testdiscyn" ) ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/gndrflag" , model.getValue(vSrcXPath + "[" + i + "]/gndrflag" ) ); //묵음처방 구분 추가 (2007.10.11 BY 손주연 ) model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/grupflag" ); model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/grupflag" ,model.getValue(vSrcXPath + "[" + i + "]/grupflag" ) ); grdcnt++; } } /* * 패키지 내부검사 중복여부 체크 */ model.removeNodeSet("/root/send/test"); // for( i = 1; i <= vGrdObj.rows ; i++) if(vGrdObj.rows >= 2){ for( i = 1; i <= vGrdObj.rows - 1 ; i++)// 고정행까지 추가하는거같아서 -1 했음. { model.makeValue("/root/send/test[" + i +"]/pkgcd" , model.getValue(vGrdObj.nodeset + "[" + i + "]/testcd")); model.makeValue("/root/send/test[" + i +"]/grupflag" , model.getValue(vGrdObj.nodeset + "[" + i + "]/grupflag")); } if(vPkgCd != "") { model.makeValue("/root/send/test/srchpkgcd" , vPkgCd);} if(vPkgCd != "") { model.makeValue("/root/send/test/healexamflag" , fGetHealExamFlag());} model.makeValue("/root/send/test/cmpycd" , model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd")); model.makeValue("/root/send/test/conseq" , model.getValue("/root/main/info/rsrvacptinfo/item/conseq")); model.makeValue("/root/send/test/conhistseq" , model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq")); model.removeNodeSet("/root/send/testcount"); submit("TRAHA00013",false);//패키지내 중복 체크*/ } var testnm =""; var testnmcount =""; var cnt = getNodesetCount("/root/tmp/testcount/testcount"); if (cnt != 0) { for (var i=0;i <=cnt ; i++) { testnm = model.getValue("/root/tmp/testcount/testcount["+i+"]/testnm"); if (testnm!="") { testnmcount = testnmcount + testnm + "/"; } } messageBox(testnmcount + " 검사가 중복되었습니다","E999"); model.removeNodeset("/root/tmp/testcount/testcount"); } model.refresh(); } /**================================================================================================================== @author : 손주연 @version : 2007-07-05 @desc : grid dup value check. @param : * vGrdObj : grid control * vCheckCol : check대상 column ( 0,1,2,...) * vCheckVal : dup check 대상 값 *====================================================================================================================*/ function fCheckDup( vGrdObj, vCheckCol , vCheckVal ){ //if( vGrdObj.elementName() != "xforms:grid" ){ // messageBox("Invalid ObjName!", "E999"); // return false ; //} var cnt = vGrdObj.rows ; for( var i = 1; i <= cnt ; i++) { if( vGrdObj.valueMatrix(i, vCheckCol) == vCheckVal ){ return false; } } } /**================================================================================================================== @author : 손주연 @version : 2007-07-05 @desc : 임시 건진금액 합계 @param : * vGrdObj : grid control * vCalcCol : 금액 column ( 0,1,2,...) * vPkgAmt : 패키지금액 *====================================================================================================================*/ function fTempCalc( vPkgAmt , vGrdObj , vCalcCol , vPrcpTimsCol, vTotAmtCtrlID, vPkgAmtCtrlID, vAddAmtCtrlID){ /* var iTotAmt = 0; var iAddAmt = 0; var iTotAdd = 0; var iTotAddExm = 0; var vTotAddExm =0; var vTotAdd =0; var iPkgAmt = parseInt(vPkgAmt); var vAddAmt = ""; var vPrcpTims = ""; var iDiscAmt =0;*///fDcAmtCalc()에서 처리 /* iTotAddExm = model.getValue("/root/main/info/rcptinfo/subtotamt"); //소계 iTotAdd = model.getValue("/root/main/info/rcptinfo/addamt");//추가검사금액 if(vPkgAmt == "") vPkgAmt = "0"; if(iTotAddExm == "") { vTotAddExm = 0; } else { vTotAddExm = parseInt(iTotAddExm); } if(iTotAdd == "") { vTotAdd =0; } else { vTotAdd =parseInt(iTotAdd); } */ /* if(model.getValue("/root/main/info/rsrvacptinfo/item/discamt")!=""){ iDiscAmt = parseInt(model.getValue("/root/main/info/rsrvacptinfo/item/discamt")); } model.setValue("/root/main/info/rcptinfo/discamt",iDiscAmt); for( var i = 1 ; i < vGrdObj.rows ; i++){ vAddAmt = vGrdObj.valueMatrix(i, vCalcCol); vPrcpTims = vGrdObj.valueMatrix(i, vPrcpTimsCol); if( vAddAmt == "" ) vAddAmt = "0"; if( vPrcpTims == "" ) vPrcpTims = "1"; iAddAmt += parseInt(vAddAmt) * parseInt(vPrcpTims) ; } if( vPkgAmtCtrlID != null ) vPkgAmtCtrlID.value = iPkgAmt ; if( vAddAmtCtrlID != null ) vAddAmtCtrlID.value = iAddAmt;// + vTotAdd; if( vTotAmtCtrlID != null ) vTotAmtCtrlID.value = (iPkgAmt + iAddAmt) - iDiscAmt;// + vTotAddExm; model.refresh();*///fDcAmtCalc()에서 처리 fDcAmtCalc(); } /**================================================================================================================== @author : 손주연 @version :2007-06-30 @desc : 수가내역 가져오기 @param : * SPAHB00300_PARAM1 : 검색구분(cd/nm) * SPAHB00300_PARAM2 : 검색조건(코드/명칭) * SPAHB00300_PARAM3 : multiyn * SPAHB00300_PARAM4 : multi선택 시 setting할 목적노드 * SPAHB00300_PARAM5 : code값을 setting할 목적노드 * SPAHB00300_PARAM6 : name값을 setting할 목적노드 * SPAHB00300_PARAM7 : 수가를 setting할 목적노드 *====================================================================================================================*/ function fGetCalScorCd( vCond, vCdnm, bMultiyn , vMultiDestXPath, vCdDestXPath, vNmDestXPath, vAmtDestXPath){ clearParameter("SPAHB00300_PARAM1"); clearParameter("SPAHB00300_PARAM2"); clearParameter("SPAHB00300_PARAM3"); clearParameter("SPAHB00300_PARAM4"); clearParameter("SPAHB00300_PARAM5"); clearParameter("SPAHB00300_PARAM6"); clearParameter("SPAHB00300_PARAM7"); setParameter ("SPAHB00300_PARAM1" , vCond); setParameter ("SPAHB00300_PARAM2" , vCdnm); setParameter ("SPAHB00300_PARAM3" , bMultiyn); setParameter ("SPAHB00300_PARAM4" , vMultiDestXPath); setParameter ("SPAHB00300_PARAM5" , vCdDestXPath ); setParameter ("SPAHB00300_PARAM6" , vNmDestXPath); setParameter ("SPAHB00300_PARAM7" , vAmtDestXPath); modal("SPAHB00300"); } /**================================================================================================================== @author : 손주연 @version :2007-06-30 @desc : 수가내역 대상그리드 set @param : * vGrdObj : 대상그리드 * vSrcXPath : 목적노드set * vDupCheckCo : dup check column no * vDupCheck : dup check yn * vCodeNode : 수가코드 목적 노드 * vNameNode : 수가처방명 목적 노드 * vAmtNode : 수가 목적 노드 * vHeaderAddRows : header row default값(1) 보다 큰 row수 *====================================================================================================================*/ function fSetOcd(vGrdObj, vSrcXPath, vDupCheckCol, vDupCheck, vCodeNode, vNameNode, vAmtNode, vHeaderAddRows ) { if( vGrdObj == null ) return ; if( vSrcXPath == "" ) return ; if( model.getValue("/root/temp/okflag") != "ok" ) return ; var cnt = getNodesetCount(vSrcXPath); var grdcnt = vGrdObj.rows; if( vHeaderAddRows != "" ){ grdcnt =parseInt( vGrdObj.rows) - parseInt( vHeaderAddRows ) ; } var vDupCheckVal = ""; var i = 0; if( cnt == 1 ) { vDupCheckVal = model.getValue(vSrcXPath + "/calcscorcd" ); if( vDupCheck == "Y" ) { if( fCheckDup(vGrdObj , vDupCheckCol, vDupCheckVal ) == false ){ if( messageBox("중복되는 수가코드[" + vDupCheckVal + "] 를 추가", "S001") != 6 ){ return ; } } } vGrdObj.addRow(); if( vCodeNode != "" ){ model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vCodeNode , vDupCheckVal ); } if( vNameNode != "" ){ model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vNameNode , model.getValue(vSrcXPath + "/hngnm" ) ); } if( vAmtNode != "" ){ model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vAmtNode , model.getValue(vSrcXPath + "/scoreamt" ) ); } model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" , vDupCheckVal ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/calcscornm" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/calcscornm" , model.getValue(vSrcXPath + "/ordnm" ) ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/oldordcd" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/oldordcd" , model.getValue(vSrcXPath + "/oldordcd" ) ); } else { for( var i = 1 ; i <= cnt ; i++ ){ vDupCheckVal = model.getValue(vSrcXPath + "[" + i + "]/calcscorcd" ); if( vDupCheck == "Y" ) { if( fCheckDup(vGrdObj , vDupCheckCol, vDupCheckVal ) == false ){ if( messageBox("중복되는 수가코드[" + vDupCheckVal + "] 를 추가", "S001") != 6 ){ continue ; } } } vGrdObj.addRow(); if( vCodeNode != "" ){ model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vCodeNode , vDupCheckVal ); } if( vNameNode != "" ){ model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vNameNode , model.getValue(vSrcXPath + "[" + i + "]/hngnm" ) ); } if( vAmtNode != "" ){ model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vAmtNode ,model.getValue(vSrcXPath + "[" + i + "]/scoreamt" ) ); } model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" , vDupCheckVal ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/calcscornm" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/calcscornm" , model.getValue(vSrcXPath + "[" + i + "]/ordnm" ) ); model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/oldordcd" ); model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/oldordcd" , model.getValue(vSrcXPath + "/oldordcd" ) ); grdcnt++; } } model.refresh(); } /**================================================================================================================== @author : 손주연 @version :2007-08-30 @desc : 수납처리--임시.. @param : * vJobFlag : WORK/CANCEL 작업 구분.(접수/취소 구분) function fRcptAmt(vJobFlag){ var payownamt = model.getValue("/root/temp/rcptinfo/hidden/opmi_out/opmi_rcptamt") ; if( payownamt == "") { payownamt = "0"; } payownamt = parseInt(payownamt); if( payownamt != 0 ) { ahafOpenRcpt(fGetHealExamFlag() , model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd") , model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno") , model.getValue("/root/main/info/patinfo/item/pid") , model.getValue("/root/main/info/rsrvacptinfo/item/rcptstat") , model.getValue("/root/main/info/rsrvacptinfo/item/orddd") ); return ; } var vTmp = fGetHealExamFlag(); if( vTmp == "" ){ messageBox("건진분류 ERROR .", "E999"); return ; } model.setValue("/root/send/srchhealexamflag", vTmp ); vTmp = model.getValue(ipt_pid.attribute("ref")); if( vTmp == "" ) { messageBox("환자ID ERROR .", "E999"); return ; } model.setValue("/root/send/srchpid", vTmp ); vTmp = model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd"); if( vTmp== "" ) { messageBox("등록일자 ERROR .", "E999"); return ; } model.setValue("/root/send/srchrsrvdd", vTmp ); vTmp = model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno"); if( vTmp == "" ) { messageBox("등록번호 ERROR .", "E999"); return ; } model.setValue("/root/send/srchrsrvno", vTmp ); model.setValue("/root/send/srchinstcd", getUserInfo("dutplceinstcd")); //2007-08-17 추가 model.setValue("/root/send/srchjobflag" ,vJobFlag); model.setValue("/root/send/srchrcptdd" ,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptdd") ); model.setValue("/root/send/srchrcptno" ,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptno") ); model.setValue("/root/send/srchrcptseqno" ,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptseqno") ); model.copyNode("/root/send/savercpt/opmi_out", "/root/temp/rcptinfo/hidden/opmi_out"); openLoadingBar("수납 처리중입니다..") ;//처리중 화면을 오픈한다. if( submit("TXAHA02102") == true ){ messageBox("수납 ","I001"); } closeLoadingBar() ;//처리중 화면을 close한다. } *====================================================================================================================*/ /**================================================================================================================== @author : 손주연 @version : 2007-10-11 @desc : 수납처리 @param : * vJobFlag : WORK/CANCEL 작업 구분.(접수/취소 구분) * vRsrvdd : *====================================================================================================================*/ function ahafRcptAmt(vJobFlag, vRsrvdd, vRsrvno, vPid, vOrddd, vRcptStat , vOpmiRoot,vHealexamFlag){ var payownamt = model.getValue(vOpmiRoot + "/opmi_out/opmi_rcptamt"); if(payownamt == ""){ payownamt = "0"; } payownamt = parseInt(payownamt); if(vHealexamFlag != "G"){ //if(payownamt != 0){ //수납화면 팝업 ahafOpenRcpt(fGetHealExamFlag() , vRsrvdd , vRsrvno , vPid , vRcptStat , vOrddd); return; //} } var vTmp = vHealexamFlag;//fGetHealExamFlag(); if( vTmp == "" ){ messageBox("건진분류 ERROR .", "E999"); return ; } model.makeNode("/root/send/savercpt/srchhealexamflag"); model.setValue("/root/send/savercpt/srchhealexamflag", vTmp ); if( vPid == "" ) { messageBox("환자ID ERROR .", "E999"); return ; } model.makeNode("/root/send/savercpt/srchpid"); model.setValue("/root/send/savercpt/srchpid", vPid ); if( vRsrvdd== "" ) { messageBox("등록일자 ERROR .", "E999"); return ; } model.makeNode("/root/send/savercpt/srchrsrvdd"); model.setValue("/root/send/savercpt/srchrsrvdd", vRsrvdd ); if( vRsrvno == "" ) { messageBox("등록번호 ERROR .", "E999"); return ; } model.makeNode("/root/send/savercpt/srchrsrvno"); model.setValue("/root/send/savercpt/srchrsrvno", vRsrvno ); model.makeNode("/root/send/savercpt/srchinstcd"); model.setValue("/root/send/savercpt/srchinstcd", getUserInfo("dutplceinstcd")); //2007-08-17 추가 model.makeNode("/root/send/savercpt/srchjobflag"); model.makeNode("/root/send/savercpt/srchrcptdd"); model.makeNode("/root/send/savercpt/srchrcptno"); model.makeNode("/root/send/savercpt/srchrcptseqno"); model.setValue("/root/send/savercpt/srchjobflag" ,vJobFlag); model.setValue("/root/send/savercpt/srchrcptdd" ,model.getValue(vOpmiRoot +"/opmi_out/org_rcptdd") ); model.setValue("/root/send/savercpt/srchrcptno" ,model.getValue(vOpmiRoot +"/opmi_out/org_rcptno") ); model.setValue("/root/send/savercpt/srchrcptseqno" ,model.getValue(vOpmiRoot +"/opmi_out/org_rcptseqno") ); model.makeNode("/root/send/savercpt/opmi_out"); model.copyNode("/root/send/savercpt/opmi_out", vOpmiRoot + "/opmi_out" ); model.makeNode("/root/send/savercpt/dcgm_out"); model.copyNode("/root/send/savercpt/dcgm_out", vOpmiRoot + "/dcgm_out" ); model.makeNode("/root/send/savercpt/unco_out"); model.copyNode("/root/send/savercpt/unco_out", vOpmiRoot + "/unco_out" ); //영수증채번을 먼저한다. //INPUT(1.수납일시) model.makeNode("/root/send/rcptdd"); model.makeNode("/root/send/genrkind"); model.setValue("/root/send/rcptdd" , getCurrentDate()); model.setValue("/root/send/genrkind" , "R"); //SPAHA02100 이 수납화면 //결과는 수납 번호 if(submit("TRAHA02105", false)){ //영수증번호를 채번하여 셋팅한다. var rcptno = model.getValue("/root/temp/rcptno_out/rcptno/opmi_rcptno"); model.makeNode( "/root/send/savercpt/opmi_rcptno"); model.setValue( "/root/send/savercpt/opmi_rcptno", rcptno); } //openLoadingBar("수납 처리중입니다..") ;//처리중 화면을 오픈한다. //수납화면의 내용을 채우는 카드나 현금. 추가 검사 내역, 감면정보등 모든 정보를 가져온다. if(submit("TXAHA02102") == true){ messageBox("수납 ","I001"); } //closeLoadingBar() ;//처리중 화면을 close한다. } /**================================================================================================================== @author : 손주연 @version :2007-08-30 @desc : 수납화면 open @param : * 건진 구분, 예약등록일자, 예약등록번호, 등록번호 *====================================================================================================================*/ function ahafOpenRcpt(vHealExamFlag, vRsrvDD, vRsrvNo, vPid, vRcptStat, vOrdDD){ clearParameter("SMAHA02100_PARAM_HEALEXAMFLAG"); clearParameter("SMAHA02100_PARAM_PID"); clearParameter("SMAHA02100_PARAM_RSRVDD"); clearParameter("SMAHA02100_PARAM_RSRVNO"); setParameter("SMAHA02100_PARAM_HEALEXAMFLAG" , vHealExamFlag); setParameter("SMAHA02100_PARAM_PID" , vPid); setParameter("SMAHA02100_PARAM_RSRVDD" , vRsrvDD); setParameter("SMAHA02100_PARAM_RSRVNO" , vRsrvNo); setParameter("SMAHA02100_PARAM_ORDDD" , vOrdDD); var sRcptStat = ""; //수납상태 if(vRcptStat == "N"){ sRcptStat = "Y"; }else{ sRcptStat = "N"; } setParameter("SMAHA02100_RTN" , sRcptStat); modal("SMAHA02100"); } /**================================================================================================================== @author : 손주연 @version :2007-08-30 @desc : 수납처리 : 개인부담금 존재 시 수납창 load. @param : * 수납창 open yn, job flag, 건진 구분, 예약등록일자, 예약등록번호, 등록번호 , 진료일자, 기관코드 *====================================================================================================================*/ /*function ahafRcptAmt(vRcptDlgOpenYN, vJobFlag, vHealExamFlag, vRsrvDD, vRsrvNo, vPid, vRcptStat , vOrdDD, vInstCd){ var payownamt = model.getValue("/root/temp/rcptinfo/hidden/opmi_out/opmi_rcptamt") ; var payrcptamt = 0; if( payownamt != "" ) { payrcptamt = parseInt(payownamt); } if( payrcptamt > 0 ) { ahafOpenRcpt(vHealExamFlag , vRsrvDD , vRsrvNo , vPid , vRcptStat , vOrdDD ); return ; } model.setValue("/root/send/srchhealexamflag" , vHealExamFlag ); model.setValue("/root/send/srchpid" , vPid ); model.setValue("/root/send/srchrsrvdd" , vRsrvDD ); model.setValue("/root/send/srchrsrvno" , vRsrvNo ); model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd")); //2007-08-17 추가 model.setValue("/root/send/srchjobflag" ,vJobFlag); model.setValue("/root/send/srchrcptdd" ,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptdd") ); model.setValue("/root/send/srchrcptno" ,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptno") ); model.setValue("/root/send/srchrcptseqno" ,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptseqno") ); model.copyNode("/root/send/savercpt/opmi_out", "/root/temp/rcptinfo/hidden/opmi_out"); // 영수증채번을 먼저한다. // INPUT(1.수납일시) model.setValue("/root/send/rcptdd" , getCurrentDate() ); model.setValue( "/root/send/genrkind" , "R"); if ( submit("TRAHA02105")){ //영수증번호를 채번하여 셋팅한다. var rcptno = model.getValue("/root/temp/rcptno_out/rcptno/opmi_rcptno") model.setValue( "/root/send/opmi_rcptno", rcptno); } //openLoadingBar("수납 처리중입니다..") ;//처리중 화면을 오픈한다. if( submit("TXAHA02102") == true ){ messageBox("수납 ","I001"); } //closeLoadingBar() ;//처리중 화면을 close한다. } */ /**================================================================================================================== @author : 손주연 @version :2007-08-01 @desc : 예약/접수 현황조회 @param : * SMAHA00400_PARAM1 : 건진구분 * SMAHA00400_PARAM2 : 건진상세구분 * SMAHA00400_PARAM3 : 일자체크여부(Y/N) * SMAHA00400_PARAM4 : 일자기준 및 상태기준 (예약:C, 예약등록: C1, 접수:E ) * SMAHA00400_PARAM5 : 사업체코드 * SMAHA00400_PARAM6 : 검사실코드 * SMAHA00400_PARAM7 : 성명 * SMAHA00400_PARAM8 : 등록번호 * SMAHA00400_PARAM9 : 주민번호1 * SMAHA00400_PARAM10 : 주민번호2 * SMAHA00400_PARAM11 : 패키지코드 * SMAHA00400_PARAM12 : 조회구분2(성명: pnm/등록번호:pid/주민번호:rgstno) * SMAHA00400_PARAM13 : key값 setting 목적노드 *====================================================================================================================*/ function ahafOpenRsrvAcptList(vOpenerID, vHealExamFg , vHealExamDetlFg, vDateChkYN , vStatFg , vCmpyCd , vRoomCd , vPnm, vPid, vRgstno1, vRgstno2, vPkgCd, vSrchCond2, vDestNode){ clearParameter("SMAHA00400_PARAM1"); clearParameter("SMAHA00400_PARAM2"); clearParameter("SMAHA00400_PARAM3"); clearParameter("SMAHA00400_PARAM4"); clearParameter("SMAHA00400_PARAM5"); clearParameter("SMAHA00400_PARAM6"); clearParameter("SMAHA00400_PARAM7"); clearParameter("SMAHA00400_PARAM8"); clearParameter("SMAHA00400_PARAM9"); clearParameter("SMAHA00400_PARAM10"); clearParameter("SMAHA00400_PARAM11"); clearParameter("SMAHA00400_PARAM12"); clearParameter("SMAHA00400_PARAM13"); setParameter("SMAHA00400_PARAM1", vHealExamFg); setParameter("SMAHA00400_PARAM2", vHealExamDetlFg); setParameter("SMAHA00400_PARAM3", vDateChkYN); setParameter("SMAHA00400_PARAM4", vStatFg); setParameter("SMAHA00400_PARAM5", vCmpyCd); setParameter("SMAHA00400_PARAM6", vRoomCd); setParameter("SMAHA00400_PARAM7", vPnm); setParameter("SMAHA00400_PARAM8", vPid ); setParameter("SMAHA00400_PARAM9", vRgstno1); setParameter("SMAHA00400_PARAM10", vRgstno2); setParameter("SMAHA00400_PARAM11", vPkgCd); setParameter("SMAHA00400_PARAM12", vSrchCond2); setParameter("SMAHA00400_PARAM13", vDestNode); open("SMAHA00400",100,10,"SMAHA00400"); } /**================================================================================================================== @author : 손주연 @version :2007-08-01 @desc : 기본코드관리 관련 코드 선택 팝업 @param : * vLargFg : SPAHB00500_PARAM1 : 대분류코드 * vMidlFg : SPAHB00500_PARAM2 : 중분류코드 * vMultiYN : SPAHB00500_PARAM3 : multiyn => Y이면 소분류코드 다중선택입력모드 * vDestNode : SPAHB00500_PARAM4 : 목적노드셋 * vMidlSetYN : SPAHB00500_PARAM5 : 중분류코드 setting여부(Y/N)=>선택형결과의 경우 중분류 선택시 중분류 코드 해당 중분류에 속한 소분류 전코드를 부모창에 copy *====================================================================================================================*/ function ahzfOpenEtcCdSel( vOpenerID , vLargFg /*대분류코드*/ , vMidlFg /*중분류코드*/ , vMultiYN /*multiyn*/ , vDestNode /*multiyn == 'Y'일때 목적노드셋*/ , vMidlSetYN /*중분류코드 setting여부(Y/N)*/ ){ clearParameter("SPAHB00500_PARAM1"); clearParameter("SPAHB00500_PARAM2"); clearParameter("SPAHB00500_PARAM3"); clearParameter("SPAHB00500_PARAM4"); clearParameter("SPAHB00500_PARAM5"); clearParameter("SPAHB00500_PARAM6"); model.makeNode(vDestNode); setParameter("SPAHB00500_PARAM1", vLargFg); setParameter("SPAHB00500_PARAM2", vMidlFg); setParameter("SPAHB00500_PARAM3", vMultiYN); setParameter("SPAHB00500_PARAM4", vDestNode); setParameter("SPAHB00500_PARAM5", vMidlSetYN); setParameter("SPAHB00500_PARAM6", vOpenerID); modal("SPAHB00500",100,100,"SMAHB00500"); if( model.getValue("/root/temp/okflag") == "ok" ){ return true; } return false; } /**================================================================================================================== @author : 손주연 @version :2007-05-01 @desc : 코드입력 시 공통코드 및 사업체 코드 가져오기, map : TRAHA00105 , ref= root/temp/cdlst 로 setting @param : * vSrchFlag : 검색구분 ** 01 판정의 ** 02 건강보험공단 ** 03 관할군병원 ** 04 산업안전공단 ** 05 보건소 ** 06 노동청 ** 07 지도원 ** 08 사업체 * vCode : 검색코드 * vAllYN : 전체정보 여부 ( Y일 경우 vDestNodeSet으로 copy) * vCodeNode : 코드값이 setting될 목적노드 * vNameNode : 코드명이 setting될 목적노드 * vDestNodeSet: vAllYN == 'Y' 인 경우 목적노드셋 ====================================================================================================================*/ function ahafGetCmpyInfo( vSrchFlag, vCode , vAllYN, vCodeNode, vNameNode , vDestNodeSet){ model.makeNode("/root/send/srchflag" ); model.makeNode("/root/send/srchcond" ); model.makeNode("/root/send/srchcdnm" ); model.makeNode("/root/send/srchinstcd" ); model.setValue("/root/send/srchflag" , vSrchFlag); model.setValue("/root/send/srchcond" , "cd" ); model.setValue("/root/send/srchcdnm" , vCode); model.setValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd")); submit("TRAHA00105"); var SrcNode = model.instance1.selectSingleNode("/root/temp/cdlst/item"); if( SrcNode != null ) { if( vAllYN == "Y" ) { model.copyNode(vDestNodeSet, "/root/temp/cdlst/item"); } else { model.setValue(vCodeNode , model.getValue("/root/temp/cdlst/item/cmpycd") ); model.setValue(vNameNode , model.getValue("/root/temp/cdlst/item/cmpynm") ); } model.refresh(); return true; } return false; } /**================================================================================================================== @author : 손주연 @version :2007-09-01 @desc : 통합검사결과조회 창 띄우기 @param : vPidNode : 환자ID값이 있는 경로 ====================================================================================================================*/ function ahafOpenRsltView(vPidNode ){ modal( "SMAER00800",100,10,"SMAER00800","/root/send/data/singdata/srchpid",vPidNode); } /**================================================================================================================== @author : 손주연 @version :2007-10-01 @desc : 종합판정 창 띄우기 @param : sPid : 환자ID ====================================================================================================================*/ function ahafOpenColgJudg(sPid ){ setParameter("SMAHR00500_PARAM1", sPid); open( "SMAHR00500",100,10,"SMAHR00500" ); } /**================================================================================================================== @author : 손주연 @version :2007-10-11 @desc :보험증번호 조회(보험자격조회) @param : * sRgstNo1/sRgstNo2 : 주민번호 * sHngNm : 이름 * sOrdDD : 진료일자 값을 받을 노드 경로 * vInsuKind : 보험유형 * vInsuNo : 증번호 * vInsuCd : 보험자기호 * vFromDD : 취득일자 * vInsuNm : 보험자성명 * vInsuBranchCd : 관할지사 코드 * vInsuBranchNm : 관할지사 명칭 ====================================================================================================================*/ function ahafGetInsuCnts(sRgstNo1, sRgstNo2, sHngNm, sOrdDD ,vInsuKind, vInsuNo, vInsuCd, vFromDD, vInsuNm, vInsuBranchCd, vInsuBranchNm ){ if( (sRgstNo1 == "" ) || (sRgstNo2 == "" ) || (sHngNm == "" ) || (sOrdDD == "" ) ) { messageBox("자격조회 필수조건(주민번호/성명/진료일자) 입력이 누락되었습니다. ", "E999"); return ; } //보험증번호 조회(보험자격조회) var parm = sRgstNo1 + sRgstNo2 + "▦" + //주민번호 sHngNm + "▦" + //이름 sOrdDD + "▦" ; //진료일자 // modal("SMAHA00210"); modal("SMAHA00210","1", "400", "400", "SMAHA00210","","",""); /* setParameter("SPPMC03700_PARM",parm); setParameter("SPPMC03700_RTN",""); modal("SPPMC03700", "1","400", "400", "SPPMC03700", "", ""); if (getParameter("SPPMC03700_RTN") == "N" || getParameter("SPPMC03700_RTN") == "") { return; } if (getParameter("SPPMC03700_RTN") == "Y") { //return 값이 있으면, if( vInsuKind != "" ) { model.makeNode(vInsuKind); model.setValue(vInsuKind , getParameter("SPPMC03700_insukind")); //건강보험 :11, 의료급여1/2종 : 21/22 } if( vInsuCd != "" ) { model.makeNode(vInsuCd); model.setValue(vInsuCd , getParameter("SPPMC03700_insucd")); //보험자 기호 } if( vInsuNo != "" ) { model.makeNode(vInsuNo); model.setValue(vInsuNo , getParameter("SPPMC03700_insuno")); //증번호 } if( vInsuNm != "" ) { model.makeNode(vInsuNm); model.setValue(vInsuNm , getParameter("SPPMC03700_insdnm")); //피보험자성명 } if( vFromDD != "" ) { model.makeNode(vFromDD); model.setValue(vFromDD , getParameter("SPPMC03700_insufromdd")); //취득일자 } //관할지사코드 if( vInsuBranchCd ){ model.makeNode(vInsuBranchCd); model.setValue(vInsuBranchCd , getParameter("SPPMC03700_choicorpmark1")); //관할지사 } //관할지사명 if( vInsuBranchNm ){ model.makeNode(vInsuBranchNm); model.setValue(vInsuBranchNm , getParameter("SPPMC03700_choicorpnm1")); //관할지사 } model.refresh(); }*/ } /**================================================================================================================== @author : 손주연 @version :2007-10-11 @desc :화면 상단 환자정보 설정 @param : * vOrddd : 진료일자 * vPid : 환자id ====================================================================================================================*/ function ahafSetScreenTopPatInfo( vPid , vOrddd , vCretno ){ var param = "O" + "▦" + vPid + "▦" + vOrddd + "▦" + vCretno + "▦" + getUserInfo("dutplceinstcd") + "▦"; setParameter("condparam", param); //setParameter("condparam", "S" + "▦" + vPrcpDD + "▦" + vExecprcpuniqno + "▦" + getUserInfo("dutplceinstcd") ); modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;"); } /**================================================================================================================== @author : 김호익 @version :2007-12-12 @desc :통합예약관리 화면으로 이동 @param : * displayid : 호출화면--통합예약 화면 * maingridlistid : 부서코드 Instance * path : send Instance ====================================================================================================================*/ function aezfPopUpRsrvSample(displayid, maingridlistid, path) { var pid = model.getValue(path +"/pid" ); var suppdeptcd = getUserInfo("posdeptcd"); var sflag = pid + "▦" + "S" + "▦" + suppdeptcd; // 플래그 S setParameter("opener_parameter_id", sflag); open(displayid, 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; min:hidden, max:hidden;"); } /**================================================================================================================== @author : 김호익 @version :2007-12-12 @desc :예약시 dc 금액 확인 @param : ====================================================================================================================*/ function fDcAmtCalc(){ model.makeValue("/root/send/priceamt/healexamflag", fGetHealExamFlag()); if(model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd") == "") { model.makeValue("/root/send/priceamt/healexamdetlflag" , model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")); }else { model.makeValue("/root/send/priceamt/healexamdetlflag", model.getValue("/root/send/srchhealexamdetlflag")); } model.makeValue("/root/send/priceamt/pkgcd" , model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd")); model.makeValue("/root/send/priceamt/cmpycd", model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd")); model.makeValue("/root/send/priceamt/conseq", model.getValue("/root/main/info/rsrvacptinfo/item/conseq")); model.makeValue("/root/send/priceamt/conhistseq", model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq")); model.makeValue("/root/send/priceamt/pid", model.getValue("/root/main/info/rsrvacptinfo/item/pid")); model.makeValue("/root/send/priceamt/rsrvdd", model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd")); model.makeValue("/root/send/priceamt/rsrvno", model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno")); model.makeValue("/root/send/priceamt/sex", model.getValue("/root/main/info/patinfo/item/sex")); model.makeValue("/root/send/priceamt/age", ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1") , model.getValue("/root/main/info/patinfo/item/rgstno2")));//model.getValue("/root/main/info/patinfo/item/age")); model.makeValue("/root/send/priceamt/disccd", model.getValue("/root/main/info/rsrvacptinfo/item/disccd")); model.makeValue("/root/send/priceamt/pkguncocd", model.getValue("/root/main/info/rsrvacptinfo/item/pkguncocd")); // model.makeValue("/root/send/priceamt/forgneryn", model.getValue("/root/main/info/rsrvacptinfo/item/forgneryn")); model.makeValue("/root/send/priceamt/choiflag", model.getValue("/root/main/info/rsrvacptinfo/item/choiflag")); model.makeValue("/root/send/priceamt/statflag", model.getValue("/root/main/info/rsrvacptinfo/item/statflag")); model.makeValue("/root/send/priceamt/hopedd", model.getValue("/root/main/info/rsrvacptinfo/item/hopedd")); //2015/10/22 이정택 수정 model.makeValue("/root/send/priceamt/forgneryn", model.getValue("/root/main/info/patinfo/item/forgneryn")); model.makeValue("/root/send/priceamt/agencyrate", model.getValue("/root/main/info/rsrvacptinfo/item/agencyrate")); //2015/10/22 이정택 수정 model.removenode("/root/priceamt/priceamt"); if(submit("TRAHA00509")) { model.makeValue("/root/main/info/rcptinfo/subtotamt", model.getValue("/root/temp/priceamt/priceamt/subtotamt")); //소계 model.makeValue("/root/main/info/rcptinfo/pkgamt", model.getValue("/root/temp/priceamt/priceamt/pkgamt")); //패키지금액 model.makeValue("/root/main/info/rcptinfo/cmpyaddamt", model.getValue("/root/temp/priceamt/priceamt/cmpyaddamt")); //단체추가검사금액 model.makeValue("/root/main/info/rcptinfo/psnaddamt", model.getValue("/root/temp/priceamt/priceamt/psnaddamt")); //개인추가검사금액 model.makeValue("/root/main/info/rcptinfo/preamt", model.getValue("/root/temp/priceamt/priceamt/preamt")); //선수금 model.makeValue("/root/main/info/rcptinfo/uncoamt", model.getValue("/root/temp/priceamt/priceamt/uncoamt")); //미수금 model.makeValue("/root/main/info/rcptinfo/discamt", model.getValue("/root/temp/priceamt/priceamt/discamt")); //할인액 model.makeValue("/root/main/info/rcptinfo/realamt", model.getValue("/root/temp/priceamt/priceamt/realamt")); //실수납액 model.makeValue("/root/main/info/rcptinfo/ownbamt", model.getValue("/root/temp/priceamt/priceamt/ownbamt")); //부담액 //추가검사 금액셋팅 fSetAddAmt(); } } /**================================================================================================================== @author : 김호익 @version :2007-12-17 @desc :추가검사 그리드의 행삭제 버튼 클릭시 금액 계산 @param : ====================================================================================================================*/ function fDcCode( ChoiceCD ,vpkguncocd){ var dcb = false; if((ChoiceCD!="") &&(ChoiceCD!="-")){ for(var i=0 ;i <100 ;i++){ CodeCD = model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/cd"); if (ChoiceCD == CodeCD) { /* 추가검사 할인일경우는 추가 검사 할인액이 따로 설정되어있다 */ /* if(vpkguncocd=="V01"){ dcamt = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/dcamt")); dcb = true; return parseFloat(dcamt/100); break; }else{ dcamt = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/adddcamt")); dcb = true; return parseFloat(dcamt/100); break; }*/ dcamt = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/dcamt")); dcb = true; return parseFloat(dcamt/100); break; } } } else { return 0.0; } if (dcb==false){ return 0.0; } } /**================================================================================================================== @author : 김호익 @version :2007-12-17 @desc : 해당할인계정의 금액 확인 @param : ====================================================================================================================*/ function fDcCodeAdd( ChoiceCD ,vpkguncocd){ var dcb = false; if((ChoiceCD!="") &&(ChoiceCD!="-")){ for(var i=0 ;i <100 ;i++){ CodeCD = model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/cd"); if (ChoiceCD == CodeCD) { /* 추가검사 할인일경우는 추가 검사 할인액이 따로 설정되어있다 */ /* if(vpkguncocd=="V01"){ dcamt = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/dcamt")); dcb = true; return parseFloat(dcamt/100); break; }else{ dcamt = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/adddcamt")); dcb = true; return parseFloat(dcamt/100); break; }*/ dcamt = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/adddcamt")); dcb = true; return parseFloat(dcamt/100); break; } } } else { return 0.0; } if (dcb==false){ return 0.0; } } function fRowDeleteCalc(scoreamtco){ var scoreamt = 0; var addamt = 0; var subtotamt = 0; /* if (model.getValue(grd_addlst.nodeset + "[" + grd_addlst.row + "]/scoreamt")!="") { scoreamt = parseInt( model.getValue(grd_addlst.nodeset + "[" + grd_addlst.row + "]/scoreamt")); }*/ if(scoreamtco!=""){ scoreamt = parseInt( scoreamtco); } if (model.getValue("/root/main/info/rcptinfo/addamt")!=""){ addamt = parseInt(model.getValue("/root/main/info/rcptinfo/addamt")) - scoreamt; } if (model.getValue("/root/main/info/rcptinfo/subtotamt")!=""){ subtotamt = parseInt(model.getValue("/root/main/info/rcptinfo/subtotamt")); } if (scoreamt!=0){ model.setValue("/root/main/info/rcptinfo/addamt",addamt); model.setValue("/root/main/info/rcptinfo/subtotamt",subtotamt - scoreamt); model.refresh(); } fDcAmtCalc(); } /**================================================================================================================== @author : 김호익 @version :2007-12-17 @desc : 소견등록시 이전검사 결과와 틀린부분 체크 @param : ====================================================================================================================*/ function fOldRsltChk(){ if (model.getValue("/root/main/judgdetl/judginfo/item/hngjudgcnts")!=""){ var cnt = grd_rsltlst.rows; for (var ci=1;ci = grdobj.fixedRows ) { var rowidx = grdobj.row; if ( btn_case1.selected == true ) { if ( model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/execprcpuniqno") == "" || model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/execprcpuniqno") == 0 ) { messageBox("PACS Viewer와 연동할 수 없습니다.(유일번호가 0이거나 NULL입니다)","I999"); return; } var pacsorderid = model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/prcpdd")+model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/execprcpuniqno"); var pid = model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/pid"); } if ( btn_case2.selected == true ) { if ( model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/execprcpuniqno") == "" || model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/execprcpuniqno") == 0 ) { messageBox("PACS Viewer와 연동할 수 없습니다.(유일번호가 0이거나 NULL입니다)","I999"); return; } var pacsorderid = model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/prcpdd")+model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/execprcpuniqno"); var pid = model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/pid"); } // PACS Viewer 호출 //zepfpacsOrderID("2007082725595"); }*/ zepfpacsAll(pacsorderid, pid); } function fClickCDISResultList() { model.resetInstanceNode("/root/send/iemr"); model.makeNode("/root/hidden/temp"); var prcpdd = model.getValue("/root/temp/prcpdd"); var execprcpuniqno = model.getValue("/root/temp/seqno"); var instcd = getUserInfo("dutplceinstcd"); var sprcpdd = aezfTrim(prcpdd, 44); var sexecprcpuniqno = aezfTrim(execprcpuniqno, 44); var sinstcd = aezfTrim(instcd, 44); model.makeValue("/root/send/iemr/cmc_orddate", sprcpdd); model.makeValue("/root/send/iemr/cmc_orderseqno", sexecprcpuniqno); model.makeValue("/root/send/iemr/cmc_spcid", sinstcd); if(window.children.item("imgemrviewer") == null) { window.load("../../../emr/imgemrweb/xrw/SSMRC03130.xrw","modeless", "imgemrviewer", "", "/root/send/iemr", "/root/hidden/temp"); /* window.children.item("imgemrviewer").document.title = "Image EMR Viewer"; window.children.item("imgemrviewer").javaScript.searchChart("/root/hidden/temp"); if (window.children.item("imgemrviewer").javaScript.downloadChart() == true) { window.children.item("imgemrviewer").javaScript.setupChart("ChartView"); }*/ } } function fPriceCheck(){ model.makeValue("/root/send/priceamt/healexamflag", fGetHealExamFlag()); if(model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd") == "") { model.makeValue("/root/send/priceamt/healexamdetlflag" , model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")); }else { model.makeValue("/root/send/priceamt/healexamdetlflag", model.getValue("/root/send/srchhealexamdetlflag")); } model.makeValue("/root/send/priceamt/pkgcd" , model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd")); model.makeValue("/root/send/priceamt/cmpycd", model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd")); model.makeValue("/root/send/priceamt/conseq", model.getValue("/root/main/info/rsrvacptinfo/item/conseq")); model.makeValue("/root/send/priceamt/conhistseq", model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq")); model.makeValue("/root/send/priceamt/pid", model.getValue("/root/main/info/rsrvacptinfo/item/pid")); model.makeValue("/root/send/priceamt/rsrvdd", model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd")); model.makeValue("/root/send/priceamt/rsrvno", model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno")); model.makeValue("/root/send/priceamt/sex", model.getValue("/root/main/info/patinfo/item/sex")); model.makeValue("/root/send/priceamt/age", ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1") , model.getValue("/root/main/info/patinfo/item/rgstno2")));//model.getValue("/root/main/info/patinfo/item/age")); model.makeValue("/root/send/priceamt/disccd", model.getValue("/root/main/info/rsrvacptinfo/item/disccd")); model.makeValue("/root/send/priceamt/pkguncocd", model.getValue("/root/main/info/rsrvacptinfo/item/pkguncocd")); model.makeValue("/root/send/priceamt/forgneryn", model.getValue("/root/main/info/rsrvacptinfo/item/forgneryn")); model.makeValue("/root/send/priceamt/choiflag", model.getValue("/root/main/info/rsrvacptinfo/item/choiflag")); model.makeValue("/root/send/priceamt/statflag", model.getValue("/root/main/info/rsrvacptinfo/item/statflag")); model.removenode("/root/priceamt/priceamt"); if(submit("TRAHA00509")) { model.makeValue("/root/main/info/rcptinfo/subtotamt", model.getValue("/root/temp/priceamt/priceamt/subtotamt")); //소계 model.makeValue("/root/main/info/rcptinfo/pkgamt", model.getValue("/root/temp/priceamt/priceamt/pkgamt")); //패키지금액 model.makeValue("/root/main/info/rcptinfo/addamt", model.getValue("/root/temp/priceamt/priceamt/cmpyaddamt")); //단체추가검사금액 model.makeValue("/root/main/info/rcptinfo/addamt", model.getValue("/root/temp/priceamt/priceamt/psnaddamt")); //개인추가검사금액 model.makeValue("/root/main/info/rcptinfo/preamt", model.getValue("/root/temp/priceamt/priceamt/preamt")); //선수금 model.makeValue("/root/main/info/rcptinfo/uncoamt", model.getValue("/root/temp/priceamt/priceamt/uncoamt")); //미수금 model.makeValue("/root/main/info/rcptinfo/discamt", model.getValue("/root/temp/priceamt/priceamt/discamt")); //할인액 model.makeValue("/root/main/info/rcptinfo/realamt", model.getValue("/root/temp/priceamt/priceamt/realamt")); //실수납액 model.makeValue("/root/main/info/rcptinfo/ownbamt", model.getValue("/root/temp/priceamt/priceamt/ownbamt")); //부담액 //추가검사 금액셋팅 fSetAddAmt(); } } function fSaveRsrvAcptPro(vMode, GMode){ if(GMode == "1"){ var vHealExamFlag = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag"); }else{ var vHealExamFlag = fGetHealExamFlag(); if( vHealExamFlag == "" ) return -1; } var sMode = ""; switch(vMode){ case "A" : sMode = "가예약"; break; case "B" : sMode = "보류"; break; case "C" : sMode = "예약"; break; case "D" : sMode = "예약취소"; break; case "E" : sMode = "접수"; break; case "F" : sMode = "접수취소"; break; } sMode = sMode + "정보를"; if(messageBox(sMode, "Q002") != 6) return -1; //if(fChoiChk() == false) return -1 ; ;//패키지 검사중 둘중 하나를 반듯이 선택해야하는 검사 체크(예 : 소화기 내시경 패키지) //setInputNodeCurText(); if(fCheckPatInfo() == false) return -1 ; if(!fCheckAcpt(vMode)) return -1; var vPidYN = "Y"; //예약/예약보류는 등록번호 생성하지 않음. if((vMode == "A") || (vMode == "B")){ vPidYN = "N"; } /* * 수진자정보 */ model.setValue("/root/main/info/patinfo/item/pidcretfg" , vPidYN); model.copyNode("/root/send/save" , "/root/main/info/patinfo/item"); fCheckNodeExist("/root/send/save/userid" , true); model.setValue("/root/send/save/userid" , getUserId()); fCheckNodeExist("/root/send/save/instcd" , true); model.setValue("/root/send/save/instcd" , getUserInfo("dutplceinstcd") ); /* * 예약접수정보 */ fCheckNodeExist("/root/main/info/rsrvacptinfo/item/mode" , true ); model.setValue("/root/main/info/rsrvacptinfo/item/mode" , vMode); fCheckNodeExist("/root/main/info/rsrvacptinfo/item/healexamflag" , true ); model.setValue("/root/main/info/rsrvacptinfo/item/healexamflag" , vHealExamFlag); model.duplicate("/root/send/save" , "/root/main/info/rsrvacptinfo/item"); model.makeValue("/root/send/save/item/ownbamt" , model.getValue("/root/main/info/rcptinfo/ownbamt")); model.makeValue("/root/send/save/pkgcd" , model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd")); model.makeValue("/root/send/save/cmpyflag" , model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag")); model.makeValue("/root/send/save/cmpycd" , model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd")); model.makeValue("/root/send/save/conseq" , model.getValue("/root/main/info/rsrvacptinfo/item/conseq")); model.makeValue("/root/send/save/conhistseq" , model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq")); model.makeValue("/root/send/save/choiflag" , model.getValue("/root/main/info/rsrvacptinfo/item/choiflag")); model.makeValue("/root/send/save/zipcdseq1" , model.getValue("/root/main/info/patinfo/item/zipcdseq1")); model.makeValue("/root/send/save/zipcdseq2" , model.getValue("/root/main/info/patinfo/item/zipcdseq2")); model.makeValue("/root/send/save/clntcmpynm" , model.getValue("/root/main/info/rsrvacptinfo/item/clntcmpynm")); model.makeValue("/root/send/save/clntdeptnm" , model.getValue("/root/main/info/rsrvacptinfo/item/clntdeptnm")); model.makeValue("/root/send/save/clntempid" , model.getValue("/root/main/info/rsrvacptinfo/item/clntempid")); model.makeValue("/root/send/save/clntpos" , model.getValue("/root/main/info/rsrvacptinfo/item/clntpos")); model.makeValue("/root/send/save/patm_brthareacnts" , model.getValue("/root/main/info/patinfo/item/brthareacnts")); model.makeValue("/root/send/save/acpt_brthareacnts" , model.getValue("/root/main/info/rsrvacptinfo/item/brthareacnts")); //건진장소구분에 의한 예약건진상세구분 세팅 //기업건진 추가 2009-08-28 if(cmb_place.value == 'S'){ model.makeValue("/root/send/save/rsltsave/rsrvdetlflag" , 'C01'); model.makeValue("/root/main/info/rsrvacptinfo/item/rsrvdetlflag" , 'C01'); }else if(cmb_place.value == 'K'){ model.makeValue("/root/send/save/rsltsave/rsrvdetlflag" , 'C03'); model.makeValue("/root/main/info/rsrvacptinfo/item/rsrvdetlflag" , 'C03'); } /* * RFID */ fCheckNodeExist("/root/send/save", true); model.makeValue("/root/send/save/taginfo/rtime" , model.getValue("/root/main/info/taginfo/rtime")); model.makeValue("/root/send/save/taginfo/tagno" , model.getValue("/root/main/info/taginfo/tagno")); model.makeValue("/root/send/save/taginfo/suppstat" , model.getValue("/root/main/info/taginfo/suppstat")); /* *결과상담 예약내역 저장 */ //예약 및 접수취소일경우 현재 이후의 예약이며 결과상담이 완료되지 않은 내역은 삭제합니다. if(vMode == "F"|| vMode == "D"){ var rsltRsrvCnt = getNodesetCount("/root/main/info/rsltcnstinfo/cnstlst/cnst"); for(var i=1; i<=rsltRsrvCnt; i++) { var cnstEndYN = model.getValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/rsltcnstendyn"); var rsltCnstDD = model.getValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/rsltcnstdd"); var rsltCnstRsrvStarttm = model.getValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/rsltcnstrsrvstarttm"); var dtRsrvdd = (rsltCnstDD + " " + rsltCnstRsrvStarttm + "00" ).toDate("YYYYMMDD hhmmss"); if((cnstEndYN == "N" || cnstEndYN == "") && dtRsrvdd > getCurrentDateTime().toDate("YYYYMMDD hhmmss")){ model.setValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/m", "d"); model.setValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/rsltrsrvsaveyn", "N"); } } } var rsltRsrvList = instance1.selectNodes("/root/main/info/rsltcnstinfo/cnstlst/cnst[rsltrsrvsaveyn='N']"); model.makeNode("/root/send/save/rsltsave"); model.makeValue("/root/send/save/rsltsave/rsltrsrv", getNodeListCSV(rsltRsrvList)); /* * 추가검사정보 * 종검을 제외한 나머지 검진은 선택된 프로파일을 추가검사정보에 가지고 있으므로 여기서 삭제한다 */ /* if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")=="G"){ for(i=1; i=parseInt(startdd)){ fRfidWrite("WR", ipt_pid.value, ipt_pnm.value); } //접수와 동시에 환자 팔찌 출력여부 결정 startdd = model.getValue("/root/init/baseinfo/S980list/S980[cdid = '2']/cdnm"); if(parseInt(today)>=parseInt(startdd)){ btn_bracelet.dispatch("DOMActivate"); } } //RFID 카드 Write(2016/11/22) ret = fCalcAmt("RCPT"); //1은 서브미션결과가 TRUE if(ret == 1){ // 2016/08/01 검진 순서표 자동 출력 되도록 프로그램 수정 if(model.getValue("/root/tmp2/printchk")=='Y'){ ipt_pid.value = model.getValue("root/tmp/reqacpt/pid"); ipt_pid.refresh(); btn_examseq2.dispatch("DOMActivate"); } // 2016/08/01 검진 순서표 자동 출력 되도록 프로그램 수정 //함수 내에서 조건에 따라 수납화면 팝업 //TRAHA02105로 영수증번호 채번 //TXAHA02102로 수납화면에 뿌려지는 내용인 카드현금수납내역, 할인내역, 검사내역등 을 조회해온다. /root/hidden/rcpt_out에 결과저장 //ahafRcptAmt("RCPT"); //2008.09.30 비자건진 담당자 요청에 따라 비자건진 접수시 수납창 안띄워줌 //2010.07.29 JHP 건진/예약접수 수납화면 쪼회시 hopedd 기준 조회 되게 수정함. //ahafRcptAmt의 orddd를 hopedd로 변경함. // - 접수취소시에도 조회는 같은 내용으로 들어가니까. hopedd로 변경함. if(model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag") != "G" && model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag") != "G02"){ ahafRcptAmt("RCPT" , model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd") , model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno") , model.getValue("/root/main/info/rsrvacptinfo/item/pid") , model.getValue("/root/main/info/rsrvacptinfo/item/hopedd") , model.getValue("/root/main/info/rsrvacptinfo/item/rcptstat") , "/root/temp/rcptinfo/hidden" , model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag") ) rst = "T"; } } }else if( vMode == "F" ){ //F접수 취소 model.makeNode("/root/send/srchjobflag"); model.makeNode("/root/send/srchrcptdd"); model.makeNode("/root/send/srchrcptno"); model.makeNode("/root/send/srchrcptseqno"); ret = fCalcAmt("CANCEL"); if(ret == 1){ ahafRcptAmt("CANCEL" , model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd") , model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno") , model.getValue("/root/main/info/rsrvacptinfo/item/pid") , model.getValue("/root/main/info/rsrvacptinfo/item/hopedd") , model.getValue("/root/main/info/rsrvacptinfo/item/rcptstat") , "/root/temp/rcptinfo/hidden" , model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag") ) rst = "T"; } } /* if (vMode=="C")//통합예약 뛰우기{ vGrdObj = grd_addlst; for( var i = 1; i <= vGrdObj.rows ; i++){ model.makeValue("/root/send/test[" + i +"]/pkgcd" , model.getValue(vGrdObj.nodeset + "[" + i + "]/testcd")); } model.makeValue("/root/send/test[" + i+1 +"]/pkgcd" , model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd")); fTotRsrv(); } */ //2010-04-12 부천성모만 문진표 자동출력 model.setValue("/root/send/data/cdgrupid" , "S700"); model.setValue("/root/send/data/srchcond" , "cd"); model.setValue("/root/send/data/cdid" , "1"); model.setValue("/root/send/data/srchuseyn" , "Y"); submit("TRAHA00004"); var autorsrv = model.getValue("root/main/codelist/item/cdnm"); if(autorsrv == "Y" && vMode == "C" && (btn_rsrvcfm.disabled == false)){ //예약 btn_rsrvprnt.dispatch("onclick"); //예약시 문진표 자동출력 } fInitInfo(); //접수 정보 및 건진자 정보 초기화 ipt_pnm.currentText =""; fSetBtnStat(); //예약,접수등 상태에 맞는 버튼 셋팅 fGetList(); //TRAHA00103 -건진자 리스트 조회 //closeLoadingBar() ;//처리중 화면을 close한다. var sytsrsrvchk = model.getValue("/root/tmp/sytsrsrvchk/sytsrsrvchk"); if(sytsrsrvchk == "Y" ){// 통합예약할 내역이 있으면 "Y" model.setValue("/root/main/info/rsrvacptinfo/item/pid" ,model.getValue("/root/tmp/reqacpt/pid")); //2015/07/02 통합예약 프로그램 호출 수정 //button2.dispatch("onclick"); button23.dispatch("onclick"); //2015/07/02 통합예약 프로그램 호출 수정 } model.refresh(); }else{ messageBox("저장이 잘못되었습니다", "E999"); } return 1; } function fRfidWrite(type, pid, hngnm){ // debugger; try{ var activeObj = new ActiveXObject("WScript.Shell"); activeObj.CurrentDirectory = "C:/Program Files/himed/components/JsInfo"; var fileName = ""; if(type == "WR") {// 저장과 동시에 환자번호 Write //fileName = "JS_RfidCCR_K1.exe " + type + "," + pid + "," + hngnm ; fileName = "Js_RfidCCRVb.exe " + pid + " " + hngnm; }else if(type == "READ") { // Writing 되어 있는 환자 번호 리딩 fileName = "Js_RfidCCRVb.exe " + type ; } activeObj.Run(fileName); }catch(e){ alert("RFID 카드 등록오류"); } } function fretinstanceset(){ model.makeValue("/root/main/info/rsrvacptinfo/item/rsrvdd" , model.getValue("/root/tmp/reqacpt/rsrvdd")); model.makeValue("/root/main/info/rsrvacptinfo/item/rsrvno" , model.getValue("/root/tmp/reqacpt/rsrvno")); model.makeValue("/root/main/info/rsrvacptinfo/item/pid" , model.getValue("/root/tmp/reqpat/pid")); model.makeValue("/root/main/info/rsrvacptinfo/item/orddd" , model.getValue("/root/tmp/reqpat/orddd")); model.makeValue("/root/main/info/patinfo/item/pid" , model.getValue("/root/tmp/reqpat/pid")); } function fTotRsrv(){ var vPkgCount = getNodesetCount("/root/send/test/pkgcd"); if(vPkgCount !=0){ submit("TRAHA00014");//패키지내 중복 체크*/ var testnm =""; var testnmcount =""; var cnt = getNodesetCount("/root/tmp/totrsrv/testcount"); if(cnt != 0){ alert("///"); aezfPopUpRsrvSample("SMAEA02000", "", "/root/main/info/rsrvacptinfo/item"); } } model.removeNodeset("/root/send/test"); } function fGetPro(){ model.makeValue("/root/send/srchpkgflag", ""); model.makeValue("/root/send/srchhealexamflag", "G"); model.makeValue("/root/send/srchcond" , ""); if(model.getValue("/root/send/pkgcd") == ""){ model.makeValue("/root/send/srchcond" , ""); model.makeValue("/root/send/srchcdnm" , ""); }else{ model.makeValue("/root/send/srchcond" , "cd"); model.makeValue("/root/send/srchcdnm" , model.getValue("/root/send/pkgcd")); } if(model.getValue("/root/send/srchcond") == ""){ if(model.getValue("/root/send/pkgnm") == ""){ model.makeValue("/root/send/srchcond" , ""); model.makeValue("/root/send/srchcdnm" , ""); }else{ model.makeValue("/root/send/srchcond" , "nm"); model.makeValue("/root/send/srchcdnm" , model.getValue("/root/send/pkgnm")); } } submit("TRAHB00303"); } function finsuCheck(){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu1",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu2",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu3",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu4",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu5",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu6",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu7",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu8",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu9",""); model.makeValue("/root/main/info/rsrvacptinfo/item/insu10",""); if(model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G01"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu1", "G01"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G02"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu2", "G02"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G03"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu3", "G03"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G04"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu4", "G04"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G05"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu5", "G05"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G06"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu6", "G06"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G07"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu7", "G07"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G08"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu8", "G08"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G09"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu9", "G09"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G010"){ model.makeValue("/root/main/info/rsrvacptinfo/item/insu10", "G010"); model.makeValue("/root/main/info/rsrvacptinfo/item/healexamflag","G"); } } function fInsuChange(){ if(model.getValue("/root/send/srchcdnm") !=""){ model.makeValue("/root/send/srchflag" , "02"); model.makeValue("/root/send/srchcond" , "nm" ); model.makeValue("/root/send/srchinstcd" , getUserInfo("dutplceinstcd")); submit("TRAHA00105"); if(model.getValue("/root/temp/cdlst/item/cmpycd")!=""){ opener.model.makeValue("/root/main/info/rsrvacptinfo/item/insucorpbrchcd",model.getValue("/root/temp/cdlst/item/cmpycd")); } } } function fGetAutoCode(vMode, dgflag){ model.makeValue("/root/tmp/cdflag",vMode); model.makeValue("/root/tmp/dgflag",dgflag); modal("SPAHA00700"); } //마약 집게 추가(대장내시경시 마약 신청) function fDrugSum(){ submit("TXAHA00105"); } function fChoiChk(){ var a = ""; var cnt = 0; var cnt2 = 0; for(var i=1; i < grd_addlst.rows;i++){ if ((grd_addlst.valueMatrix(i,grd_addlst.colRef("testflag"))=="S")){cnt2 = cnt2 +1 ; } if ((grd_addlst.valueMatrix(i,grd_addlst.colRef("testflag"))=="S") && (grd_addlst.valueMatrix(i,grd_addlst.colRef("sel")) =="Y")){ cnt = cnt+ 1; } } if(cnt == 0 && cnt2 != 0 ){ var rtn = messageBox("패키지내 선택검사 중 1개의 선택검사도 선택 되지 않았습니다, 계속 하시겠습니까? ", "Q0999"); if(rtn == 6){return true;} else if(rtn == 7){return false;} } } /* * 환자정보 생성 및 저장 */ function fSavePtbs(){ if( fCheckPatInfo() == false ) return -1 ; //수진자정보 model.copyNode("/root/send/save", "/root/main/info/patinfo/item"); fCheckNodeExist("/root/send/save/userid", true); model.setValue("/root/send/save/userid", getUserId() ); fCheckNodeExist("/root/send/save/instcd", true); model.setValue("/root/send/save/instcd", getUserInfo("dutplceinstcd") ); submit("TXAHA00111", false) ; model.setValue("/root/main/info/patinfo/item/pid" , model.getValue("/root/tmp/patinfo/pid")); ipt_pid.refresh(); } // 추가검사 금액셋팅 // 수정이력 : 20100712 JHP 금액계산부분에서 NaN(이 발생하여 금액이 1로 되는 경우 발생하여 NaN일때 0으로 바꾸는 로직 추가 function fSetAddAmt() { var disccd = model.getValue("/root/main/info/rsrvacptinfo/item/disccd"); // 할인코드 var cmpycd = model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd"); // 단체코드 var statflag = model.getValue("/root/main/info/rsrvacptinfo/item/statflag"); // 단체코드 var chngyn = model.getValue("/root/temp/priceamt/priceamt/chngyn"); // 부담금 변경여부 var pkgdiscyn = model.getValue("/root/main/info/rsrvacptinfo/item/pkgdiscyn"); // 패키지 할인 여부 var disc = 0; var pAddamt = 0; var sCnt = 0; var pkgDisc = 0; var addDisc = 0; var uncoamt = 0; var ownbamt = 0; var PkgDiscamt = 0; var subtotamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/subtotamt")); //소계 var pkgamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/pkgamt")); //패키지금액 var cmpyaddamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/cmpyaddamt")); //단체추가검사금액 var psnaddamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/psnaddamt")); //개인추가검사금액 var preamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/preamt")); //선수금 var discamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/discamt")); //할인액 var realamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/realamt")); //실수납액 var org_uncoamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/orguncoamt")); // 계약처의 미수금(변경없는) var org_ownbamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/orgownbamt")); //게약처의 원래 부담금 if(chngyn == "Y") { uncoamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/chnguncoamt")); //미수금 ownbamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/chngownbamt")); //부담액 }else { uncoamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/uncoamt")); //미수금 ownbamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/ownbamt")); //부담액 } // 할인율 if(disccd != "") { pkgDisc = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[cd='"+ disccd + "']/dcamt")); addDisc = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[cd='"+ disccd + "']/adddcamt")); } // 수정추가 20100712 JHP disccd가 값은 있는데 실제 할인코드 인지 미수코드인지 구분을 받는게 없어서 NaN을 발생한다. 하여 NaN이면 0으로 바꾼다. if(isNaN(pkgDisc) == true){ pkgDisc = 0; } if(isNaN(addDisc) == true){ addDisc = 0; } // 개인일 경우 패키지의 할인율 적용 if(cmpycd == "") { if(pkgdiscyn == "Y") { discamt = discamt + Math.round(pkgamt*(pkgDisc/100)); PkgDiscamt = Math.round(pkgamt*(pkgDisc/100)); } } var cnt = getNodesetCount("/root/main/info/rsrvacptinfo/addlst") ; for(var i=1; i <= cnt; i++) { var sel = model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/sel"); var testflag = model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/testflag"); // 검사구분 var uncocd = model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/uncocd"); // 청구구분 var scoreamt = parseInt(model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/scoreamt")); // 단가 var testdiscyn = model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/testdiscyn"); //추가검사할인적용여부 var dcamt = testdiscyn == "Y"? Math.round(scoreamt*(addDisc/100)) : 0; // 추가검사금액 if("Y" == sel) { if(testflag == "S") { sCnt++; if(cmpycd != "") { if("V01" == uncocd) { pAddamt += (scoreamt - dcamt); psnaddamt += scoreamt; discamt += dcamt; subtotamt += scoreamt; }else if("V02" == uncocd) { uncoamt += (scoreamt - dcamt); // 미수금액 cmpyaddamt += scoreamt; discamt += dcamt; subtotamt += scoreamt; } } }else { if(cmpycd != "") { if("V01" == uncocd) { pAddamt += (scoreamt - dcamt); // 개인추가금액 psnaddamt += scoreamt; }else if("V02" == uncocd) { uncoamt += (scoreamt - dcamt); //미수금액 cmpyaddamt += scoreamt; } discamt += dcamt; subtotamt += scoreamt; }else { pAddamt += (scoreamt - dcamt); psnaddamt += scoreamt; discamt += dcamt; subtotamt += scoreamt; } } } } // 개인 일 경우 if(cmpycd == "") { if(sCnt > 1) { messageBox("선택검사을 2개이상" , "E005"); } } model.makeValue("/root/main/info/rcptinfo/subtotamt", subtotamt); //소계 model.makeValue("/root/main/info/rcptinfo/pkgamt", pkgamt); //패키지금액 model.makeValue("/root/main/info/rcptinfo/cmpyaddamt", cmpyaddamt); //추가검사금액 model.makeValue("/root/main/info/rcptinfo/psnaddamt", psnaddamt); //추가검사금액 model.makeValue("/root/main/info/rcptinfo/preamt", preamt); //선수금 model.makeValue("/root/main/info/rcptinfo/uncoamt", uncoamt); //미수금 model.makeValue("/root/main/info/rcptinfo/discamt", discamt); //할인액 if(statflag == "E" || statflag == "G" || statflag == "H" || statflag == "I") { model.makeValue("/root/main/info/rcptinfo/realamt", realamt); //실수납액 }else { if(cmpycd != "") { model.makeValue("/root/main/info/rcptinfo/realamt", pAddamt + ownbamt - realamt - preamt); //실수납액 }else { model.makeValue("/root/main/info/rcptinfo/realamt", pkgamt + pAddamt - PkgDiscamt - realamt - preamt); //실수납액 } } model.makeValue("/root/main/info/rcptinfo/ownbamt", ownbamt); //부담액 model.makeValue("/root/main/info/rcptinfo/tempamt", org_uncoamt + org_ownbamt); //게약처 미수금 + 부담금 if(0 > parseInt(model.getValue("/root/main/info/rcptinfo/realamt"))) { opt_realamt.attribute("style") = "left:904px; top:675px; width:291px; height:65px; text-align:right; vertical-align:bottom; color:#ff0000 "; }else { opt_realamt.initStyle("color"); opt_realamt.attribute("style") = "left:904px; top:675px; width:291px; height:65px; text-align:right; vertical-align:bottom;"; } model.refresh(); } //렉스포트형 바코드 출력 // rexnm : 레포트코드 // closeYn : 미리보기 여부(보기:true, 안보기:비우거나 false) // printCount : 출력 숫자 // dataXPath : 파라메터 위치 // paramsXPath : 파라메터 위치 // infoXPath : 바코드 프린터 정보 위치 function fPrintRexbar(rexnm, closeYn, printCount, dataXPath, paramsXPath, infoXPath){ var posx = ''; var posy = ''; var printnm = ''; if(infoXPath == "" || infoXPath == "undefined" || infoXPath == null) infoXPath = "/root/main/barcdprntsetup/prntsetupinfo"; if(model.getValue(infoXPath + "/setupinfo/rexgbn") != "1") return false; try{ if(model.getXpathValue("count(" + infoXPath + "/setupinfo/pcl/pcllist[barnm='"+rexnm+"']/barnm)") > "0"){ posx = model.getValue(infoXPath + "/setupinfo/pcl/pcllist[barnm='"+rexnm+"']/xpos"); posy = model.getValue(infoXPath + "/setupinfo/pcl/pcllist[barnm='"+rexnm+"']/ypos"); printnm = model.getValue(infoXPath + "/setupinfo/pcl/pcllist[barnm='"+rexnm+"']/prtnm"); }else{ posx = model.getValue(infoXPath + "/setupinfo/blank/left"); posy = model.getValue(infoXPath + "/setupinfo/blank/top"); printnm = model.getValue(infoXPath + "/setupinfo/comm01/setupval"); } if(posx == '') posx = "0"; if(posy == '') posy = "0"; if(closeYn == "true") printnm = ""; exeReportPreview(rexnm, 'XMLSTR', paramsXPath, '', printnm, '', '', '', '', "true", '', '', '', '', '', printCount, '', 'offsetx=' + posx + ';offsetx=' + posy + ';', dataXPath, '', ''); } catch(e){ alert("출력시 오류가 발생하였습니다\n" + e); return true; } return true; } /* * 개인정보이용동의서 출력 */ function fPrintPerson(pid, orddd, cretno, scanyn){ // alert(pid+" : "+orddd+" : "+cretno+" : "+scanyn); if(scanyn == "X" || isNull(scanyn)){ //개인정보이용동의서 출력을 위한 서식코드 취득 reqHardCodeInfo("/root/send/reqdata", "/root/init/prncd", "5604"); //emr/prcpmngtweb/js/MMO001.js var ordtype = "S"; var ocrtype = "P"; //(P : 종이, E : 전자) var formcd = ""; var nodeCnt = getNodesetCount("/root/init/prncd/hardcd"); //구분에 맞춰 폼코드 처리(1:일반약정서 / 2:기간약정서 / 3:개인정보이용동의서) for(i=1; i<=nodeCnt; i++){ if(3 == model.getValue("/root/init/prncd/hardcd[" + i + "]/cdseqno")){ formcd = model.getValue("/root/init/prncd/hardcd[" + i + "]/hardcd"); break; } } if(model.getValue("/root/init/baseinfo/PK018list/PK018[cdid='" + app.clientIp + "']/cdnm") == "Y"){ ocrtype = "E"; } if(ocrtype=="E"){ // 전자동의서 출력 setParameter("SSMRC03160_param_patid", pid); setParameter("SSMRC03160_param_indate", orddd); setParameter("SSMRC03160_param_cretno", cretno); setParameter("SSMRC03160_param_instcd", getUserInfo("dutplceinstcd")); setParameter("SSMRC03160_param_class", ordtype); setParameter("SSMRC03160_param_docucd", formcd); setParameter("SSMRC03160_param_cuser", getUserInfo("userid")); setParameter("SSMRC03160_param_flag", "G"); // 일반동의서 modal("SSMRC03160"); }else{ // 종이 출력 setParameter("formcd" , formcd); setParameter("pid" , pid); setParameter("orddd" , orddd); setParameter("cretno" , cretno); setParameter("ordtype" , ordtype); modal("SSMRF03700"); } /* emr/formmngtweb/MRF03700.js - finit() - fPerPrntOCR() - emr/formmngtweb/xrw/SSMRF03800_OCR뷰어.xrw - ivw_ocrprnt.window.javascript.fGetOCRInfo(formcd, pid, orddd, cretno, ordtype, formtypecls, ocrtagprntyn); - ivw_ocrprnt.window.javascript.fPrint(); */ } } /* * 환불내역 조회/승인 * flag : 1.환불내역조회, 2.환불수납후 호출 */ function fRtnRcpt(flag, rtnAmt){ if(model.getValue("/root/main/info/patinfo/item/pid") == null || (model.getValue("/root/main/info/patinfo/item/pid")).getTrim == ""){ messageBox("환자번호가 존재하지 않습니다.", "E999"); } var acptRow = grd_acptlist.row; if(acptRow < 0){ acptRow = 1; } if(flag == "1"){ var sValue = flag + "▦" + //1.환불내역조회 2.환불수납후 호출 model.getValue("/root/hidden/session/dutplceinstcd") + "▦" + //기관코드 model.getValue("/root/main/info/patinfo/item/pid") + "▦" + //환자등록번호 model.getValue("/root/main/info/patinfo/item/hngnm") + "▦" + //환자성명 model.getValue("/root/main/info/patinfo/item/rgstno1") + "▦" + //주민등록번호앞자리 model.getValue("/root/main/info/patinfo/item/rgstno2") + "▦" + //주민등록번호뒷자리 model.getValue("/root/main/info/patinfo/item/telno") + "▦" + //집전화 model.getValue("/root/main/info/patinfo/item/mpphon") + "▦" + //휴대폰 model.getValue("/root/main/list/acpt/acptlist[" + acptRow + "]/orddd") + "▦" + //진료일 model.getValue("/root/main/list/acpt/acptlist[" + acptRow + "]/cretno") + "▦" + //일련번호 model.getValue("/root/main/list/acpt/acptlist[" + acptRow + "]/orddeptcd") + "▦" + //진료과 model.getValue("/root/main/list/acpt/acptlist[" + acptRow + "]/orddrid") + "▦" + //진료의 rtnAmt + "▦" + //환불금액 "51" + "▦" + //보험유형 "S"; //진료유형 setParameter("SPPAO00600_PARM", sValue); modal("SPPAO00600", "1","50", "50", "SPPAO00600", "", "", "sysmenu:hidden"); }else if(flag == "2"){ if(rtnAmt >= 0){ return; }else{ var rtn = messageBox("환불내역을 등록 하시겠습니까?", "Q999"); if(rtn == "6"){ var sValue = flag + "▦" + //1.환불내역조회 2.환불수납후 호출 model.getValue("/root/hidden/session/dutplceinstcd") + "▦" + //기관코드 model.getValue("/root/main/info/patinfo/item/pid") + "▦" + //환자등록번호 model.getValue("/root/main/info/patinfo/item/hngnm") + "▦" + //환자성명 model.getValue("/root/main/info/patinfo/item/rgstno1") + "▦" + //주민등록번호앞자리 model.getValue("/root/main/info/patinfo/item/rgstno2") + "▦" + //주민등록번호뒷자리 model.getValue("/root/main/info/patinfo/item/telno") + "▦" + //집전화 model.getValue("/root/main/info/patinfo/item/mpphon") + "▦" + //휴대폰 model.getValue("/root/main/list/acpt/acptlist[" + acptRow + "]/orddd") + "▦" + //진료일 model.getValue("/root/main/list/acpt/acptlist[" + acptRow + "]/cretno") + "▦" + //일련번호 model.getValue("/root/main/list/acpt/acptlist[" + acptRow + "]/orddeptcd") + "▦" + //진료과 model.getValue("/root/main/list/acpt/acptlist[" + acptRow + "]/orddrid") + "▦" + //진료의 rtnAmt + "▦" + //환불금액 "51" + "▦" + //보험유형 "S"; //진료유형 setParameter("SPPAO00600_PARM", sValue); modal("SPPAO00600", "1","50", "50", "SPPAO00600", "", "", "sysmenu:hidden"); } } } } /** * 패키지에 물려 있는 검사 코드에 동의서 자동 출력 되도록 프로그램 개발 * 2015/01/22 이정택 * @return */ function fPrintOcrInfo(){ model.makeValue("/root/send/testcdinfo/instcd", getUserInfo("dutplceinstcd")); model.makeValue("/root/send/testcdinfo/pid", model.getValue("/root/main/info/acptinfo/acptlist/pid")); model.makeValue("/root/send/testcdinfo/orddd", model.getValue("/root/main/info/acptinfo/acptlist/orddd")); model.makeValue("/root/send/testcdinfo/cretno", model.getValue("/root/main/info/acptinfo/acptlist/cretno")); if(submit("TRAHA00931")){ cnt=getNodeSetCnt("/root/temp/ocrinfo"); for(var i=1; i<=cnt; i++){ setParameter("formcd" , model.getValue("/root/temp/ocrinfo['"+i+"']/formcd")); setParameter("pid" , model.getValue("/root/main/info/acptinfo/acptlist/pid")); setParameter("orddd" , model.getValue("/root/main/info/acptinfo/acptlist/orddd")); setParameter("cretno" , model.getValue("/root/main/info/acptinfo/acptlist/cretno")); setParameter("ordtype" , "S"); modal("SSMRF03700"); } } } function fPrintOcrInfo_20151012(){ var cnt=getNodeSetCnt("/root/main/list/acptdtl/oscllist"); //var codecnt=getNodeSetCnt("/root/init/baseinfo/S902list"); var testcd=""; if(cnt>0){ var sb = new StringBuffer(); for(var i=1; i<=cnt; i++){ /* if(datagrid1.valueMatrix(i,datagrid1.colRef("grupcalcscorcd"))==model.getValue("/root/init/baseinfo/S902list/S902[cdid!='"+""+"']/cdid")){ sb.append("'"+datagrid1.valueMatrix(i,datagrid1.colRef("grupcalcscorcd"))+"'"); } */ sb.append("'"+datagrid1.valueMatrix(i,datagrid1.colRef("grupcalcscorcd"))+"'"); } testcd=sb.toString(","); model.makeValue("/root/send/testcdinfo/instcd", getUserInfo("dutplceinstcd")); model.makeValue("/root/send/testcdinfo/pid", model.getValue("/root/main/info/acptinfo/acptlist/pid")); model.makeValue("/root/send/testcdinfo/orddd", model.getValue("/root/main/info/acptinfo/acptlist/orddd")); model.makeValue("/root/send/testcdinfo/cretno", model.getValue("/root/main/info/acptinfo/acptlist/cretno")); model.makeValue("/root/send/testcdinfo/testcd", testcd); } if(testcd!=""){ if(submit("TRAHA00931")){ cnt=getNodeSetCnt("/root/temp/ocrinfo"); for(var i=1; i<=cnt; i++){ setParameter("formcd" , model.getValue("/root/temp/ocrinfo['"+i+"']/formcd")); setParameter("pid" , model.getValue("/root/main/info/acptinfo/acptlist/pid")); setParameter("orddd" , model.getValue("/root/main/info/acptinfo/acptlist/orddd")); setParameter("cretno" , model.getValue("/root/main/info/acptinfo/acptlist/cretno")); setParameter("ordtype" , "S"); modal("SSMRF03700"); } } } //2015/01/21 이정택 } /** * 이정택 2015/01/21 * @return */ function StringBuffer(){ this.buffer = []; } /** * 이정택 2015/01/21 * @return */ StringBuffer.prototype.append = function(str) { if (isNull(str)) { str = ""; } this.buffer.push(str); return this; } /** * 이정택 2015/01/21 * @return */ StringBuffer.prototype.toString = function(str) { if (isNull(str)) { str = ""; } return this.buffer.join(str); } /** * 신우편번호 체계 관련 공통함수 */ function fNewZipCdCheck(zipcd1, zipcd2){ if(zipcd2.length!=2){ messageBox("2015년 8월 1일부터 우편번호 뒷자리는 2자리 변경되었습니다.\n확인 후 수정부탁드립니다.", "E"); return; } } /** * 종합건진 그리드 클릭시 동명이인 확인을 위해서 로직 추가(2016/10/25) */ function fChkPatNameC(gridNode, colName, patName){ //var cnt=getNodeSetCnt(gridNode + "[pnm='" + patName + "']"); var cnt=getNodeSetCnt(gridNode + "["+ colName + "='" + patName + "']"); if(parseInt(cnt)>1){ messageBox("["+patName+"]님으로 동명이인이 존재합니다. 확인 후 진행부탁드립니다.", "I"); } } /** * 환자 팔찌 출력 관련 프로그램 개발(2017/02/03 이정택) */ function fPrintBarCode() { var pid = model.getValue("/root/main/info/patinfo/item/pid"); var hngnm = model.getValue("/root/main/info/patinfo/item/hngnm"); var rrgstno1 = model.getValue("/root/main/info/patinfo/item/rgstno1"); var today = getCurrentDate(); var lastinfo = model.getValue("/root/main/info/rsrvacptinfo/item/latestpkginfo").substr(0, 10).replaceAll("-", ""); var sex = model.getValue("/root/main/info/patinfo/item/sex"); var age = model.getValue("/root/main/info/patinfo/item/age"); model.makeValue("/root/hidden/h_receipt/receipt/pid", pid); model.makeValue("/root/hidden/h_receipt/receipt/hngnm2", hngnm); model.makeValue("/root/hidden/h_receipt/receipt/rrgstno",rrgstno1+" "+today+"/"+lastinfo); model.makeValue("/root/hidden/h_receipt/receipt/sex", sex); model.makeValue("/root/hidden/h_receipt/receipt/wardcd", "건강증진센터"); model.makeValue("/root/hidden/h_receipt/receipt/babyyn", "N"); model.makeValue("/root/hidden/h_receipt/receipt/age", age); model.refresh(); // 프린터정보 var print_name = ""; // 트레이정보 var print_tray = ""; // 건진 환자 팔찌 프린터 기준자료 설정 print_name = model.getValue("/root/init/baseinfo/S980list/S980[cdid = '1']/cdnm"); print_tray = model.getValue("/root/init/baseinfo/S980list/S980[cdid = '1']/sortseq"); if (print_name == 'SLP-T400' || print_name == 'SLP-T401') { exeReportPreview("RPPMI03202", "XMLSTR" , "" , "" , print_name , "", "", "", "", "true", "", "", print_tray); } } /** * 종합건진 미수 청구를 분리 시킴 * @return */ function fUncoSeparate(){ var uncocd = cmb_pkguncocd.value; var pkgamt = parseInt(opt_pkgamt.value); var discamt = parseInt(opt_discamt.value); if(uncocd == 'V14'){ ipt_paycmpyamt.disabled=false; ipt_payinsubamt.disabled=false; if(isNull(ipt_paycmpyamt.value)){ ipt_paycmpyamt.value = pkgamt - discamt; } if(isNull(ipt_payinsubamt.value)){ ipt_payinsubamt.value = "0"; } }else{ ipt_paycmpyamt.disabled=true; ipt_payinsubamt.disabled=true; } ipt_paycmpyamt.refresh(); ipt_payinsubamt.refresh(); } //업체와 공단미수금액을 변경시 미수금액을 자동 세팅시킴 function fSetUncoAmt(btn_name){ var uncocd = cmb_pkguncocd.value; var pkgamt = parseInt(opt_pkgamt.value) - parseInt(opt_discamt.value); var paycmpyamt = model.getValue("/root/main/info/rsrvacptinfo/item/paycmpyamt").replaceAll(",", ""); var payinsubamt = model.getValue("/root/main/info/rsrvacptinfo/item/payinsubamt").replaceAll(",", ""); if(uncocd == 'V14'){ if(btn_name=="ipt_paycmpyamt"){ ipt_payinsubamt.value = parseInt(pkgamt) - parseInt(paycmpyamt); }else if(btn_name=="ipt_payinsubamt"){ ipt_paycmpyamt.value = parseInt(pkgamt) - parseInt(payinsubamt); } } ipt_paycmpyamt.refresh(); ipt_payinsubamt.refresh(); }