SMRSD02400_진단검사과 물품불출등록.xfdl 56 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMRSD02400" position="absolute 0 0 1186 805" titletext="처방전달 물품불출 등록" oninit="SMRSD02400_oninit" onload="SMRSD02400_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="처방전달 물품 불출 등록" class="tit_1" position="absolute 0 0 237 25"/>
  8. <Grid id="trv_setcode" taborder="1" useinputpanel="false" treeusecheckbox="false" position="absolute 0 280 338 778" autofit="col" binddataset="ds_main_PrcpGoodTrees_TreeList" anchor="left top bottom" oncellclick="trv_setcode_oncellclick" treeinitstatus="expand,all" autofittype="col">
  9. <Formats>
  10. <Format id="default">
  11. <Columns>
  12. <Column size="338"/>
  13. </Columns>
  14. <Rows>
  15. <Row size="17"/>
  16. </Rows>
  17. <Band id="body">
  18. <Cell displaytype="tree" edittype="tree" style="line:0 none #808080ff ;" text="bind:dispnm" treestartlevel="1" treelevel="bind:depth"/>
  19. </Band>
  20. </Format>
  21. </Formats>
  22. </Grid>
  23. <Radio id="rdo_viewcls" taborder="2" columncount="-1" rowcount="-1" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 100 262 343 277" onitemchanged="rdo_viewcls_onitemchanged">
  24. <Dataset id="innerdataset">
  25. <ColumnInfo>
  26. <Column id="codecolumn"/>
  27. <Column id="datacolumn"/>
  28. </ColumnInfo>
  29. <Rows>
  30. <Row>
  31. <Col id="codecolumn">0</Col>
  32. <Col id="datacolumn">전체</Col>
  33. </Row>
  34. <Row>
  35. <Col id="codecolumn">2</Col>
  36. <Col id="datacolumn">시행부서</Col>
  37. </Row>
  38. <Row>
  39. <Col id="codecolumn">1</Col>
  40. <Col id="datacolumn">처방부서</Col>
  41. </Row>
  42. <Row>
  43. <Col id="codecolumn">3</Col>
  44. <Col id="datacolumn">불출</Col>
  45. </Row>
  46. </Rows>
  47. </Dataset>
  48. </Radio>
  49. <Button id="button8" taborder="3" text="트 리 재 구 성" class="btn2" position="absolute 0 259 97 278" onclick="button8_onclick"/>
  50. <Div id="grp_key" taborder="4" class="div_SA2" position="absolute 0 31 340 253">
  51. <Layouts>
  52. <Layout>
  53. <Static id="caption10" text="기관코드 :" class="search_name" position="absolute 5 5 94 22"/>
  54. <Edit id="opt_instcd" taborder="25" readonly="true" visible="false" position="absolute 210 5 225 24" class="output"/>
  55. <Calendar id="ipt_prcpdd2" taborder="26" class="input_essential" position="absolute 223 53 322 72" autoselect="true"/>
  56. <Calendar id="ipt_prcpdd" taborder="27" class="input_essential" position="absolute 95 53 194 72" autoselect="true"/>
  57. <Static id="caption12" text="~" position="absolute 205 53 220 73"/>
  58. <Static id="caption3" text="시행일자 :" class="search_name" position="absolute 5 53 94 70"/>
  59. <Static id="caption7" text="불출여부 :" class="search_name" position="absolute 5 77 94 94"/>
  60. <Radio id="rdo_deliveyn" taborder="28" columncount="3" rowcount="0" innerdataset="@ds_init_deliveyn" codecolumn="value" datacolumn="label" position="absolute 95 77 268 94"/>
  61. <Radio id="radio1" taborder="29" columncount="5" rowcount="0" innerdataset="@ds_init_ioflag" codecolumn="value" datacolumn="label" position="absolute 95 99 335 119"/>
  62. <Static id="caption8" text="환자구분 :" class="search_name" position="absolute 5 101 94 118"/>
  63. <Button id="btn_search" taborder="30" text="조회" class="btn1" visible="false" position="absolute 250 5 306 27" onclick="grp_key_btn_search_onclick"/>
  64. <Button id="button1" taborder="31" class="icon_search" position="absolute 183 124 199 140" onclick="grp_key_button1_onclick"/>
  65. <Static id="caption2" text="시행부서 :" class="search_name" position="absolute 5 125 98 142"/>
  66. <Edit id="ipt_prcpdeptnm" taborder="32" position="absolute 205 124 335 143" class="output" style="background:URL('theme://images/bg_edit_D.png') stretch 5,5;"/>
  67. <Edit id="ipt_prcpdeptcd" taborder="33" class="input_fix" position="absolute 95 124 180 143" autoselect="true" onkeydown="grp_key_ipt_prcpdeptcd_onkeydown"/>
  68. <Edit id="opt_instcdnm" taborder="34" readonly="true" position="absolute 95 5 205 24" class="output"/>
  69. <Static id="caption1" text="등록번호 :" class="search_name" position="absolute 6 149 99 166"/>
  70. <Static id="caption4" text="환 자 명 :" class="search_name" position="absolute 180 148 273 165"/>
  71. <Edit id="ipt_pid" taborder="35" class="input_fix" position="absolute 95 148 175 167" autoselect="true"/>
  72. <Edit id="ipt_patnm" taborder="36" class="input_fix" position="absolute 265 148 335 167" autoselect="true"/>
  73. <Static id="caption20" text="청구구분 :" class="search_name" position="absolute 5 29 91 46"/>
  74. <Combo id="cmb_reqflag" taborder="37" innerdataset="ds_init_cmb_reqflag" codecolumn="reqflag" datacolumn="reqflagnm" class="combo_default" position="absolute 95 29 205 48"/>
  75. <Static id="caption11" text="구매구분 :" class="search_name" position="absolute 180 175 273 192"/>
  76. <Combo id="cmb_purcflag" taborder="38" innerdataset="ds_init_cmb_purcflag" codecolumn="cdid" datacolumn="cdnm" class="combo_default" position="absolute 265 174 335 193"/>
  77. <Static id="caption13" text="물품코드 :" class="search_name" position="absolute 6 174 99 191"/>
  78. <Edit id="ipt_goodcd" taborder="39" class="input_fix" enable="false" position="absolute 95 173 175 192" autoselect="true"/>
  79. <Radio id="rdo_prntyn" taborder="40" columncount="3" rowcount="0" innerdataset="@ds_init_prntyn" codecolumn="value" datacolumn="label" position="absolute 95 198 268 215"/>
  80. <Static id="caption14" text="출력여부 :" class="search_name" position="absolute 6 198 95 215"/>
  81. </Layout>
  82. </Layouts>
  83. </Div>
  84. <Button id="button57" taborder="5" class="icon_pre_month" position="absolute 345 47 361 63" onclick="button57_onclick"/>
  85. <Button id="button58" taborder="6" class="icon_next_month" position="absolute 365 47 381 63" onclick="button58_onclick"/>
  86. <Grid id="grd_searchgood" taborder="7" binddataset="ds_main_list_searchgood_searchgoodlist" useinputpanel="false" position="absolute 345 68 1180 778" autoenter="select" cellsizingtype="col" anchor="all" oncellclick="grd_searchgood_oncellclick">
  87. <Formats>
  88. <Format id="default">
  89. <Columns>
  90. <Column size="21" band="left"/>
  91. <Column size="24"/>
  92. <Column size="69"/>
  93. <Column size="76"/>
  94. <Column size="71"/>
  95. <Column size="70"/>
  96. <Column size="27"/>
  97. <Column size="165"/>
  98. <Column size="71"/>
  99. <Column size="50"/>
  100. <Column size="55"/>
  101. <Column size="0"/>
  102. <Column size="0"/>
  103. <Column size="66"/>
  104. <Column size="70"/>
  105. <Column size="58"/>
  106. <Column size="46"/>
  107. <Column size="0"/>
  108. <Column size="60"/>
  109. <Column size="43"/>
  110. <Column size="78"/>
  111. <Column size="76"/>
  112. <Column size="76"/>
  113. <Column size="0"/>
  114. <Column size="0"/>
  115. <Column size="42"/>
  116. <Column size="0"/>
  117. <Column size="0"/>
  118. <Column size="0"/>
  119. <Column size="0"/>
  120. <Column size="0"/>
  121. <Column size="0"/>
  122. <Column size="0"/>
  123. <Column size="0"/>
  124. <Column size="0"/>
  125. <Column size="0"/>
  126. <Column size="0"/>
  127. <Column size="0"/>
  128. <Column size="0"/>
  129. <Column size="0"/>
  130. <Column size="0"/>
  131. <Column size="0"/>
  132. <Column size="0"/>
  133. </Columns>
  134. <Rows>
  135. <Row size="24" band="head"/>
  136. <Row size="24"/>
  137. </Rows>
  138. <Band id="head">
  139. <Cell/>
  140. <Cell col="1" displaytype="checkbox" edittype="checkbox"/>
  141. <Cell col="2" text="처방일자"/>
  142. <Cell col="3" text="등록번호"/>
  143. <Cell col="4" text="환자명"/>
  144. <Cell col="5" colspan="2" text="물품코드" taborder="undefined"/>
  145. <Cell col="7" text="물품명"/>
  146. <Cell col="8" text="규격"/>
  147. <Cell col="9" text="총수량"/>
  148. <Cell col="10" text="불출량"/>
  149. <Cell col="11" text="집계"/>
  150. <Cell col="12" text="출력"/>
  151. <Cell col="13" text="시행일자"/>
  152. <Cell col="14" text="모델"/>
  153. <Cell col="15" text="구매구분"/>
  154. <Cell col="16" text="단위"/>
  155. <Cell col="17" text="귀가수량"/>
  156. <Cell col="18" text="입외"/>
  157. <Cell col="19" text="병동"/>
  158. <Cell col="20" text="병실"/>
  159. <Cell col="21" text="처방부서"/>
  160. <Cell col="22" text="시행부서"/>
  161. <Cell col="23" text="수량"/>
  162. <Cell col="24" text="횟수"/>
  163. <Cell col="25" text="일수"/>
  164. <Cell col="26" text="집계일자"/>
  165. <Cell col="27" text="등록자"/>
  166. <Cell col="28" text="등록일시"/>
  167. <Cell col="29"/>
  168. <Cell col="30"/>
  169. <Cell col="31"/>
  170. <Cell col="32"/>
  171. <Cell col="33"/>
  172. <Cell col="34"/>
  173. <Cell col="35"/>
  174. <Cell col="36"/>
  175. <Cell col="37"/>
  176. <Cell col="38"/>
  177. <Cell col="39"/>
  178. <Cell col="40"/>
  179. <Cell col="41"/>
  180. <Cell col="42"/>
  181. </Band>
  182. <Band id="body">
  183. <Cell celltype="head" expr="currow+1"/>
  184. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="expr:chk == 'Y' || chk == '1' ? 1 : 0"/>
  185. <Cell col="2" displaytype="date" text="bind:prcpdd" calendardisplaynulltype="nulltext"/>
  186. <Cell col="3" style="align:left;" text="bind:pid"/>
  187. <Cell col="4" style="align:left;" text="bind:patnm"/>
  188. <Cell col="5" style="align:left;" text="bind:goodcd"/>
  189. <Cell col="6" style="align:left;" text="bind:allsizespecid"/>
  190. <Cell col="7" style="align:left;" text="bind:goodnm"/>
  191. <Cell col="8" style="align:left;" text="bind:goodspec"/>
  192. <Cell col="9" displaytype="number" text="bind:totqty"/>
  193. <Cell col="10" displaytype="number" edittype="text" text="bind:beforqty"/>
  194. <Cell col="11" text="bind:sumflagnm"/>
  195. <Cell col="12" text="bind:prntynnm"/>
  196. <Cell col="13" displaytype="date" style="padding:2 2 2 2;" text="bind:rgstdd" calendardisplaynulltype="nulltext"/>
  197. <Cell col="14" style="align:left;" text="bind:goodmodel"/>
  198. <Cell col="15" text="bind:purcflagnm"/>
  199. <Cell col="16" style="align:left;" text="bind:setunit"/>
  200. <Cell col="17" text="bind:homematrqty" mask="#,###.#"/>
  201. <Cell col="18" style="align:left;" text="bind:ioflag" enable="false"/>
  202. <Cell col="19" style="align:left;" text="bind:wardnm"/>
  203. <Cell col="20" style="align:left;" text="bind:room"/>
  204. <Cell col="21" style="align:left;" text="bind:orddeptcdnm"/>
  205. <Cell col="22" style="align:left;" text="bind:prcpdeptcdnm"/>
  206. <Cell col="23" text="bind:goodqty" mask="#,###.#"/>
  207. <Cell col="24" text="bind:times" mask="#,###"/>
  208. <Cell col="25" displaytype="number" text="bind:dayno"/>
  209. <Cell col="26" text="bind:acptdd" mask="yyyy-mm-dd"/>
  210. <Cell col="27" text="bind:fstrgstrid"/>
  211. <Cell col="28" text="bind:fstrgstdt" mask="yyyy-mm-dd"/>
  212. <Cell col="29" text="bind:ward"/>
  213. <Cell col="30" text="bind:orddeptcd"/>
  214. <Cell col="31" text="bind:prcpdeptcd"/>
  215. <Cell col="32" text="bind:sumflag"/>
  216. <Cell col="33" text="bind:genrdd"/>
  217. <Cell col="34" text="bind:genrno"/>
  218. <Cell col="35" text="bind:genrseq"/>
  219. <Cell col="36" text="bind:beforqtyold"/>
  220. <Cell col="37" text="bind:homematrflag"/>
  221. <Cell col="38" text="bind:centcd"/>
  222. <Cell col="39" text="bind:subdeptcd"/>
  223. <Cell col="40" text="bind:centcdnm"/>
  224. <Cell col="41" text="bind:subdeptcdnm"/>
  225. <Cell col="42" text="bind:prntyn"/>
  226. </Band>
  227. </Format>
  228. </Formats>
  229. </Grid>
  230. <CheckBox id="chk_allchk" taborder="8" position="absolute 348 70 368 90" onclick="chk_allchk_onclick" truevalue="Y" falsevalue="N" visible="false"/>
  231. <Button id="btn_save" taborder="9" text="저장" class="btn4" position="absolute 990 41 1046 63" anchor="top right" onclick="btn_save_onclick"/>
  232. <Shape id="lin_main" class="line_10" position="absolute 345 63 1180 69" anchor="left top right"/>
  233. <Static id="cpt_disp" text="처방전달물품내역" class="tit_2" position="absolute 385 47 880 68"/>
  234. <Button id="btn_excel2" taborder="10" text="Excel" class="btn5" position="absolute 1054 44 1107 63" anchor="top right" onclick="btn_excel2_onclick"/>
  235. <Button id="button2" taborder="11" text="집계현황" class="btn5" position="absolute 1111 44 1180 63" anchor="top right" onclick="button2_onclick"/>
  236. <Grid id="grd_excelgood" taborder="12" binddataset="ds_main_list_searchgood_searchgoodlist" useinputpanel="false" visible="false" position="absolute 345 173 1180 488">
  237. <Formats>
  238. <Format id="default">
  239. <Columns>
  240. <Column size="21" band="left"/>
  241. <Column size="66"/>
  242. <Column size="69"/>
  243. <Column size="70"/>
  244. <Column size="27"/>
  245. <Column size="183"/>
  246. <Column size="80"/>
  247. <Column size="80"/>
  248. <Column size="50"/>
  249. <Column size="0"/>
  250. <Column size="70"/>
  251. <Column size="55"/>
  252. <Column size="56"/>
  253. <Column size="36"/>
  254. <Column size="55"/>
  255. <Column size="40"/>
  256. <Column size="72"/>
  257. <Column size="76"/>
  258. <Column size="0"/>
  259. <Column size="0"/>
  260. <Column size="0"/>
  261. <Column size="40"/>
  262. <Column size="68"/>
  263. <Column size="82"/>
  264. <Column size="82"/>
  265. <Column size="100"/>
  266. <Column size="0"/>
  267. <Column size="0"/>
  268. <Column size="0"/>
  269. <Column size="0"/>
  270. <Column size="0"/>
  271. <Column size="0"/>
  272. <Column size="0"/>
  273. <Column size="0"/>
  274. <Column size="0"/>
  275. </Columns>
  276. <Rows>
  277. <Row size="24" band="head"/>
  278. <Row size="24"/>
  279. </Rows>
  280. <Band id="head">
  281. <Cell/>
  282. <Cell col="1" text="시행일자"/>
  283. <Cell col="2" text="처방일자"/>
  284. <Cell col="3" colspan="2" text="물품코드" taborder="undefined"/>
  285. <Cell col="5" text="물품명"/>
  286. <Cell col="6" text="규격"/>
  287. <Cell col="7" text="모델"/>
  288. <Cell col="8" text="총수량"/>
  289. <Cell col="9" text="불출"/>
  290. <Cell col="10" text="단위"/>
  291. <Cell col="11" text="등록번호"/>
  292. <Cell col="12" text="환자명"/>
  293. <Cell col="13" text="입외"/>
  294. <Cell col="14" text="병동"/>
  295. <Cell col="15" text="병실"/>
  296. <Cell col="16" text="처방부서"/>
  297. <Cell col="17" text="시행부서"/>
  298. <Cell col="18" text="수량"/>
  299. <Cell col="19" text="횟수"/>
  300. <Cell col="20" text="일수"/>
  301. <Cell col="21" text="집계"/>
  302. <Cell col="22" text="집계일자"/>
  303. <Cell col="23" text="구매구분"/>
  304. <Cell col="24" text="제조원"/>
  305. <Cell col="25" text="거래처"/>
  306. <Cell col="26"/>
  307. <Cell col="27"/>
  308. <Cell col="28"/>
  309. <Cell col="29"/>
  310. <Cell col="30"/>
  311. <Cell col="31"/>
  312. <Cell col="32"/>
  313. <Cell col="33"/>
  314. <Cell col="34"/>
  315. </Band>
  316. <Band id="body">
  317. <Cell celltype="head" expr="currow+1"/>
  318. <Cell col="1" displaytype="date" text="bind:rgstdd" calendardisplaynulltype="nulltext"/>
  319. <Cell col="2" displaytype="date" text="bind:prcpdd" calendardisplaynulltype="nulltext"/>
  320. <Cell col="3" text="bind:goodcd"/>
  321. <Cell col="4" text="bind:allsizespecid"/>
  322. <Cell col="5" text="bind:goodnm"/>
  323. <Cell col="6" text="bind:goodspec"/>
  324. <Cell col="7" text="bind:goodmodel"/>
  325. <Cell col="8" displaytype="number" text="bind:totqty"/>
  326. <Cell col="9" text="bind:beforqty" mask="#,###.#"/>
  327. <Cell col="10" text="bind:setunit"/>
  328. <Cell col="11" text="bind:pid2"/>
  329. <Cell col="12" text="bind:patnm2"/>
  330. <Cell col="13" text="bind:ioflag" enable="false"/>
  331. <Cell col="14" text="bind:wardnm"/>
  332. <Cell col="15" text="bind:room"/>
  333. <Cell col="16" text="bind:orddeptcdnm"/>
  334. <Cell col="17" text="bind:prcpdeptcdnm"/>
  335. <Cell col="18" text="bind:goodqty" mask="#,###.#"/>
  336. <Cell col="19" text="bind:times" mask="#,###"/>
  337. <Cell col="20" text="bind:dayno" mask="#,###"/>
  338. <Cell col="21" text="bind:sumflagnm"/>
  339. <Cell col="22" displaytype="date" text="bind:acptdd" calendardisplaynulltype="nulltext"/>
  340. <Cell col="23" text="bind:purcflagnm"/>
  341. <Cell col="24" text="bind:prodcmpynm"/>
  342. <Cell col="25" text="bind:suplplcecdnm"/>
  343. <Cell col="26" text="bind:fstrgstrid"/>
  344. <Cell col="27" text="bind:fstrgstdt" mask="yyyy-mm-dd"/>
  345. <Cell col="28" text="bind:ward"/>
  346. <Cell col="29" text="bind:orddeptcd"/>
  347. <Cell col="30" text="bind:prcpdeptcd"/>
  348. <Cell col="31" text="bind:sumflag"/>
  349. <Cell col="32" text="bind:purcflag"/>
  350. <Cell col="33" text="bind:prodcmpycd"/>
  351. <Cell col="34" text="bind:suplplcecd"/>
  352. </Band>
  353. </Format>
  354. </Formats>
  355. </Grid>
  356. </Layout>
  357. </Layouts>
  358. <Objects>
  359. <Dataset id="ds_send_SearchTree" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_send_SearchTree_oncolumnchanged">
  360. <ColumnInfo>
  361. <Column id="instcd" type="STRING" size="256"/>
  362. <Column id="instcdnm" type="STRING" size="256"/>
  363. <Column id="prcpdd" type="STRING" size="256"/>
  364. <Column id="prcpdd2" type="STRING" size="256"/>
  365. <Column id="sumflag" type="STRING" size="256"/>
  366. <Column id="ioflag" type="STRING" size="256"/>
  367. <Column id="prcpdeptcd" type="STRING" size="256"/>
  368. <Column id="prcpdeptnm" type="STRING" size="256"/>
  369. <Column id="querycls" type="STRING" size="256"/>
  370. <Column id="pid" type="STRING" size="256"/>
  371. <Column id="patnm" type="STRING" size="256"/>
  372. <Column id="reqflag" type="STRING" size="256"/>
  373. <Column id="goodcd" type="STRING" size="256"/>
  374. <Column id="purcflag" type="STRING" size="256"/>
  375. <Column id="homematrflag" type="STRING" size="256"/>
  376. <Column id="prntyn" type="STRING" size="256"/>
  377. <Column id="deliveyn" type="STRING" size="256"/>
  378. <Column id="reqprid" type="STRING" size="256"/>
  379. <Column id="prodcmpynm" type="STRING" size="256"/>
  380. <Column id="suplplcecdnm" type="STRING" size="256"/>
  381. <Column id="suppcustnm" type="STRING" size="256"/>
  382. </ColumnInfo>
  383. <Rows>
  384. <Row>
  385. <Col id="querycls">0</Col>
  386. </Row>
  387. </Rows>
  388. </Dataset>
  389. <Dataset id="ds_init_deliveyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  390. <ColumnInfo>
  391. <Column id="label" type="STRING" size="256"/>
  392. <Column id="value" type="STRING" size="256"/>
  393. </ColumnInfo>
  394. <Rows>
  395. <Row>
  396. <Col id="label">전체</Col>
  397. <Col id="value"/>
  398. </Row>
  399. <Row>
  400. <Col id="label">미불출</Col>
  401. <Col id="value">N</Col>
  402. </Row>
  403. <Row>
  404. <Col id="label">불출</Col>
  405. <Col id="value">Y</Col>
  406. </Row>
  407. </Rows>
  408. </Dataset>
  409. <Dataset id="ds_init_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  410. <ColumnInfo>
  411. <Column id="label" type="STRING" size="256"/>
  412. <Column id="value" type="STRING" size="256"/>
  413. </ColumnInfo>
  414. <Rows>
  415. <Row>
  416. <Col id="label">전체</Col>
  417. <Col id="value"/>
  418. </Row>
  419. <Row>
  420. <Col id="label">입원</Col>
  421. <Col id="value">I</Col>
  422. </Row>
  423. <Row>
  424. <Col id="label">외래</Col>
  425. <Col id="value">O</Col>
  426. </Row>
  427. <Row>
  428. <Col id="label">건진</Col>
  429. <Col id="value">S</Col>
  430. </Row>
  431. <Row>
  432. <Col id="label">응급</Col>
  433. <Col id="value">E</Col>
  434. </Row>
  435. </Rows>
  436. </Dataset>
  437. <Dataset id="ds_init_prntyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  438. <ColumnInfo>
  439. <Column id="label" type="STRING" size="256"/>
  440. <Column id="value" type="STRING" size="256"/>
  441. </ColumnInfo>
  442. <Rows>
  443. <Row>
  444. <Col id="label">전체</Col>
  445. <Col id="value"/>
  446. </Row>
  447. <Row>
  448. <Col id="label">출력</Col>
  449. <Col id="value">Y</Col>
  450. </Row>
  451. <Row>
  452. <Col id="label">미출력</Col>
  453. <Col id="value">N</Col>
  454. </Row>
  455. </Rows>
  456. </Dataset>
  457. <Dataset id="ds_main_PrcpGoodTrees_TreeList" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  458. <ColumnInfo>
  459. <Column id="depth" type="STRING" size="256" sumtext=" 01 LEVEL "/>
  460. <Column id="pcode" type="STRING" size="256" sumtext=" 02 상위결합코드 "/>
  461. <Column id="codecd" type="STRING" size="256" sumtext=" 03 코드 "/>
  462. <Column id="codenm" type="STRING" size="256" sumtext=" 04 코드명 "/>
  463. <Column id="dispnm" type="STRING" size="256" sumtext=" 05 DISPLAY 명칭 "/>
  464. <Column id="basecode" type="STRING" size="256" sumtext=" 06 상위코드 "/>
  465. </ColumnInfo>
  466. </Dataset>
  467. <Dataset id="ds_main_list_searchgood_searchgoodlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list_searchgood_searchgoodlist_oncolumnchanged">
  468. <ColumnInfo>
  469. <Column id="chk" type="STRING" size="256" sumtext="선택 "/>
  470. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자 "/>
  471. <Column id="prcpno" type="STRING" size="256" sumtext="처방번호 "/>
  472. <Column id="prcphisno" type="STRING" size="256" sumtext="처방이력번호 "/>
  473. <Column id="instcd" type="STRING" size="256" sumtext="기관코드 "/>
  474. <Column id="ioflag" type="STRING" size="256" sumtext="입원외래구분 "/>
  475. <Column id="pid" type="STRING" size="256" sumtext="등록번호(환자) "/>
  476. <Column id="pid2" type="STRING" size="256" sumtext="등록번호(환자) "/>
  477. <Column id="patnm" type="STRING" size="256" sumtext="환자명 "/>
  478. <Column id="patnm2" type="STRING" size="256" sumtext="환자명 "/>
  479. <Column id="ward" type="STRING" size="256" sumtext="병동 "/>
  480. <Column id="wardnm" type="STRING" size="256" sumtext="병동 "/>
  481. <Column id="room" type="STRING" size="256" sumtext="병실 "/>
  482. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과 "/>
  483. <Column id="orddeptcdnm" type="STRING" size="256" sumtext="진료과 "/>
  484. <Column id="prcpdeptcd" type="STRING" size="256" sumtext="처방부서코드 "/>
  485. <Column id="prcpdeptcdnm" type="STRING" size="256" sumtext="처방부서명 "/>
  486. <Column id="mainmngtdeptcd" type="STRING" size="256" sumtext="관리부서 "/>
  487. <Column id="prcppsn" type="STRING" size="256" sumtext="처방의 "/>
  488. <Column id="indd" type="STRING" size="256" sumtext="입원일자 "/>
  489. <Column id="setflag" type="STRING" size="256" sumtext="재료set구분 "/>
  490. <Column id="goodcd" type="STRING" size="256" sumtext="물품코드 "/>
  491. <Column id="goodnm" type="STRING" size="256" sumtext="물품코드명 "/>
  492. <Column id="reqflag" type="STRING" size="256" sumtext="청구구분 "/>
  493. <Column id="goodflag" type="STRING" size="256" sumtext="물품구분 "/>
  494. <Column id="reqprid" type="STRING" size="256" sumtext="청구주기 "/>
  495. <Column id="reqpridnm" type="STRING" size="256" sumtext="청구주기명 "/>
  496. <Column id="purcflag" type="STRING" size="256" sumtext="구매구분 "/>
  497. <Column id="spec" type="STRING" size="256" sumtext="규격 "/>
  498. <Column id="goodqty" type="STRING" size="256" sumtext="물품수량 "/>
  499. <Column id="times" type="STRING" size="256" sumtext="횟수 "/>
  500. <Column id="dayno" type="STRING" size="256" sumtext="일수 "/>
  501. <Column id="totqty" type="STRING" size="256" sumtext="총수량 "/>
  502. <Column id="beforqty" type="STRING" size="256" sumtext="선불출수량 "/>
  503. <Column id="beforqtyold" type="STRING" size="256" sumtext="선불출수량변경전 "/>
  504. <Column id="rgstdd" type="STRING" size="256" sumtext="등록일자 "/>
  505. <Column id="rgstdeptcd" type="STRING" size="256" sumtext="등록부서코드 "/>
  506. <Column id="sumflag" type="STRING" size="256" sumtext="집계구분 "/>
  507. <Column id="sumflagnm" type="STRING" size="256" sumtext="집계구분 "/>
  508. <Column id="prntyn" type="STRING" size="256" sumtext="출력여부 "/>
  509. <Column id="prntynnm" type="STRING" size="256" sumtext="출력여부명 "/>
  510. <Column id="acptdd" type="STRING" size="256" sumtext="접수일자 "/>
  511. <Column id="demdkey" type="STRING" size="256" sumtext="demdkey(수동여부) "/>
  512. <Column id="fstrgstrid" type="STRING" size="256" sumtext="최초등록자id "/>
  513. <Column id="fstrgstdt" type="STRING" size="256" sumtext="최초등록일시 "/>
  514. <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종수정자id "/>
  515. <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종수정일시 "/>
  516. <Column id="goodspec" type="STRING" size="256" sumtext="규격 "/>
  517. <Column id="goodmodel" type="STRING" size="256" sumtext="모델 "/>
  518. <Column id="allsizespecid" type="STRING" size="256" sumtext="ALL SIZE ID "/>
  519. <Column id="allsizeyn" type="STRING" size="256" sumtext="ALL SIZE 여부 "/>
  520. <Column id="genrdd" type="STRING" size="256" sumtext="생성일자 "/>
  521. <Column id="genrno" type="STRING" size="256" sumtext="생성번호 "/>
  522. <Column id="genrseq" type="STRING" size="256" sumtext="생성순번 "/>
  523. <Column id="setunit" type="STRING" size="256" sumtext="포장구성단위 "/>
  524. <Column id="chk" type="STRING" size="256" sumtext="Grid Check "/>
  525. <Column id="purcflagnm" type="STRING" size="256" sumtext="구매구분명 "/>
  526. <Column id="prcpunit" type="STRING" size="256" sumtext="처방단위 "/>
  527. <Column id="prcpunit2" type="STRING" size="256" sumtext="처방단위 "/>
  528. <Column id="homematrflag" type="STRING" size="256" sumtext="귀가유치물품flag "/>
  529. <Column id="homematrqty" type="STRING" size="256" sumtext="귀가유치물품수량 "/>
  530. <Column id="centcd" type="STRING" size="256" sumtext="센터코드 "/>
  531. <Column id="subdeptcd" type="STRING" size="256" sumtext="세부과코드 "/>
  532. <Column id="centcdnm" type="STRING" size="256" sumtext="센터코드명 "/>
  533. <Column id="subdeptcdnm" type="STRING" size="256" sumtext="세부과코드명 "/>
  534. <Column id="prodcmpycd" type="STRING" size="256" sumtext="제조회사코드 "/>
  535. <Column id="prodcmpynm" type="STRING" size="256" sumtext="제조회사명 "/>
  536. <Column id="suplplcecd" type="STRING" size="256" sumtext="주거래처 "/>
  537. <Column id="suplplcecdnm" type="STRING" size="256" sumtext="주거래처명 "/>
  538. <Column id="edicd" type="STRING" size="256" sumtext="EDI 코드 "/>
  539. <Column id="suppcustcd" type="STRING" size="256" sumtext="보조거래처코드 "/>
  540. <Column id="suppcustnm" type="STRING" size="256" sumtext="보조거래처명 "/>
  541. <Column id="goodunitcost" type="STRING" size="256" sumtext="단가 "/>
  542. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  543. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  544. <Column id="prcppsnnm" type="STRING" size="256" sumtext="진료의사명"/>
  545. <Column id="sumcnt" type="STRING" size="256" sumtext="집계차수"/>
  546. <Column id="erprcpflag" type="STRING" size="256" sumtext="처방구분"/>
  547. <Column id="prntkey" type="STRING" size="256" sumtext="출력구분"/>
  548. <Column id="cmt" type="STRING" size="256" sumtext="Remark"/>
  549. <Column id="rtnqty" type="STRING" size="256" sumtext="반납수량"/>
  550. <Column id="autdeliveyn" type="STRING" size="256" sumtext="대차불출여부"/>
  551. <Column id="sumyn" type="STRING" size="256" sumtext="집계여부"/>
  552. <Column id="facptddfr" type="STRING" size="256" sumtext="부모집계일자"/>
  553. <Column id="fsumcnt" type="STRING" size="256" sumtext="부모집계차수"/>
  554. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="처방일련번호"/>
  555. </ColumnInfo>
  556. </Dataset>
  557. <Dataset id="ds_send_searchgood" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  558. <ColumnInfo>
  559. <Column id="instcd" type="STRING" size="256"/>
  560. <Column id="prcpdd" type="STRING" size="256"/>
  561. <Column id="prcpdd2" type="STRING" size="256"/>
  562. <Column id="sumflag" type="STRING" size="256"/>
  563. <Column id="reqflag" type="STRING" size="256"/>
  564. <Column id="reqdeptcd" type="STRING" size="256"/>
  565. <Column id="reqprid" type="STRING" size="256"/>
  566. <Column id="prcpdeptcd" type="STRING" size="256"/>
  567. <Column id="goodcd" type="STRING" size="256"/>
  568. <Column id="ioflag" type="STRING" size="256"/>
  569. <Column id="deptgr" type="STRING" size="256"/>
  570. <Column id="pid" type="STRING" size="256"/>
  571. <Column id="patnm" type="STRING" size="256"/>
  572. <Column id="purcflag" type="STRING" size="256"/>
  573. <Column id="homematrflag" type="STRING" size="256"/>
  574. <Column id="prodcmpynm" type="STRING" size="256"/>
  575. <Column id="suplplcecdnm" type="STRING" size="256"/>
  576. <Column id="suppcustnm" type="STRING" size="256"/>
  577. <Column id="prntyn" type="STRING" size="256"/>
  578. <Column id="deliveyn" type="STRING" size="256"/>
  579. <Column id="screen_id" type="STRING" size="256"/>
  580. </ColumnInfo>
  581. <Rows>
  582. <Row/>
  583. </Rows>
  584. </Dataset>
  585. <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  586. <ColumnInfo>
  587. <Column id="allchk" type="STRING" size="256"/>
  588. </ColumnInfo>
  589. <Rows>
  590. <Row/>
  591. </Rows>
  592. </Dataset>
  593. <Dataset id="ds_send_save_rsihopmabefore" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  594. <Dataset id="ds_main_list_searchgood_prntlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list_searchgood_searchgoodlist_oncolumnchanged">
  595. <ColumnInfo>
  596. <Column id="prntkey" type="STRING" size="256" sumtext="출력키 "/>
  597. </ColumnInfo>
  598. </Dataset>
  599. <Dataset id="ds_main_list_searchgood_groupgoodlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list_searchgood_searchgoodlist_oncolumnchanged">
  600. <ColumnInfo>
  601. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  602. <Column id="prcpdeptcd" type="STRING" size="256" sumtext="처방부서코드"/>
  603. <Column id="prcpdeptcdnm" type="STRING" size="256" sumtext="처방부서명"/>
  604. <Column id="goodcd" type="STRING" size="256" sumtext="물품코드"/>
  605. <Column id="goodnm" type="STRING" size="256" sumtext="물품코드명"/>
  606. <Column id="beforqty" type="STRING" size="256" sumtext="선불출수량"/>
  607. <Column id="prcpdd" type="STRING" size="256" sumtext="등록일자"/>
  608. <Column id="goodspec" type="STRING" size="256" sumtext="규격"/>
  609. <Column id="allsizespecid" type="STRING" size="256" sumtext="ALL SIZE ID"/>
  610. <Column id="prcpunit" type="STRING" size="256" sumtext="처방단위"/>
  611. <Column id="prntkey" type="STRING" size="256" sumtext="출력구분"/>
  612. <Column id="autdeliveyn" type="STRING" size="256" sumtext="대차불출여부"/>
  613. </ColumnInfo>
  614. </Dataset>
  615. <Dataset id="ds_main_list_searchgood_goodsumlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list_searchgood_searchgoodlist_oncolumnchanged">
  616. <ColumnInfo>
  617. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  618. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  619. <Column id="goodcd" type="STRING" size="256" sumtext="물품코드"/>
  620. <Column id="allsizespecid" type="STRING" size="256" sumtext="ALL SIZE ID"/>
  621. <Column id="goodnm" type="STRING" size="256" sumtext="물품코드명"/>
  622. <Column id="goodspec" type="STRING" size="256" sumtext="규격"/>
  623. <Column id="i_sum_qty" type="STRING" size="256" sumtext="입원처방수량"/>
  624. <Column id="o_sum_qty" type="STRING" size="256" sumtext="외래처방수량"/>
  625. <Column id="s_sum_qty" type="STRING" size="256" sumtext="건진처방수량"/>
  626. <Column id="e_sum_qty" type="STRING" size="256" sumtext="응급처방수량"/>
  627. <Column id="total_qty" type="STRING" size="256" sumtext="전체수량"/>
  628. </ColumnInfo>
  629. </Dataset>
  630. </Objects>
  631. <Bind>
  632. <BindItem id="item0" compid="grp_key.opt_instcdnm" propid="value" datasetid="ds_send_SearchTree" columnid="instcdnm"/>
  633. <BindItem id="item1" compid="grp_key.opt_instcd" propid="value" datasetid="ds_send_SearchTree" columnid="instcd"/>
  634. <BindItem id="item2" compid="grp_key.cmb_reqflag" propid="value" datasetid="ds_send_SearchTree" columnid="reqflag"/>
  635. <BindItem id="item3" compid="grp_key.ipt_prcpdd" propid="value" datasetid="ds_send_SearchTree" columnid="prcpdd"/>
  636. <BindItem id="item4" compid="grp_key.ipt_prcpdd2" propid="value" datasetid="ds_send_SearchTree" columnid="prcpdd2"/>
  637. <BindItem id="item5" compid="grp_key.rdo_deliveyn" propid="value" datasetid="ds_send_SearchTree" columnid="deliveyn"/>
  638. <BindItem id="item6" compid="grp_key.radio1" propid="value" datasetid="ds_send_SearchTree" columnid="ioflag"/>
  639. <BindItem id="item7" compid="grp_key.ipt_prcpdeptcd" propid="value" datasetid="ds_send_SearchTree" columnid="prcpdeptcd"/>
  640. <BindItem id="item8" compid="grp_key.ipt_prcpdeptnm" propid="value" datasetid="ds_send_SearchTree" columnid="prcpdeptnm"/>
  641. <BindItem id="item9" compid="grp_key.ipt_pid" propid="value" datasetid="ds_send_SearchTree" columnid="pid"/>
  642. <BindItem id="item10" compid="grp_key.ipt_patnm" propid="value" datasetid="ds_send_SearchTree" columnid="patnm"/>
  643. <BindItem id="item11" compid="grp_key.ipt_goodcd" propid="value" datasetid="ds_send_SearchTree" columnid="goodcd"/>
  644. <BindItem id="item12" compid="grp_key.cmb_purcflag" propid="value" datasetid="ds_send_SearchTree" columnid=""/>
  645. <BindItem id="item13" compid="grp_key.rdo_prntyn" propid="value" datasetid="ds_send_SearchTree" columnid="prntyn"/>
  646. <BindItem id="item14" compid="rdo_viewcls" propid="value" datasetid="ds_send_SearchTree" columnid="querycls"/>
  647. <BindItem id="item15" compid="chk_allchk" propid="value" datasetid="ds_temp" columnid="allchk"/>
  648. </Bind>
  649. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  650. * System Name :
  651. * Job Name :
  652. * Creator :
  653. * Make Date : 2017-06-19
  654. * Description :
  655. *---------------------------------------------------------------------------------------
  656. * Modify Date Modifier Modify Description
  657. *---------------------------------------------------------------------------------------
  658. * 2017-06-19 Live Converter TF->XP
  659. *
  660. *---------------------------------------------------------------------------------------
  661. ****************************************************************************************/
  662. include "com_commonxp::comm_main.xjs";
  663. include "mis_miscommonxp::MIS.xjs";
  664. include "mis_miscommonxp::RSZ001.xjs";
  665. //include "mis_reqxp::SMRSD02200.xjs";
  666. var vProgramCls = "SMRSD02201";
  667. var TreeSendPath = ds_send_SearchTree;
  668. function SMRSD02400_oninit(obj:Form, e:InitEventInfo)
  669. {
  670. frmf_initForm(obj);
  671. }
  672. function SMRSD02400_onload(obj:Form, e:LoadEventInfo)
  673. {
  674. grdf_initGrid(grd_searchgood);
  675. grdf_initGrid(grd_excelgood);
  676. misfComboComCdList("R0111", grp_key.cmb_purcflag, "Y");
  677. grp_key.cmb_purcflag.index = 0;
  678. rszfUserReqFlagList("grp_key.cmb_reqflag",sysf_getUserInfo("dutplceinstcd"),sysf_getUserInfo("userid"),"%","B");
  679. fInit();
  680. grp_key.cmb_reqflag.index = 0;
  681. vProgramCls = "SMRSD02203";
  682. grp_key.ipt_goodcd.value = "B02021004";
  683. }
  684. function fInit()
  685. {
  686. fInitialize();
  687. return;
  688. }
  689. function fInitialize()
  690. {
  691. misfGridInit(grd_searchgood);
  692. grp_key.opt_instcd.value = sysf_getUserInfo("dutplceinstcd");
  693. grp_key.opt_instcdnm.value = sysf_getUserInfo("dutplceinstnm");
  694. var curdate = utlf_getCurrentDate();
  695. var cvtdate = curdate.toDate("YYYYMMDD");
  696. grp_key.ipt_prcpdd.value = curdate;
  697. grp_key.ipt_prcpdd2.value = curdate;
  698. misfComboComCdList("R0111",grp_key.cmb_purcflag,"Y");
  699. }
  700. function ds_send_SearchTree_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  701. {
  702. if(e.columnid == "prcpdeptcd")
  703. {
  704. var objFocus = this.getFocus();
  705. grp_key.ipt_prcpdeptcd.value = e.newvalue;
  706. grp_key.ipt_prcpdeptcd.setFocus();
  707. misfSearchDept(grp_key.ipt_prcpdeptnm);
  708. objFocus.setFocus();
  709. }
  710. if(e.columnid == "goodcd")
  711. {
  712. grp_key.ipt_goodcd.value = String(e.newvalue).toUpperCase();
  713. grp_key.ipt_goodcd.setFocus();
  714. }
  715. }
  716. function grp_key_button1_onclick(obj:Button, e:ClickEventInfo)
  717. {
  718. var recv_list = "prcpdeptcd,prcpdeptnm";
  719. misfOpenPopUpList("02", grp_key.ipt_prcpdeptcd,"", recv_list) ;
  720. fDataSearchTree();
  721. }
  722. function fDataSearchTree()
  723. {
  724. misfGridInit(grd_searchgood);
  725. var oParam = {};
  726. oParam.id = "TRRSD02205";
  727. oParam.service = "reqapp.ReqMngt";
  728. oParam.method = "reqGetSearchGoodTree";
  729. oParam.inds = "req=ds_send_SearchTree";
  730. oParam.outds = "ds_main_PrcpGoodTrees_TreeList=TreeList";
  731. oParam.async = false;
  732. //oParam.callback = "cf_TRRSD02205";
  733. tranf_submit(oParam);
  734. }
  735. function grp_key_btn_search_onclick(obj:Button, e:ClickEventInfo)
  736. {
  737. misfGridInit(grd_searchgood);
  738. misfGridInit(grd_orderlist);
  739. ds_send_searchgood.setColumn(0, "screen_id", "SMRSD02400");
  740. var oParam = {};
  741. oParam.id = "TRRSD02203";
  742. oParam.service = "reqapp.ReqMngt";
  743. oParam.method = "reqGetSearchGoodList";
  744. oParam.inds = "req=ds_send_searchgood";
  745. oParam.outds = "ds_main_list_searchgood_searchgoodlist=searchgoodlist ds_main_list_searchgood_prntlist=prntlist ds_main_list_searchgood_groupgoodlist=groupgoodlist ds_main_list_searchgood_goodsumlist=goodsumlist";
  746. oParam.async = false;
  747. //oParam.callback = "cf_TRRSD02203";
  748. tranf_submit(oParam);
  749. if( utlf_isNull(ds_main_list_searchgood_searchgoodlist.getColumnInfo("chk")) ){
  750. ds_main_list_searchgood_searchgoodlist.addColumn("chk", "string");
  751. }
  752. grd_searchgood.setCellProperty("Body", grd_searchgood.getBindCellIndex("Body", "sumflag"), "edittype", "none");
  753. }
  754. function rdo_viewcls_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  755. {
  756. fDataSearchTree();
  757. }
  758. function button8_onclick(obj:Button, e:ClickEventInfo)
  759. {
  760. fDataSearchTree();
  761. }
  762. function trv_setcode_oncellclick(obj:Grid, e:GridClickEventInfo)
  763. {
  764. fDataSearchDetail(ds_main_PrcpGoodTrees_TreeList.rowposition, "D");
  765. }
  766. function fDataSearchDetail(pIdx, jobflag)
  767. {
  768. var rPath = ds_send_SearchTree;
  769. var dPath = ds_send_searchgood;
  770. var tPath = ds_main_PrcpGoodTrees_TreeList;
  771. var vCaption = " 처방전달물품";
  772. var Idx = pIdx;
  773. var sDepth = tPath.getColumn(Idx, "depth");
  774. var vCodeCd = tPath.getColumn(Idx, "codecd");
  775. var vCodeNm = tPath.getColumn(Idx, "codenm");
  776. var Tree2 = pIdx;
  777. cpt_disp.text = "";
  778. misfGridInit(grd_searchgood);
  779. if(utlf_isNull(vCodeCd))
  780. {
  781. return;
  782. }
  783. dPath.setColumn(0, "instcd", rPath.getColumn(0, "instcd"));
  784. dPath.setColumn(0, "prcpdd", rPath.getColumn(0, "prcpdd"));
  785. dPath.setColumn(0, "prcpdd2", rPath.getColumn(0, "prcpdd2"));
  786. dPath.setColumn(0, "sumflag", rPath.getColumn(0, "sumflag"));
  787. dPath.setColumn(0, "reqflag", rPath.getColumn(0, "reqflag"));
  788. dPath.setColumn(0, "reqdeptcd", "");
  789. dPath.setColumn(0, "reqprid", rPath.getColumn(0, "reqprid"));
  790. dPath.setColumn(0, "prcpdeptcd", "");
  791. dPath.setColumn(0, "goodcd", rPath.getColumn(0, "goodcd"));
  792. dPath.setColumn(0, "ioflag", rPath.getColumn(0, "ioflag"));
  793. dPath.setColumn(0, "deptgr", "");
  794. dPath.setColumn(0, "pid", rPath.getColumn(0, "pid"));
  795. dPath.setColumn(0, "patnm", rPath.getColumn(0, "patnm"));
  796. dPath.setColumn(0, "purcflag", rPath.getColumn(0, "purcflag"));
  797. dPath.setColumn(0, "prodcmpynm", rPath.getColumn(0, "prodcmpynm"));
  798. dPath.setColumn(0, "suplplcecdnm", rPath.getColumn(0, "suplplcecdnm"));
  799. dPath.setColumn(0, "suppcustnm", rPath.getColumn(0, "suppcustnm"));
  800. dPath.setColumn(0, "prntyn", rPath.getColumn(0, "prntyn"));
  801. if (jobflag == "D")
  802. {
  803. dPath.setColumn(0, "deliveyn", rPath.getColumn(0, "deliveyn"));
  804. }
  805. dsf_makeValue(dPath, "querycls", "string", ds_send_SearchTree.getColumn(0, "querycls"), 0);
  806. var vCls = parseInt(rdo_viewcls.value+sDepth);
  807. switch(vCls)
  808. {
  809. case 01 : vCaption = " :: 전체" ;
  810. break;
  811. case 02 :
  812. dPath.setColumn(0, "prcpdeptcd", vCodeCd);
  813. vCaption = "시행부서 : "+vCodeCd + " - " + vCodeNm;
  814. break;
  815. case 11 :
  816. dPath.setColumn(0, "reqdeptcd", vCodeCd);
  817. vCaption = "처방부서 : "+ vCodeCd + " - " + vCodeNm;
  818. break;
  819. case 12 :
  820. dPath.setColumn(0, "prcpdeptcd", vCodeCd);
  821. vCode = tPath.getColumn(Tree2, "codecd");
  822. vName = tPath.getColumn(Tree2, "codenm");
  823. dPath.setColumn(0, "reqdeptcd", vCode);
  824. vCaption = "처방부서 : "+vCode + " - " + vName + " >> 시행부서 : "+vCodeCd+ " - "+vCodeNm;
  825. break;
  826. case 21 :
  827. dPath.setColumn(0, "prcpdeptcd" , vCodeCd);
  828. vCaption = "시행부서 : "+vCodeCd + " - " + vCodeNm;
  829. break;
  830. case 22 :
  831. dPath.setColumn(0, "reqdeptcd", vCodeCd);
  832. vCode = tPath.getColumn(Tree2, "codecd");
  833. vName = tPath.getColumn(Tree2, "codenm");
  834. dPath.setColumn(0, "prcpdeptcd" , vCode );
  835. vCaption = "시행부서 : "+vCode + " - " + vName + " >> 처방부서 : "+vCodeCd+ " - "+vCodeNm ;
  836. break;
  837. case 31 :
  838. dPath.setColumn(0, "prcpdeptcd", vCodeCd );
  839. vCaption = "시행부서 : "+vCodeCd + " - " + vCodeNm;
  840. break;
  841. case 32 :
  842. dPath.setColumn(0, "goodcd", vCodeCd);
  843. vCode = tPath.setColumn(Tree2, "codecd");
  844. vName = tPath.setColumn(Tree2, "codenm");
  845. dPath.setColumn(0, "prcpdeptcd" , vCode );
  846. vCaption = "시행부서 : "+vCode + " - " + vName + " >> 물품코드 : "+vCodeCd+ " - "+vCodeNm ;
  847. }
  848. cpt_disp.text = vCaption;
  849. ds_send_searchgood.setColumn(0, "screen_id", "SMRSD02400");
  850. var oParam = {};
  851. oParam.id = "TRRSD02203";
  852. oParam.service = "reqapp.ReqMngt";
  853. oParam.method = "reqGetSearchGoodList";
  854. oParam.inds = "req=ds_send_searchgood";
  855. oParam.outds = "ds_main_list_searchgood_searchgoodlist=searchgoodlist ds_main_list_searchgood_prntlist=prntlist ds_main_list_searchgood_groupgoodlist=groupgoodlist ds_main_list_searchgood_goodsumlist=goodsumlist";
  856. oParam.async = false;
  857. //oParam.callback = "cf_TRRSD02203";
  858. tranf_submit(oParam);
  859. if( utlf_isNull(ds_main_list_searchgood_searchgoodlist.getColumnInfo("chk")) ){
  860. ds_main_list_searchgood_searchgoodlist.addColumn("chk", "string");
  861. }
  862. fGrdiDataValid();
  863. }
  864. function fGrdiDataValid()
  865. {
  866. if (ds_main_list_searchgood_searchgoodlist.rowcount == 0)
  867. {
  868. return;
  869. }
  870. for(var cnt = 0; cnt < ds_main_list_searchgood_searchgoodlist.rowcount; cnt++)
  871. {
  872. if(ds_main_list_searchgood_searchgoodlist.getColumn(cnt, "allsizeyn") == "Y" && ds_main_list_searchgood_searchgoodlist.getColumn(cnt, "allsizespecid") == "-")
  873. {
  874. misfSetGridColor(grd_searchgood, "rgstdd", "yellow", "B", cnt);
  875. misfSetGridColor(grd_searchgood, "totqty", "red", "C", cnt);
  876. }
  877. if(ds_main_list_searchgood_searchgoodlist.getColumn(cnt, "sumflag") =="Y" )
  878. {
  879. misfSetGridColor(grd_searchgood, "sumflagnm", "green", "B", cnt);
  880. }
  881. else
  882. {
  883. misfSetGridColor(grd_searchgood, "sumflagnm", "pink", "B", cnt);
  884. }
  885. if(ds_main_list_searchgood_searchgoodlist.getColumn(cnt, "prntyn") == "Y" )
  886. {
  887. misfSetGridColor(grd_searchgood, "prntynnm", "green", "B", cnt);
  888. }
  889. else
  890. {
  891. misfSetGridColor(grd_searchgood, "prntynnm", "pink", "B", cnt);
  892. }
  893. if (ds_main_list_searchgood_searchgoodlist.getColumn(cnt, "allsizeyn") == "Y" )
  894. {
  895. misfSetGridColor(grd_searchgood, "patnm", "#FFFF00", "B", cnt);
  896. }
  897. }
  898. }
  899. function ds_main_list_searchgood_searchgoodlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  900. {
  901. if(e.columnid == "chk")
  902. {
  903. obj.setColumn(e.row, "chk", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
  904. }
  905. fBeforQtyOnChange(e.row, 1, "D");
  906. }
  907. function fBeforQtyOnChange(pRow, pCls, jobflag)
  908. {
  909. var tQty = 0
  910. var sQty = 0
  911. var oQty = 0
  912. var vGridPath = ds_main_list_searchgood_searchgoodlist;
  913. var vSrt = (pCls == 1) ? pRow : 0;
  914. var vEnd = (pCls == 1) ? pRow : ds_main_list_searchgood_searchgoodlist.rowcount - 1 ;
  915. for (var i = vSrt; i <= vEnd; i++)
  916. {
  917. tQty = parseFloat(vGridPath.getColumn(i, "totqty"));
  918. sQty = parseFloat(vGridPath.getColumn(i, "beforqty"));
  919. oQty = parseFloat(vGridPath.getColumn(i, "beforqtyold"));
  920. if (sQty != oQty)
  921. {
  922. if (vGridPath.getColumn(i, "allsizeyn") == "Y" && vGridPath.getColumn(i, "allsizespecid") == "-")
  923. {
  924. sysf_messageBox(parseInt(i+1) + " 번째 물품은 All Size 미지정 불출" ,"E001");
  925. vGridPath.setColumn(i, "beforqty" ,vGridPath.getColumn(i, "beforqtyold"));
  926. return false;
  927. }
  928. if (tQty < sQty)
  929. {
  930. if (jobflag != "D")
  931. {
  932. sysf_messageBox(parseInt(i +1)+ " 번째 물품 처방 총수량 보다 선불출 수량이 클 수 " ,"I004");
  933. ds_main_list_searchgood_searchgoodlist.rowposition = i;
  934. grd_searchgood.setCellPos(grd_searchgood.getBindCellIndex("body", "beforqty"));
  935. grd_searchgood.showEditor(true);
  936. return false;
  937. }
  938. }
  939. if (vProgramCls == "SMRSD02300")
  940. {
  941. }
  942. else if (vGridPath.getColumn(i, "sumflag") == "Y" && jobflag != "D")
  943. {
  944. sysf_messageBox(parseInt(i+1) + " 번째 집계 완료된 물품 선불출 " ,"E001");
  945. ds_main_list_searchgood_searchgoodlist.rowposition = i;
  946. vGridPath.setColumn(i, "beforqty" , vGridPath.getColumn(i, "beforqtyold"));
  947. return false;
  948. }
  949. }
  950. }
  951. return true;
  952. }
  953. function button57_onclick(obj:Button, e:ClickEventInfo)
  954. {
  955. fDataPartToggle("1");
  956. }
  957. function fDataPartToggle(pCls)
  958. {
  959. if (pCls == "0")
  960. {
  961. grp_key.visible = true;
  962. chk_allchk.position.left = 348;
  963. chk_allchk.position.right = 368;
  964. grd_searchgood.position.left = 345;
  965. grd_searchgood.position.width = 835;
  966. grd_searchgood.position.right = 1180;
  967. button57.position.left = 345;
  968. button57.position.right = 361;
  969. button58.position.left = 365;
  970. button58.position.right = 381;
  971. cpt_disp.position.left = 385;
  972. cpt_disp.position.right = 880;
  973. lin_main.position.left = 345;
  974. lin_main.position.width = 835;
  975. lin_main.position.right = 1180;
  976. if (vProgramCls == "SMRSD02203")
  977. {
  978. btn_save.position.left = 715;
  979. }
  980. }
  981. else
  982. {
  983. grp_key.visible = false;
  984. chk_allchk.position.left = 3;
  985. chk_allchk.position.right = 23;
  986. grd_searchgood.position.left = 0;
  987. grd_searchgood.position.width = 1180;
  988. grd_searchgood.position.right = 1180;
  989. button57.position.left = 0;
  990. button57.position.right = 17;
  991. button58.position.left = 20;
  992. button58.position.right = 37;
  993. cpt_disp.position.left = 40;
  994. cpt_disp.position.right = 486;
  995. lin_main.position.left = 0;
  996. lin_main.position.width = 1180;
  997. lin_main.position.right = 1180;
  998. if (vProgramCls == "SMRSD02203")
  999. {
  1000. btn_save.position.left = 1072;
  1001. }
  1002. }
  1003. }
  1004. function button58_onclick(obj:Button, e:ClickEventInfo)
  1005. {
  1006. fDataPartToggle("0");
  1007. }
  1008. function chk_allchk_onclick(obj:CheckBox, e:ClickEventInfo)
  1009. {
  1010. if(obj.value == "Y")
  1011. {
  1012. for(var i = 0; i < ds_main_list_searchgood_searchgoodlist.rowcount; i++)
  1013. {
  1014. ds_main_list_searchgood_searchgoodlist.setColumn(i, "chk", "Y");
  1015. ds_main_list_searchgood_searchgoodlist.setColumn(i, "beforqty", ds_main_list_searchgood_searchgoodlist.getColumn(i, "totqty"));
  1016. }
  1017. }
  1018. else
  1019. {
  1020. for(var i = 0; i < ds_main_list_searchgood_searchgoodlist.rowcount; i++)
  1021. {
  1022. ds_main_list_searchgood_searchgoodlist.setColumn(i, "chk", "N");
  1023. ds_main_list_searchgood_searchgoodlist.setColumn(i, "beforqty", 0);
  1024. }
  1025. }
  1026. }
  1027. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  1028. {
  1029. fBeforQtyDataSave("D");
  1030. model.setValue(chk_allchk.attribute("ref"), "N");
  1031. }
  1032. function fBeforQtyDataSave(jobflag)
  1033. {
  1034. if (fBeforQtyOnChange("", 2, jobflag) == false) return;
  1035. var HeaderData = "instcd" + "▦" // 00 기관코드
  1036. + "genrdd" + "▦" // 01 생성일자
  1037. + "genrno" + "▦" // 02 생성번호
  1038. + "genrseq" + "▦" // 03 생성순번
  1039. + "beforqty" + "▩"; // 04 선불출수량
  1040. var vData = "";
  1041. var sPath = ds_main_list_searchgood_searchgoodlist;
  1042. var vGridRows = ds_main_list_searchgood_searchgoodlist.rowcount
  1043. for (var i = 0; i < vGridRows; i++)
  1044. {
  1045. sQty = parseFloat(sPath.getColumn(i, "beforqty"));
  1046. oQty = parseFloat(sPath.getColumn(i, "beforqtyold"));
  1047. oQty = parseFloat(sPath.getColumn(i, "beforqtyold")); // Old 선불출
  1048. if (sQty != oQty)
  1049. {
  1050. vData += sPath.getColumn(i, "instcd") + "▦"
  1051. + sPath.getColumn(i, "genrdd") + "▦"
  1052. + sPath.getColumn(i, "genrno") + "▦"
  1053. + sPath.getColumn(i, "genrseq") + "▦"
  1054. + sPath.getColumn(i, "beforqty") + "▩"
  1055. }
  1056. }
  1057. if (utlf_isNull(vData))
  1058. {
  1059. alert("수정된 자료가 없습니다!!");
  1060. return;
  1061. }
  1062. ds_send_save_rsihopmabefore.clearData();
  1063. dsf_setCSVToDs("ds_send_save_rsihopmabefore", HeaderData + vData);
  1064. var oParam = {};
  1065. oParam.id = "TXRSD02202";
  1066. oParam.service = "reqapp.ReqMngt";
  1067. oParam.method = "reqExeRsihopmabefore";
  1068. oParam.inds = "rsihopmabefore=ds_send_save_rsihopmabefore";
  1069. oParam.outds = "";
  1070. oParam.async = false;
  1071. oParam.callback = "cf_TXRSD02202";
  1072. tranf_submit(oParam);
  1073. }
  1074. function cf_TXRSD02202(sSvcId, nErrorCode, sErrorMsg)
  1075. {
  1076. if(nErrorCode < 0)
  1077. {
  1078. return;
  1079. }
  1080. else
  1081. {
  1082. fDataSearchDetail(ds_main_PrcpGoodTrees_TreeList.rowposition);
  1083. }
  1084. }
  1085. function grd_searchgood_oncellclick(obj:Grid, e:GridClickEventInfo)
  1086. {
  1087. var chk = ds_main_list_searchgood_searchgoodlist.getColumn(ds_main_list_searchgood_searchgoodlist.rowposition, "chk");
  1088. var totqty = ds_main_list_searchgood_searchgoodlist.getColumn(ds_main_list_searchgood_searchgoodlist.rowposition, "totqty");
  1089. if (e.cell == grd_searchgood.getBindCellIndex("Body", "chk"))
  1090. {
  1091. if (chk == "Y")
  1092. {
  1093. ds_main_list_searchgood_searchgoodlist.setColumn(ds_main_list_searchgood_searchgoodlist.rowposition, "beforqty", totqty);
  1094. }
  1095. else
  1096. {
  1097. ds_main_list_searchgood_searchgoodlist.setColumn(ds_main_list_searchgood_searchgoodlist.rowposition, "beforqty", 0);
  1098. }
  1099. }
  1100. }
  1101. function btn_excel2_onclick(obj:Button, e:ClickEventInfo)
  1102. {
  1103. var vdate = new Date();
  1104. var HH = vdate.getHours();
  1105. var MI = vdate.getMinutes();
  1106. var SS = vdate.getSeconds();
  1107. var vTime = HH +"" + MI +"" + SS;
  1108. var vFileNM = "처방전달물품내역_"+utlf_getCurrentDate()+ vTime;
  1109. grdf_exportExcel(grd_excelgood, vFileNM, "Sheet1", "true", "", "");
  1110. }
  1111. function button2_onclick(obj:Button, e:ClickEventInfo)
  1112. {
  1113. frmf_clearParameter("parainfo_instcd" );
  1114. frmf_clearParameter("parainfo_prcpdd" );
  1115. frmf_clearParameter("parainfo_prcpdd2" );
  1116. frmf_setParameter("parainfo_instcd" , grp_key.opt_instcd.value);
  1117. frmf_setParameter("parainfo_prcpdd" , grp_key.ipt_prcpdd.value);
  1118. frmf_setParameter("parainfo_prcpdd2" , grp_key.ipt_prcpdd2.value);
  1119. frmf_modal("SMRSD07200", "SMRSD07200", "", "", "", "", "", "", "", "", "", "", "M");
  1120. }
  1121. function grp_key_ipt_prcpdeptcd_onkeydown(obj:Edit, e:KeyEventInfo)
  1122. {
  1123. if( e.keycode == 13 ){
  1124. obj.updateToDataset();
  1125. }
  1126. }
  1127. ]]></Script>
  1128. </Form>
  1129. </FDL>