SPPAO00900_미수입력.xrw 29 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587
  1. <?xml version="1.0" encoding="EUC-KR"?>
  2. <!--
  3. * 제 목 : SPPAO00900_미수입력.xrw
  4. * 설 명 : 미수입력
  5. * 설 계 자 : 유정란
  6. * 작 성 자 : 유정란
  7. * 작 성 일 : 2007.05.29
  8. * 수정이력 :
  9. * 기 타 :
  10. -->
  11. <?xml-stylesheet href="../../../com/commonweb/css/common.css" type="text/css" ?>
  12. <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">
  13. <xhtml:head>
  14. <xhtml:title>미수입력</xhtml:title>
  15. <model id="model1">
  16. <instance id="instance1">
  17. <root xmlns="">
  18. <main>
  19. <unco>
  20. <totrcptamt/>
  21. <totuncoamt/>
  22. <rcptpayamt/>
  23. <rcptnopyamt/>
  24. <rcptspecamt/>
  25. <uncopayamt/>
  26. <unconopyamt/>
  27. <uncospecamt/>
  28. </unco>
  29. <h_unco>
  30. <unco>
  31. <unco_pid/>
  32. <unco_rcptdd/>
  33. <unco_rcptno/>
  34. <unco_rcptseqno/>
  35. <unco_seqno/>
  36. <unco_instcd/>
  37. <unco_rcptstat/>
  38. <unco_ordtype/>
  39. <unco_orddd/>
  40. <unco_cretno/>
  41. <unco_orddeptcd/>
  42. <unco_orddrid/>
  43. <unco_dschdd/>
  44. <unco_insukind/>
  45. <unco_suppkind/>
  46. <unco_uncorcptflag/>
  47. <unco_uncocls/>
  48. <unco_uncocd/>
  49. <unco_uncopayamt/>
  50. <unco_unconopyamt/>
  51. <unco_uncospecamt/>
  52. <unco_uncoamt/>
  53. <unco_rcptamt/>
  54. <unco_debtamt/>
  55. <unco_endyn/>
  56. <unco_clincstdyno/>
  57. <unco_empid/>
  58. <unco_rcptexecdd/>
  59. <unco_rcpttm/>
  60. <unco_rcptrid/>
  61. <unco_apprsn/>
  62. <unco_outpayapprate/>
  63. <unco_outnopyapprate/>
  64. <unco_outspecapprate/>
  65. <unco_inpayapprate/>
  66. <unco_innopyapprate/>
  67. <unco_inspecapprate/>
  68. <unco_remfact/>
  69. <unco_fstrgstrid/>
  70. <unco_fstrgstdt/>
  71. <unco_lastupdtrid/>
  72. <unco_lastupdtdt/>
  73. </unco>
  74. </h_unco>
  75. </main>
  76. <send>
  77. </send>
  78. <init_com>
  79. <init>
  80. <P0028list>
  81. <P0028>
  82. <cdid/>
  83. <cdnm/>
  84. </P0028>
  85. </P0028list>
  86. </init>
  87. </init_com>
  88. <init>
  89. <uncocd>
  90. <cd/>
  91. <nm/>
  92. <cls/>
  93. <outpayapprate/>
  94. <outnopyapprate/>
  95. <outspecapprate/>
  96. <inpayapprate/>
  97. <innopyapprate/>
  98. <inspecapprate/>
  99. </uncocd>
  100. </init>
  101. <hidden>
  102. <session/>
  103. </hidden>
  104. </root>
  105. </instance>
  106. <submission id="TRZBC00101" mediatype="application/x-www-form-urlencoded" method="post" replace="instance" resultref="/root/init_com/init"/>
  107. <submission id="TRPAMCOM01" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/hidden/session" replace="instance" resultref="/root/init"/>
  108. <submission id="TRPMB03301" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/main/userrgst"/>
  109. <submission id="TRPAO00007" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/rcptuser/rcptuserinfosend" resultref="/root/rcptuser/rcptuserinfo"/>
  110. </model>
  111. <script type="javascript" src="../../../com/commonweb/js/common.js"/>
  112. <script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
  113. <script type="javascript" src="../../../com/commonweb/js/stringHelper.js"/>
  114. <script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
  115. <script type="javascript" src="../../../com/commonweb/js/numericHelper.js"/>
  116. <script type="javascript" src="../../../com/commonweb/js/utilHelper.js"/>
  117. <script type="javascript" src="../../../com/basiccodeweb/js/ZBC001.js"/>
  118. <script type="javascript" src="../../../pam/pamcomnweb/js/PAM.js"/>
  119. <script type="javascript" src="../../../pam/opatmngtweb/js/PMOCOM.js"/>
  120. <script type="javascript" ev:event="xforms-ready">
  121. <![CDATA[
  122. fInit();
  123. fGetUserInfosSampling();
  124. submit("TRPAMCOM01");
  125. zbcfGetCodeList(new Array("P0028"), new Array("/root/init_com/init/P0028list"));
  126. if(checkOpener()){
  127. opener.javascript.setParameter("SPPAO00900_RTN", "");
  128. var SPPAO00900_PARM = opener.javascript.getParameter("SPPAO00900_PARM");
  129. var array_parm = SPPAO00900_PARM.split("▦");
  130. gOrdtype = array_parm[0];
  131. gOrddd = array_parm[1];
  132. gTotrcptamt = array_parm[2];
  133. strSend = array_parm[3];
  134. strRcv = array_parm[4];
  135. // 미수코드에 따른 미수율 관리 관련 추가 by 조중래 20150625
  136. gBrateFlag = array_parm[5];
  137. gPayOwnbAmt = array_parm[6];
  138. gNopyOwnbAmt = array_parm[7];
  139. gSpecOwnbamt = array_parm[8];
  140. if (gBrateFlag == null) {
  141. gBrateFlag = "O";
  142. }
  143. if (gPayOwnbAmt == null) {
  144. gPayOwnbAmt = 0;
  145. }
  146. if (gNopyOwnbAmt == null) {
  147. gNopyOwnbAmt = 0;
  148. }
  149. if (gSpecOwnbamt == null) {
  150. gSpecOwnbamt = 0;
  151. }
  152. model.setValue("/root/main/unco/rcptpayamt", gPayOwnbAmt);
  153. model.setValue("/root/main/unco/rcptnopyamt", gNopyOwnbAmt);
  154. model.setValue("/root/main/unco/rcptspecamt", gSpecOwnbamt);
  155. model.setValue("/root/main/unco/totrcptamt", gTotrcptamt);
  156. model.refresh();
  157. if(strSend != null && strSend != "" && strSend != " " && strSend != "-"){
  158. copyNodesetType("/root/main/h_unco", strSend, "replace", model, parent.model);
  159. datagrid1.rebuild();
  160. fUncoamtCalc();
  161. }
  162. opener.javascript.setParameter("SPPAO00900_PARM","");
  163. }else{
  164. gOrddd = PMO001_TODAY;
  165. model.setValue("/root/main/unco/totrcptamt",0);
  166. model.refresh();
  167. }
  168. //2007-09-04 이동식 추가 - 화면 오프시점에 자동 행추가.
  169. var rowCnt = getNodesetCount("/root/main/h_unco/unco");
  170. if(rowCnt < 1){
  171. btn_addrow.dispatch("DOMActivate");
  172. }
  173. //END..
  174. ]]>
  175. </script>
  176. <script type="javascript">
  177. <![CDATA[
  178. var gOrdtype, gOrddd, gTotrcptamt, strSend, strRcv, gPayOwnbAmt, gNopyOwnbAmt, gSpecOwnbamt;
  179. function fInit(){
  180. datagrid1.rowHeight(0) = 40;
  181. model.setValue("/root/main/unco/totrcptamt", "0");
  182. model.setValue("/root/main/unco/rcptpayamt", "0");
  183. model.setValue("/root/main/unco/rcptnopyamt", "0");
  184. model.setValue("/root/main/unco/rcptspecamt", "0");
  185. model.setValue("/root/main/unco/totuncoamt", "0");
  186. model.setValue("/root/main/unco/uncopayamt", "0");
  187. model.setValue("/root/main/unco/unconopyamt", "0");
  188. model.setValue("/root/main/unco/uncospecamt", "0");
  189. model.removeNodeset("/root/main/h_unco/unco");
  190. datagrid1.rebuild();
  191. model.refresh();
  192. }
  193. function fUncoamtCalc(){
  194. var rowcnt = getNodesetCount("/root/main/h_unco/unco");
  195. if (rowcnt > 0){
  196. var unco_uncoamt = 0;
  197. var unco_uncopayamt = 0;
  198. var unco_unconopyamt = 0;
  199. var unco_uncospecamt = 0;
  200. var totrcptamt = model.getValue("/root/main/unco/totrcptamt");
  201. for(var i=1; i<=rowcnt; i++){
  202. unco_uncoamt = unco_uncoamt + eval(model.getValue("/root/main/h_unco/unco["+ i +"]/unco_uncoamt"));
  203. if (eval(model.getValue("/root/main/h_unco/unco["+ i +"]/unco_uncopayamt")) == null) {
  204. unco_uncopayamt = unco_uncopayamt + 0;
  205. } else {
  206. unco_uncopayamt = unco_uncopayamt + eval(model.getValue("/root/main/h_unco/unco["+ i +"]/unco_uncopayamt"));
  207. }
  208. if (eval(model.getValue("/root/main/h_unco/unco["+ i +"]/unco_unconopyamt")) == null) {
  209. unco_unconopyamt = unco_unconopyamt + 0;
  210. } else {
  211. unco_unconopyamt = unco_unconopyamt + eval(model.getValue("/root/main/h_unco/unco["+ i +"]/unco_unconopyamt"));
  212. }
  213. if (eval(model.getValue("/root/main/h_unco/unco["+ i +"]/unco_uncospecamt")) == null) {
  214. unco_uncospecamt = unco_uncospecamt + 0;
  215. } else {
  216. unco_uncospecamt = unco_uncospecamt + eval(model.getValue("/root/main/h_unco/unco["+ i +"]/unco_uncospecamt"));
  217. }
  218. }
  219. if(eval(totrcptamt) < eval(unco_uncoamt)){
  220. messageBox("미수총액이 수납금액을 초과합니다!","E999","");
  221. }
  222. model.setValue("/root/main/unco/totuncoamt", unco_uncoamt);
  223. model.setValue("/root/main/unco/uncopayamt", unco_uncopayamt);
  224. model.setValue("/root/main/unco/unconopyamt", unco_unconopyamt);
  225. model.setValue("/root/main/unco/uncospecamt", unco_uncospecamt);
  226. }else{
  227. model.setValue("/root/main/unco/totuncoamt", "0");
  228. model.setValue("/root/main/unco/uncopayamt", "0");
  229. model.setValue("/root/main/unco/unconopyamt", "0");
  230. model.setValue("/root/main/unco/uncospecamt", "0");
  231. }
  232. model.refresh();
  233. return true;
  234. }
  235. ]]>
  236. </script>
  237. </xhtml:head>
  238. <xhtml:body pagewidth="1100" pageheight="330" style="margin-left:8; margin-top:8; margin-right:8; margin-bottom:8; ">
  239. <group id="group3" scroll="auto" style="left:0px; top:0px; width:1084px; height:290px; ">
  240. <line id="line1" class="line_1" style="x1:0px; y1:24px; x2:1084px; y2:24px; "/>
  241. <caption id="caption1" class="tit_2" style="left:5px; top:10px; width:108px; height:13px; ">미수내역</caption>
  242. <caption id="caption3" class="cell_1" style="left:904px; top:241px; width:75px; height:23px; color:#0000ff; vertical-align:middle; ">수납할 금액</caption>
  243. <caption id="caption4" class="cell_1" style="left:904px; top:266px; width:75px; height:23px; color:#000000; vertical-align:middle; ">미수총액</caption>
  244. <button id="btn_addrow" class="btn2_letter3" style="left:975px; top:4px; width:53px; height:19px; ">
  245. <caption>행추가</caption>
  246. <script type="javascript" ev:event="DOMActivate">
  247. <![CDATA[
  248. if(gOrddd == null || gOrddd == "" || gOrddd == " " || gOrddd == "-" || gOrddd.length != 8){
  249. messageBox("진료이력이 선택되지 않았습니다","E999","");
  250. return;
  251. }
  252. /*
  253. datagrid1.additem();
  254. var currow = datagrid1.row;
  255. model.setValue("/root/main/h_unco/unco["+ currow +"]/unco_ordtype","-");
  256. model.setValue("/root/main/h_unco/unco["+ currow +"]/unco_orddd",gOrddd);
  257. model.setValue("/root/main/h_unco/unco["+ currow +"]/unco_uncorcptflag","1"); //미수발생
  258. model.setValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd","-");
  259. model.setValue("/root/main/h_unco/unco["+ currow +"]/unco_uncoamt","0");
  260. */
  261. var rows = getNodesetCount("/root/main/h_unco/unco");
  262. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]");
  263. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_pid");
  264. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_rcptdd");
  265. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_rcptno");
  266. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_rcptseqno");
  267. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_seqno");
  268. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_instcd");
  269. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_rcptstat");
  270. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_ordtype");
  271. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_orddd");
  272. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_cretno");
  273. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_orddeptcd");
  274. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_orddrid");
  275. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_dschdd");
  276. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_insukind");
  277. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_suppkind");
  278. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncorcptflag");
  279. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncocls");
  280. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncocd");
  281. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncopayamt");
  282. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_unconopyamt");
  283. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncospecamt");
  284. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncoamt");
  285. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_rcptamt");
  286. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_debtamt");
  287. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_endyn");
  288. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_clincstdyno");
  289. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_empid");
  290. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_rcptexecdd");
  291. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_rcpttm");
  292. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_rcptrid");
  293. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_apprsn");
  294. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_outpayapprate");
  295. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_outnopyapprate");
  296. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_outspecapprate");
  297. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_inpayapprate");
  298. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_innopyapprate");
  299. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_inspecapprate");
  300. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_remfact");
  301. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_fstrgstrid");
  302. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_fstrgstdt");
  303. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_lastupdtrid");
  304. model.makeNode("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_lastupdtdt");
  305. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_ordtype" , gOrdtype);
  306. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_orddd" , gOrddd);
  307. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncorcptflag" , "1"); //미수발생
  308. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncocd" , "-");
  309. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncopayamt" , "0");
  310. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_unconopyamt" , "0");
  311. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncospecamt" , "0");
  312. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_uncoamt" , "0");
  313. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_outpayapprate" , "0");
  314. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_outnopyapprate" , "0");
  315. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_outspecapprate" , "0");
  316. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_inpayapprate" , "0");
  317. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_innopyapprate" , "0");
  318. model.setValue("/root/main/h_unco/unco["+ (eval(rows) + 1) +"]/unco_inspecapprate" , "0");
  319. datagrid1.rebuild();
  320. ]]>
  321. </script>
  322. </button>
  323. <button id="btn_delrow" class="btn2_letter3" style="left:1031px; top:4px; width:53px; height:19px; ">
  324. <caption>행삭제</caption>
  325. <script type="javascript" ev:event="DOMActivate">
  326. <![CDATA[
  327. var currow = datagrid1.row;
  328. if(currow < 1){
  329. messageBox("먼저 삭제할 내역을 선택하십시요!","E999","");
  330. return;
  331. }
  332. datagrid1.deleteitem(currow);
  333. fUncoamtCalc();
  334. ]]>
  335. </script>
  336. </button>
  337. <output id="opt_rcptamt" ref="/root/main/unco/totrcptamt" class="output_fix" format="(-)#,###" style="left:982px; top:242px; width:100px; height:19px; text-align:right; "/>
  338. <output id="opt_uncoamt" ref="/root/main/unco/totuncoamt" class="output_fix" format="(-)#,###" style="left:982px; top:267px; width:100px; height:19px; text-align:right; "/>
  339. <datagrid id="datagrid1" nodeset="/root/main/h_unco/unco" caption="pid^rcptdd^rcptno^rcptseqno^seqno^instcd^rcptstat^구분^진료일^cretno^orddeptcd^orddrid^dschdd^insukind^suppkind^uncorcptflag^uncocls^미수명칭^급여&#xA;미수^비급여&#xA;미수^선택&#xA;미수^미수액^rcptamt^debtamt^endyn^clincstdyno^empid^rcptexecdd^rcpttm^rcptrid^적용사유^외래미수율&#xA;(급여/비급여/선택)^외래미수율&#xA;(급여/비급여/선택)^외래미수율&#xA;(급여/비급여/선택)^입원미수율&#xA;(급여/비급여/선택)^입원미수율&#xA;(급여/비급여/선택)^입원미수율&#xA;(급여/비급여/선택)^caption1^caption2^caption3^caption4^caption5" colsep="^" colwidth="45, 58, 54, 62, 54, 57, 61, 45, 85, 53, 67, 59, 60, 63, 72, 77, 64, 176, 70, 70, 70, 70, 60, 62, 62, 66, 57, 74, 62, 59, 239, 40, 40, 40, 40, 40, 40, 0, 0, 0, 0, 0" dataheight="23" mergecellsfixedrows="bycolrec" rowheight="23" rowsep="|" style="left:0px; top:29px; width:1084px; height:209px; ">
  340. <col ref="unco_pid" visibility="hidden"/>
  341. <col ref="unco_rcptdd" visibility="hidden"/>
  342. <col ref="unco_rcptno" visibility="hidden"/>
  343. <col ref="unco_rcptseqno" visibility="hidden"/>
  344. <col ref="unco_seqno" visibility="hidden"/>
  345. <col ref="unco_instcd" visibility="hidden"/>
  346. <col ref="unco_rcptstat" visibility="hidden"/>
  347. <col ref="unco_ordtype" type="combo" style="text-align:center; ">
  348. <choices>
  349. <itemset nodeset="/root/init_com/init/P0028list/P0028">
  350. <label ref="cdnm"/>
  351. <value ref="cdid"/>
  352. </itemset>
  353. </choices>
  354. </col>
  355. <col ref="unco_orddd" format="yyyy-mm-dd" style="text-align:center; "/>
  356. <col ref="unco_cretno" visibility="hidden"/>
  357. <col ref="unco_orddeptcd" visibility="hidden"/>
  358. <col ref="unco_orddrid" visibility="hidden"/>
  359. <col ref="unco_dschdd" visibility="hidden"/>
  360. <col ref="unco_insukind" visibility="hidden"/>
  361. <col ref="unco_suppkind" visibility="hidden"/>
  362. <col ref="unco_uncorcptflag" visibility="hidden"/>
  363. <col ref="unco_uncocls" visibility="hidden"/>
  364. <col ref="unco_uncocd" type="combo">
  365. <choices>
  366. <itemset nodeset="/root/init/uncocd">
  367. <label ref="nm"/>
  368. <value ref="cd"/>
  369. </itemset>
  370. </choices>
  371. </col>
  372. <col ref="unco_uncopayamt" type="input" format="#,###" style="text-align:right; "/>
  373. <col ref="unco_unconopyamt" type="input" format="#,###" style="text-align:right; "/>
  374. <col ref="unco_uncospecamt" type="input" format="#,###" style="text-align:right; "/>
  375. <col ref="unco_uncoamt" type="input" format="#,###" style="text-align:right; "/>
  376. <col ref="unco_rcptamt" visibility="hidden"/>
  377. <col ref="unco_debtamt" visibility="hidden"/>
  378. <col ref="unco_endyn" visibility="hidden"/>
  379. <col ref="unco_clincstdyno" visibility="hidden"/>
  380. <col ref="unco_empid" visibility="hidden"/>
  381. <col ref="unco_rcptexecdd" visibility="hidden"/>
  382. <col ref="unco_rcpttm" visibility="hidden"/>
  383. <col ref="unco_rcptrid" visibility="hidden"/>
  384. <col ref="unco_apprsn" type="input"/>
  385. <col ref="unco_outpayapprate" style="text-align:right; "/>
  386. <col ref="unco_outnopyapprate" style="text-align:right; "/>
  387. <col ref="unco_outspecapprate" style="text-align:right; "/>
  388. <col ref="unco_inpayapprate" style="text-align:right; "/>
  389. <col ref="unco_innopyapprate" style="text-align:right; "/>
  390. <col ref="unco_inspecapprate" style="text-align:right; "/>
  391. <col ref="unco_remfact" visibility="hidden"/>
  392. <col ref="unco_fstrgstrid" visibility="hidden"/>
  393. <col ref="unco_fstrgstdt" visibility="hidden"/>
  394. <col ref="unco_lastupdtrid" visibility="hidden"/>
  395. <col ref="unco_lastupdtdt" visibility="hidden"/>
  396. <script type="javascript" ev:event="xforms-value-changed">
  397. <![CDATA[
  398. var curcol = datagrid1.col;
  399. var currow = datagrid1.row;
  400. if(curcol == datagrid1.colRef("unco_uncoamt")){
  401. if(! fUncoamtCalc()){
  402. datagrid1.valueMatrix( currow, curcol ) = 0;
  403. }
  404. }
  405. // 미수코드 선택 시
  406. if(curcol == datagrid1.colRef("unco_uncocd")){
  407. // 미수구분 설정(기관/개인)
  408. model.setValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocls", model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/cls"));
  409. // 미수율 설정(외래)
  410. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_outpayapprate") ) = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/outpayapprate");
  411. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_outnopyapprate") ) = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/outnopyapprate");
  412. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_outspecapprate") ) = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/outspecapprate");
  413. // 미수율 설정(입원)
  414. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_inpayapprate") ) = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/inpayapprate");
  415. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_innopyapprate") ) = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/innopyapprate");
  416. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_inspecapprate") ) = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/inspecapprate");
  417. // 요율에 따른 미수율 설정
  418. var payAppRate = 0;
  419. var nopyAppRate = 0;
  420. var specAppRate = 0;
  421. if (gBrateFlag == "O") {
  422. payAppRate = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/outpayapprate");
  423. nopyAppRate = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/outnopyapprate");
  424. specAppRate = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/outspecapprate");
  425. } else {
  426. payAppRate = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/inpayapprate");
  427. nopyAppRate = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/innopyapprate");
  428. specAppRate = model.getValue("/root/init/uncocd[cd = '"+ model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncocd")+ "']/inspecapprate");
  429. }
  430. // 미수 대상이 되는 본인부담금액을 재계산하여 전달함.
  431. // 1. 재계산을 위해 현재 설정되어있는 금액은 제외처리
  432. // 2. 수납대상금액 - 기미수금액
  433. var payOwnbamt2 = parseInt(model.getValue("/root/main/unco/rcptpayamt"))
  434. - (parseInt(model.getValue("/root/main/unco/uncopayamt")) - parseInt(model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncopayamt")));
  435. var nopyOwnbamt2 = parseInt(model.getValue("/root/main/unco/rcptnopyamt"))
  436. - (parseInt(model.getValue("/root/main/unco/unconopyamt")) - parseInt(model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_unconopyamt")));
  437. var specOwnbamt2 = parseInt(model.getValue("/root/main/unco/rcptspecamt"))
  438. - (parseInt(model.getValue("/root/main/unco/uncospecamt")) - parseInt(model.getValue("/root/main/h_unco/unco["+ currow +"]/unco_uncospecamt")));
  439. // 미수금액 설정
  440. var uncoAmtArr = fGetUncoAmt(
  441. payAppRate,
  442. nopyAppRate,
  443. specAppRate,
  444. payOwnbamt2,
  445. nopyOwnbamt2,
  446. specOwnbamt2
  447. );
  448. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_uncopayamt") ) = uncoAmtArr[1];
  449. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_unconopyamt") ) = uncoAmtArr[2];
  450. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_uncospecamt") ) = uncoAmtArr[3];
  451. datagrid1.valueMatrix( currow, datagrid1.colRef("unco_uncoamt") ) = uncoAmtArr[0];
  452. // 미수금액 재계산
  453. fUncoamtCalc();
  454. }
  455. model.refresh();
  456. ]]>
  457. </script>
  458. </datagrid>
  459. <caption id="caption2" class="cell_1" style="left:553px; top:241px; width:75px; height:23px; color:#0000ff; vertical-align:middle; ">비급여본인</caption>
  460. <caption id="caption5" class="cell_1" style="left:736px; top:241px; width:60px; height:23px; color:#0000ff; vertical-align:middle; ">선택본인</caption>
  461. <output id="output1" ref="/root/main/unco/rcptspecamt" class="output_fix" format="(-)#,###" style="left:799px; top:242px; width:100px; height:19px; text-align:right; "/>
  462. <output id="output2" ref="/root/main/unco/rcptnopyamt" class="output_fix" format="(-)#,###" style="left:631px; top:242px; width:100px; height:19px; text-align:right; "/>
  463. <caption id="caption6" class="cell_1" style="left:382px; top:241px; width:63px; height:23px; color:#0000ff; vertical-align:middle; ">급여본인</caption>
  464. <output id="output3" ref="/root/main/unco/rcptpayamt" class="output_fix" format="(-)#,###" style="left:447px; top:242px; width:100px; height:19px; text-align:right; "/>
  465. <caption id="caption7" class="cell_1" style="left:553px; top:266px; width:75px; height:23px; color:#000000; vertical-align:middle; ">
  466. <![CDATA[비급여미수]]>
  467. <hint>
  468. <![CDATA[원단위 사사오입]]>
  469. </hint>
  470. </caption>
  471. <caption id="caption8" class="cell_1" style="left:736px; top:266px; width:60px; height:23px; color:#000000; vertical-align:middle; ">
  472. <![CDATA[선택미수]]>
  473. <hint>
  474. <![CDATA[원단위 사사오입]]>
  475. </hint>
  476. </caption>
  477. <caption id="caption9" class="cell_1" style="left:382px; top:266px; width:63px; height:23px; color:#000000; vertical-align:middle; ">
  478. <![CDATA[급여미수]]>
  479. <hint>
  480. <![CDATA[원단위 사사오입]]>
  481. </hint>
  482. </caption>
  483. <output id="output4" ref="/root/main/unco/uncospecamt" class="output_fix" format="(-)#,###" style="left:799px; top:267px; width:100px; height:19px; text-align:right; "/>
  484. <output id="output5" ref="/root/main/unco/unconopyamt" class="output_fix" format="(-)#,###" style="left:631px; top:267px; width:100px; height:19px; text-align:right; "/>
  485. <output id="output6" ref="/root/main/unco/uncopayamt" class="output_fix" format="(-)#,###" style="left:447px; top:267px; width:100px; height:19px; text-align:right; "/>
  486. <caption id="caption10" style="left:5px; top:244px; width:374px; height:46px; color:#ff0000; vertical-align:top; ">
  487. <![CDATA[※ 미수코드관리에서 설정된 미수율에 따라 미수금액 자동설정됨
  488. ※ 미수를 복수건 등록하는 경우,
  489. 기 발생된 금액을 제외한 본인부담금액에서 미수율을 적용]]>
  490. </caption>
  491. </group>
  492. <group id="group1" scroll="auto" style="left:0px; top:293px; width:1084px; height:27px; ">
  493. <button id="btn_confirm" class="btn4_letter2" style="left:967px; top:5px; width:56px; height:22px; ">
  494. <caption>확인</caption>
  495. <script type="javascript" ev:event="DOMActivate">
  496. <![CDATA[
  497. if(checkOpener()){
  498. getRcptuserInfo(); //수납마감 사용자관리 조회
  499. var uncoyn = model.getValue("/root/rcptuser/rcptuserinfo/uncoyn");
  500. var unco_uncocd;
  501. var unco_uncoamt;
  502. var totalUncoAmt = 0;
  503. for(var i=1; i<=getNodesetCount("/root/main/h_unco/unco"); i++){
  504. unco_uncocd = model.getValue("/root/main/h_unco/unco["+ i +"]/unco_uncocd");
  505. unco_uncoamt = model.getValue("/root/main/h_unco/unco["+ i +"]/unco_uncoamt");
  506. //20008-09-26 이동식 추가
  507. totalUncoAmt = parseInt(totalUncoAmt) + parseInt(model.getValue("/root/main/h_unco/unco["+ i +"]/unco_uncoamt"));
  508. if(unco_uncocd == null || unco_uncocd == "" || unco_uncocd == " " || unco_uncocd == "-"){
  509. messageBox("미수명칭 중 미선택된 행이 존재합니다!","E999","");
  510. return;
  511. }
  512. if(unco_uncoamt.isNumber() != true){
  513. messageBox("미수액 중 수치형이 아닌 행이 존재합니다!","E999","");
  514. return;
  515. }
  516. //일반미수 권한 체크
  517. if(unco_uncocd == "A01" && uncoyn != "Y"){
  518. messageBox("일반미수 발생 권한이 없습니다.","E999","");
  519. return;
  520. }
  521. }
  522. opener.javascript.setParameter("SPPAO00900_RTN", "Y");
  523. opener.javascript.setParameter("SPPAO00900_TotUncoAmt",model.getValue("/root/main/unco/totuncoamt"));
  524. if(strRcv != null && strRcv != "" && strRcv != " " && strRcv != "-"){
  525. copyNodesetType(strRcv, "/root/main/h_unco", "replace", parent.model, model);
  526. }
  527. window.close();
  528. }
  529. ]]>
  530. </script>
  531. </button>
  532. <button id="btn_cancel" class="btn4_letter2" style="left:1026px; top:5px; width:56px; height:22px; ">
  533. <caption>취소</caption>
  534. <script type="javascript" ev:event="DOMActivate">
  535. <![CDATA[
  536. if(checkOpener()){
  537. opener.javascript.setParameter("SPPAO00900_RTN","N");
  538. window.close();
  539. }
  540. ]]>
  541. </script>
  542. </button>
  543. <line id="line88" class="line_6" style="x1:0px; y1:0px; x2:1084px; y2:0px; "/>
  544. </group>
  545. </xhtml:body>
  546. </xhtml:html>