SPPIJ02501_재원심사기왕증분리.xfdl 64 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPIJ02501" position="absolute 0 0 1199 750" titletext="입원재원심사 상세 계산내역" oninit="SPPIJ02501_oninit" onload="SPPIJ02501_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 0 1195 730" id="group3" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout width="1195" height="730">
  10. <Div position="absolute 0 0 1190 65" align="align:center top;" id="group2" anchor="left top right">
  11. <Layouts>
  12. <Layout>
  13. <Shape position="absolute 1 5 1189 65" id="roundrect1" class="roundrerct_search" type="roundrectangle" anchor="left top right"/>
  14. <Button position="absolute 1112 12 1168 34" id="btn_srch" class="btn1" text="조회" anchor="top right" onclick="group3_group2_btn_srch_onclick"/>
  15. <Shape position="absolute 1094 12 1100 60" linetype="vertical" id="line1" class="line_4" anchor="top right"/>
  16. <Static text="처방일자 :" position="absolute 370 35 465 52" id="caption5" class="search_name"/>
  17. <Calendar position="absolute 455 35 540 54" id="ipt_fromdd" class="input_search"/>
  18. <Static text="~" position="absolute 543 35 557 53" id="caption6"/>
  19. <Calendar position="absolute 558 35 643 54" id="ipt_todd" class="input_search"/>
  20. <Static text="코드조회 :" position="absolute 370 11 456 28" id="caption8" class="search_name"/>
  21. <Edit position="absolute 596 10 708 29" id="ipt_cd" class="input_search"/>
  22. <Static text="주부유형 :" position="absolute 10 10 100 27" id="caption4" class="search_name"/>
  23. <Radio position="absolute 453 8 593 31" id="rdo_mchrgcode" class="radio_search" columncount="3" innerdataset="@ds_rdo_choicdsrch" datacolumn="label" codecolumn="value" index="0" value="calcscorcd"/>
  24. <Calendar position="absolute 850 35 935 54" id="input1" class="input_search"/>
  25. <Static text="~" position="absolute 835 36 849 54" id="caption23"/>
  26. <Calendar position="absolute 745 35 830 54" id="input2" class="input_search"/>
  27. <Static text="실시일자 :" position="absolute 655 37 745 54" id="caption24" class="search_name"/>
  28. <CheckBox position="absolute 985 35 1070 55" id="checkbox1" text="미실시포함" anchor="top right"/>
  29. <Button id="button27" taborder="1" class="icon_search" position="absolute 107 14 123 33"/>
  30. <Button id="btn_cd" taborder="2" class="icon_search" position="absolute 716 10 732 29" onclick="group3_group2_btn_cd_onclick"/>
  31. </Layout>
  32. </Layouts>
  33. </Div>
  34. <Static text="setp 1. 재원심사기왕증분리" position="absolute 1 82 206 105" id="caption10" class="tit_2"/>
  35. <Shape position="absolute 0 98 1189 105" linetype="horizontal" id="line2" class="line_10" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  36. <Grid position="absolute 1 103 1189 501" id="grd_ordlist" class="datagrid2" binddataset="ds_grd_ordlist" autofittype="col" anchor="left top right" onrbuttondown="group3_grd_ordlist_onrbuttondown" autoenter="select" selecttype="multirow" cellsizingtype="col">
  37. <Formats>
  38. <Format id="default">
  39. <Columns>
  40. <Column size="22"/>
  41. <Column size="67"/>
  42. <Column size="83"/>
  43. <Column size="64"/>
  44. <Column size="62"/>
  45. <Column size="54"/>
  46. <Column size="72"/>
  47. <Column size="75"/>
  48. <Column size="82"/>
  49. <Column size="417"/>
  50. <Column size="64"/>
  51. <Column size="49"/>
  52. <Column size="48"/>
  53. <Column size="0"/>
  54. <Column size="0"/>
  55. <Column size="0"/>
  56. <Column size="0"/>
  57. <Column size="0"/>
  58. <Column size="0"/>
  59. <Column size="0"/>
  60. <Column size="0"/>
  61. <Column size="0"/>
  62. <Column size="0"/>
  63. <Column size="0"/>
  64. <Column size="0"/>
  65. <Column size="0"/>
  66. <Column size="0"/>
  67. <Column size="0"/>
  68. <Column size="0"/>
  69. </Columns>
  70. <Rows>
  71. <Row size="24" band="head"/>
  72. <Row size="24"/>
  73. </Rows>
  74. <Band id="head">
  75. <Cell/>
  76. <Cell col="1" text="환자번호"/>
  77. <Cell col="2" text="최초입원일"/>
  78. <Cell col="3" text="주/부유형"/>
  79. <Cell col="4" text="보험유형"/>
  80. <Cell col="5" text="보조유형"/>
  81. <Cell col="6" text="처방일자"/>
  82. <Cell col="7" text="실시일자"/>
  83. <Cell col="8" text="처방코드"/>
  84. <Cell col="9" text="처방명"/>
  85. <Cell col="10" text="1회 수량"/>
  86. <Cell col="11" text="횟수"/>
  87. <Cell col="12" text="날수"/>
  88. <Cell col="13" text="caption13"/>
  89. <Cell col="14" text="caption14"/>
  90. <Cell col="15" text="caption15"/>
  91. <Cell col="16" text="caption16"/>
  92. <Cell col="17" text="caption17"/>
  93. <Cell col="18" text="caption18"/>
  94. <Cell col="19" text="caption19"/>
  95. <Cell col="20" text="caption20"/>
  96. <Cell col="21" text="caption2"/>
  97. <Cell col="22" text="caption3"/>
  98. <Cell col="23" text="caption4"/>
  99. <Cell col="24" text="caption5"/>
  100. <Cell col="25" text="caption6"/>
  101. <Cell col="26" text="caption7"/>
  102. <Cell col="27" text="caption9"/>
  103. <Cell col="28" text="caption10"/>
  104. </Band>
  105. <Band id="body">
  106. <Cell celltype="head"/>
  107. <Cell col="1" style="align:center middle;" text="bind:pid"/>
  108. <Cell col="2" displaytype="date" style="align:left middle;" text="bind:orddd" mask="yyyy-MM-dd"/>
  109. <Cell col="3" style="align:left middle;" text="bind:mskind"/>
  110. <Cell col="4" style="align:left middle;" text="bind:insukind"/>
  111. <Cell col="5" style="align:left middle;" text="bind:suppkind"/>
  112. <Cell col="6" displaytype="date" style="align:center middle;" text="bind:prcpdd" mask="yyyy-MM-dd"/>
  113. <Cell col="7" displaytype="date" style="align:center middle;" text="bind:execdd" mask="yyyy-MM-dd"/>
  114. <Cell col="8" style="align:left middle;" text="bind:prcpcd"/>
  115. <Cell col="9" style="align:left middle;" text="bind:prcpnm"/>
  116. <Cell col="10" style="align:left middle;" text="bind:prcptims"/>
  117. <Cell col="11" style="align:left middle;" text="bind:prcpdayno"/>
  118. <Cell col="12" style="align:left middle;" text="bind:prcphistno"/>
  119. <Cell col="13" displaytype="combo" edittype="combo" text="bind:drprcpetc8"/>
  120. <Cell col="14" text="bind:prcpno"/>
  121. <Cell col="15" text="bind:cretno"/>
  122. <Cell col="16" text="bind:subcretno"/>
  123. <Cell col="17" text="bind:execprcpuniqno"/>
  124. <Cell col="18" text="bind:clinclrg"/>
  125. <Cell col="19" text="bind:earncls1"/>
  126. <Cell col="20" text="bind:earncls2"/>
  127. <Cell col="21" text="bind:earncls3"/>
  128. <Cell col="22" text="bind:aftercretno"/>
  129. <Cell col="23" text="bind:ordchangeyn"/>
  130. <Cell col="24" text="bind:chkflag"/>
  131. <Cell col="25" text="bind:rn"/>
  132. <Cell col="26" text="bind:oldmskind"/>
  133. <Cell col="27" text="bind:indd"/>
  134. <Cell col="28" text="bind:proccalctype"/>
  135. </Band>
  136. </Format>
  137. </Formats>
  138. </Grid>
  139. <Static text="setp2. 처방유형 변경(기왕증) 처리 할 리스트" position="absolute 2 508 317 529" id="caption1" class="tit_2"/>
  140. <Shape position="absolute 1 523 931 532" linetype="horizontal" id="line3" class="line_10" style="strokepen:3 solid #33bbbbff;" onclick="group3_line3_onclick"/>
  141. <Grid position="absolute 1 529 931 721" id="grd_ordlist2" binddataset="ds_grd_ordlist2" autofittype="col" anchor="default" onrbuttondown="group3_grd_ordlist2_onrbuttondown" cellsizingtype="col">
  142. <Formats>
  143. <Format id="default">
  144. <Columns>
  145. <Column size="21"/>
  146. <Column size="67"/>
  147. <Column size="83"/>
  148. <Column size="64"/>
  149. <Column size="62"/>
  150. <Column size="54"/>
  151. <Column size="72"/>
  152. <Column size="75"/>
  153. <Column size="82"/>
  154. <Column size="161"/>
  155. <Column size="64"/>
  156. <Column size="49"/>
  157. <Column size="48"/>
  158. <Column size="0"/>
  159. <Column size="0"/>
  160. <Column size="0"/>
  161. <Column size="0"/>
  162. <Column size="0"/>
  163. <Column size="0"/>
  164. <Column size="0"/>
  165. <Column size="0"/>
  166. <Column size="0"/>
  167. <Column size="0"/>
  168. <Column size="0"/>
  169. <Column size="0"/>
  170. <Column size="0"/>
  171. <Column size="0"/>
  172. <Column size="0"/>
  173. <Column size="0"/>
  174. <Column size="0"/>
  175. </Columns>
  176. <Rows>
  177. <Row size="30" band="head"/>
  178. <Row size="24"/>
  179. </Rows>
  180. <Band id="head">
  181. <Cell/>
  182. <Cell col="1" text="환자번호"/>
  183. <Cell col="2" text="최초입원일"/>
  184. <Cell col="3" text="주/부유형"/>
  185. <Cell col="4" text="보험유형"/>
  186. <Cell col="5" text="보조유형"/>
  187. <Cell col="6" text="처방일자"/>
  188. <Cell col="7" text="실시일자"/>
  189. <Cell col="8" text="처방코드"/>
  190. <Cell col="9" text="처방명"/>
  191. <Cell col="10" text="1회 수량"/>
  192. <Cell col="11" text="횟수"/>
  193. <Cell col="12" text="날수"/>
  194. <Cell col="13" text="caption13"/>
  195. <Cell col="14" text="caption14"/>
  196. <Cell col="15" text="caption15"/>
  197. <Cell col="16" text="caption16"/>
  198. <Cell col="17" text="caption17"/>
  199. <Cell col="18" text="caption18"/>
  200. <Cell col="19" text="caption19"/>
  201. <Cell col="20" text="caption20"/>
  202. <Cell col="21" text="caption2"/>
  203. <Cell col="22" text="caption3"/>
  204. <Cell col="23" text="caption4"/>
  205. <Cell col="24" text="caption5"/>
  206. <Cell col="25" text="caption6"/>
  207. <Cell col="26" text="caption7"/>
  208. <Cell col="27" text="caption8"/>
  209. <Cell col="28" text="caption9"/>
  210. <Cell col="29" text="caption11"/>
  211. </Band>
  212. <Band id="body">
  213. <Cell celltype="head"/>
  214. <Cell col="1" displaytype="normal" text="bind:pid"/>
  215. <Cell col="2" displaytype="normal" text="bind:orddd"/>
  216. <Cell col="3" displaytype="normal" text="bind:mskind"/>
  217. <Cell col="4" displaytype="normal" text="bind:insukind"/>
  218. <Cell col="5" displaytype="normal" text="bind:suppkind"/>
  219. <Cell col="6" displaytype="normal" text="bind:prcpdd"/>
  220. <Cell col="7" displaytype="normal" text="bind:execdd"/>
  221. <Cell col="8" displaytype="normal" text="bind:prcpcd"/>
  222. <Cell col="9" displaytype="normal" text="bind:prcpnm"/>
  223. <Cell col="10" displaytype="normal" text="bind:prcptims"/>
  224. <Cell col="11" displaytype="normal" text="bind:prcpdayno"/>
  225. <Cell col="12" displaytype="normal" text="bind:prcphistno"/>
  226. <Cell col="13" displaytype="combo" edittype="combo" text="bind:drprcpetc8"/>
  227. <Cell col="14" text="bind:prcpno"/>
  228. <Cell col="15" text="bind:cretno"/>
  229. <Cell col="16" text="bind:subcretno"/>
  230. <Cell col="17" text="bind:execprcpuniqno"/>
  231. <Cell col="18" text="bind:clinclrg"/>
  232. <Cell col="19" text="bind:earncls1"/>
  233. <Cell col="20" text="bind:earncls2"/>
  234. <Cell col="21" text="bind:earncls3"/>
  235. <Cell col="22" text="bind:aftercretno"/>
  236. <Cell col="23" text="bind:ordchangeyn"/>
  237. <Cell col="24" text="bind:chkflag"/>
  238. <Cell col="25" text="bind:rn"/>
  239. <Cell col="26" text="bind:oldmskind"/>
  240. <Cell col="27" text="bind:newexecdd"/>
  241. <Cell col="28" text="bind:indd"/>
  242. <Cell col="29" text="bind:proccalctype"/>
  243. </Band>
  244. </Format>
  245. </Formats>
  246. </Grid>
  247. <Grid position="absolute 935 529 1195 721" id="grd_insuhistory" class="datagrid2" binddataset="ds_grd_insuhistory" autofittype="col" anchor="left top right" cellsizingtype="col">
  248. <Formats>
  249. <Format id="default">
  250. <Columns>
  251. <Column size="34"/>
  252. <Column size="24"/>
  253. <Column size="28"/>
  254. <Column size="70"/>
  255. <Column size="52"/>
  256. <Column size="0"/>
  257. <Column size="0"/>
  258. <Column size="35"/>
  259. </Columns>
  260. <Rows>
  261. <Row size="30" band="head"/>
  262. <Row size="24"/>
  263. </Rows>
  264. <Band id="head">
  265. <Cell text="유형"/>
  266. <Cell col="1" text="보조"/>
  267. <Cell col="2" text="M"/>
  268. <Cell col="3" text="개시일"/>
  269. <Cell col="4" text="종료일"/>
  270. <Cell col="5" text="cretno"/>
  271. <Cell col="6" text="cretno"/>
  272. <Cell col="7" text="희귀&#13;&#10;난치"/>
  273. </Band>
  274. <Band id="body">
  275. <Cell text="bind:insukind"/>
  276. <Cell col="1" text="bind:suppkind"/>
  277. <Cell col="2" text="bind:mskind"/>
  278. <Cell col="3" text="bind:fromdd"/>
  279. <Cell col="4" text="bind:todd"/>
  280. <Cell col="5" text="bind:cretno"/>
  281. <Cell col="6" text="bind:cretno"/>
  282. <Cell col="7" text="bind:rareobstflag"/>
  283. </Band>
  284. </Format>
  285. </Formats>
  286. </Grid>
  287. <Static text="setp3. 처방유형 변경(기왕증) 유형선택" position="absolute 935 508 1195 527" id="cpt_detail" class="tit_2" anchor="default"/>
  288. <Shape position="absolute 935 524 1195 531" linetype="horizontal" id="line4" class="line_10" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  289. <Grid position="absolute 93 10 353 60" id="datagrid1" class="datagrid2" binddataset="ds_datagrid1" autofittype="col" oncellclick="group3_datagrid1_oncellclick">
  290. <Formats>
  291. <Format id="default">
  292. <Columns>
  293. <Column size="34"/>
  294. <Column size="20"/>
  295. <Column size="29"/>
  296. <Column size="70"/>
  297. <Column size="60"/>
  298. <Column size="0"/>
  299. <Column size="40"/>
  300. <Column size="25"/>
  301. </Columns>
  302. <Rows>
  303. <Row size="24" band="head"/>
  304. <Row size="24"/>
  305. </Rows>
  306. <Band id="head">
  307. <Cell text="유형"/>
  308. <Cell col="1" text="보조"/>
  309. <Cell col="2" text="M"/>
  310. <Cell col="3" text="개시일"/>
  311. <Cell col="4" text="종료일"/>
  312. <Cell col="5" text="cretno"/>
  313. <Cell col="6" text="cretno" displayexpdec="-1"/>
  314. <Cell col="7" text="희귀난치"/>
  315. </Band>
  316. <Band id="body">
  317. <Cell text="bind:mskind"/>
  318. <Cell col="1" text="bind:insukind"/>
  319. <Cell col="2" text="bind:suppkind"/>
  320. <Cell col="3" text="bind:fromdd"/>
  321. <Cell col="4" text="bind:todd"/>
  322. <Cell col="5" text="bind:cretno"/>
  323. <Cell col="6" text="bind:cretno"/>
  324. <Cell col="7" text="bind:rareobstflag"/>
  325. </Band>
  326. </Format>
  327. </Formats>
  328. </Grid>
  329. <Div id="group8" taborder="1" class="roundrect_example" position="absolute 230 70 1001 95">
  330. <Layouts>
  331. <Layout>
  332. <Shape id="roundrect2" type="roundrectangle" class="roundrect_search" position="absolute 0 0 767 25" anchor="default"/>
  333. <Radio id="rdo_ordfilflag" taborder="1" columncount="14" rowcount="0" codecolumn="value" datacolumn="label" class="radio_search" position="absolute 8 -1 753 25" anchor="default" innerdataset="@ds_rdo_selectedRdoItem" onitemchanged="group3_group8_rdo_ordfilflag_onitemchanged" value="-" index="0" style="font:BIND(font);" onitemclick="group3_group8_rdo_ordfilflag_onitemclick"/>
  334. </Layout>
  335. </Layouts>
  336. </Div>
  337. </Layout>
  338. </Layouts>
  339. </Div>
  340. <Button position="absolute 1079 722 1135 744" id="btn_changeinsukind" class="btn4" text="변경" anchor="top right" onclick="btn_changeinsukind_onclick"/>
  341. <Button position="absolute 1139 722 1195 744" id="button1" class="btn4" text="닫기" anchor="top right" onclick="button1_onclick"/>
  342. <PopupMenu id="pmn_menu1" position="absolute 1222 116 1361 144" style="buttonsize:-1;background:#ffffffff;" captioncolumn="label" idcolumn="func" innerdataset="@ds_popupmenu_iscl" levelcolumn="level" onmenuclick="pmn_menu1_onmenuclick"/>
  343. <PopupMenu id="pmn_menu2" innerdataset="@ds_popupmenu_iscl2" idcolumn="func" captioncolumn="label" levelcolumn="level" onmenuclick="pmn_menu2_onmenuclick" onmouseleave="pmn_menu2_onmouseleave" position="absolute 1222 146 1361 174" style="buttonsize:-1;background:#ffffffff;"/>
  344. </Layout>
  345. </Layouts>
  346. <Objects>
  347. <Dataset id="ds_grd_ordlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  348. <ColumnInfo>
  349. <Column id="status" type="STRING" size="256" sumtext="처리구분"/>
  350. <Column id="probordyn" type="STRING" size="256" sumtext="문제처방여부"/>
  351. <Column id="spcljudgyn" type="STRING" size="256" sumtext="선별심사여부"/>
  352. <Column id="unitspecyn" type="STRING" size="256" sumtext="선택진료여부"/>
  353. <Column id="seq" type="STRING" size="256" sumtext="순번"/>
  354. <Column id="ordtype" type="STRING" size="256" sumtext="I/O구분"/>
  355. <Column id="ediitem1" type="STRING" size="256" sumtext="보험대분류"/>
  356. <Column id="ediitem2" type="STRING" size="256" sumtext="보험중분류"/>
  357. <Column id="orddd" type="STRING" size="256" sumtext="처방일자"/>
  358. <Column id="execdd" type="STRING" size="256" sumtext="실시일자"/>
  359. <Column id="newexecdd" type="STRING" size="256" sumtext="변경후실시일자"/>
  360. <Column id="execrid" type="STRING" size="256" sumtext="실시자"/>
  361. <Column id="execprcpstatcd" type="STRING" size="256" sumtext="처방상태"/>
  362. <Column id="grupcalcscorcls" type="STRING" size="256" sumtext="그룹수가분류"/>
  363. <Column id="snglcalcscorcls" type="STRING" size="256" sumtext="싱글수가분류"/>
  364. <Column id="grupearncls" type="STRING" size="256" sumtext="그룹수가수익분류"/>
  365. <Column id="snglearncls" type="STRING" size="256" sumtext="싱글수가수익분류"/>
  366. <Column id="grupcalcscorcd" type="STRING" size="256" sumtext="그룹코드"/>
  367. <Column id="snglcalcscorcd" type="STRING" size="256" sumtext="싱글코드"/>
  368. <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
  369. <Column id="estmcls" type="STRING" size="256" sumtext="산정분류"/>
  370. <Column id="estmmeancd" type="STRING" size="256" sumtext="산정의미"/>
  371. <Column id="estmcd" type="STRING" size="256" sumtext="산정코드"/>
  372. <Column id="hngnm" type="STRING" size="256" sumtext="한글명"/>
  373. <Column id="calcpayflag" type="STRING" size="256" sumtext="계산급여구분"/>
  374. <Column id="matractflag" type="STRING" size="256" sumtext="재료행위구분"/>
  375. <Column id="freeflag" type="STRING" size="256" sumtext="Freeflag"/>
  376. <Column id="ansttm" type="STRING" size="256" sumtext="마취시간"/>
  377. <Column id="direccd" type="STRING" size="256" sumtext="용법"/>
  378. <Column id="appunitcost" type="BIGDECIMAL" size="256" sumtext="단가"/>
  379. <Column id="calcqty" type="BIGDECIMAL" size="256" sumtext="수량"/>
  380. <Column id="calctims" type="BIGDECIMAL" size="256" sumtext="횟수"/>
  381. <Column id="calcdays" type="INT" size="256" sumtext="일수"/>
  382. <Column id="calcamt" type="BIGDECIMAL" size="256" sumtext="금액"/>
  383. <Column id="unithospaddamt" type="BIGDECIMAL" size="256" sumtext="병원가산단가"/>
  384. <Column id="specordyn" type="STRING" size="256" sumtext="선택진료여부"/>
  385. <Column id="unitspecamt" type="BIGDECIMAL" size="256" sumtext="선택진료(특진)단가"/>
  386. <Column id="unitaddamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  387. <Column id="totordamt" type="BIGDECIMAL" size="256" sumtext="총진료비"/>
  388. <Column id="ownbamt" type="BIGDECIMAL" size="256" sumtext="본인부담금"/>
  389. <Column id="hospaddamt" type="BIGDECIMAL" size="256" sumtext="병원가산단가"/>
  390. <Column id="specamt" type="BIGDECIMAL" size="256" sumtext="선택진료(특진)단가"/>
  391. <Column id="addamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  392. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  393. <Column id="fstrgstrid" type="STRING" size="256" sumtext="입력자"/>
  394. <Column id="lastupdtrid" type="STRING" size="256" sumtext="취소자자"/>
  395. <Column id="lastupdtdt" type="STRING" size="256" sumtext="취소일시"/>
  396. <Column id="ordnm" type="STRING" size="256" sumtext="처방명"/>
  397. <Column id="judgadjtresncd" type="STRING" size="256" sumtext="수정사유코드"/>
  398. <Column id="tootfact" type="STRING" size="256" sumtext="양측구분"/>
  399. <Column id="judgadjtresncdnm" type="STRING" size="256" sumtext="수정사유명"/>
  400. <Column id="edicdflag" type="STRING" size="256" sumtext="edicdflag"/>
  401. <Column id="ediunitcost" type="BIGDECIMAL" size="256" sumtext="edi단가"/>
  402. <Column id="updtdd" type="STRING" size="256" sumtext="코드적용일자"/>
  403. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  404. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  405. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  406. <Column id="calcseqno" type="INT" size="256" sumtext="계산순번"/>
  407. <Column id="calcscorseqno" type="INT" size="256" sumtext="수가별 일련번호"/>
  408. <Column id="cnfmcd" type="STRING" size="256" sumtext="확인코드"/>
  409. <Column id="cpflag" type="STRING" size="256" sumtext="CP처방여부"/>
  410. <Column id="prnprcpflag" type="STRING" size="256" sumtext="PRN처방여부"/>
  411. <Column id="portprcpflag" type="STRING" size="256" sumtext="포터블처방여부"/>
  412. <Column id="anamneflag" type="STRING" size="256" sumtext="기왕증여부(처방)"/>
  413. <Column id="mskind" type="STRING" size="256" sumtext="주부여부"/>
  414. <Column id="oldmskind" type="STRING" size="256" sumtext="변경전주부여부"/>
  415. <Column id="calcscorpnt" type="BIGDECIMAL" size="256" sumtext="수가점수"/>
  416. <Column id="estmpnt" type="BIGDECIMAL" size="256" sumtext="가산점수"/>
  417. <Column id="estmamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  418. <Column id="exitprvntdrugyn" type="STRING" size="256" sumtext="퇴장방지여부"/>
  419. <Column id="exitprvntdrugamt" type="BIGDECIMAL" size="256" sumtext="퇴장방지금액"/>
  420. <Column id="ordqty" type="BIGDECIMAL" size="256" sumtext="처방수량"/>
  421. <Column id="ordtims" type="BIGDECIMAL" size="256" sumtext="처방횟수"/>
  422. <Column id="orddays" type="INT" size="256" sumtext="처방일수"/>
  423. <Column id="pntunitcost" type="BIGDECIMAL" size="256" sumtext="점당단가"/>
  424. <Column id="payamt" type="BIGDECIMAL" size="256" sumtext="급여총진료비"/>
  425. <Column id="allownbamt" type="BIGDECIMAL" size="256" sumtext="전액본인총진료비"/>
  426. <Column id="nopyamt" type="BIGDECIMAL" size="256" sumtext="비급여총진료비"/>
  427. <Column id="payownbrate" type="BIGDECIMAL" size="256" sumtext="급여본인부담율"/>
  428. <Column id="payownbamt" type="BIGDECIMAL" size="256" sumtext="급여본인부담액"/>
  429. <Column id="payinsubamt" type="BIGDECIMAL" size="256" sumtext="급여보험자부담액"/>
  430. <Column id="paydiscamt" type="BIGDECIMAL" size="256" sumtext="급여할인금액"/>
  431. <Column id="nopydiscamt" type="BIGDECIMAL" size="256" sumtext="비급여할인금액"/>
  432. <Column id="specdiscamt" type="BIGDECIMAL" size="256" sumtext="선택진료할인금액"/>
  433. <Column id="hosoutexptresncd" type="STRING" size="256" sumtext="원내사유코드"/>
  434. <Column id="opflag" type="STRING" size="256" sumtext="수술구분"/>
  435. <Column id="bothaddyn" type="STRING" size="256" sumtext="양측구분"/>
  436. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  437. <Column id="suppkind" type="STRING" size="256" sumtext="보조유형"/>
  438. <Column id="aftercretno" type="INT" size="256" sumtext="기왕증처리용생성번호"/>
  439. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  440. <Column id="prcpno" type="INT" size="256" sumtext="처방일련번호"/>
  441. <Column id="prcphistno" type="INT" size="256" sumtext="이력번호"/>
  442. <Column id="payflagyn" type="STRING" size="256" sumtext="처방급비변경여부"/>
  443. <Column id="estmyn" type="STRING" size="256" sumtext="산정의미변경여부"/>
  444. <Column id="spcordyn" type="STRING" size="256" sumtext="선택진료변경여부"/>
  445. <Column id="nochargeyn" type="STRING" size="256" sumtext="NoCharge변경여부"/>
  446. <Column id="ordchangeyn" type="STRING" size="256" sumtext="처방유형변경여부"/>
  447. <Column id="probordchangeyn" type="STRING" size="256" sumtext="문제처방변경여부"/>
  448. <Column id="execchangeyn" type="STRING" size="256" sumtext="시행일자변경여부"/>
  449. <Column id="calcpayflag" type="STRING" size="256" sumtext="급비구분코드"/>
  450. <Column id="opansflagcd" type="STRING" size="256" sumtext="수술마취구분"/>
  451. <Column id="nigtprcpflag" type="STRING" size="256" sumtext="야간"/>
  452. <Column id="erprcpflag" type="STRING" size="256" sumtext="응급"/>
  453. <Column id="opansyn" type="STRING" size="256" sumtext="수술마취변경여부"/>
  454. <Column id="angioyn" type="STRING" size="256" sumtext="angio변경여부"/>
  455. <Column id="angioflagcd" type="STRING" size="256" sumtext="angio구분"/>
  456. <Column id="bfjudgadjtresncd" type="STRING" size="256" sumtext="이전수정사유코드"/>
  457. <Column id="gsorddryn" type="STRING" size="256" sumtext="외과가산의사여부"/>
  458. <Column id="gsorddr" type="STRING" size="256" sumtext="외과가산최초등록"/>
  459. <Column id="gsestmmncd" type="STRING" size="256" sumtext="외과가산처방확인"/>
  460. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="처방일자의 일련번호"/>
  461. <Column id="proccalctype" type="STRING" size="256" sumtext="수기료계산여부"/>
  462. <Column id="drgacptflag" type="STRING" size="256" sumtext="DRG인정구분"/>
  463. <Column id="drgacptyn" type="STRING" size="256" sumtext="DRG인정구분"/>
  464. <Column id="prcpkindcd" type="STRING" size="256" sumtext="퇴원약적용"/>
  465. <Column id="prcpcd" type="STRING" size="256"/>
  466. <Column id="prcpnm" type="STRING" size="256"/>
  467. <Column id="prcptims" type="STRING" size="256"/>
  468. <Column id="prcpdayno" type="STRING" size="256"/>
  469. <Column id="rn" type="STRING" size="256"/>
  470. <Column id="chkflag" type="STRING" size="256"/>
  471. <Column id="clinclrg" type="STRING" size="256"/>
  472. </ColumnInfo>
  473. </Dataset>
  474. <Dataset id="ds_grd_ordlist2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  475. <ColumnInfo>
  476. <Column id="status" type="STRING" size="256" sumtext="처리구분"/>
  477. <Column id="probordyn" type="STRING" size="256" sumtext="문제처방여부"/>
  478. <Column id="spcljudgyn" type="STRING" size="256" sumtext="선별심사여부"/>
  479. <Column id="unitspecyn" type="STRING" size="256" sumtext="선택진료여부"/>
  480. <Column id="seq" type="STRING" size="256" sumtext="순번"/>
  481. <Column id="ordtype" type="STRING" size="256" sumtext="I/O구분"/>
  482. <Column id="ediitem1" type="STRING" size="256" sumtext="보험대분류"/>
  483. <Column id="ediitem2" type="STRING" size="256" sumtext="보험중분류"/>
  484. <Column id="orddd" type="STRING" size="256" sumtext="처방일자"/>
  485. <Column id="execdd" type="STRING" size="256" sumtext="실시일자"/>
  486. <Column id="newexecdd" type="STRING" size="256" sumtext="변경후실시일자"/>
  487. <Column id="execrid" type="STRING" size="256" sumtext="실시자"/>
  488. <Column id="execprcpstatcd" type="STRING" size="256" sumtext="처방상태"/>
  489. <Column id="grupcalcscorcls" type="STRING" size="256" sumtext="그룹수가분류"/>
  490. <Column id="snglcalcscorcls" type="STRING" size="256" sumtext="싱글수가분류"/>
  491. <Column id="grupearncls" type="STRING" size="256" sumtext="그룹수가수익분류"/>
  492. <Column id="snglearncls" type="STRING" size="256" sumtext="싱글수가수익분류"/>
  493. <Column id="grupcalcscorcd" type="STRING" size="256" sumtext="그룹코드"/>
  494. <Column id="snglcalcscorcd" type="STRING" size="256" sumtext="싱글코드"/>
  495. <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
  496. <Column id="estmcls" type="STRING" size="256" sumtext="산정분류"/>
  497. <Column id="estmmeancd" type="STRING" size="256" sumtext="산정의미"/>
  498. <Column id="estmcd" type="STRING" size="256" sumtext="산정코드"/>
  499. <Column id="hngnm" type="STRING" size="256" sumtext="한글명"/>
  500. <Column id="calcpayflag" type="STRING" size="256" sumtext="계산급여구분"/>
  501. <Column id="matractflag" type="STRING" size="256" sumtext="재료행위구분"/>
  502. <Column id="freeflag" type="STRING" size="256" sumtext="Freeflag"/>
  503. <Column id="ansttm" type="STRING" size="256" sumtext="마취시간"/>
  504. <Column id="direccd" type="STRING" size="256" sumtext="용법"/>
  505. <Column id="appunitcost" type="BIGDECIMAL" size="256" sumtext="단가"/>
  506. <Column id="calcqty" type="BIGDECIMAL" size="256" sumtext="수량"/>
  507. <Column id="calctims" type="BIGDECIMAL" size="256" sumtext="횟수"/>
  508. <Column id="calcdays" type="INT" size="256" sumtext="일수"/>
  509. <Column id="calcamt" type="BIGDECIMAL" size="256" sumtext="금액"/>
  510. <Column id="unithospaddamt" type="BIGDECIMAL" size="256" sumtext="병원가산단가"/>
  511. <Column id="specordyn" type="STRING" size="256" sumtext="선택진료여부"/>
  512. <Column id="unitspecamt" type="BIGDECIMAL" size="256" sumtext="선택진료(특진)단가"/>
  513. <Column id="unitaddamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  514. <Column id="totordamt" type="BIGDECIMAL" size="256" sumtext="총진료비"/>
  515. <Column id="ownbamt" type="BIGDECIMAL" size="256" sumtext="본인부담금"/>
  516. <Column id="hospaddamt" type="BIGDECIMAL" size="256" sumtext="병원가산단가"/>
  517. <Column id="specamt" type="BIGDECIMAL" size="256" sumtext="선택진료(특진)단가"/>
  518. <Column id="addamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  519. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  520. <Column id="fstrgstrid" type="STRING" size="256" sumtext="입력자"/>
  521. <Column id="lastupdtrid" type="STRING" size="256" sumtext="취소자자"/>
  522. <Column id="lastupdtdt" type="STRING" size="256" sumtext="취소일시"/>
  523. <Column id="ordnm" type="STRING" size="256" sumtext="처방명"/>
  524. <Column id="judgadjtresncd" type="STRING" size="256" sumtext="수정사유코드"/>
  525. <Column id="tootfact" type="STRING" size="256" sumtext="양측구분"/>
  526. <Column id="judgadjtresncdnm" type="STRING" size="256" sumtext="수정사유명"/>
  527. <Column id="edicdflag" type="STRING" size="256" sumtext="edicdflag"/>
  528. <Column id="ediunitcost" type="BIGDECIMAL" size="256" sumtext="edi단가"/>
  529. <Column id="updtdd" type="STRING" size="256" sumtext="코드적용일자"/>
  530. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  531. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  532. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  533. <Column id="calcseqno" type="INT" size="256" sumtext="계산순번"/>
  534. <Column id="calcscorseqno" type="INT" size="256" sumtext="수가별 일련번호"/>
  535. <Column id="cnfmcd" type="STRING" size="256" sumtext="확인코드"/>
  536. <Column id="cpflag" type="STRING" size="256" sumtext="CP처방여부"/>
  537. <Column id="prnprcpflag" type="STRING" size="256" sumtext="PRN처방여부"/>
  538. <Column id="portprcpflag" type="STRING" size="256" sumtext="포터블처방여부"/>
  539. <Column id="anamneflag" type="STRING" size="256" sumtext="기왕증여부(처방)"/>
  540. <Column id="mskind" type="STRING" size="256" sumtext="주부여부"/>
  541. <Column id="oldmskind" type="STRING" size="256" sumtext="변경전주부여부"/>
  542. <Column id="calcscorpnt" type="BIGDECIMAL" size="256" sumtext="수가점수"/>
  543. <Column id="estmpnt" type="BIGDECIMAL" size="256" sumtext="가산점수"/>
  544. <Column id="estmamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  545. <Column id="exitprvntdrugyn" type="STRING" size="256" sumtext="퇴장방지여부"/>
  546. <Column id="exitprvntdrugamt" type="BIGDECIMAL" size="256" sumtext="퇴장방지금액"/>
  547. <Column id="ordqty" type="BIGDECIMAL" size="256" sumtext="처방수량"/>
  548. <Column id="ordtims" type="BIGDECIMAL" size="256" sumtext="처방횟수"/>
  549. <Column id="orddays" type="INT" size="256" sumtext="처방일수"/>
  550. <Column id="pntunitcost" type="BIGDECIMAL" size="256" sumtext="점당단가"/>
  551. <Column id="payamt" type="BIGDECIMAL" size="256" sumtext="급여총진료비"/>
  552. <Column id="allownbamt" type="BIGDECIMAL" size="256" sumtext="전액본인총진료비"/>
  553. <Column id="nopyamt" type="BIGDECIMAL" size="256" sumtext="비급여총진료비"/>
  554. <Column id="payownbrate" type="BIGDECIMAL" size="256" sumtext="급여본인부담율"/>
  555. <Column id="payownbamt" type="BIGDECIMAL" size="256" sumtext="급여본인부담액"/>
  556. <Column id="payinsubamt" type="BIGDECIMAL" size="256" sumtext="급여보험자부담액"/>
  557. <Column id="paydiscamt" type="BIGDECIMAL" size="256" sumtext="급여할인금액"/>
  558. <Column id="nopydiscamt" type="BIGDECIMAL" size="256" sumtext="비급여할인금액"/>
  559. <Column id="specdiscamt" type="BIGDECIMAL" size="256" sumtext="선택진료할인금액"/>
  560. <Column id="hosoutexptresncd" type="STRING" size="256" sumtext="원내사유코드"/>
  561. <Column id="opflag" type="STRING" size="256" sumtext="수술구분"/>
  562. <Column id="bothaddyn" type="STRING" size="256" sumtext="양측구분"/>
  563. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  564. <Column id="suppkind" type="STRING" size="256" sumtext="보조유형"/>
  565. <Column id="aftercretno" type="INT" size="256" sumtext="기왕증처리용생성번호"/>
  566. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  567. <Column id="prcpno" type="INT" size="256" sumtext="처방일련번호"/>
  568. <Column id="prcphistno" type="INT" size="256" sumtext="이력번호"/>
  569. <Column id="payflagyn" type="STRING" size="256" sumtext="처방급비변경여부"/>
  570. <Column id="estmyn" type="STRING" size="256" sumtext="산정의미변경여부"/>
  571. <Column id="spcordyn" type="STRING" size="256" sumtext="선택진료변경여부"/>
  572. <Column id="nochargeyn" type="STRING" size="256" sumtext="NoCharge변경여부"/>
  573. <Column id="ordchangeyn" type="STRING" size="256" sumtext="처방유형변경여부"/>
  574. <Column id="probordchangeyn" type="STRING" size="256" sumtext="문제처방변경여부"/>
  575. <Column id="execchangeyn" type="STRING" size="256" sumtext="시행일자변경여부"/>
  576. <Column id="calcpayflag" type="STRING" size="256" sumtext="급비구분코드"/>
  577. <Column id="opansflagcd" type="STRING" size="256" sumtext="수술마취구분"/>
  578. <Column id="nigtprcpflag" type="STRING" size="256" sumtext="야간"/>
  579. <Column id="erprcpflag" type="STRING" size="256" sumtext="응급"/>
  580. <Column id="opansyn" type="STRING" size="256" sumtext="수술마취변경여부"/>
  581. <Column id="angioyn" type="STRING" size="256" sumtext="angio변경여부"/>
  582. <Column id="angioflagcd" type="STRING" size="256" sumtext="angio구분"/>
  583. <Column id="bfjudgadjtresncd" type="STRING" size="256" sumtext="이전수정사유코드"/>
  584. <Column id="gsorddryn" type="STRING" size="256" sumtext="외과가산의사여부"/>
  585. <Column id="gsorddr" type="STRING" size="256" sumtext="외과가산최초등록"/>
  586. <Column id="gsestmmncd" type="STRING" size="256" sumtext="외과가산처방확인"/>
  587. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="처방일자의 일련번호"/>
  588. <Column id="proccalctype" type="STRING" size="256" sumtext="수기료계산여부"/>
  589. <Column id="drgacptflag" type="STRING" size="256" sumtext="DRG인정구분"/>
  590. <Column id="drgacptyn" type="STRING" size="256" sumtext="DRG인정구분"/>
  591. <Column id="prcpkindcd" type="STRING" size="256" sumtext="퇴원약적용"/>
  592. <Column id="prcpcd" type="STRING" size="256"/>
  593. <Column id="prcpnm" type="STRING" size="256"/>
  594. <Column id="prcptims" type="STRING" size="256"/>
  595. <Column id="prcpdayno" type="STRING" size="256"/>
  596. <Column id="rn" type="STRING" size="256"/>
  597. <Column id="chkflag" type="STRING" size="256"/>
  598. </ColumnInfo>
  599. </Dataset>
  600. <Dataset id="ds_datagrid1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  601. <ColumnInfo>
  602. <Column id="mskind" type="STRING"/>
  603. <Column id="insukind" type="STRING"/>
  604. <Column id="suppkind" type="STRING"/>
  605. <Column id="fromdd" type="STRING"/>
  606. <Column id="todd" type="STRING"/>
  607. <Column id="cretno" type="STRING"/>
  608. </ColumnInfo>
  609. </Dataset>
  610. <Dataset id="ds_popupmenu_iscl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  611. <ColumnInfo>
  612. <Column id="label" type="STRING" size="256"/>
  613. <Column id="func" type="STRING" size="256"/>
  614. <Column id="level" type="STRING" size="256"/>
  615. </ColumnInfo>
  616. <Rows>
  617. <Row>
  618. <Col id="label">처방유형변경(기왕증)</Col>
  619. <Col id="func">fOrdChangeInsukind</Col>
  620. </Row>
  621. </Rows>
  622. </Dataset>
  623. <Dataset id="ds_init_P0153list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  624. <Dataset id="ds_init_M0006list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  625. <Dataset id="ds_init_M0007list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  626. <Dataset id="ds_init_M0008list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  627. <Dataset id="ds_arg_temp" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  628. <ColumnInfo>
  629. <Column id="pid" type="STRING" size="256"/>
  630. <Column id="indd" type="STRING" size="256"/>
  631. <Column id="mskind" type="STRING" size="256"/>
  632. <Column id="cretno" type="STRING" size="256"/>
  633. <Column id="insukindcd" type="STRING" size="256"/>
  634. <Column id="suppkindcd" type="STRING" size="256"/>
  635. <Column id="calcscorcd" type="STRING" size="256"/>
  636. <Column id="execddyn" type="STRING" size="256"/>
  637. <Column id="execfromdd" type="STRING" size="256"/>
  638. <Column id="exectodd" type="STRING" size="256"/>
  639. <Column id="prcpfromdd" type="STRING" size="256"/>
  640. <Column id="prcptodd" type="STRING" size="256"/>
  641. <Column id="chksave" type="STRING" size="256"/>
  642. <Column id="dschjudgprcsstat" type="STRING" size="256"/>
  643. </ColumnInfo>
  644. <Rows>
  645. <Row/>
  646. </Rows>
  647. </Dataset>
  648. <Dataset id="ds_rdo_choicdsrch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  649. <ColumnInfo>
  650. <Column id="label" type="STRING" size="256"/>
  651. <Column id="value" type="STRING" size="256"/>
  652. </ColumnInfo>
  653. <Rows>
  654. <Row>
  655. <Col id="label">수가</Col>
  656. <Col id="value">calcscorcd</Col>
  657. </Row>
  658. <Row>
  659. <Col id="label">EDI</Col>
  660. <Col id="value">edicd</Col>
  661. </Row>
  662. <Row>
  663. <Col id="label">명칭</Col>
  664. <Col id="value">hngnm</Col>
  665. </Row>
  666. </Rows>
  667. </Dataset>
  668. <Dataset id="ds_rdo_selectedRdoItem" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  669. <ColumnInfo>
  670. <Column id="label" type="STRING" size="256"/>
  671. <Column id="value" type="STRING" size="256"/>
  672. <Column id="font" type="STRING" size="256"/>
  673. </ColumnInfo>
  674. <Rows>
  675. <Row>
  676. <Col id="label">전체</Col>
  677. <Col id="value">-</Col>
  678. </Row>
  679. <Row>
  680. <Col id="label">진찰</Col>
  681. <Col id="value">01</Col>
  682. </Row>
  683. <Row>
  684. <Col id="label">입원</Col>
  685. <Col id="value">02</Col>
  686. </Row>
  687. <Row>
  688. <Col id="label">투약</Col>
  689. <Col id="value">03</Col>
  690. </Row>
  691. <Row>
  692. <Col id="label">주사</Col>
  693. <Col id="value">04</Col>
  694. </Row>
  695. <Row>
  696. <Col id="label">마취</Col>
  697. <Col id="value">05</Col>
  698. </Row>
  699. <Row>
  700. <Col id="label">이학</Col>
  701. <Col id="value">06</Col>
  702. </Row>
  703. <Row>
  704. <Col id="label">정신</Col>
  705. <Col id="value">07</Col>
  706. </Row>
  707. <Row>
  708. <Col id="label">수술</Col>
  709. <Col id="value">08</Col>
  710. </Row>
  711. <Row>
  712. <Col id="label">검사</Col>
  713. <Col id="value">09</Col>
  714. </Row>
  715. <Row>
  716. <Col id="label">방사선</Col>
  717. <Col id="value">10</Col>
  718. </Row>
  719. <Row>
  720. <Col id="label">특수</Col>
  721. <Col id="value">SS</Col>
  722. </Row>
  723. </Rows>
  724. </Dataset>
  725. <Dataset id="ds_main_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  726. <ColumnInfo>
  727. <Column id="pid" type="STRING" size="256"/>
  728. <Column id="indd" type="STRING" size="256"/>
  729. <Column id="mskind" type="STRING" size="256"/>
  730. <Column id="ownbrate" type="STRING" size="256"/>
  731. <Column id="insukindcd" type="STRING" size="256"/>
  732. <Column id="insukind" type="STRING" size="256"/>
  733. <Column id="suppkindcd" type="STRING" size="256"/>
  734. <Column id="suppkind" type="STRING" size="256"/>
  735. <Column id="fromdd" type="STRING" size="256"/>
  736. <Column id="todd" type="STRING" size="256"/>
  737. <Column id="orddeptcd" type="STRING" size="256"/>
  738. <Column id="atdoc" type="STRING" size="256"/>
  739. <Column id="anamne" type="STRING" size="256"/>
  740. <Column id="ordlist" type="STRING" size="256"/>
  741. <Column id="calcscorcd" type="STRING" size="256"/>
  742. <Column id="choicdsrch" type="STRING" size="256"/>
  743. <Column id="execddyn" type="STRING" size="256"/>
  744. <Column id="execfromdd" type="STRING" size="256"/>
  745. <Column id="exectodd" type="STRING" size="256"/>
  746. <Column id="prcpfromdd" type="STRING" size="256"/>
  747. <Column id="prcptodd" type="STRING" size="256"/>
  748. <Column id="cretno" type="STRING" size="256"/>
  749. </ColumnInfo>
  750. <Rows>
  751. <Row>
  752. <Col id="choicdsrch">calcscorcd</Col>
  753. </Row>
  754. </Rows>
  755. </Dataset>
  756. <Dataset id="ds_hidden_smpic00200" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  757. <ColumnInfo>
  758. <Column id="con2_gsflag" type="STRING" size="256"/>
  759. <Column id="con3_search1" type="STRING" size="256"/>
  760. <Column id="srchdrugcd" type="STRING" size="256"/>
  761. <Column id="con1_dd" type="STRING" size="256"/>
  762. <Column id="con5_insu" type="STRING" size="256"/>
  763. </ColumnInfo>
  764. <Rows>
  765. <Row/>
  766. </Rows>
  767. </Dataset>
  768. <Dataset id="ds_popupmenu_iscl2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  769. <ColumnInfo>
  770. <Column id="label" type="STRING" size="256"/>
  771. <Column id="func" type="STRING" size="256"/>
  772. <Column id="level" type="STRING" size="256"/>
  773. </ColumnInfo>
  774. <Rows>
  775. <Row>
  776. <Col id="label">삭제</Col>
  777. <Col id="func">fOrdChangeInsukinDdelete</Col>
  778. <Col id="level">0</Col>
  779. </Row>
  780. </Rows>
  781. </Dataset>
  782. <Dataset id="ds_hidden_list1_isclsrch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  783. <Dataset id="ds_grd_insuhistory" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  784. <Dataset id="ds_temp_afterchk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  785. <ColumnInfo>
  786. <Column id="afterchk" type="STRING" size="256"/>
  787. <Column id="chkyn" type="STRING" size="256"/>
  788. </ColumnInfo>
  789. <Rows>
  790. <Row>
  791. <Col id="afterchk">N</Col>
  792. <Col id="chkyn">N</Col>
  793. </Row>
  794. </Rows>
  795. </Dataset>
  796. </Objects>
  797. <Bind>
  798. <BindItem id="item0" compid="group3.group2.ipt_cd" propid="value" datasetid="ds_main_send" columnid="calcscorcd"/>
  799. <BindItem id="item1" compid="group3.group2.checkbox1" propid="value" datasetid="ds_main_send" columnid="execddyn"/>
  800. <BindItem id="item2" compid="group3.group2.ipt_fromdd" propid="value" datasetid="ds_main_send" columnid="prcpfromdd"/>
  801. <BindItem id="item3" compid="group3.group2.ipt_todd" propid="value" datasetid="ds_main_send" columnid="prcptodd"/>
  802. <BindItem id="item4" compid="group3.group2.input2" propid="value" datasetid="ds_main_send" columnid="execfromdd"/>
  803. <BindItem id="item5" compid="group3.group2.input1" propid="value" datasetid="ds_main_send" columnid="exectodd"/>
  804. </Bind>
  805. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  806. * System Name :
  807. * Job Name :
  808. * Creator :
  809. * Make Date : 2016-05-24
  810. * Description :
  811. *---------------------------------------------------------------------------------------
  812. * Modify Date Modifier Modify Description
  813. *---------------------------------------------------------------------------------------
  814. * 2016-05-24 Live Converter TF->XP
  815. *
  816. *---------------------------------------------------------------------------------------
  817. ****************************************************************************************/
  818. include "com_commonxp::comm_main.xjs";
  819. include "pam_pamcomnxp::PAM.xjs";
  820. include "pam_pamcomnxp::PAM001.xjs";
  821. include "pam_insucomxp::PAM.xjs";
  822. function SPPIJ02501_oninit(obj:Form, e:InitEventInfo)
  823. {
  824. frmf_initForm(obj);
  825. }
  826. function SPPIJ02501_onload(obj:Form, e:LoadEventInfo)
  827. {
  828. grdf_initGrid(group3.grd_ordlist);
  829. grdf_setRowTypeIcon(group3.grd_ordlist, 0);
  830. grdf_initGrid(group3.grd_ordlist2);
  831. grdf_setRowTypeIcon(group3.grd_ordlist2, 0);
  832. fInitialize();
  833. }
  834. //닫기
  835. function button1_onclick(obj:Button, e:ClickEventInfo)
  836. {
  837. this.close();
  838. }
  839. //초기화
  840. function fInitialize(){
  841. pamGetDeptCDDrIDList();
  842. var arrParam = [{dsNm: "ds_init_P0153list", cdGrpId: "P0153", showValue: false}
  843. ,{dsNm: "ds_init_M0006list", cdGrpId: "M0006", showValue: false}
  844. ,{dsNm: "ds_init_M0007list", cdGrpId: "M0007", showValue: false}
  845. ,{dsNm: "ds_init_M0008list", cdGrpId: "M0008", showValue: false}]
  846. appf_getCodeList(arrParam);
  847. ds_arg_temp.setColumn(0, "pid", arg_ds_temp.getColumn(0, "pid"));
  848. ds_arg_temp.setColumn(0, "indd", arg_ds_temp.getColumn(0, "indd"));
  849. ds_arg_temp.setColumn(0, "mskind", arg_ds_temp.getColumn(0, "mskind"));
  850. ds_arg_temp.setColumn(0, "cretno", arg_ds_temp.getColumn(0, "cretno"));
  851. ds_arg_temp.setColumn(0, "prcpfromdd", arg_ds_temp.getColumn(0, "prcpfromdd"));
  852. ds_arg_temp.setColumn(0, "prcptodd", arg_ds_temp.getColumn(0, "prcptodd"));
  853. ds_arg_temp.setColumn(0, "exectodd", arg_ds_temp.getColumn(0, "exectodd"));
  854. ds_arg_temp.setColumn(0, "execfromdd", arg_ds_temp.getColumn(0, "execfromdd"));
  855. ds_arg_temp.setColumn(0, "dschjudgprcsstat", arg_ds_temp.getColumn(0, "dschjudgprcsstat"));
  856. ds_arg_temp.setColumn(0, "chksave", arg_ds_temp.getColumn(0, "chksave"));
  857. ds_main_send.setColumn(0, "pid", ds_arg_temp.getColumn(0, "pid"));
  858. ds_main_send.setColumn(0, "indd", ds_arg_temp.getColumn(0, "indd"));
  859. ds_main_send.setColumn(0, "mskind", ds_arg_temp.getColumn(0, "mskind"));
  860. ds_main_send.setColumn(0, "cretno", ds_arg_temp.getColumn(0, "cretno"));
  861. ds_main_send.setColumn(0, "prcpfromdd", ds_arg_temp.getColumn(0, "prcpfromdd"));
  862. ds_main_send.setColumn(0, "prcptodd", ds_arg_temp.getColumn(0, "prcptodd"));
  863. ds_main_send.setColumn(0, "exectodd", ds_arg_temp.getColumn(0, "exectodd"));
  864. ds_main_send.setColumn(0, "execfromdd", ds_arg_temp.getColumn(0, "execfromdd"));
  865. var dschjudgprcsstat = ds_arg_temp.getColumn(0, "dschjudgprcsstat");
  866. var chksave = ds_arg_temp.getColumn(0, "chksave");
  867. if(dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || chksave == "Y"){
  868. btn_changeinsukind.visible = false;
  869. }else{
  870. btn_changeinsukind.visible = true;
  871. }
  872. dsf_createDsRow("ds_send" ,[{col: "pid", val: ds_arg_temp.getColumn(0, "pid")}
  873. , {col: "indd", val: ds_arg_temp.getColumn(0, "indd")}
  874. , {col: "indd1", val : ""}
  875. , {col: "cretno", val : ds_arg_temp.getColumn(0, "cretno")}
  876. , {col: "mskind", val : ds_arg_temp.getColumn(0, "mskind")}
  877. , {col: "instcd", val : sysf_getUserInfo("dutplceinstcd")}
  878. , {col: "basedd", val : utlf_getCurrentDate()}]);
  879. var oParam = {};
  880. oParam.id = "TRPIJ00309";
  881. oParam.service = "bfjudgapp.InHospJudg";
  882. oParam.method = "reqGetInsuList";
  883. oParam.inds = "req=ds_send";
  884. oParam.outds = "ds_datagrid1=insulist";
  885. oParam.async = false;
  886. //oParam.callback = "cf_TRPIJ00309";
  887. tranf_submit(oParam);
  888. ds_grd_insuhistory.copyData(ds_datagrid1);
  889. ds_grd_insuhistory.rowposition = -1;
  890. ds_datagrid1.rowposition = -1;
  891. group3.datagrid1.setFormatRowProperty(0, "size", 0 );
  892. fGetIsclList();
  893. }
  894. function fGetIsclList(){
  895. ds_grd_ordlist.clearData();
  896. ds_grd_ordlist2.clearData();
  897. var oParam = {};
  898. oParam.id = "TRPIJ00410";
  899. oParam.service = "bfjudgapp.InHospJudgDetl";
  900. oParam.method = "reqGetChangeMskind";
  901. oParam.inds = "req=ds_main_send";
  902. oParam.outds = "ds_grd_ordlist=iscl";
  903. oParam.async = false;
  904. //oParam.callback = "cf_TRPIJ00410";
  905. tranf_submit(oParam);
  906. ds_grd_ordlist.updatecontrol = false;
  907. for(var i=0; i<ds_grd_ordlist.rowcount; i++){
  908. ds_grd_ordlist.setColumn(i, "oldmskind", ds_grd_ordlist.getColumn(i, "mskind"));
  909. ds_grd_ordlist.setColumn(i, "newexecdd", ds_grd_ordlist.getColumn(i, "execdd"));
  910. ds_grd_ordlist.setColumn(i, "proccalctype", "S");
  911. ds_grd_ordlist.setColumn(i, "chkflag", "N");
  912. }
  913. ds_grd_ordlist.updatecontrol = true;
  914. fSetItemBold();
  915. }
  916. function fSetItemBold(){
  917. for (var i=0; i < ds_rdo_selectedRdoItem.rowcount; i++) {
  918. if (ds_rdo_selectedRdoItem.getColumn(i,"value") == ds_grd_ordlist.lookup("clinclrg",ds_rdo_selectedRdoItem.getColumn(i,"value"),"clinclrg")) {
  919. ds_rdo_selectedRdoItem.setColumn(i, "font", "Dotum,9, bold");
  920. } else {
  921. ds_rdo_selectedRdoItem.setColumn(i, "font", "");
  922. }
  923. }
  924. }
  925. function fChkUpdateData(){
  926. var flag = true;
  927. for(var i=0; i< ds_grd_ordlist.rowcount; i++){
  928. var status = ds_grd_ordlist.getRowType(i);
  929. if(status != 2){
  930. flag = false;
  931. }
  932. }
  933. }
  934. function group3_group8_rdo_ordfilflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  935. {
  936. if (utlf_isNull(obj.value) || obj.value == "-") { // 전체
  937. ds_grd_ordlist.filterstr = "";
  938. } else {
  939. ds_grd_ordlist.filterstr = "clinclrg == '"+obj.value+"'";
  940. }
  941. }
  942. //수가조회버튼
  943. function group3_group2_btn_cd_onclick(obj:Button, e:ClickEventInfo)
  944. {
  945. ds_hidden_smpic00200.setColumn(0, "con2_gsflag", "S");
  946. ds_hidden_smpic00200.setColumn(0, "con3_search1", group3.group2.rdo_mchrgcode.value);
  947. ds_hidden_smpic00200.setColumn(0, "srchdrugcd", group3.group2.ipt_cd.value);
  948. ds_hidden_smpic00200.setColumn(0, "con1_dd", utlf_getCurrentDate());
  949. var insukindcd = ds_main_send.getColumn(0, "insukindcd");
  950. if(insukindcd == "11"){
  951. ds_hidden_smpic00200.setColumn(0, "con5_insu", "insu");
  952. }
  953. else if(insukindcd == "21" || insukindcd == "22"){
  954. ds_hidden_smpic00200.setColumn(0, "con5_insu", "proc");
  955. }
  956. else if (insukindcd == "31"){
  957. ds_hidden_smpic00200.setColumn(0, "con5_insu", "indus");
  958. }
  959. else if (insukindcd == "41") {
  960. ds_hidden_smpic00200.setColumn(0, "con5_insu", "autm");
  961. }
  962. var objArgs = new Object();
  963. objArgs.arg_ds_temp = ds_hidden_smpic00200;
  964. var objRtn = frmf_modal("SMPIC00200", "SMPIC00200", objArgs, "", "", "", "", "", "", "", "", "", "M");
  965. if (ds_temp_mech.rowcount == 0){
  966. var vprcpcd = ds_temp_mech.getColumn(0,"calcscorcd");
  967. var vprcpnm = ds_temp_mech.getColumn(0,"hngnm");
  968. ds_main_send.setColumn(0, "calcscorcd", vprcpcd);
  969. ds_temp_mech.clearData();
  970. }
  971. }
  972. function group3_grd_ordlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  973. {
  974. pmn_menu1.trackPopup(e.screenX,e.screenY);
  975. }
  976. function pmn_menu1_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
  977. {
  978. eval(e.id +"();");
  979. }
  980. function group3_grd_ordlist2_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  981. {
  982. pmn_menu2.trackPopup(e.screenX,e.screenY);
  983. }
  984. function pmn_menu2_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
  985. {
  986. eval(e.id +"();");
  987. }
  988. function pmn_menu2_onmouseleave(obj:PopupMenu, e:MenuMouseEventInfo)
  989. {
  990. obj.closePopup();
  991. }
  992. //상단 마우스 오른쪽 버튼
  993. function fOrdChangeInsukind(){
  994. var SelectedRows = grdf_getSelectedRows(group3.grd_ordlist);
  995. for(var i=SelectedRows.length-1; i > -1; i--){
  996. var cRrow = SelectedRows[i];
  997. var maxcnt = ds_grd_ordlist2.addRow();
  998. ds_grd_ordlist.setColumn(cRrow, "chkflag", "Y");
  999. var rn = ds_grd_ordlist.getColumn(cRrow, "rn");
  1000. ds_grd_ordlist2.copyRow(maxcnt, ds_grd_ordlist, cRrow);
  1001. ds_grd_ordlist.deleteRow(cRrow);
  1002. }
  1003. }
  1004. //하단 마우스 오른쪽 버튼
  1005. function fOrdChangeInsukinDdelete(){
  1006. ds_grd_ordlist2.deleteRow(ds_grd_ordlist2.rowposition);
  1007. }
  1008. //조회
  1009. function group3_group2_btn_srch_onclick(obj:Button, e:ClickEventInfo)
  1010. {
  1011. var cond = ds_main_send.getColumn(0, "choicdsrch");
  1012. var calcscorcd = ds_main_send.getColumn(0, "calcscorcd");
  1013. if(!utlf_isNull(calcscorcd)){
  1014. switch(cond){
  1015. case 'calcscorcd' :
  1016. if(group3.group2.ipt_cd.getLength < 2){
  1017. sysf_messageBox("수가코드는 2자리 이상", "C001");
  1018. return ;
  1019. }
  1020. break;
  1021. case 'edicd' :
  1022. if(group3.group2.ipt_cd.getLength < 1){
  1023. sysf_messageBox("EDI코드는 2자리 이상", "C001");
  1024. return ;
  1025. }
  1026. break;
  1027. case 'hngnm' :
  1028. if(group3.group2.ipt_cd.getLength < 2){
  1029. sysf_messageBox("수가명칭는 2자리 이상", "C001");
  1030. return ;
  1031. }
  1032. break;
  1033. default :
  1034. return ;
  1035. break;
  1036. }
  1037. }
  1038. fGetIsclList();
  1039. }
  1040. function group3_datagrid1_oncellclick(obj:Grid, e:GridClickEventInfo)
  1041. {
  1042. var rowcnt = ds_datagrid1.rowposition;
  1043. var mskind = ds_datagrid1.getColumn(rowcnt, "mskind");
  1044. var fromdd = ds_datagrid1.getColumn(rowcnt, "fromdd");
  1045. var todd = ds_datagrid1.getColumn(rowcnt, "todd");
  1046. var insukind = ds_datagrid1.getColumn(rowcnt, "insukind");
  1047. var suppkind = ds_datagrid1.getColumn(rowcnt, "suppkind");
  1048. var cretno = ds_datagrid1.getColumn(rowcnt, "cretno");
  1049. var seqno = ds_datagrid1.getColumn(rowcnt, "seqno");
  1050. ds_main_send.setColumn(0, "mskind", mskind);
  1051. ds_main_send.setColumn(0, "fromdd", fromdd);
  1052. ds_main_send.setColumn(0, "todd", todd);
  1053. ds_main_send.setColumn(0, "insukind", insukind);
  1054. ds_main_send.setColumn(0, "suppkind", suppkind);
  1055. ds_main_send.setColumn(0, "cretno", cretno);
  1056. ds_main_send.setColumn(0, "execfromdd", fromdd);
  1057. ds_main_send.setColumn(0, "exectodd", todd);
  1058. ds_main_send.setColumn(0, "prcpfromdd", fromdd);
  1059. ds_main_send.setColumn(0, "prcptodd", todd);
  1060. fGetIsclList();
  1061. }
  1062. //변경
  1063. function btn_changeinsukind_onclick(obj:Button, e:ClickEventInfo)
  1064. {
  1065. var rowcnt = ds_grd_insuhistory.rowposition
  1066. var mskind = ds_grd_insuhistory.getColumn(rowcnt, "mskind");
  1067. ds_main_send.setColumn(0, "anamne", "Y");
  1068. var cretno = 0;
  1069. if(utlf_isNull(mskind)){
  1070. sysf_messageBox("setp3. 처방유형변경을", "C002");
  1071. return false;
  1072. }
  1073. cretno = ds_grd_insuhistory.getColumn(rowcnt, "cretno");
  1074. for(var i=0; i < ds_grd_ordlist2.rowcount; i++){
  1075. var cRrow = i;
  1076. var prcpdd1 = ds_grd_ordlist2.getColumn(cRrow, "prcpdd");
  1077. var prcpno1 = ds_grd_ordlist2.getColumn(cRrow, "prcpno");
  1078. var prcphistno1 = ds_grd_ordlist2.getColumn(cRrow, "prcphistno");
  1079. var messageYn = "N";
  1080. var samecalclist = new Array();
  1081. var index = 0;
  1082. for(var j=0; j<ds_grd_ordlist2.rowcount; j++){
  1083. var chkflag = ds_grd_ordlist2.getColumn(j, "chkflag");
  1084. var prcpdd2 = ds_grd_ordlist2.getColumn(j, "prcpdd");
  1085. var prcpno2 = ds_grd_ordlist2.getColumn(j, "prcpno");
  1086. var prcphistno2 = ds_grd_ordlist2.getColumn(j, "prcphistno");
  1087. if(chkflag == "N" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2){
  1088. messageYn = "Y";
  1089. samecalclist[index++] = j;
  1090. }
  1091. }
  1092. if(messageYn == "Y"){
  1093. if(sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001") == 6){
  1094. ds_grd_ordlist2.setColumn(cRrow, "cretno", cretno);
  1095. ds_grd_ordlist2.setColumn(cRrow, "mskind", mskind);
  1096. ds_grd_ordlist2.setColumn(cRrow, "ordchangeyn", "Y");
  1097. var arow = new Array();
  1098. arow[0] = cRrow;
  1099. grdf_setStatus(group3.grd_ordlist2, "U", arow);
  1100. }
  1101. }
  1102. else{
  1103. var arow = new Array();
  1104. arow[0] = cRrow;
  1105. grdf_setStatus(group3.grd_ordlist2, "U", arow);
  1106. ds_grd_ordlist2.setColumn(cRrow, "aftercretno", cretno);
  1107. ds_grd_ordlist2.setColumn(cRrow, "mskind", mskind);
  1108. ds_grd_ordlist2.setColumn(cRrow, "ordchangeyn", "Y");
  1109. }
  1110. }
  1111. var updtdata = grdf_getGridUpdateData(group3.grd_ordlist2);
  1112. if(updtdata.rowcount == 0){
  1113. sysf_messageBox("변경된 데이터가","I004");
  1114. return;
  1115. }
  1116. if(sysf_messageBox("변경 및 재계산", "S001") == 6){
  1117. dsf_createDsRow("ds_temp", [{col:"proccalctypeap", type:"STRING", size:256, val :"A"}]);
  1118. var oParam = {};
  1119. oParam.id = "TXPIJ00401";
  1120. oParam.service = "bfjudgapp.InHospJudgDetl";
  1121. oParam.method = "reqExeSaveIscl";
  1122. oParam.inds = "reqporc=ds_temp req=ds_grd_ordlist2:U reqafterchk=ds_temp_afterchk";
  1123. oParam.outds = "";
  1124. oParam.async = false;
  1125. oParam.callback = "cf_TXPIJ00401";
  1126. tranf_submit(oParam);
  1127. }
  1128. }
  1129. function cf_TXPIJ00401(sSvcId, nErrorCode, sErrorMsg) {
  1130. if(nErrorCode < 0) return;
  1131. fGetIsclList();
  1132. sysf_messageBox("변경 및 재계산이","I002");
  1133. }]]></Script>
  1134. </Form>
  1135. </FDL>