SMPID26100_불완전상병명세서조회.xrw 44 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189
  1. <?xml version="1.0" encoding="EUC-KR"?>
  2. <?xml-stylesheet href="../../../com/commonweb/css/common.css" type="text/css" ?>
  3. <xhtml:html xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://www.w3.org/2002/01/xforms" xmlns:ev="http://www.w3.org/2001/xml-events">
  4. <xhtml:head>
  5. <xhtml:title>불완전상병 조회</xhtml:title>
  6. <model id="model1">
  7. <instance id="instance1">
  8. <root xmlns="">
  9. <main>
  10. <!-- SPPMC02500_환자조회 화면에서 선택된 검색결과를 받는 경로임 -->
  11. <patinfo>
  12. <patinfolist/>
  13. </patinfo>
  14. <popupendflag/>
  15. <grdlist>
  16. <clamcutlist>
  17. <pid/>
  18. <hngnm/>
  19. <gndr/>
  20. <ioflag/>
  21. <clamym/>
  22. <clamflagcd/>
  23. <clamdg/>
  24. <insukind/>
  25. <suppkind/>
  26. <clamdeptcd/>
  27. <orddd/>
  28. <diagcd/>
  29. <acptno/>
  30. <docuseqno/>
  31. <edilnno/>
  32. <snglcalcscorcd/>
  33. <edicd/>
  34. <calchngnm/>
  35. <unitcost/>
  36. <drugqty/>
  37. <tims/>
  38. <dayno/>
  39. <totdrugqty/>
  40. <amt/>
  41. <indd/>
  42. <cretfromdd/>
  43. <crettodd/>
  44. <clamdrid/>
  45. <judgyn/>
  46. <cutdrugqty/>
  47. <cuttims/>
  48. <cutdayno/>
  49. <totcutqty/>
  50. <oprcp/>
  51. <payflag/>
  52. <judgrnm/>
  53. <orddeptcd/>
  54. <orddrnm/>
  55. </clamcutlist>
  56. </grdlist>
  57. <spclspec/>
  58. <spclspec_cmb/>
  59. </main>
  60. <init>
  61. <!-- 진료과 -->
  62. <orddeptcdlist>
  63. <cd/>
  64. <nm/>
  65. </orddeptcdlist>
  66. <!-- 진료의 -->
  67. <orddrid>
  68. <cd/>
  69. <nm/>
  70. </orddrid>
  71. <!-- 보험유형 -->
  72. <P0008list>
  73. <P0008>
  74. <cdnm/>
  75. <cdid/>
  76. </P0008>
  77. </P0008list>
  78. <!-- 청구구분 -->
  79. <P0155list>
  80. <P0155>
  81. <cdnm/>
  82. <cdid/>
  83. <cdengabbrnm/>
  84. </P0155>
  85. </P0155list>
  86. <!-- 급여구분 -->
  87. <P0104list>
  88. <P0104>
  89. <cdnm/>
  90. <cdid/>
  91. </P0104>
  92. </P0104list>
  93. <!-- 청구년월 -->
  94. <clamdg/>
  95. <clamdgfrom>
  96. <clamdglist>
  97. <clamdgnm/>
  98. <clamdgcd/>
  99. </clamdglist>
  100. </clamdgfrom>
  101. <clamdgto>
  102. <clamdglist>
  103. <clamdgnm/>
  104. <clamdgcd/>
  105. </clamdglist>
  106. </clamdgto>
  107. <U0001list/>
  108. <earnclslist/>
  109. <trustinstnmlist>
  110. </trustinstnmlist>
  111. <P0117list>
  112. <P0117>
  113. <cdnm/>
  114. <cdid/>
  115. </P0117>
  116. </P0117list>
  117. <P0099list>
  118. <P0099>
  119. <cdnm/>
  120. <cdid/>
  121. </P0099>
  122. </P0099list>
  123. <spclspec/>
  124. <P0151list>
  125. <P0151>
  126. <cdnm/>
  127. <cdid/>
  128. </P0151>
  129. </P0151list>
  130. </init>
  131. <send>
  132. <clamflag/>
  133. <clamym/>
  134. <clamymfrom/>
  135. <clamdgfrom>1</clamdgfrom>
  136. <clamymto/>
  137. <clamdgto/>
  138. <insukind/>
  139. <ioflag/>
  140. <clamdeptid/>
  141. <orddeptcd/>
  142. <orddrid/>
  143. <code/>
  144. <patunitsrch/>
  145. <cutonly/>
  146. <codecond/>
  147. <cancer/>
  148. <large/>
  149. <middle/>
  150. <small/>
  151. <judgrid/>
  152. <edicd/>
  153. <trustinstcd/>
  154. <clamcutlist/>
  155. <spclcd>JX999</spclcd>
  156. <mpsflag>A</mpsflag>
  157. <judgrid/>
  158. <send_afjudg>
  159. <workflag/>
  160. <clamym/>
  161. <clamdg/>
  162. <pid/>
  163. <pidsn/>
  164. <ioflag/>
  165. </send_afjudg>
  166. <diagcd/>
  167. <diagnm/>
  168. <delgb>A</delgb>
  169. <fromdiagcd/>
  170. <todiagcd/>
  171. <judgendyn/>
  172. <fromdiagcd2/>
  173. <todiagcd2/>
  174. <ordflag>J</ordflag>
  175. </send>
  176. <hidden>
  177. <smpic00200>
  178. <judgsrch>
  179. <con1_dd/>
  180. <con2_gsflag/>
  181. <con3_search1/>
  182. <con4_search2/>
  183. <con5_insu/>
  184. </judgsrch>
  185. <rslt>
  186. <mech/>
  187. <picmmech/>
  188. <edicd/>
  189. </rslt>
  190. </smpic00200>
  191. <sppmc02500>
  192. <cond>
  193. <srchcond/>
  194. <pid/>
  195. <hngnm/>
  196. </cond>
  197. </sppmc02500>
  198. <smpid20300>
  199. <cond>
  200. <!-- "이전 명세서 목록" Grid에서 선택한 명세서의 청구키를 SMPID20300_입원사후심사관리 에 전달하기 위한 조건 값 -->
  201. <clamym/>
  202. <clamdg/>
  203. <pid/>
  204. <pidsn/>
  205. <ioflag/>
  206. <workflag/>
  207. </cond>
  208. </smpid20300>
  209. <smpid20500>
  210. <cond>
  211. <!-- "이전 명세서 목록" Grid에서 선택한 명세서의 청구키를 SMPID20500_외래사후심사관리 에 전달하기 위한 조건 값 -->
  212. <clamym/>
  213. <clamdg/>
  214. <pid/>
  215. <pidsn/>
  216. <ioflag/>
  217. <workflag/>
  218. </cond>
  219. </smpid20500>
  220. <sppiz00400>
  221. <rslt>
  222. <diagcd/>
  223. <diaghngnm/>
  224. <diagengnm/>
  225. </rslt>
  226. <cond>
  227. <basedd/>
  228. <diagcd/>
  229. <diagnm/>
  230. <selectedrdodiagkind/>
  231. </cond>
  232. </sppiz00400>
  233. <targetdiag>
  234. <diagcdref/>
  235. <diagnmref/>
  236. <diagcd/>
  237. </targetdiag>
  238. </hidden>
  239. <popupdata>
  240. <popupmenu>
  241. <gridoutjudg>
  242. <item>
  243. <name>삭제</name>
  244. <func>
  245. <fDeleteRow/>
  246. </func>
  247. </item>
  248. </gridoutjudg>
  249. </popupmenu>
  250. </popupdata>
  251. <tmp/>
  252. <send_diag>
  253. <clamym/>
  254. <clamdg/>
  255. <fromdiagcd/>
  256. <todiagcd/>
  257. <ioflag/>
  258. </send_diag>
  259. </root>
  260. </instance>
  261. <script type="javascript" ev:event="xforms-ready">
  262. <![CDATA[
  263. // 화면 초기화
  264. //grd_outjudg.fixedcellcheckbox(0,19) = true;
  265. grd_outjudg.fixedcellcheckbox(0,grd_outjudg.colRef("diagkindcd")) = true;
  266. fInitialize();
  267. ]]>
  268. </script>
  269. <!-- submission -->
  270. <submission id="TRZBC00102" mediatype="application/x-www-form-urlencoded" method="post" replace="instance"/>
  271. <submission id="TRPID20309" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/init/tmp"/>
  272. <submission id="TRPID20407" mediatype="application/x-www-form-urlencoded" method="post" ref="root/send" resultref="/root/init/clamdg"/>
  273. <submission id="TRPID20201" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/init/tmp"/>
  274. <submission id="TRPIB00603" mediatype="application/x-www-form-urlencoded" method="post" resultref="/root/init/U0001list"/>
  275. <submission id="TRPAM00105" mediatype="application/x-www-form-urlencoded" method="post"/>
  276. <submission id="TRPID20306" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/hidden/sppiz00400/cond" resultref="/root/hidden/sppiz00400"/>
  277. <submission id="TRPID26100" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/main/clamcutlist"/>
  278. <submission id="TXPID26100" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send_diag" resultref="/root/temp"/>
  279. <submission id="TXPIS01602" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/temp"/>
  280. <submission id="TXPIJ00402" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/listval" resultref="/root/hidden/listval"/>
  281. <submission id="TXPID20302" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/list1/endclbs"/>
  282. </model>
  283. <!-- js import -->
  284. <script type="javascript" src="../../../com/commonweb/js/common.js"/>
  285. <script type="javascript" src="../../../com/commonweb/js/utilHelper.js"/>
  286. <script type="javascript" src="../../../com/commonweb/js/numericHelper.js"/>
  287. <script type="javascript" src="../../../com/commonweb/js/stringHelper.js"/>
  288. <script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
  289. <script type="javascript" src="../../../com/basiccodeweb/js/ZBC001.js"/>
  290. <script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
  291. <script type="javascript" src="../../../pam/pamcomnweb/js/PAM001.js"/>
  292. <!-- 뽕숑 -->
  293. <script type="javascript">
  294. <![CDATA[
  295. // 화면 초기화
  296. function fInitialize()
  297. {
  298. model.removeNodeset("/root/main/grdlist/calcorderlist"); // 그리드 초기화
  299. submit("TRPIB00603"); // 심사자 콤보리스트
  300. zbcfGetCodeList(
  301. new Array("P0008" // 보험유형
  302. ,"P0155" // 청구구분
  303. ,"P0151" // 심사상태
  304. ),
  305. new Array("/root/init/P0008list"
  306. ,"/root/init/P0155list"
  307. ,"/root/init/P0151list"
  308. )
  309. ,false
  310. );
  311. cmb_clamflag.refresh();
  312. cmb_insukind.refresh();
  313. rdo_ioflag.value = "A"; // 내원유형:전체
  314. var today = new Date();
  315. var baseyear = today.getDateFormat("YYYY"); // (dateHelper.js)에서 제공하는 함수를 사용하여 해당 년를 구한다.
  316. var basemonth = today.getDateFormat("MM");
  317. var currentym = baseyear + basemonth;
  318. model.setValue("/root/send/clamymfrom",currentym);
  319. model.setValue("/root/send/clamymto",currentym);
  320. ipt_clamymfrom.refresh();
  321. ipt_clamymto.refresh();
  322. pidfGetClamdg();
  323. // IOFLAG를 파라메터로 받아야 하므로 IOFLAG가 정해진 후 호출 한다
  324. fGetOrdDept(); // 진료과,진료의 콤보 리스트
  325. fGetClamDept(); // 청구과 콤보 리스트
  326. // 보험유형 수정
  327. addComboItem("cmb_insukind","보험+급여","T","below");
  328. model.setValue(cmb_insukind.attribute("ref"), "T");
  329. model.refresh();
  330. }
  331. // 진료과 리스트 가져오기
  332. function fGetOrdDept()
  333. {
  334. submit("TRPID20309");
  335. }
  336. // 청구년월 함수
  337. function pidfGetClamdg() {
  338. if ( model.getValue("/root/send/clamymfrom") > model.getValue("/root/send/clamymto") ) {
  339. messageBox("종료일은 시작일보다 클 수 ", "I004");
  340. model.setValue("/root/send/clamymto","")
  341. } else {
  342. model.removeNodeset("/root/init/clamdg");
  343. model.makeNode("/root/init/clamdg");
  344. model.setValue("/root/send/clamym",model.getValue("/root/send/clamymfrom"));
  345. submit("TRPID20407");
  346. model.copyNode("/root/init/clamdgfrom","/root/init/clamdg");
  347. model.setValue("/root/send/clamym",model.getValue("/root/send/clamymto"));
  348. submit("TRPID20407");
  349. model.copyNode("/root/init/clamdgto","/root/init/clamdg");
  350. addComboItem("cmb_clamdgfrom","전체","","above");
  351. addComboItem("cmb_clamdgto","전체","","above");
  352. cmb_clamdgfrom.refresh();
  353. cmb_clamdgfrom.select(1);
  354. cmb_clamdgto.refresh();
  355. cmb_clamdgto.select(1);
  356. }
  357. }
  358. // 청구년월 차수 기간 체크
  359. function fChkClamym()
  360. {
  361. var fromym = model.getValue("/root/send/clamymfrom");
  362. var toym = model.getValue("/root/send/clamymto");
  363. if ( fromym != toym )
  364. {
  365. cmb_clamdgfrom.value = "";
  366. cmb_clamdgto.value = "";
  367. cmb_clamdgfrom.disabled = true;
  368. cmb_clamdgto.disabled = true;
  369. }
  370. else
  371. {
  372. cmb_clamdgfrom.disabled = false;
  373. cmb_clamdgto.disabled = false;
  374. cmb_clamdgfrom.select(1);
  375. cmb_clamdgto.select(1);
  376. }
  377. cmb_clamdgto.refresh();
  378. cmb_clamdgfrom.refresh();
  379. }
  380. // 청구과 함수
  381. function fGetClamDept()
  382. {
  383. submit("TRPID20201");
  384. }
  385. // 조회
  386. function fSearch()
  387. {
  388. var chk_clamymfrom = model.getValue("/root/send/clamymfrom");
  389. var chk_clamymto = model.getValue("/root/send/clamymto");
  390. //var ipt_patunitsrch = model.getValue("/root/send/patunitsrch");
  391. // 무한루프 오류때문에 수정
  392. chk_clamymfrom = chk_clamymfrom.substr(0,6);
  393. chk_clamymto = chk_clamymto.substr(0,6);
  394. model.setValue("/root/send/clamymfrom",chk_clamymfrom);
  395. model.setValue("/root/send/clamymto",chk_clamymto);
  396. if ( chk_clamymfrom == "" || chk_clamymto == "")
  397. {
  398. messageBox("청구년월은 ", "I003");
  399. model.setFocus("chk_clamymfrom");
  400. return;
  401. }
  402. //그리드 상태 초기화
  403. grd_outjudg.clearStatus();
  404. model.removeNodeset("/root/main/grdlist/clamcutlist");
  405. submit("TRPID26100");
  406. if (model.getValue("/root/main/grdlist/clamcutlist[diagcnt>'1']/diagcnt") > "1") {
  407. messageBox("주상병이 중복인 환자가 있습니다","I")
  408. }
  409. for(var i = grd_outjudg.fixedRows; i < grd_outjudg.rows; i++) {
  410. grd_outjudg.valueMatrix(i,grd_outjudg.colRef("chk")) = "N"
  411. if(grd_outjudg.valueMatrix(i,grd_outjudg.colRef("diagcnt")) > "1"){
  412. grd_outjudg.rowStyle(i, "data", "background-color") = "#00ffff";
  413. }
  414. }
  415. }
  416. function fDeleteRow() {
  417. var row = grd_outjudg.row;
  418. grd_outjudg.deleteRow(row);
  419. }
  420. // 상병코드를 조회하여 해당 정보를 표시하거나 상병코드 조회용 Popup을 호출한다.
  421. function fSearchDiageCode() {
  422. var diagcd = model.getValue("/root/hidden/targetdiag/diagcd");
  423. if (diagcd) {
  424. model.removeNodeset("/root/hidden/sppiz00400/rslt");
  425. model.resetInstanceNode("/root/hidden/sppiz00400/cond");
  426. model.setValue("/root/hidden/sppiz00400/cond/basedd", getCurrentDate()); // (dateHelper.js) 현재날짜 반환
  427. model.setValue("/root/hidden/sppiz00400/cond/diagcd", diagcd);
  428. model.setValue("/root/hidden/sppiz00400/cond/diagnm", "");
  429. model.setValue("/root/hidden/sppiz00400/cond/selectedrdodiagkind","1");
  430. submit("TRPID20306",false); // 입력된 상병코드로 emr.mrtmicd10 테이블을 조회한다.
  431. var rsltList = instance1.selectSingleNode("/root/hidden/sppiz00400/rslt");
  432. if (rsltList != null && rsltList.length == 0) {
  433. // 조회된 결과가 1건이면
  434. fSetDiagCdNm();
  435. } else {
  436. // 조회된 결과가 없거나 여러 건이면
  437. // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
  438. fSearchSPPIZ00400();
  439. }
  440. } else {
  441. // 상병 Grid에 상병코드를 입력하지 않고 Enter 친 경우
  442. // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
  443. fSearchSPPIZ00400();
  444. }
  445. }
  446. // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
  447. function fSearchSPPIZ00400() {
  448. var diagcd = model.getValue("/root/hidden/targetdiag/diagcd");
  449. model.removeNodeset("/root/hidden/sppiz00400/rslt");
  450. model.makeNode("/root/hidden/sppiz00400/rslt/diagcd");
  451. model.makeNode("/root/hidden/sppiz00400/rslt/diaghngnm");
  452. model.makeNode("/root/hidden/sppiz00400/rslt/diagengnm");
  453. model.resetInstanceNode("/root/hidden/sppiz00400/cond");
  454. model.setValue("/root/hidden/sppiz00400/cond/basedd", getCurrentDate()); // (dateHelper.js) 현재날짜 반환
  455. model.setValue("/root/hidden/sppiz00400/cond/diagcd", diagcd);
  456. model.setValue("/root/hidden/sppiz00400/cond/diagnm", "");
  457. model.setValue("/root/hidden/sppiz00400/cond/selectedrdodiagkind","3"); // 사용자가 직접검색하여 입력 할수 있도록 임의의 값(3)을 넣어줌
  458. modal("SPPIZ00400", "1", "10", "10", "SPPIZ00400", "/root/hidden/sppiz00400/cond", "/root/init", "", ""); // SPPIZ00400_상병코드조회.xrw
  459. model.setFocus("button1");
  460. }
  461. // [SPPIZ00400_상병코드조회.xrw 에서 호출] 상병코드조회 팝업에서 선택한 상병을 상병 그리드에 반영
  462. function fSetDiagCdNm(target_ipt_diagcd, target_ipt_diagnm) {
  463. var diagcd = model.getValue("/root/hidden/sppiz00400/rslt/diagcd");
  464. var diaghngnm = model.getValue("/root/hidden/sppiz00400/rslt/diaghngnm");
  465. var diagengnm = model.getValue("/root/hidden/sppiz00400/rslt/diagengnm");
  466. var target_diagcd = model.getValue("/root/hidden/targetdiag/diagcdref");
  467. var target_diagnm = model.getValue("/root/hidden/targetdiag/diagnmref");
  468. model.setValue(target_diagcd, diagcd);
  469. model.setValue(target_diagnm, diaghngnm);
  470. model.refresh();
  471. }
  472. function fChangeRow() {
  473. if(model.getValue("/root/send_diag/clamym") == "" ) {
  474. messageBox("청구년월입력은 필수입니다. ", "");
  475. model.setFocus("input1");
  476. return false;
  477. }
  478. if(model.getValue("/root/send_diag/clamdg") == "" ) {
  479. messageBox("청구차수입력입력은 필수입니다. ", "");
  480. model.setFocus("input2");
  481. return false;
  482. }
  483. if(model.getValue("/root/send_diag/ioflag") == "" ) {
  484. messageBox("청구차수입력입력은 필수입니다. ", "");
  485. model.setFocus("input2");
  486. return false;
  487. }
  488. if(model.getValue("/root/send_diag/fromdiagcd") == "") {
  489. messageBox("불완전상병 입력은 필수입니다. ", "");
  490. model.setFocus("input3");
  491. return false;
  492. }
  493. if(model.getValue("/root/send_diag/todiagcd") == "" ) {
  494. messageBox("일괄변경상병 입력은 필수입니다. ", "");
  495. model.setFocus("input4");
  496. return false;
  497. }
  498. }
  499. function setOrderInfoOfCol(grdid, refdata, sizedata){
  500. var grdobj = document.controls.item(grdid);
  501. var refarr = refdata.split("^");
  502. var sizearr = sizedata.split("^");
  503. var rowheader = grdobj.rowheader;
  504. for(var i = 0; i < refarr.length; i++){
  505. var colcnt = grdobj.colRef("" + refarr[i] + "");
  506. grdobj.colMove(i, colcnt, "before",false);
  507. var size = sizearr[i];
  508. grdobj.colWidth(i) = eval(size);
  509. }
  510. grdobj.refresh();
  511. var caption = "";
  512. for( var i = 1; i < grdobj.cols ; i++ ){
  513. if (caption == "") {
  514. caption = grdobj.textMatrix(0,i);
  515. } else {
  516. caption += "^" + grdobj.textMatrix(0,i);
  517. }
  518. }
  519. grdobj.caption = caption;
  520. }
  521. /*
  522. * @group :
  523. * @ver : 2008.08.11
  524. * @by : 김상진
  525. * @---------------------------------------------------
  526. * @type : function
  527. * @access : public
  528. * @desc : 일괄 심사완료 및 심사중해제
  529. * @param : 심사여부(A:미심사, C:심사완료)
  530. * @return :
  531. * @---------------------------------------------------
  532. */
  533. function fSetJudgEndYN(judgendyn) {
  534. var cnt = 0;
  535. var userid = getUserId(); // (common.js) 현재 로그인한 사용자 번호(ID)
  536. var errortype1 = "";
  537. var errortype2 = "";
  538. if (userid) {
  539. } else {
  540. userid = "12345678";
  541. }
  542. //심사중 해제 / 일괄완료 대상 저장 인스턴스 초기화
  543. model.removeNodeset("/root/send/list1/endclbs");
  544. if (grd_outjudg.selectedRows == 0) {
  545. // "심사중해제" 버튼을 누른경우
  546. if (judgendyn == "A") {
  547. messageBox("심사중해제할 대상자를", "C002");
  548. }
  549. // "일괄완료" 버튼을 누른경우
  550. // 20090921 박창원 일괄완료의 플레그 값을 변경
  551. else if (judgendyn == "Z") {
  552. messageBox("일괄완료할 대상자를", "C002");
  553. }
  554. // "일괄보류" 버튼을 누른경우
  555. // 20090921 박창원 일괄완료의 플레그 값을 변경
  556. else if (judgendyn == "N") {
  557. messageBox("일괄보류할 대상자를", "C002");
  558. }
  559. return;
  560. }
  561. var chk;
  562. // 2008.04.24 / PJH / (윤영옥요청) 현재 심사중인 심사자와 관계없이 해제해달라는 요청으로 막음 처리
  563. for (var i = 0; i < grd_outjudg.selectedRows; i++) {
  564. var row = grd_outjudg.selectedrow(i);
  565. var sel_clamym = model.getValue("/root/main/grdlist/clamcutlist[" + row + "]/clamym");
  566. var sel_clamdg = model.getValue("/root/main/grdlist/clamcutlist[" + row + "]/clamdg");
  567. var sel_pid = model.getValue("/root/main/grdlist/clamcutlist[" + row + "]/pid");
  568. var sel_pidsn = model.getValue("/root/main/grdlist/clamcutlist[" + row + "]/pidsn");
  569. var sel_clamendyn = model.getValue("/root/main/grdlist/clamcutlist[" + row + "]/clamendyn");
  570. var sel_judgendyn = model.getValue("/root/main/grdlist/clamcutlist[" + row + "]/judgendyn");
  571. var sel_lockyn = model.getValue("/root/main/grdlist/clamcutlist[" + row + "]/lockyn");
  572. chk = "false";
  573. // "일괄완료"할때는 미심사나 심사중인 경우만 가능
  574. // 20090921 박창원 일괄완료의 플레그 값을 변경
  575. // 20110207 경북대 일괄완료시 통합완료도 되게 추가요청
  576. if (judgendyn == "Z") {
  577. if (sel_judgendyn == "A" || sel_judgendyn == "B" || sel_judgendyn == "E") {
  578. chk = "true"
  579. }
  580. }
  581. // "심사중해제"이면 심사중인 경우만 가능
  582. else if (judgendyn == "A") {
  583. if (sel_judgendyn == "B") {
  584. chk = "true";
  585. }
  586. }
  587. //"일괄완료"할때는 미심사나 심사중인 경우만 가능
  588. else if (judgendyn == "N") {
  589. if (sel_judgendyn == "A" || sel_judgendyn == "B" ) {
  590. chk = "true"
  591. }
  592. }
  593. if (chk == "true") {
  594. cnt++;
  595. model.makeValue("/root/send/list1/endclbs[" + cnt + "]/clamym", sel_clamym);
  596. model.makeValue("/root/send/list1/endclbs[" + cnt + "]/clamdg", sel_clamdg);
  597. model.makeValue("/root/send/list1/endclbs[" + cnt + "]/pid", sel_pid);
  598. model.makeValue("/root/send/list1/endclbs[" + cnt + "]/pidsn", sel_pidsn);
  599. model.makeValue("/root/send/list1/endclbs[" + cnt + "]/judgendyn", judgendyn); // A: 미심사, C:일괄완료
  600. } else {
  601. errortype1 = "청구된 자료";
  602. }
  603. }
  604. if (cnt > 0) {
  605. if (judgendyn == "Z") {
  606. // 20090921 박창원 일괄완료의 플레그 값을 변경
  607. var ans = messageBox(cnt + "건을 일괄완료", "S001"); /// *건을 일괄완료 하시려면 예(Yes)\n아니면 아니오(No)
  608. var selectedmaxrow = 0;
  609. if (ans == 6) { // return : yes=6, no=7
  610. submit("TXPID20302");
  611. for (var i = 0; i < grd_outjudg.selectedRows; i++) {
  612. var row = grd_outjudg.selectedrow(i);
  613. model.setValue("/root/main/grdlist/clamcutlist[" + row + "]/judgendyn", "Z");
  614. if (selectedmaxrow == 0)
  615. {
  616. selectedmaxrow = row;
  617. }
  618. }
  619. grd_outjudg.refresh();
  620. }
  621. }
  622. else if (judgendyn == "A") {
  623. var ans = messageBox(cnt + "건을 심사중해제", "S001"); /// *건을 심사중해제 하시려면 예(Yes)\n아니면 아니오(No)
  624. if (ans == 6) { // return : yes=6, no=7
  625. submit("TXPID20302");
  626. }
  627. }
  628. else if (judgendyn == "N") {
  629. // 20090921 박창원 일괄완료의 플레그 값을 변경
  630. var ans = messageBox(cnt + "건을 일괄보류", "S001"); /// *건을 일괄완료 하시려면 예(Yes)\n아니면 아니오(No)
  631. var selectedmaxrow = 0;
  632. if (ans == 6) { // return : yes=6, no=7
  633. submit("TXPID20302");
  634. //2011.02.07 경북대 심사팀 오영화샘요청 일괄완료저장시 대상자 리프레쉬 안되게 요청
  635. //fGetOutAftJudgTrgtManList();
  636. for (var i = 0; i < grd_outjudg.selectedRows; i++) {
  637. var row = grd_outjudg.selectedrow(i);
  638. model.setValue("/root/main/grdlist/clamcutlist[" + row + "]/judgendyn", judgendyn);
  639. if (selectedmaxrow == 0)
  640. {
  641. selectedmaxrow = row;
  642. }
  643. }
  644. grd_outjudg.refresh();
  645. }
  646. }
  647. }
  648. }
  649. ]]>
  650. </script>
  651. </xhtml:head>
  652. <xhtml:body pagewidth="1211" pageheight="784" guideline="1,1212;2,784;" style="margin-left:8; margin-top:0; margin-right:8; margin-bottom:0; ">
  653. <!-- TITLE -->
  654. <group id="group1" style="left:0px; top:0px; width:1190px; height:13px; ">
  655. <caption id="caption1" class="tit_1" style="left:0px; top:0px; width:173px; height:15px; ">불완전상병 조회</caption>
  656. </group>
  657. <!-- 전체 그룹 -->
  658. <group id="group2" scroll="no" style="left:0px; top:27px; width:1195px; height:693px; ">
  659. <!-- 조회조건 -->
  660. <group id="group4" style="left:0px; top:10px; width:1190px; height:82px; vertical-align:top; ">
  661. <shape id="roundrect2" appearance="roundrect" style="left:0px; top:0px; width:1190px; height:82px; "/>
  662. <caption id="caption5" class="search_name" style="left:5px; top:7px; width:76px; height:17px; ">청구년월</caption>
  663. <input id="ipt_clamymfrom" ref="/root/send/clamymfrom" class="input_search" navindex="1" inputtype="date" format="yyyy-mm" style="left:85px; top:7px; width:75px; height:19px; ">
  664. <script type="javascript" ev:event="xforms-value-changed">
  665. <![CDATA[
  666. model.setValue("/root/send/clamymto",model.getValue("/root/send/clamymfrom"));
  667. pidfGetClamdg();
  668. fChkClamym();
  669. ]]>
  670. </script>
  671. </input>
  672. <select1 id="cmb_clamdgfrom" ref="/root/send/clamdgfrom" class="combo_search" appearance="minimal" style="left:162px; top:7px; width:50px; height:19px; ">
  673. <choices>
  674. <itemset nodeset="/root/init/clamdgfrom/clamdglist">
  675. <label ref="clamdgnm"/>
  676. <value ref="clamdgcd"/>
  677. </itemset>
  678. </choices>
  679. <script type="javascript" ev:event="xforms-value-changed">
  680. <![CDATA[
  681. model.setValue("/root/send/clamdgto", model.getValue("/root/send/clamdgfrom"));
  682. model.refresh();
  683. ]]>
  684. </script>
  685. </select1>
  686. <caption id="caption6" class="search_name" style="left:234px; top:32px; width:65px; height:17px; ">진료과</caption>
  687. <select1 id="combo2" ref="/root/send/orddeptcd" class="combo_search" appearance="minimal" style="left:315px; top:32px; width:85px; height:19px; ">
  688. <choices>
  689. <itemset nodeset="/root/init/tmp/orddeptcd/orddeptcdlist">
  690. <label ref="nm"/>
  691. <value ref="cd"/>
  692. </itemset>
  693. </choices>
  694. </select1>
  695. <line id="line2" class="line_4" style="x1:1111px; y1:35px; x2:1111px; y2:77px; "/>
  696. <button id="button1" class="btn1_letter2" navindex="2" style="left:1125px; top:42px; width:56px; height:22px; ">
  697. <caption>조회</caption>
  698. <script type="javascript" ev:event="DOMActivate">
  699. <![CDATA[
  700. if (cmb_clamdgfrom.value == ""){
  701. messageBox("청구차수는 필수입니다. ", "");
  702. model.setFocus("cmb_clamdgfrom");
  703. return ;
  704. }
  705. if (rdo_ioflag.value == "A"){
  706. messageBox("내원유형 선택은 필수입니다. ", "");
  707. model.setFocus("rdo_ioflag");
  708. return ;
  709. }
  710. fSearch();
  711. ]]>
  712. </script>
  713. </button>
  714. <caption id="caption9" class="search_name" style="left:5px; top:32px; width:76px; height:17px; ">내원유형</caption>
  715. <select1 id="rdo_ioflag" ref="/root/send/ioflag" class="combo_search" appearance="minimal" style="left:85px; top:32px; width:75px; height:19px; ">
  716. <choices>
  717. <item>
  718. <label>전체</label>
  719. <value>A</value>
  720. </item>
  721. <item>
  722. <label>입원</label>
  723. <value>I</value>
  724. </item>
  725. <item>
  726. <label>외래</label>
  727. <value>O</value>
  728. </item>
  729. </choices>
  730. <script type="javascript" ev:event="xforms-value-changed">
  731. <![CDATA[
  732. fGetOrdDept(); // 진료과,진료의 콤보 리스트
  733. // fGetOrdDrid(); // 진료의 콤보 리스트
  734. fGetClamDept(); // 청구과 콤보 리스트
  735. ]]>
  736. </script>
  737. </select1>
  738. <caption id="caption11" class="search_name" style="left:234px; top:7px; width:76px; height:17px; ">청구구분</caption>
  739. <select1 id="cmb_clamflag" ref="/root/send/clamflag" class="combo_search" appearance="minimal" style="left:315px; top:7px; width:85px; height:19px; ">
  740. <choices>
  741. <itemset nodeset="/root/init/P0155list/P0155">
  742. <label ref="cdnm"/>
  743. <value ref="cdid"/>
  744. </itemset>
  745. </choices>
  746. </select1>
  747. <caption id="caption13" class="search_name" style="left:428px; top:55px; width:76px; height:17px; ">보험유형</caption>
  748. <output id="opt_insukind" ref="/root/send/insukind" class="output_search" style="left:613px; top:55px; width:20px; height:19px; "/>
  749. <select1 id="cmb_insukind" ref="/root/send/insukind" class="combo_search" appearance="minimal" style="left:513px; top:55px; width:95px; height:19px; ">
  750. <choices>
  751. <itemset nodeset="/root/init/P0008list/P0008">
  752. <label ref="cdnm"/>
  753. <value ref="cdid"/>
  754. </itemset>
  755. </choices>
  756. </select1>
  757. <caption id="caption3" class="search_name" style="left:5px; top:57px; width:102px; height:17px; ">상병조회선택</caption>
  758. <select1 id="cmb_judgrid" ref="/root/send/judgrid" class="combo_default" appearance="minimal" style="left:515px; top:7px; width:70px; height:19px; ">
  759. <choices>
  760. <itemset nodeset="/root/init/U0001list/U0001">
  761. <label ref="cdnm"/>
  762. <value ref="cdid"/>
  763. </itemset>
  764. </choices>
  765. </select1>
  766. <caption id="caption17" class="search_name" style="left:430px; top:7px; width:86px; height:17px; ">심사자 :</caption>
  767. <select1 id="rdo_delgb" ref="/root/send/delgb" appearance="full" cols="3" overflow="visible" style="left:115px; top:60px; width:285px; height:15px; border-style:none; ">
  768. <choices>
  769. <item>
  770. <label>불완전상병</label>
  771. <value>A</value>
  772. </item>
  773. <item>
  774. <label>종료상병</label>
  775. <value>D</value>
  776. </item>
  777. </choices>
  778. <script type="javascript" ev:event="xforms-value-changed">
  779. <![CDATA[
  780. button1.dispatch("DOMActivate");
  781. ]]>
  782. </script>
  783. </select1>
  784. <input id="ipt_fromdiagcd" ref="/root/send/fromdiagcd" navindex="5" _chartype="upper" style="left:742px; top:9px; width:43px; height:19px; ">
  785. <script type="javascript" ev:event="onkeypress">
  786. <![CDATA[
  787. if (event.keyCode == "13") {
  788. setInputNodeCurText();
  789. model.setValue("/root/hidden/targetdiag/diagcd",ipt_fromdiagcd.value);
  790. model.setValue("/root/hidden/targetdiag/diagcdref",ipt_fromdiagcd.attribute("ref"));
  791. model.setValue("/root/hidden/targetdiag/diagnmref","/root/tmp");
  792. fSearchDiageCode();
  793. ipt_todiagcd.value = ipt_fromdiagcd.value;
  794. }
  795. ]]>
  796. </script>
  797. <script type="javascript" ev:event="xforms-value-changed">
  798. <![CDATA[
  799. ipt_todiagcd.value = ipt_fromdiagcd.value;
  800. ]]>
  801. </script>
  802. </input>
  803. <input id="ipt_todiagcd" ref="/root/send/todiagcd" navindex="5" _chartype="upper" style="left:800px; top:9px; width:43px; height:19px; ">
  804. <script type="javascript" ev:event="onkeypress">
  805. <![CDATA[
  806. if (event.keyCode == "13") {
  807. setInputNodeCurText();
  808. model.setValue("/root/hidden/targetdiag/diagcd",ipt_todiagcd.value);
  809. model.setValue("/root/hidden/targetdiag/diagcdref",ipt_todiagcd.attribute("ref"));
  810. model.setValue("/root/hidden/targetdiag/diagnmref","/root/tmp");
  811. fSearchDiageCode();
  812. }
  813. ]]>
  814. </script>
  815. </input>
  816. <caption id="caption8" class="search_name" style="left:659px; top:9px; width:76px; height:17px; ">상병코드</caption>
  817. <select1 id="cmb_judgendyn" ref="/root/send/judgendyn" class="combo_search" appearance="minimal" style="left:510px; top:30px; width:85px; height:19px; ">
  818. <choices>
  819. <itemset nodeset="/root/init/P0151list/P0151">
  820. <label ref="cdnm"/>
  821. <value ref="cdid"/>
  822. </itemset>
  823. </choices>
  824. </select1>
  825. <caption id="caption10" class="search_name" style="left:429px; top:30px; width:76px; height:17px; ">심사상태</caption>
  826. <caption id="caption14" style="left:787px; top:12px; width:15px; height:15px; ">~</caption>
  827. </group>
  828. <caption id="caption12" class="tit_2" style="left:0px; top:100px; width:100px; height:13px; ">환자 리스트</caption>
  829. <button id="button2" class="btn2_letter4" style="left:1121px; top:136px; width:64px; height:19px; ">
  830. <caption>엑셀저장</caption>
  831. <script type="javascript" ev:event="DOMActivate">
  832. <![CDATA[
  833. if (grd_outjudg.rows > 1) {
  834. var fileName = window.fileDialog("save", "", false, "청구삭감 환자조회_" + getCurrentDate(), "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
  835. if (fileName != "") {
  836. //datagrid.saveExcel의 7번째 인자 값(boolean) : 그리드의 col type=combo일 경우 엑셀저장내용이 lable 또는 value로 설정 함
  837. grd_outjudg.saveExcel(fileName, "sheetname:;colhiddenextend:false;rowhiddenextend:false;", true, true, "", "", true);
  838. }
  839. } else {
  840. messageBox("엑셀저장할 대상이 ", "I004"); ///엑셀저장할 대상자가 없습니다.
  841. }
  842. ]]>
  843. </script>
  844. </button>
  845. <datagrid id="grd_outjudg" nodeset="/root/main/grdlist/clamcutlist" class="datagrid2" caption="순번^등록번호^성명^나&#xA;이^성&#xA;별^내원&#xA;유형^청구월^유&#xA;형^보&#xA;조^청구과^불완전&#xA;상병^주상병명^R/O^적용상병^적용상병명^특정내역주석^제외^심사상태^입원일자^유형시작일^종료일^처방의^심사&#xA;결정^심사자^진료과^진료의^구분^차수^원외처방번호^caption1^caption2^caption3^caption4^caption5^caption6^caption10^caption7^caption8^caption9" colsep="^" colwidth="30, 60, 45, 44, 22, 30, 51, 22, 25, 128, 66, 26, 33, 46, 61, 56, 50, 58, 70, 70, 70, 60, 36, 55, 109, 45, 30, 36, 0, 66, 100, 50, 100, 100, 100, 100, 100, 100, 100" ellipsis="true" explorerbar="sortshowmove" extendlastcol="scroll" frozencols="13" mergecellsfixedrows="bycolrec" rowheader="update" rowsep="|" style="left:0px; top:120px; width:1190px; height:565px; ">
  846. <col ref="rowno" style="text-align:center; "/>
  847. <col ref="pid" type="input" style="text-align:center; "/>
  848. <col ref="hngnm" style="text-align:center; "/>
  849. <col ref="age" style="text-align:center; "/>
  850. <col ref="gndr" style="text-align:center; "/>
  851. <col disabled="true" ref="ioflag" type="combo" style="text-align:center; ">
  852. <choices>
  853. <item>
  854. <label>입원</label>
  855. <value>I</value>
  856. </item>
  857. <item>
  858. <label>외래</label>
  859. <value>O</value>
  860. </item>
  861. </choices>
  862. </col>
  863. <col ref="clamym" format="yyyy-mmd" style="text-align:center; "/>
  864. <col ref="insukind"/>
  865. <col ref="suppkind"/>
  866. <col ref="clamdeptcd"/>
  867. <col ref="diagcd2"/>
  868. <col ref="diagnm2" visibility="hidden"/>
  869. <col checkvalue="R,C" ref="diagkindcd" type="checkbox" visibility="hidden"/>
  870. <col ref="diagcd" visibility="hidden"/>
  871. <col ref="diagnm" visibility="hidden"/>
  872. <col disabled="true" ref="spclspec" visibility="hidden"/>
  873. <col checkvalue="Y,N" ref="chk" type="checkbox" visibility="hidden"/>
  874. <col disabled="true" ref="judgendyn" type="combo">
  875. <choices>
  876. <itemset nodeset="/root/init/P0151list/P0151">
  877. <label ref="cdnm"/>
  878. <value ref="cdid"/>
  879. </itemset>
  880. </choices>
  881. </col>
  882. <col ref="indd" format="yyyy-mm-dd" style="text-align:center; "/>
  883. <col ref="ordfromdd" format="yyyy-mm-dd" style="text-align:center; "/>
  884. <col ref="ordtodd" format="yyyy-mm-dd" style="text-align:center; "/>
  885. <col ref="clamdrid" visibility="hidden" style="text-align:center; "/>
  886. <col ref="judgyn" visibility="hidden" style="text-align:center; "/>
  887. <col ref="judgrnm"/>
  888. <col ref="orddeptcd"/>
  889. <col ref="orddrnm" visibility="hidden" style="text-align:center; "/>
  890. <col disabled="true" ref="clamflagcd" type="combo" visibility="hidden" style="text-align:center; ">
  891. <choices>
  892. <itemset nodeset="/root/init/P0155list/P0155">
  893. <label ref="cdengabbrnm"/>
  894. <value ref="cdid"/>
  895. </itemset>
  896. </choices>
  897. </col>
  898. <col ref="clamdg" style="text-align:center; "/>
  899. <col ref="edicdflag" visibility="hidden"/>
  900. <col ref="pidsn" visibility="hidden"/>
  901. <col ref="mpsno" visibility="hidden"/>
  902. <col ref="mpsflag" visibility="hidden"/>
  903. <col ref="workflag" visibility="hidden"/>
  904. <col ref="clamdeptcode" visibility="hidden"/>
  905. <col ref="cretfromdd" visibility="hidden"/>
  906. <col ref="crettodd" visibility="hidden"/>
  907. <col ref="execdd" visibility="hidden"/>
  908. <col checkvalue="Y,N" ref="chk2" type="checkbox" visibility="hidden"/>
  909. <col ref="diagcnt" visibility="hidden"/>
  910. <script type="javascript" ev:event="ondblclick">
  911. <![CDATA[
  912. if (grd_outjudg.fixedRows <= grd_outjudg.mouseRow && grd_outjudg.fixedCols < grd_outjudg.mouseCol ) {
  913. model.setValue("/root/send_diag/clamym", grd_outjudg.valueMatrix(grd_outjudg.mouseRow, grd_outjudg.colRef("clamym")));
  914. model.setValue("/root/send_diag/clamdg", grd_outjudg.valueMatrix(grd_outjudg.mouseRow, grd_outjudg.colRef("clamdg")));
  915. model.setValue("/root/send_diag/ioflag", grd_outjudg.valueMatrix(grd_outjudg.mouseRow, grd_outjudg.colRef("ioflag")));
  916. model.setValue("/root/send_diag/fromdiagcd", grd_outjudg.valueMatrix(grd_outjudg.mouseRow, grd_outjudg.colRef("diagcd2")));
  917. model.setValue("/root/send_diag/todiagcd", "");
  918. input1.refresh();
  919. input2.refresh();
  920. input3.refresh();
  921. input4.refresh();
  922. combo1.refresh();
  923. }
  924. ]]>
  925. </script>
  926. </datagrid>
  927. <caption id="caption2" visibility="hidden" style="left:10px; top:175px; width:15px; height:20px; ">~</caption>
  928. <select1 id="cmb_clamdgto" ref="/root/send/clamdgto" class="combo_search" visibility="hidden" appearance="minimal" style="left:25px; top:195px; width:50px; height:19px; ">
  929. <choices>
  930. <itemset nodeset="/root/init/clamdgto/clamdglist">
  931. <label ref="clamdgnm"/>
  932. <value ref="clamdgcd"/>
  933. </itemset>
  934. </choices>
  935. <script type="javascript" ev:event="xforms-value-changed">
  936. <![CDATA[
  937. model.setValue("/root/send/clamdgfrom", model.getValue("/root/send/clamdgto"));
  938. model.refresh();
  939. ]]>
  940. </script>
  941. </select1>
  942. <input id="ipt_clamymto" ref="/root/send/clamymto" class="input_search" navindex="1" visibility="hidden" inputtype="date" format="yyyy-mm" style="left:25px; top:175px; width:75px; height:19px; ">
  943. <script type="javascript" ev:event="xforms-value-changed">
  944. <![CDATA[
  945. pidfGetClamdg();
  946. fChkClamym();
  947. ]]>
  948. </script>
  949. </input>
  950. <button id="btn_excelsave" class="btn2_letter4" style="left:1125px; top:99px; width:64px; height:19px; ">
  951. <caption>엑셀저장</caption>
  952. <script type="javascript" ev:event="DOMActivate">
  953. <![CDATA[
  954. if (grd_outjudg.rows > 1) {
  955. var fileName = window.fileDialog("save", "", false, "excel", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
  956. if (fileName != "") {
  957. //datagrid.saveExcel의 7번째 인자 값(boolean) : 그리드의 col type=combo일 경우 엑셀저장내용이 lable 또는 value로 설정 함
  958. grd_outjudg.saveExcel(fileName, "sheetname:;colhiddenextend:false;rowhiddenextend:false;", true, true, "", "", true);
  959. }
  960. } else {
  961. messageBox("엑셀저장할 대상자가", "I004"); ///엑셀저장할 대상자가 없습니다.
  962. }
  963. ]]>
  964. </script>
  965. </button>
  966. <button id="button8" class="btn2_letter6" style="left:1038px; top:99px; width:86px; height:19px; ">
  967. <caption>심사화면보기</caption>
  968. <script type="javascript" ev:event="onclick">
  969. <![CDATA[
  970. var row = grd_outjudg.row;
  971. if (grd_outjudg.row >= grd_outjudg.fixedRows ) {
  972. if (grd_outjudg.valueMatrix(row,grd_outjudg.colRef("ioflag")) == "I") {
  973. var preDocuWindow = getChildWindow("SMPID20300");
  974. } else {
  975. var preDocuWindow = getChildWindow("SMPID20500");
  976. }
  977. if (preDocuWindow == null) {
  978. model.setValue("/root/send/send_afjudg/workflag", "12");
  979. model.setValue("/root/send/send_afjudg/clamym",grd_outjudg.valueMatrix(row,grd_outjudg.colRef("clamym")));
  980. model.setValue("/root/send/send_afjudg/clamdg",grd_outjudg.valueMatrix(row,grd_outjudg.colRef("clamdg")));
  981. model.setValue("/root/send/send_afjudg/pid",grd_outjudg.valueMatrix(row,grd_outjudg.colRef("pid")));
  982. model.setValue("/root/send/send_afjudg/pidsn",grd_outjudg.valueMatrix(row,grd_outjudg.colRef("pidsn")));
  983. model.setValue("/root/send/send_afjudg/ioflag",grd_outjudg.valueMatrix(row,grd_outjudg.colRef("ioflag")));
  984. if (grd_outjudg.valueMatrix(row,grd_outjudg.colRef("ioflag")) == "I") {
  985. open("SMPID20300", "2", "10", "10", "SMPID20300", "/root/send/send_afjudg","/root/send/item1/clbs", "", "");
  986. } else {
  987. open("SMPID20500", "2", "10", "10", "SMPID20500", "/root/send/send_afjudg","/root/send/item1/clbs", "", "");
  988. }
  989. } else {
  990. if (grd_outjudg.valueMatrix(row,grd_outjudg.colRef("ioflag")) == "I") {
  991. model.setValue("/root/hidden/smpid20300/cond/workflag", "12");
  992. model.setValue("/root/hidden/smpid20300/cond/clamym", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("clamym")));
  993. model.setValue("/root/hidden/smpid20300/cond/clamdg", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("clamdg")));
  994. model.setValue("/root/hidden/smpid20300/cond/pid", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("pid")));
  995. model.setValue("/root/hidden/smpid20300/cond/pidsn", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("pidsn")));
  996. model.setValue("/root/hidden/smpid20300/cond/ioflag", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("ioflag")));
  997. preDocuWindow.javascript.fActivatePreDocuWindow();
  998. activateChild("SMPID20300");
  999. } else {
  1000. model.setValue("/root/hidden/smpid20500/cond/workflag", "12");
  1001. model.setValue("/root/hidden/smpid20500/cond/clamym", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("clamym")));
  1002. model.setValue("/root/hidden/smpid20500/cond/clamdg", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("clamdg")));
  1003. model.setValue("/root/hidden/smpid20500/cond/pid", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("pid")));
  1004. model.setValue("/root/hidden/smpid20500/cond/pidsn", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("pidsn")));
  1005. model.setValue("/root/hidden/smpid20500/cond/ioflag", grd_outjudg.valueMatrix(row,grd_outjudg.colRef("ioflag")));
  1006. preDocuWindow.javascript.fActivatePreDocuWindow();
  1007. activateChild("SMPID20500");
  1008. }
  1009. }
  1010. }
  1011. ]]>
  1012. </script>
  1013. </button>
  1014. </group>
  1015. <group id="group3" style="left:0px; top:725px; width:1190px; height:45px; ">
  1016. <shape id="roundrect1" appearance="roundrect" ellipsewidth="20" ellipseheight="20" style="left:0px; top:5px; width:1185px; height:36px; "/>
  1017. <caption id="caption4" class="search_name" style="left:5px; top:12px; width:85px; height:17px; ">청구년월 :</caption>
  1018. <input id="input1" ref="/root/send_diag/clamym" editable="false" inputtype="date" format="yyyy-mm" style="left:95px; top:14px; width:80px; height:19px; "/>
  1019. <input id="input2" ref="/root/send_diag/clamdg" style="left:176px; top:14px; width:20px; height:19px; "/>
  1020. <select1 id="combo1" ref="/root/send_diag/ioflag" class="combo_search" appearance="minimal" style="left:292px; top:14px; width:80px; height:19px; ">
  1021. <choices>
  1022. <item>
  1023. <label>전체</label>
  1024. <value>A</value>
  1025. </item>
  1026. <item>
  1027. <label>입원</label>
  1028. <value>I</value>
  1029. </item>
  1030. <item>
  1031. <label>외래</label>
  1032. <value>O</value>
  1033. </item>
  1034. </choices>
  1035. <script type="javascript" ev:event="xforms-value-changed">
  1036. <![CDATA[
  1037. fGetOrdDept(); // 진료과,진료의 콤보 리스트
  1038. // fGetOrdDrid(); // 진료의 콤보 리스트
  1039. fGetClamDept(); // 청구과 콤보 리스트
  1040. ]]>
  1041. </script>
  1042. </select1>
  1043. <caption id="caption7" class="search_name" style="left:206px; top:14px; width:88px; height:17px; ">내원유형 :</caption>
  1044. <caption id="caption18" class="search_name" style="left:390px; top:15px; width:95px; height:17px; ">불완전상병 :</caption>
  1045. <input id="input3" ref="/root/send_diag/fromdiagcd" navindex="5" imemode="disabled" _chartype="upper" style="left:490px; top:15px; width:50px; height:19px; ">
  1046. <script type="javascript" ev:event="onkeypress">
  1047. <![CDATA[
  1048. if (event.keyCode == "13") {
  1049. setInputNodeCurText();
  1050. model.setValue("/root/hidden/targetdiag/diagcd",input3.value);
  1051. model.setValue("/root/hidden/targetdiag/diagcdref",input3.attribute("ref"));
  1052. model.setValue("/root/hidden/targetdiag/diagnmref","/root/tmp");
  1053. fSearchDiageCode();
  1054. //ipt_todiagcd.value = ipt_fromdiagcd.value;
  1055. }
  1056. ]]>
  1057. </script>
  1058. <script type="javascript" ev:event="xforms-value-changed">
  1059. <![CDATA[
  1060. ipt_todiagcd.value = ipt_fromdiagcd.value;
  1061. ]]>
  1062. </script>
  1063. </input>
  1064. <input id="input4" ref="/root/send_diag/todiagcd" navindex="5" imemode="disabled" _chartype="upper" style="left:680px; top:15px; width:55px; height:19px; ">
  1065. <script type="javascript" ev:event="onkeypress">
  1066. <![CDATA[
  1067. if (event.keyCode == "13") {
  1068. setInputNodeCurText();
  1069. model.setValue("/root/hidden/targetdiag/diagcd",input4.value);
  1070. model.setValue("/root/hidden/targetdiag/diagcdref",input4.attribute("ref"));
  1071. model.setValue("/root/hidden/targetdiag/diagnmref","/root/tmp");
  1072. fSearchDiageCode();
  1073. //ipt_todiagcd.value = ipt_fromdiagcd.value;
  1074. }
  1075. ]]>
  1076. </script>
  1077. <script type="javascript" ev:event="xforms-value-changed">
  1078. <![CDATA[
  1079. ipt_todiagcd.value = ipt_fromdiagcd.value;
  1080. ]]>
  1081. </script>
  1082. </input>
  1083. <caption id="caption19" class="search_name" style="left:550px; top:15px; width:121px; height:17px; ">일괄변경할상병 :</caption>
  1084. <button id="button3" class="btn4_letter6" style="left:1075px; top:13px; width:104px; height:22px; ">
  1085. <caption>일괄변경실행</caption>
  1086. <script type="javascript" ev:event="DOMActivate">
  1087. <![CDATA[
  1088. if ( fChangeRow() != false ){
  1089. if ( messageBox(input3.value + " 불완전상병을 " + input4.value +" 으로","Q002")==6 ) {
  1090. submit("TXPID26100");
  1091. model.resetInstanceNode("/root/send_diag");
  1092. input1.refresh();
  1093. input2.refresh();
  1094. input3.refresh();
  1095. input4.refresh();
  1096. combo1.refresh();
  1097. }
  1098. }
  1099. ]]>
  1100. </script>
  1101. </button>
  1102. </group>
  1103. </xhtml:body>
  1104. </xhtml:html>