SMPMC03000_수진진료비내역관리.xfdl 48 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993
  1. <?xml version="1.0" encoding="utf-8" standalone="no"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPMC03000" position="absolute 0 0 1221 1024" titletext="수진진료비내역" onload="SMPMC03000_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div id="group1" position="absolute 0 0 1194 25" style="">
  8. <Layouts>
  9. <Layout>
  10. <Static id="caption6" class="tit_1" position="absolute 0 0 193 23" style="" text="수진내역 진료비 내역 구분"/>
  11. </Layout>
  12. </Layouts>
  13. </Div>
  14. <Div id="group3" position="absolute 0 13 1195 725" style="">
  15. <Layouts>
  16. <Layout>
  17. <Static id="caption2" class="tit_2" position="absolute 5 51 147 68" style="align:left middle;font:Dotum,9, bold;" text="외래/입원 내원내역"/>
  18. <Shape id="line8" class="line_10" linetype="horizontal" position="absolute 0 68 1194 72" style="" anchor="default"/>
  19. <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 250 1194 254" style="" anchor="default"/>
  20. <Static id="caption3" class="tit_2" position="absolute 5 233 155 249" style="align:left middle;font:Dotum,9, bold;" text="진료비상세내역"/>
  21. <Div id="group4" position="absolute 0 685 1194 712" style="">
  22. <Layouts>
  23. <Layout>
  24. <Button id="button2" class="btn4" position="absolute 1079 5 1135 27" style="" text="출력" onclick="group3_group4_button2_onclick"/>
  25. <Button id="button3" class="btn4" position="absolute 1138 5 1194 27" style="" text="닫기" onclick="group3_group4_button3_onclick"/>
  26. <Shape id="line3" class="line_6" linetype="horizontal" position="absolute 0 0 1194 3" style="" anchor="default"/>
  27. <Button id="button5" class="btn4" position="absolute 1020 5 1076 27" style="" text="저장" onclick="group3_group4_button5_onclick"/>
  28. </Layout>
  29. </Layouts>
  30. </Div>
  31. <Grid id="grd_chosspec" binddataset="ds_main_list1_chosreclist" position="absolute 0 72 1194 229" style="" oncelldblclick="group3_grd_chosspec_oncelldblclick">
  32. <Formats>
  33. <Format id="default">
  34. <Columns>
  35. <Column size="24"/>
  36. <Column size="35"/>
  37. <Column size="58"/>
  38. <Column size="90"/>
  39. <Column size="90"/>
  40. <Column size="100"/>
  41. <Column size="90"/>
  42. <Column size="90"/>
  43. <Column size="90"/>
  44. <Column size="120"/>
  45. <Column size="100"/>
  46. <Column size="100"/>
  47. <Column size="100"/>
  48. <Column size="162"/>
  49. <Column size="0"/>
  50. <Column size="0"/>
  51. <Column size="0"/>
  52. <Column size="0"/>
  53. <Column size="0"/>
  54. <Column size="0"/>
  55. <Column size="0"/>
  56. </Columns>
  57. <Rows>
  58. <Row size="25" band="head"/>
  59. <Row size="25"/>
  60. </Rows>
  61. <Band id="head">
  62. <Cell/>
  63. <Cell col="1" text="선택"/>
  64. <Cell col="2" text="구분"/>
  65. <Cell col="3" text="환자번호"/>
  66. <Cell col="4" text="환자성명"/>
  67. <Cell col="5" text="진료과"/>
  68. <Cell col="6" text="전문의"/>
  69. <Cell col="7" text="진료_입원일자"/>
  70. <Cell col="8" text="퇴원일자"/>
  71. <Cell col="9" text="진료비총액"/>
  72. <Cell col="10" text="본인부담금"/>
  73. <Cell col="11" text="할인금액"/>
  74. <Cell col="12" text="실부담금"/>
  75. <Cell col="13" text="상병명"/>
  76. <Cell col="14" text="공문접수일"/>
  77. <Cell col="15" text="공문생성번호"/>
  78. <Cell col="16" text="rcptdd"/>
  79. <Cell col="17" text="rcptno"/>
  80. <Cell col="18" text="rcptseqno"/>
  81. <Cell col="19" text="cretno"/>
  82. <Cell col="20" text="mskind"/>
  83. </Band>
  84. <Band id="body">
  85. <Cell expr="currow + 1"/>
  86. <Cell col="1" displaytype="checkbox" text="bind:patspecyn"/>
  87. <Cell col="2" displaytype="combo" style="align:center middle;" text="bind:ioflag" combodataset="ds_init_P0001list_P0001" combocodecol="cdid" combodatacol="cdnm"/>
  88. <Cell col="3" style="align:left middle;" text="bind:pid"/>
  89. <Cell col="4" style="align:left middle;" text="bind:hngnm"/>
  90. <Cell col="5" style="align:left middle;" text="bind:orddeptnm"/>
  91. <Cell col="6" style="align:left middle;" text="bind:orddrnm"/>
  92. <Cell col="7" displaytype="date" text="bind:ordindd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
  93. <Cell col="8" displaytype="date" text="bind:dschdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
  94. <Cell col="9" displaytype="number" text="bind:totordamt" mask="#,##0"/>
  95. <Cell col="10" displaytype="number" text="bind:totownbamt" mask="#,##0"/>
  96. <Cell col="11" displaytype="number" text="bind:discamt" mask="#,##0"/>
  97. <Cell col="12" displaytype="number" text="bind:orgbamt" mask="#,##0"/>
  98. <Cell col="13" style="align:left middle;" text="bind:termhngnm"/>
  99. <Cell col="14" displaytype="date" text="bind:ofidocacptdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
  100. <Cell col="15" text="bind:ofidocretno"/>
  101. <Cell col="16" text="bind:rcptdd"/>
  102. <Cell col="17" text="bind:rcptno"/>
  103. <Cell col="18" text="bind:rcptseqno"/>
  104. <Cell col="19" text="bind:cretno"/>
  105. <Cell col="20" text="bind:mskind"/>
  106. </Band>
  107. </Format>
  108. </Formats>
  109. </Grid>
  110. <Grid id="grd_oscllist" binddataset="ds_main_opmiinfo_m_oscl_oscl" position="absolute 0 254 1194 656" style="" ontextchanged="group3_grd_oscllist_ontextchanged" oncellclick="group3_grd_oscllist_oncellclick">
  111. <Formats>
  112. <Format id="default">
  113. <Columns>
  114. <Column size="35"/>
  115. <Column size="35"/>
  116. <Column size="35"/>
  117. <Column size="110"/>
  118. <Column size="110"/>
  119. <Column size="110"/>
  120. <Column size="27"/>
  121. <Column size="140"/>
  122. <Column size="75"/>
  123. <Column size="40"/>
  124. <Column size="40"/>
  125. <Column size="40"/>
  126. <Column size="40"/>
  127. <Column size="90"/>
  128. <Column size="90"/>
  129. <Column size="90"/>
  130. <Column size="90"/>
  131. <Column size="90"/>
  132. <Column size="80"/>
  133. <Column size="80"/>
  134. <Column size="80"/>
  135. <Column size="80"/>
  136. <Column size="166"/>
  137. <Column size="0"/>
  138. <Column size="0"/>
  139. <Column size="0"/>
  140. <Column size="0"/>
  141. <Column size="0"/>
  142. <Column size="0"/>
  143. <Column size="0"/>
  144. <Column size="0"/>
  145. </Columns>
  146. <Rows>
  147. <Row size="25" band="head"/>
  148. <Row size="25"/>
  149. </Rows>
  150. <Band id="head">
  151. <Cell text="항"/>
  152. <Cell col="1" text="목"/>
  153. <Cell col="2" text="G"/>
  154. <Cell col="3" text="그룹코드"/>
  155. <Cell col="4" text="수가코드"/>
  156. <Cell col="5" text="EDI코드"/>
  157. <Cell col="6" text="_"/>
  158. <Cell col="7" text="수가명칭"/>
  159. <Cell col="8" text="단가"/>
  160. <Cell col="9" text="1회량"/>
  161. <Cell col="10" text="횟수"/>
  162. <Cell col="11" text="1일량"/>
  163. <Cell col="12" text="일수"/>
  164. <Cell col="13" text="총액"/>
  165. <Cell col="14" text="본인부담금"/>
  166. <Cell col="15" text="선택진료"/>
  167. <Cell col="16" text="급여"/>
  168. <Cell col="17" text="비급여"/>
  169. <Cell col="18" text="인정비급여"/>
  170. <Cell col="19" text="임의비급여"/>
  171. <Cell col="20" text="인정 100_100"/>
  172. <Cell col="21" text="임의 100_100"/>
  173. <Cell col="22" text="비고"/>
  174. <Cell col="23" text="등록번호"/>
  175. <Cell col="24" text="공문접수일자"/>
  176. <Cell col="25" text="공문접수일자별접수번호"/>
  177. <Cell col="26" text="외래_입원일자"/>
  178. <Cell col="27" text="생성번호"/>
  179. <Cell col="28" text="계산수행일련번호"/>
  180. <Cell col="29" text="계산내역별일련번호"/>
  181. <Cell col="30" text="실시_수납일자"/>
  182. </Band>
  183. <Band id="body">
  184. <Cell style="align:left middle;" text="bind:ediitem1"/>
  185. <Cell col="1" style="align:left middle;" text="bind:ediitem2"/>
  186. <Cell col="2" style="align:left middle;" text="bind:flag"/>
  187. <Cell col="3" style="align:left middle;" text="bind:grupcalcscorcd"/>
  188. <Cell col="4" style="align:left middle;" text="bind:snglcalcscorcd"/>
  189. <Cell col="5" style="align:left middle;" text="bind:edicd"/>
  190. <Cell col="6" style="align:left middle;" text="bind:pay100"/>
  191. <Cell col="7" style="align:left middle;" text="bind:snglcalcscorcdnm"/>
  192. <Cell col="8" displaytype="number" text="bind:calcamt" mask="#,##0"/>
  193. <Cell col="9" style="align:left middle;" text="bind:calcqty"/>
  194. <Cell col="10" style="align:left middle;" text="bind:calctims"/>
  195. <Cell col="11" style="align:left middle;" text="bind:daydrugqty"/>
  196. <Cell col="12" style="align:left middle;" text="bind:calcdays"/>
  197. <Cell col="13" displaytype="number" text="bind:totalamt" mask="#,##0"/>
  198. <Cell col="14" displaytype="number" text="bind:ownbamt" mask="#,##0"/>
  199. <Cell col="15" displaytype="number" text="bind:specamt" mask="#,##0"/>
  200. <Cell col="16" displaytype="number" text="bind:payamt" mask="#,##0"/>
  201. <Cell col="17" displaytype="number" text="bind:nopyamt" mask="#,##0"/>
  202. <Cell col="18" displaytype="checkbox" text="bind:rcognopy"/>
  203. <Cell col="19" displaytype="checkbox" text="bind:tempnopy"/>
  204. <Cell col="20" displaytype="checkbox" text="bind:rcogpay"/>
  205. <Cell col="21" displaytype="checkbox" text="bind:temppay"/>
  206. <Cell col="22" style="align:left middle;" text="bind:remark"/>
  207. <Cell col="23" text="bind:pid"/>
  208. <Cell col="24" text="bind:ofidocacptdd"/>
  209. <Cell col="25" text="bind:ofidocretno"/>
  210. <Cell col="26" text="bind:inoutdd"/>
  211. <Cell col="27" text="bind:cretno"/>
  212. <Cell col="28" text="bind:calcseqno"/>
  213. <Cell col="29" text="bind:calcscorseqno"/>
  214. <Cell col="30" text="bind:execdd"/>
  215. </Band>
  216. </Format>
  217. </Formats>
  218. </Grid>
  219. <Div id="group2" position="absolute 0 10 1194 45" style="" class="div_SA">
  220. <Layouts>
  221. <Layout>
  222. <Static id="caption1" class="search_name" position="absolute 15 9 105 26" style="" text="환자번호 :"/>
  223. <Button id="button1" class="btn1" visible="false" position="absolute 1123 7 1179 29" style="" text="조회" onclick="group3_group2_button1_onclick"/>
  224. <Shape id="line2" class="line_4" linetype="vertical" position="absolute 1108 7 1111 29" style="border: solid #ffe4bb #ffe4bb;" anchor="default"/>
  225. <Edit id="ipt_pid" class="input_essential" enable="false" taborder="1" position="absolute 108 8 208 27" style="" anchor="default" onkeypress="group3_group2_ipt_pid_onkeypress"/>
  226. </Layout>
  227. </Layouts>
  228. </Div>
  229. <Static id="caption36" position="absolute 15 662 55 682" style="font:,11,11pt;align:right ;color:#339966;" text="합계"/>
  230. <Static id="caption5" position="absolute 505 661 567 681" style="align:right ;color:#339966;" text="임의비급여"/>
  231. <Edit id="input1" position="absolute 120 661 220 680" style="" anchor="default"/>
  232. <Edit id="input2" position="absolute 380 661 495 680" style="" anchor="default"/>
  233. </Layout>
  234. </Layouts>
  235. </Div>
  236. <Static id="caption4" position="absolute 230 676 292 696" style="align:right ;color:#339966;" text="인정비급여"/>
  237. </Layout>
  238. </Layouts>
  239. <Objects>
  240. <Dataset id="ds_init_P0104list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  241. <ColumnInfo/>
  242. </Dataset>
  243. <Dataset id="ds_main_list1_chosreclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  244. <ColumnInfo/>
  245. </Dataset>
  246. <Dataset id="ds_main_list3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  247. <ColumnInfo>
  248. <Column id="iscl" type="STRING" size="256"/>
  249. </ColumnInfo>
  250. <Rows>
  251. <Row>
  252. <Col id="iscl"/>
  253. </Row>
  254. </Rows>
  255. </Dataset>
  256. <Dataset id="ds_main_list2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  257. <ColumnInfo>
  258. <Column id="grdordamtdetlspeclist" type="STRING" size="256"/>
  259. </ColumnInfo>
  260. <Rows>
  261. <Row>
  262. <Col id="grdordamtdetlspeclist"/>
  263. </Row>
  264. </Rows>
  265. </Dataset>
  266. <Dataset id="ds_hidden_init_disccd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  267. <ColumnInfo>
  268. <Column id="cd" type="STRING" size="256"/>
  269. <Column id="nm" type="STRING" size="256"/>
  270. </ColumnInfo>
  271. <Rows>
  272. <Row>
  273. <Col id="cd"/>
  274. <Col id="nm"/>
  275. </Row>
  276. </Rows>
  277. </Dataset>
  278. <Dataset id="ds_main_baseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  279. <ColumnInfo/>
  280. </Dataset>
  281. <Dataset id="ds_hidden_init_roomcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  282. <ColumnInfo>
  283. <Column id="cd" type="STRING" size="256"/>
  284. <Column id="nm" type="STRING" size="256"/>
  285. <Column id="wd" type="STRING" size="256"/>
  286. <Column id="gr" type="STRING" size="256"/>
  287. <Column id="ty" type="STRING" size="256"/>
  288. </ColumnInfo>
  289. <Rows>
  290. <Row>
  291. <Col id="cd"/>
  292. <Col id="nm"/>
  293. <Col id="wd"/>
  294. <Col id="gr"/>
  295. <Col id="ty"/>
  296. </Row>
  297. </Rows>
  298. </Dataset>
  299. <Dataset id="ds_init_P0001list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  300. <ColumnInfo/>
  301. </Dataset>
  302. <Dataset id="ds_hidden_init_wardcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  303. <ColumnInfo>
  304. <Column id="cd" type="STRING" size="256"/>
  305. <Column id="nm" type="STRING" size="256"/>
  306. <Column id="of" type="STRING" size="256"/>
  307. </ColumnInfo>
  308. <Rows>
  309. <Row>
  310. <Col id="cd"/>
  311. <Col id="nm"/>
  312. <Col id="of"/>
  313. </Row>
  314. </Rows>
  315. </Dataset>
  316. <Dataset id="ds_sendprinter_ordlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  317. <ColumnInfo>
  318. <Column id="pid" type="STRING" size="256"/>
  319. <Column id="hngnm" type="STRING" size="256"/>
  320. <Column id="orddeptnm" type="STRING" size="256"/>
  321. <Column id="orddrnm" type="STRING" size="256"/>
  322. <Column id="ordindd" type="STRING" size="256"/>
  323. <Column id="dschdd" type="STRING" size="256"/>
  324. <Column id="totordamt" type="STRING" size="256"/>
  325. <Column id="totownbamt" type="STRING" size="256"/>
  326. <Column id="discamt" type="STRING" size="256"/>
  327. <Column id="orgbamt" type="STRING" size="256"/>
  328. <Column id="termhngnm" type="STRING" size="256"/>
  329. </ColumnInfo>
  330. <Rows>
  331. <Row>
  332. <Col id="pid"/>
  333. <Col id="hngnm"/>
  334. <Col id="orddeptnm"/>
  335. <Col id="orddrnm"/>
  336. <Col id="ordindd"/>
  337. <Col id="dschdd"/>
  338. <Col id="totordamt"/>
  339. <Col id="totownbamt"/>
  340. <Col id="discamt"/>
  341. <Col id="orgbamt"/>
  342. <Col id="termhngnm"/>
  343. </Row>
  344. </Rows>
  345. </Dataset>
  346. <Dataset id="ds_send_updatedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  347. <ColumnInfo>
  348. <Column id="datalist" type="STRING" size="256"/>
  349. </ColumnInfo>
  350. <Rows>
  351. <Row>
  352. <Col id="datalist"/>
  353. </Row>
  354. </Rows>
  355. </Dataset>
  356. <Dataset id="ds_sendprinter" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  357. <ColumnInfo/>
  358. </Dataset>
  359. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  360. <ColumnInfo>
  361. <Column id="rcognopysum" type="STRING" size="256"/>
  362. <Column id="tempnopysum" type="STRING" size="256"/>
  363. </ColumnInfo>
  364. </Dataset>
  365. <Dataset id="ds_hidden_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  366. <ColumnInfo/>
  367. </Dataset>
  368. <Dataset id="ds_hidden_init_suppkind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  369. <ColumnInfo>
  370. <Column id="cd" type="STRING" size="256"/>
  371. <Column id="nm" type="STRING" size="256"/>
  372. <Column id="up" type="STRING" size="256"/>
  373. <Column id="io" type="STRING" size="256"/>
  374. </ColumnInfo>
  375. <Rows>
  376. <Row>
  377. <Col id="cd"/>
  378. <Col id="nm"/>
  379. <Col id="up"/>
  380. <Col id="io"/>
  381. </Row>
  382. </Rows>
  383. </Dataset>
  384. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  385. <ColumnInfo/>
  386. </Dataset>
  387. <Dataset id="ds_hidden_init_insukind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  388. <ColumnInfo>
  389. <Column id="cd" type="STRING" size="256"/>
  390. <Column id="nm" type="STRING" size="256"/>
  391. </ColumnInfo>
  392. <Rows>
  393. <Row>
  394. <Col id="cd"/>
  395. <Col id="nm"/>
  396. </Row>
  397. </Rows>
  398. </Dataset>
  399. <Dataset id="ds_hidden_init_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  400. <ColumnInfo>
  401. <Column id="cd" type="STRING" size="256"/>
  402. <Column id="nm" type="STRING" size="256"/>
  403. <Column id="dp" type="STRING" size="256"/>
  404. <Column id="sp" type="STRING" size="256"/>
  405. </ColumnInfo>
  406. <Rows>
  407. <Row>
  408. <Col id="cd"/>
  409. <Col id="nm"/>
  410. <Col id="dp"/>
  411. <Col id="sp"/>
  412. </Row>
  413. </Rows>
  414. </Dataset>
  415. <Dataset id="ds_sendprinter_opmiinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  416. <ColumnInfo/>
  417. </Dataset>
  418. <Dataset id="ds_sendprinter_opmiinfo_m_oscl_oscl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  419. <ColumnInfo>
  420. <Column id="pay100" type="STRING" size="256"/>
  421. <Column id="snglcalcscorcdnm" type="STRING" size="256"/>
  422. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  423. <Column id="calcamt" type="STRING" size="256"/>
  424. <Column id="ordqty" type="STRING" size="256"/>
  425. <Column id="orddays" type="STRING" size="256"/>
  426. <Column id="totalamt" type="STRING" size="256"/>
  427. <Column id="ownbamt" type="STRING" size="256"/>
  428. <Column id="specamt" type="STRING" size="256"/>
  429. <Column id="payamt" type="STRING" size="256"/>
  430. <Column id="nopyamt" type="STRING" size="256"/>
  431. <Column id="rcognopy" type="STRING" size="256"/>
  432. <Column id="tempnopy" type="STRING" size="256"/>
  433. <Column id="rcogpay" type="STRING" size="256"/>
  434. <Column id="temppay" type="STRING" size="256"/>
  435. <Column id="remark" type="STRING" size="256"/>
  436. </ColumnInfo>
  437. </Dataset>
  438. <Dataset id="ds_main_baseinfo_opmilist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  439. <ColumnInfo>
  440. <Column id="opmi" type="STRING" size="256"/>
  441. </ColumnInfo>
  442. <Rows>
  443. <Row>
  444. <Col id="opmi"/>
  445. </Row>
  446. </Rows>
  447. </Dataset>
  448. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  449. <ColumnInfo>
  450. <Column id="pid" type="STRING" size="256"/>
  451. </ColumnInfo>
  452. </Dataset>
  453. <Dataset id="ds_hidden_init_flag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  454. <ColumnInfo>
  455. <Column id="prestdd" type="STRING" size="256"/>
  456. <Column id="mskindflag" type="STRING" size="256"/>
  457. </ColumnInfo>
  458. <Rows>
  459. <Row>
  460. <Col id="prestdd"/>
  461. <Col id="mskindflag"/>
  462. </Row>
  463. </Rows>
  464. </Dataset>
  465. <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  466. <ColumnInfo>
  467. <Column id="pid" type="STRING" size="256"/>
  468. <Column id="ofidocacptdd" type="STRING" size="256"/>
  469. <Column id="ofidocretno" type="STRING" size="256"/>
  470. <Column id="flag" type="STRING" size="256"/>
  471. </ColumnInfo>
  472. <Rows>
  473. <Row>
  474. <Col id="pid"/>
  475. <Col id="ofidocacptdd"/>
  476. <Col id="ofidocretno"/>
  477. <Col id="flag"/>
  478. </Row>
  479. </Rows>
  480. </Dataset>
  481. <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  482. <ColumnInfo>
  483. <Column id="sess_posinstcd" type="STRING" size="256"/>
  484. </ColumnInfo>
  485. <Rows>
  486. <Row>
  487. <Col id="sess_posinstcd">012</Col>
  488. </Row>
  489. </Rows>
  490. </Dataset>
  491. <Dataset id="ds_send_data3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  492. <ColumnInfo>
  493. <Column id="pid" type="STRING" size="256"/>
  494. <Column id="ofidocacptdd" type="STRING" size="256"/>
  495. <Column id="cretno" type="STRING" size="256"/>
  496. <Column id="inoutdd" type="STRING" size="256"/>
  497. </ColumnInfo>
  498. <Rows>
  499. <Row>
  500. <Col id="pid"/>
  501. <Col id="ofidocacptdd"/>
  502. <Col id="cretno"/>
  503. <Col id="inoutdd"/>
  504. </Row>
  505. </Rows>
  506. </Dataset>
  507. <Dataset id="ds_send_data4" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  508. <ColumnInfo>
  509. <Column id="pid" type="STRING" size="256"/>
  510. <Column id="ordindd" type="STRING" size="256"/>
  511. <Column id="dschdd" type="STRING" size="256"/>
  512. <Column id="ofidocacptdd" type="STRING" size="256"/>
  513. <Column id="ofidocretno" type="STRING" size="256"/>
  514. <Column id="flag" type="STRING" size="256"/>
  515. <Column id="rcptdd" type="STRING" size="256"/>
  516. <Column id="rcptno" type="STRING" size="256"/>
  517. <Column id="rcptseqno" type="STRING" size="256"/>
  518. <Column id="cretno" type="STRING" size="256"/>
  519. <Column id="mskind" type="STRING" size="256"/>
  520. </ColumnInfo>
  521. <Rows>
  522. <Row>
  523. <Col id="pid"/>
  524. <Col id="ordindd"/>
  525. <Col id="dschdd"/>
  526. <Col id="ofidocacptdd"/>
  527. <Col id="ofidocretno"/>
  528. <Col id="flag"/>
  529. <Col id="rcptdd"/>
  530. <Col id="rcptno"/>
  531. <Col id="rcptseqno"/>
  532. <Col id="cretno"/>
  533. <Col id="mskind"/>
  534. </Row>
  535. </Rows>
  536. </Dataset>
  537. <Dataset id="ds_send_data5" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  538. <ColumnInfo>
  539. <Column id="pid" type="STRING" size="256"/>
  540. <Column id="cond" type="STRING" size="256"/>
  541. <Column id="fromdd" type="STRING" size="256"/>
  542. <Column id="todd" type="STRING" size="256"/>
  543. <Column id="orddeptcd" type="STRING" size="256"/>
  544. <Column id="insukind" type="STRING" size="256"/>
  545. <Column id="rtnyn" type="STRING" size="256"/>
  546. </ColumnInfo>
  547. <Rows>
  548. <Row>
  549. <Col id="pid"/>
  550. <Col id="cond"/>
  551. <Col id="fromdd"/>
  552. <Col id="todd"/>
  553. <Col id="orddeptcd"/>
  554. <Col id="insukind"/>
  555. <Col id="rtnyn"/>
  556. </Row>
  557. </Rows>
  558. </Dataset>
  559. <Dataset id="ds_send_update" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  560. <ColumnInfo>
  561. <Column id="datalist" type="STRING" size="256"/>
  562. </ColumnInfo>
  563. <Rows>
  564. <Row>
  565. <Col id="datalist"/>
  566. </Row>
  567. </Rows>
  568. </Dataset>
  569. <Dataset id="ds_hidden_rcv" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  570. <ColumnInfo/>
  571. </Dataset>
  572. <Dataset id="ds_hidden_rcv_list1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  573. <ColumnInfo>
  574. <Column id="chosreclist" type="STRING" size="256"/>
  575. </ColumnInfo>
  576. <Rows>
  577. <Row>
  578. <Col id="chosreclist"/>
  579. </Row>
  580. </Rows>
  581. </Dataset>
  582. <Dataset id="ds_hidden_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  583. <ColumnInfo>
  584. <Column id="pid" type="STRING" size="256"/>
  585. <Column id="ofidocacptdd" type="STRING" size="256"/>
  586. <Column id="cretno" type="STRING" size="256"/>
  587. <Column id="ordfromdd" type="STRING" size="256"/>
  588. <Column id="ordtodd" type="STRING" size="256"/>
  589. <Column id="ofidocretno" type="STRING" size="256"/>
  590. </ColumnInfo>
  591. <Rows>
  592. <Row>
  593. <Col id="pid"/>
  594. <Col id="ofidocacptdd"/>
  595. <Col id="cretno"/>
  596. <Col id="ordfromdd"/>
  597. <Col id="ordtodd"/>
  598. <Col id="ofidocretno"/>
  599. </Row>
  600. </Rows>
  601. </Dataset>
  602. <Dataset id="ds_main_h_mopmi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  603. <ColumnInfo>
  604. <Column id="opmi" type="STRING" size="256"/>
  605. </ColumnInfo>
  606. <Rows>
  607. <Row>
  608. <Col id="opmi"/>
  609. </Row>
  610. </Rows>
  611. </Dataset>
  612. <Dataset id="ds_main_opmiinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  613. <ColumnInfo/>
  614. </Dataset>
  615. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  616. <ColumnInfo/>
  617. </Dataset>
  618. <Dataset id="ds_hidden_init_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  619. <ColumnInfo>
  620. <Column id="cd" type="STRING" size="256"/>
  621. <Column id="nm" type="STRING" size="256"/>
  622. </ColumnInfo>
  623. <Rows>
  624. <Row>
  625. <Col id="cd"/>
  626. <Col id="nm"/>
  627. </Row>
  628. </Rows>
  629. </Dataset>
  630. <Dataset id="ds_init_P0104list_P0104" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  631. <ColumnInfo>
  632. <Column id="cdid" type="STRING" size="256"/>
  633. <Column id="cdnm" type="STRING" size="256"/>
  634. </ColumnInfo>
  635. <Rows>
  636. <Row>
  637. <Col id="cdid"/>
  638. <Col id="cdnm"/>
  639. </Row>
  640. </Rows>
  641. </Dataset>
  642. <Dataset id="ds_main_opmiinfo_m_oscl_oscl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  643. <ColumnInfo/>
  644. </Dataset>
  645. <Dataset id="ds_init_P0001list_P0001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  646. <ColumnInfo>
  647. <Column id="cdid" type="STRING" size="256"/>
  648. <Column id="cdnm" type="STRING" size="256"/>
  649. </ColumnInfo>
  650. <Rows>
  651. <Row>
  652. <Col id="cdid"/>
  653. <Col id="cdnm"/>
  654. </Row>
  655. </Rows>
  656. </Dataset>
  657. <Dataset id="ds_send_updatedata_datalist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  658. <Dataset id="ds_main_chosreclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  659. <Dataset id="Dataset00" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  660. </Objects>
  661. <Bind>
  662. <BindItem id="item0" compid="group3.group2.ipt_pid" propid="value" datasetid="ds_send_data1" columnid="pid"/>
  663. <BindItem id="item1" compid="group3.input1" propid="value" datasetid="ds_main" columnid="rcognopysum"/>
  664. <BindItem id="item2" compid="group3.input2" propid="value" datasetid="ds_main" columnid="tempnopysum"/>
  665. </Bind>
  666. <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs"
  667. include "com_basiccodexp::ZBC001.xjs"
  668. var arErrorCode = new HashArray();
  669. function fChosSpecRef() {
  670. ds_send_data1.setColumn(0, "pid", ds_hidden_data.getColumn(0, "pid"));
  671. ds_send_data1.setColumn(0, "ofidocacptdd", ds_hidden_data.getColumn(0, "ofidocacptdd"));
  672. ds_send_data1.setColumn(0, "ofidocretno", ds_hidden_data.getColumn(0, "ofidocretno"));
  673. ds_send_data1.setColumn(0, "flag", "P");
  674. ds_main_list1_chosreclist.clearData();
  675. //if (submit("TRPMC02908")) {
  676. var oParam = {};
  677. oParam.id = "TRPMC02908"; // TRPMC02901를 콜함.
  678. oParam.service = "patinfomngtapp.PatSpecPat";
  679. oParam.method = "reqGetDetailOrdList";
  680. oParam.inds = "req=ds_send_data1";
  681. oParam.outds = "ds_main_list1_chosreclist=chosreclist";
  682. oParam.async = false;
  683. oParam.callback = "cf_TRPMC02908";
  684. tranf_submit(oParam);
  685. if (arErrorCode.pop("TRPMC02908") > -1) {
  686. }
  687. }
  688. function cf_TRPMC02908(sSvcId, nErrorCode, sErrorMsg) {
  689. arErrorCode.push(sSvcId, nErrorCode);
  690. }
  691. function fGetOsclList() {
  692. var oParam = {};
  693. oParam.id = "TRPMC02905";
  694. oParam.service = "patinfomngtapp.PatSpecPat";
  695. oParam.method = "reqGetNewOsclOrdAmtDetlSpecList";
  696. oParam.inds = "req=ds_send_data4";
  697. oParam.outds = "ds_hidden_rcv_m_oscl_oscl=oscl";
  698. oParam.async = false;
  699. oParam.callback = "cf_TRPMC02905";
  700. tranf_submit(oParam);
  701. if (arErrorCode.pop("TRPMC02905") > -1) {
  702. ds_main_opmiinfo_m_oscl_oscl.clearData();
  703. ds_main_opmiinfo_m_oscl_oscl.copyData(ds_hidden_rcv_m_oscl_oscl);
  704. if (ds_hidden_rcv_m_oscl_oscl.rowcount < 0) {
  705. sysf_messageBox("진료비상세내역 정보가 ", "I004");
  706. }
  707. }
  708. }
  709. function cf_TRPMC02905(sSvcId, nErrorCode, sErrorMsg) {
  710. arErrorCode.push(sSvcId, nErrorCode);
  711. }
  712. function fOrdDteilSpecCalc() {
  713. var rows = ds_main_opmiinfo_m_oscl_oscl.rowcount;
  714. var rcognopysum = '0';
  715. var tempnopysum = '0';
  716. for (i = 0; i < rows; i++) {
  717. if (ds_main_opmiinfo_m_oscl_oscl.getColumn(i, "rcognopy") == 'Y' || ds_main_opmiinfo_m_oscl_oscl.getColumn(i, "rcogpay") == 'Y') {
  718. var temp1 = ds_main_opmiinfo_m_oscl_oscl.getColumn(i, "totalamt");
  719. rcognopysum = parseInt(rcognopysum) + parseInt(temp1);
  720. } else if (ds_main_opmiinfo_m_oscl_oscl.getColumn(i, "tempnopy") == 'Y' || ds_main_opmiinfo_m_oscl_oscl.getColumn(i, "temppay") == 'Y') {
  721. var temp1 = ds_main_opmiinfo_m_oscl_oscl.getColumn(i, "totalamt");
  722. tempnopysum = parseInt(tempnopysum) + parseInt(temp1);
  723. }
  724. }
  725. ds_main.setColumn(0, "rcognopysum", rcognopysum);
  726. ds_main.setColumn(0, "tempnopysum", tempnopysum);
  727. }
  728. function fClamOrdPrnt() {
  729. ds_sendprinter_ordlist.clearData();
  730. dsf_copyColInfo(ds_sendprinter_ordlist, ds_main_list1_chosreclist);
  731. ds_sendprinter_ordlist.addRow();
  732. for (var i = 0; i < ds_main_list1_chosreclist.rowcount; i++) {
  733. if (ds_main_list1_chosreclist.getColumn(i, "patspecyn") == "Y") {
  734. ds_sendprinter_ordlist.setColumn(0, "pid", ds_main_list1_chosreclist.getColumn(i, "pid"));
  735. ds_sendprinter_ordlist.setColumn(0, "hngnm", ds_main_list1_chosreclist.getColumn(i, "hngnm"));
  736. ds_sendprinter_ordlist.setColumn(0, "orddeptnm", ds_main_list1_chosreclist.getColumn(i, "orddeptnm"));
  737. ds_sendprinter_ordlist.setColumn(0, "orddrnm", ds_main_list1_chosreclist.getColumn(i, "orddrnm"));
  738. ds_sendprinter_ordlist.setColumn(0, "ordindd", ds_main_list1_chosreclist.getColumn(i, "ordindd"));
  739. ds_sendprinter_ordlist.setColumn(0, "dschdd", ds_main_list1_chosreclist.getColumn(i, "dschdd"));
  740. ds_sendprinter_ordlist.setColumn(0, "totordamt", ds_main_list1_chosreclist.getColumn(i, "totordamt"));
  741. ds_sendprinter_ordlist.setColumn(0, "totownbamt", ds_main_list1_chosreclist.getColumn(i, "totownbamt"));
  742. ds_sendprinter_ordlist.setColumn(0, "discamt", ds_main_list1_chosreclist.getColumn(i, "discamt"));
  743. ds_sendprinter_ordlist.setColumn(0, "orgbamt", ds_main_list1_chosreclist.getColumn(i, "orgbamt"));
  744. ds_sendprinter_ordlist.setColumn(0, "termhngnm", ds_main_list1_chosreclist.getColumn(i, "termhngnm"));
  745. ds_send_data4.setColumn(0, "pid", ds_main_list1_chosreclist.getColumn(i, "pid"));
  746. ds_send_data4.setColumn(0, "ordindd", ds_main_list1_chosreclist.getColumn(i, "ordindd"));
  747. ds_send_data4.setColumn(0, "dschdd", ds_main_list1_chosreclist.getColumn(i, "dschdd"));
  748. ds_send_data4.setColumn(0, "ofidocacptdd", ds_main_list1_chosreclist.getColumn(i, "ofidocacptdd"));
  749. ds_send_data4.setColumn(0, "ofidocretno", ds_main_list1_chosreclist.getColumn(i, "ofidocretno"));
  750. ds_send_data4.setColumn(0, "rcptdd", ds_main_list1_chosreclist.getColumn(i, "rcptdd"));
  751. ds_send_data4.setColumn(0, "rcptno", ds_main_list1_chosreclist.getColumn(i, "rcptno"));
  752. ds_send_data4.setColumn(0, "rcptseqno", ds_main_list1_chosreclist.getColumn(i, "rcptseqno"));
  753. ds_send_data4.setColumn(0, "cretno", ds_main_list1_chosreclist.getColumn(i, "cretno"));
  754. ds_send_data4.setColumn(0, "mskind", ds_main_list1_chosreclist.getColumn(i, "mskind"));
  755. var vFlag = grd_chosspec.valueMatrix(i, 2);
  756. //입원상세내역
  757. if (vFlag == "I") {
  758. ds_send_data4.setColumn(0, "flag", "I");
  759. var oParam = {};
  760. oParam.id = "TRPMC02905";
  761. oParam.service = "patinfomngtapp.PatSpecPat";
  762. oParam.method = "reqGetNewOsclOrdAmtDetlSpecList";
  763. oParam.inds = "req=ds_send_data4";
  764. oParam.outds = "ds_hidden_rcv_m_oscl_oscl=oscl";
  765. oParam.async = false;
  766. oParam.callback = "cf_TRPMC02905";
  767. tranf_submit(oParam);
  768. if (arErrorCode.pop("TRPMC02905") > -1) {
  769. ds_sendprinter_opmiinfo_m_oscl_oscl.clearData();
  770. if (ds_hidden_rcv_m_oscl_oscl.rowcount > 0) {
  771. ds_sendprinter_opmiinfo_m_oscl_oscl.copyData(ds_hidden_rcv_m_oscl_oscl);
  772. }
  773. }
  774. //외래상세내역
  775. } else if (vFlag == "O") {
  776. ds_send_data4.setColumn(0, "flag", "O");
  777. var oParam = {};
  778. oParam.id = "TRPMC02905";
  779. oParam.service = "patinfomngtapp.PatSpecPat";
  780. oParam.method = "reqGetNewOsclOrdAmtDetlSpecList";
  781. oParam.inds = "req=ds_send_data4";
  782. oParam.outds = "ds_hidden_rcv_m_oscl_oscl=oscl";
  783. oParam.async = false;
  784. oParam.callback = "cf_TRPMC02905";
  785. tranf_submit(oParam);
  786. if (arErrorCode.pop("TRPMC02905") > -1) {
  787. ds_sendprinter_opmiinfo_m_oscl_oscl.clearData();
  788. if (ds_hidden_rcv_m_oscl_oscl.rowcount > 0) {
  789. ds_sendprinter_opmiinfo_m_oscl_oscl.copyData(ds_hidden_rcv_m_oscl_oscl);
  790. }
  791. }
  792. }
  793. var objDOM = rptf_createDOM();
  794. var objParam = new Object();
  795. rptf_setNodeListToDOM(objDOM, "root/sendprinter/opmiinfo/m_oscl/oscl", ds_sendprinter_opmiinfo_m_oscl_oscl);
  796. rptf_setNodeListToDOM(objDOM, "root/sendprinter/ordlist", ds_sendprinter_ordlist);
  797. objParam.xml_data_XML1 = objDOM.documentElement.source;
  798. var option = "open=1;save=1;directprint=0;printdialog=1;print=1;zoom=0";
  799. rptf_exeReportPreview30(["RPPMC03100"], [objParam], option);
  800. }
  801. }
  802. }
  803. function cf_TRPMC02905(sSvcId, nErrorCode, sErrorMsg) {
  804. arErrorCode.push(sSvcId, nErrorCode);
  805. }
  806. function cf_TRPMC02905(sSvcId, nErrorCode, sErrorMsg) {
  807. arErrorCode.push(sSvcId, nErrorCode);
  808. }
  809. function SMPMC03000_onload(obj: Form, e: LoadEventInfo) {
  810. frmf_initForm(obj);
  811. grdf_initGrid(group3.grd_chosspec);
  812. grdf_initGrid(group3.grd_oscllist);
  813. var arrParam = [{
  814. dsNm: "ds_init_P0104list_P0104",
  815. cdGrpId: "P0104"
  816. }, {
  817. dsNm: "ds_init_P0001list_P0001",
  818. cdGrpId: "P0001"
  819. }];
  820. appf_getCodeList(arrParam);
  821. fChosSpecRef();
  822. }
  823. function group3_group4_button2_onclick(obj: Button, e: ClickEventInfo) {
  824. fClamOrdPrnt();
  825. }
  826. function group3_group4_button3_onclick(obj: Button, e: ClickEventInfo) {
  827. this.close();
  828. }
  829. function group3_group4_button5_onclick(obj: Button, e: ClickEventInfo) {
  830. var cur_row = ds_main_opmiinfo_m_oscl_oscl.rowcount;
  831. if (cur_row > 0) {
  832. if (sysf_messageBox("저장 하시겠습니까?", "Q999", "") != 6) {
  833. return;
  834. }
  835. for (i = 0; i < cur_row; i++) {
  836. ds_main_opmiinfo_m_oscl.setColumn(i, "ofidocacptdd", ds_send_data1.getColumn(0, "ofidocacptdd"));
  837. ds_main_opmiinfo_m_oscl.setColumn(i, "ofidocretno", ds_send_data1.getColumn(0, "ofidocretno"));
  838. }
  839. var updateDs = grdf_getGridUpdateData(group3.grd_oscllist, "all");
  840. ds_send_updatedata_datalist.copyData(updateDs);
  841. var oParam = {};
  842. oParam.id = "TXPMC02907";
  843. oParam.service = "patinfomngtapp.PatSpecPat";
  844. oParam.method = "reqExeChosRecList";
  845. oParam.inds = "req=ds_send_updatedata_datalist";
  846. oParam.outds = "ds_hidden_rcv_datalist=datalist";
  847. oParam.async = false;
  848. oParam.callback = "cf_TXPMC02907";
  849. tranf_submit(oParam);
  850. if (arErrorCode.pop("TXPMC02907") > -1) {
  851. sysf_messageBox("저장 되었습니다. ", "E999");
  852. }
  853. }
  854. }
  855. function cf_TXPMC02907(sSvcId, nErrorCode, sErrorMsg) {
  856. arErrorCode.push(sSvcId, nErrorCode);
  857. }
  858. function group3_grd_chosspec_oncelldblclick(obj: Grid, e: GridClickEventInfo) {
  859. if (e.row >= 0 && e.col >= 0) {
  860. var row = ds_main_list1_chosreclist.rowposition;
  861. ds_send_data4.setColumn(0, "pid", ds_main_list1_chosreclist.getColumn(row, "pid")); //3
  862. ds_send_data4.setColumn(0, "ordindd", ds_main_list1_chosreclist.getColumn(row, "ordindd")); //7));
  863. ds_send_data4.setColumn(0, "dschdd", ds_main_list1_chosreclist.getColumn(row, "dschdd")); //8));
  864. ds_send_data4.setColumn(0, "ofidocacptdd", ds_main_list1_chosreclist.getColumn(row, "ofidocacptdd")); //14));
  865. ds_send_data4.setColumn(0, "ofidocretno", ds_main_list1_chosreclist.getColumn(row, "ofidocretno")); //15));
  866. ds_send_data4.setColumn(0, "rcptdd", ds_main_list1_chosreclist.getColumn(row, "rcptdd")); //16));
  867. ds_send_data4.setColumn(0, "rcptno", ds_main_list1_chosreclist.getColumn(row, "rcptno")); //17));
  868. ds_send_data4.setColumn(0, "rcptseqno", ds_main_list1_chosreclist.getColumn(row, "rcptseqno")); //18));
  869. ds_send_data4.setColumn(0, "cretno", ds_main_list1_chosreclist.getColumn(row, "cretno")); //19));
  870. ds_send_data4.setColumn(0, "mskind", ds_main_list1_chosreclist.getColumn(row, "mskind")); //20));
  871. ds_main_chosreclist.clearData();
  872. dsf_copyColInfo(ds_main_chosreclist, ds_main_list1_chosreclist);
  873. ds_main_chosreclist.addRow();
  874. ds_main_chosreclist.copyRow(0, ds_main_list1_chosreclist, row);
  875. var vFlag = ds_main_list1_chosreclist.getColumn(row, "ioflag"); //group3.grd_chosspec.valueMatrix(row,2);
  876. //입원상세내역
  877. if (vFlag == "I") {
  878. ds_send_data4.setColumn(0, "flag", "I");
  879. fGetOsclList();
  880. //외래상세내역
  881. } else if (vFlag == "O") {
  882. ds_send_data4.setColumn(0, "flag", "O");
  883. fGetOsclList();
  884. }
  885. fOrdDteilSpecCalc();
  886. }
  887. }
  888. function group3_grd_oscllist_ontextchanged(obj: Grid, e: GridEditTextChangedEventInfo) {
  889. var cur_row = ds_main_opmiinfo_m_oscl_oscl.rowposition;
  890. var cur_col = e.col;
  891. if (group3.grd_oscllist.getBindCellIndex("body", "rcognopy") == cur_col) {
  892. if (ds_main_opmiinfo_m_oscl_oscl.getColumn(cur_row, "rcognopy") == 'Y') {
  893. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "tempnopy", "N");
  894. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "rcogpay", "N");
  895. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "temppay", "N");
  896. }
  897. }
  898. if (group3.grd_oscllist.getBindCellIndex("body", "tempnopy") == cur_col) {
  899. if (ds_main_opmiinfo_m_oscl_oscl.getColumn(cur_row, "tempnopy") == 'Y') {
  900. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "rcognopy", "N");
  901. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "rcogpay", "N");
  902. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "temppay", "N");
  903. }
  904. }
  905. if (group3.grd_oscllist.getBindCellIndex("body", "rcogpay") == cur_col) {
  906. if (ds_main_opmiinfo_m_oscl_oscl.getColumn(cur_row, "rcogpay") == 'Y') {
  907. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "rcognopy", "N");
  908. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "tempnopy", "N");
  909. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "temppay", "N");
  910. }
  911. }
  912. if (group3.grd_oscllist.getBindCellIndex("body", "temppay") == cur_col) {
  913. if (ds_main_opmiinfo_m_oscl_oscl.getColumn(cur_row, "temppay") == 'Y') {
  914. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "rcognopy", "N");
  915. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "tempnopy", "N");
  916. ds_main_opmiinfo_m_oscl.setColumn(cur_row, "rcogpay", "N");
  917. }
  918. }
  919. }
  920. function group3_grd_oscllist_oncellclick(obj: Grid, e: GridClickEventInfo) {
  921. fOrdDteilSpecCalc();
  922. }
  923. function group3_group2_button1_onclick(obj: Button, e: ClickEventInfo) {
  924. }
  925. function group3_group2_ipt_pid_onkeydown(obj: Edit, e: KeyEventInfo) {
  926. }]]></Script>
  927. </Form>
  928. </FDL>