SMLPD00300_슬라이드대출반납신청.xfdl 76 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMLPD00300" position="absolute 0 0 1264 813" titletext="슬라이드 대출반납신청" oninit="model1_oninit" onload="SMLPD00300_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="슬라이드 대출/반납 신청" class="tit_1" position="absolute 0 1 182 25" positiontype="position"/>
  8. <Tab id="swc_slidlend" taborder="1" tabindex="0" position="absolute 1 28 1257 808" anchor="all" positiontype="position" onchanged="swc_slidlend_onchanged">
  9. <Tabpages>
  10. <Tabpage id="case_lendapp" text="대출신청">
  11. <Layouts>
  12. <Layout>
  13. <Grid id="grd_lendtrgtlist" taborder="1" useinputpanel="false" position="absolute 0 72 1256 370" style="align:center middle;" autofittype="col" anchor="left top right" binddataset="ds_grid_grd_lendtrgtlist" positiontype="position" oncellclick="swc_slidlend_case_lendapp_grd_lendtrgtlist_oncellclick" onheadclick="swc_slidlend_case_lendapp_grd_lendtrgtlist_onheadclick" class="CSS::lis.css">
  14. <Formats>
  15. <Format id="default">
  16. <Columns>
  17. <Column size="30"/>
  18. <Column size="30"/>
  19. <Column size="30"/>
  20. <Column size="0"/>
  21. <Column size="0"/>
  22. <Column size="90"/>
  23. <Column size="80"/>
  24. <Column size="80"/>
  25. <Column size="170"/>
  26. <Column size="170"/>
  27. <Column size="170"/>
  28. <Column size="132"/>
  29. <Column size="80"/>
  30. <Column size="70"/>
  31. <Column size="70"/>
  32. <Column size="0"/>
  33. <Column size="0"/>
  34. <Column size="0"/>
  35. </Columns>
  36. <Rows>
  37. <Row size="22" band="head"/>
  38. <Row size="20"/>
  39. </Rows>
  40. <Band id="head">
  41. <Cell/>
  42. <Cell col="1" text="상태"/>
  43. <Cell col="2" displaytype="checkbox" edittype="checkbox"/>
  44. <Cell col="3" text="기관코드"/>
  45. <Cell col="4" text="병리번호"/>
  46. <Cell col="5" text="병리번호"/>
  47. <Cell col="6" text="처방일"/>
  48. <Cell col="7" text="접수일"/>
  49. <Cell col="8" text="M"/>
  50. <Cell col="9" text="T"/>
  51. <Cell col="10" text="P"/>
  52. <Cell col="11" text="대출목적"/>
  53. <Cell col="12" text="대출상태"/>
  54. <Cell col="13" text="육안검사"/>
  55. <Cell col="14" text="판독의"/>
  56. <Cell col="15" text="등록번호"/>
  57. <Cell col="16" text="대출신청일자"/>
  58. <Cell col="17" text="대출신청번호"/>
  59. </Band>
  60. <Band id="body">
  61. <Cell celltype="head" expr="currow+1"/>
  62. <Cell col="1" displaytype="image" style="align:middle;" expr="getRowType(currow) == 2 ?'theme://images/ico_i.png' : (getRowType(currow) == 4 ? 'theme://images/ico_u.png' : (getRowType(currow) == 8 ? 'theme://images/ico_d.png' : 'theme://images/ico_e.png'))"/>
  63. <Cell col="2" displaytype="checkbox" edittype="expr:lendflagcd != &quot;0&quot; ? 'readonly' : 'checkbox'" style="background:EXPR(lendflagcd != &quot;0&quot; ? '#ABABAB' : (acptdd == &quot;&quot; ? '#ABABAB' : ''));background2:EXPR(lendflagcd != &quot;0&quot; ? '#ABABAB' : (acptdd == &quot;&quot; ? '#ABABAB' : ''));selectbackground:EXPR(lendflagcd != &quot;0&quot; ? '#ABABAB' : (acptdd == &quot;&quot; ? '#ABABAB' : ''));" text="bind:choi"/>
  64. <Cell col="3" text="bind:instcd"/>
  65. <Cell col="4" text="bind:ptno"/>
  66. <Cell col="5" displaytype="normal" edittype="none" text="bind:dispptno"/>
  67. <Cell col="6" displaytype="normal" edittype="none" text="bind:prcpdd" mask="####-##-##"/>
  68. <Cell col="7" text="bind:acptdd" mask="####-##-##"/>
  69. <Cell col="8" displaytype="normal" edittype="none" text="bind:diagcnts"/>
  70. <Cell col="9" displaytype="normal" edittype="none" text="bind:extrpartcnts"/>
  71. <Cell col="10" displaytype="normal" edittype="none" text="bind:extrmthdcnts"/>
  72. <Cell col="11" displaytype="combo" edittype="combo" text="bind:lendresncd" combodataset="ds_resncdlist" combocodecol="resncd" combodatacol="resncnts"/>
  73. <Cell col="12" displaytype="combo" edittype="combo" text="bind:lendflagcd" combodataset="ds_lendflag" combocodecol="value" combodatacol="label"/>
  74. <Cell col="13" text="bind:grosdrnm"/>
  75. <Cell col="14" displaytype="normal" edittype="none" text="bind:readdrnm"/>
  76. <Cell col="15" text="bind:pid"/>
  77. <Cell col="16" text="bind:lendappdd"/>
  78. <Cell col="17" text="bind:lendappno"/>
  79. <Cell col="18"/>
  80. </Band>
  81. </Format>
  82. </Formats>
  83. </Grid>
  84. <Div id="group1" taborder="2" style="align:center top;" position="absolute 0 0 1250 42" class="div_SA2" anchor="left top right" positiontype="position">
  85. <Layouts>
  86. <Layout>
  87. <Static id="caption2" text="조회조건 :" class="search_name" position="absolute 8 10 82 30" anchor="default" positiontype="position"/>
  88. <Button id="button2" taborder="1" text="조회" class="btn1" position="absolute 1188 10 1244 30" anchor="top right" onclick="button2_onclick" positiontype="position"/>
  89. <Edit id="ipt_lendrefval" taborder="2" class="input_s_essential" position="absolute 232 10 332 30" anchor="default" imemode="hangul" onkeydown="swc_slidlend_case_lendapp_group1_ipt_lendrefval_onkeydown" positiontype="position"/>
  90. <Combo id="cmb_lendrefflag" taborder="3" class="combo_s_essential" position="absolute 82 10 229 30" anchor="default" codecolumn="codecolumn" datacolumn="datacolumn" value="1" text="등록번호" index="0" positiontype="position">
  91. <Dataset id="innerdataset">
  92. <ColumnInfo>
  93. <Column id="codecolumn" size="256"/>
  94. <Column id="datacolumn" size="256"/>
  95. </ColumnInfo>
  96. <Rows>
  97. <Row>
  98. <Col id="codecolumn">1</Col>
  99. <Col id="datacolumn">등록번호</Col>
  100. </Row>
  101. </Rows>
  102. </Dataset>
  103. </Combo>
  104. </Layout>
  105. </Layouts>
  106. </Div>
  107. <Static id="caption32" text="대출신청 대상목록" class="tit_2" position="absolute 0 49 131 65" positiontype="position"/>
  108. <Static id="caption1" text="대출신청정보" class="tit_2" visible="false" position="absolute 209 179 317 199" positiontype="position"/>
  109. <Static id="caption4" text="대출목적" class="search_name" position="absolute 979 47 1071 71" anchor="top right" positiontype="position"/>
  110. <Static id="caption13" text="대출자연락처" class="cell_1" visible="false" position="absolute 460 199 548 223" style="align:center middle;" positiontype="position"/>
  111. <Static id="caption14" text="담당교수" class="cell_1" visible="false" position="absolute 699 199 787 223" style="align:center middle;" positiontype="position"/>
  112. <Combo id="combo6" taborder="3" visible="false" position="absolute 790 200 932 220" positiontype="position" innerdataset="@ds_userinfolist" codecolumn="userid" datacolumn="usernm"/>
  113. <Edit id="out_cntctel" taborder="4" readonly="true" visible="false" position="absolute 551 200 696 220" positiontype="position"/>
  114. <Static id="caption15" text="대출신청목록" class="tit_2" position="absolute 1 377 102 394" positiontype="position"/>
  115. <Grid id="grd_lendapplist" taborder="5" useinputpanel="false" position="absolute 0 400 1256 753" style="align:center middle;" autofittype="col" anchor="all" binddataset="ds_grid_grd_lendapplist" positiontype="position" class="CSS::lis.css">
  116. <Formats>
  117. <Format id="default">
  118. <Columns>
  119. <Column size="30"/>
  120. <Column size="30"/>
  121. <Column size="0"/>
  122. <Column size="0"/>
  123. <Column size="90"/>
  124. <Column size="80"/>
  125. <Column size="80"/>
  126. <Column size="170"/>
  127. <Column size="170"/>
  128. <Column size="170"/>
  129. <Column size="80"/>
  130. <Column size="80"/>
  131. <Column size="94"/>
  132. <Column size="94"/>
  133. <Column size="0"/>
  134. <Column size="0"/>
  135. <Column size="0"/>
  136. </Columns>
  137. <Rows>
  138. <Row size="22" band="head"/>
  139. <Row size="20"/>
  140. </Rows>
  141. <Band id="head">
  142. <Cell/>
  143. <Cell col="1" text="선택"/>
  144. <Cell col="2" text="기관코드"/>
  145. <Cell col="3" text="병리번호"/>
  146. <Cell col="4" text="병리번호"/>
  147. <Cell col="5" text="처방일"/>
  148. <Cell col="6" text="접수일"/>
  149. <Cell col="7" text="M"/>
  150. <Cell col="8" text="T"/>
  151. <Cell col="9" text="P"/>
  152. <Cell col="10" text="대출목적"/>
  153. <Cell col="11" text="대출상태"/>
  154. <Cell col="12" text="육안검사"/>
  155. <Cell col="13" text="판독의"/>
  156. <Cell col="14" text="등록번호"/>
  157. <Cell col="15" text="대출신청일자"/>
  158. <Cell col="16" text="대출신청번호"/>
  159. </Band>
  160. <Band id="body">
  161. <Cell celltype="head" expr="currow+1"/>
  162. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
  163. <Cell col="2" text="bind:instcd"/>
  164. <Cell col="3" text="bind:ptno"/>
  165. <Cell col="4" displaytype="normal" edittype="none" text="bind:dispptno"/>
  166. <Cell col="5" displaytype="normal" edittype="none" text="bind:prcpdd" mask="####-##-##"/>
  167. <Cell col="6" text="bind:acptdd" mask="####-##-##"/>
  168. <Cell col="7" displaytype="normal" edittype="none" text="bind:rsltm"/>
  169. <Cell col="8" displaytype="normal" edittype="none" text="bind:rsltt"/>
  170. <Cell col="9" displaytype="normal" edittype="none" text="bind:rsltp"/>
  171. <Cell col="10" displaytype="combo" edittype="combo" text="bind:lendresncd" combodataset="ds_resncdlist" combocodecol="resncd" combodatacol="resncnts"/>
  172. <Cell col="11" displaytype="combo" edittype="combo" text="bind:lendflagcd"/>
  173. <Cell col="12" text="bind:grosdrnm"/>
  174. <Cell col="13" displaytype="normal" edittype="none" text="bind:readdrnm"/>
  175. <Cell col="14" text="bind:pid"/>
  176. <Cell col="15" text="bind:lendappdd"/>
  177. <Cell col="16" text="bind:lendappno"/>
  178. <Cell col="17"/>
  179. </Band>
  180. </Format>
  181. </Formats>
  182. </Grid>
  183. <Button id="btn_lendappadd" taborder="6" text="대출선택" class="btn2" position="absolute 1188 49 1256 69" anchor="top right" positiontype="position" onclick="btn_lendappadd_onclick"/>
  184. <Combo id="cmb_lendkindcd" taborder="7" position="absolute 1053 49 1185 69" anchor="top right" positiontype="position" innerdataset="@ds_resncdlist" codecolumn="resncd" datacolumn="resncnts" onitemchanged="swc_slidlend_case_lendapp_cmb_lendkindcd_onitemchanged"/>
  185. <Button id="btn_lendappdel" taborder="8" text="삭제" class="btn2" position="absolute 1212 377 1256 397" anchor="top right" positiontype="position" onclick="btn_lendappdel_onclick"/>
  186. </Layout>
  187. </Layouts>
  188. </Tabpage>
  189. <Tabpage id="rtnappinfo" text="반납신청">
  190. <Layouts>
  191. <Layout>
  192. <Div id="group5" taborder="1" style="align:center top;" position="absolute 0 0 1256 42" class="div_SA2" anchor="left top right" positiontype="position">
  193. <Layouts>
  194. <Layout>
  195. <Static id="caption3" text="조회조건 :" class="search_name" position="absolute 844 10 918 30" anchor="top right" positiontype="position"/>
  196. <Static id="caption12" text="~" position="absolute 195 10 211 30" style="align:center;" anchor="default" class="search_no_b" positiontype="position"/>
  197. <Static id="caption9" text="신청일자 :" class="search_name" position="absolute 8 10 82 30" anchor="default" positiontype="position"/>
  198. <Calendar id="ipt_appfrom" taborder="1" class="input_essential" position="absolute 90 10 190 30" mask="####-##-##" anchor="default" positiontype="position" dateformat="yyyy-MM-dd" value="null"/>
  199. <Calendar id="ipt_todd" taborder="2" class="input_essential" position="absolute 216 10 318 30" mask="####-##-##" anchor="default" positiontype="position" dateformat="yyyy-MM-dd" value="null"/>
  200. <Button id="btn_sea" taborder="3" text="조회" class="btn1" position="absolute 1188 10 1244 30" anchor="top right" positiontype="position" onclick="btn_sea_onclick"/>
  201. <Combo id="cmb_refflagcd" taborder="4" class="combo_search" position="absolute 924 10 1071 30" anchor="top right" enable="false" positiontype="position" codecolumn="codecolumn" datacolumn="datacolumn" value="1" text="등록번호" index="0">
  202. <Dataset id="innerdataset">
  203. <ColumnInfo>
  204. <Column id="codecolumn" size="256"/>
  205. <Column id="datacolumn" size="256"/>
  206. </ColumnInfo>
  207. <Rows>
  208. <Row>
  209. <Col id="codecolumn">1</Col>
  210. <Col id="datacolumn">등록번호</Col>
  211. </Row>
  212. <Row>
  213. <Col id="codecolumn">2</Col>
  214. <Col id="datacolumn">병리번호</Col>
  215. </Row>
  216. <Row>
  217. <Col id="codecolumn">3</Col>
  218. <Col id="datacolumn">대출자ID</Col>
  219. </Row>
  220. <Row>
  221. <Col id="codecolumn">4</Col>
  222. <Col id="datacolumn">담당교수ID</Col>
  223. </Row>
  224. </Rows>
  225. </Dataset>
  226. </Combo>
  227. <Edit id="ipt_rtnrefval" taborder="5" class="input_search" position="absolute 1074 10 1174 30" anchor="top right" imemode="hangul" positiontype="position" onkeydown="swc_slidlend_rtnappinfo_group5_ipt_rtnrefval_onkeydown"/>
  228. </Layout>
  229. </Layouts>
  230. </Div>
  231. <Static id="caption5" text="반납신청 대상목록" class="tit_2" position="absolute 0 50 136 68" positiontype="position"/>
  232. <Static id="caption16" text="반납신청목록" class="tit_2" position="absolute 0 377 101 397" positiontype="position"/>
  233. <Button id="btn_rtnappadd" taborder="2" text="반납선택" onlbuttonup="btn_rtnappadd_onlbuttonup" class="btn2" position="absolute 1188 49 1256 69" anchor="top right" positiontype="position" onclick="btn_rtnappadd_onclick"/>
  234. <Grid id="grd_rtntrgtlist" taborder="3" useinputpanel="false" position="absolute 0 72 1256 370" style="align:center middle;" anchor="left top right" autofittype="col" binddataset="ds_grid_grd_rtntrgtlist" positiontype="position" onheadclick="swc_slidlend_rtnappinfo_grd_rtntrgtlist_onheadclick" oncellclick="swc_slidlend_rtnappinfo_grd_rtntrgtlist_oncellclick" class="CSS::lis.css">
  235. <Formats>
  236. <Format id="default">
  237. <Columns>
  238. <Column size="0"/>
  239. <Column size="30"/>
  240. <Column size="30"/>
  241. <Column size="30"/>
  242. <Column size="0"/>
  243. <Column size="0"/>
  244. <Column size="110"/>
  245. <Column size="80"/>
  246. <Column size="0"/>
  247. <Column size="130"/>
  248. <Column size="80"/>
  249. <Column size="210"/>
  250. <Column size="170"/>
  251. <Column size="170"/>
  252. <Column size="80"/>
  253. <Column size="80"/>
  254. <Column size="0"/>
  255. <Column size="0"/>
  256. <Column size="0"/>
  257. <Column size="0"/>
  258. <Column size="0"/>
  259. <Column size="0"/>
  260. <Column size="0"/>
  261. <Column size="0"/>
  262. <Column size="0"/>
  263. </Columns>
  264. <Rows>
  265. <Row size="24" band="head"/>
  266. <Row size="24"/>
  267. </Rows>
  268. <Band id="head">
  269. <Cell text="treeflag"/>
  270. <Cell col="1"/>
  271. <Cell col="2" text="상태"/>
  272. <Cell col="3" displaytype="checkbox" edittype="checkbox"/>
  273. <Cell col="4" text="기관코드"/>
  274. <Cell col="5" text="병리번호"/>
  275. <Cell col="6" text="병리번호"/>
  276. <Cell col="7" text="대출일"/>
  277. <Cell col="8" text="대출번호"/>
  278. <Cell col="9" text="대출목적"/>
  279. <Cell col="10" text="처방일"/>
  280. <Cell col="11" text="M"/>
  281. <Cell col="12" text="T"/>
  282. <Cell col="13" text="P"/>
  283. <Cell col="14" text="육안검사"/>
  284. <Cell col="15" text="판독의"/>
  285. <Cell col="16" text="등록번호"/>
  286. <Cell col="17" text="lendappdd"/>
  287. <Cell col="18" text="lendappno"/>
  288. <Cell col="19" text="spcacptseqno"/>
  289. <Cell col="20" text="csteno"/>
  290. <Cell col="21" text="slidno"/>
  291. <Cell col="22" text="lenddd"/>
  292. <Cell col="23" text="lendno"/>
  293. <Cell col="24" text="slidseqno"/>
  294. </Band>
  295. <Band id="body">
  296. <Cell text="bind:treeflag"/>
  297. <Cell col="1" celltype="head" expr="currow+1"/>
  298. <Cell col="2" expr="getRowType(currow) == 2 ?'theme://images/ico_i.png' : (getRowType(currow) == 4 ? 'theme://images/ico_u.png' : (getRowType(currow) == 8 ? 'theme://images/ico_d.png' : 'theme://images/ico_e.png'))"/>
  299. <Cell col="3" displaytype="checkbox" edittype="expr:treeflag == &quot;1&quot; ? 'readonly' : 'checkbox'" text="bind:choi"/>
  300. <Cell col="4" text="bind:instcd"/>
  301. <Cell col="5" text="bind:ptno"/>
  302. <Cell col="6" text="bind:dispptno"/>
  303. <Cell col="7" displaytype="normal" edittype="none" text="bind:appdd" mask="@@@@-@@-@@"/>
  304. <Cell col="8" text="bind:appno"/>
  305. <Cell col="9" displaytype="combo" edittype="combo" text="bind:lendresncd"/>
  306. <Cell col="10" displaytype="normal" edittype="none" text="bind:prcpdd" mask="@@@@-@@-@@"/>
  307. <Cell col="11" displaytype="normal" edittype="none" text="bind:diagcnts"/>
  308. <Cell col="12" displaytype="normal" edittype="none" text="bind:extrpartcnts"/>
  309. <Cell col="13" displaytype="normal" edittype="none" text="bind:extrmthdcnts"/>
  310. <Cell col="14" displaytype="normal" edittype="none" text="bind:grosdrnm"/>
  311. <Cell col="15" displaytype="normal" edittype="none" text="bind:readdrnm"/>
  312. <Cell col="16" text="bind:pid"/>
  313. <Cell col="17" text="bind:lendappdd"/>
  314. <Cell col="18" text="bind:lendappno"/>
  315. <Cell col="19" text="bind:spcacptseqno"/>
  316. <Cell col="20" text="bind:csteno"/>
  317. <Cell col="21" text="bind:slidno"/>
  318. <Cell col="22" text="bind:lenddd"/>
  319. <Cell col="23" text="bind:lendno"/>
  320. <Cell col="24" text="bind:slidseqno"/>
  321. </Band>
  322. </Format>
  323. </Formats>
  324. </Grid>
  325. <Grid id="grd_rtnapplist" taborder="4" useinputpanel="false" position="absolute 0 400 1256 752" style="align:center middle;" autofittype="col" anchor="all" binddataset="ds_grid_grd_rtnapplist" positiontype="position" class="CSS::lis.css">
  326. <Formats>
  327. <Format id="default">
  328. <Columns>
  329. <Column size="30"/>
  330. <Column size="0"/>
  331. <Column size="0"/>
  332. <Column size="80"/>
  333. <Column size="80"/>
  334. <Column size="0"/>
  335. <Column size="130"/>
  336. <Column size="80"/>
  337. <Column size="215"/>
  338. <Column size="182"/>
  339. <Column size="182"/>
  340. <Column size="80"/>
  341. <Column size="80"/>
  342. <Column size="0"/>
  343. <Column size="0"/>
  344. <Column size="0"/>
  345. <Column size="0"/>
  346. <Column size="0"/>
  347. <Column size="0"/>
  348. <Column size="0"/>
  349. <Column size="0"/>
  350. <Column size="0"/>
  351. </Columns>
  352. <Rows>
  353. <Row size="24" band="head"/>
  354. <Row size="24"/>
  355. </Rows>
  356. <Band id="head">
  357. <Cell text="선택"/>
  358. <Cell col="1" text="기관코드"/>
  359. <Cell col="2" text="병리번호"/>
  360. <Cell col="3" text="병리번호"/>
  361. <Cell col="4" text="대출일"/>
  362. <Cell col="5" text="대출번호"/>
  363. <Cell col="6" text="대출목적"/>
  364. <Cell col="7" text="처방일"/>
  365. <Cell col="8" text="M"/>
  366. <Cell col="9" text="T"/>
  367. <Cell col="10" text="P"/>
  368. <Cell col="11" text="육안검사"/>
  369. <Cell col="12" text="판독의"/>
  370. <Cell col="13" text="등록번호"/>
  371. <Cell col="14" text="lendappdd"/>
  372. <Cell col="15" text="lendappno"/>
  373. <Cell col="16" text="spcacptseqno"/>
  374. <Cell col="17" text="csteno"/>
  375. <Cell col="18" text="slidno"/>
  376. <Cell col="19" text="lenddd"/>
  377. <Cell col="20" text="lendno"/>
  378. <Cell col="21" text="slidseqno"/>
  379. </Band>
  380. <Band id="body">
  381. <Cell text="bind:choi" edittype="checkbox" displaytype="checkbox"/>
  382. <Cell col="1" text="bind:instcd"/>
  383. <Cell col="2" text="bind:ptno"/>
  384. <Cell col="3" text="bind:dispptno"/>
  385. <Cell col="4" text="bind:appdd" edittype="none" displaytype="normal" mask="@@@@-@@-@@"/>
  386. <Cell col="5" text="bind:appno"/>
  387. <Cell col="6" text="bind:lendresncd" edittype="combo" displaytype="combo"/>
  388. <Cell col="7" text="bind:prcpdd" edittype="none" displaytype="normal" mask="@@@@-@@-@@"/>
  389. <Cell col="8" text="bind:rsltm" edittype="none" displaytype="normal"/>
  390. <Cell col="9" text="bind:rsltt" edittype="none" displaytype="normal"/>
  391. <Cell col="10" text="bind:rsltp" edittype="none" displaytype="normal"/>
  392. <Cell col="11" text="bind:grosdrnm" edittype="none" displaytype="normal"/>
  393. <Cell col="12" text="bind:readdrnm" edittype="none" displaytype="normal"/>
  394. <Cell col="13" text="bind:pid"/>
  395. <Cell col="14" text="bind:lendappdd"/>
  396. <Cell col="15" text="bind:lendappno"/>
  397. <Cell col="16" text="bind:spcacptseqno"/>
  398. <Cell col="17" text="bind:csteno"/>
  399. <Cell col="18" text="bind:slidno"/>
  400. <Cell col="19" text="bind:lenddd"/>
  401. <Cell col="20" text="bind:lendno"/>
  402. <Cell col="21" text="bind:slidseqno"/>
  403. </Band>
  404. </Format>
  405. </Formats>
  406. </Grid>
  407. <Button id="btn_rtnappdel" taborder="5" text="삭제" class="btn2" position="absolute 1212 377 1256 397" anchor="top right" positiontype="position" onclick="btn_rtnappdel_onclick"/>
  408. </Layout>
  409. </Layouts>
  410. </Tabpage>
  411. <Tabpage id="case_appcncl" text="신청취소">
  412. <Layouts>
  413. <Layout>
  414. <Div id="group7" taborder="1" style="align:center top;" position="absolute 0 0 1256 42" class="div_SA2" anchor="left top right" positiontype="position">
  415. <Layouts>
  416. <Layout>
  417. <Static id="caption7" text="조회조건 :" class="search_name" position="absolute 830 10 904 30" anchor="top right" positiontype="position"/>
  418. <Button id="button5" taborder="1" text="조회" class="btn1" position="absolute 1188 10 1244 30" anchor="top right" positiontype="position" onclick="button5_onclick"/>
  419. <Combo id="combo3" taborder="2" class="combo_search" position="absolute 908 10 1055 30" anchor="top right" enable="false" positiontype="position" codecolumn="codecolumn" datacolumn="datacolumn" value="1" text="등록번호" index="0">
  420. <Dataset id="innerdataset">
  421. <ColumnInfo>
  422. <Column id="codecolumn" size="256"/>
  423. <Column id="datacolumn" size="256"/>
  424. </ColumnInfo>
  425. <Rows>
  426. <Row>
  427. <Col id="codecolumn">1</Col>
  428. <Col id="datacolumn">등록번호</Col>
  429. </Row>
  430. <Row>
  431. <Col id="codecolumn">2</Col>
  432. <Col id="datacolumn">병리번호</Col>
  433. </Row>
  434. </Rows>
  435. </Dataset>
  436. </Combo>
  437. <Static id="caption8" text="~" position="absolute 196 10 212 30" style="align:center;" anchor="default" class="search_no_b" positiontype="position"/>
  438. <Static id="caption10" text="신청일자 :" class="search_name" position="absolute 8 10 82 30" anchor="default" positiontype="position"/>
  439. <Calendar id="ipt_ddfrom" taborder="3" class="input_s_essential" position="absolute 91 10 191 30" mask="####-##-##" anchor="default" positiontype="position" dateformat="yyyy-MM-dd" value="null"/>
  440. <Calendar id="ipt_ddto" taborder="4" class="input_s_essential" position="absolute 212 10 312 30" mask="####-##-##" anchor="default" positiontype="position" dateformat="yyyy-MM-dd" value="null"/>
  441. <Edit id="ipt_cnclrefval" taborder="5" class="input_search" position="absolute 1058 10 1158 30" anchor="top right" imemode="hangul" positiontype="position" onkeydown="swc_slidlend_case_appcncl_group7_ipt_cnclrefval_onkeydown"/>
  442. </Layout>
  443. </Layouts>
  444. </Div>
  445. <Static id="caption11" text="대출/반납 신청목록" class="tit_2" position="absolute 0 49 138 66" positiontype="position"/>
  446. <Grid id="grd_lendrtnapplist" taborder="2" useinputpanel="false" position="absolute 0 72 1255 753" style="align:center middle;" autofittype="col" anchor="all" binddataset="ds_grid_grd_lendrtnapplist" positiontype="position" oncellclick="swc_slidlend_case_appcncl_grd_lendrtnapplist_oncellclick" class="CSS::lis.css">
  447. <Formats>
  448. <Format id="default">
  449. <Columns>
  450. <Column size="30"/>
  451. <Column size="30"/>
  452. <Column size="0"/>
  453. <Column size="0"/>
  454. <Column size="90"/>
  455. <Column size="60"/>
  456. <Column size="72"/>
  457. <Column size="0"/>
  458. <Column size="72"/>
  459. <Column size="190"/>
  460. <Column size="190"/>
  461. <Column size="190"/>
  462. <Column size="70"/>
  463. <Column size="70"/>
  464. <Column size="106"/>
  465. <Column size="0"/>
  466. </Columns>
  467. <Rows>
  468. <Row size="24" band="head"/>
  469. <Row size="24"/>
  470. </Rows>
  471. <Band id="head">
  472. <Cell/>
  473. <Cell col="1" text="선택"/>
  474. <Cell col="2" text="기관코드"/>
  475. <Cell col="3" text="병리번호"/>
  476. <Cell col="4" text="병리번호"/>
  477. <Cell col="5" text="신청구분"/>
  478. <Cell col="6" text="신청일"/>
  479. <Cell col="7" text="신청번호"/>
  480. <Cell col="8" text="처방일"/>
  481. <Cell col="9" text="M"/>
  482. <Cell col="10" text="T"/>
  483. <Cell col="11" text="P"/>
  484. <Cell col="12" text="육안검사"/>
  485. <Cell col="13" text="판독의"/>
  486. <Cell col="14" text="미승인사유"/>
  487. <Cell col="15" text="승인구분"/>
  488. </Band>
  489. <Band id="body">
  490. <Cell celltype="head" expr="currow+1"/>
  491. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
  492. <Cell col="2" text="bind:instcd"/>
  493. <Cell col="3" text="bind:ptno"/>
  494. <Cell col="4" text="bind:dispptno"/>
  495. <Cell col="5" displaytype="combo" edittype="combo" text="bind:appflagcd"/>
  496. <Cell col="6" displaytype="normal" edittype="none" text="bind:appdd" mask="@@@@-@@-@@"/>
  497. <Cell col="7" text="bind:appno"/>
  498. <Cell col="8" displaytype="normal" edittype="none" text="bind:prcpdd" mask="@@@@-@@-@@"/>
  499. <Cell col="9" displaytype="normal" edittype="none" text="bind:diagcnts"/>
  500. <Cell col="10" displaytype="normal" edittype="none" text="bind:extrpartcnts"/>
  501. <Cell col="11" displaytype="normal" edittype="none" text="bind:extrmthdcnts"/>
  502. <Cell col="12" displaytype="normal" edittype="none" text="bind:grosdrnm"/>
  503. <Cell col="13" displaytype="normal" edittype="none" text="bind:readdrnm"/>
  504. <Cell col="14"/>
  505. <Cell col="15" text="bind:aprvflagcd"/>
  506. </Band>
  507. </Format>
  508. </Formats>
  509. </Grid>
  510. <Grid id="grd_lendrtndblist" taborder="3" useinputpanel="false" visible="false" position="absolute 45 180 1145 340" binddataset="ds_grid_grd_lendrtndblist" positiontype="position" class="CSS::lis.css">
  511. <Formats>
  512. <Format id="default">
  513. <Columns>
  514. <Column size="30"/>
  515. <Column size="66"/>
  516. <Column size="56"/>
  517. <Column size="59"/>
  518. <Column size="70"/>
  519. <Column size="69"/>
  520. <Column size="59"/>
  521. <Column size="60"/>
  522. <Column size="78"/>
  523. <Column size="91"/>
  524. <Column size="100"/>
  525. <Column size="106"/>
  526. <Column size="66"/>
  527. <Column size="68"/>
  528. <Column size="47"/>
  529. <Column size="100"/>
  530. <Column size="100"/>
  531. <Column size="100"/>
  532. <Column size="100"/>
  533. <Column size="100"/>
  534. <Column size="100"/>
  535. <Column size="100"/>
  536. <Column size="100"/>
  537. <Column size="100"/>
  538. </Columns>
  539. <Rows>
  540. <Row size="24" band="head"/>
  541. <Row size="24"/>
  542. </Rows>
  543. <Band id="head">
  544. <Cell text="상태"/>
  545. <Cell col="1" text="기관코드"/>
  546. <Cell col="2" text="병리번호"/>
  547. <Cell col="3" text="신청일자"/>
  548. <Cell col="4" text="신청번호"/>
  549. <Cell col="5" text="승인일자"/>
  550. <Cell col="6" text="승인시간"/>
  551. <Cell col="7" text="승인자ID"/>
  552. <Cell col="8" text="승인구분코드"/>
  553. <Cell col="9" text="반납구분코드"/>
  554. <Cell col="10" text="사유구분코드"/>
  555. <Cell col="11" text="사유코드"/>
  556. <Cell col="12" text="등록번호"/>
  557. <Cell col="13" text="작업구분"/>
  558. <Cell col="14" text="신청구분"/>
  559. <Cell col="15" text="대출신청일자"/>
  560. <Cell col="16" text="lenddd"/>
  561. <Cell col="17" text="lendno"/>
  562. <Cell col="18" text="slidseqno"/>
  563. <Cell col="19" text="대출신청번호"/>
  564. <Cell col="20" text="표시병리번호"/>
  565. <Cell col="21" text="spcacptseqno"/>
  566. <Cell col="22" text="csteno"/>
  567. <Cell col="23" text="slidno"/>
  568. </Band>
  569. <Band id="body">
  570. <Cell displaytype="image" expr="getRowType(currow) == 2 ?'theme://images/ico_i.png' : (getRowType(currow) == 4 ? 'theme://images/ico_u.png' : (getRowType(currow) == 8 ? 'theme://images/ico_d.png' : 'theme://images/ico_e.png'))"/>
  571. <Cell col="1" text="bind:instcd"/>
  572. <Cell col="2" text="bind:ptno"/>
  573. <Cell col="3" text="bind:appdd"/>
  574. <Cell col="4" text="bind:appno"/>
  575. <Cell col="5" text="bind:aprvdd"/>
  576. <Cell col="6" text="bind:aprvtm"/>
  577. <Cell col="7" text="bind:aprvid"/>
  578. <Cell col="8" text="bind:aprvflagcd"/>
  579. <Cell col="9" text="bind:rtnflagcd"/>
  580. <Cell col="10" text="bind:lendresnflagcd"/>
  581. <Cell col="11" text="bind:lendresncd"/>
  582. <Cell col="12" text="bind:pid"/>
  583. <Cell col="13" text="bind:jobkind"/>
  584. <Cell col="14" text="bind:appflagcd"/>
  585. <Cell col="15" text="bind:lendappdd"/>
  586. <Cell col="16" text="bind:lenddd"/>
  587. <Cell col="17" text="bind:lendno"/>
  588. <Cell col="18" text="bind:slidseqno"/>
  589. <Cell col="19" text="bind:lendappno"/>
  590. <Cell col="20" text="bind:dispptno"/>
  591. <Cell col="21" text="bind:spcacptseqno"/>
  592. <Cell col="22" text="bind:csteno"/>
  593. <Cell col="23" text="bind:slidno"/>
  594. </Band>
  595. </Format>
  596. </Formats>
  597. </Grid>
  598. </Layout>
  599. </Layouts>
  600. </Tabpage>
  601. </Tabpages>
  602. </Tab>
  603. <Button id="btn_lendapp" taborder="2" text="대출신청" class="btn4" position="absolute 1174 23 1252 43" anchor="top right" positiontype="position" onclick="btn_lendapp_onclick"/>
  604. <Button id="btn_rtnapp" taborder="3" text="반납신청" class="btn4" position="absolute 1174 23 1252 43" anchor="top right" positiontype="position" onclick="btn_rtnapp_onclick"/>
  605. <Button id="btn_appcncl" taborder="4" text="신청취소" class="btn4" position="absolute 1174 23 1252 43" anchor="top right" positiontype="position" onclick="btn_appcncl_onclick"/>
  606. <Button id="button13" taborder="5" text="EXCEL저장" class="btn7" position="absolute 1070 23 1163 43" anchor="top right" positiontype="position" onclick="button13_onclick"/>
  607. </Layout>
  608. </Layouts>
  609. <Objects>
  610. <Dataset id="ds_grid_grd_lendtrgtlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  611. <ColumnInfo>
  612. <Column id="choi" type="STRING"/>
  613. <Column id="instcd" type="STRING"/>
  614. <Column id="ptno" type="STRING"/>
  615. <Column id="dispptno" type="STRING"/>
  616. <Column id="prcpdd" type="STRING"/>
  617. <Column id="acptdd" type="STRING"/>
  618. <Column id="diagcnts" type="STRING"/>
  619. <Column id="extrpartcnts" type="STRING"/>
  620. <Column id="extrmthdcnts" type="STRING"/>
  621. <Column id="lendresncd" type="STRING"/>
  622. <Column id="lendflagcd" type="STRING"/>
  623. <Column id="grosdrnm" type="STRING"/>
  624. <Column id="readdrnm" type="STRING"/>
  625. <Column id="pid" type="STRING"/>
  626. <Column id="lendappdd" type="STRING"/>
  627. <Column id="lendappno" type="STRING"/>
  628. <Column id="resncnts" type="STRING"/>
  629. </ColumnInfo>
  630. </Dataset>
  631. <Dataset id="ds_grid_grd_lendapplist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  632. <ColumnInfo>
  633. <Column id="choi" type="STRING"/>
  634. <Column id="instcd" type="STRING"/>
  635. <Column id="ptno" type="STRING"/>
  636. <Column id="dispptno" type="STRING"/>
  637. <Column id="prcpdd" type="STRING"/>
  638. <Column id="acptdd" type="STRING"/>
  639. <Column id="rsltm" type="STRING"/>
  640. <Column id="rsltt" type="STRING"/>
  641. <Column id="rsltp" type="STRING"/>
  642. <Column id="lendresncd" type="STRING"/>
  643. <Column id="lendflagcd" type="STRING"/>
  644. <Column id="grosdrnm" type="STRING"/>
  645. <Column id="readdrnm" type="STRING"/>
  646. <Column id="pid" type="STRING"/>
  647. <Column id="lendappdd" type="STRING"/>
  648. <Column id="lendappno" type="STRING"/>
  649. </ColumnInfo>
  650. </Dataset>
  651. <Dataset id="ds_grid_grd_rtntrgtlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  652. <ColumnInfo>
  653. <Column id="treeflag" type="STRING"/>
  654. <Column id="choi" type="STRING"/>
  655. <Column id="instcd" type="STRING"/>
  656. <Column id="ptno" type="STRING"/>
  657. <Column id="dispptno" type="STRING"/>
  658. <Column id="appdd" type="STRING"/>
  659. <Column id="appno" type="STRING"/>
  660. <Column id="lendresncd" type="STRING"/>
  661. <Column id="prcpdd" type="STRING"/>
  662. <Column id="diagcnts" type="STRING"/>
  663. <Column id="extrpartcnts" type="STRING"/>
  664. <Column id="extrmthdcnts" type="STRING"/>
  665. <Column id="grosdrnm" type="STRING"/>
  666. <Column id="readdrnm" type="STRING"/>
  667. <Column id="pid" type="STRING"/>
  668. <Column id="lendappdd" type="STRING"/>
  669. <Column id="lendappno" type="STRING"/>
  670. <Column id="spcacptseqno" type="STRING"/>
  671. <Column id="csteno" type="STRING"/>
  672. <Column id="slidno" type="STRING"/>
  673. <Column id="lenddd" type="STRING"/>
  674. <Column id="lendno" type="STRING"/>
  675. <Column id="slidseqno" type="STRING"/>
  676. </ColumnInfo>
  677. </Dataset>
  678. <Dataset id="ds_grid_grd_rtnapplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  679. <ColumnInfo>
  680. <Column id="choi" type="STRING"/>
  681. <Column id="instcd" type="STRING"/>
  682. <Column id="ptno" type="STRING"/>
  683. <Column id="dispptno" type="STRING"/>
  684. <Column id="appdd" type="STRING"/>
  685. <Column id="appno" type="STRING"/>
  686. <Column id="lendresncd" type="STRING"/>
  687. <Column id="prcpdd" type="STRING"/>
  688. <Column id="rsltm" type="STRING"/>
  689. <Column id="rsltt" type="STRING"/>
  690. <Column id="rsltp" type="STRING"/>
  691. <Column id="grosdrnm" type="STRING"/>
  692. <Column id="readdrnm" type="STRING"/>
  693. <Column id="pid" type="STRING"/>
  694. <Column id="lendappdd" type="STRING"/>
  695. <Column id="lendappno" type="STRING"/>
  696. <Column id="spcacptseqno" type="STRING"/>
  697. <Column id="csteno" type="STRING"/>
  698. <Column id="slidno" type="STRING"/>
  699. <Column id="lenddd" type="STRING"/>
  700. <Column id="lendno" type="STRING"/>
  701. <Column id="slidseqno" type="STRING"/>
  702. </ColumnInfo>
  703. </Dataset>
  704. <Dataset id="ds_grid_grd_lendrtnapplist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  705. <ColumnInfo>
  706. <Column id="choi" type="STRING"/>
  707. <Column id="instcd" type="STRING"/>
  708. <Column id="ptno" type="STRING"/>
  709. <Column id="dispptno" type="STRING"/>
  710. <Column id="appflagcd" type="STRING"/>
  711. <Column id="appdd" type="STRING"/>
  712. <Column id="appno" type="STRING"/>
  713. <Column id="prcpdd" type="STRING"/>
  714. <Column id="diagcnts" type="STRING"/>
  715. <Column id="extrpartcnts" type="STRING"/>
  716. <Column id="extrmthdcnts" type="STRING"/>
  717. <Column id="grosdrnm" type="STRING"/>
  718. <Column id="readdrnm" type="STRING"/>
  719. <Column id="aprvflagcd" type="STRING"/>
  720. </ColumnInfo>
  721. </Dataset>
  722. <Dataset id="ds_grid_grd_lendrtndblist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  723. <ColumnInfo>
  724. <Column id="instcd" type="STRING"/>
  725. <Column id="ptno" type="STRING"/>
  726. <Column id="appdd" type="STRING"/>
  727. <Column id="appno" type="STRING"/>
  728. <Column id="aprvdd" type="STRING"/>
  729. <Column id="aprvtm" type="STRING"/>
  730. <Column id="aprvid" type="STRING"/>
  731. <Column id="aprvflagcd" type="STRING"/>
  732. <Column id="rtnflagcd" type="STRING"/>
  733. <Column id="lendresnflagcd" type="STRING"/>
  734. <Column id="lendresncd" type="STRING"/>
  735. <Column id="pid" type="STRING"/>
  736. <Column id="jobkind" type="STRING"/>
  737. <Column id="appflagcd" type="STRING"/>
  738. <Column id="lendappdd" type="STRING"/>
  739. <Column id="lenddd" type="STRING"/>
  740. <Column id="lendno" type="STRING"/>
  741. <Column id="slidseqno" type="STRING"/>
  742. <Column id="lendappno" type="STRING"/>
  743. <Column id="dispptno" type="STRING"/>
  744. <Column id="spcacptseqno" type="STRING"/>
  745. <Column id="csteno" type="STRING"/>
  746. <Column id="slidno" type="STRING"/>
  747. </ColumnInfo>
  748. </Dataset>
  749. <Dataset id="ds_sysdate" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  750. <ColumnInfo>
  751. <Column id="sysdd" type="STRING"/>
  752. <Column id="systm" type="STRING"/>
  753. </ColumnInfo>
  754. </Dataset>
  755. <Dataset id="ds_resncdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  756. <ColumnInfo>
  757. <Column id="choi"/>
  758. <Column id="instcd"/>
  759. <Column id="baseflagcd"/>
  760. <Column id="resncd"/>
  761. <Column id="resncnts"/>
  762. <Column id="resncode"/>
  763. </ColumnInfo>
  764. </Dataset>
  765. <Dataset id="ds_hospenvinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  766. <ColumnInfo>
  767. <Column id="instcd"/>
  768. <Column id="lendrtnterm"/>
  769. <Column id="recvqualmthdcd"/>
  770. <Column id="plgydeptcd"/>
  771. <Column id="plgyteamcd"/>
  772. <Column id="doctjobgradcd"/>
  773. <Column id="teamjobgradcd"/>
  774. <Column id="csteeqmtip"/>
  775. <Column id="csteeqmtport"/>
  776. <Column id="slideqmtip"/>
  777. <Column id="norcptacptyn"/>
  778. <Column id="slidbceqmtip"/>
  779. <Column id="acptreaddr"/>
  780. <Column id="slidbceqmtip2"/>
  781. <Column id="slidbceqmtport2"/>
  782. <Column id="repttitl"/>
  783. <Column id="repttitl2"/>
  784. <Column id="plgyrecroom1"/>
  785. <Column id="plgyrecroom2"/>
  786. <Column id="ptnoacptflag"/>
  787. <Column id="autoacptflagcd"/>
  788. </ColumnInfo>
  789. </Dataset>
  790. <Dataset id="ds_userinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  791. <ColumnInfo>
  792. <Column id="dutplceinstcd" type="STRING"/>
  793. <Column id="userid" type="STRING"/>
  794. <Column id="usernm" type="STRING"/>
  795. <Column id="jobkindcd" type="STRING"/>
  796. <Column id="userabbr" type="STRING"/>
  797. <Column id="mpphonno" type="STRING"/>
  798. <Column id="dutunitcd" type="STRING"/>
  799. </ColumnInfo>
  800. </Dataset>
  801. <Dataset id="ds_loginuserinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  802. <ColumnInfo>
  803. <Column id="userid" type="STRING"/>
  804. <Column id="usernm" type="STRING"/>
  805. <Column id="mpphonno" type="STRING"/>
  806. <Column id="email" type="STRING"/>
  807. <Column id="pdano" type="STRING"/>
  808. </ColumnInfo>
  809. </Dataset>
  810. <Dataset id="ds_lendlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  811. <ColumnInfo>
  812. <Column id="dispptno" type="STRING"/>
  813. <Column id="appdd" type="STRING"/>
  814. <Column id="resncnts" type="STRING"/>
  815. <Column id="rsltM" type="STRING"/>
  816. <Column id="rsltT" type="STRING"/>
  817. <Column id="rsltP" type="STRING"/>
  818. <Column id="rtnflagcd" type="STRING"/>
  819. </ColumnInfo>
  820. </Dataset>
  821. <Dataset id="ds_lendflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  822. <ColumnInfo>
  823. <Column id="label" type="STRING"/>
  824. <Column id="value" type="STRING"/>
  825. </ColumnInfo>
  826. <Rows>
  827. <Row>
  828. <Col id="label">-</Col>
  829. <Col id="value">0</Col>
  830. </Row>
  831. <Row>
  832. <Col id="value">1</Col>
  833. <Col id="label">대출신청</Col>
  834. </Row>
  835. <Row>
  836. <Col id="value">2</Col>
  837. <Col id="label">대출</Col>
  838. </Row>
  839. <Row>
  840. <Col id="value">3</Col>
  841. <Col id="label">강제반납</Col>
  842. </Row>
  843. </Rows>
  844. </Dataset>
  845. </Objects>
  846. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  847. * System Name :
  848. * Job Name :
  849. * Creator :
  850. * Make Date : 2015-11-13
  851. * Description :
  852. *---------------------------------------------------------------------------------------
  853. * Modify Date Modifier Modify Description
  854. *---------------------------------------------------------------------------------------
  855. * 2015-11-13 Live Converter TF->XP
  856. *
  857. *---------------------------------------------------------------------------------------
  858. ****************************************************************************************/
  859. include "com_commonxp::comm_main.xjs";
  860. include "lis_commonxp::LPZ001.xjs";
  861. include "lis_commonxp::LZZ001.xjs";
  862. include "com_commodulexp::SSZFM00401.xjs";
  863. function lf_exeInitialize()
  864. {
  865. var sInDsName = dsf_createDsRow("ds_temp_search_time", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}]);
  866. var oParam = {};
  867. oParam.id = "TRLPZ00102";
  868. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  869. oParam.method = "reqGetSystemDateTimeInformation";
  870. oParam.inds = "refData="+sInDsName;
  871. oParam.outds = "ds_sysdate=sysdtinfo";
  872. oParam.async = false;
  873. //oParam.callback = "cf_TRLPZ00102";
  874. tranf_submit(oParam);
  875. //----------------------------------------------------
  876. //작업구분 목록 조회
  877. var sInDsName = dsf_createDsRow("ds_temp_search3", [{col: "instcd", val:sysf_getUserInfo("dutplceinstcd")}
  878. ,{col: "baseflagcd", val: "'L1'"}]);
  879. var oParam = {};
  880. oParam.id = "TRLPZ00103";
  881. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  882. oParam.method = "reqGetReasonCodeList";
  883. oParam.inds = "refData="+sInDsName;
  884. oParam.outds = "ds_resncdlist=refrslt";
  885. oParam.async = false;
  886. //oParam.callback = "cf_TRLPZ00103";
  887. tranf_submit(oParam);
  888. //-------------------------------
  889. // 대출 목적에서 "전체" 노드 삭제
  890. fdsf_createDsFilter("dsf_userfilter1", "ds_resncdlist", "resncd!='ZZZZ'");
  891. //---------------------------------------------------------------
  892. // 병원환경정보를 취득하여 병리과와 병리팀 코드를 편집한다.
  893. if(ds_hospenvinfo.rowcount > 0)
  894. {
  895. var sUserdeptcd = "'" + ds_hospenvinfo.getColumn(0, "plgydeptcd") + "'" + "," + "'"
  896. + ds_hospenvinfo.getColumn(0, "plgyteamcd") + "'";
  897. }
  898. var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  899. ,{col: "refflagcd" , val: "0"}]);
  900. var oParam = {};
  901. oParam.id = "TRLPZ00101";
  902. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  903. oParam.method = "reqGetHospitalEnvironmentSetInfo";
  904. oParam.inds = "refData="+sInDsName;
  905. oParam.outds = "ds_hospenvinfo=hospenvinfo";
  906. oParam.async = false;
  907. //oParam.callback = "cf_TRLPZ00101";
  908. tranf_submit(oParam);
  909. //------------------------------------------------------------------
  910. var sInDsName = dsf_createDsRow("ds_temp_search2", [{col: "userdeptcd", val:sUserdeptcd}
  911. , {col: "doctjobgradcd", val: ds_hospenvinfo.getColumn(0,"doctjobgradcd")}
  912. , {col: "teamjobgradcd", val: ds_hospenvinfo.getColumn(0,"teamjobgradcd")}]);
  913. var oParam = {};
  914. oParam.id = "TRLPZ00105";
  915. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  916. oParam.method = "reqGetUserInfoList";
  917. oParam.inds = "refdata="+sInDsName;
  918. oParam.outds = "ds_userinfolist=reflist";
  919. oParam.async = false;
  920. //oParam.callback = "cf_TRLPZ00105";
  921. tranf_submit(oParam);
  922. //--------------------
  923. // 대출신청 node reset
  924. swc_slidlend.case_lendapp.cmb_lendkindcd.value = "-";
  925. swc_slidlend.case_lendapp.combo6.value = ""; //담당의
  926. swc_slidlend.case_lendapp.group1.ipt_lendrefval.value = "";
  927. swc_slidlend.rtnappinfo.group5.ipt_rtnrefval.value = "";
  928. //-------------------------------------
  929. var sTDay = ds_sysdate.getColumn(0,"sysdd");
  930. swc_slidlend.rtnappinfo.group5.ipt_appfrom.value = sTDay.toDate().getAddDate(-2,"D").getDateFormat("YYYYMMDD");
  931. swc_slidlend.rtnappinfo.group5.ipt_todd.value = sTDay;
  932. swc_slidlend.case_appcncl.group7.ipt_ddfrom.value=sTDay.toDate().getAddDate(-2,"D").getDateFormat("YYYYMMDD");
  933. swc_slidlend.case_appcncl.group7.ipt_ddto.value= sTDay;
  934. //-------------------------------------
  935. //부서별 사용자 기본정보 검색
  936. var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "userid", val:sysf_getUserInfo("userid")}]);
  937. var oParam = {};
  938. oParam.id = "TRLPD00304";
  939. oParam.service = "plgylendmngtapp.SlidLendRtn";
  940. oParam.method = "reqGetLoginUserInfo";
  941. oParam.inds = "refData="+sInDsName;
  942. oParam.outds = "ds_loginuserinfo=rsltlist";
  943. oParam.async = false;
  944. //oParam.callback = "cf_TRLPD00304";
  945. tranf_submit(oParam);
  946. //----------------------
  947. swc_slidlend.tabindex = 0;
  948. lf_exeCntrReArrange("LEND");
  949. }
  950. //컨트롤 재배열 함수
  951. function lf_exeCntrReArrange()
  952. {
  953. //---------
  954. // 대출신청
  955. if(swc_slidlend.tabindex == "0")
  956. { //LEND
  957. btn_lendapp.visible = true;
  958. btn_rtnapp.visible = false;
  959. btn_appcncl.visible = false;
  960. //---------
  961. // 반납신청
  962. }
  963. else if(swc_slidlend.tabindex =="1")
  964. { //RTN
  965. swc_slidlend.case_lendapp.group1.cmb_lendrefflag.value = "1";
  966. btn_lendapp.visible = false;
  967. btn_rtnapp.visible = true;
  968. btn_appcncl.visible = false;
  969. //---------
  970. // 대출/반납 신청취소
  971. }
  972. else if(swc_slidlend.tabindex=="2")
  973. { //CNCL
  974. swc_slidlend.case_appcncl.group7.combo3.value = "1";
  975. btn_lendapp.visible = false;
  976. btn_rtnapp.visible = false;
  977. btn_appcncl.visible = true;
  978. }
  979. }
  980. function lf_getRefData(mGbn, pFlagNode, pNode) //fGetRefData
  981. {
  982. var sRefVal = utlf_transNullToEmpty(pNode);
  983. if(pFlagNode == "1")
  984. {
  985. if(sRefVal.length < 3)
  986. {
  987. sysf_messageBox("등록번호는 3자리 이상", "C001","");
  988. return false;
  989. }
  990. }
  991. //---------
  992. // 대출신청
  993. if(mGbn == "LEND")
  994. {
  995. var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  996. ,{col: "refflag" , val: swc_slidlend.case_lendapp.group1.cmb_lendrefflag.value}
  997. ,{col: "refval" , val: swc_slidlend.case_lendapp.group1.ipt_lendrefval.value}]);
  998. var oParam = {};
  999. oParam.id = "TRLPD00301";
  1000. oParam.service = "plgylendmngtapp.SlidLendRtn";
  1001. oParam.method = "reqGetLendTrgtList";
  1002. oParam.inds = "refData="+sInDsName;
  1003. oParam.outds = "ds_grid_grd_lendtrgtlist=rsltlist";
  1004. oParam.async = false;
  1005. //oParam.callback = "cf_TRLPD00301";
  1006. tranf_submit(oParam);
  1007. //---------
  1008. // 반납신청
  1009. }
  1010. else if(mGbn == "RTN")
  1011. {
  1012. var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "instcd", val : sysf_getUserInfo("dutplceinstcd")}
  1013. ,{col: "lendfromdd", val : swc_slidlend.rtnappinfo.group5.ipt_appfrom.value}
  1014. ,{col: "lendtodd", val : swc_slidlend.rtnappinfo.group5.ipt_todd.value}
  1015. ,{col: "refflag", val : pFlagNode}
  1016. ,{col: "refval", val : pNode}]);
  1017. var oParam = {};
  1018. oParam.id = "TRLPD00302";
  1019. oParam.service = "plgylendmngtapp.SlidLendRtn";
  1020. oParam.method = "reqGetLendRtnList";
  1021. oParam.inds = "refData="+sInDsName;
  1022. oParam.outds = "ds_grid_grd_rtntrgtlist=rsltlist";
  1023. oParam.async = false;
  1024. //oParam.callback = "cf_TRLPD00302";
  1025. tranf_submit(oParam);
  1026. //삼항연산자로 그리드에서 직접 readonly 설정함
  1027. for(var iRowNo = 0; iRowNo < ds_grid_grd_rtntrgtlist.rowcount; iRowNo++)
  1028. {
  1029. if(ds_grid_grd_rtntrgtlist.getColumn(iRowNo, "treeflag") == "1")
  1030. {
  1031. ds_grid_grd_rtntrgtlist.setColumn(iRowNo, "choi", "1");
  1032. }
  1033. }
  1034. //----------------------------------------
  1035. //대출/반납 신청취소
  1036. }
  1037. else if(mGbn == "CNCL")
  1038. {
  1039. var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  1040. ,{col: "lendfromdd" , val: swc_slidlend.rtnappinfo.group5.ipt_appfrom.value}
  1041. ,{col: "lendtodd" , val: swc_slidlend.rtnappinfo.group5.ipt_todd.value}
  1042. ,{col: "refflag" , val: swc_slidlend.rtnappinfo.group5.cmb_refflagcd.value}
  1043. ,{col: "refval" , val: swc_slidlend.rtnappinfo.group5.ipt_rtnrefval.value}]);
  1044. var oParam = {};
  1045. oParam.id = "TRLPD00303";
  1046. oParam.service = "plgylendmngtapp.SlidLendRtn";
  1047. oParam.method = "reqGetLendCnclList";
  1048. oParam.inds = "refData="+sInDsName;
  1049. oParam.outds = "ds_grid_grd_lendrtnapplist=rsltlist";
  1050. oParam.async = false;
  1051. //oParam.callback = "cf_TRLPD00303";
  1052. tranf_submit(oParam);
  1053. }
  1054. }
  1055. function lf_exeUpdLendKind()
  1056. {
  1057. var vChoi;
  1058. if(ds_grid_grd_lendtrgtlist.rowcount < 1) return;
  1059. //---------------------------------------------
  1060. for(var iRowNo = 0; iRowNo < ds_grid_grd_lendtrgtlist.rowcount; iRowNo++)
  1061. {
  1062. vChoi = ds_grid_grd_lendtrgtlist.getColumn(iRowNo, "choi");
  1063. if(vChoi=="1")
  1064. {
  1065. ds_grid_grd_lendtrgtlist.setColumn(iRowNo, "lendresncd", swc_slidlend.case_lendapp.cmb_lendkindcd.value);
  1066. }
  1067. }
  1068. }
  1069. function lf_exeAppendNode(flagcd) //fExeAppendNode
  1070. {
  1071. var TrgtPath = "";
  1072. var AppPath = "";
  1073. var grdTrgtObj;
  1074. var grdAppObj;
  1075. if (flagcd == "LEND")
  1076. {
  1077. TrgtPath = ds_grid_grd_lendtrgtlist;
  1078. AppPath = ds_grid_grd_lendapplist;
  1079. for(var iRowNo = 0; iRowNo < ds_grid_grd_lendtrgtlist.rowcount; iRowNo++)
  1080. {
  1081. var vChoi = ds_grid_grd_lendtrgtlist.getColumn(iRowNo, "choi");
  1082. var vLendKind = ds_grid_grd_lendtrgtlist.getColumn(iRowNo, "lendresncd");
  1083. //--------------------------------------
  1084. if(vChoi=="1" && utlf_transNullToEmpty(vLendKind) == "")
  1085. {
  1086. sysf_messageBox("대출목적을", "C002","");
  1087. return false;
  1088. }
  1089. }
  1090. }
  1091. else
  1092. {
  1093. TrgtPath = ds_grid_grd_rtntrgtlist;
  1094. AppPath = ds_grid_grd_rtnapplist;
  1095. }
  1096. for(var iRowNo = 0; iRowNo < TrgtPath.rowcount; iRowNo++)
  1097. {
  1098. if(TrgtPath.getColumn(iRowNo, "choi")== "1")
  1099. {
  1100. if(AppPath.findRow("ptno", "1", -1))
  1101. {
  1102. AppPath.addRow();
  1103. AppPath.copyRow(AppPath.rowcount-1, TrgtPath, iRowNo);
  1104. }
  1105. }
  1106. }
  1107. }
  1108. //담당의 선택 처리 함수
  1109. function lf_exeUserChoice() //fExeUserChoice
  1110. {
  1111. var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  1112. ,{col: "chrgprfid" , val: swc_slidlend.case_lendapp.combo6.value}
  1113. ,{col: "baseflagcd" , val: "L1"}]);
  1114. var oParam = {};
  1115. oParam.id = "TRLPD00501";
  1116. oParam.service = "plgylendmngtapp.SlidLendRtn";
  1117. oParam.method = "reqGetLendList";
  1118. oParam.inds = "refData="+sInDsName;
  1119. oParam.outds = "ds_lendlist=rsltlist";
  1120. oParam.async = false;
  1121. //oParam.callback = "cf_TRLPD00501";
  1122. tranf_submit(oParam);
  1123. fdsf_createDsFilter("dsf_userfilter", "ds_lendlist", "rtnflagcd=='0'");
  1124. var objArg = new Object();
  1125. if(dsf_userfilter.rowcount > 0)
  1126. {
  1127. objArg.chrgprfid = swc_slidlend.case_lendapp.combo6.value;
  1128. frmf_modal("SPLPD00500","SPLPD00500",objArg);
  1129. }
  1130. else
  1131. {
  1132. objArg.lendptnocnt = "0";
  1133. }
  1134. }
  1135. //대출신청, 반납신청, 신청취소 등록 함수
  1136. function lf_setLendApp(mGbn) //fSetLendApp
  1137. {
  1138. var iCurRow = 0;
  1139. var strNode1 = "";
  1140. var strNode2 = ds_grid_grd_lendrtndblist;
  1141. var grdTrgtObj;
  1142. var strMsg = "";
  1143. var strJobKind = "";
  1144. var strAppFlag = "";
  1145. var strAppDd = "";
  1146. var strAppNo = "";
  1147. switch(mGbn)
  1148. {
  1149. case "LEND":
  1150. strNode1 = ds_grid_grd_lendapplist;
  1151. grdTrgtObj = ds_grid_grd_lendapplist;
  1152. strMsg = "대출";
  1153. strJobKind = "1";
  1154. strAppFlag = "0";
  1155. break;
  1156. case "RTN":
  1157. strNode1 = ds_grid_grd_rtnapplist;
  1158. grdTrgtObj = ds_grid_grd_rtnapplist;
  1159. strMsg = "반납";
  1160. strJobKind = "2";
  1161. strAppFlag = "1";
  1162. break;
  1163. case "CNCL":
  1164. strNode1 = ds_grid_grd_lendrtnapplist;
  1165. grdTrgtObj = ds_grid_grd_lendrtnapplist;
  1166. strMsg = "신청취소";
  1167. strJobKind = "3";
  1168. strAppFlag = "0";
  1169. break;
  1170. default:
  1171. return false;
  1172. }
  1173. //--------------------------------------------------------
  1174. if(grdTrgtObj.findRow("choi", "1", -1))
  1175. {
  1176. sysf_messageBox(strMsg + "할 병리번호를 추가하여 주십시오. 신청을", "E001","");
  1177. return false;
  1178. }
  1179. //---------------------------------------------------------
  1180. for(var iRowNo = 0; iRowNo < strNode1.rowcount; iRowNo++)
  1181. {
  1182. //------------------------
  1183. if(mGbn != "CNCL")
  1184. {
  1185. ds_grid_grd_lendrtndblist.addRow();
  1186. iCurRow = ds_grid_grd_lendrtndblist.rowposition;
  1187. fdsf_createDsFilter("dsf_userfilter_resncd", "ds_resncdlist", "resncd=='strNode1.getColumn(iRowNo,'lendresncd')'");
  1188. //-------------------------------------------
  1189. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "instcd", strNode1.getColumn(iRowNo, "instcd")); //기관코드
  1190. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "ptno", strNode1.getColumn(iRowNo, "ptno")); //병리번호
  1191. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "dispptno", strNode1.getColumn(iRowNo, "dispptno")); //표시병리번호
  1192. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "appdd", ds_sysdate.getColumn(0, "sysdd")); //신청일자
  1193. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "appno", "0"); //신청번호
  1194. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "pid", strNode1.getColumn(iRowNo, "pid")); //등록번호
  1195. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "lendresnflagcd", dsf_userfilter_resncd.getColumn(0, "baseflagcd")); //사유구분코드
  1196. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "lendresncd", strNode1.getColumn(iRowNo, "lendresncd")); //사유코드
  1197. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "lendappdd", strNode1.getColumn(iRowNo, "lendappdd")); //대출신청일자
  1198. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "lendappno", strNode1.getColumn(iRowNo, "lendappno")); //대출신청번호
  1199. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "aprvdd", " "); //승인일자
  1200. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "aprvtm", " "); //승인시간
  1201. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "aprvid", " "); //승인자ID
  1202. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "aprvflagcd", "0"); //승인반납코드
  1203. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "rtnflagcd", "0"); //반납구분코드
  1204. //-----------------------------------
  1205. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "jobkind", strJobKind); //1:대출신청 2:반납신청 3:신청취소
  1206. //그리드 상태값변경
  1207. //-----------------------
  1208. if (mGbn == "LEND")
  1209. {
  1210. if(utlf_isNull(strNode1.getColumn(iRowNo,"lendresncd")))
  1211. {
  1212. sysf_messageBox("대출목적을 ", "C002","");
  1213. return false;
  1214. }
  1215. }
  1216. else if(mGbn == "RTN")
  1217. {
  1218. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "lenddd", ds_grid_grd_rtnapplist.getColumn(iRowNo, "lenddd"));
  1219. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "lendno", ds_grid_grd_rtnapplist.getColumn(iRowNo, "lendno"));
  1220. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "slidseqno", ds_grid_grd_rtnapplist.getColumn(iRowNo, "slidseqno"));
  1221. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "spcacptseqno", ds_grid_grd_rtnapplist.getColumn(iRowNo, "spcacptseqno"));
  1222. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "csteno", ds_grid_grd_rtnapplist.getColumn(iRowNo, "csteno"));
  1223. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "slidno", ds_grid_grd_rtnapplist.getColumn(iRowNo, "slidno"));
  1224. }
  1225. }
  1226. else
  1227. {
  1228. if(strNode1.getColumn(iRowNo, "choi") == "1")
  1229. {
  1230. //---------------------------
  1231. // 승인된 신청내역은 취소불가
  1232. if(strNode1.getColumn(iRowNo, "aprvflagcd") == "1")
  1233. {
  1234. sysf_messageBox("승인된 신청내역은 취소", "E001","");
  1235. return false;
  1236. }
  1237. //-------------------
  1238. ds_grid_grd_lendrtndblist.addRow();
  1239. iCurRow = ds_grid_grd_lendrtndblist.rowposition;
  1240. //------------------------------------------------------------------------
  1241. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "instcd" ,strNode1.getColumn(iRowNo, "instcd")); //기관코드
  1242. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "ptno" ,strNode1.getColumn(iRowNo, "ptno")); //병리번호
  1243. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "dispptno" ,strNode1.getColumn(iRowNo, "dispptno")); //병리번호
  1244. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "appdd" ,strNode1.getColumn(iRowNo, "appdd")); //신청일자
  1245. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "appno" ,strNode1.getColumn(iRowNo, "appno")); //신청번호
  1246. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "appflagcd" ,strNode1.getColumn(iRowNo, "appflagcd")); //신청구분
  1247. //-------------------------------------------------------------------------
  1248. ds_grid_grd_lendrtndblist.setColumn(iCurRow, "jobkind", strJobKind); //1:대출신청 2:반납신청 3:신청취소
  1249. }
  1250. }
  1251. }
  1252. //변수선언해서 makeValue값 대체함
  1253. var instcd = ds_userinfolist.getColumn(0, "dutplceinstcd");
  1254. var appdd = ds_sysdate.getColumn(0, "sysdd");
  1255. var apptm = ds_sysdate.getColumn(0, "systm");
  1256. var appdeptcd = ds_hospenvinfo.getColumn(0, "plgydeptcd");
  1257. var plgyrecroom1 = ds_hospenvinfo.getColumn(0, "plgyrecroom1");
  1258. var plgyrecroom2 = ds_hospenvinfo.getColumn(0, "plgyrecroom2");
  1259. var appid = sysf_getUserInfo("userid")
  1260. if(mGbn == "LEND")
  1261. {
  1262. var cntctelno = utlf_transNullToEmpty(swc_slidlend.case_lendapp.out_cntctel.value);
  1263. var chrgprfid = utlf_transNullToEmpty(swc_slidlend.case_lendapp.combo6.value);
  1264. }
  1265. else
  1266. {
  1267. var cntctelno = " ";
  1268. var chrgprfid = " ";
  1269. }
  1270. var lendflagcd = "0";
  1271. var appflagcd = strAppFlag;
  1272. var jobkind = strJobKind; // 1:대출신청 2:반납신청 3:신청취소
  1273. //var lendrtndblist = utlf_transNullToEmpty(swc_slidlend.case_lendapp.combo6.value);///
  1274. //trace(ds_grid_grd_lendrtndblist.saveXML("ds_grid_grd_lendrtndblist","U"));
  1275. //---------------------
  1276. dsf_createDsRow("ds_temp_search", [{col: "instcd", val: instcd}
  1277. ,{col: "appdd" , val: appdd}
  1278. ,{col: "apptm" , val: apptm}
  1279. ,{col: "appdeptcd" , val: appdeptcd}
  1280. ,{col: "appid" , val: appid}
  1281. ,{col: "cntctelno" , val: cntctelno}
  1282. ,{col: "chrgprfid" , val: chrgprfid}
  1283. ,{col: "lendflagcd" , val: lendflagcd}
  1284. ,{col: "appflagcd" , val: appflagcd}
  1285. ,{col: "jobkind" , val: jobkind}
  1286. ,{col: "plgyrecroom1" , val: plgyrecroom1}
  1287. ,{col: "plgyrecroom2" , val: plgyrecroom2}]);
  1288. var oParam = {};
  1289. oParam.id = "TXLPD00301";
  1290. oParam.service = "plgylendmngtapp.SlidLendRtn";
  1291. oParam.method = "reqSetLendAppInfo";
  1292. oParam.inds = "refData=ds_temp_search lendrtndblist=ds_grid_grd_lendrtndblist:U";
  1293. oParam.async = false;
  1294. //oParam.callback = "cf_TXLPD00301";
  1295. tranf_submit(oParam);
  1296. ds_grid_grd_lendrtndblist.clearData();
  1297. lf_getRefData(mGbn);
  1298. }
  1299. function lf_exeDelNode(flagcd)
  1300. {
  1301. if(flagcd == "LEND")
  1302. {
  1303. ds_grid_grd_lendapplist.clearData();
  1304. }
  1305. else
  1306. {
  1307. ds_grid_grd_rtnapplist.clearData();
  1308. }
  1309. }
  1310. function lf_exeSaveToExcel()
  1311. {
  1312. if(swc_slidlend.tabindex == "0")
  1313. {
  1314. grdf_exportExcel(swc_slidlend.case_lendapp.grd_lendapplist, "대출신청", "sheet1", "바탕 화면");
  1315. }
  1316. else if(swc_slidlend.tabindex == "1")
  1317. {
  1318. grdf_exportExcel(swc_slidlend.rtnappinfo.grd_rtntrgtlist, "반납신청", "sheet1", "바탕 화면");
  1319. }
  1320. else
  1321. {
  1322. grdf_exportExcel(swc_slidlend.case_appcncl.grd_lendrtnapplist, "반납신청", "sheet1", "바탕 화면");
  1323. }
  1324. }
  1325. function SMLPD00300_onload(obj:Form, e:LoadEventInfo)
  1326. {
  1327. frmf_initForm(obj); // 화면공통
  1328. lf_commoduleDataSetShow(); //DataSet 조회;
  1329. lf_exeInitialize(); //초기화
  1330. grdf_initGrid(swc_slidlend.case_lendapp.grd_lendtrgtlist);
  1331. grdf_initGrid(swc_slidlend.rtnappinfo.grd_rtntrgtlist);
  1332. }
  1333. function swc_slidlend_case_lendapp_group1_ipt_lendrefval_onkeydown(obj:Edit, e:KeyEventInfo)
  1334. {
  1335. if(e.keycode == 13)
  1336. {
  1337. frmf_setInputNodeCurPid_Change(swc_slidlend.case_lendapp.group1.ipt_lendrefval.value);
  1338. swc_slidlend.case_lendapp.group1.ipt_lendrefval.value = frmf_setInputNodeCurPid_Change(swc_slidlend.case_lendapp.group1.ipt_lendrefval.value);
  1339. lf_getRefData("LEND", swc_slidlend.case_lendapp.group1.cmb_lendrefflag.value, swc_slidlend.case_lendapp.group1.ipt_lendrefval.value);
  1340. }
  1341. }
  1342. function button2_onclick(obj:Button, e:ClickEventInfo)
  1343. {
  1344. lf_getRefData("LEND", swc_slidlend.case_lendapp.group1.cmb_lendrefflag.value, swc_slidlend.case_lendapp.group1.ipt_lendrefval.value);
  1345. }
  1346. function btn_sea_onclick(obj:Button, e:ClickEventInfo)
  1347. {
  1348. lf_getRefData("RTN", swc_slidlend.rtnappinfo.group5.cmb_refflagcd.value, swc_slidlend.rtnappinfo.group5.ipt_rtnrefval.value);
  1349. }
  1350. function swc_slidlend_rtnappinfo_group5_ipt_rtnrefval_onkeydown(obj:Edit, e:KeyEventInfo)
  1351. {
  1352. if(e.keycode == 13)
  1353. {
  1354. swc_slidlend.rtnappinfo.group5.ipt_rtnrefval.value = frmf_setInputNodeCurPid_Change(swc_slidlend.rtnappinfo.group5.ipt_rtnrefval.value);
  1355. lf_getRefData("RTN", swc_slidlend.rtnappinfo.group5.cmb_refflagcd.value, swc_slidlend.rtnappinfo.group5.ipt_rtnrefval.value);
  1356. }
  1357. }
  1358. function swc_slidlend_case_lendapp_grd_lendtrgtlist_oncellclick(obj:Grid, e:GridClickEventInfo)
  1359. {
  1360. if(e.col == 2)
  1361. {
  1362. if(ds_grid_grd_lendtrgtlist.getColumn(e.row, "choi") != "1")
  1363. {
  1364. var arrPostion = new Array();
  1365. arrPostion[0] = e.row;
  1366. grdf_setStatus(swc_slidlend.case_lendapp.grd_lendtrgtlist, "", arrPostion);
  1367. }
  1368. }
  1369. }
  1370. function swc_slidlend_case_lendapp_cmb_lendkindcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1371. {
  1372. lf_exeUpdLendKind();
  1373. }
  1374. function swc_slidlend_case_lendapp_grd_lendtrgtlist_onheadclick(obj:Grid, e:GridClickEventInfo)
  1375. {
  1376. if(e.col == 2)
  1377. {
  1378. if(swc_slidlend.case_lendapp.grd_lendtrgtlist.getCellText(-1,2) != "1")
  1379. {
  1380. for(var i=0; i < ds_grid_grd_lendtrgtlist.rowcount; i++)
  1381. {
  1382. var arrPostion = new Array();
  1383. arrPostion[0] = i;
  1384. grdf_setStatus(swc_slidlend.case_lendapp.grd_lendtrgtlist, "", arrPostion);
  1385. }
  1386. }
  1387. }
  1388. }
  1389. function btn_lendappadd_onclick(obj:Button, e:ClickEventInfo)
  1390. {
  1391. lf_exeAppendNode("LEND");
  1392. }
  1393. function btn_appcncl_onclick(obj:Button, e:ClickEventInfo)
  1394. {
  1395. lf_setLendApp("CNCL");
  1396. }
  1397. function btn_lendappdel_onclick(obj:Button, e:ClickEventInfo)
  1398. {
  1399. lf_exeDelNode("LEND");
  1400. }
  1401. function btn_rtnappdel_onclick(obj:Button, e:ClickEventInfo)
  1402. {
  1403. lf_exeDelNode("RTN");
  1404. }
  1405. function button13_onclick(obj:Button, e:ClickEventInfo)
  1406. {
  1407. lf_exeSaveToExcel();
  1408. }
  1409. function swc_slidlend_case_appcncl_group7_ipt_cnclrefval_onkeydown(obj:Edit, e:KeyEventInfo)
  1410. {
  1411. if(e.keycode == 13)
  1412. {
  1413. swc_slidlend.case_appcncl.group7.ipt_cnclrefval.value = frmf_setInputNodeCurPid_Change(swc_slidlend.case_appcncl.group7.ipt_cnclrefval.value);
  1414. lf_getRefData("CNCL", swc_slidlend.case_appcncl.group7.combo3.value, swc_slidlend.case_appcncl.group7.ipt_cnclrefval.value);
  1415. }
  1416. }
  1417. function button5_onclick(obj:Button, e:ClickEventInfo)
  1418. {
  1419. lf_getRefData("CNCL", swc_slidlend.case_appcncl.group7.combo3.value, swc_slidlend.case_appcncl.group7.ipt_cnclrefval.value);
  1420. }
  1421. function swc_slidlend_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
  1422. {
  1423. lf_exeCntrReArrange();
  1424. }
  1425. function btn_rtnapp_onclick(obj:Button, e:ClickEventInfo)
  1426. {
  1427. lf_setLendApp("RTN");
  1428. }
  1429. function btn_lendapp_onclick(obj:Button, e:ClickEventInfo)
  1430. {
  1431. lf_setLendApp("LEND");
  1432. }
  1433. function swc_slidlend_rtnappinfo_grd_rtntrgtlist_onheadclick(obj:Grid, e:GridClickEventInfo)
  1434. {
  1435. if(e.col == 3)
  1436. {
  1437. if(swc_slidlend.rtnappinfo.grd_rtntrgtlist.getCellText(-1,2) != "1")
  1438. {
  1439. for(var i=0; i < ds_grid_grd_rtntrgtlist.rowcount; i++)
  1440. {
  1441. var arrPostion = new Array();
  1442. arrPostion[0] = i
  1443. grdf_setStatus(swc_slidlend.rtnappinfo.grd_rtntrgtlist, "", arrPostion);
  1444. }
  1445. }
  1446. }
  1447. }
  1448. function swc_slidlend_rtnappinfo_grd_rtntrgtlist_oncellclick(obj:Grid, e:GridClickEventInfo)
  1449. {
  1450. if(e.col == 3)
  1451. {
  1452. if(ds_grid_grd_rtntrgtlist.getColumn(e.row,"choi") != "1")
  1453. {
  1454. var arrPostion = new Array();
  1455. arrPostion[0] = e.row;
  1456. grdf_setStatus(swc_slidlend.rtnappinfo.grd_rtntrgtlist, "", arrPostion);
  1457. }
  1458. }
  1459. }
  1460. ]]></Script>
  1461. </Form>
  1462. </FDL>