SPRAD00102_개인신용카드사용내역관리.xfdl 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPRAD00102" position="absolute 0 0 548 305" titletext="개인 신용카드 사용 내역 관리" oninit="SPRAD00102_oninit" onload="SPRAD00102_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid position="absolute 16 275 61 292" id="grd_cardexpsevdnc" visible="false" binddataset="ds_grd_cardexpsevdnc">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="30"/>
  12. <Column size="29"/>
  13. <Column size="26"/>
  14. <Column size="52"/>
  15. <Column size="37"/>
  16. <Column size="54"/>
  17. <Column size="26"/>
  18. <Column size="47"/>
  19. <Column size="43"/>
  20. <Column size="35"/>
  21. <Column size="35"/>
  22. <Column size="31"/>
  23. <Column size="50"/>
  24. <Column size="39"/>
  25. <Column size="38"/>
  26. <Column size="39"/>
  27. <Column size="50"/>
  28. <Column size="50"/>
  29. <Column size="50"/>
  30. <Column size="100"/>
  31. </Columns>
  32. <Rows>
  33. <Row size="24" band="head"/>
  34. <Row size="24"/>
  35. </Rows>
  36. <Band id="head">
  37. <Cell text="기관코드"/>
  38. <Cell col="1" text="일련번호"/>
  39. <Cell col="2" text="사용구분"/>
  40. <Cell col="3" text="법인카드번호"/>
  41. <Cell col="4" text="카드사"/>
  42. <Cell col="5" text="소유자id"/>
  43. <Cell col="6" text="소유자명"/>
  44. <Cell col="7" text="소유부서코드"/>
  45. <Cell col="8" text="소유부서명"/>
  46. <Cell col="9" text="사용일자"/>
  47. <Cell col="10" text="사용금액"/>
  48. <Cell col="11" text="적요"/>
  49. <Cell col="12" text="사업자등록번호"/>
  50. <Cell col="13" text="업체명"/>
  51. <Cell col="14" text="주소"/>
  52. <Cell col="15" text="전화번호"/>
  53. <Cell col="16" text="미결전표일자"/>
  54. <Cell col="17" text="미결전표번호"/>
  55. <Cell col="18" text="미결일련번호"/>
  56. <Cell col="19"/>
  57. </Band>
  58. <Band id="body">
  59. <Cell text="bind:instcd"/>
  60. <Cell col="1" text="bind:seqno"/>
  61. <Cell col="2" text="bind:useflag"/>
  62. <Cell col="3" text="bind:instcardseqno"/>
  63. <Cell col="4" text="bind:cardcmpycd"/>
  64. <Cell col="5" text="bind:posspsn"/>
  65. <Cell col="6" text="bind:posspsnnm"/>
  66. <Cell col="7" text="bind:possdeptcd"/>
  67. <Cell col="8" text="bind:possdeptnm"/>
  68. <Cell col="9" text="bind:usedd"/>
  69. <Cell col="10" text="bind:useamt"/>
  70. <Cell col="11" text="bind:mainrec"/>
  71. <Cell col="12" text="bind:entrregno"/>
  72. <Cell col="13" text="bind:custnm"/>
  73. <Cell col="14" text="bind:custaddr"/>
  74. <Cell col="15" text="bind:cntctel"/>
  75. <Cell col="16" text="bind:unsldd"/>
  76. <Cell col="17" text="bind:unslno"/>
  77. <Cell col="18" text="bind:undeciseqno"/>
  78. <Cell col="19" text="bind:profcnt"/>
  79. </Band>
  80. </Format>
  81. </Formats>
  82. </Grid>
  83. <Static id="caption6" text="개인 신용카드 사용 내역 관리" class="tit_1" position="absolute 0 0 316 23"/>
  84. <Shape id="line1" class="line_6" position="absolute 0 271 543 277"/>
  85. <Button id="btn_save" taborder="1" text="저장" class="btn4" position="absolute 372 275 428 297" onclick="btn_save_onclick"/>
  86. <Button id="btn_close" taborder="2" text="닫기" class="btn4" position="absolute 488 275 544 297" onclick="btn_close_onclick"/>
  87. <Button id="btn_delete" taborder="3" text="삭제" class="btn4" position="absolute 430 275 486 297" onclick="btn_delete_onclick"/>
  88. <Shape id="line2" class="line_10" position="absolute 0 23 543 29"/>
  89. <Calendar id="ipt_usedd" taborder="4" class="input_essential" position="absolute 110 101 292 120" autoselect="true" autoskip="true" onkeydown="ipt_usedd_onkeydown"/>
  90. <Edit id="ipt_cmt" taborder="5" class="input_essential" position="absolute 110 149 457 168" autoselect="true" autoskip="true" onkeydown="ipt_cmt_onkeydown"/>
  91. <MaskEdit id="ipt_cardno" taborder="6" mask="####-####-####-####" class="input_essential" position="absolute 110 29 292 48" autoselect="true" autoskip="true" maskchar=" " trimtype="both" type="string" style="align:left middle;" onkeydown="ipt_cardno_onkeydown"/>
  92. <Button id="btn_userhelp" taborder="7" class="icon_search" position="absolute 212 78 228 94" onclick="btn_userhelp_onclick"/>
  93. <Shape id="line8" class="line_2" position="absolute 0 240 543 246"/>
  94. <Shape id="line9" class="line_2" position="absolute 0 216 543 222"/>
  95. <Shape id="line10" class="line_2" position="absolute 0 72 543 78"/>
  96. <Shape id="line12" class="line_2" position="absolute 0 192 543 198"/>
  97. <Static id="caption10" text="소유자" class="cell_1" position="absolute 0 76 108 99"/>
  98. <Static id="caption1" text="카드회사" class="cell_1" position="absolute 0 52 108 75"/>
  99. <Shape id="line13" class="line_2" position="absolute 0 266 543 272"/>
  100. <Static id="caption2" text="상호" class="cell_1" position="absolute 30 196 108 219"/>
  101. <Static id="caption11" text="가맹점" class="cell_1" position="absolute 0 172 29 268"/>
  102. <Static id="caption3" text="사용일자" class="cell_1" position="absolute 0 100 108 123"/>
  103. <Static id="caption4" text="신용카드번호" class="cell_1" position="absolute 0 28 108 51"/>
  104. <Static id="caption5" text="주소" class="cell_1" position="absolute 30 220 108 243"/>
  105. <Static id="caption14" text="사업자번호" class="cell_1" position="absolute 30 172 108 195"/>
  106. <Static id="caption15" text="적요" class="cell_1" position="absolute 0 148 108 171"/>
  107. <Shape id="line3" class="line_2" position="absolute 0 144 543 150"/>
  108. <Static id="caption8" text="사용금액" class="cell_1" position="absolute 0 124 108 147"/>
  109. <Shape id="line4" class="line_2" position="absolute 0 48 543 54"/>
  110. <Static id="caption9" text="전화번호" class="cell_1" position="absolute 30 244 108 267"/>
  111. <Shape id="line5" class="line_2" position="absolute 0 96 543 102"/>
  112. <Shape id="line6" class="line_2" position="absolute 0 120 543 126"/>
  113. <Shape id="line7" class="line_2" position="absolute 0 168 543 174"/>
  114. <Edit id="ipt_custnm" taborder="8" class="input_default" position="absolute 110 197 332 216" autoselect="true" autoskip="true"/>
  115. <MaskEdit id="ipt_entrregno" taborder="9" mask="###-##-#####" class="input_default" position="absolute 110 173 292 192" autoskip="true" autoselect="true" maskchar=" " type="string" trimtype="both" style="align:left middle;"/>
  116. <Shape id="line15" linetype="vertical" class="line_2" position="absolute 26 171 32 268"/>
  117. <Combo id="cmb_cardcmpycd" taborder="10" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_default" position="absolute 110 53 332 72">
  118. <Dataset id="innerdataset">
  119. <ColumnInfo>
  120. <Column id="codecolumn"/>
  121. <Column id="datacolumn"/>
  122. </ColumnInfo>
  123. <Rows>
  124. <Row>
  125. <Col id="codecolumn"/>
  126. <Col id="datacolumn"/>
  127. </Row>
  128. <Row>
  129. <Col id="codecolumn">01</Col>
  130. <Col id="datacolumn">국민카드</Col>
  131. </Row>
  132. <Row>
  133. <Col id="codecolumn">02</Col>
  134. <Col id="datacolumn">롯데카드</Col>
  135. </Row>
  136. <Row>
  137. <Col id="codecolumn">03</Col>
  138. <Col id="datacolumn">비씨카드</Col>
  139. </Row>
  140. <Row>
  141. <Col id="codecolumn">04</Col>
  142. <Col id="datacolumn">삼성카드</Col>
  143. </Row>
  144. <Row>
  145. <Col id="codecolumn">05</Col>
  146. <Col id="datacolumn">신한카드</Col>
  147. </Row>
  148. <Row>
  149. <Col id="codecolumn">06</Col>
  150. <Col id="datacolumn">씨티카드</Col>
  151. </Row>
  152. <Row>
  153. <Col id="codecolumn">07</Col>
  154. <Col id="datacolumn">엘지카드</Col>
  155. </Row>
  156. <Row>
  157. <Col id="codecolumn">08</Col>
  158. <Col id="datacolumn">외환카드</Col>
  159. </Row>
  160. <Row>
  161. <Col id="codecolumn">09</Col>
  162. <Col id="datacolumn">우리카드</Col>
  163. </Row>
  164. <Row>
  165. <Col id="codecolumn">10</Col>
  166. <Col id="datacolumn">조흥카드</Col>
  167. </Row>
  168. <Row>
  169. <Col id="codecolumn">11</Col>
  170. <Col id="datacolumn">현대카드</Col>
  171. </Row>
  172. </Rows>
  173. </Dataset>
  174. </Combo>
  175. <Edit id="ipt_posspsn" taborder="11" class="input_essential" position="absolute 110 77 207 96" autoselect="true" autoskip="true" onkeydown="ipt_posspsn_onkeydown"/>
  176. <Edit id="ipt_posspsnnm" taborder="12" class="input_essential" position="absolute 232 77 457 96" autoselect="true" autoskip="true" onkeydown="ipt_posspsnnm_onkeydown"/>
  177. <MaskEdit id="ipt_useamt" taborder="13" class="input_essential" position="absolute 110 125 292 144" autoselect="true" autoskip="true" mask="9,99999999999999999" maskchar=" " onkeydown="ipt_useamt_onkeydown"/>
  178. <Edit id="ipt_custaddr" taborder="14" class="input_default" position="absolute 110 221 542 240" autoselect="true" autoskip="true"/>
  179. <Edit id="ipt_cntctel" taborder="15" class="input_default" position="absolute 110 246 332 265" autoselect="true" autoskip="true"/>
  180. <Static id="caption12" text="증빙매수" class="cell_1" position="absolute 295 124 395 147"/>
  181. <MaskEdit id="ipt_profcnt" taborder="16" mask="99999" class="input_essential" position="absolute 398 125 520 144" autoselect="true" autoskip="true" maskchar=" "/>
  182. </Layout>
  183. </Layouts>
  184. <Objects>
  185. <Dataset id="ds_main_list_cardexpsevdnc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list_cardexpsevdnc_oncolumnchanged">
  186. <ColumnInfo>
  187. <Column id="instcd" type="STRING" size="256"/>
  188. <Column id="seqno" type="STRING" size="256"/>
  189. <Column id="useflag" type="STRING" size="256"/>
  190. <Column id="instcardseqno" type="STRING" size="256"/>
  191. <Column id="cardcmpycd" type="STRING" size="256"/>
  192. <Column id="posspsn" type="STRING" size="256"/>
  193. <Column id="posspsnnm" type="STRING" size="256"/>
  194. <Column id="possdeptcd" type="STRING" size="256"/>
  195. <Column id="possdeptnm" type="STRING" size="256"/>
  196. <Column id="usedd" type="STRING" size="256"/>
  197. <Column id="useamt" type="STRING" size="256"/>
  198. <Column id="mainrec" type="STRING" size="256"/>
  199. <Column id="entrregno" type="STRING" size="256"/>
  200. <Column id="custnm" type="STRING" size="256"/>
  201. <Column id="custaddr" type="STRING" size="256"/>
  202. <Column id="cntctel" type="STRING" size="256"/>
  203. <Column id="unsldd" type="STRING" size="256"/>
  204. <Column id="unslno" type="STRING" size="256"/>
  205. <Column id="undeciseqno" type="STRING" size="256"/>
  206. <Column id="profcnt" type="STRING" size="256"/>
  207. </ColumnInfo>
  208. <Rows>
  209. <Row>
  210. <Col id="instcd"/>
  211. <Col id="seqno"/>
  212. <Col id="useflag">2</Col>
  213. <Col id="instcardseqno"/>
  214. <Col id="cardcmpycd"/>
  215. <Col id="posspsn"/>
  216. <Col id="posspsnnm"/>
  217. <Col id="possdeptcd"/>
  218. <Col id="possdeptnm"/>
  219. <Col id="usedd"/>
  220. <Col id="useamt"/>
  221. <Col id="mainrec"/>
  222. <Col id="entrregno"/>
  223. <Col id="custnm"/>
  224. <Col id="custaddr"/>
  225. <Col id="cntctel"/>
  226. <Col id="unsldd"/>
  227. <Col id="unslno"/>
  228. <Col id="undeciseqno"/>
  229. <Col id="profcnt"/>
  230. </Row>
  231. </Rows>
  232. </Dataset>
  233. <Dataset id="ds_send_retrparams" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  234. <ColumnInfo>
  235. <Column id="instcd" type="STRING" size="256"/>
  236. <Column id="seqno" type="STRING" size="256"/>
  237. <Column id="useflag" type="STRING" size="256"/>
  238. </ColumnInfo>
  239. <Rows>
  240. <Row>
  241. <Col id="instcd"/>
  242. <Col id="seqno"/>
  243. <Col id="useflag"/>
  244. </Row>
  245. </Rows>
  246. </Dataset>
  247. <Dataset id="ds_target_slipinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  248. <Dataset id="ds_target" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  249. <Dataset id="ds_temp_seqno" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  250. <ColumnInfo>
  251. <Column id="seqno" type="STRING" size="256"/>
  252. </ColumnInfo>
  253. </Dataset>
  254. </Objects>
  255. <Bind>
  256. <BindItem id="item0" compid="ipt_cardno" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="instcardseqno"/>
  257. <BindItem id="item1" compid="cmb_cardcmpycd" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid=""/>
  258. <BindItem id="item2" compid="ipt_posspsn" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="posspsn"/>
  259. <BindItem id="item3" compid="ipt_posspsnnm" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="posspsnnm"/>
  260. <BindItem id="item4" compid="ipt_usedd" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="usedd"/>
  261. <BindItem id="item5" compid="ipt_useamt" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="useamt"/>
  262. <BindItem id="item6" compid="ipt_profcnt" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid=""/>
  263. <BindItem id="item7" compid="ipt_cmt" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="mainrec"/>
  264. <BindItem id="item8" compid="ipt_entrregno" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="entrregno"/>
  265. <BindItem id="item9" compid="ipt_custnm" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid=""/>
  266. <BindItem id="item10" compid="ipt_custaddr" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="custaddr"/>
  267. <BindItem id="item11" compid="ipt_cntctel" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid=""/>
  268. </Bind>
  269. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  270. * System Name :
  271. * Job Name :
  272. * Creator :
  273. * Make Date : 2017-06-19
  274. * Description :
  275. *---------------------------------------------------------------------------------------
  276. * Modify Date Modifier Modify Description
  277. *---------------------------------------------------------------------------------------
  278. * 2017-06-19 Live Converter TF->XP
  279. *
  280. *---------------------------------------------------------------------------------------
  281. ****************************************************************************************/
  282. include "com_commonxp::comm_main.xjs";
  283. include "mis_miscommonxp::MIS.xjs";
  284. include "mis_acntcommonxp::RAD001.xjs";
  285. include "mis_miscommonxp::RAC001.xjs";
  286. function SPRAD00102_oninit(obj:Form, e:InitEventInfo)
  287. {
  288. frmf_initForm(obj);
  289. }
  290. function SPRAD00102_onload(obj:Form, e:LoadEventInfo)
  291. {
  292. grdf_initGrid(grd_cardexpsevdnc);
  293. try
  294. {
  295. ds_target_slipinfo.copyData(arg_ds_target_slipinfo);
  296. }
  297. catch(e)
  298. {
  299. }
  300. try
  301. {
  302. ds_target.copyData(arg_ds_target);
  303. }
  304. catch(e)
  305. {
  306. }
  307. fInitialize();
  308. }
  309. function fInitialize()
  310. {
  311. ds_main_list_cardexpsevdnc.clearData();
  312. ds_send_retrparams.setColumn(0, "instcd", ds_target_slipinfo.getColumn(0, "instcd"));
  313. ds_send_retrparams.setColumn(0, "seqno", ds_target_slipinfo.getColumn(0, "seqno"));
  314. ds_send_retrparams.setColumn(0, "useflag", ds_target_slipinfo.getColumn(0, "profflag"));
  315. misfMsterDetailRetrieve();
  316. if(ds_main_list_cardexpsevdnc.rowcount == 0)
  317. {
  318. ds_main_list_cardexpsevdnc.addRow();
  319. ds_main_list_cardexpsevdnc.setColumn(0, "unsldd", ds_target_slipinfo.getColumn(0, "unsldd"));
  320. ds_main_list_cardexpsevdnc.setColumn(0, "unslno", ds_target_slipinfo.getColumn(0, "unslno"));
  321. //ds_main_list_cardexpsevdnc.setColumn(0, "undeciseqno", ds_target_slipinfo.getColumn(0, "undeciseqno"));
  322. if(ds_target_slipinfo.getColumnInfo("useflag"))
  323. {
  324. ds_main_list_cardexpsevdnc.setColumn(0, "useflag", ds_target_slipinfo.getColumn(0, "useflag"));
  325. }
  326. else
  327. {
  328. ds_main_list_cardexpsevdnc.setColumn(0, "useflag", "2");
  329. }
  330. }
  331. else
  332. {
  333. ipt_usedd.enable = false;
  334. ipt_cardno.enable = false;
  335. }
  336. dsf_makeValue(ds_main_list_cardexpsevdnc, "dummy", "string", "", 0);
  337. dsf_makeValue(ds_main_list_cardexpsevdnc, "profcnt", "string", "", 0);
  338. dsf_makeValue(ds_main_list_cardexpsevdnc, "instcd", "string", ds_target_slipinfo.getColumn(0, "instcd"), 0);
  339. if (utlf_isNull(ds_main_list_cardexpsevdnc.getColumn(0, "entrregno")) && !utlf_isNull(ds_target_slipinfo.getColumn(0, "custcd")))
  340. {
  341. ds_main_list_cardexpsevdnc.setColumn(0, "entrregno", ds_target_slipinfo.getColumn(0, "custcd"));
  342. }
  343. if(utlf_isNull(ds_main_list_cardexpsevdnc.getColumn(0, "instcardseqno")))
  344. {
  345. dsf_makeValue(ds_main_list_cardexpsevdnc, "useamt", "string", ds_target_slipinfo.getColumn(0, "amt"), 0);
  346. dsf_makeValue(ds_main_list_cardexpsevdnc, "mainrec", "string", ds_target_slipinfo.getColumn(0, "etcnotefact"), 0);
  347. }
  348. ipt_cardno.setFocus();
  349. }
  350. function ipt_cardno_onkeydown(obj:MaskEdit, e:KeyEventInfo)
  351. {
  352. if(e.keycode == 13)
  353. {
  354. obj.updateToDataset();
  355. cmb_cardcmpycd.setFocus();
  356. }
  357. }
  358. function ipt_posspsn_onkeydown(obj:Edit, e:KeyEventInfo)
  359. {
  360. if(e.keycode == 13)
  361. {
  362. obj.updateToDataset();
  363. ipt_usedd.setFocus();
  364. }
  365. }
  366. function ds_main_list_cardexpsevdnc_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  367. {
  368. if(e.columnid == "posspsn")
  369. {
  370. ipt_posspsn.value = e.newvalue;
  371. ipt_posspsn.setFocus();
  372. misfValidationCheck("01-1", "", "posspsn,posspsnnm");
  373. }
  374. if(e.columnid == "posspsnnm")
  375. {
  376. ipt_posspsnnm.value = e.newvalue;
  377. ipt_posspsnnm.setFocus();
  378. misfValidationCheck("01-2", "", "posspsn,posspsnnm");
  379. }
  380. if(e.columnid == "entrregno")
  381. {
  382. ipt_entrregno.value = e.newvalue;
  383. ipt_entrregno.setFocus();
  384. racfCustValidCheck("entrregno,custnm,dummy,cntctel,custaddr", "code");
  385. }
  386. if(e.columnid == "custnm")
  387. {
  388. ipt_custnm.value = e.newvalue;
  389. ipt_custnm.setFocus();
  390. racfCustValidCheck("entrregno,custnm,dummy,cntctel,custaddr", "name");
  391. }
  392. }
  393. function btn_userhelp_onclick(obj:Button, e:ClickEventInfo)
  394. {
  395. misfOpenPopUpList("01", ds_main_list_cardexpsevdnc, "", "posspsn,posspsnnm");
  396. ipt_usedd.setFocus();
  397. }
  398. function ipt_posspsnnm_onkeydown(obj:Edit, e:KeyEventInfo)
  399. {
  400. if(e.keycode == 13)
  401. {
  402. obj.updateToDataset();
  403. ipt_usedd.setFocus();
  404. }
  405. }
  406. function ipt_usedd_onkeydown(obj:Calendar, e:KeyEventInfo)
  407. {
  408. if(e.keycode == 13)
  409. {
  410. obj.updateToDataset();
  411. ipt_useamt.setFocus();
  412. }
  413. }
  414. function ipt_useamt_onkeydown(obj:MaskEdit, e:KeyEventInfo)
  415. {
  416. if(e.keycode == 13)
  417. {
  418. obj.updateToDataset();
  419. ipt_cmt.setFocus();
  420. }
  421. }
  422. function ipt_cmt_onkeydown(obj:Edit, e:KeyEventInfo)
  423. {
  424. if(e.keycode == 13)
  425. {
  426. obj.updateToDataset();
  427. btn_save.setFocus();
  428. }
  429. }
  430. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  431. {
  432. fSave();
  433. }
  434. function fSave()
  435. {
  436. if(utlf_isNull(ds_main_list_cardexpsevdnc.getColumn(0, "usedd")))
  437. {
  438. sysf_messageBox("사용일자는" ,"I003");
  439. ipt_usedd.setFocus();
  440. return;
  441. }
  442. var oParam = {};
  443. oParam.id = "TXRAD00104";
  444. oParam.service = "slipapp.Slip";
  445. oParam.method = "reqExeSaveCardExpsEvdnc";
  446. oParam.inds = "req=ds_main_list_cardexpsevdnc:u";
  447. oParam.outds = "ds_temp_seqno=seqno";
  448. oParam.async = false;
  449. //oParam.callback = "cf_TXRAD00104";
  450. tranf_submit(oParam);
  451. var receiveref = eval("opener." + ds_target.getColumn(0, "receiveref"));
  452. if (frmf_checkOpener())
  453. {
  454. receiveref.setColumn(0, "seqno", ds_temp_seqno.getColumn(0, "seqno"));
  455. receiveref.setColumn(0, "amt", ds_main_list_cardexpsevdnc.getColumn(0, "useamt"));
  456. if(utlf_isNull(receiveref.getColumn(0, "etcnotefact")))
  457. {
  458. receiveref.setColumn(0, "etcnotefact", ds_main_list_cardexpsevdnc.getColumn(0, "mainrec"));
  459. }
  460. sysf_messageBox("저장이 " ,"I002");
  461. }
  462. else
  463. {
  464. sysf_messageBox("상위화면이 변경되어 데이터를 전달할 수 ", "I004");
  465. }
  466. ds_main_list_cardexpsevdnc.setColumn(0, "seqno", ds_temp_seqno.getColumn(0, "seqno"));
  467. ipt_usedd.enable = false;
  468. ipt_cardno.enable = false;
  469. }
  470. function btn_delete_onclick(obj:Button, e:ClickEventInfo)
  471. {
  472. fDel();
  473. }
  474. function fDel()
  475. {
  476. ds_main_list_cardexpsevdnc.updatecontrol = false;
  477. ds_main_list_cardexpsevdnc.setRowType(0, "d");
  478. ds_main_list_cardexpsevdnc.updatecontrol = true;
  479. var oParam = {};
  480. oParam.id = "TXRAD00104";
  481. oParam.service = "slipapp.Slip";
  482. oParam.method = "reqExeSaveCardExpsEvdnc";
  483. oParam.inds = "req=ds_main_list_cardexpsevdnc:u";
  484. oParam.outds = "ds_temp_seqno=seqno";
  485. oParam.async = false;
  486. //oParam.callback = "cf_TXRAD00104";
  487. tranf_submit(oParam);
  488. ds_main_list_cardexpsevdnc.clearData();
  489. var receiveref = eval("opener." + ds_target.getColumn(0, "receiveref"));
  490. if (frmf_checkOpener())
  491. {
  492. receiveref.setColumn(0, "seqno", "");
  493. }
  494. else
  495. {
  496. sysf_messageBox("상위화면이 변경되어 데이터를 전달할 수 ", "I004");
  497. }
  498. ds_main_list_cardexpsevdnc.addRow();
  499. dsf_makeValue(ds_main_list_cardexpsevdnc, "dummy", "string", "", 0);
  500. ds_main_list_cardexpsevdnc.setColumn(0, "seqno", "");
  501. ds_main_list_cardexpsevdnc.setColumn(0, "unsldd", ds_target_slipinfo.getColumn(0, "unsldd"));
  502. ds_main_list_cardexpsevdnc.setColumn(0, "unslno", ds_target_slipinfo.getColumn(0, "unslno"));
  503. ds_main_list_cardexpsevdnc.setColumn(0, "undeciseqno", ds_target_slipinfo.getColumn(0, "undeciseqno"));
  504. ds_main_list_cardexpsevdnc.setColumn(0, "useflag", ds_target_slipinfo.getColumn(0, "useflag"));
  505. ds_main_list_cardexpsevdnc.setColumn(0, "entrregno", ds_target_slipinfo.getColumn(0, "custcd"));
  506. ipt_usedd.enable = true;
  507. ipt_cardno.enable = true;
  508. ipt_cardno.setFocus();
  509. }
  510. function btn_close_onclick(obj:Button, e:ClickEventInfo)
  511. {
  512. this.close();
  513. }
  514. ]]></Script>
  515. </Form>
  516. </FDL>