SMPIF72100_반송재청구장부(산재).xfdl 27 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPIF72100" position="absolute 0 0 1204 765" titletext="반송재청구장부(산재)" oninit="SMPIF72100_oninit" onload="SMPIF72100_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 1 13 1196 750" id="group4" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Div position="absolute 0 11 1194 71" align="align:center top;" id="group5" class="div_SA" anchor="left top right">
  11. <Layouts>
  12. <Layout>
  13. <Button position="absolute 1123 20 1179 42" id="button1" class="btn1" text="조회" anchor="top right" onclick="group4_group5_button1_onclick"/>
  14. <Shape position="absolute 1105 12 1111 49" linetype="vertical" id="line26" class="line_4" anchor="top right"/>
  15. <Static text="~" position="absolute 296 11 311 26" id="caption31" anchor="default"/>
  16. <Radio position="absolute 83 8 198 25" id="rdo_termflag" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="group4_group5_rdo_termflag_onitemchanged">
  17. <Dataset id="innerdataset">
  18. <ColumnInfo>
  19. <Column id="codecolumn"/>
  20. <Column id="datacolumn"/>
  21. </ColumnInfo>
  22. <Rows>
  23. <Row>
  24. <Col id="codecolumn">clamym</Col>
  25. <Col id="datacolumn">청구월</Col>
  26. </Row>
  27. <Row>
  28. <Col id="codecolumn">uncoym</Col>
  29. <Col id="datacolumn">미수월</Col>
  30. </Row>
  31. </Rows>
  32. </Dataset>
  33. </Radio>
  34. <Static text="내원유형 :" position="absolute 425 8 515 25" id="caption67" class="search_name" anchor="default"/>
  35. <Static text="완료여부 :" position="absolute 780 8 870 25" id="caption22" class="search_name" anchor="default"/>
  36. <Static text="심사자 :" position="absolute 13 36 88 53" id="caption38" class="search_name" anchor="default"/>
  37. <Static text="진료과 :" position="absolute 425 35 500 52" id="caption39" class="search_name" anchor="default"/>
  38. <Static text="환자단위조회 :" position="absolute 780 35 892 52" id="caption40" class="search_name" anchor="default"/>
  39. <Combo position="absolute 85 34 175 53" id="cmb_judgrid" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
  40. <Dataset id="innerdataset">
  41. <ColumnInfo>
  42. <Column id="codecolumn"/>
  43. <Column id="datacolumn"/>
  44. </ColumnInfo>
  45. <Rows>
  46. <Row>
  47. <Col id="codecolumn">combo2</Col>
  48. <Col id="datacolumn">combo2</Col>
  49. </Row>
  50. </Rows>
  51. </Dataset>
  52. </Combo>
  53. <Combo position="absolute 505 33 645 52" id="cmb_orddeptcd" class="combo_search" innerdataset="ds_init_cmb_orddeptcd" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
  54. <Radio position="absolute 505 6 640 23" id="rdo_ioflag" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
  55. <Dataset id="innerdataset">
  56. <ColumnInfo>
  57. <Column id="codecolumn"/>
  58. <Column id="datacolumn"/>
  59. </ColumnInfo>
  60. <Rows>
  61. <Row>
  62. <Col id="codecolumn">A</Col>
  63. <Col id="datacolumn">전체</Col>
  64. </Row>
  65. <Row>
  66. <Col id="codecolumn">I</Col>
  67. <Col id="datacolumn">입원</Col>
  68. </Row>
  69. <Row>
  70. <Col id="codecolumn">O</Col>
  71. <Col id="datacolumn">외래</Col>
  72. </Row>
  73. </Rows>
  74. </Dataset>
  75. </Radio>
  76. <Radio position="absolute 867 7 1036 24" id="rdo_endyn" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
  77. <Dataset id="innerdataset">
  78. <ColumnInfo>
  79. <Column id="codecolumn"/>
  80. <Column id="datacolumn"/>
  81. </ColumnInfo>
  82. <Rows>
  83. <Row>
  84. <Col id="codecolumn">A</Col>
  85. <Col id="datacolumn">전체</Col>
  86. </Row>
  87. <Row>
  88. <Col id="codecolumn">Y</Col>
  89. <Col id="datacolumn">완료</Col>
  90. </Row>
  91. <Row>
  92. <Col id="codecolumn">N</Col>
  93. <Col id="datacolumn">미완료</Col>
  94. </Row>
  95. </Rows>
  96. </Dataset>
  97. </Radio>
  98. <Edit position="absolute 886 33 976 52" id="ipt_patunitsrch" class="input_search" anchor="default" onkeydown="group4_group5_ipt_patunitsrch_onkeydown"/>
  99. <Static text="구분 :" position="absolute 13 9 73 26" id="caption1" class="search_name" anchor="default"/>
  100. <Button id="btn_srchchoicd" taborder="1" class="icon_search" position="absolute 976 32 996 52" anchor="default" onclick="group4_group5_btn_srchchoicd_onclick"/>
  101. <cp_monthCal id="ipt_fromdd" titletext="monthCalendar" taborder="2" text="cp_monthCal00" scrollbars="none" position="absolute 215 7 291 32" anchor="default"/>
  102. <cp_monthCal id="ipt_todd" titletext="monthCalendar" taborder="3" text="cp_monthCal00" scrollbars="none" position="absolute 312 7 388 32" anchor="default"/>
  103. </Layout>
  104. </Layouts>
  105. </Div>
  106. <Shape position="absolute 0 101 1194 107" linetype="horizontal" id="line28" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  107. <Static text="반송전체" position="absolute 0 85 74 107" id="caption37" class="tit_2" anchor="default"/>
  108. <Grid position="absolute 0 106 1194 736" id="grd_procsendspec" class="datagrid2" binddataset="ds_main_list01_gridsendreclambookspec" anchor="all" oncellclick="group4_grd_procsendspec_oncellclick" onkeydown="group4_grd_procsendspec_onkeydown" cellsizingtype="col">
  109. <Formats>
  110. <Format id="default">
  111. <Columns>
  112. <Column size="23"/>
  113. <Column size="60"/>
  114. <Column size="60"/>
  115. <Column size="40"/>
  116. <Column size="60"/>
  117. <Column size="40"/>
  118. <Column size="70"/>
  119. <Column size="50"/>
  120. <Column size="99"/>
  121. <Column size="72"/>
  122. <Column size="59"/>
  123. <Column size="72"/>
  124. <Column size="114"/>
  125. <Column size="80"/>
  126. <Column size="82"/>
  127. <Column size="87"/>
  128. <Column size="80"/>
  129. <Column size="92"/>
  130. <Column size="85"/>
  131. <Column size="47"/>
  132. <Column size="51"/>
  133. <Column size="70"/>
  134. <Column size="80"/>
  135. <Column size="60"/>
  136. <Column size="80"/>
  137. <Column size="147"/>
  138. </Columns>
  139. <Rows>
  140. <Row size="31" band="head"/>
  141. <Row size="24"/>
  142. </Rows>
  143. <Band id="head">
  144. <Cell/>
  145. <Cell col="1" text="청구월"/>
  146. <Cell col="2" text="청구형태"/>
  147. <Cell col="3" text="청구&#10;차수"/>
  148. <Cell col="4" text="미수월"/>
  149. <Cell col="5" text="내원&#10;유형"/>
  150. <Cell col="6" text="산재유형"/>
  151. <Cell col="7" text="명일련"/>
  152. <Cell col="8" text="등록번호"/>
  153. <Cell col="9" text="수진자"/>
  154. <Cell col="10" text="심사자"/>
  155. <Cell col="11" text="사유"/>
  156. <Cell col="12" text="사유설명"/>
  157. <Cell col="13" text="청구액"/>
  158. <Cell col="14" text="재청구여부"/>
  159. <Cell col="15" text="부제기사유"/>
  160. <Cell col="16" text="보완청구액&#10;-원청구차액"/>
  161. <Cell col="17" text="차액발생사유"/>
  162. <Cell col="18" text="보완&#10;청구연월"/>
  163. <Cell col="19" text="청구&#10;차수"/>
  164. <Cell col="20" text="보완&#10;심사자"/>
  165. <Cell col="21" text="보완&#10;청구일자"/>
  166. <Cell col="22" text="청구액"/>
  167. <Cell col="23" text="재반송&#10;여부"/>
  168. <Cell col="24" text="실삭감액"/>
  169. <Cell col="25" text="비고"/>
  170. </Band>
  171. <Band id="body">
  172. <Cell celltype="head" expr="currow+1"/>
  173. <Cell col="1" displaytype="date" text="bind:clamym" mask="yyyy-MM"/>
  174. <Cell col="2" displaytype="combo" edittype="combo" text="bind:clamflag" combodataset="ds_init_P0121list" combocodecol="cdid" combodatacol="cdnm"/>
  175. <Cell col="3" text="bind:clamdg"/>
  176. <Cell col="4" displaytype="expr:uncoym == '-' ? 'normal' : 'date'" text="bind:uncoym" mask="expr:uncoym == '-' ? '' : 'yyyy-MM'"/>
  177. <Cell col="5" text="bind:ioflag"/>
  178. <Cell col="6" text="bind:insukind"/>
  179. <Cell col="7" text="bind:docuseqno"/>
  180. <Cell col="8" text="bind:pid"/>
  181. <Cell col="9" text="bind:patnm"/>
  182. <Cell col="10" text="bind:judgrid"/>
  183. <Cell col="11" displaytype="combo" edittype="combo" text="bind:reteresn" combodataset="ds_init_P0242list" combocodecol="cdid" combodatacol="cdnm"/>
  184. <Cell col="12" text="bind:reteresnrem"/>
  185. <Cell col="13" displaytype="number" text="bind:clclamamt"/>
  186. <Cell col="14" text="bind:reclamyn"/>
  187. <Cell col="15" text="bind:abdresncd"/>
  188. <Cell col="16" displaytype="number" text="bind:repletclamdifamt"/>
  189. <Cell col="17" text="bind:difamtgenrresn"/>
  190. <Cell col="18" displaytype="expr:utlf_isNull(repletclamym) ? 'normal' : 'date'" text="bind:repletclamym" mask="expr:utlf_isNull(repletclamym) ? '' : 'yyyy-MM'"/>
  191. <Cell col="19" text="bind:repletclamdg"/>
  192. <Cell col="20" text="bind:repletjudgrid"/>
  193. <Cell col="21" displaytype="expr:utlf_isNull(repletacptdd) ? 'normal' : 'date'" text="bind:repletacptdd" mask="expr:utlf_isNull(repletacptdd) ? '' : 'yyyy-MM-dd'"/>
  194. <Cell col="22" displaytype="number" text="bind:repletclamamt"/>
  195. <Cell col="23" text="bind:resendyn"/>
  196. <Cell col="24" displaytype="number" text="bind:repletjrrealcutamt"/>
  197. <Cell col="25" style="align:left middle;" text="bind:rem"/>
  198. </Band>
  199. </Format>
  200. </Formats>
  201. </Grid>
  202. <Button position="absolute 814 82 856 101" id="button26" class="btn2" visible="false" text="저장" anchor="top right"/>
  203. <Button position="absolute 965 82 1018 101" id="button3" class="btn2" text="행카피" anchor="top right" onclick="group4_button3_onclick"/>
  204. <Button position="absolute 1019 82 1113 101" id="button4" class="btn7" text="Open Excel" anchor="top right" onclick="group4_button4_onclick"/>
  205. <Button position="absolute 911 82 964 101" id="button5" class="btn2" text="열카피" anchor="top right" onclick="group4_button5_onclick"/>
  206. <Button position="absolute 857 82 910 101" id="button10" class="btn2" text="셀카피" anchor="top right" onclick="group4_button10_onclick"/>
  207. <Button position="absolute 1114 82 1194 101" id="button12" class="btn7" text="엑셀저장" anchor="top right" onclick="group4_button12_onclick"/>
  208. </Layout>
  209. </Layouts>
  210. </Div>
  211. <Static id="caption6" text="반송재청구장부(산재)" class="tit_1" position="absolute 1 0 249 23"/>
  212. </Layout>
  213. </Layouts>
  214. <Objects>
  215. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  216. <ColumnInfo>
  217. <Column id="termflag" type="STRING" size="256"/>
  218. <Column id="fromdd" type="STRING" size="256"/>
  219. <Column id="todd" type="STRING" size="256"/>
  220. <Column id="ioflag" type="STRING" size="256"/>
  221. <Column id="judgrid" type="STRING" size="256"/>
  222. <Column id="endyn" type="STRING" size="256"/>
  223. <Column id="orddeptcd" type="STRING" size="256"/>
  224. <Column id="patunitsrch1" type="STRING" size="256"/>
  225. </ColumnInfo>
  226. <Rows>
  227. <Row>
  228. <Col id="termflag">clamym</Col>
  229. <Col id="fromdd"/>
  230. <Col id="todd"/>
  231. <Col id="ioflag">A</Col>
  232. <Col id="judgrid"/>
  233. <Col id="endyn"/>
  234. <Col id="orddeptcd"/>
  235. <Col id="patunitsrch1"/>
  236. </Row>
  237. </Rows>
  238. </Dataset>
  239. <Dataset id="ds_init_P0121list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  240. <ColumnInfo>
  241. <Column id="cdnm" type="STRING" size="256"/>
  242. <Column id="cdid" type="STRING" size="256"/>
  243. </ColumnInfo>
  244. </Dataset>
  245. <Dataset id="ds_init_P0114list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  246. <ColumnInfo>
  247. <Column id="cdnm" type="STRING" size="256"/>
  248. <Column id="cdid" type="STRING" size="256"/>
  249. </ColumnInfo>
  250. </Dataset>
  251. <Dataset id="ds_init_P0242list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  252. <ColumnInfo>
  253. <Column id="cdnm" type="STRING" size="256"/>
  254. <Column id="cdid" type="STRING" size="256"/>
  255. </ColumnInfo>
  256. </Dataset>
  257. <Dataset id="ds_main_list01_gridsendreclambookspec" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  258. <ColumnInfo>
  259. <Column id="clamym" type="STRING" size="256" sumtext="청구월"/>
  260. <Column id="clamflag" type="STRING" size="256" sumtext="청구형태"/>
  261. <Column id="clamdg" type="STRING" size="256" sumtext="청구차수"/>
  262. <Column id="uncoym" type="STRING" size="256" sumtext="미수월"/>
  263. <Column id="ioflag" type="STRING" size="256" sumtext="내원유형"/>
  264. <Column id="insukind" type="STRING" size="256" sumtext="산재유형"/>
  265. <Column id="docuseqno" type="STRING" size="256" sumtext="명일련"/>
  266. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  267. <Column id="patnm" type="STRING" size="256" sumtext="수진자"/>
  268. <Column id="judgrid" type="STRING" size="256" sumtext="심사자"/>
  269. <Column id="reteresn" type="STRING" size="256" sumtext="사유"/>
  270. <Column id="reteresnrem" type="STRING" size="256" sumtext="사유설명"/>
  271. <Column id="clclamamt" type="STRING" size="256" sumtext="청구액"/>
  272. <Column id="reclamyn" type="STRING" size="256" sumtext="재청구여부"/>
  273. <Column id="abdresncd" type="STRING" size="256" sumtext="부제기사유"/>
  274. <Column id="repletclamdifamt" type="STRING" size="256" sumtext="보완원청구액"/>
  275. <Column id="difamtgenrresn" type="STRING" size="256" sumtext="차액발생사유"/>
  276. <Column id="repletclamym" type="STRING" size="256" sumtext="보완청구연월"/>
  277. <Column id="repletclamdg" type="STRING" size="256" sumtext="재청구차수"/>
  278. <Column id="repletjudgrid" type="STRING" size="256" sumtext="보완심사자"/>
  279. <Column id="repletacptdd" type="STRING" size="256" sumtext="보완청구일자"/>
  280. <Column id="repletclamamt" type="STRING" size="256" sumtext="청구액"/>
  281. <Column id="resendyn" type="STRING" size="256" sumtext="재청구여부"/>
  282. <Column id="repletjrrealcutamt" type="STRING" size="256" sumtext="실삭감액"/>
  283. <Column id="rem" type="STRING" size="256" sumtext="비고"/>
  284. </ColumnInfo>
  285. </Dataset>
  286. <Dataset id="ds_hidden_sppmc02500_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  287. <ColumnInfo>
  288. <Column id="srchcond" type="STRING" size="256"/>
  289. <Column id="pid" type="STRING" size="256"/>
  290. <Column id="hngnm" type="STRING" size="256"/>
  291. </ColumnInfo>
  292. <Rows>
  293. <Row/>
  294. </Rows>
  295. </Dataset>
  296. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  297. </Objects>
  298. <Bind>
  299. <BindItem id="item0" compid="group4.group5.rdo_termflag" propid="value" datasetid="ds_send" columnid="termflag"/>
  300. <BindItem id="item3" compid="group4.group5.rdo_ioflag" propid="value" datasetid="ds_send" columnid="ioflag"/>
  301. <BindItem id="item4" compid="group4.group5.rdo_endyn" propid="value" datasetid="ds_send" columnid="endyn"/>
  302. <BindItem id="item5" compid="group4.group5.ipt_patunitsrch" propid="value" datasetid="ds_send" columnid="patunitsrch1"/>
  303. <BindItem id="item6" compid="group4.group5.cmb_orddeptcd" propid="value" datasetid="ds_send" columnid="orddeptcd"/>
  304. <BindItem id="item7" compid="group4.group5.cmb_judgrid" propid="value" datasetid="ds_send" columnid="judgrid"/>
  305. <BindItem id="item1" compid="group4.group5.ipt_fromdd" propid="text" datasetid="ds_send" columnid="fromdd"/>
  306. </Bind>
  307. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  308. * System Name :
  309. * Job Name :
  310. * Creator :
  311. * Make Date : 2016-05-24
  312. * Description :
  313. *---------------------------------------------------------------------------------------
  314. * Modify Date Modifier Modify Description
  315. *---------------------------------------------------------------------------------------
  316. * 2016-05-24 Live Converter TF->XP
  317. *
  318. *---------------------------------------------------------------------------------------
  319. ****************************************************************************************/
  320. include "com_commonxp::comm_main.xjs";
  321. include "pam_pamcomnxp::PAM001.xjs";
  322. include "pam_pamcomnxp::PAM.xjs";
  323. var col = "N";
  324. function SMPIF72100_oninit(obj:Form, e:InitEventInfo)
  325. {
  326. frmf_initForm(obj);
  327. }
  328. function SMPIF72100_onload(obj:Form, e:LoadEventInfo)
  329. {
  330. var arrParam = [{dsNm: "ds_init_P0114list", cdGrpId: "P0114"}
  331. ,{dsNm: "ds_init_P0242list", cdGrpId: "P0242"}
  332. ,{dsNm: "ds_init_P0121list", cdGrpId: "P0121"}]
  333. appf_getCodeList(arrParam);
  334. group4.group5.ipt_fromdd.setCallEvent("fn_cp_monthCal00");
  335. group4.group5.ipt_todd.setCallEvent("fn_cp_monthCal01");
  336. ds_send.setColumn(0, "fromdd", String(utlf_getCurrentDate()).substr(0,6));
  337. ds_send.setColumn(0, "todd", String(utlf_getCurrentDate()).substr(0,6));
  338. group4.group5.ipt_fromdd.setFocus();
  339. }
  340. function fn_cp_monthCal00()
  341. {
  342. var month = group4.group5.ipt_fromdd.getData();
  343. ds_send.setColumn(0, "fromdd", month);
  344. ds_send.setColumn(0, "todd", month);
  345. group4.group5.ipt_todd.setData(month);
  346. }
  347. function fn_cp_monthCal01()
  348. {
  349. var month = group4.group5.ipt_todd.getData();
  350. ds_send.setColumn(0, "todd", month);
  351. }
  352. function group4_group5_rdo_termflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  353. {
  354. ds_send.setColumn(0, "fromdd", "");
  355. ds_send.setColumn(0, "todd", "");
  356. group4.group5.ipt_fromdd.setData("");
  357. group4.group5.ipt_todd.setData("");
  358. group4.group5.ipt_fromdd.setFocus();
  359. }
  360. function group4_group5_ipt_patunitsrch_onkeydown(obj:Edit, e:KeyEventInfo)
  361. {
  362. if(e.keycode == 13)
  363. {
  364. if(obj.value > 1)
  365. {
  366. ds_send.setColumn(0, "patunitsrch1", obj.value);
  367. fPatTypeSrch();
  368. }
  369. }
  370. }
  371. function group4_group5_btn_srchchoicd_onclick(obj:Button, e:ClickEventInfo)
  372. {
  373. fPatTypeSrch();
  374. }
  375. function fPatTypeSrch()
  376. {
  377. var ipt_pid = ds_send.getColumn(0, "patunitsrch1");
  378. if (ipt_pid)
  379. {
  380. if(ipt_pid.isNumber())
  381. {
  382. ds_hidden_sppmc02500_cond.setColumn(0, "srchcond", "1");
  383. ds_hidden_sppmc02500_cond.setColumn(0, "pid", ipt_pid);
  384. }
  385. else
  386. {
  387. ds_hidden_sppmc02500_cond.setColumn(0, "srchcond", "2");
  388. ds_hidden_sppmc02500_cond.setColumn(0, "hngnm", ipt_pid);
  389. }
  390. }
  391. else
  392. {
  393. ds_hidden_sppmc02500_cond.clearData();
  394. ds_hidden_sppmc02500_cond.addRow();
  395. }
  396. var objArg = new Object();
  397. objArg.arg_ds_send= ds_hidden_sppmc02500_cond;
  398. frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "", "", "", "", "", "", "", "", "M");
  399. if (!utlf_isNull(ipt_pid))
  400. {
  401. if(ipt_pid.isNumber())
  402. {
  403. var srch_pid = ds_patinfolist.getColumn(0, "pid");
  404. ds_send.setColumn(0, "patunitsrch1", srch_pid);
  405. }
  406. else
  407. {
  408. var srch_pid = ds_patinfolist.getColumn(0, "hngnm");
  409. ds_send.setColumn(0, "patunitsrch1", srch_pid);
  410. }
  411. }
  412. else
  413. {
  414. var srch_pid = ds_patinfolist.getColumn(0, "pid");
  415. ds_send.setColumn(0, "patunitsrch1", srch_pid);
  416. }
  417. fGetInAftJudgTrgtManList();
  418. }
  419. function fGetInAftJudgTrgtManList()
  420. {
  421. var patunitsrch1 = ds_send.getColumn(0, "patunitsrch1");
  422. ds_send.setColumn(0, "patunitsrch1", patunitsrch1);
  423. if (utlf_isNull(patunitsrch1))
  424. {
  425. ds_send.setColumn(0, "patunitsrch2", "");
  426. }
  427. else if (patunitsrch1.isNumber())
  428. {
  429. ds_send.setColumn(0, "patunitsrch2", "pidSrch");
  430. }
  431. else
  432. {
  433. if (patunitsrch1.length > 1)
  434. {
  435. ds_send.setColumn(0, "patunitsrch2", "nmSrch");
  436. }
  437. else
  438. {
  439. ds_send.setColumn(0, "patunitsrch2", "");
  440. sysf_messageBox("환자단위조회시 검색할 환자이름은 2글자 이상", "C001"); ///환자단위조회시 검색할 환자이름은 2글자 이상 입력하십시오.
  441. return;
  442. }
  443. }
  444. }
  445. function group4_group5_button1_onclick(obj:Button, e:ClickEventInfo)
  446. {
  447. if(utlf_isNull(ds_send.getColumn(0, "fromdd")) || utlf_isNull(ds_send.getColumn(0, "todd")))
  448. {
  449. sysf_messageBox("시작일자 또는 종료일자를 입력해 주세요", "E999", "");
  450. return false;
  451. }
  452. var oParam = {};
  453. oParam.id = "TRPIF72101";
  454. oParam.service = "clamuncoapp.ClamUnco";
  455. oParam.method = "reqGetSendReClamBookSpecSanJae";
  456. oParam.inds = "req=ds_send";
  457. oParam.outds = "ds_main_list01_gridsendreclambookspec=gridsendreclambookspec";
  458. oParam.async = false;
  459. //oParam.callback = "cf_TRPIF72101";
  460. tranf_submit(oParam);
  461. }
  462. function group4_button10_onclick(obj:Button, e:ClickEventInfo)
  463. {
  464. col = "N";
  465. group4.grd_procsendspec.selecttype = "multiarea";
  466. }
  467. function group4_button5_onclick(obj:Button, e:ClickEventInfo)
  468. {
  469. col = "Y";
  470. group4.grd_procsendspec.selecttype = "multiarea";
  471. }
  472. function group4_button3_onclick(obj:Button, e:ClickEventInfo)
  473. {
  474. col = "N";
  475. group4.grd_procsendspec.selecttype = "multirow";
  476. }
  477. function group4_button4_onclick(obj:Button, e:ClickEventInfo)
  478. {
  479. system.execShell("excel");
  480. }
  481. function group4_button12_onclick(obj:Button, e:ClickEventInfo)
  482. {
  483. var today = new Date();
  484. var yy = today.getYear()+"";
  485. var mm = today.getMonth()+1;
  486. var dd = today.getDate();
  487. var title = "";
  488. if(mm < 10)
  489. {
  490. mm = "0" + mm;
  491. }
  492. else
  493. {
  494. mm = mm + "";
  495. }
  496. if(dd < 10)
  497. {
  498. dd = "0" + dd;
  499. }
  500. else
  501. {
  502. dd = dd + "";
  503. }
  504. var tmp = yy + mm + dd;
  505. if(ds_send.getColumn(0, "insukind") == "00")
  506. {
  507. title = "반송재청구장부(전체)_"+tmp;
  508. }
  509. else
  510. {
  511. title = "반송재청구장부(보험)_"+tmp;
  512. }
  513. if (ds_main_list01_gridsendreclambookspec.rowcount < 1)
  514. {
  515. return;
  516. }
  517. else
  518. {
  519. grdf_exportExcel(group4.grd_procsendspec, title, "see");
  520. }
  521. }
  522. function group4_grd_procsendspec_oncellclick(obj:Grid, e:GridClickEventInfo)
  523. {
  524. var lv_nAreaStartRow;
  525. var lv_nAreaEndRow;
  526. var lv_nAreaStartCol;
  527. var lv_nAreaEndCol;
  528. if(col == "Y")
  529. {
  530. lv_nAreaStartRow = 0;
  531. lv_nAreaEndRow = parseInt(obj.rowcount-1);
  532. lv_nAreaStartCol = parseInt(obj.currentcol);
  533. lv_nAreaEndCol = parseInt(obj.currentcol);
  534. grdf_initGridStyle(obj);
  535. for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++)
  536. {
  537. for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++)
  538. {
  539. obj.setCellProperty("body",nCell,"background","#FFE7E5");
  540. obj.setCellProperty("body",nCell,"background2","#FFE7E5");
  541. }
  542. }
  543. }
  544. else
  545. {
  546. grdf_initGridStyle(obj);
  547. }
  548. }
  549. function group4_grd_procsendspec_onkeydown(obj:Grid, e:KeyEventInfo)
  550. {
  551. if(col == "Y")
  552. {
  553. var CONST_SEPARATOR = " "; //컬럼별 구분자
  554. var lv_oBindDs = eval(obj.binddataset);
  555. var lv_sColID;
  556. var lv_sVal;
  557. var lv_sClipboard = "";
  558. var lv_nAreaStartRow;
  559. var lv_nAreaEndRow;
  560. var lv_nAreaStartCol;
  561. var lv_nAreaEndCol;
  562. if(obj.selecttype == "multiarea")
  563. {
  564. lv_nAreaStartRow = 0;
  565. lv_nAreaEndRow = parseInt(obj.rowcount-1);
  566. lv_nAreaStartCol = parseInt(obj.currentcol);
  567. lv_nAreaEndCol = parseInt(obj.currentcol);
  568. }
  569. for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++)
  570. {
  571. for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++)
  572. {
  573. lv_sColID = obj.getCellProperty("body",nCell,"text");
  574. lv_sVal = obj.getCellValue(nRow,nCell);
  575. lv_sClipboard = lv_sClipboard + lv_sVal + CONST_SEPARATOR;
  576. }
  577. lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
  578. lv_sClipboard = lv_sClipboard +String.fromCharCode(10);
  579. }
  580. lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
  581. iv_sClipboard = lv_sClipboard;
  582. system.setClipboard("CF_TEXT",lv_sClipboard);
  583. }
  584. else
  585. {
  586. if (e.ctrlKey == true && e.keycode == 67 )
  587. {
  588. grdf_clipboardCopy(obj, "PAM");
  589. }
  590. }
  591. }
  592. ]]></Script>
  593. </Form>
  594. </FDL>