SMPIF71000_청구및입금내역조회(자보장부).xfdl 45 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPIF71000" position="absolute 0 0 1204 780" titletext="청구및입금내역조회(자보장부)" oninit="SMPIF71000_oninit" onload="SMPIF71000_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 757 1194 784" id="grp_btn"/>
  8. <Div position="absolute 1 13 1195 765" id="grp_biz" scrollbars="autoboth">
  9. <Layouts>
  10. <Layout>
  11. <Div position="absolute 0 11 1194 76" align="align:center top;" id="grp_sea" class="div_SA" anchor="default">
  12. <Layouts>
  13. <Layout>
  14. <Static text="구분 :" position="absolute 14 10 79 27" id="cap_flag" class="search_name" anchor="default"/>
  15. <Radio position="absolute 67 5 202 28" id="rdo_flag" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="grp_biz_grp_sea_rdo_flag_onitemchanged">
  16. <Dataset id="innerdataset">
  17. <ColumnInfo>
  18. <Column id="codecolumn"/>
  19. <Column id="datacolumn"/>
  20. </ColumnInfo>
  21. <Rows>
  22. <Row>
  23. <Col id="codecolumn">P</Col>
  24. <Col id="datacolumn">개인별</Col>
  25. </Row>
  26. <Row>
  27. <Col id="codecolumn">C</Col>
  28. <Col id="datacolumn">손보사별</Col>
  29. </Row>
  30. </Rows>
  31. </Dataset>
  32. </Radio>
  33. <Static text="내원유형 :" position="absolute 225 10 316 27" id="cap_ioflag" class="search_name" anchor="default"/>
  34. <Radio position="absolute 304 6 439 29" id="rdo_ioflag" columncount="3" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
  35. <Dataset id="innerdataset">
  36. <ColumnInfo>
  37. <Column id="codecolumn"/>
  38. <Column id="datacolumn"/>
  39. </ColumnInfo>
  40. <Rows>
  41. <Row>
  42. <Col id="codecolumn">
  43. </Col>
  44. <Col id="datacolumn">전체</Col>
  45. </Row>
  46. <Row>
  47. <Col id="codecolumn">O</Col>
  48. <Col id="datacolumn">외래</Col>
  49. </Row>
  50. <Row>
  51. <Col id="codecolumn">I</Col>
  52. <Col id="datacolumn">입원</Col>
  53. </Row>
  54. </Rows>
  55. </Dataset>
  56. </Radio>
  57. <Static text="기간 :" position="absolute 475 10 535 27" id="cap_dateflag" class="search_name" anchor="default"/>
  58. <Radio position="absolute 528 6 642 29" id="rdo_dateflag" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
  59. <Dataset id="innerdataset">
  60. <ColumnInfo>
  61. <Column id="codecolumn"/>
  62. <Column id="datacolumn"/>
  63. </ColumnInfo>
  64. <Rows>
  65. <Row>
  66. <Col id="codecolumn">clamym</Col>
  67. <Col id="datacolumn">청구월</Col>
  68. </Row>
  69. <Row>
  70. <Col id="codecolumn">uncoym</Col>
  71. <Col id="datacolumn">미수월</Col>
  72. </Row>
  73. </Rows>
  74. </Dataset>
  75. </Radio>
  76. <Calendar position="absolute 654 9 739 28" id="ipt_fromdd" class="input_search" mask="yyyy-mm" anchor="default" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" onchanged="grp_biz_grp_sea_ipt_fromdd_onchanged"/>
  77. <Static text="~" position="absolute 742 9 754 26" id="cap_dateand" class="search_no_b" anchor="default"/>
  78. <Calendar position="absolute 757 9 842 28" id="ipt_todd" class="input_search" mask="yyyy-mm" anchor="default" dateformat="yyyy-MM" editformat="yyyy-MM" onchanged="grp_biz_grp_sea_ipt_todd_onchanged"/>
  79. <Static text="청구구분 :" position="absolute 873 10 963 27" id="cap_clamflag" class="search_name" anchor="default"/>
  80. <Shape position="absolute 1105 7 1111 60" linetype="vertical" id="line_search" class="line_4" anchor="default"/>
  81. <Button position="absolute 1125 22 1181 44" id="btn_search" class="btn1" text="조회" anchor="default" onclick="grp_biz_grp_sea_btn_search_onclick"/>
  82. <Combo position="absolute 958 9 1058 28" id="cmb_clamflag" class="combo_search" taborder="3" innerdataset="@ds_init_P0426list" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
  83. <Combo position="absolute 560 37 660 56" id="cmb_clamdg" class="combo_search" taborder="3" innerdataset="@ds_init_clamdglist_clamdg" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
  84. <Static text="청구차수 :" position="absolute 475 39 561 56" id="caption8" class="search_name" anchor="default"/>
  85. <Combo position="absolute 906 34 1057 53" id="cmb_insucmpymark" class="combo_search" taborder="3" innerdataset="@ds_init_U0001list" datacolumn="nm" codecolumn="cd" anchor="default"/>
  86. <Static text="손보사 :" position="absolute 833 36 919 53" id="caption3" class="search_name" anchor="default"/>
  87. </Layout>
  88. </Layouts>
  89. </Div>
  90. <Static text="청구 및 입금 내역 목록" position="absolute 0 87 162 108" id="cap_subject" class="tit_2" anchor="default"/>
  91. <Shape position="absolute 0 103 1194 109" linetype="horizontal" id="line1" class="line_1" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
  92. <Button position="absolute 1114 84 1194 103" id="btn_excel" class="btn7" text="엑셀저장" anchor="default" onclick="grp_biz_btn_excel_onclick"/>
  93. <Tab position="absolute 0 109 1194 752" id="switch1" anchor="default" onchanged="grp_biz_switch1_onchanged">
  94. <Tabpages>
  95. <Tabpage text="개인별" id="case_ind">
  96. <Layouts>
  97. <Layout>
  98. <Grid position="absolute 0 0 1190 615" id="grd_ind" class="datagrid2" binddataset="ds_main_gridlist_indgrid" anchor="default" oncellclick="grp_biz_switch1_case_ind_grd_ind_oncellclick" onkeydown="grp_biz_switch1_case_ind_grd_ind_onkeydown" cellsizingtype="col">
  99. <Formats>
  100. <Format id="default">
  101. <Columns>
  102. <Column size="26"/>
  103. <Column size="26"/>
  104. <Column size="42"/>
  105. <Column size="52"/>
  106. <Column size="51"/>
  107. <Column size="63"/>
  108. <Column size="37"/>
  109. <Column size="82"/>
  110. <Column size="88"/>
  111. <Column size="152"/>
  112. <Column size="74"/>
  113. <Column size="54"/>
  114. <Column size="58"/>
  115. <Column size="68"/>
  116. <Column size="148"/>
  117. <Column size="100"/>
  118. <Column size="100"/>
  119. <Column size="100"/>
  120. <Column size="100"/>
  121. <Column size="100"/>
  122. <Column size="100"/>
  123. <Column size="100"/>
  124. <Column size="100"/>
  125. <Column size="100"/>
  126. <Column size="100"/>
  127. <Column size="100"/>
  128. <Column size="100"/>
  129. <Column size="100"/>
  130. <Column size="100"/>
  131. <Column size="100"/>
  132. <Column size="100"/>
  133. <Column size="68"/>
  134. <Column size="67"/>
  135. <Column size="100"/>
  136. <Column size="100"/>
  137. <Column size="100"/>
  138. <Column size="100"/>
  139. <Column size="0"/>
  140. <Column size="0"/>
  141. </Columns>
  142. <Rows>
  143. <Row size="24" band="head"/>
  144. <Row size="24" band="head"/>
  145. <Row size="24"/>
  146. </Rows>
  147. <Band id="head">
  148. <Cell rowspan="2" taborder="undefined"/>
  149. <Cell col="1" rowspan="2" text="No." taborder="undefined"/>
  150. <Cell col="2" rowspan="2" text="내원&#10;유형" taborder="undefined"/>
  151. <Cell col="3" rowspan="2" text="청구월" taborder="undefined"/>
  152. <Cell col="4" rowspan="2" text="미수월" taborder="undefined"/>
  153. <Cell col="5" rowspan="2" text="청구구분" taborder="undefined"/>
  154. <Cell col="6" rowspan="2" text="청구&#10;차수" taborder="undefined"/>
  155. <Cell col="7" rowspan="2" text="접수일자&#10;(청구일자)" taborder="undefined"/>
  156. <Cell col="8" rowspan="2" text="손보사명" taborder="undefined"/>
  157. <Cell col="9" rowspan="2" text="사고&#10;접수번호" taborder="undefined"/>
  158. <Cell col="10" rowspan="2" text="청구과" taborder="undefined"/>
  159. <Cell col="11" rowspan="2" text="명일련" taborder="undefined"/>
  160. <Cell col="12" rowspan="2" text="등록번호" taborder="undefined"/>
  161. <Cell col="13" rowspan="2" text="수진자" taborder="undefined"/>
  162. <Cell col="14" rowspan="2" text="진료기간" taborder="undefined"/>
  163. <Cell col="15" rowspan="2" text="청구총진료비" taborder="undefined"/>
  164. <Cell col="16" rowspan="2" text="반송액" taborder="undefined"/>
  165. <Cell col="17" rowspan="2" text="자보실삭감액&#10;(최종)" taborder="undefined"/>
  166. <Cell col="18" rowspan="2" text="분심결정삭감액" taborder="undefined"/>
  167. <Cell col="19" rowspan="2" text="환수예정액" taborder="undefined"/>
  168. <Cell col="20" rowspan="2" text="환수액" taborder="undefined"/>
  169. <Cell col="21" rowspan="2" text="통장입금액" taborder="undefined"/>
  170. <Cell col="22" rowspan="2" text="입금일자" taborder="undefined"/>
  171. <Cell col="23" colspan="8" text="검토서 등록 현황" taborder="undefined"/>
  172. <Cell col="31" rowspan="2" text="진료의" taborder="undefined"/>
  173. <Cell col="32" rowspan="2" text="심사자" taborder="undefined"/>
  174. <Cell col="33" rowspan="2" text="(재)급여총진료비" taborder="undefined"/>
  175. <Cell col="34" rowspan="2" text="재-전" taborder="undefined"/>
  176. <Cell col="35" rowspan="2" text="(전)급여총진료비" taborder="undefined"/>
  177. <Cell col="36" rowspan="2" text="전-후" taborder="undefined"/>
  178. <Cell col="37" text="접수번호"/>
  179. <Cell col="38" text="심사차수"/>
  180. <Cell row="1" col="23" text="검토서일자"/>
  181. <Cell row="1" col="24" text="조정액"/>
  182. <Cell row="1" col="25" text="동의서일자"/>
  183. <Cell row="1" col="26" text="동의액"/>
  184. <Cell row="1" col="27" text="분심결정일자"/>
  185. <Cell row="1" col="28" text="분심결정삭감액"/>
  186. <Cell row="1" col="29" text="분심수수료"/>
  187. <Cell row="1" col="30" text="분심이자"/>
  188. <Cell row="1" col="37" text="접수번호"/>
  189. <Cell row="1" col="38" text="심사차수"/>
  190. </Band>
  191. <Band id="body">
  192. <Cell celltype="head" expr="currow+1"/>
  193. <Cell col="1" text="bind:num"/>
  194. <Cell col="2" text="bind:ioflag"/>
  195. <Cell col="3" displaytype="date" text="bind:clamym" mask="yyyy/MM"/>
  196. <Cell col="4" displaytype="date" text="bind:uncoym" mask="yyyy/MM"/>
  197. <Cell col="5" style="align:left middle;" text="bind:clamflag"/>
  198. <Cell col="6" text="bind:clamdg"/>
  199. <Cell col="7" displaytype="date" text="bind:acptdd" mask="yyyy/MM"/>
  200. <Cell col="8" text="bind:instcmpymark"/>
  201. <Cell col="9" text="bind:acdacptno"/>
  202. <Cell col="10" displaytype="combo" edittype="combo" text="bind:clamdeptcd" combodataset="ds_init_P0114list" combocodecol="cdid" combodatacol="cdnm"/>
  203. <Cell col="11" text="bind:docuseqno"/>
  204. <Cell col="12" text="bind:pid"/>
  205. <Cell col="13" text="bind:patnm"/>
  206. <Cell col="14" displaytype="date" text="bind:ordterm" mask="yyyy/MM/dd - yyyy/MM/dd"/>
  207. <Cell col="15" displaytype="number" text="bind:clamamt"/>
  208. <Cell col="16" displaytype="number" text="bind:sendamt"/>
  209. <Cell col="17" displaytype="number" text="bind:lastorgcutamt"/>
  210. <Cell col="18" displaytype="number" text="bind:tddecicutamt"/>
  211. <Cell col="19" displaytype="number" text="bind:rtnscheamt"/>
  212. <Cell col="20" displaytype="number" text="bind:rtnamt"/>
  213. <Cell col="21" displaytype="number" text="bind:depoamt"/>
  214. <Cell col="22" displaytype="date" text="bind:depodd" mask="yyyy-MM-dd"/>
  215. <Cell col="23" displaytype="date" text="bind:chkdocunotidd" mask="yyyy-MM-dd"/>
  216. <Cell col="24" displaytype="number" text="bind:adjtamt"/>
  217. <Cell col="25" displaytype="date" text="bind:rcogdocudelivedd" mask="yyyy-MM-dd"/>
  218. <Cell col="26" displaytype="number" text="bind:aprvamt"/>
  219. <Cell col="27" displaytype="number" text="bind:tddecidocuarvdd"/>
  220. <Cell col="28" displaytype="number" text="bind:tddecicutamt"/>
  221. <Cell col="29" displaytype="number" text="bind:tdcomsamt"/>
  222. <Cell col="30" displaytype="number" text="bind:tdrestpayamt"/>
  223. <Cell col="31" text="bind:orddrnm"/>
  224. <Cell col="32" text="bind:judgrid"/>
  225. <Cell col="33" displaytype="number" text="bind:totamt"/>
  226. <Cell col="34" displaytype="number" text="bind:inbe"/>
  227. <Cell col="35" displaytype="number" text="bind:medcaretotamt"/>
  228. <Cell col="36" displaytype="number" text="bind:beaf"/>
  229. <Cell col="37" text="bind:acptno"/>
  230. <Cell col="38" text="bind:judgdg"/>
  231. </Band>
  232. </Format>
  233. </Formats>
  234. </Grid>
  235. </Layout>
  236. </Layouts>
  237. </Tabpage>
  238. <Tabpage text="손보사별" id="case_claminsucmpy">
  239. <Layouts>
  240. <Layout>
  241. <Grid position="absolute 0 0 1190 615" id="grd_claminsucmpy" class="datagrid2" binddataset="ds_main_gridlist_claminsucmpygrid" anchor="default" oncellclick="grp_biz_switch1_case_claminsucmpy_grd_claminsucmpy_oncellclick" onkeydown="grp_biz_switch1_case_claminsucmpy_grd_claminsucmpy_onkeydown" cellsizingtype="col">
  242. <Formats>
  243. <Format id="default">
  244. <Columns>
  245. <Column size="27"/>
  246. <Column size="44"/>
  247. <Column size="54"/>
  248. <Column size="53"/>
  249. <Column size="54"/>
  250. <Column size="49"/>
  251. <Column size="152"/>
  252. <Column size="44"/>
  253. <Column size="100"/>
  254. <Column size="100"/>
  255. <Column size="100"/>
  256. <Column size="100"/>
  257. <Column size="100"/>
  258. <Column size="100"/>
  259. <Column size="100"/>
  260. <Column size="100"/>
  261. <Column size="100"/>
  262. <Column size="100"/>
  263. <Column size="100"/>
  264. <Column size="100"/>
  265. <Column size="100"/>
  266. <Column size="100"/>
  267. <Column size="100"/>
  268. <Column size="100"/>
  269. </Columns>
  270. <Rows>
  271. <Row size="24" band="head"/>
  272. <Row size="24" band="head"/>
  273. <Row size="24"/>
  274. </Rows>
  275. <Band id="head">
  276. <Cell rowspan="2" taborder="undefined"/>
  277. <Cell col="1" rowspan="2" text="내원&#10;유형" taborder="undefined"/>
  278. <Cell col="2" rowspan="2" text="청구월" taborder="undefined"/>
  279. <Cell col="3" rowspan="2" text="미수월" taborder="undefined"/>
  280. <Cell col="4" rowspan="2" text="청구&#10;구분" taborder="undefined"/>
  281. <Cell col="5" rowspan="2" text="청구&#10;차수" taborder="undefined"/>
  282. <Cell col="6" rowspan="2" text="손보사명" taborder="undefined"/>
  283. <Cell col="7" rowspan="2" text="건수" taborder="undefined"/>
  284. <Cell col="8" rowspan="2" text="청구총진료비" taborder="undefined"/>
  285. <Cell col="9" rowspan="2" text="반송액" taborder="undefined"/>
  286. <Cell col="10" rowspan="2" text="자보실삭감액&#10;(최종)" taborder="undefined"/>
  287. <Cell col="11" rowspan="2" text="분심결정삭감액" taborder="undefined"/>
  288. <Cell col="12" rowspan="2" text="환수예정액" taborder="undefined"/>
  289. <Cell col="13" rowspan="2" text="환수액" taborder="undefined"/>
  290. <Cell col="14" rowspan="2" text="입금액" taborder="undefined"/>
  291. <Cell col="15" colspan="5" text="검토서 등록 현황" taborder="undefined"/>
  292. <Cell col="20" rowspan="2" text="(재)급여총진료비" taborder="undefined"/>
  293. <Cell col="21" rowspan="2" text="재-전" taborder="undefined"/>
  294. <Cell col="22" rowspan="2" text="(전)급여총진료비" taborder="undefined"/>
  295. <Cell col="23" rowspan="2" text="전-후" taborder="undefined"/>
  296. <Cell row="1" col="15" text="조정액"/>
  297. <Cell row="1" col="16" text="동의액"/>
  298. <Cell row="1" col="17" text="분심결정삭감액"/>
  299. <Cell row="1" col="18" text="분심수수료"/>
  300. <Cell row="1" col="19" text="분심이자"/>
  301. </Band>
  302. <Band id="body">
  303. <Cell celltype="head" expr="currow+1"/>
  304. <Cell col="1" text="bind:ioflag"/>
  305. <Cell col="2" displaytype="date" text="bind:clamym" mask="yyyy/MM"/>
  306. <Cell col="3" displaytype="date" text="bind:uncoym" mask="yyyy/MM"/>
  307. <Cell col="4" displaytype="combo" edittype="combo" text="bind:clamflag" combodataset="ds_init_P0426list" combocodecol="cdid" combodatacol="cdnm"/>
  308. <Cell col="5" text="bind:clamdg"/>
  309. <Cell col="6" text="bind:instcmpymark"/>
  310. <Cell col="7" displaytype="number" text="bind:cnt"/>
  311. <Cell col="8" displaytype="number" text="bind:clamamt"/>
  312. <Cell col="9" displaytype="number" text="bind:sendamt"/>
  313. <Cell col="10" displaytype="number" text="bind:orgcutamt"/>
  314. <Cell col="11" displaytype="number" text="bind:tddecicutamt"/>
  315. <Cell col="12" displaytype="number" text="bind:rtnscheamt"/>
  316. <Cell col="13" displaytype="number" text="bind:rtnamt"/>
  317. <Cell col="14" displaytype="number" text="bind:depoamt"/>
  318. <Cell col="15" displaytype="number" text="bind:adjtamt"/>
  319. <Cell col="16" displaytype="number" text="bind:aprvamt"/>
  320. <Cell col="17" displaytype="number" text="bind:tddecicutamt2"/>
  321. <Cell col="18" displaytype="number" text="bind:tddeciamt"/>
  322. <Cell col="19" displaytype="number" text="bind:tdrestpayamt"/>
  323. <Cell col="20" displaytype="number" text="bind:intotamt"/>
  324. <Cell col="21" displaytype="number" text="bind:inbf"/>
  325. <Cell col="22" displaytype="number" text="bind:bftotamt"/>
  326. <Cell col="23" displaytype="number" text="bind:bfaf"/>
  327. </Band>
  328. </Format>
  329. </Formats>
  330. </Grid>
  331. </Layout>
  332. </Layouts>
  333. </Tabpage>
  334. </Tabpages>
  335. </Tab>
  336. <Button position="absolute 949 84 1002 103" id="button3" class="btn2" text="셀카피" anchor="default" onclick="grp_biz_button3_onclick"/>
  337. <Button position="absolute 1004 84 1057 103" id="button2" class="btn2" text="열카피" anchor="default" onclick="grp_biz_button2_onclick"/>
  338. <Button position="absolute 1059 84 1112 103" id="button1" class="btn2" text="행카피" anchor="default" onclick="grp_biz_button1_onclick"/>
  339. </Layout>
  340. </Layouts>
  341. </Div>
  342. <Static id="caption6" text="청구 및 입금 내역 조회(자보장부)" class="tit_1" position="absolute 1 0 249 23"/>
  343. </Layout>
  344. </Layouts>
  345. <Objects>
  346. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  347. <ColumnInfo>
  348. <Column id="flag" type="STRING" size="256"/>
  349. <Column id="ioflag" type="STRING" size="256"/>
  350. <Column id="termflag" type="STRING" size="256"/>
  351. <Column id="fromdd" type="STRING" size="256"/>
  352. <Column id="todd" type="STRING" size="256"/>
  353. <Column id="clamflag" type="STRING" size="256"/>
  354. <Column id="insucmpymark" type="STRING" size="256"/>
  355. <Column id="clamdg" type="STRING" size="256"/>
  356. </ColumnInfo>
  357. <Rows>
  358. <Row>
  359. <Col id="flag">P</Col>
  360. <Col id="ioflag">I</Col>
  361. <Col id="termflag">clamym</Col>
  362. </Row>
  363. </Rows>
  364. </Dataset>
  365. <Dataset id="ds_init_P0426list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  366. <ColumnInfo>
  367. <Column id="cdnm" type="STRING" size="256"/>
  368. <Column id="cdid" type="STRING" size="256"/>
  369. </ColumnInfo>
  370. </Dataset>
  371. <Dataset id="ds_init_clamdglist_clamdg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  372. <ColumnInfo>
  373. <Column id="cdnm" type="STRING" size="256"/>
  374. <Column id="cdid" type="STRING" size="256"/>
  375. </ColumnInfo>
  376. </Dataset>
  377. <Dataset id="ds_init_U0001list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  378. <ColumnInfo>
  379. <Column id="cd" type="STRING" size="256"/>
  380. <Column id="nm" type="STRING" size="256"/>
  381. </ColumnInfo>
  382. </Dataset>
  383. <Dataset id="ds_init_P0114list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  384. <ColumnInfo>
  385. <Column id="cdnm" type="STRING" size="256"/>
  386. <Column id="cdid" type="STRING" size="256"/>
  387. </ColumnInfo>
  388. </Dataset>
  389. <Dataset id="ds_main_gridlist_indgrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  390. <ColumnInfo>
  391. <Column id="num" type="INT" size="256" sumtext="연번"/>
  392. <Column id="ioflag" type="STRING" size="256" sumtext="내원유형"/>
  393. <Column id="clamym" type="STRING" size="256" sumtext="청구년월"/>
  394. <Column id="uncoym" type="STRING" size="256" sumtext="미수년월"/>
  395. <Column id="clamflag" type="STRING" size="256" sumtext="청구구분"/>
  396. <Column id="clamdg" type="STRING" size="256" sumtext="청구차수"/>
  397. <Column id="acptdd" type="STRING" size="256" sumtext="접수일자(청구일자)"/>
  398. <Column id="instcmpymark" type="STRING" size="256" sumtext="손보사명"/>
  399. <Column id="acdacptno" type="STRING" size="256" sumtext="사고접수번호"/>
  400. <Column id="clamdeptcd" type="STRING" size="256" sumtext="청구과코드"/>
  401. <Column id="docuseqno" type="STRING" size="256" sumtext="명일련"/>
  402. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  403. <Column id="patnm" type="STRING" size="256" sumtext="수진자"/>
  404. <Column id="ordterm" type="STRING" size="256" sumtext="진료기간"/>
  405. <Column id="clamamt" type="STRING" size="256" sumtext="청구총진료비"/>
  406. <Column id="sendamt" type="STRING" size="256" sumtext="반송액"/>
  407. <Column id="lastorgcutamt" type="STRING" size="256" sumtext="자보실삭감액(최종)"/>
  408. <Column id="tddecicutamt" type="STRING" size="256" sumtext="분심결정삭감액"/>
  409. <Column id="rtnscheamt" type="STRING" size="256" sumtext="환수예정액"/>
  410. <Column id="rtnamt" type="STRING" size="256" sumtext="환수액"/>
  411. <Column id="depoamt" type="STRING" size="256" sumtext="통장입금액"/>
  412. <Column id="depodd" type="STRING" size="256" sumtext="입금일자"/>
  413. <Column id="chkdocunotidd" type="STRING" size="256" sumtext="검토서일자"/>
  414. <Column id="adjtamt" type="STRING" size="256" sumtext="조정액"/>
  415. <Column id="rcogdocudelivedd" type="STRING" size="256" sumtext="동의서일자"/>
  416. <Column id="aprvamt" type="STRING" size="256" sumtext="동의액"/>
  417. <Column id="tddecidocuarvdd" type="STRING" size="256" sumtext="분심결정일자"/>
  418. <Column id="tddecicutamt" type="STRING" size="256" sumtext="분심결정삭감액"/>
  419. <Column id="tdcomsamt" type="STRING" size="256" sumtext="자보분쟁심의수수료"/>
  420. <Column id="tdrestpayamt" type="STRING" size="256" sumtext="분심이자"/>
  421. <Column id="orddrnm" type="STRING" size="256" sumtext="주치의"/>
  422. <Column id="judgrid" type="STRING" size="256" sumtext="심사자"/>
  423. <Column id="totamt" type="STRING" size="256" sumtext="(재)총진료비"/>
  424. <Column id="inbe" type="STRING" size="256" sumtext="재-전"/>
  425. <Column id="medcaretotamt" type="STRING" size="256" sumtext="(전)급여총진료비"/>
  426. <Column id="beaf" type="STRING" size="256" sumtext="전-후"/>
  427. <Column id="acptno" type="STRING" size="256" sumtext="접수번호"/>
  428. <Column id="judgdg" type="STRING" size="256" sumtext="심사차수"/>
  429. </ColumnInfo>
  430. </Dataset>
  431. <Dataset id="ds_main_gridlist_claminsucmpygrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  432. <ColumnInfo>
  433. <Column id="ioflag" type="STRING" size="256" sumtext="내원유형"/>
  434. <Column id="clamym" type="STRING" size="256" sumtext="청구년월"/>
  435. <Column id="uncoym" type="STRING" size="256" sumtext="미수년월"/>
  436. <Column id="clamflag" type="STRING" size="256" sumtext="청구구분"/>
  437. <Column id="clamdg" type="STRING" size="256" sumtext="청구차수"/>
  438. <Column id="instcmpymark" type="STRING" size="256" sumtext="손보사명"/>
  439. <Column id="cnt" type="STRING" size="256" sumtext="건수"/>
  440. <Column id="clamamt" type="STRING" size="256" sumtext="청구액"/>
  441. <Column id="sendamt" type="STRING" size="256" sumtext="반송액"/>
  442. <Column id="orgcutamt" type="STRING" size="256" sumtext="자보실삭감액(최종)"/>
  443. <Column id="tddecicutamt" type="STRING" size="256" sumtext="분심결정삭감액"/>
  444. <Column id="rtnscheamt" type="STRING" size="256" sumtext="환수예정액"/>
  445. <Column id="rtnamt" type="STRING" size="256" sumtext="환수액"/>
  446. <Column id="depoamt" type="STRING" size="256" sumtext="입금액"/>
  447. <Column id="adjtamt" type="STRING" size="256" sumtext="조정액"/>
  448. <Column id="aprvamt" type="STRING" size="256" sumtext="동의액"/>
  449. <Column id="tddecicutamt2" type="STRING" size="256" sumtext="분심결정삭감액"/>
  450. <Column id="tddeciamt" type="STRING" size="256" sumtext="분심수수료"/>
  451. <Column id="tdrestpayamt" type="STRING" size="256" sumtext="분심이자"/>
  452. <Column id="intotamt" type="STRING" size="256" sumtext="(재)급여총진료비"/>
  453. <Column id="inbf" type="STRING" size="256" sumtext="재-전"/>
  454. <Column id="bftotamt" type="STRING" size="256" sumtext="(전)급여총진료비"/>
  455. <Column id="bfaf" type="STRING" size="256" sumtext="전-후"/>
  456. </ColumnInfo>
  457. </Dataset>
  458. <Dataset id="ds_send_clamdgref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  459. <ColumnInfo>
  460. <Column id="dateflag" type="STRING" size="256"/>
  461. <Column id="todd" type="STRING" size="256"/>
  462. <Column id="fromdd" type="STRING" size="256"/>
  463. <Column id="ioflag" type="STRING" size="256"/>
  464. <Column id="insukind" type="STRING" size="256"/>
  465. <Column id="clamflag" type="STRING" size="256"/>
  466. <Column id="ordfildcd" type="STRING" size="256"/>
  467. <Column id="acptno" type="STRING" size="256"/>
  468. </ColumnInfo>
  469. <Rows>
  470. <Row/>
  471. </Rows>
  472. </Dataset>
  473. </Objects>
  474. <Bind>
  475. <BindItem id="item0" compid="grp_biz.grp_sea.rdo_flag" propid="value" datasetid="ds_send" columnid="flag"/>
  476. <BindItem id="item1" compid="grp_biz.grp_sea.rdo_ioflag" propid="value" datasetid="ds_send" columnid="ioflag"/>
  477. <BindItem id="item2" compid="grp_biz.grp_sea.rdo_dateflag" propid="value" datasetid="ds_send" columnid="termflag"/>
  478. <BindItem id="item3" compid="grp_biz.grp_sea.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
  479. <BindItem id="item4" compid="grp_biz.grp_sea.ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
  480. <BindItem id="item5" compid="grp_biz.grp_sea.cmb_clamflag" propid="value" datasetid="ds_send" columnid="clamflag"/>
  481. <BindItem id="item6" compid="grp_biz.grp_sea.cmb_clamdg" propid="value" datasetid="ds_send" columnid="clamflag"/>
  482. <BindItem id="item7" compid="grp_biz.grp_sea.cmb_insucmpymark" propid="value" datasetid="ds_send" columnid="insucmpymark"/>
  483. </Bind>
  484. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  485. * System Name :
  486. * Job Name :
  487. * Creator :
  488. * Make Date : 2016-05-24
  489. * Description :
  490. *---------------------------------------------------------------------------------------
  491. * Modify Date Modifier Modify Description
  492. *---------------------------------------------------------------------------------------
  493. * 2016-05-24 Live Converter TF->XP
  494. *
  495. *---------------------------------------------------------------------------------------
  496. ****************************************************************************************/
  497. include "com_commonxp::comm_main.xjs";
  498. include "pam_pamcomnxp::PAM001.xjs";
  499. include "pam_pamcomnxp::PAM.xjs";
  500. var col = "N";
  501. function SMPIF71000_oninit(obj:Form, e:InitEventInfo)
  502. {
  503. frmf_initForm(obj);
  504. }
  505. function SMPIF71000_onload(obj:Form, e:LoadEventInfo)
  506. {
  507. grdf_initGrid(grp_biz.switch1.case_claminsucmpy.grd_claminsucmpy);
  508. grdf_initGrid(grp_biz.switch1.case_ind.grd_ind);
  509. CommCode_Load();
  510. fInitialize();
  511. }
  512. function CommCode_Load()
  513. {
  514. var arrParam = [{dsNm: "ds_init_P0426list", cdGrpId: "P0426"}
  515. ,{dsNm: "ds_init_P0121list", cdGrpId: "P0121"}
  516. ,{dsNm: "ds_init_P0114list", cdGrpId: "P0114"}]
  517. appf_getCodeList(arrParam);
  518. var oParam = {};
  519. oParam.id = "TRPIF70305";
  520. oParam.service = "clamuncoapp.ClamUnco";
  521. oParam.method = "reqGetInsuComp";
  522. oParam.inds = "";
  523. oParam.outds = "ds_init_U0001list=U0001";
  524. oParam.async = false;
  525. //oParam.callback = "cf_TRPIF70305";
  526. tranf_submit(oParam);
  527. frmf_addComboItem("grp_biz.grp_sea.cmb_insucmpymark","전체","","above");
  528. grp_biz.grp_sea.cmb_insucmpymark.index = 0;
  529. }
  530. function fInitialize()
  531. {
  532. ds_send.setColumn(0, "flag", "C");
  533. ds_send.setColumn(0, "ioflag", "I");
  534. ds_send.setColumn(0, "termflag", "clamym");
  535. ds_send.setColumn(0, "todd", utlf_getCurrentDate());
  536. ds_send.setColumn(0, "fromdd", utlf_getCurrentDate().toDate().getAddDate(-90).getDateFormat("YYYYMM"));
  537. grp_biz.switch1.tabindex = 1;
  538. fDateChk();
  539. ds_main_gridlist_claminsucmpygrid.clearData();
  540. ds_main_gridlist_indgrid.clearData();
  541. }
  542. function fDateChk()
  543. {
  544. var dateflag = ( ds_send.getColumn(0, "termflag") == "clamym" ? 1 : 2 );
  545. var fromdd = ds_send.getColumn(0, "fromdd");
  546. var todd = ds_send.getColumn(0, "todd");
  547. if(ds_send.getColumn(0, "ioflag")== "A")
  548. {
  549. var ioflag = "";
  550. }
  551. else
  552. {
  553. var ioflag = ds_send.getColumn(0, "ioflag");
  554. }
  555. var insukind = "31";
  556. var clamflag = ds_send.getColumn(0, "clamflag");
  557. var ordfildcd = "";
  558. var acptno = "";
  559. if(utlf_isNull(fromdd))
  560. {
  561. sysf_messageBox("기간의 시작일자를","C001");
  562. grp_biz.grp_sea.ipt_fromdd.setFocus();
  563. }
  564. else if(utlf_isNull(todd))
  565. {
  566. sysf_messageBox("기간의 종료일자를","C001");
  567. grp_biz.grp_sea.ipt_todd.setFocus();
  568. }
  569. else
  570. {
  571. ds_send_clamdgref.setColumn(0, "dateflag", dateflag);
  572. ds_send_clamdgref.setColumn(0, "fromdd", fromdd);
  573. ds_send_clamdgref.setColumn(0, "todd", todd);
  574. ds_send_clamdgref.setColumn(0, "ioflag", ioflag);
  575. ds_send_clamdgref.setColumn(0, "insukind", insukind);
  576. ds_send_clamdgref.setColumn(0, "clamflag", clamflag);
  577. ds_send_clamdgref.setColumn(0, "ordfildcd", ordfildcd);
  578. ds_send_clamdgref.setColumn(0, "acptno", acptno);
  579. var oParam = {};
  580. oParam.id = "TRPIF20101";
  581. oParam.service = "clamuncoapp.ClamUnco";
  582. oParam.method = "reqGetIndAllSpecClamDgList";
  583. oParam.inds = "req=ds_send_clamdgref";
  584. oParam.outds = "ds_init_clamdglist_clamdg=clamdg";
  585. oParam.async = false;
  586. //oParam.callback = "cf_TRPIF20101";
  587. tranf_submit(oParam);
  588. fClamDg();
  589. grp_biz.grp_sea.cmb_clamdg.index = 0;
  590. }
  591. }
  592. function fClamDg()
  593. {
  594. frmf_addComboItem("grp_biz.grp_sea.cmb_clamdg"," ","","above");
  595. // var node = root.init.clamdglist;
  596. // var addnode = root.hidden.clamdg;
  597. //
  598. // var clamdgnode = root.init.clamdglist;
  599. // var hasChild = clamdgnode.hasChildNodes();
  600. // if (hasChild == 0) {
  601. // model.makeNode("/root/init/clamdglist/clamdg");
  602. // }
  603. // var refnode = root.init.clamdglist.clamdg;
  604. // node.insertbefore(addnode,refnode);
  605. // model.makeNode("/root/hidden/clamdg");
  606. // model.copyNode("/root/hidden/clamdg","/root/init/clamdglist/clamdg");
  607. }
  608. function grp_biz_grp_sea_rdo_flag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  609. {
  610. var flag = ds_send.getColumn(0, "flag");
  611. if(flag == "C")
  612. {
  613. grp_biz.switch1.tabindex = 1;
  614. }
  615. else
  616. {
  617. grp_biz.switch1.tabindex = 0;
  618. }
  619. }
  620. function grp_biz_grp_sea_ipt_fromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
  621. {
  622. var date = obj.value;
  623. ds_send.setColumn(0, "fromdd", String(date).substr(0,6));
  624. fDateChk();
  625. }
  626. function grp_biz_grp_sea_ipt_todd_onchanged(obj:Calendar, e:ChangeEventInfo)
  627. {
  628. var date = obj.value;
  629. ds_send.setColumn(0, "todd", String(date).substr(0,6));
  630. fDateChk();
  631. }
  632. function grp_biz_grp_sea_btn_search_onclick(obj:Button, e:ClickEventInfo)
  633. {
  634. var oParam = {};
  635. oParam.id = "TRPIF71000";
  636. oParam.service = "clamuncoapp.ClamUnco";
  637. oParam.method = "reqGetClamDepoAutmbBooks";
  638. oParam.inds = "req=ds_send";
  639. oParam.outds = "ds_main_gridlist_indgrid=indgrid ds_main_gridlist_claminsucmpygrid=claminsucmpygrid";
  640. oParam.async = false;
  641. //oParam.callback = "cf_TRPIF71000";
  642. tranf_submit(oParam);
  643. }
  644. function grp_biz_switch1_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
  645. {
  646. if(obj.tabindex == 0)
  647. {
  648. ds_send.setColumn(0, "flag", "P");
  649. }
  650. else if(obj.tabindex == 1)
  651. {
  652. ds_send.setColumn(0, "flag", "C");
  653. }
  654. }
  655. function grp_biz_btn_excel_onclick(obj:Button, e:ClickEventInfo)
  656. {
  657. if(grp_biz.switch1.tabindex == 0)
  658. {
  659. var today = utlf_getCurrentDate();
  660. if (ds_main_gridlist_indgrid.rowcount < 1)
  661. {
  662. return;
  663. }
  664. else
  665. {
  666. grdf_exportExcel(grp_biz.switch1.case_ind.grd_ind, "청구 및 입금 내역 조회(자보장부)-개인별_"+today, "see");
  667. }
  668. }
  669. else
  670. {
  671. var today = utlf_getCurrentDate();
  672. if (ds_main_gridlist_claminsucmpygrid.rowcount < 1)
  673. {
  674. return;
  675. }
  676. else
  677. {
  678. grdf_exportExcel(grp_biz.switch1.case_claminsucmpy.grd_claminsucmpy, "청구 및 입금 내역 조회(자보장부)-손보사별_"+today, "see");
  679. }
  680. }
  681. }
  682. function grp_biz_button3_onclick(obj:Button, e:ClickEventInfo)
  683. {
  684. col = "N";
  685. grp_biz.switch1.case_ind.grd_ind.selecttype = "multiarea";
  686. grp_biz.switch1.case_claminsucmpy.grd_claminsucmpy.selecttype = "multiarea";
  687. }
  688. function grp_biz_button2_onclick(obj:Button, e:ClickEventInfo)
  689. {
  690. col = "Y";
  691. grp_biz.switch1.case_ind.grd_ind.selecttype = "multiarea";
  692. grp_biz.switch1.case_claminsucmpy.grd_claminsucmpy.selecttype = "multiarea";
  693. }
  694. function grp_biz_button1_onclick(obj:Button, e:ClickEventInfo)
  695. {
  696. col = "N";
  697. grp_biz.switch1.case_ind.grd_ind.selecttype = "multirow";
  698. grp_biz.switch1.case_claminsucmpy.grd_claminsucmpy.selecttype = "multirow";
  699. }
  700. function grp_biz_switch1_case_ind_grd_ind_oncellclick(obj:Grid, e:GridClickEventInfo)
  701. {
  702. var lv_nAreaStartRow;
  703. var lv_nAreaEndRow;
  704. var lv_nAreaStartCol;
  705. var lv_nAreaEndCol;
  706. if(col == "Y")
  707. {
  708. lv_nAreaStartRow = 0;
  709. lv_nAreaEndRow = parseInt(obj.rowcount-1);
  710. lv_nAreaStartCol = parseInt(obj.currentcol);
  711. lv_nAreaEndCol = parseInt(obj.currentcol);
  712. grdf_initGridStyle(obj);
  713. for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++)
  714. {
  715. for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++)
  716. {
  717. obj.setCellProperty("body",nCell,"background","#FFE7E5");
  718. obj.setCellProperty("body",nCell,"background2","#FFE7E5");
  719. }
  720. }
  721. }
  722. else
  723. {
  724. grdf_initGridStyle(obj);
  725. }
  726. }
  727. function grp_biz_switch1_case_ind_grd_ind_onkeydown(obj:Grid, e:KeyEventInfo)
  728. {
  729. if(col == "Y")
  730. {
  731. var CONST_SEPARATOR = " "; //컬럼별 구분자
  732. var lv_oBindDs = eval(obj.binddataset);
  733. var lv_sColID;
  734. var lv_sVal;
  735. var lv_sClipboard = "";
  736. var lv_nAreaStartRow;
  737. var lv_nAreaEndRow;
  738. var lv_nAreaStartCol;
  739. var lv_nAreaEndCol;
  740. if(obj.selecttype == "multiarea")
  741. {
  742. lv_nAreaStartRow = 0;
  743. lv_nAreaEndRow = parseInt(obj.rowcount-1);
  744. lv_nAreaStartCol = parseInt(obj.currentcol);
  745. lv_nAreaEndCol = parseInt(obj.currentcol);
  746. }
  747. for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++)
  748. {
  749. for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++)
  750. {
  751. lv_sColID = obj.getCellProperty("body",nCell,"text");
  752. lv_sVal = obj.getCellValue(nRow,nCell);
  753. lv_sClipboard = lv_sClipboard + lv_sVal + CONST_SEPARATOR;
  754. }
  755. lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
  756. lv_sClipboard = lv_sClipboard +String.fromCharCode(10);
  757. }
  758. lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
  759. iv_sClipboard = lv_sClipboard;
  760. system.setClipboard("CF_TEXT",lv_sClipboard);
  761. }
  762. else
  763. {
  764. if (e.ctrlKey == true && e.keycode == 67 )
  765. {
  766. grdf_clipboardCopy(obj, "PAM");
  767. }
  768. }
  769. }
  770. function grp_biz_switch1_case_claminsucmpy_grd_claminsucmpy_oncellclick(obj:Grid, e:GridClickEventInfo)
  771. {
  772. var lv_nAreaStartRow;
  773. var lv_nAreaEndRow;
  774. var lv_nAreaStartCol;
  775. var lv_nAreaEndCol;
  776. if(col == "Y")
  777. {
  778. lv_nAreaStartRow = 0;
  779. lv_nAreaEndRow = parseInt(obj.rowcount-1);
  780. lv_nAreaStartCol = parseInt(obj.currentcol);
  781. lv_nAreaEndCol = parseInt(obj.currentcol);
  782. grdf_initGridStyle(obj);
  783. for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++)
  784. {
  785. for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++)
  786. {
  787. obj.setCellProperty("body",nCell,"background","#FFE7E5");
  788. obj.setCellProperty("body",nCell,"background2","#FFE7E5");
  789. }
  790. }
  791. }
  792. else
  793. {
  794. grdf_initGridStyle(obj);
  795. }
  796. }
  797. function grp_biz_switch1_case_claminsucmpy_grd_claminsucmpy_onkeydown(obj:Grid, e:KeyEventInfo)
  798. {
  799. if(col == "Y")
  800. {
  801. var CONST_SEPARATOR = " "; //컬럼별 구분자
  802. var lv_oBindDs = eval(obj.binddataset);
  803. var lv_sColID;
  804. var lv_sVal;
  805. var lv_sClipboard = "";
  806. var lv_nAreaStartRow;
  807. var lv_nAreaEndRow;
  808. var lv_nAreaStartCol;
  809. var lv_nAreaEndCol;
  810. if(obj.selecttype == "multiarea")
  811. {
  812. lv_nAreaStartRow = 0;
  813. lv_nAreaEndRow = parseInt(obj.rowcount-1);
  814. lv_nAreaStartCol = parseInt(obj.currentcol);
  815. lv_nAreaEndCol = parseInt(obj.currentcol);
  816. }
  817. for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++)
  818. {
  819. for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++)
  820. {
  821. lv_sColID = obj.getCellProperty("body",nCell,"text");
  822. lv_sVal = obj.getCellValue(nRow,nCell);
  823. lv_sClipboard = lv_sClipboard + lv_sVal + CONST_SEPARATOR;
  824. }
  825. lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
  826. lv_sClipboard = lv_sClipboard +String.fromCharCode(10);
  827. }
  828. lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
  829. iv_sClipboard = lv_sClipboard;
  830. system.setClipboard("CF_TEXT",lv_sClipboard);
  831. }
  832. else
  833. {
  834. if (e.ctrlKey == true && e.keycode == 67 )
  835. {
  836. grdf_clipboardCopy(obj, "PAM");
  837. }
  838. }
  839. }
  840. ]]></Script>
  841. </Form>
  842. </FDL>