SMAEA07100_PACS인터페이스정보조회.xfdl 57 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMAEA07100" position="absolute 0 0 1196 779" titletext="PACS 인터페이스 정보 조회" oninit="SMAEA07100_oninit" onload="SMAEA07100_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 65 1195 737" id="group3" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Shape position="absolute 0 315 1194 321" linetype="horizontal" id="line2" class="line_1" anchor="left top right"/>
  11. <Static text="PAC.PACSRPTH" position="absolute 0 500 144 516" id="caption2" class="tit_2" anchor="default"/>
  12. <Grid position="absolute 0 521 1194 670" id="grd_pacsrpth" binddataset="ds_main_pacsinfo_pacsrpth" anchor="all" cellsizingtype="col">
  13. <Formats>
  14. <Format id="default">
  15. <Columns>
  16. <Column size="25"/>
  17. <Column size="85"/>
  18. <Column size="39"/>
  19. <Column size="103"/>
  20. <Column size="91"/>
  21. <Column size="132"/>
  22. <Column size="85"/>
  23. <Column size="913"/>
  24. <Column size="80"/>
  25. <Column size="73"/>
  26. <Column size="63"/>
  27. <Column size="64"/>
  28. <Column size="63"/>
  29. <Column size="61"/>
  30. <Column size="77"/>
  31. <Column size="120"/>
  32. </Columns>
  33. <Rows>
  34. <Row size="24" band="head"/>
  35. <Row size="24"/>
  36. </Rows>
  37. <Band id="head">
  38. <Cell/>
  39. <Cell col="1" text="QUEUEID"/>
  40. <Cell col="2" text="FLAG"/>
  41. <Cell col="3" text="WORKTIME"/>
  42. <Cell col="4" text="READSTATUS"/>
  43. <Cell col="5" text="HISORDERID"/>
  44. <Cell col="6" text="PATID"/>
  45. <Cell col="7" text="READTEXT"/>
  46. <Cell col="8" text="CONFDATE"/>
  47. <Cell col="9" text="CONFTIME"/>
  48. <Cell col="10" text="CONFDR1"/>
  49. <Cell col="11" text="CONFDR2"/>
  50. <Cell col="12" text="EXTEND1"/>
  51. <Cell col="13" text="EXTEND2"/>
  52. <Cell col="14" text="OPDEPTID"/>
  53. <Cell col="15" text="STUDYDTM"/>
  54. </Band>
  55. <Band id="body">
  56. <Cell celltype="head" text="expr:currow+1"/>
  57. <Cell col="1" text="bind:queueid"/>
  58. <Cell col="2" displaytype="text" edittype="text" text="bind:flag"/>
  59. <Cell col="3" text="bind:worktime"/>
  60. <Cell col="4" text="bind:readstatus"/>
  61. <Cell col="5" style="color:#ff0000ff;color2:#ff0000;" text="bind:hisorderid"/>
  62. <Cell col="6" displaytype="text" edittype="text" style="color:#000000ff;color2:#000000;" text="bind:patid"/>
  63. <Cell col="7" displaytype="text" edittype="text" text="bind:readtext"/>
  64. <Cell col="8" text="bind:confdate"/>
  65. <Cell col="9" text="bind:conftime"/>
  66. <Cell col="10" text="bind:confdr1"/>
  67. <Cell col="11" text="bind:confdr2"/>
  68. <Cell col="12" text="bind:extend1"/>
  69. <Cell col="13" text="bind:extend2"/>
  70. <Cell col="14" text="bind:opdeptid"/>
  71. <Cell col="15" text="bind:studydtm"/>
  72. </Band>
  73. </Format>
  74. </Formats>
  75. </Grid>
  76. <Static text="PAC.PACSORDH" position="absolute 0 299 152 320" id="caption4" class="tit_2" anchor="default"/>
  77. <Shape position="absolute 0 516 1194 522" linetype="horizontal" id="line3" class="line_1" anchor="left top right"/>
  78. <Button position="absolute 933 293 1064 315" id="button2" class="btn4" text="PACSORDH 리셋" anchor="top right" onclick="group3_button2_onclick"/>
  79. <Button position="absolute 1066 293 1194 315" id="btn_insrpth" class="btn4" text="PACSRPTH 생성" anchor="top right" onclick="group3_btn_insrpth_onclick"/>
  80. <Grid position="absolute 0 320 1194 485" id="grd_pacsordh" binddataset="ds_main_pacsinfo_pacsordh" anchor="left top right" cellsizingtype="col">
  81. <Formats>
  82. <Format id="default">
  83. <Columns>
  84. <Column size="25"/>
  85. <Column size="165"/>
  86. <Column size="25"/>
  87. <Column size="41"/>
  88. <Column size="103"/>
  89. <Column size="69"/>
  90. <Column size="83"/>
  91. <Column size="132"/>
  92. <Column size="102"/>
  93. <Column size="80"/>
  94. <Column size="73"/>
  95. <Column size="76"/>
  96. <Column size="72"/>
  97. <Column size="0"/>
  98. <Column size="354"/>
  99. <Column size="77"/>
  100. <Column size="77"/>
  101. <Column size="78"/>
  102. <Column size="81"/>
  103. <Column size="100"/>
  104. <Column size="68"/>
  105. <Column size="37"/>
  106. <Column size="100"/>
  107. <Column size="341"/>
  108. <Column size="240"/>
  109. </Columns>
  110. <Rows>
  111. <Row size="24" band="head"/>
  112. <Row size="24"/>
  113. </Rows>
  114. <Band id="head">
  115. <Cell/>
  116. <Cell col="1" text="QUEUEID"/>
  117. <Cell col="2"/>
  118. <Cell col="3" text="FLAG"/>
  119. <Cell col="4" text="WORKTIME"/>
  120. <Cell col="5" text="PATID"/>
  121. <Cell col="6" text="EVENTTYPE"/>
  122. <Cell col="7" text="HISORDERID"/>
  123. <Cell col="8" text="ACCESSIONNO"/>
  124. <Cell col="9" text="EXAMDATE"/>
  125. <Cell col="10" text="EXAMTIME"/>
  126. <Cell col="11" text="EXAMROOM"/>
  127. <Cell col="12" text="EXAMCODE"/>
  128. <Cell col="13" text="caption1"/>
  129. <Cell col="14" text="EXAMNAME"/>
  130. <Cell col="15" text="ORDERDOC"/>
  131. <Cell col="16" text="OPDOC"/>
  132. <Cell col="17" text="PATNAME"/>
  133. <Cell col="18" text="PATNAME2"/>
  134. <Cell col="19" text="PATPERSONALID"/>
  135. <Cell col="20" text="PATBIRTHDAY"/>
  136. <Cell col="21" text="PATSEX"/>
  137. <Cell col="22" text="patzip"/>
  138. <Cell col="23" text="address"/>
  139. <Cell col="24" text="STUDY_INSTANCE_UID"/>
  140. </Band>
  141. <Band id="body">
  142. <Cell celltype="head" text="expr:currow+1"/>
  143. <Cell col="1" text="bind:queueid"/>
  144. <Cell col="2" class="update_n" text="bind:stu"/>
  145. <Cell col="3" displaytype="combo" edittype="combo" style="align:center;" text="bind:flag" combodataset="ds_init_flag" combocodecol="cdid" combodatacol="cdnm" combodisplay="edit"/>
  146. <Cell col="4" text="bind:worktime"/>
  147. <Cell col="5" displaytype="text" edittype="text" style="color:#000000ff;color2:#000000ff;" text="bind:patid"/>
  148. <Cell col="6" style="font:bold,9;" text="bind:eventtype"/>
  149. <Cell col="7" displaytype="text" edittype="text" style="color:#ff0000ff;color2:#ff0000ff;" text="bind:hisorderid"/>
  150. <Cell col="8" displaytype="text" edittype="text" style="color:#993366ff;color2:#993366ff;" text="bind:accessionno"/>
  151. <Cell col="9" text="bind:examdate"/>
  152. <Cell col="10" text="bind:examtime"/>
  153. <Cell col="11" text="bind:examroom"/>
  154. <Cell col="12" text="bind:examcode"/>
  155. <Cell col="13" text="bind:status"/>
  156. <Cell col="14" text="bind:examname"/>
  157. <Cell col="15" text="bind:orderdoc"/>
  158. <Cell col="16" text="bind:opdoc"/>
  159. <Cell col="17" displaytype="text" edittype="text" text="bind:patname"/>
  160. <Cell col="18" displaytype="text" edittype="text" text="bind:patname2"/>
  161. <Cell col="19" displaytype="text" edittype="text" text="bind:patpersonalid"/>
  162. <Cell col="20" displaytype="text" edittype="text" text="bind:patbirthday"/>
  163. <Cell col="21" displaytype="text" edittype="text" text="bind:patsex"/>
  164. <Cell col="22" displaytype="text" edittype="text" text="bind:patzip"/>
  165. <Cell col="23" displaytype="text" edittype="text" text="bind:pataddress1"/>
  166. <Cell col="24" text="bind:study_instance_uid"/>
  167. </Band>
  168. </Format>
  169. </Formats>
  170. </Grid>
  171. <Tab position="absolute 0 6 1194 288" id="switch1" anchor="left top right">
  172. <Tabpages>
  173. <Tabpage text="처방이력" id="case1" style="anchor:default;margin:0 0 0 0;">
  174. <Layouts>
  175. <Layout>
  176. <Grid position="absolute 0 0 1194 255" id="grd_prcphist" binddataset="ds_main_prcphist_prcplist" anchor="all" cellsizingtype="col" onlbuttondown="group3_switch1_case1_grd_prcphist_onlbuttondown">
  177. <Formats>
  178. <Format id="default">
  179. <Columns>
  180. <Column size="25"/>
  181. <Column size="70"/>
  182. <Column size="30"/>
  183. <Column size="80"/>
  184. <Column size="251"/>
  185. <Column size="70"/>
  186. <Column size="70"/>
  187. <Column size="80"/>
  188. <Column size="120"/>
  189. <Column size="70"/>
  190. <Column size="70"/>
  191. <Column size="120"/>
  192. <Column size="120"/>
  193. <Column size="297"/>
  194. <Column size="120"/>
  195. </Columns>
  196. <Rows>
  197. <Row size="24" band="head"/>
  198. <Row size="24"/>
  199. </Rows>
  200. <Band id="head">
  201. <Cell/>
  202. <Cell col="1" text="처방일자"/>
  203. <Cell col="2" text="I/O"/>
  204. <Cell col="3" text="처방코드"/>
  205. <Cell col="4" text="처방명"/>
  206. <Cell col="5" text="처방상태"/>
  207. <Cell col="6" text="진료의사"/>
  208. <Cell col="7" text="진료과"/>
  209. <Cell col="8" text="예약일시"/>
  210. <Cell col="9" text="수납일자"/>
  211. <Cell col="10" text="접수일자"/>
  212. <Cell col="11" text="실시일시"/>
  213. <Cell col="12" text="판독일자"/>
  214. <Cell col="13" text="검사실 정보"/>
  215. <Cell col="14" text="hisorderid"/>
  216. </Band>
  217. <Band id="body">
  218. <Cell celltype="head" text="expr:currow+1"/>
  219. <Cell col="1" displaytype="date" text="bind:prcpdd"/>
  220. <Cell col="2" text="bind:prcpgenrflag"/>
  221. <Cell col="3" text="bind:calcscorcd"/>
  222. <Cell col="4" style="align:left;padding:0 0 0 2;" text="bind:excucdnm"/>
  223. <Cell col="5" displaytype="combo" edittype="combo" style="color:#ff0000ff;color2:#ff0000ff;font:bold;" text="bind:execprcpstatcd" combodataset="ds_init_M0011" combocodecol="cdid" combodatacol="cdnm"/>
  224. <Cell col="6" text="bind:usernm"/>
  225. <Cell col="7" text="bind:depthngnm"/>
  226. <Cell col="8" text="bind:rsrvdd" mask="@@@@-@@-@@ @@:@@:@@"/>
  227. <Cell col="9" displaytype="date" text="bind:rcptdd"/>
  228. <Cell col="10" displaytype="date" text="bind:acptdd"/>
  229. <Cell col="11" text="bind:excuexectodt" mask="@@@@-@@-@@ @@:@@:@@"/>
  230. <Cell col="12" text="bind:cnfmdt" mask="@@@@-@@-@@ @@:@@:@@"/>
  231. <Cell col="13" style="align:left;padding:0 0 0 2;" text="bind:acptrem"/>
  232. <Cell col="14" text="bind:hisorderid"/>
  233. </Band>
  234. </Format>
  235. </Formats>
  236. </Grid>
  237. </Layout>
  238. </Layouts>
  239. </Tabpage>
  240. <Tabpage text="취소처방" id="case2" style="anchor:default;margin:0 0 0 0;">
  241. <Layouts>
  242. <Layout>
  243. <Grid position="absolute 0 0 1194 255" id="grd_prcphistcnl" binddataset="ds_main_prcphist_prcpcnllist" anchor="all" cellsizingtype="col" onlbuttondown="group3_switch1_case2_grd_prcphistcnl_onlbuttondown">
  244. <Formats>
  245. <Format id="default">
  246. <Columns>
  247. <Column size="25"/>
  248. <Column size="70"/>
  249. <Column size="30"/>
  250. <Column size="80"/>
  251. <Column size="251"/>
  252. <Column size="70"/>
  253. <Column size="70"/>
  254. <Column size="80"/>
  255. <Column size="120"/>
  256. <Column size="70"/>
  257. <Column size="70"/>
  258. <Column size="120"/>
  259. <Column size="120"/>
  260. <Column size="297"/>
  261. <Column size="120"/>
  262. </Columns>
  263. <Rows>
  264. <Row size="24" band="head"/>
  265. <Row size="24"/>
  266. </Rows>
  267. <Band id="head">
  268. <Cell/>
  269. <Cell col="1" text="처방일자"/>
  270. <Cell col="2" text="I/O"/>
  271. <Cell col="3" text="처방코드"/>
  272. <Cell col="4" text="처방명"/>
  273. <Cell col="5" text="처방상태"/>
  274. <Cell col="6" text="진료의사"/>
  275. <Cell col="7" text="진료과"/>
  276. <Cell col="8" text="예약일시"/>
  277. <Cell col="9" text="수납일자"/>
  278. <Cell col="10" text="접수일자"/>
  279. <Cell col="11" text="실시일시"/>
  280. <Cell col="12" text="판독일자"/>
  281. <Cell col="13" text="검사실 정보"/>
  282. <Cell col="14" text="hisorderid"/>
  283. </Band>
  284. <Band id="body">
  285. <Cell celltype="head" text="expr:currow+1"/>
  286. <Cell col="1" displaytype="date" text="bind:prcpdd"/>
  287. <Cell col="2" text="bind:prcpgenrflag"/>
  288. <Cell col="3" text="bind:prcpcd"/>
  289. <Cell col="4" style="align:left;padding:0 0 0 2;" text="bind:excucdnm"/>
  290. <Cell col="5" text="bind:prcphistcd"/>
  291. <Cell col="6" text="bind:usernm"/>
  292. <Cell col="7" text="bind:depthngnm"/>
  293. <Cell col="8" text="bind:rsrvdd" mask="@@@@-@@-@@ @@:@@:@@"/>
  294. <Cell col="9" displaytype="date" text="bind:rcptdd"/>
  295. <Cell col="10" displaytype="date" text="bind:acptdd"/>
  296. <Cell col="11" text="bind:excuexectodt" mask="@@@@-@@-@@ @@:@@:@@"/>
  297. <Cell col="12" text="bind:cnfmdt" mask="@@@@-@@-@@ @@:@@:@@"/>
  298. <Cell col="13" style="align:left;padding:0 0 0 2;" text="bind:acptrem"/>
  299. <Cell col="14" text="bind:hisorderid"/>
  300. </Band>
  301. </Format>
  302. </Formats>
  303. </Grid>
  304. </Layout>
  305. </Layouts>
  306. </Tabpage>
  307. <Tabpage text="합번" id="case3" style="anchor:default;margin:0 0 0 0;">
  308. <Layouts>
  309. <Layout>
  310. <Static text="신규등록번호 :" position="absolute 70 20 182 37" id="caption7" class="search_name" anchor="default"/>
  311. <Edit position="absolute 190 20 290 39" id="input1" class="input_search" taborder="1" anchor="default"/>
  312. <Static text="과거등록번호 :" position="absolute 70 45 178 62" id="caption8" class="search_name" anchor="default"/>
  313. <Edit position="absolute 190 45 290 64" id="input2" class="input_search" taborder="1" anchor="default"/>
  314. <Button position="absolute 360 20 488 42" id="btn_ok" class="btn4" text="신규번호로 갱신" anchor="default" onclick="group3_switch1_case3_btn_ok_onclick"/>
  315. </Layout>
  316. </Layouts>
  317. </Tabpage>
  318. </Tabpages>
  319. </Tab>
  320. <Edit position="absolute 150 295 355 314" id="ipt_hisorderid" anchor="default" onkeydown="group3_ipt_hisorderid_onkeydown"/>
  321. <Button position="absolute 360 293 416 315" id="btn_hisorderid" class="btn1" taborder="4" text="조회" anchor="default" onclick="group3_btn_hisorderid_onclick"/>
  322. <Button position="absolute 768 293 833 315" id="button1" class="btn2" text="이름변경" anchor="top right" onclick="group3_button1_onclick"/>
  323. <Button position="absolute 1114 4 1194 26" id="btn_excsave" class="btn7" text="엑셀저장" anchor="default" onclick="group3_btn_excsave_onclick"/>
  324. </Layout>
  325. </Layouts>
  326. </Div>
  327. <Div position="absolute 0 742 1195 769" id="grp_btn" anchor="left right bottom">
  328. <Layouts>
  329. <Layout>
  330. <Button position="absolute 0 5 56 27" id="btn_prt" class="btn6" visible="false" text="출력" anchor="default"/>
  331. </Layout>
  332. </Layouts>
  333. </Div>
  334. <Static id="caption6" text="개인별 PACS인터페이스정보 조회" class="tit_1" position="absolute 0 0 240 25"/>
  335. <Div id="grp_sea" taborder="1" class="div_SA" position="absolute 0 25 1194 65" anchor="left top right">
  336. <Layouts>
  337. <Layout>
  338. <Static id="caption1" text="적용일자 :" class="search_name" position="absolute 380 13 466 30" anchor="default"/>
  339. <Static id="caption3" text="등록번호 :" class="search_name" position="absolute 15 13 106 30" anchor="default"/>
  340. <Button id="btn_sea" taborder="4" text="조회" class="btn1" position="absolute 1124 10 1180 32" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
  341. <Edit id="ipt_pid" taborder="5" class="input_search" position="absolute 105 11 205 30" anchor="default" onkeydown="grp_sea_ipt_pid_onkeydown" inputtype="number"/>
  342. <Calendar id="ipt_endrsrvdd" taborder="6" class="input_default" position="absolute 579 11 679 30" anchor="default" onchanged="grp_sea_ipt_endrsrvdd_onchanged"/>
  343. <Button id="button61" taborder="7" class="icon_search" position="absolute 210 13 226 29" anchor="default" onclick="grp_sea_button61_onclick"/>
  344. <Edit id="opt_pathngnm" taborder="8" readonly="true" position="absolute 232 11 332 30" anchor="default"/>
  345. <Calendar id="ipt_startrsrvdd" taborder="9" class="input_default" position="absolute 474 11 574 30" anchor="default" onchanged="grp_sea_ipt_startrsrvdd_onchanged" onlbuttondown="grp_sea_ipt_startrsrvdd_onlbuttondown"/>
  346. <Combo id="cmb_deptcd" taborder="10" innerdataset="@ds_init_cmb_info_suppdeptlist" codecolumn="suppdeptcd" datacolumn="depthngnm" class="combo_default" position="absolute 825 11 980 30" anchor="default"/>
  347. <Static id="caption5" text="지원부서 :" class="search_name" position="absolute 730 13 816 30" anchor="default"/>
  348. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1104 10 1110 32" anchor="top right"/>
  349. </Layout>
  350. </Layouts>
  351. </Div>
  352. </Layout>
  353. </Layouts>
  354. <Objects>
  355. <Dataset id="ds_main_prcphist_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  356. <ColumnInfo>
  357. <Column id="no" type="STRING" size="256"/>
  358. <Column id="prcpdd" type="STRING" size="256"/>
  359. <Column id="prcpgenrflag" type="STRING" size="256"/>
  360. <Column id="calcscorcd" type="STRING" size="256"/>
  361. <Column id="excucdnm" type="STRING" size="256"/>
  362. <Column id="execprcpstatcd" type="STRING" size="256"/>
  363. <Column id="usernm" type="STRING" size="256"/>
  364. <Column id="depthngnm" type="STRING" size="256"/>
  365. <Column id="rsrvdd" type="STRING" size="256"/>
  366. <Column id="rcptdd" type="STRING" size="256"/>
  367. <Column id="acptdd" type="STRING" size="256"/>
  368. <Column id="excuexectodt" type="STRING" size="256"/>
  369. <Column id="cnfmdt" type="STRING" size="256"/>
  370. <Column id="acptrem" type="STRING" size="256"/>
  371. <Column id="hisorderid" type="STRING" size="256"/>
  372. </ColumnInfo>
  373. <Rows>
  374. <Row>
  375. <Col id="no"/>
  376. <Col id="prcpdd"/>
  377. <Col id="prcpgenrflag"/>
  378. <Col id="calcscorcd"/>
  379. <Col id="excucdnm"/>
  380. <Col id="execprcpstatcd"/>
  381. <Col id="usernm"/>
  382. <Col id="depthngnm"/>
  383. <Col id="rsrvdd"/>
  384. <Col id="rcptdd"/>
  385. <Col id="acptdd"/>
  386. <Col id="excuexectodt"/>
  387. <Col id="cnfmdt"/>
  388. <Col id="acptrem"/>
  389. <Col id="hisorderid"/>
  390. </Row>
  391. </Rows>
  392. </Dataset>
  393. <Dataset id="ds_main_prcphist_prcpcnllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  394. <ColumnInfo>
  395. <Column id="no" type="STRING" size="256"/>
  396. <Column id="prcpdd" type="STRING" size="256"/>
  397. <Column id="prcpgenrflag" type="STRING" size="256"/>
  398. <Column id="prcpcd" type="STRING" size="256"/>
  399. <Column id="excucdnm" type="STRING" size="256"/>
  400. <Column id="prcphistcd" type="STRING" size="256"/>
  401. <Column id="usernm" type="STRING" size="256"/>
  402. <Column id="depthngnm" type="STRING" size="256"/>
  403. <Column id="rsrvdd" type="STRING" size="256"/>
  404. <Column id="rcptdd" type="STRING" size="256"/>
  405. <Column id="acptdd" type="STRING" size="256"/>
  406. <Column id="excuexectodt" type="STRING" size="256"/>
  407. <Column id="cnfmdt" type="STRING" size="256"/>
  408. <Column id="acptrem" type="STRING" size="256"/>
  409. <Column id="hisorderid" type="STRING" size="256"/>
  410. </ColumnInfo>
  411. </Dataset>
  412. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  413. <Dataset id="ds_main_pacsinfo_pacsrpth" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  414. <ColumnInfo>
  415. <Column id="queueid" type="STRING" size="256"/>
  416. <Column id="flag" type="STRING" size="256"/>
  417. <Column id="worktime" type="STRING" size="256"/>
  418. <Column id="readstatus" type="STRING" size="256"/>
  419. <Column id="hisorderid" type="STRING" size="256"/>
  420. <Column id="patid" type="STRING" size="256"/>
  421. <Column id="readtext" type="STRING" size="256"/>
  422. <Column id="confdate" type="STRING" size="256"/>
  423. <Column id="conftime" type="STRING" size="256"/>
  424. <Column id="confdr1" type="STRING" size="256"/>
  425. <Column id="confdr2" type="STRING" size="256"/>
  426. <Column id="extend1" type="STRING" size="256"/>
  427. <Column id="extend2" type="STRING" size="256"/>
  428. <Column id="opdeptid" type="STRING" size="256"/>
  429. <Column id="studydtm" type="STRING" size="256"/>
  430. </ColumnInfo>
  431. <Rows>
  432. <Row>
  433. <Col id="queueid"/>
  434. <Col id="flag"/>
  435. <Col id="worktime"/>
  436. <Col id="readstatus"/>
  437. <Col id="hisorderid"/>
  438. <Col id="patid"/>
  439. <Col id="readtext"/>
  440. <Col id="confdate"/>
  441. <Col id="conftime"/>
  442. <Col id="confdr1"/>
  443. <Col id="confdr2"/>
  444. <Col id="extend1"/>
  445. <Col id="extend2"/>
  446. <Col id="opdeptid"/>
  447. <Col id="studydtm"/>
  448. </Row>
  449. </Rows>
  450. </Dataset>
  451. <Dataset id="ds_main_pacsinfo_pacsordh" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_pacsinfo_pacsordh_oncolumnchanged">
  452. <ColumnInfo>
  453. <Column id="queueid" type="STRING" size="256"/>
  454. <Column id="flag" type="STRING" size="256"/>
  455. <Column id="worktime" type="STRING" size="256"/>
  456. <Column id="patid" type="STRING" size="256"/>
  457. <Column id="eventtype" type="STRING" size="256"/>
  458. <Column id="hisorderid" type="STRING" size="256"/>
  459. <Column id="accessionno" type="STRING" size="256"/>
  460. <Column id="examdate" type="STRING" size="256"/>
  461. <Column id="examtime" type="STRING" size="256"/>
  462. <Column id="examroom" type="STRING" size="256"/>
  463. <Column id="examcode" type="STRING" size="256"/>
  464. <Column id="examname" type="STRING" size="256"/>
  465. <Column id="orderdoc" type="STRING" size="256"/>
  466. <Column id="opdoc" type="STRING" size="256"/>
  467. <Column id="patname" type="STRING" size="256"/>
  468. <Column id="patname2" type="STRING" size="256"/>
  469. <Column id="patbirthday" type="STRING" size="256"/>
  470. <Column id="patsex" type="STRING" size="256"/>
  471. <Column id="study_instance_uid" type="STRING" size="256"/>
  472. <Column id="patpersonalid" type="STRING" size="256"/>
  473. <Column id="patzip" type="STRING" size="256"/>
  474. <Column id="pataddress1" type="STRING" size="256"/>
  475. <Column id="status" type="STRING" size="256"/>
  476. <Column id="stu" type="STRING" size="256"/>
  477. </ColumnInfo>
  478. <Rows>
  479. <Row>
  480. <Col id="queueid"/>
  481. <Col id="flag"/>
  482. <Col id="worktime"/>
  483. <Col id="patid"/>
  484. <Col id="eventtype"/>
  485. <Col id="hisorderid"/>
  486. <Col id="accessionno"/>
  487. <Col id="examdate"/>
  488. <Col id="examtime"/>
  489. <Col id="examroom"/>
  490. <Col id="examcode"/>
  491. <Col id="examname"/>
  492. <Col id="orderdoc"/>
  493. <Col id="opdoc"/>
  494. <Col id="patname"/>
  495. <Col id="patname2"/>
  496. <Col id="patbirthday"/>
  497. <Col id="patsex"/>
  498. <Col id="study_instance_uid"/>
  499. <Col id="patpersonalid"/>
  500. <Col id="patzip"/>
  501. <Col id="pataddress1"/>
  502. <Col id="status"/>
  503. <Col id="stu"/>
  504. </Row>
  505. </Rows>
  506. </Dataset>
  507. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  508. <ColumnInfo>
  509. <Column id="pid" type="STRING" size="256"/>
  510. <Column id="prcpfromdd" type="STRING" size="256"/>
  511. <Column id="prcptodd" type="STRING" size="256"/>
  512. <Column id="suppdeptcd" type="STRING" size="256"/>
  513. <Column id="hisorderid" type="STRING" size="256"/>
  514. <Column id="patname" type="STRING" size="256"/>
  515. <Column id="patname2" type="STRING" size="256"/>
  516. <Column id="patsex" type="STRING" size="256"/>
  517. <Column id="patbirthday" type="STRING" size="256"/>
  518. <Column id="patpersonalid" type="STRING" size="256"/>
  519. <Column id="patzip" type="STRING" size="256"/>
  520. <Column id="pataddress1" type="STRING" size="256"/>
  521. <Column id="savedata" type="STRING" size="256"/>
  522. <Column id="oldpid" type="STRING" size="256"/>
  523. </ColumnInfo>
  524. <Rows>
  525. <Row>
  526. <Col id="pid"/>
  527. <Col id="prcpfromdd"/>
  528. <Col id="prcptodd"/>
  529. <Col id="suppdeptcd"/>
  530. <Col id="hisorderid"/>
  531. <Col id="patname"/>
  532. <Col id="patname2"/>
  533. <Col id="patsex"/>
  534. <Col id="patbirthday"/>
  535. <Col id="patpersonalid"/>
  536. <Col id="patzip"/>
  537. <Col id="pataddress1"/>
  538. <Col id="savedata"/>
  539. <Col id="oldpid"/>
  540. </Row>
  541. </Rows>
  542. </Dataset>
  543. <Dataset id="ds_init_cmb_info_suppdeptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  544. <ColumnInfo>
  545. <Column id="suppdept" type="STRING" size="256"/>
  546. </ColumnInfo>
  547. <Rows>
  548. <Row/>
  549. </Rows>
  550. </Dataset>
  551. <Dataset id="ds_init_suppdeptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  552. <ColumnInfo>
  553. <Column id="suppdeptcd" type="STRING" size="256"/>
  554. <Column id="depthngnm" type="STRING" size="256"/>
  555. </ColumnInfo>
  556. <Rows>
  557. <Row>
  558. <Col id="suppdeptcd"/>
  559. <Col id="depthngnm"/>
  560. </Row>
  561. </Rows>
  562. </Dataset>
  563. <Dataset id="ds_hidden_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  564. <ColumnInfo>
  565. <Column id="pathngnm" type="STRING" size="256"/>
  566. </ColumnInfo>
  567. <Rows>
  568. <Row/>
  569. </Rows>
  570. </Dataset>
  571. <Dataset id="ds_init3_baseinfo_emplinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  572. <Dataset id="ds_init_E0002" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  573. <ColumnInfo>
  574. <Column id="cdid" type="STRING" size="256"/>
  575. <Column id="cdnm" type="STRING" size="256"/>
  576. </ColumnInfo>
  577. </Dataset>
  578. <Dataset id="ds_init_M0011" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  579. <ColumnInfo>
  580. <Column id="cdid" type="STRING" size="256"/>
  581. <Column id="cdnm" type="STRING" size="256"/>
  582. </ColumnInfo>
  583. </Dataset>
  584. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  585. <ColumnInfo>
  586. <Column id="count" type="STRING" size="256"/>
  587. </ColumnInfo>
  588. </Dataset>
  589. <Dataset id="ds_init_flag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  590. <ColumnInfo>
  591. <Column id="cdid" type="STRING" size="256"/>
  592. <Column id="cdnm" type="STRING" size="256"/>
  593. </ColumnInfo>
  594. <Rows>
  595. <Row>
  596. <Col id="cdid">N</Col>
  597. <Col id="cdnm">N</Col>
  598. </Row>
  599. <Row>
  600. <Col id="cdid">Y</Col>
  601. <Col id="cdnm">Y</Col>
  602. </Row>
  603. </Rows>
  604. </Dataset>
  605. </Objects>
  606. <Bind>
  607. <BindItem id="item0" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_send" columnid="pid"/>
  608. <BindItem id="item1" compid="grp_sea.opt_pathngnm" propid="value" datasetid="ds_hidden_source" columnid="pathngnm"/>
  609. <BindItem id="item2" compid="grp_sea.ipt_startrsrvdd" propid="value" datasetid="ds_send" columnid="prcpfromdd"/>
  610. <BindItem id="item3" compid="grp_sea.ipt_endrsrvdd" propid="value" datasetid="ds_send" columnid="prcptodd"/>
  611. <BindItem id="item4" compid="grp_sea.cmb_deptcd" propid="value" datasetid="ds_send" columnid="suppdeptcd"/>
  612. <BindItem id="item5" compid="group3.switch1.case3.input1" propid="value" datasetid="ds_send" columnid="pid"/>
  613. <BindItem id="item6" compid="group3.switch1.case3.input2" propid="value" datasetid="ds_send" columnid="oldpid"/>
  614. <BindItem id="item7" compid="group3.ipt_hisorderid" propid="value" datasetid="ds_send" columnid="hisorderid"/>
  615. </Bind>
  616. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  617. * System Name :
  618. * Job Name :
  619. * Creator :
  620. * Make Date : 2015-11-13
  621. * Description :
  622. *---------------------------------------------------------------------------------------
  623. * Modify Date Modifier Modify Description
  624. *---------------------------------------------------------------------------------------
  625. * 2015-11-13 Live Converter TF->XP
  626. *
  627. *---------------------------------------------------------------------------------------
  628. ****************************************************************************************/
  629. //=======================================================================================
  630. // Lib Include
  631. //---------------------------------------------------------------------------------------
  632. include "com_commonxp::comm_main.xjs"
  633. include "ast_examcurexp::AEZ0001.xjs"
  634. include "ast_examcurexp::combolist.xjs"
  635. //=======================================================================================
  636. // Global Form Variable
  637. //---------------------------------------------------------------------------------------
  638. var arErrorCode = new HashArray();
  639. var gSuppdeptcd = "";
  640. //=======================================================================================
  641. // Function
  642. //---------------------------------------------------------------------------------------
  643. /****************************************************************************************
  644. * Argument : N/A
  645. * Description : 데이터셋 특정컬럼 카피하여 새컬럼 생성
  646. ****************************************************************************************/
  647. function fMakeCopyColumn(objDs,sColSrc,sColTgt) {
  648. if(utlf_isNull(objDs.getColumnInfo(sColTgt))) objDs.addColumn(sColTgt,"string");
  649. for(var i = 0 ; i < objDs.rowcount ; i++) {
  650. objDs.setColumn(i,sColTgt,objDs.getColumn(i,sColSrc));
  651. }
  652. }
  653. /****************************************************************************************
  654. * Argument : N/A
  655. * Description : PACS정보 조회
  656. ****************************************************************************************/
  657. function call_TRAEA07101() {
  658. var oParam = {};
  659. oParam.id = "TRAEA07101";
  660. oParam.service = "examcureacptexecapp.ExamCurePrcs";
  661. oParam.method = "reqGetPidPACSInfolist";
  662. oParam.inds = "req=ds_send";
  663. oParam.outds = "ds_main_pacsinfo_pacsrpth=pacsrpth ds_main_pacsinfo_pacsordh=pacsordh";
  664. oParam.async = false;
  665. oParam.callback = "cf_TRAEA07101";
  666. tranf_submit(oParam);
  667. }
  668. function cf_TRAEA07101(sSvcId, nErrorCode, sErrorMsg) {
  669. if(nErrorCode < 0) return;
  670. // fMakeCopyColumn(ds_main_pacsinfo_pacsordh,"examtime","examroom");
  671. }
  672. //=======================================================================================
  673. // Event
  674. //---------------------------------------------------------------------------------------
  675. /****************************************************************************************
  676. * Components : Form
  677. * Components ID : SMAEA07100
  678. * Event : oninit
  679. * Argument : 01.obj : Object Event has occurred
  680. * : 02.e : Event Object
  681. * Description : 화면 처음 초기화시 폼초기화
  682. ****************************************************************************************/
  683. function SMAEA07100_oninit(obj:Form, e:InitEventInfo)
  684. {
  685. frmf_initForm(obj); // 폼 초기화
  686. }
  687. /****************************************************************************************
  688. * Components : Form
  689. * Components ID : SMAEA07100
  690. * Event : onload
  691. * Argument : 01.obj : Object Event has occurred
  692. * : 02.e : Event Object
  693. * Description : 화면 처음 초기화시 폼초기화
  694. ****************************************************************************************/
  695. function SMAEA07100_onload(obj:Form, e:LoadEventInfo)
  696. {
  697. grdf_setGridSort(group3.switch1.case1.grd_prcphist); // 그리드 소트만
  698. grdf_setGridSort(group3.switch1.case2.grd_prcphistcnl); // 그리드 소트만
  699. grdf_setGridSort(group3.grd_pacsordh); // 그리드 소트만
  700. grdf_setGridSort(group3.grd_pacsrpth); // 그리드 소트만
  701. grdf_setRowTypeIcon(group3.grd_pacsordh, 2); // 그리드 상태 표시
  702. // 2010.12.15 c y w 조회조건으로 지원부서 추가
  703. ds_send.setColumn(0,"hisorderid","");
  704. var suppdeptcd = "";
  705. suppdeptcd = frmf_getMenuParam();
  706. if (utlf_isNull(suppdeptcd) || suppdeptcd == "null"){
  707. lf_aezfSetSuppDeptcd(); //AEZ0001.xjs
  708. gSuppdeptcd = frmf_getParameter("AST_DEPTCD");
  709. }else{
  710. gSuppdeptcd = suppdeptcd;
  711. }
  712. // var instance = model.getValue("/root/send/globalinstance/instance1");
  713. //지원부서 조회
  714. dsf_createDsRow("ds_req", [
  715. {col:"basesuppdeptcd", type:"STRING", size:256, val:gSuppdeptcd}
  716. , {col:"deptflag", type:"STRING", size:256, val:ds_send.getColumn(0,"deptflag")} // 20160225 주사실용 지원부서
  717. ]);
  718. var oParam = {};
  719. oParam.id = "TRAEA00904";
  720. oParam.service = "examcurersrvapp.RsrvRef";
  721. oParam.method = "reqGetSuppDeptCdList";
  722. oParam.inds = "req=ds_req";
  723. oParam.outds = "ds_init_cmb_info_suppdeptlist=item";
  724. oParam.async = false;
  725. //oParam.callback = "cf_TRAEA00904";
  726. tranf_submit(oParam);
  727. //지원부서코드에 해당되지않으면 기본 핵의학과로 보여줌(공통으로뺄것임) - 박재영
  728. if( ds_init_cmb_info_suppdeptlist.findRow("suppdeptcd",gSuppdeptcd) < 0 ){
  729. ds_send.setColumn(0,"suppdeptcd" , "2180000000");
  730. gSuppdeptcd = ds_send.getColumn(0,"suppdeptcd");
  731. }else{
  732. ds_send.setColumn(0,"suppdeptcd" , gSuppdeptcd);
  733. }
  734. //권한자 가져오기
  735. // astGetComboList( new Array("E0002"), new Array("/root/init3/baseinfo/emplinfo") );
  736. // zbcfGetCodeList( new Array("M0011"), new Array("/root/init/baseinfo/initexecprcpstatcd") );
  737. // submit("TRZBC00101", false);
  738. var arrParam1 = [{dsNm: "ds_init_E0002", cdGrpId: "E0002"}
  739. ]
  740. lf_getAstCodeList(arrParam1);
  741. var arrParam2 = [{dsNm: "ds_init_M0011", cdGrpId: "M0011"}
  742. ]
  743. appf_getCodeList(arrParam2);
  744. grp_sea.ipt_startrsrvdd.value = utlf_getCurrentDate().toDate().getAddDate(-90,"D").getDateFormat("YYYYMMDD");
  745. grp_sea.ipt_endrsrvdd.value = utlf_getCurrentDate();
  746. ds_main_prcphist_prcplist.clearData();
  747. ds_main_pacsinfo_pacsordh.clearData();
  748. ds_main_pacsinfo_pacsrpth.clearData();
  749. grp_sea.ipt_pid.setFocus();
  750. if (!utlf_isNull(ds_send.getColumn(0,"pid"))){
  751. frmf_inputEnterKey("grp_sea.btn_sea", "onclick", new ClickEventInfo);
  752. }else{
  753. // 이부분이 멀까나 ㅠㅠㅠㅠ
  754. var paminfo = sysf_getGlobalVariable("paminfo"); //프로그램에 따라 원무정보(paminfo), 환자기본정보(patflag) get
  755. var gv_pid = sysf_getGlobalVariable("gv_pid", "A"); //글로벌변수로 넘겨준 등록번호값
  756. if(!utlf_isNull(paminfo)) { //원무 정보(기본 정보)가 있는 경우
  757. dsf_setCSVToDs("ds_paminfo", paminfo);
  758. //상단 정보를 이용하여 프로그램 수행
  759. var pid = ds_paminfo.getColumn(0,"pid");
  760. ds_send.setColumn(0,"pid", pid);
  761. frmf_inputEnterKey("grp_sea.btn_sea", "onclick", new ClickEventInfo);
  762. }
  763. if(!utlf_isNull(gv_pid)) { //글로벌변수(등록번호)가 있는경우
  764. ds_send.setColumn(0,"pid", gv_pid);
  765. frmf_inputEnterKey("grp_sea.btn_sea", "onclick", new ClickEventInfo);
  766. }
  767. }
  768. }
  769. /****************************************************************************************
  770. * Components : Edit
  771. * Components ID : grp_sea.ipt_pid
  772. * Event : onkeydown
  773. * Argument : 01.obj : Object Event has occurred
  774. * : 02.e : Event Object
  775. * Description : 등록번호 입력 후 검색
  776. ****************************************************************************************/
  777. function grp_sea_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  778. {
  779. if(e.keycode == 13) {
  780. obj.updateToDataset();
  781. var pid = obj.value;
  782. if(utlf_isNull(pid)){
  783. sysf_messageBox("환자를 지정하지", "E007")
  784. return ;
  785. }
  786. //환자정보 조회
  787. var oParam = {};
  788. oParam.id = "TRAEA00204";
  789. oParam.service = "examcurersrvapp.RsrvRef";
  790. oParam.method = "reqGetPatInfo";
  791. oParam.inds = "req=ds_send";
  792. oParam.outds = "ds_patinfolist=patinfolist";
  793. oParam.async = false;
  794. oParam.callback = "cf_TRAEA00204";
  795. tranf_submit(oParam);
  796. if(arErrorCode.pop("TRAEA00204") > -1) {
  797. ds_hidden_source.setColumn(0,"pathngnm", ds_patinfolist.getColumn(0,"hngnm"));
  798. }
  799. group3.switch1.tabindex = 0;
  800. frmf_inputEnterKey("grp_sea.btn_sea", "onclick", new ClickEventInfo);
  801. }
  802. }
  803. function cf_TRAEA00204(sSvcId, nErrorCode, sErrorMsg) {
  804. arErrorCode.push(sSvcId, nErrorCode);
  805. }
  806. /****************************************************************************************
  807. * Components : Button
  808. * Components ID : grp_sea.button61
  809. * Event : onclick
  810. * Argument : 01.obj : Object Event has occurred
  811. * : 02.e : Event Object
  812. * Description : 환자조회 팝업 오픈
  813. ****************************************************************************************/
  814. function grp_sea_button61_onclick(obj:Button, e:ClickEventInfo)
  815. {
  816. var objArg = new Object();
  817. objArg.arg_ds_send = ds_send;
  818. frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", 1, 200, 200, "", "", "", "", "", "M");
  819. ds_send.setColumn(0,"pid", ds_patinfolist.getColumn(0,"pid"));
  820. ds_hidden_source.setColumn(0,"pathngnm", ds_patinfolist.getColumn(0,"hngnm") );
  821. }
  822. /****************************************************************************************
  823. * Components : Calendar
  824. * Components ID : grp_sea.ipt_startrsrvdd
  825. * Event : onchanged
  826. * Argument : 01.obj : Object Event has occurred
  827. * : 02.e : Event Object
  828. * Description : 일자변경시 조회실행
  829. ****************************************************************************************/
  830. function grp_sea_ipt_startrsrvdd_onchanged(obj:Calendar, e:ChangeEventInfo)
  831. {
  832. // var _str = ipt_pid.currentText;
  833. //
  834. // if ( _str.isNumber() == false ) {
  835. // messageBox("등록번호는 숫자만 입력이 가능합니다.", "I999");
  836. // ipt_pid.value = "";
  837. // }
  838. // 애초에 숫자만 입력되도록 바꾸자
  839. frmf_inputEnterKey("grp_sea.btn_sea", "onclick", new ClickEventInfo);
  840. }
  841. function grp_sea_ipt_startrsrvdd_onlbuttondown(obj:Calendar, e:MouseEventInfo)
  842. {
  843. //grp_sea.opt_pathngnm.value = "";
  844. //왜???? 왜 이름만 클리어하나??? 이해안됨 삭제
  845. }
  846. /****************************************************************************************
  847. * Components : Calendar
  848. * Components ID : grp_sea.ipt_endrsrvdd
  849. * Event : onchanged
  850. * Argument : 01.obj : Object Event has occurred
  851. * : 02.e : Event Object
  852. * Description : 일자변경시 조회실행
  853. ****************************************************************************************/
  854. function grp_sea_ipt_endrsrvdd_onchanged(obj:Calendar, e:ChangeEventInfo)
  855. {
  856. frmf_inputEnterKey("grp_sea.btn_sea", "onclick", new ClickEventInfo);
  857. }
  858. /****************************************************************************************
  859. * Components : Button
  860. * Components ID : grp_sea.btn_sea
  861. * Event : onclick
  862. * Argument : 01.obj : Object Event has occurred
  863. * : 02.e : Event Object
  864. * Description : 조회
  865. ****************************************************************************************/
  866. function grp_sea_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  867. {
  868. ds_send.setColumn(0,"hisorderid"," "); //??? 왜 공백을 넣는걸까?? 심지어 사용도 안한다..
  869. group3.switch1.tabindex = 0;
  870. var _pid = ds_send.getColumn(0,"pid");
  871. var _frdt = ds_send.getColumn(0,"prcpfromdd");
  872. var _todt = ds_send.getColumn(0,"prcptodd");
  873. if ( utlf_isNull(_pid) ) {
  874. sysf_messageBox("필수입력사항인 등록번호를 입력해 주십시오.", "I999");
  875. grp_sea.ipt_pid.setFocus();
  876. } else if ( utlf_isNull(_frdt) && !utlf_isNull(_todt) ) {
  877. sysf_messageBox("검색하실 날짜 범위의 시작일자를 입력해 주십시오." , "I999");
  878. grp_sea.ipt_startrsrvdd.setFocus();
  879. } else if ( !utlf_isNull(_frdt) && utlf_isNull(_todt) ) {
  880. sysf_messageBox("검색하실 날짜 범위의 마지막 일자를 입력해 주십시오." , "I999");
  881. grp_sea.ipt_endrsrvdd.setFocus();
  882. } else if ( utlf_getDateInterval(_frdt, _todt) < 0 ) {
  883. sysf_messageBox("입력하신 날짜 범위로는 검색할 수 없습니다. 입력하신 날짜를 확인해 주십시오." , "I999");
  884. grp_sea.ipt_startrsrvdd.setFocus();
  885. } else {
  886. var oParam = {};
  887. oParam.id = "TRAEA07102";
  888. oParam.service = "examcureacptexecapp.ExamCurePrcs";
  889. oParam.method = "reqGetPidPrcpHistList";
  890. oParam.inds = "req=ds_send";
  891. oParam.outds = "ds_main_prcphist_prcplist=prcplist ds_main_prcphist_prcpcnllist=prcpcnllist";
  892. oParam.async = false;
  893. //oParam.callback = "cf_TRAEA07102";
  894. tranf_submit(oParam);
  895. if ( ds_main_prcphist_prcplist.rowcount < 1) {
  896. sysf_messageBox("입력하신 등록번호/일자에 해당하는 환자의 처방이력이 DB에 존재하지 않습니다.", "I999");
  897. }
  898. ds_send.setColumn(0,"hisorderid",""); // 정체가 뭘까...
  899. }
  900. }
  901. /****************************************************************************************
  902. * Components : Button
  903. * Components ID : group3.btn_excsave
  904. * Event : onclick
  905. * Argument : 01.obj : Object Event has occurred
  906. * : 02.e : Event Object
  907. * Description : 엑셀저장
  908. ****************************************************************************************/
  909. function group3_btn_excsave_onclick(obj:Button, e:ClickEventInfo)
  910. {
  911. if( ds_main_prcphist_prcplist.rowcount > 0 ){
  912. grdf_exportExcel(group3.switch1.case1.grd_prcphist, "개인별처방이력", "개인별처방이력", false, "", "user", false);
  913. } else {
  914. sysf_messageBox("조회된 데이터가 ", "I004");
  915. }
  916. }
  917. /****************************************************************************************
  918. * Components : Grid
  919. * Components ID : group3.switch1.case1.grd_prcphist
  920. * Event : onlbuttondown
  921. * Argument : 01.obj : Object Event has occurred
  922. * : 02.e : Event Object
  923. * Description : 처방이력 선택하여 PACS정보 조회
  924. ****************************************************************************************/
  925. function group3_switch1_case1_grd_prcphist_onlbuttondown(obj:Grid, e:GridMouseEventInfo)
  926. {
  927. var hisorderid = ds_main_prcphist_prcplist.getColumn(e.row,"hisorderid");
  928. ds_send.setColumn(0,"hisorderid",hisorderid);
  929. //pac.pacsordh, pac.pacsrpth 조회
  930. call_TRAEA07101();
  931. }
  932. /****************************************************************************************
  933. * Components : Grid
  934. * Components ID : group3.switch1.case2.grd_prcphistcnl
  935. * Event : onlbuttondown
  936. * Argument : 01.obj : Object Event has occurred
  937. * : 02.e : Event Object
  938. * Description : 취소처방 선택하여 PACS정보 조회
  939. ****************************************************************************************/
  940. function group3_switch1_case2_grd_prcphistcnl_onlbuttondown(obj:Grid, e:GridMouseEventInfo)
  941. {
  942. var hisorderid = ds_main_prcphist_prcpcnllist.getColumn(e.row,"hisorderid");
  943. ds_send.setColumn(0,"hisorderid",hisorderid);
  944. call_TRAEA07101();
  945. }
  946. /****************************************************************************************
  947. * Components : Button
  948. * Components ID : group3.switch1.case3.btn_ok
  949. * Event : onclick
  950. * Argument : 01.obj : Object Event has occurred
  951. * : 02.e : Event Object
  952. * Description : 신규번호로 갱신
  953. ****************************************************************************************/
  954. function group3_switch1_case3_btn_ok_onclick(obj:Button, e:ClickEventInfo)
  955. {
  956. var oParam = {};
  957. oParam.id = "TXAEA07103";
  958. oParam.service = "examcureacptexecapp.ExamCurePrcs";
  959. oParam.method = "reqExePacsMWL";
  960. oParam.inds = "req=ds_send";
  961. oParam.outds = "ds_hidden=item";
  962. oParam.async = false;
  963. //oParam.callback = "cf_TXAEA07103";
  964. tranf_submit(oParam);
  965. }
  966. /****************************************************************************************
  967. * Components : Edit
  968. * Components ID : group3.ipt_hisorderid
  969. * Event : onkeydown
  970. * Argument : 01.obj : Object Event has occurred
  971. * : 02.e : Event Object
  972. * Description : PACS정보로 조회
  973. ****************************************************************************************/
  974. function group3_ipt_hisorderid_onkeydown(obj:Edit, e:KeyEventInfo)
  975. {
  976. if(e.keycode == 13) {
  977. obj.updateToDataset();
  978. frmf_inputEnterKey("group3.btn_hisorderid", "onclick", new ClickEventInfo);
  979. }
  980. }
  981. /****************************************************************************************
  982. * Components : Button
  983. * Components ID : group3.btn_hisorderid
  984. * Event : onclick
  985. * Argument : 01.obj : Object Event has occurred
  986. * : 02.e : Event Object
  987. * Description : PACS정보로 조회
  988. ****************************************************************************************/
  989. function group3_btn_hisorderid_onclick(obj:Button, e:ClickEventInfo)
  990. {
  991. call_TRAEA07101();
  992. }
  993. /****************************************************************************************
  994. * Components : Button
  995. * Components ID : group3.btn_hisorderid
  996. * Event : onclick
  997. * Argument : 01.obj : Object Event has occurred
  998. * : 02.e : Event Object
  999. * Description : PACS정보로 조회
  1000. ****************************************************************************************/
  1001. function group3_button1_onclick(obj:Button, e:ClickEventInfo)
  1002. {
  1003. if ( ds_main_pacsinfo_pacsordh.rowcount < 1 ) {
  1004. return "0";
  1005. }
  1006. var pname = ds_hidden_source.getColumn(0,"pathngnm");
  1007. if ( utlf_isNull(pname) ) {
  1008. sysf_messageBox("환자 이름이 없습니다. 확인바랍니다.", "E999", "");
  1009. return "0";
  1010. }
  1011. for ( var i = 0 ; i < ds_main_pacsinfo_pacsordh.rowcount ; i++ ) {
  1012. ds_main_pacsinfo_pacsordh.setColumn(i,"patname" ,pname);
  1013. ds_main_pacsinfo_pacsordh.setColumn(i,"patname2",pname);
  1014. ds_main_pacsinfo_pacsordh.setColumn(i,"status" ,"u");
  1015. // grd_pacsordh.cellStyle("background-image", + i, grd_pacsordh.colRef("stu")) = "../../../com/commonweb/images/icon_u.gif";
  1016. dsf_makeValue(ds_main_pacsinfo_pacsordh,"stu","string","u");
  1017. }
  1018. }
  1019. /****************************************************************************************
  1020. * Components : Button
  1021. * Components ID : group3.button2
  1022. * Event : onclick
  1023. * Argument : 01.obj : Object Event has occurred
  1024. * : 02.e : Event Object
  1025. * Description : PACSORDH 리셋
  1026. ****************************************************************************************/
  1027. function group3_button2_onclick(obj:Button, e:ClickEventInfo)
  1028. {
  1029. if ( ds_main_pacsinfo_pacsrpth.rowcount > 0 ) {
  1030. sysf_messageBox("판독결과가 있어 재생성은 불가합니다.","I999");
  1031. return
  1032. }
  1033. dsf_createDs("ds_send_savedata_ordhinfo");
  1034. var dsUpdate = grdf_getGridUpdateData(group3.grd_pacsordh, "u");
  1035. // grdf_setStatusColumn(dsUpdate, "m");
  1036. ds_send_savedata_ordhinfo.copyData(dsUpdate,true);
  1037. ds_send_savedata_ordhinfo.updateColID("patid","pid");
  1038. var oParam = {};
  1039. oParam.id = "TXAEA07101";
  1040. oParam.service = "examcureacptexecapp.ExamCurePrcs";
  1041. oParam.method = "reqExePacsOrdh";
  1042. oParam.inds = "ordhinfo=ds_send_savedata_ordhinfo";
  1043. oParam.outds = "ds_hidden=item";
  1044. oParam.async = false;
  1045. //oParam.callback = "cf_TXAEA07101";
  1046. tranf_submit(oParam);
  1047. }
  1048. /****************************************************************************************
  1049. * Components : Button
  1050. * Components ID : group3.btn_insrpth
  1051. * Event : onclick
  1052. * Argument : 01.obj : Object Event has occurred
  1053. * : 02.e : Event Object
  1054. * Description : PACSRPTH 생성
  1055. ****************************************************************************************/
  1056. function group3_btn_insrpth_onclick(obj:Button, e:ClickEventInfo)
  1057. {
  1058. var auth_id = sysf_getUserInfo("userid");
  1059. var dev_id = auth_id.substr(0,3);
  1060. // 2011.06.21 권한 공통코드(E0002)로 관리
  1061. var idx_cncl = 0;
  1062. var cnclidCnt = ds_init_E0002.rowcount;
  1063. for( var i = 0 ; i < cnclidCnt ; i++){
  1064. if( ds_init_E0002.getColumn(i,"cdid") == auth_id ){
  1065. idx_cncl++;
  1066. }
  1067. }
  1068. if ( idx_cncl != 0 || dev_id == "DEV" || dev_id == "AST") {
  1069. }else {
  1070. sysf_messageBox("저장/수정/삭제권한은 전산 관리자에게만 부여합니다.","I999");
  1071. return;
  1072. }
  1073. if ( ds_main_pacsinfo_pacsrpth.rowcount < 2 ) {
  1074. var oParam = {};
  1075. oParam.id = "TXAEA07102";
  1076. oParam.service = "examcureacptexecapp.ExamCurePrcs";
  1077. oParam.method = "reqExePacsRpth";
  1078. oParam.inds = "req=ds_send";
  1079. oParam.outds = "ds_hidden=item";
  1080. oParam.async = false;
  1081. //oParam.callback = "cf_TXAEA07102";
  1082. tranf_submit(oParam);
  1083. }
  1084. }
  1085. /****************************************************************************************
  1086. * Components : Dataset
  1087. * Components ID : ds_main_pacsinfo_pacsordh
  1088. * Event : oncolumnchanged
  1089. * Argument : 01.obj : Object Event has occurred
  1090. * : 02.e : Event Object
  1091. * Description : PACS 정보 업데이트
  1092. ****************************************************************************************/
  1093. function ds_main_pacsinfo_pacsordh_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1094. {
  1095. if ( e.row > -1 ) {
  1096. ds_send.setColumn(0,"hisorderid" , obj.getColumn(e.row,"hisorderid"));
  1097. ds_send.setColumn(0,"pid" , obj.getColumn(e.row,"patid"));
  1098. ds_send.setColumn(0,"patname" , obj.getColumn(e.row,"patname"));
  1099. ds_send.setColumn(0,"patname2" , obj.getColumn(e.row,"patname2"));
  1100. ds_send.setColumn(0,"patsex" , obj.getColumn(e.row,"patsex"));
  1101. ds_send.setColumn(0,"patbirthday" , obj.getColumn(e.row,"patbirthday"));
  1102. ds_send.setColumn(0,"patpersonalid" , obj.getColumn(e.row,"patpersonalid"));
  1103. ds_send.setColumn(0,"patzip" , obj.getColumn(e.row,"patzip"));
  1104. ds_send.setColumn(0,"pataddress1" , obj.getColumn(e.row,"pataddress1"));
  1105. }
  1106. }
  1107. ]]></Script>
  1108. </Form>
  1109. </FDL>