SMLPD00400_슬라이드대출내역조회.xfdl 27 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMLPD00400" position="absolute 0 0 1256 805" titletext="슬라이드 대출내역" oninit="model1_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="슬라이드 대출내역" class="tit_1" position="absolute 0 1 157 24"/>
  8. <Button id="button13" taborder="1" text="EXCEL저장" onlbuttonup="button13_onlbuttonup" class="btn7" position="absolute 1158 0 1256 20" anchor="top right"/>
  9. <Button id="btn_lendaprv" taborder="2" text="대출허가" onlbuttonup="btn_lendaprv_onlbuttonup" class="btn4" position="absolute 1075 0 1155 20" anchor="top right"/>
  10. <Button id="btn_lendqual" taborder="3" text="대상자확인" onlbuttonup="btn_lendqual_onlbuttonup" class="btn4" visible="false" position="absolute 980 0 1072 20" anchor="top right"/>
  11. <Div id="group2" taborder="4" style="align:center top;" class="div_SA" position="absolute 0 25 1256 67" anchor="left top right">
  12. <Layouts>
  13. <Layout>
  14. <Static id="caption5" text="신청일자" class="search_name" position="absolute 8 10 94 30" anchor="default"/>
  15. <Static id="caption9" text="상태" class="search_name" position="absolute 322 10 384 30" anchor="default"/>
  16. <Radio id="rdo_appstat" taborder="10" columncount="4" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 373 10 596 30" anchor="default" onitemchanged="group2_rdo_appstat_onitemchanged">
  17. <Dataset id="innerdataset">
  18. <ColumnInfo>
  19. <Column id="codecolumn" size="256"/>
  20. <Column id="datacolumn" size="256"/>
  21. </ColumnInfo>
  22. <Rows>
  23. <Row>
  24. <Col id="codecolumn">1</Col>
  25. <Col id="datacolumn">대출신청</Col>
  26. </Row>
  27. <Row>
  28. <Col id="codecolumn">2</Col>
  29. <Col id="datacolumn">미반납</Col>
  30. </Row>
  31. <Row>
  32. <Col id="codecolumn">3</Col>
  33. <Col id="datacolumn">반납신청</Col>
  34. </Row>
  35. </Rows>
  36. </Dataset>
  37. </Radio>
  38. <Button id="btn_search" taborder="11" text="조회" onlbuttonup="btn_search_onlbuttonup" class="btn1" position="absolute 1188 10 1244 30" anchor="top right"/>
  39. <Static id="caption7" text="조회조건" class="search_name" position="absolute 610 10 700 30" anchor="default"/>
  40. <Combo id="cmb_refflagcd" taborder="12" class="combo_search" position="absolute 687 10 794 30" anchor="default" innerdataset="@ds_cond_refflagcd" codecolumn="value" datacolumn="label" index="0" value="1" text="등록번호" onitemchanged="group2_cmb_refflagcd_onitemchanged"/>
  41. <Edit id="ipt_refval" taborder="13" class="input_search" position="absolute 797 10 937 30" anchor="default" onkeydown="group2_ipt_refval_onkeydown"/>
  42. <Combo id="cmb_lendpsn" taborder="14" class="combo_s_essential" position="absolute 940 10 1080 30" anchor="default" innerdataset="@ds_cond_userinfolist" codecolumn="userid" datacolumn="usernm"/>
  43. <Calendar id="ipt_appfromdd" taborder="16" dateformat="yyyy-MM-dd" class="input_s_essential" position="absolute 84 10 184 30" mask="####-##-##"/>
  44. <Static id="caption00" text="~" position="absolute 184 10 200 30" style="align:center;"/>
  45. <Calendar id="ipt_apptodd" taborder="17" dateformat="yyyy-MM-dd" class="input_s_essential" position="absolute 200 10 300 30" mask="####-##-##"/>
  46. <Combo id="cmb_lenddept" taborder="18" innerdataset="@ds_cond_lenddeptcd" codecolumn="deptcd" datacolumn="depthngnm" onitemchanged="group2_cmb_lenddept_onitemchanged" class="combo_s_essential" visible="false" position="absolute 797 10 936 30"/>
  47. </Layout>
  48. </Layouts>
  49. </Div>
  50. <Static id="caption2" text="신청내역목록" class="tit_2" position="absolute 0 77 111 97"/>
  51. <Grid id="grd_aprvlist" taborder="5" useinputpanel="false" position="absolute 0 97 1256 805" anchor="all" binddataset="ds_grid_grd_aprvlist" treeusecheckbox="false" treeuseimage="false" treeuseline="true" treeinitstatus="expand,null" class="CSS::lis.css" autofittype="col">
  52. <Formats>
  53. <Format id="default">
  54. <Columns>
  55. <Column size="30"/>
  56. <Column size="35"/>
  57. <Column size="30"/>
  58. <Column size="0"/>
  59. <Column size="0"/>
  60. <Column size="110"/>
  61. <Column size="106"/>
  62. <Column size="100"/>
  63. <Column size="60"/>
  64. <Column size="60"/>
  65. <Column size="80"/>
  66. <Column size="80"/>
  67. <Column size="90"/>
  68. <Column size="60"/>
  69. <Column size="0"/>
  70. <Column size="194"/>
  71. <Column size="90"/>
  72. <Column size="143"/>
  73. <Column size="0"/>
  74. <Column size="0"/>
  75. <Column size="0"/>
  76. <Column size="0"/>
  77. <Column size="0"/>
  78. <Column size="0"/>
  79. <Column size="0"/>
  80. <Column size="0"/>
  81. <Column size="0"/>
  82. </Columns>
  83. <Rows>
  84. <Row size="22" band="head"/>
  85. <Row size="20"/>
  86. </Rows>
  87. <Band id="head">
  88. <Cell/>
  89. <Cell col="1" text="level"/>
  90. <Cell col="2" text="선택"/>
  91. <Cell col="3" text="기관코드"/>
  92. <Cell col="4" text="병리번호"/>
  93. <Cell col="5" text="병리번호"/>
  94. <Cell col="6" text="등록번호"/>
  95. <Cell col="7" text="환자명"/>
  96. <Cell col="8" text="블록"/>
  97. <Cell col="9" text="슬라이드"/>
  98. <Cell col="10" text="신청과"/>
  99. <Cell col="11" text="신청자"/>
  100. <Cell col="12" text="신청일자"/>
  101. <Cell col="13" text="신청시간"/>
  102. <Cell col="14" text="신청번호"/>
  103. <Cell col="15" text="대출목적"/>
  104. <Cell col="16" text="승인자"/>
  105. <Cell col="17" text="미승인사유"/>
  106. <Cell col="18" text="상태"/>
  107. <Cell col="19" text="lendappdd"/>
  108. <Cell col="20" text="lendappno"/>
  109. <Cell col="21" text="spcacptseqno"/>
  110. <Cell col="22" text="csteno"/>
  111. <Cell col="23" text="slidno"/>
  112. <Cell col="24" text="lenddd"/>
  113. <Cell col="25" text="lendno"/>
  114. <Cell col="26" text="slidseqno"/>
  115. </Band>
  116. <Band id="body">
  117. <Cell expr="expr:currow+1"/>
  118. <Cell col="1" displaytype="tree" edittype="tree" style="padding:0 0 0 -5;" text="bind:a" treelevel="bind:a"/>
  119. <Cell col="2" displaytype="checkbox" edittype="expr:a=='1'?'none':'checkbox'" text="bind:choi"/>
  120. <Cell col="3"/>
  121. <Cell col="4"/>
  122. <Cell col="5" class="text_center" text="bind:dispptno"/>
  123. <Cell col="6" class="text_center" text="bind:pid"/>
  124. <Cell col="7" class="text_center" text="bind:hngnm"/>
  125. <Cell col="8" text="bind:bloccnts"/>
  126. <Cell col="9" text="bind:slidcnts"/>
  127. <Cell col="10" class="text_center" text="bind:deptnm"/>
  128. <Cell col="11" class="text_center" text="bind:appnm"/>
  129. <Cell col="12" class="text_center" text="bind:appdd" mask="expr:appdd==null?'':'####-##-##'"/>
  130. <Cell col="13" class="text_center" text="bind:apptm" mask="expr:apptm==null?'':'##:##:##'"/>
  131. <Cell col="14"/>
  132. <Cell col="15" displaytype="combo" text="bind:lendresncd"/>
  133. <Cell col="16" text="bind:cnfmnm"/>
  134. <Cell col="17" displaytype="combo" edittype="combo" text="bind:aprvresncd"/>
  135. <Cell col="18"/>
  136. <Cell col="19"/>
  137. <Cell col="20"/>
  138. <Cell col="21"/>
  139. <Cell col="22"/>
  140. <Cell col="23"/>
  141. <Cell col="24"/>
  142. <Cell col="25"/>
  143. <Cell col="26"/>
  144. <Cell col="27"/>
  145. </Band>
  146. </Format>
  147. </Formats>
  148. </Grid>
  149. </Layout>
  150. </Layouts>
  151. <Objects>
  152. <Dataset id="ds_cond_refflagcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  153. <ColumnInfo>
  154. <Column id="label" type="STRING" size="256"/>
  155. <Column id="value" type="STRING" size="256"/>
  156. </ColumnInfo>
  157. <Rows>
  158. <Row>
  159. <Col id="label">등록번호</Col>
  160. <Col id="value">1</Col>
  161. </Row>
  162. <Row>
  163. <Col id="label">병리번호</Col>
  164. <Col id="value">2</Col>
  165. </Row>
  166. <Row>
  167. <Col id="label">대출과</Col>
  168. <Col id="value">3</Col>
  169. </Row>
  170. </Rows>
  171. </Dataset>
  172. <Dataset id="ds_cond_lenddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  173. <ColumnInfo>
  174. <Column id="deptcd" type="STRING" size="256"/>
  175. <Column id="depthngnm" type="STRING" size="256"/>
  176. </ColumnInfo>
  177. </Dataset>
  178. <Dataset id="ds_cond_userinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  179. <ColumnInfo>
  180. <column id="choi" type="STRING" size="256"/>
  181. <column id="dutplceinstcd" type="STRING" size="256"/>
  182. <column id="userid" type="STRING" size="256"/>
  183. <column id="usernm" type="STRING" size="256"/>
  184. <column id="jobkindcd" type="STRING" size="256"/>
  185. <column id="userabbr" type="STRING" size="256"/>
  186. <column id="mpphonno" type="STRING" size="256"/>
  187. <column id="dutunitcd" type="STRING" size="256"/>
  188. </ColumnInfo>
  189. </Dataset>
  190. <Dataset id="ds_data_sysdtinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  191. <ColumnInfo>
  192. <Column id="sysdd" type="STRING" size="256"/>
  193. <Column id="systm" type="STRING" size="256"/>
  194. </ColumnInfo>
  195. </Dataset>
  196. <Dataset id="ds_data_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  197. <ColumnInfo>
  198. <Column id="deptcd" type="STRING" size="0"/>
  199. <Column id="depthngnm" type="STRING" size="0"/>
  200. </ColumnInfo>
  201. </Dataset>
  202. <Dataset id="ds_data_resncdlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  203. <ColumnInfo>
  204. <Column id="choi" type="STRING" size="0"/>
  205. <Column id="instcd" type="STRING" size="0"/>
  206. <Column id="baseflagcd" type="STRING" size="256"/>
  207. <Column id="resncd" type="STRING" size="256"/>
  208. <Column id="resncnts" type="STRING" size="256"/>
  209. <Column id="resncode" type="STRING" size="256"/>
  210. </ColumnInfo>
  211. </Dataset>
  212. <Dataset id="ds_data_resncdlist1" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  213. <ColumnInfo>
  214. <Column id="choi" type="STRING" size="0"/>
  215. <Column id="instcd" type="STRING" size="0"/>
  216. <Column id="baseflagcd" type="STRING" size="256"/>
  217. <Column id="resncd" type="STRING" size="256"/>
  218. <Column id="resncnts" type="STRING" size="256"/>
  219. <Column id="resncode" type="STRING" size="256"/>
  220. </ColumnInfo>
  221. </Dataset>
  222. <Dataset id="ds_data_resncdlist2" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  223. <ColumnInfo>
  224. <Column id="choi" type="STRING" size="0"/>
  225. <Column id="instcd" type="STRING" size="0"/>
  226. <Column id="baseflagcd" type="STRING" size="256"/>
  227. <Column id="resncd" type="STRING" size="256"/>
  228. <Column id="resncnts" type="STRING" size="256"/>
  229. <Column id="resncode" type="STRING" size="256"/>
  230. </ColumnInfo>
  231. </Dataset>
  232. <Dataset id="ds_grid_grd_aprvlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  233. <ColumnInfo>
  234. <column id="a" type="STRING" size="256"/>
  235. <column id="choi" type="STRING" size="256"/>
  236. <column id="instcd" type="STRING" size="256"/>
  237. <column id="ptno" type="STRING" size="256"/>
  238. <column id="dispptno" type="STRING" size="256"/>
  239. <column id="pid" type="STRING" size="256"/>
  240. <column id="hngnm" type="STRING" size="256"/>
  241. <column id="deptnm" type="STRING" size="256"/>
  242. <column id="appnm" type="STRING" size="256"/>
  243. <column id="appdd" type="STRING" size="256"/>
  244. <column id="apptm" type="STRING" size="256"/>
  245. <column id="appno" type="STRING" size="256"/>
  246. <column id="lendresncd" type="STRING" size="256"/>
  247. <column id="aprvid" type="STRING" size="256"/>
  248. <column id="aprvresncd" type="STRING" size="256"/>
  249. <column id="appstat" type="STRING" size="256"/>
  250. <column id="lendappdd" type="STRING" size="256"/>
  251. <column id="lendappno" type="STRING" size="256"/>
  252. <column id="bloccnts" type="STRING" size="256"/>
  253. <column id="slidcnts" type="STRING" size="256"/>
  254. <column id="spcacptseqno" type="STRING" size="256"/>
  255. <column id="csteno" type="STRING" size="256"/>
  256. <column id="slidno" type="STRING" size="256"/>
  257. <column id="lenddd" type="STRING" size="256"/>
  258. <column id="lendno" type="STRING" size="256"/>
  259. <column id="slidseqno" type="STRING" size="256"/>
  260. <Column id="cnfmnm" type="STRING" size="256"/>
  261. </ColumnInfo>
  262. </Dataset>
  263. </Objects>
  264. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  265. * System Name :
  266. * Job Name :
  267. * Creator :
  268. * Make Date : 2015-11-13
  269. * Description :
  270. *---------------------------------------------------------------------------------------
  271. * Modify Date Modifier Modify Description
  272. *---------------------------------------------------------------------------------------
  273. * 2015-11-13 Live Converter TF->XP
  274. *
  275. *---------------------------------------------------------------------------------------
  276. ****************************************************************************************/
  277. include "com_commonxp::comm_main.xjs";
  278. include "lis_commonxp::LZZ001.xjs";
  279. include "lis_commonxp::LPZ001.xjs";
  280. //include "com_commodulexp::SSZFM00401.xjs";
  281. function lf_exeInitialize()
  282. {
  283. dsf_createDsRow("ds_send", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}]);
  284. // 시간조회
  285. var oParam = {};
  286. oParam.id = "TRLPZ00102";
  287. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  288. oParam.method = "reqGetSystemDateTimeInformation";
  289. oParam.inds = "refData=ds_send";
  290. oParam.outds = "ds_data_sysdtinfo=sysdtinfo";
  291. oParam.async = false;
  292. oParam.callback = "cbf_SMLPD00400";
  293. tranf_submit(oParam);
  294. }
  295. function lf_getAppList()
  296. {
  297. grd_aprvlist.binddataset = "";
  298. var appfromdd = group2.ipt_appfromdd.value;
  299. var apptodd = group2.ipt_apptodd.value;
  300. var appstat = group2.rdo_appstat.value;
  301. var refflagcd = group2.cmb_refflagcd.value;
  302. var refval = group2.ipt_refval.value;
  303. var lenddeptcd = group2.cmb_lenddept.value;
  304. var lendid = group2.cmb_lendpsn.value;
  305. var sInDsName = dsf_createDsRow("ds_temp_search" , [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  306. ,{col: "appfromdd", val:appfromdd }
  307. ,{col: "apptodd", val:apptodd }
  308. ,{col: "appstat", val:appstat }
  309. ,{col: "refflagcd", val:refflagcd }
  310. ,{col: "refval", val:refval }
  311. ,{col: "lenddeptcd", val:lenddeptcd }
  312. ,{col: "lendid", val:lendid }]);
  313. // 서브밋호출
  314. var oParam = {};
  315. oParam.id = "TRLPD00401";
  316. oParam.service = "plgylendmngtapp.SlidLendRtn";
  317. oParam.method = "reqGetLendRtnAprvList";
  318. oParam.inds = "refData=ds_temp_search";
  319. oParam.outds = "ds_grid_grd_aprvlist=rsltlist";
  320. oParam.async = false;
  321. oParam.callback = "cbf_SMLPD00400";
  322. tranf_submit(oParam);
  323. }
  324. function lf_exeLendIDGet() {
  325. var userdeptcd = "'" + group2.cmb_lenddept.value + "'";
  326. ds_send.clear();
  327. dsf_createDsRow("ds_send" , [{col: "instcd", val:sysf_getUserInfo("dutplceinstcd")}
  328. ,{col: "userdeptcd", val:userdeptcd }
  329. ,{col: "doctjobgradcd", val:"" }
  330. ,{col: "teamjobgradcd", val:"" }]);
  331. // 서브밋호출
  332. var oParam = {};
  333. oParam.id = "TRLPZ00105";
  334. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  335. oParam.method = "reqGetUserInfoList";
  336. oParam.inds = "refdata=ds_send";
  337. oParam.outds = "ds_cond_userinfolist=reflist";
  338. oParam.async = false;
  339. oParam.callback = "cbf_SMLPD00400";
  340. tranf_submit(oParam);
  341. }
  342. function lf_setLendOk()
  343. {
  344. if(ds_grid_grd_aprvlist.getCaseCount("choi=='1'") <= 0)
  345. {
  346. sysf_messageBox("대출허가할 병리번호를", "C002");
  347. return;
  348. }
  349. // grd_aprvlist.clearStatus();
  350. for (var i=0; i<ds_grid_grd_aprvlist.rowcount; i++)
  351. {
  352. if(ds_grid_grd_aprvlist.getColumn(i, "choi") == "1")
  353. {
  354. ds_grid_grd_aprvlist.updatecontrol = false;
  355. ds_grid_grd_aprvlist.setRowType(i, "U");
  356. ds_grid_grd_aprvlist.updatecontrol = true;
  357. }
  358. else
  359. {
  360. ds_grid_grd_aprvlist.updatecontrol = false;
  361. ds_grid_grd_aprvlist.setRowType(i, "N");
  362. ds_grid_grd_aprvlist.updatecontrol = true;
  363. }
  364. }
  365. ds_send.claer();
  366. dsf_createDsRow("ds_temp_search", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}]);
  367. // 시간조회
  368. var oParam = {};
  369. oParam.id = "TRLPZ00102_1";
  370. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  371. oParam.method = "reqGetSystemDateTimeInformation";
  372. oParam.inds = "refData=ds_temp_search";
  373. oParam.outds = "ds_data_sysdtinfo=sysdtinfo";
  374. oParam.async = false;
  375. oParam.callback = "cbf_SMLPD00400";
  376. tranf_submit(oParam);
  377. }
  378. // 미승인사유선택에 따른 선택처리
  379. function lf_choiSelect(){
  380. // var strNode1 = "/root/main/lendcnts/lendrtnlist";
  381. }
  382. // 상태구분에 따른 컨트롤 재배열 함수
  383. function lf_exeStateChng()
  384. {
  385. var vState = group2.rdo_appstat.value;
  386. if(vState == "2")
  387. {
  388. btn_lendaprv.visible = false; //대출허가
  389. }
  390. else if(vState == "1")
  391. {
  392. btn_lendaprv.visible = true; //대출허가
  393. btn_lendaprv.text = "대출허가";
  394. }
  395. else
  396. {
  397. btn_lendaprv.visible = true; //반납확인
  398. btn_lendaprv.text = "반납확인";
  399. }
  400. }
  401. // 대출조건 변경시 Combo Control 재배열 함수
  402. function lf_exeLendFlagChng()
  403. {
  404. var vLendFlag = group2.cmb_refflagcd.value;
  405. //cmb_lendpsn : 대출자콤보리스트, cmb_lenddept : 대출과콤보리스트
  406. if(vLendFlag == "1" || vLendFlag == "2")
  407. {
  408. group2.cmb_lendpsn.visible = false;
  409. group2.cmb_lenddept.visible = false;
  410. group2.ipt_refval.value = "-";
  411. }
  412. else
  413. {
  414. group2.cmb_lendpsn.visible = true;
  415. group2.cmb_lenddept.visible = true;
  416. group2.ipt_refval.value = "";
  417. }
  418. }
  419. // 그리드 자료 Excel로 저장 처리 function
  420. function lf_exeSaveToExcel()
  421. {
  422. grdf_exportExcel(grd_aprvlist, "대출내역조회", "대출내역조회", true);
  423. }
  424. // 검색값을 입력하고 Enter키를 누를 경우 처리
  425. function lf_keyEvent()
  426. {
  427. fSetInputNodeCurPidObj(group2.ipt_refval, 9); //등록번호 9자리로 변경
  428. lf_getAppList();
  429. }
  430. // callback 함수
  431. function cbf_SMLPD00400(strSvcID, nErrorCode, strErrorMag)
  432. {
  433. if(nErrorCode != 0)
  434. {
  435. sysf_messageBox("ID: "+ strSvcID + " Error: " + strErrorMag, "E009", "");
  436. }
  437. else
  438. {
  439. switch(strSvcID)
  440. {
  441. case "TRLPZ00102":
  442. // 신청부서 목록 조회
  443. var standard_yn = "orduseyn";
  444. var ord_deptflag = "D";
  445. var sort_field = "dispseq";
  446. var sort_method = "asc";
  447. appf_getDeptCodeList(sysf_getUserInfo("dutplceinstcd"), standard_yn, ord_deptflag, "deptcd", sort_method, utlf_getCurrentDate(), "", "", "ds_cond_lenddeptcd", false, "");
  448. // 작업구분 목록 조회
  449. var baseflagcd = "'L1'";
  450. var sInDsName = dsf_createDsRow("ds_temp_search" , [{col: "instcd", val : sysf_getUserInfo("dutplceinstcd") }
  451. , {col: "baseflagcd", val : baseflagcd }]);
  452. var oParam = {};
  453. oParam.id = "TRLPZ00103";
  454. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  455. oParam.method = "reqGetReasonCodeList";
  456. oParam.inds = "refData=" + sInDsName;
  457. oParam.outds = "ds_data_resncdlist1=refrslt";
  458. oParam.async = false;
  459. oParam.callback = "cbf_SMLPD00400";
  460. tranf_submit(oParam);
  461. break;
  462. case "TRLPZ00103":
  463. ds_data_resncdlist1.filter("resncd<>'ZZZZ'&&baseflagcd=='L1'");
  464. grd_aprvlist.setCellProperty("body", 15, "combodataset", "ds_data_resncdlist1");// combodataset
  465. grd_aprvlist.setCellProperty("body", 15, "combocodecol", "resncd");
  466. grd_aprvlist.setCellProperty("body", 15, "combodatacol", "resncnts");
  467. // 작업구분 목록 조회
  468. var baseflagcd = "'L2'";
  469. var sInDsName = dsf_createDsRow("ds_temp_search" , [{col: "instcd", val : sysf_getUserInfo("dutplceinstcd") }
  470. ,{col: "baseflagcd", val : baseflagcd }]);
  471. var oParam = {};
  472. oParam.id = "TRLPZ00103_1";
  473. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  474. oParam.method = "reqGetReasonCodeList";
  475. oParam.inds = "refData=" + sInDsName;
  476. oParam.outds = "ds_data_resncdlist2=refrslt";
  477. oParam.async = false;
  478. oParam.callback = "cbf_SMLPD00400";
  479. tranf_submit(oParam);
  480. break;
  481. case "TRLPZ00103_1":
  482. ds_data_resncdlist2.filter("resncd<>'ZZZZ'&&baseflagcd=='L2'");
  483. grd_aprvlist.setCellProperty("body", 17, "combodataset", "ds_data_resncdlist2");// combodataset
  484. grd_aprvlist.setCellProperty("body", 17, "combocodecol", "resncd");
  485. grd_aprvlist.setCellProperty("body", 17, "combodatacol", "resncnts");
  486. group2.ipt_appfromdd.value = ds_data_sysdtinfo.getColumn(0, "sysdd");
  487. group2.ipt_apptodd.value = ds_data_sysdtinfo.getColumn(0, "sysdd");
  488. group2.cmb_refflagcd.value = "1"; // 조회조건(1:등록번호, 2:병리번호, 3:대출과)
  489. group2.ipt_refval.value = ""; // 조회값
  490. group2.rdo_appstat.value = "1"; // 상태(1:대출신청, 2:미반납, 3:반납신청)
  491. group2.cmb_lenddept.value = ""; // 대출과코드
  492. group2.cmb_lendpsn.value = ""; // 대출자ID
  493. lf_exeLendFlagChng(); //대출조건 콤보박스 컨트롤 재배열
  494. lf_exeStateChng(); //대출상태 처리버튼 재배열
  495. break;
  496. case "TRLPD00401":
  497. for(var i=0; i<ds_grid_grd_aprvlist.rowcount; i++)
  498. {
  499. if(ds_grid_grd_aprvlist.getColumn(i, "a") == "1")
  500. {
  501. }
  502. else
  503. {
  504. ds_grid_grd_aprvlist.setColumn(i, "choi", "1");
  505. }
  506. if(ds_grid_grd_aprvlist.getColumn(i, "aprvresncd")=="ZZZZ")
  507. {
  508. ds_grid_grd_aprvlist.setColumn(i, "aprvresncd", "");
  509. }
  510. }
  511. grd_aprvlist.binddataset = "ds_grid_grd_aprvlist";
  512. break;
  513. case "TRLPZ00105":
  514. ds_cond_userinfolist.filter("jobkindcd=='1'");
  515. break;
  516. case "TRLPZ00102_1":
  517. var aprvdd = ds_data_sysdtinfo.getColumn(0, "sysdd");
  518. var aprvtm = ds_data_sysdtinfo.getColumn(0, "systm");
  519. var aprvresnflagcd = "L2"; // 미승인사유코드
  520. var aprvflagcd = "1"; // 승인구분코드
  521. var lendflagcd = "2"; // 대출구분코드
  522. var appstat = group2.rdo_appstat.value; // 승인상태코드
  523. var sInDsName = dsf_createDsRow("ds_temp_input", [{col: "aprvdd", val:aprvdd }
  524. , {col: "aprvtm", val:aprvtm }
  525. , {col: "aprvflagcd", val:aprvflagcd }
  526. , {col: "aprvresnflagcd", val:aprvresnflagcd }
  527. , {col: "lendflagcd", val:lendflagcd }
  528. , {col: "appstat", val:appstat }]);
  529. var oParam = {};
  530. oParam.id = "TXLPD00401";
  531. oParam.service = "plgylendmngtapp.SlidLendRtn";
  532. oParam.method = "reqSetLendRtnAprvList";
  533. oParam.inds = "refData=ds_temp_input lendrtnlist=ds_grid_grd_aprvlist:U";
  534. oParam.async = false;
  535. oParam.callback = "cbf_SMLPD00400";
  536. tranf_submit(oParam);
  537. break;
  538. case "TXLPD00401":
  539. lf_getAppList();
  540. break;
  541. default:
  542. break;
  543. }
  544. }
  545. }
  546. function model1_oninit(obj:Form, e:InitEventInfo)
  547. {
  548. //폼 초기화 함수
  549. frmf_initForm(obj);
  550. //데이타 셋 보기
  551. // lf_commoduleDataSetShow();
  552. lf_exeInitialize();
  553. }
  554. function group2_rdo_appstat_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  555. {
  556. lf_exeStateChng();
  557. }
  558. function btn_search_onlbuttonup(obj:Button, e:MouseEventInfo)
  559. {
  560. lf_getAppList();
  561. }
  562. function group2_cmb_refflagcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  563. {
  564. lf_exeLendFlagChng();
  565. }
  566. function group2_ipt_refval_onkeydown(obj:Edit, e:KeyEventInfo)
  567. {
  568. if(e.keycode == 13)
  569. {
  570. lf_keyEvent();
  571. }
  572. }
  573. function group2_cmb_lenddept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  574. {
  575. lf_exeLendIDGet();
  576. }
  577. // function grd_aprvlist_(obj:Grid, e:)
  578. // {
  579. // fChoiSelect();
  580. // }
  581. function btn_lendqual_onlbuttonup(obj:Button, e:MouseEventInfo)
  582. {
  583. lf_setLendOk();
  584. }
  585. function btn_lendaprv_onlbuttonup(obj:Button, e:MouseEventInfo)
  586. {
  587. lf_setLendOk();
  588. }
  589. function button13_onlbuttonup(obj:Button, e:MouseEventInfo)
  590. {
  591. lf_exeSaveToExcel();
  592. }
  593. ]]></Script>
  594. </Form>
  595. </FDL>