SMPIB00200_선별심사코드관리.xfdl 46 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPIB00200" position="absolute 0 0 1202 761" titletext="선별심사코드관리(SMPIB00200)" oninit="SMPIB00200_oninit" onload="SMPIB00200_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 13 1195 757" id="group3" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Div position="absolute 0 11 1194 46" align="align:center top;" id="group2" class="div_SA" anchor="left top right">
  11. <Layouts>
  12. <Layout>
  13. <Button position="absolute 1128 7 1184 29" id="btn_srch" class="btn1" text="조회" anchor="top right" onclick="group3_group2_btn_srch_onclick"/>
  14. <Shape position="absolute 1115 7 1121 29" linetype="vertical" id="line13" class="line_4" anchor="top right"/>
  15. <Static text="기준일자 :" position="absolute 188 10 274 27" id="caption2" class="search_name" anchor="default"/>
  16. <Static text="작업구분 :" position="absolute 372 10 458 27" id="caption3" class="search_name" anchor="default"/>
  17. <Calendar position="absolute 270 8 361 27" id="ipt_badd" class="input_search" dateformat="yyyy-MM-dd" value="null" anchor="default"/>
  18. <Combo position="absolute 454 8 514 27" id="cmb_workflag" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_cmb_workflag_onitemchanged" anchor="default">
  19. <Dataset id="innerdataset">
  20. <ColumnInfo>
  21. <Column id="codecolumn"/>
  22. <Column id="datacolumn"/>
  23. </ColumnInfo>
  24. <Rows>
  25. <Row>
  26. <Col id="codecolumn">-</Col>
  27. <Col id="datacolumn">전 체</Col>
  28. </Row>
  29. <Row>
  30. <Col id="codecolumn">11</Col>
  31. <Col id="datacolumn">사전</Col>
  32. </Row>
  33. <Row>
  34. <Col id="codecolumn">12</Col>
  35. <Col id="datacolumn">사후</Col>
  36. </Row>
  37. </Rows>
  38. </Dataset>
  39. </Combo>
  40. <Combo position="absolute 615 8 675 27" id="cmb_ioflag" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_cmb_ioflag_onitemchanged" anchor="default">
  41. <Dataset id="innerdataset">
  42. <ColumnInfo>
  43. <Column id="codecolumn"/>
  44. <Column id="datacolumn"/>
  45. </ColumnInfo>
  46. <Rows>
  47. <Row>
  48. <Col id="codecolumn">-</Col>
  49. <Col id="datacolumn">전 체</Col>
  50. </Row>
  51. <Row>
  52. <Col id="codecolumn">I</Col>
  53. <Col id="datacolumn">입 원</Col>
  54. </Row>
  55. <Row>
  56. <Col id="codecolumn">O</Col>
  57. <Col id="datacolumn">외 래</Col>
  58. </Row>
  59. </Rows>
  60. </Dataset>
  61. </Combo>
  62. <Static text="입원/외래 :" position="absolute 529 10 624 27" id="caption1" class="search_name" anchor="default"/>
  63. <Static text="수가코드 :" position="absolute 693 10 779 27" id="caption7" class="search_name" anchor="default"/>
  64. <Edit position="absolute 770 8 854 27" id="ipt_calcscorcd" class="input_search" onkeyup="group3_group2_ipt_calcscorcd_onkeyup" anchor="default"/>
  65. <Static text="종료건포함여부 :" position="absolute 882 10 1007 27" id="caption4" class="search_name" anchor="default"/>
  66. <Radio position="absolute 999 6 1109 29" id="rdo_delinclude" columncount="2" codecolumn="value" datacolumn="label" innerdataset="@ds_rdo_delinclude" anchor="default"/>
  67. <Static text="심사자 :" position="absolute 13 10 88 27" id="caption8" class="search_name" anchor="default"/>
  68. <Combo position="absolute 80 8 170 27" id="cmb_judger" class="combo_search" innerdataset="@ds_init_judgerlist_judger" datacolumn="judgnm" codecolumn="judgid" anchor="default"/>
  69. <Button id="btn_srchedicd" taborder="1" class="icon_search" position="absolute 854 10 870 26" onclick="group3_group2_btn_srchedicd_onclick" anchor="default"/>
  70. </Layout>
  71. </Layouts>
  72. </Div>
  73. <Button position="absolute 952 52 978 71" id="btn_prev" class="icon_left" visible="false" text="" anchor="top right" onclick="group3_btn_prev_onclick"/>
  74. <Button position="absolute 979 52 1005 71" id="btn_next" class="icon_right" visible="false" text="" anchor="top right"/>
  75. <Shape position="absolute 0 71 1194 77" linetype="horizontal" id="line3" class="line_10" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  76. <Grid position="absolute 0 76 1194 716" id="grd_asrtjudg" scrollbars="autoboth" binddataset="ds_main_list1_listjchk" anchor="all" onexpanddown="group3_grd_asrtjudg_onexpanddown" cellsizingtype="col">
  77. <Formats>
  78. <Format id="default">
  79. <Columns>
  80. <Column size="22" band="left"/>
  81. <Column size="100" band="left"/>
  82. <Column size="120" band="left"/>
  83. <Column size="200" band="left"/>
  84. <Column size="70" band="left"/>
  85. <Column size="70" band="left"/>
  86. <Column size="45" band="left"/>
  87. <Column size="90" band="left"/>
  88. <Column size="90" band="left"/>
  89. <Column size="82"/>
  90. <Column size="80"/>
  91. <Column size="80"/>
  92. <Column size="80"/>
  93. <Column size="80"/>
  94. <Column size="0"/>
  95. <Column size="0"/>
  96. <Column size="0"/>
  97. <Column size="90"/>
  98. <Column size="90"/>
  99. <Column size="0"/>
  100. <Column size="90"/>
  101. <Column size="55"/>
  102. <Column size="55"/>
  103. <Column size="0"/>
  104. <Column size="0"/>
  105. <Column size="250"/>
  106. <Column size="0"/>
  107. <Column size="0"/>
  108. <Column size="0"/>
  109. <Column size="0"/>
  110. <Column size="0"/>
  111. </Columns>
  112. <Rows>
  113. <Row size="24" band="head"/>
  114. <Row size="24"/>
  115. </Rows>
  116. <Band id="head">
  117. <Cell/>
  118. <Cell col="1" text="심사자"/>
  119. <Cell col="2" text="수가코드"/>
  120. <Cell col="3" text="수가명"/>
  121. <Cell col="4" text="입원/외래"/>
  122. <Cell col="5" text="작업구분"/>
  123. <Cell col="6" text="순번"/>
  124. <Cell col="7" text="시작일자"/>
  125. <Cell col="8" text="종료일자"/>
  126. <Cell col="9" text="상병포함여부"/>
  127. <Cell col="10" text="시작상병코드"/>
  128. <Cell col="11" text="시작상병명"/>
  129. <Cell col="12" text="종료상병코드"/>
  130. <Cell col="13" text="종료상병명"/>
  131. <Cell col="14" text="수량"/>
  132. <Cell col="15" text="일수"/>
  133. <Cell col="16" text="총투"/>
  134. <Cell col="17" text="진료과포함여부"/>
  135. <Cell col="18" text="진료과"/>
  136. <Cell col="19" text="성별"/>
  137. <Cell col="20" text="나이포함여부"/>
  138. <Cell col="21" text="시작나이"/>
  139. <Cell col="22" text="종료나이"/>
  140. <Cell col="23" text="원내원외구분"/>
  141. <Cell col="24" text="수납전심사여부"/>
  142. <Cell col="25" text="참고사항"/>
  143. <Cell col="26" text="oldcalcscorcd"/>
  144. <Cell col="27" text="oldordnm"/>
  145. <Cell col="28" text="oldtodd"/>
  146. <Cell col="29" text="oldworkflag"/>
  147. <Cell col="30" text="changeflag"/>
  148. </Band>
  149. <Band id="body">
  150. <Cell celltype="head" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" expr="currow+1"/>
  151. <Cell col="1" displaytype="combo" edittype="combo" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:judgid" combodataset="ds_init_judgerlist_judger" combocodecol="judgid" combodatacol="judgnm" enable="false"/>
  152. <Cell col="2" displaytype="text" edittype="text" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:calcscorcd" expandshow="show"/>
  153. <Cell col="3" displaytype="text" edittype="text" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:ordnm"/>
  154. <Cell col="4" displaytype="combo" edittype="combo" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:ioflag" combodataset="ds_cmb_ioflag" combocodecol="value" combodatacol="label"/>
  155. <Cell col="5" displaytype="combo" edittype="combo" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:workflag" combodataset="ds_cmb_workflag" combocodecol="value" combodatacol="label" enable="false"/>
  156. <Cell col="6" displaytype="normal" edittype="none" style="align:left middle;color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:seqno"/>
  157. <Cell col="7" displaytype="date" edittype="date" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:fromdd" mask="yyyy-MM-dd"/>
  158. <Cell col="8" displaytype="date" edittype="date" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:todd" mask="yyyy-MM-dd"/>
  159. <Cell col="9" displaytype="checkbox" edittype="expr:todd &lt;= utlf_getCurrentDate() ? 'none' : 'checkbox'" text="bind:diaginclyn" expr="expr:diaginclyn == 'true' || diaginclyn == '1' ? 1 : 0"/>
  160. <Cell col="10" displaytype="text" edittype="text" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:diagcdfrom" expandshow="show" enable="false"/>
  161. <Cell col="11" displaytype="normal" edittype="none" style="align:left middle;color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:diagnmfrom"/>
  162. <Cell col="12" displaytype="text" edittype="text" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:diagcdto" expandshow="show" enable="false"/>
  163. <Cell col="13" displaytype="normal" edittype="none" style="align:left middle;color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:diagnmto"/>
  164. <Cell col="14" displaytype="text" edittype="text" text="bind:drugqty"/>
  165. <Cell col="15" displaytype="text" edittype="text" text="bind:dayno"/>
  166. <Cell col="16" displaytype="text" edittype="text" text="bind:totdrugqty"/>
  167. <Cell col="17" displaytype="checkbox" edittype="expr:todd &lt;= utlf_getCurrentDate() ? 'none' : 'checkbox'" text="bind:orddeptinclyn" expr="expr:orddeptinclyn == 'true' || orddeptinclyn == '1' ? 1 : 0"/>
  168. <Cell col="18" displaytype="combo" edittype="combo" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:orddeptcd" combodataset="ds_init_orddeptcd_orddeptcdlist" combocodecol="cd" combodatacol="nm" id="col_orddeptcd"/>
  169. <Cell col="19" displaytype="combo" edittype="combo" text="bind:gndr"/>
  170. <Cell col="20" displaytype="checkbox" edittype="expr:todd &lt;= utlf_getCurrentDate() ? 'none' : 'checkbox'" text="bind:ageinclyn" expr="expr:ageinclyn == 'true' || ageinclyn == '1' ? 1 : 0"/>
  171. <Cell col="21" displaytype="normal" edittype="normal" style="align:left middle;color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:agefrom"/>
  172. <Cell col="22" displaytype="normal" edittype="normal" style="align:left middle;color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:ageto"/>
  173. <Cell col="23" displaytype="combo" edittype="combo" text="bind:hosinoutflag"/>
  174. <Cell col="24" displaytype="combo" edittype="combo" text="bind:bfjudgflag"/>
  175. <Cell col="25" displaytype="text" edittype="text" style="color:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');color2:EXPR(todd &lt;= utlf_getCurrentDate() ? '#FF0000' : '#000000');" text="bind:remfact" expandshow="show"/>
  176. <Cell col="26" text="bind:oldcalcscorcd"/>
  177. <Cell col="27" text="bind:oldordnm"/>
  178. <Cell col="28" text="bind:oldtodd"/>
  179. <Cell col="29" text="bind:oldworkflag"/>
  180. <Cell col="30" text="bind:changeflag"/>
  181. </Band>
  182. </Format>
  183. </Formats>
  184. </Grid>
  185. <Static text="선별 심사 코드 목록" position="absolute 0 55 144 76" id="caption5" class="tit_2"/>
  186. <Button position="absolute 1141 52 1194 71" id="btn_delRow" class="btn2" text="행삭제" anchor="top right" onclick="group3_btn_delRow_onclick"/>
  187. <Button position="absolute 1006 52 1086 71" id="button2" class="btn7" text="엑셀저장" anchor="top right" onclick="group3_button2_onclick"/>
  188. <Button position="absolute 1087 52 1140 71" id="btn_addRow" class="btn2" text="행추가" anchor="top right" onclick="group3_btn_addRow_onclick"/>
  189. <Div position="absolute 410 255 825 530" id="grp_remfact" visible="false" style="background:#ffffffff;border:1 solid #808080ff ;">
  190. <Layouts>
  191. <Layout>
  192. <TextArea position="absolute 6 24 410 240" id="ipt_remfact" scrollbars="autovert" wordwrap="word"/>
  193. <Static text="참고사항 입력/조회" position="absolute 6 5 160 22" id="caption15" class="search_name"/>
  194. <Button position="absolute 295 245 351 267" id="btn_confirm" class="btn4" text="확인" onclick="group3_grp_remfact_btn_confirm_onclick"/>
  195. <Button position="absolute 354 245 410 267" id="btn_cancel" class="btn4" text="취소" onclick="group3_grp_remfact_btn_cancel_onclick"/>
  196. </Layout>
  197. </Layouts>
  198. </Div>
  199. </Layout>
  200. </Layouts>
  201. </Div>
  202. <Div position="absolute 0 728 1195 755" id="grp_btn" scrollbars="autoboth" anchor="left right bottom">
  203. <Layouts>
  204. <Layout>
  205. <Shape position="absolute 0 0 1194 6" linetype="horizontal" id="line23" class="line_6" anchor="default"/>
  206. <Button position="absolute 1126 5 1194 27" id="button5" class="btn4" text="초기화" anchor="right bottom" onclick="grp_btn_button5_onclick"/>
  207. <Button position="absolute 1068 5 1124 27" id="btn_save" class="btn4" text="저장" anchor="right bottom" onclick="grp_btn_btn_save_onclick"/>
  208. <Button position="absolute 970 5 1066 27" id="button1" class="btn4" text="다음페이지" anchor="right bottom" onclick="grp_btn_button1_onclick"/>
  209. </Layout>
  210. </Layouts>
  211. </Div>
  212. <Static id="caption6" text="선별 심사 코드 관리" class="tit_1" position="absolute 0 0 206 23"/>
  213. </Layout>
  214. </Layouts>
  215. <Objects>
  216. <Dataset id="ds_send_item1_itemjchk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  217. <ColumnInfo>
  218. <Column id="badd" type="STRING" size="256"/>
  219. <Column id="workflag" type="STRING" size="256"/>
  220. <Column id="ioflag" type="STRING" size="256"/>
  221. <Column id="calcscorcd" type="STRING" size="256"/>
  222. <Column id="endinclude" type="STRING" size="256"/>
  223. <Column id="judgid" type="STRING" size="256"/>
  224. <Column id="rownum" type="STRING" size="256"/>
  225. </ColumnInfo>
  226. <Rows>
  227. <Row>
  228. <Col id="badd"/>
  229. <Col id="workflag"/>
  230. <Col id="ioflag"/>
  231. <Col id="calcscorcd"/>
  232. <Col id="endinclude"/>
  233. <Col id="judgid"/>
  234. <Col id="rownum"/>
  235. </Row>
  236. </Rows>
  237. </Dataset>
  238. <Dataset id="ds_init_judgerlist_judger" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  239. <ColumnInfo>
  240. <Column id="judgnm" type="STRING" size="256"/>
  241. <Column id="judgid" type="STRING" size="256"/>
  242. </ColumnInfo>
  243. </Dataset>
  244. <Dataset id="ds_cmb_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  245. <ColumnInfo>
  246. <Column id="label" type="STRING" size="256"/>
  247. <Column id="value" type="STRING" size="256"/>
  248. </ColumnInfo>
  249. <Rows>
  250. <Row>
  251. <Col id="label">전체</Col>
  252. <Col id="value">-</Col>
  253. </Row>
  254. <Row>
  255. <Col id="label">입원</Col>
  256. <Col id="value">I</Col>
  257. </Row>
  258. <Row>
  259. <Col id="label">외래</Col>
  260. <Col id="value">O</Col>
  261. </Row>
  262. </Rows>
  263. </Dataset>
  264. <Dataset id="ds_cmb_workflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  265. <ColumnInfo>
  266. <Column id="label" type="STRING" size="256"/>
  267. <Column id="value" type="STRING" size="256"/>
  268. </ColumnInfo>
  269. <Rows>
  270. <Row>
  271. <Col id="label">전체</Col>
  272. <Col id="value">-</Col>
  273. </Row>
  274. <Row>
  275. <Col id="label">사전심사</Col>
  276. <Col id="value">11</Col>
  277. </Row>
  278. <Row>
  279. <Col id="label">사후심사</Col>
  280. <Col id="value">12</Col>
  281. </Row>
  282. </Rows>
  283. </Dataset>
  284. <Dataset id="ds_init_orddeptcd_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  285. <ColumnInfo>
  286. <Column id="nm" type="STRING" size="256"/>
  287. <Column id="cd" type="STRING" size="256"/>
  288. </ColumnInfo>
  289. </Dataset>
  290. <Dataset id="ds_init_P0165list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  291. <ColumnInfo>
  292. <Column id="cdnm" type="STRING" size="256"/>
  293. <Column id="cdid" type="STRING" size="256"/>
  294. </ColumnInfo>
  295. </Dataset>
  296. <Dataset id="ds_main_list1_listjchk" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list1_listjchk_oncolumnchanged">
  297. <ColumnInfo>
  298. <Column id="judgid" type="STRING" size="256"/>
  299. <Column id="calcscorcd" type="STRING" size="256"/>
  300. <Column id="ordnm" type="STRING" size="256"/>
  301. <Column id="ioflag" type="STRING" size="256"/>
  302. <Column id="workflag" type="STRING" size="256"/>
  303. <Column id="seqno" type="STRING" size="256"/>
  304. <Column id="fromdd" type="STRING" size="256"/>
  305. <Column id="todd" type="STRING" size="256"/>
  306. <Column id="diaginclyn" type="STRING" size="256"/>
  307. <Column id="diagcdfrom" type="STRING" size="256"/>
  308. <Column id="diagnmfrom" type="STRING" size="256"/>
  309. <Column id="diagcdto" type="STRING" size="256"/>
  310. <Column id="diagnmto" type="STRING" size="256"/>
  311. <Column id="drugqty" type="STRING" size="256"/>
  312. <Column id="dayno" type="STRING" size="256"/>
  313. <Column id="totdrugqty" type="STRING" size="256"/>
  314. <Column id="orddeptinclyn" type="STRING" size="256"/>
  315. <Column id="orddeptcd" type="STRING" size="256"/>
  316. <Column id="gndr" type="STRING" size="256"/>
  317. <Column id="ageinclyn" type="STRING" size="256"/>
  318. <Column id="agefrom" type="STRING" size="256"/>
  319. <Column id="ageto" type="STRING" size="256"/>
  320. <Column id="hosinoutflag" type="STRING" size="256"/>
  321. <Column id="remfact" type="STRING" size="256"/>
  322. <Column id="oldcalcscorcd" type="STRING" size="256"/>
  323. <Column id="oldordnm" type="STRING" size="256"/>
  324. <Column id="oldtodd" type="STRING" size="256"/>
  325. <Column id="oldworkflag" type="STRING" size="256"/>
  326. <Column id="bfjudgflag" type="STRING" size="256"/>
  327. <Column id="changeflag" type="STRING" size="256"/>
  328. </ColumnInfo>
  329. </Dataset>
  330. <Dataset id="ds_tmp_remfact_text" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  331. <ColumnInfo>
  332. <Column id="memo" type="STRING" size="256"/>
  333. </ColumnInfo>
  334. <Rows>
  335. <Row/>
  336. </Rows>
  337. </Dataset>
  338. <Dataset id="ds_rdo_delinclude" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  339. <ColumnInfo>
  340. <Column id="label" type="STRING" size="256"/>
  341. <Column id="value" type="STRING" size="256"/>
  342. </ColumnInfo>
  343. <Rows>
  344. <Row>
  345. <Col id="label">포함</Col>
  346. <Col id="value">1</Col>
  347. </Row>
  348. <Row>
  349. <Col id="label">미포함</Col>
  350. <Col id="value">2</Col>
  351. </Row>
  352. </Rows>
  353. </Dataset>
  354. <Dataset id="ds_send_item2_grdsrchnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  355. <ColumnInfo>
  356. <Column id="searchkind" type="STRING" size="256"/>
  357. <Column id="iptsearch" type="STRING" size="256"/>
  358. </ColumnInfo>
  359. <Rows>
  360. <Row/>
  361. </Rows>
  362. </Dataset>
  363. <Dataset id="ds_temp_calcdiagnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  364. <ColumnInfo>
  365. <Column id="hngnm" type="STRING" size="256"/>
  366. </ColumnInfo>
  367. </Dataset>
  368. <Dataset id="ds_send_item3_srchdiag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  369. <ColumnInfo>
  370. <Column id="basedd" type="STRING" size="256"/>
  371. <Column id="diagcd" type="STRING" size="256"/>
  372. <Column id="selectedrdodiagkind" type="STRING" size="256"/>
  373. </ColumnInfo>
  374. <Rows>
  375. <Row/>
  376. </Rows>
  377. </Dataset>
  378. <Dataset id="ds_temp_picmmech" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  379. </Objects>
  380. <Bind>
  381. <BindItem id="item0" compid="group3.group2.cmb_judger" propid="value" datasetid="ds_send_item1_itemjchk" columnid="judgid"/>
  382. <BindItem id="item1" compid="group3.group2.ipt_badd" propid="value" datasetid="ds_send_item1_itemjchk" columnid="badd"/>
  383. <BindItem id="item2" compid="group3.group2.cmb_ioflag" propid="value" datasetid="ds_send_item1_itemjchk" columnid="ioflag"/>
  384. <BindItem id="item3" compid="group3.group2.ipt_calcscorcd" propid="value" datasetid="ds_send_item1_itemjchk" columnid="calcscorcd"/>
  385. <BindItem id="item4" compid="group3.group2.rdo_delinclude" propid="value" datasetid="ds_send_item1_itemjchk" columnid="endinclude"/>
  386. <BindItem id="item5" compid="group3.grp_remfact.ipt_remfact" propid="value" datasetid="ds_tmp_remfact_text" columnid="memo"/>
  387. <BindItem id="item6" compid="group3.group2.cmb_workflag" propid="value" datasetid="ds_send_item1_itemjchk" columnid="workflag"/>
  388. </Bind>
  389. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  390. * System Name :
  391. * Job Name :
  392. * Creator :
  393. * Make Date : 2016-05-24
  394. * Description :
  395. *---------------------------------------------------------------------------------------
  396. * Modify Date Modifier Modify Description
  397. *---------------------------------------------------------------------------------------
  398. * 2016-05-24 Live Converter TF->XP
  399. *
  400. *---------------------------------------------------------------------------------------
  401. ****************************************************************************************/
  402. include "com_commonxp::comm_main.xjs";
  403. include "pam_pamcomnxp::PAM.xjs";
  404. function SMPIB00200_oninit(obj:Form, e:InitEventInfo)
  405. {
  406. frmf_initForm(obj);
  407. }
  408. function SMPIB00200_onload(obj:Form, e:LoadEventInfo)
  409. {
  410. fInitialize();
  411. fAddRow();
  412. }
  413. function fInitialize()
  414. {
  415. group3.grp_remfact.visible = false;
  416. var today = utlf_getCurrentDate();
  417. ds_send_item1_itemjchk.setColumn(0, "badd", today);
  418. ds_send_item1_itemjchk.setColumn(0, "workflag", "-");
  419. ds_send_item1_itemjchk.setColumn(0, "ioflag", "-");
  420. ds_send_item1_itemjchk.setColumn(0, "rownum", "0");
  421. ds_main_list1_listjchk.clearData();
  422. pamGetDeptCDDrIDList();
  423. var oParam = {};
  424. oParam.id = "TRPIB00203";
  425. oParam.service = "insubasecdmngtapp.AsrtJudgCd";
  426. oParam.method = "reqGetJudgerID";
  427. oParam.inds = "";
  428. oParam.outds = "ds_init_judgerlist_judger=judger";
  429. oParam.async = false;
  430. //oParam.callback = "cf_TRPIB00203";
  431. tranf_submit(oParam);
  432. frmf_addComboItem("group3.group2.cmb_judger","전체", "-","above");
  433. var userid = sysf_getUserId();
  434. ds_send_item1_itemjchk.setColumn(0, "judgid", userid);
  435. ds_send_item1_itemjchk.setColumn(0, "endinclude", "2");
  436. var arrParam = [{dsNm: "ds_init_P0165list", cdGrpId: "P0165"}]
  437. appf_getCodeList(arrParam);
  438. ds_init_orddeptcd_orddeptcdlist.copyData(ds_init_orddeptcdlist);
  439. ds_init_orddeptcd_orddeptcdlist.insertRow(0);
  440. ds_init_orddeptcd_orddeptcdlist.setColumn(0, "cd", "-");
  441. ds_init_orddeptcd_orddeptcdlist.setColumn(0, "nm", "전체");
  442. //ipt_calcscorcd.attribute("_chartype") = "upper";
  443. // grd_asrtjudg.colAttribute ( 2, "_chartype" ) = "upper";
  444. // grd_asrtjudg.colAttribute ( 10, "_chartype" ) = "upper";
  445. // grd_asrtjudg.colAttribute ( 12, "_chartype" ) = "upper";
  446. //
  447. group3.group2.cmb_judger.index = 0
  448. group3.group2.cmb_workflag.index = 0;
  449. group3.group2.cmb_judger.setFocus();
  450. }
  451. function fAddRow()
  452. {
  453. if (group3.btn_addRow.enable)
  454. {
  455. var row = ds_main_list1_listjchk.addRow();
  456. var today = utlf_getCurrentDate();
  457. var userid = sysf_getUserId();
  458. ds_main_list1_listjchk.setColumn(row, "judgid", userid);
  459. ds_main_list1_listjchk.setColumn(row, "ioflag", "-");
  460. ds_main_list1_listjchk.setColumn(row, "workflag", "-");
  461. ds_main_list1_listjchk.setColumn(row, "fromdd", today);
  462. ds_main_list1_listjchk.setColumn(row, "todd", "99991231");
  463. ds_main_list1_listjchk.setColumn(row, "diaginclyn", "false");
  464. ds_main_list1_listjchk.setColumn(row, "drugqty", "0");
  465. ds_main_list1_listjchk.setColumn(row, "dayno", "0");
  466. ds_main_list1_listjchk.setColumn(row, "totdrugqty", "0");
  467. ds_main_list1_listjchk.setColumn(row, "orddeptcd", "-");
  468. ds_main_list1_listjchk.setColumn(row, "gndr", "-");
  469. ds_main_list1_listjchk.setColumn(row, "hosinoutflag", "-");
  470. ds_main_list1_listjchk.setColumn(row, "ageinclyn", "false");
  471. ds_main_list1_listjchk.setColumn(row, "orddeptinclyn", "false");
  472. ds_main_list1_listjchk.setColumn(row, "bfjudgflag", "N");
  473. dsf_makeValue(ds_main_list1_listjchk, "changeflag", "string", "I", row);
  474. }
  475. }
  476. function ds_main_list1_listjchk_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  477. {
  478. if(e.columnid == "diaginclyn")
  479. {
  480. obj.setColumn(e.row, "diaginclyn", (e.newvalue == "true" || e.newvalue == 1) ? "true" : "false");
  481. }
  482. if(e.columnid == "orddeptinclyn")
  483. {
  484. obj.setColumn(e.row, "orddeptinclyn", (e.newvalue == "true" || e.newvalue == 1) ? "true" : "false");
  485. }
  486. if(e.columnid == "ageinclyn")
  487. {
  488. obj.setColumn(e.row, "ageinclyn", (e.newvalue == "true" || e.newvalue == 1) ? "true" : "false");
  489. }
  490. var col = e.columnid;
  491. var row = e.row;
  492. if (col == "judgid")
  493. {
  494. }
  495. // 기존 수가 변경시 변경 못하게 처리, row 변경상태도 안되게 처리
  496. else if (col == "calcscorcd")
  497. {
  498. var newcalcscorcd = ds_main_list1_listjchk.getColumn(row, "calcscorcd");
  499. var oldcalcscorcd = ds_main_list1_listjchk.getColumn(row, "oldcalcscorcd");
  500. if (!utlf_isNull(oldcalcscorcd) && oldcalcscorcd != newcalcscorcd)
  501. {
  502. sysf_messageBox("수가코드는 변경", "E001");
  503. ds_main_list1_listjchk.setColumn(row, "calcscorcd", oldcalcscorcd);
  504. var arrRow = new Array();
  505. arrRow[0] = row;
  506. grdf_setStatus(group3.grd_asrtjudg, "", arrRow);
  507. }
  508. if(ds_main_list1_listjchk.getRowType(row) == 2)
  509. {
  510. fSrchNm(2);
  511. }
  512. }
  513. else if (col == "ordnm")
  514. {
  515. var oldordnm = ds_main_list1_listjchk.getColumn(row, "oldordnm");
  516. var newordnm = ds_main_list1_listjchk.getColumn(row, "ordnm");
  517. if (!utlf_isNull(oldordnm) && oldordnm != newordnm)
  518. {
  519. sysf_messageBox("수가명은 변경", "E001");
  520. ds_main_list1_listjchk.setColumn(row, "ordnm", oldordnm);
  521. var arrRow = new Array();
  522. arrRow[0] = row;
  523. grdf_setStatus(group3.grd_asrtjudg, "", arrRow);
  524. }
  525. }
  526. var rowstatus = ds_main_list1_listjchk.getRowType(row);
  527. if (rowstatus == 2)
  528. {
  529. ds_main_list1_listjchk.setColumn(row, "changeflag", "U");
  530. }
  531. }
  532. function group3_group2_cmb_workflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  533. {
  534. group3.group2.cmb_ioflag.setFocus();
  535. }
  536. function group3_group2_cmb_ioflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  537. {
  538. group3.group2.ipt_calcscorcd.setFocus();
  539. }
  540. function group3_group2_ipt_calcscorcd_onkeyup(obj:Edit, e:KeyEventInfo)
  541. {
  542. if(e.keycode == 13)
  543. {
  544. group3_group2_btn_srch_onclick();
  545. }
  546. }
  547. function group3_group2_btn_srchedicd_onclick(obj:Button, e:ClickEventInfo)
  548. {
  549. dsf_createDsRow("ds_hidden_smpic00200_judgsrch", [{col:"srchdrugcd", type:"STRING", size:256 , val : group3.group2.ipt_calcscorcd.value}]);
  550. var objArg = new Object();
  551. objArg.arg_ds_temp = ds_hidden_smpic00200_judgsrch;
  552. frmf_modal("SMPIC00200", "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
  553. var calcscorcd = ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd");
  554. if (!utlf_isNull(calcscorcd))
  555. {
  556. ds_send_item1_itemjchk.setColumn(0, "calcscorcd", calcscorcd);
  557. }
  558. }
  559. function group3_group2_btn_srch_onclick(obj:Button, e:ClickEventInfo)
  560. {
  561. ds_send_item1_itemjchk.setColumn(0, "rownum", "0");
  562. fChangePage();
  563. }
  564. function fChangePage()
  565. {
  566. for(var i = 0; i < ds_main_list1_listjchk.rowcount; i++ )
  567. {
  568. var rowstatus = ds_main_list1_listjchk.getRowType(i);
  569. if (rowstatus == 2)
  570. {
  571. var changeflag = ds_main_list1_listjchk.getColumn(i, "changeflag");
  572. if (changeflag == "I")
  573. {
  574. var arrRow = new Array();
  575. arrRow[0] = i;
  576. grdf_setStatus(group3.grd_asrtjudg, "I", arrRow);
  577. }
  578. }
  579. }
  580. var updtdata = grdf_getGridUpdateData(group3.grd_asrtjudg);
  581. if (updtdata.rowcount != 0)
  582. {
  583. var ret = sysf_messageBox("그리드에 작업중인 내용이 있습니다. 조회를","Q003");
  584. if(ret != 6)
  585. {
  586. return false;
  587. }
  588. }
  589. ds_main_list1_listjchk.clearData();
  590. if (fCheckGetAsrtJudgCdInfo())
  591. {
  592. dsf_setDefaultVal(ds_send_item1_itemjchk, "workflag:-,ioflag:-,judgid:-");
  593. var oParam = {};
  594. oParam.id = "TRPID00201";
  595. oParam.service = "insubasecdmngtapp.AsrtJudgCd";
  596. oParam.method = "reqGetAsrtJudgCd";
  597. oParam.inds = "req=ds_send_item1_itemjchk";
  598. oParam.outds = "ds_main_list1_listjchk=listjchk";
  599. oParam.async = false;
  600. //oParam.callback = "cf_TRPID00201";
  601. tranf_submit(oParam);
  602. fAddRow();
  603. ds_main_list1_listjchk.rowposition = -1;
  604. ds_main_list1_listjchk.selectRow(0)
  605. }
  606. }
  607. function fCheckGetAsrtJudgCdInfo()
  608. {
  609. if (utlf_isNull(ds_send_item1_itemjchk.getColumn(0, "badd")))
  610. {
  611. sysf_messageBox("기준일자는","I003"); //기준일자는 필수입력입니다.
  612. return false;
  613. }
  614. if (utlf_isNull(ds_send_item1_itemjchk.getColumn(0, "workflag")))
  615. {
  616. sysf_messageBox("작업구분은","I003"); //작업구분은 필수입력입니다.
  617. return false;
  618. }
  619. if (utlf_isNull(ds_send_item1_itemjchk.getColumn(0, "ioflag")))
  620. {
  621. sysf_messageBox("입원/외래는","I003"); //입원/외래는 필수입력입니다.
  622. return false;
  623. }
  624. return true;
  625. }
  626. function group3_button2_onclick(obj:Button, e:ClickEventInfo)
  627. {
  628. if(ds_main_list1_listjchk.rowcount > 0)
  629. {
  630. grdf_exportExcel(group3.grd_asrtjudg, "", "see");
  631. }
  632. else
  633. {
  634. sysf_messageBox("엑셀저장할 대상자가", "I004");
  635. }
  636. }
  637. function group3_btn_addRow_onclick(obj:Button, e:ClickEventInfo)
  638. {
  639. fAddRow();
  640. }
  641. function group3_btn_delRow_onclick(obj:Button, e:ClickEventInfo)
  642. {
  643. var row = ds_main_list1_listjchk.rowposition;
  644. if (row < 0)
  645. {
  646. sysf_messageBox("먼저 삭제할 내역을 선택하십시요!","E999","");
  647. return;
  648. }
  649. ds_main_list1_listjchk.deleteRow(row);
  650. }
  651. function group3_grd_asrtjudg_onexpanddown(obj:Grid, e:GridMouseEventInfo)
  652. {
  653. var col = e.col;
  654. var row = e.row;
  655. group3.grd_asrtjudg.updateToDataset();
  656. if (col == 2 || col == 10 || col == 12)
  657. {
  658. fSrchNm(col);
  659. }
  660. if (col == 25)
  661. {
  662. ds_tmp_remfact_text.setColumn(0, "memo", ds_main_list1_listjchk.getColumn(row, "remfact"));
  663. group3.grp_remfact.visible = true;
  664. }
  665. var rowstatus = ds_main_list1_listjchk.getRowType(row);
  666. if (rowstatus == 2)
  667. {
  668. ds_main_list1_listjchk.setColumn(row, "changeflag", "U");
  669. }
  670. }
  671. function fSrchNm(col)
  672. {
  673. var row = ds_main_list1_listjchk.rowposition;
  674. var col = col;
  675. if (col == 2)
  676. {
  677. ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_listjchk.getColumn(row, "calcscorcd"));
  678. ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "1");
  679. }
  680. else if (col == 10)
  681. {
  682. ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_listjchk.getColumn(row, "diagcdfrom"));
  683. ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "2");
  684. }
  685. else if (col == 12)
  686. {
  687. ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_listjchk.getColumn(row, "diagcdto"));
  688. ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "2");
  689. }
  690. var oParam = {};
  691. oParam.id = "TRPID00202";
  692. oParam.service = "insubasecdmngtapp.AsrtJudgCd";
  693. oParam.method = "reqGetNm";
  694. oParam.inds = "req=ds_send_item2_grdsrchnm";
  695. oParam.outds = "ds_temp_calcdiagnm=calcdiagnm";
  696. oParam.async = false;
  697. //oParam.callback = "cf_TRPID00202";
  698. tranf_submit(oParam);
  699. var hngnm = ds_temp_calcdiagnm.getColumn(0, "hngnm");
  700. if (utlf_isNull(hngnm))
  701. {
  702. if (col == 2)
  703. {
  704. dsf_createDsRow("ds_temp_item2_grdsrchnm", [{col:"srchdrugcd", type:"STRING", size:256 , val : ds_send_item2_grdsrchnm.getColumn(0, "iptsearch")}
  705. , {col:"con3_search1", type:"STRING", size:256 , val : "calcscorcd"}]);
  706. var objArg = new Object();
  707. objArg.arg_ds_temp = ds_temp_item2_grdsrchnm;
  708. frmf_modal("SMPIC00200", "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
  709. ds_main_list1_listjchk.setColumn(row, "calcscorcd", ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd"));
  710. ds_main_list1_listjchk.setColumn(row, "ordnm", ds_temp_picmmech.getColumn(0, "picmmech_hngnm"));
  711. }
  712. else
  713. {
  714. if (col == 10 || col == 12)
  715. {
  716. ds_send_item3_srchdiag.setColumn(0, "basedd", ds_send_item1_itemjchk.getColumn(0, "badd"));
  717. if (col == 10)
  718. {
  719. ds_send_item3_srchdiag.setColumn(0, "diagcd", ds_main_list1_listjchk.getColumn(row, "diagcdfrom"));
  720. }
  721. else
  722. {
  723. ds_send_item3_srchdiag.setColumn(0, "diagcd", ds_main_list1_listjchk.getColumn(row, "diagcdto"));
  724. }
  725. ds_send_item3_srchdiag.setColumn(0, "selectedrdodiagkind", "1");
  726. var objArg = new Object();
  727. objArg.sDiagcd = ds_send_item3_srchdiag.getColumn(0, "diagcd");
  728. objArg.sSelectedrdodiagkind = "1";
  729. objArg.sSingleFlag = "P";
  730. var objDs = frmf_modal("SPPIZ00400", "SPPIZ00400", objArg);
  731. }
  732. }
  733. if (col == 2)
  734. {
  735. var srchnm = ds_temp_picmmech.getColumn(0, "picmmech_hngnm");
  736. if (utlf_isNull(srchnm))
  737. {
  738. ds_main_list1_listjchk.setColumn(row, "calcscorcd", "");
  739. ds_main_list1_listjchk.setColumn(row, "ordnm", "");
  740. }
  741. }
  742. if (col == 10)
  743. {
  744. var srchnm = objDs.sDiagnm;
  745. var diagcd = objDs.sDiagcd;
  746. if (utlf_isNull(srchnm))
  747. {
  748. ds_main_list1_listjchk.setColumn(row, "diagcdfrom", "");
  749. ds_main_list1_listjchk.setColumn(row, "diagnmfrom", "");
  750. }
  751. else
  752. {
  753. ds_main_list1_listjchk.setColumn(row, "diagcdfrom", diagcd);
  754. ds_main_list1_listjchk.setColumn(row, "diagnmfrom", srchnm);
  755. }
  756. }
  757. if (col == 12)
  758. {
  759. var srchnm = objDs.sDiagnm;
  760. var diagcd = objDs.sDiagcd;
  761. if (utlf_isNull(srchnm))
  762. {
  763. ds_main_list1_listjchk.setColumn(row, "diagcdto", "");
  764. ds_main_list1_listjchk.setColumn(row, "diagnmto", "");
  765. }
  766. else
  767. {
  768. ds_main_list1_listjchk.setColumn(row, "diagcdto", diagcd);
  769. ds_main_list1_listjchk.setColumn(row, "diagnmto", srchnm);
  770. }
  771. }
  772. }
  773. else
  774. {
  775. if (col == 2)
  776. {
  777. ds_main_list1_listjchk.setColumn(row, "ordnm", ds_temp_calcdiagnm.getColumn(0, "hngnm"));
  778. }
  779. if (col == 10)
  780. {
  781. ds_main_list1_listjchk.setColumn(row, "diagnmfrom", ds_temp_calcdiagnm.getColumn(0, "hngnm"));
  782. var diagcdto = ds_main_list1_listjchk.getColumn(row, "diagcdto");
  783. var diagnmto = ds_main_list1_listjchk.getColumn(row, "diagnmto");
  784. if(utlf_isNull(diagcdto) && utlf_isNull(diagnmto))
  785. {
  786. ds_main_list1_listjchk.setColumn(row, "diagcdto", ds_main_list1_listjchk.getColumn(row, "diagcdfrom"));
  787. ds_main_list1_listjchk.setColumn(row, "diagnmto", ds_temp_calcdiagnm.getColumn(0, "hngnm"));
  788. }
  789. }
  790. if (col == 12)
  791. {
  792. ds_main_list1_listjchk.setColumn(row, "diagnmto", ds_temp_calcdiagnm.getColumn(0, "hngnm"));
  793. }
  794. }
  795. }
  796. function grp_btn_button5_onclick(obj:Button, e:ClickEventInfo)
  797. {
  798. fInitialize();
  799. fAddRow();
  800. }
  801. function grp_btn_btn_save_onclick(obj:Button, e:ClickEventInfo)
  802. {
  803. if (fCheckSaveAsrtJudgCdInfo())
  804. {
  805. dsf_setDefaultVal(ds_main_list1_listjchk, "todd:99991231,ioflag:-,orddeptcd:-,judgid:-,diaginclyn:N,diagcdfrom:-,diagcdto:-,drugqty:0,dayno:0,totdrugqty:0,orddeptinclyn:N,gndr:-,ageinclyn:N,agefrom:0,ageto:0,hosinoutflag:-,fromdd:-,remfact:-,bfjudgflag:N");
  806. var oParam = {};
  807. oParam.id = "TXPIB00201";
  808. oParam.service = "insubasecdmngtapp.AsrtJudgCd";
  809. oParam.method = "reqExeAsrtJudgCd";
  810. oParam.inds = "req=ds_main_list1_listjchk:U";
  811. oParam.outds = "";
  812. oParam.async = false;
  813. oParam.callback = "cf_TXPIB00201";
  814. tranf_submit(oParam);
  815. }
  816. }
  817. function cf_TXPIB00201(sSvcId, nErrorCode, sErrorMsg)
  818. {
  819. if(nErrorCode < 0)
  820. {
  821. return;
  822. }
  823. else
  824. {
  825. ds_main_list1_listjchk.clearData();
  826. var oParam = {};
  827. oParam.id = "TRPID00201";
  828. oParam.service = "insubasecdmngtapp.AsrtJudgCd";
  829. oParam.method = "reqGetAsrtJudgCd";
  830. oParam.inds = "req=ds_send_item1_itemjchk";
  831. oParam.outds = "ds_main_list1_listjchk=listjchk";
  832. oParam.async = false;
  833. //oParam.callback = "cf_TRPID00201";
  834. tranf_submit(oParam);
  835. fAddRow();
  836. sysf_messageBox("정상적으로 저장되었습니다.", "I999");
  837. }
  838. }
  839. function fCheckSaveAsrtJudgCdInfo()
  840. {
  841. for(var i = 0; i < ds_main_list1_listjchk.rowcount; i++ )
  842. {
  843. var rowstatus = ds_main_list1_listjchk.getRowType(i);
  844. if (rowstatus == 3)
  845. {
  846. var changeflag = ds_main_list1_listjchk.getColumn(i, "changeflag");
  847. if (changeflag == "I")
  848. {
  849. var arrRow = new Array();
  850. arrRow[0] = i;
  851. grdf_setStatus(group3.grd_asrtjudg, "", arrRow);
  852. //grd_asrtjudg.rowStatus(i) = 0;
  853. }
  854. }
  855. }
  856. var updtdata = grdf_getGridUpdateData(group3.grd_asrtjudg);
  857. if (updtdata.rowcount == 0)
  858. {
  859. sysf_messageBox("변경된 데이터가","I004");
  860. return false;
  861. }
  862. for(var i = 0; i < ds_main_list1_listjchk.rowcount; i++ )
  863. {
  864. var today = utlf_getCurrentDate();
  865. var judgid = ds_main_list1_listjchk.getColumn(i, "judgid");
  866. var calcscorcd = ds_main_list1_listjchk.getColumn(i, "calcscorcd");
  867. var ordnm = ds_main_list1_listjchk.getColumn(i, "ordnm");
  868. var fromdd = ds_main_list1_listjchk.getColumn(i, "fromdd");
  869. var todd = ds_main_list1_listjchk.getColumn(i, "todd");
  870. var diaginclyn = ds_main_list1_listjchk.getColumn(i, "diaginclyn");
  871. var diagcdfrom = ds_main_list1_listjchk.getColumn(i, "diagcdfrom");
  872. var diagcdto = ds_main_list1_listjchk.getColumn(i, "diagcdto");
  873. var orddeptinclyn = ds_main_list1_listjchk.getColumn(i, "orddeptinclyn");
  874. var orddeptcd = ds_main_list1_listjchk.getColumn(i, "orddeptcd");
  875. var ageinclyn = ds_main_list1_listjchk.getColumn(i, "ageinclyn");
  876. var agefrom = ds_main_list1_listjchk.getColumn(i, "agefrom");
  877. var ageto = ds_main_list1_listjchk.getColumn(i, "ageto");
  878. var status = ds_main_list1_listjchk.getRowType(i);
  879. if (status == 1)
  880. {
  881. continue;
  882. }
  883. else
  884. {
  885. if (utlf_isNull(judgid))
  886. {
  887. sysf_messageBox("심사자를","C002");
  888. return false;
  889. }
  890. if (utlf_isNull(calcscorcd))
  891. {
  892. sysf_messageBox("수가코드는","I003");
  893. return false;
  894. }
  895. if (utlf_isNull(todd))
  896. {
  897. sysf_messageBox("종료일자는","I003");
  898. return false;
  899. }
  900. if (String(todd) < String(fromdd))
  901. {
  902. sysf_messageBox("시작일자가 종료일자보다 큽니다.","I999");
  903. return false;
  904. }
  905. if (diaginclyn == "true")
  906. {
  907. if (utlf_isNull(diagcdfrom))
  908. {
  909. sysf_messageBox("상병포함여부가 체크되었을때 시작상병 코드는","I003");
  910. return false;
  911. }
  912. if (utlf_isNull(diagcdto))
  913. {
  914. sysf_messageBox("상병포함여부가 체크되었을때 종료상병 코드는","I003");
  915. return false;
  916. }
  917. }
  918. if (orddeptinclyn == "true")
  919. {
  920. if (utlf_isNull(orddeptcd) || orddeptcd == "-")
  921. {
  922. sysf_messageBox("진료과포함여부가 체크되었을때 진료과는","I003");
  923. return false;
  924. }
  925. }
  926. if (orddeptinclyn == "true")
  927. {
  928. if (utlf_isNull(agefrom))
  929. {
  930. sysf_messageBox("나이포함여부가 체크되었을때 시작나이는.","I003");
  931. return false;
  932. }
  933. if (utlf_isNull(ageto))
  934. {
  935. sysf_messageBox("나이포함여부가 체크되었을때 종료나이는.","I003");
  936. return false;
  937. }
  938. if (agefrom > ageto)
  939. {
  940. sysf_messageBox("시작나이가 종료나이보다 많습니다.","I999");
  941. return false;
  942. }
  943. if (agefrom < 0 || ageto < 0 || agefrom > 150 || ageto > 150)
  944. {
  945. sysf_messageBox("나이 범위가 올바르지 않습니다.","I999");
  946. return false;
  947. }
  948. }
  949. }
  950. }
  951. return true;
  952. }
  953. function grp_btn_button1_onclick(obj:Button, e:ClickEventInfo)
  954. {
  955. var rownum = ds_send_item1_itemjchk.getColumn(0, "rownum");
  956. if (rownum > -1)
  957. {
  958. var nextnum = parseInt(rownum)+1;
  959. ds_send_item1_itemjchk.setColumn(0, "rownum", nextnum);
  960. fChangePage();
  961. }
  962. }
  963. function group3_grp_remfact_btn_confirm_onclick(obj:Button, e:ClickEventInfo)
  964. {
  965. var row = ds_main_list1_listjchk.rowposition;
  966. var value = ds_main_list1_listjchk.getColumn(row, "remfact");
  967. if(value != group3.grp_remfact.ipt_remfact.value)
  968. {
  969. ds_main_list1_listjchk.setColumn(row, "remfact", group3.grp_remfact.ipt_remfact.value);
  970. }
  971. ds_tmp_remfact_text.setColumn(0, "memo", "");
  972. group3.grp_remfact.visible = false;
  973. }
  974. function group3_grp_remfact_btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  975. {
  976. ds_tmp_remfact_text.setColumn(0, "memo", "");
  977. group3.grp_remfact.visible = false;
  978. }
  979. ]]></Script>
  980. </Form>
  981. </FDL>