SPLPJ02700_SLIDE등록.xfdl 52 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMLPP00500" position="absolute 0 0 1196 767" titletext="슬라이드 대출관리" onload="SMLPP00500_onload" oninit="SMLPP00500_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption1" text="슬라이드 사본발행" class="tit_1" position="absolute 0 0 144 25"/>
  8. <Div id="group2" taborder="4" position="absolute 1 99 449 158" class="div_SA2">
  9. <Layouts>
  10. <Layout>
  11. <Static id="caption9" text="사본발행&#13;&#10;신청인" class="cell_1" position="absolute 5 6 69 53" anchor="default"/>
  12. <Radio id="rdo_appmanflag" taborder="15" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="rdo_appmanflag_onitemchanged" position="absolute 70 7 320 52" style="font:Dotum,8;" anchor="default">
  13. <Dataset id="innerdataset">
  14. <ColumnInfo>
  15. <Column id="codecolumn" size="256"/>
  16. <Column id="datacolumn" size="256"/>
  17. </ColumnInfo>
  18. <Rows>
  19. <Row>
  20. <Col id="codecolumn">1</Col>
  21. <Col id="datacolumn">환자본인</Col>
  22. </Row>
  23. <Row>
  24. <Col id="codecolumn">2</Col>
  25. <Col id="datacolumn">직계가족</Col>
  26. </Row>
  27. <Row>
  28. <Col id="codecolumn">3</Col>
  29. <Col id="datacolumn">보험회사직원</Col>
  30. </Row>
  31. <Row>
  32. <Col id="codecolumn">4</Col>
  33. <Col id="datacolumn">대리인</Col>
  34. </Row>
  35. <Row>
  36. <Col id="codecolumn">9</Col>
  37. <Col id="datacolumn">기타</Col>
  38. </Row>
  39. </Rows>
  40. </Dataset>
  41. </Radio>
  42. <Static id="caption4" text="위임장/&#13;&#10; 동의서" class="cell_1" position="absolute 329 5 390 52" anchor="default"/>
  43. <Radio id="rdo_trustyn" taborder="16" columncount="1" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 393 5 429 52" anchor="default">
  44. <Dataset id="innerdataset">
  45. <ColumnInfo>
  46. <Column id="codecolumn"/>
  47. <Column id="datacolumn"/>
  48. </ColumnInfo>
  49. <Rows>
  50. <Row>
  51. <Col id="codecolumn">Y</Col>
  52. <Col id="datacolumn">유</Col>
  53. </Row>
  54. <Row>
  55. <Col id="codecolumn">N</Col>
  56. <Col id="datacolumn">무</Col>
  57. </Row>
  58. </Rows>
  59. </Dataset>
  60. </Radio>
  61. <Edit id="ipt_appmannm" taborder="17" enable="false" position="absolute 199 30 322 49" anchor="default"/>
  62. </Layout>
  63. </Layouts>
  64. </Div>
  65. <Shape id="line2" linetype="horizontal" class="line_1" position="absolute 452 92 1193 98" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  66. <Grid id="grd_testrsltlist" class="datagrid2" taborder="5" binddataset="ds_grd_testrsltlist" useinputpanel="false" position="absolute 0 441 448 561" oncellclick="grd_testrsltlist_oncellclick" autofittype="none" cellsizingtype="col" anchor="left top bottom">
  67. <Formats>
  68. <Format id="default">
  69. <Columns>
  70. <Column size="0"/>
  71. <Column size="0"/>
  72. <Column size="26"/>
  73. <Column size="80"/>
  74. <Column size="70"/>
  75. <Column size="0"/>
  76. <Column size="0"/>
  77. <Column size="120"/>
  78. <Column size="0"/>
  79. <Column size="60"/>
  80. <Column size="0"/>
  81. <Column size="0"/>
  82. <Column size="0"/>
  83. <Column size="0"/>
  84. <Column size="0"/>
  85. <Column size="0"/>
  86. <Column size="0"/>
  87. <Column size="0"/>
  88. <Column size="0"/>
  89. <Column size="70"/>
  90. <Column size="0"/>
  91. <Column size="0"/>
  92. <Column size="200"/>
  93. </Columns>
  94. <Rows>
  95. <Row size="24" band="head"/>
  96. <Row size="24"/>
  97. </Rows>
  98. <Band id="head">
  99. <Cell text="기관코드"/>
  100. <Cell col="1" text="ptno"/>
  101. <Cell col="2"/>
  102. <Cell col="3" text="병리번호"/>
  103. <Cell col="4" text="처방일자"/>
  104. <Cell col="5" text="접수일자"/>
  105. <Cell col="6" text="검사코드"/>
  106. <Cell col="7" text="처방명"/>
  107. <Cell col="8" text="검사그룹코드"/>
  108. <Cell col="9" text="상태"/>
  109. <Cell col="10" text="pid"/>
  110. <Cell col="11" text="환자명"/>
  111. <Cell col="12" text="의뢰서&#10;번호"/>
  112. <Cell col="13" text="의뢰지구분코드"/>
  113. <Cell col="14" text="성별/나이"/>
  114. <Cell col="15" text="판독일자"/>
  115. <Cell col="16" text="진료과"/>
  116. <Cell col="17" text="진료의사"/>
  117. <Cell col="18" text="판독의사"/>
  118. <Cell col="19" text="육안검사의"/>
  119. <Cell col="20" text="처방발생구분"/>
  120. <Cell col="21" text="작업구분코드"/>
  121. <Cell col="22" text="진 단"/>
  122. </Band>
  123. <Band id="body">
  124. <Cell text="bind:instcd"/>
  125. <Cell col="1" text="bind:ptno"/>
  126. <Cell col="2" celltype="head" text="expr:currow + 1"/>
  127. <Cell col="3" edittype="text" text="bind:dispptno"/>
  128. <Cell col="4" displaytype="date" edittype="date" text="bind:prcpdd" mask="yyyy-MM-dd"/>
  129. <Cell col="5" text="bind:acptdd" mask="yyyy-mm-dd"/>
  130. <Cell col="6" text="bind:testcd"/>
  131. <Cell col="7" displaytype="normal" edittype="none" style="align:left middle;" text="bind:testnm"/>
  132. <Cell col="8" displaytype="none" edittype="none" text="bind:tgrupcd"/>
  133. <Cell col="9" displaytype="normal" edittype="none" text="bind:acptstatcd"/>
  134. <Cell col="10" text="bind:pid"/>
  135. <Cell col="11" text="bind:patnm"/>
  136. <Cell col="12" displaytype="none" edittype="none" text="bind:reqfrmno"/>
  137. <Cell col="13" text="bind:reqfrmflagcd"/>
  138. <Cell col="14" text="bind:sexage"/>
  139. <Cell col="15" text="bind:readdd" mask="yyyy-mm-dd"/>
  140. <Cell col="16" text="bind:orddeptnm"/>
  141. <Cell col="17" text="bind:orddrnm"/>
  142. <Cell col="18" text="bind:readdrnm"/>
  143. <Cell col="19" text="bind:grosdrnm"/>
  144. <Cell col="20" text="bind:prcpgenrflag"/>
  145. <Cell col="21" text="bind:ptnoworkflagcd"/>
  146. <Cell col="22" style="align:left middle;" text="bind:diagcnts"/>
  147. </Band>
  148. </Format>
  149. </Formats>
  150. </Grid>
  151. <Static id="caption2" text="검사결과 목록" class="tit_2" position="absolute 1 418 109 435"/>
  152. <Shape id="line3" linetype="horizontal" class="line_1" position="absolute 0 437 448 443" style="strokepen:3 solid #33bbbbff;"/>
  153. <Div id="grp_sea" anchor="left top right" taborder="12" class="div_SA" position="absolute 0 34 1194 70">
  154. <Layouts>
  155. <Layout>
  156. <Static id="caption2" text="등록번호 :" class="search_name" position="absolute 6 10 84 27"/>
  157. <Edit id="pidno" taborder="23" position="absolute 89 8 201 27" onkeyup="grp_sea_pidno_onkeyup" autoselect="true"/>
  158. <Button id="btn_sytsrsltref" taborder="24" text="통합결과조회" onclick="btn_sytsrsltref_onclick" class="btn3" position="absolute 1024 8 1124 30" anchor="top right"/>
  159. <Button id="btn_prt" taborder="25" text="출력" onclick="btn_prt_onclick" class="btn6" position="absolute 1131 8 1187 30" anchor="top right"/>
  160. <Static id="caption3" text="환 자 명 :" class="search_name" position="absolute 224 10 350 27"/>
  161. <Edit id="output5" taborder="26" readonly="true" position="absolute 308 8 422 27"/>
  162. <Static id="caption4" text="성별/나이 :" class="search_name" position="absolute 458 10 544 27"/>
  163. <Edit id="output00" taborder="27" readonly="true" position="absolute 577 8 667 27"/>
  164. <Button id="btn_hngnm" taborder="28" class="icon_search" position="absolute 427 10 443 26" onclick="grp_sea_btn_hngnm_onclick"/>
  165. </Layout>
  166. </Layouts>
  167. </Div>
  168. <Button id="btn_issgoal" taborder="13" text="사본발행목적" onclick="btn_issgoal_onclick" class="btn2" position="absolute 4 161 90 180"/>
  169. <Static id="caption00" text="사본발행 기본정보" class="tit_2" position="absolute 3 77 132 93"/>
  170. <Button id="btn_help" taborder="14" text="구비서류 도움말" onclick="btn_help_onclick" class="btn2" position="absolute 133 74 236 93"/>
  171. <Combo id="cmb_orddrid" taborder="15" innerdataset="@ds_init_combo1" codecolumn="resncd" datacolumn="resncnts" position="absolute 95 161 212 180" onitemchanged="cmb_orddrid_onitemchanged"/>
  172. <Static id="caption7" text="슬라이드사본 발행내역" class="tit_2" position="absolute 2 183 168 200"/>
  173. <Grid id="grd_slide" taborder="16" binddataset="ds_grd_slide" useinputpanel="false" cellclickbound="cell" position="absolute 1 204 448 297" autofittype="none" oncellclick="grd_slide_oncellclick">
  174. <Formats>
  175. <Format id="default">
  176. <Columns>
  177. <Column size="25"/>
  178. <Column size="64"/>
  179. <Column size="83"/>
  180. <Column size="89"/>
  181. <Column size="90"/>
  182. <Column size="75"/>
  183. <Column size="93"/>
  184. </Columns>
  185. <Rows>
  186. <Row size="24" band="head"/>
  187. <Row size="24"/>
  188. </Rows>
  189. <Band id="head">
  190. <Cell/>
  191. <Cell col="1" text="생성번호"/>
  192. <Cell col="2" text="신청일자"/>
  193. <Cell col="3" text="관련병리번호"/>
  194. <Cell col="4" text="신청과"/>
  195. <Cell col="5" text="신청의"/>
  196. <Cell col="6" text="취소시각"/>
  197. </Band>
  198. <Band id="body">
  199. <Cell celltype="head" text="expr:currow + 1"/>
  200. <Cell col="1" text="bind:seqno"/>
  201. <Cell col="2" displaytype="date" edittype="none" text="bind:appdd"/>
  202. <Cell col="3" text="bind:ptno"/>
  203. <Cell col="4" text="bind:orddeptnm"/>
  204. <Cell col="5" text="bind:orddrnm"/>
  205. <Cell col="6" text="bind:cncldt"/>
  206. </Band>
  207. </Format>
  208. </Formats>
  209. </Grid>
  210. <Shape id="line00" class="line_1" position="absolute 0 200 447 204" style="strokepen:3 solid #33bbbbff;"/>
  211. <Static id="caption04" text="상세 신청내역" class="tit_2" position="absolute 1 569 109 586" anchor="left bottom"/>
  212. <Div id="group00" taborder="19" class="div_SA2" position="absolute 1 593 449 756" anchor="left bottom">
  213. <Layouts>
  214. <Layout width="448" height="163">
  215. <Static id="caption4" text="병리번호 :" class="search_name" position="absolute 8 10 83 27" anchor="default"/>
  216. <Edit id="input2" taborder="1" class="input_search" position="absolute 139 8 243 27" anchor="default"/>
  217. <Edit id="input4" taborder="2" class="input_search" position="absolute 138 56 178 75" anchor="default"/>
  218. <Static id="caption12" text="염색슬라이드 :&#13;&#10;(H-E slide)" class="search_name" position="absolute 8 60 108 85" anchor="default"/>
  219. <Static id="caption00" text="미염색슬라이드 :&#13;&#10;(Unstained slide)" class="search_name" position="absolute 8 110 132 143" anchor="default"/>
  220. <Edit id="input00" taborder="3" class="input_search" position="absolute 138 112 178 131" anchor="default"/>
  221. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 131 2 137 160" anchor="top right"/>
  222. <Static id="caption01" text="장" class="cell_1" position="absolute 186 112 211 131" anchor="right bottom" style="padding:0 0 0 0;align:center middle;"/>
  223. <CheckBox id="CheckBox00" taborder="4" text="CheckBox00" position="absolute 266 9 284 26" anchor="default" onchanged="group00_CheckBox00_onchanged"/>
  224. <Edit id="input01" taborder="5" class="input_search" position="absolute 291 8 395 27" enable="false" anchor="default"/>
  225. <CheckBox id="CheckBox01" taborder="6" text="비고" position="absolute 226 57 274 74" anchor="default" onchanged="group00_CheckBox01_onchanged"/>
  226. <CheckBox id="CheckBox02" taborder="7" text="비고" position="absolute 226 113 268 130" anchor="default" onchanged="group00_CheckBox02_onchanged"/>
  227. <Edit id="input03" taborder="8" class="input_search" position="absolute 275 56 395 75" enable="false" anchor="default"/>
  228. <Edit id="input05" taborder="9" class="input_search" position="absolute 275 112 395 131" enable="false" anchor="default"/>
  229. <Static id="caption02" text="장" class="cell_1" position="absolute 186 56 211 75" anchor="right bottom" style="padding:0 0 0 0;align:center middle;"/>
  230. </Layout>
  231. </Layouts>
  232. </Div>
  233. <Shape id="line01" class="line_1" position="absolute 0 589 449 595" style="strokepen:3 solid #33bbbbff;" anchor="left bottom"/>
  234. <Button id="Button00" taborder="21" text="저장" position="absolute 395 566 447 588" class="btn4" onclick="Button00_onclick" anchor="left bottom"/>
  235. <Shape id="line04" class="line_1" position="absolute 0 94 448 100" style="strokepen:3 solid #33bbbbff;"/>
  236. <Grid id="grd_testrsltref" taborder="22" binddataset="ds_grd_testrsltref" autoenter="select" useinputpanel="false" selecttype="multirow" extendsizetype="row" cellsizingtype="row" autofittype="col" autosizingtype="row" onrbuttondown="grd_testrsltref_onrbuttondown" position="absolute 452 97 1193 757" anchor="all">
  237. <Formats>
  238. <Format id="default">
  239. <Columns>
  240. <Column size="719"/>
  241. <Column size="0"/>
  242. <Column size="0"/>
  243. <Column size="0"/>
  244. <Column size="0"/>
  245. <Column size="0"/>
  246. <Column size="0"/>
  247. <Column size="0"/>
  248. </Columns>
  249. <Rows>
  250. <Row size="24" band="head"/>
  251. <Row size="27"/>
  252. </Rows>
  253. <Band id="head">
  254. <Cell text="검 사 결 과 내 용"/>
  255. <Cell col="1" text="caption2"/>
  256. <Cell col="2" text="caption3"/>
  257. <Cell col="3" text="caption4"/>
  258. <Cell col="4" text="caption5"/>
  259. <Cell col="5" text="caption6"/>
  260. <Cell col="6" text="caption7"/>
  261. <Cell col="7" text="caption8"/>
  262. </Band>
  263. <Band id="body">
  264. <Cell style="align:left middle;font:dotumche,9;" text="bind:reptrslt" wordwrap="both" autosizerow="limitmin"/>
  265. <Cell col="1" text="bind:level"/>
  266. <Cell col="2" text="bind:judgmark"/>
  267. <Cell col="3" text="bind:tkdt"/>
  268. <Cell col="4" text="bind:rsltdd"/>
  269. <Cell col="5" text="bind:suppdept"/>
  270. <Cell col="6" text="bind:pacsno"/>
  271. <Cell col="7" text="bind:spcno"/>
  272. </Band>
  273. </Format>
  274. </Formats>
  275. </Grid>
  276. <Static id="caption3" text="검사결과" class="tit_2" position="absolute 454 74 533 90"/>
  277. <Edit id="ipt_issgoaletc" taborder="23" enable="false" position="absolute 215 161 449 180"/>
  278. <Static id="caption05" text="OT처방내역" class="tit_2" position="absolute 1 300 101 317"/>
  279. <Grid id="grd_slide00" taborder="24" binddataset="ds_mainot" useinputpanel="false" cellsizingtype="col" autofittype="none" cellclickbound="cell" position="absolute 1 320 448 413" oncellclick="grd_slide00_oncellclick">
  280. <Formats>
  281. <Format id="default">
  282. <Columns>
  283. <Column size="43"/>
  284. <Column size="82"/>
  285. <Column size="95"/>
  286. <Column size="118"/>
  287. <Column size="108"/>
  288. </Columns>
  289. <Rows>
  290. <Row size="24" band="head"/>
  291. <Row size="24"/>
  292. </Rows>
  293. <Band id="head">
  294. <Cell text="선택"/>
  295. <Cell col="1" text="병리번호"/>
  296. <Cell col="2" text="신청일자"/>
  297. <Cell col="3" text="신청과"/>
  298. <Cell col="4" text="신청의"/>
  299. </Band>
  300. <Band id="body">
  301. <Cell displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
  302. <Cell col="1" text="bind:ptno"/>
  303. <Cell col="2" text="bind:prcpdd"/>
  304. <Cell col="3" text="bind:inorddeptnm"/>
  305. <Cell col="4" text="bind:usernm"/>
  306. </Band>
  307. </Format>
  308. </Formats>
  309. </Grid>
  310. <Button id="btn_reset" taborder="25" text="초기화" onclick="group4_group6_btn_reset_onclick" class="btn4" position="absolute 932 42 1000 64" anchor="top right"/>
  311. <Button id="btn_reset00" taborder="26" text="타부서 구비서류 관리" class="btn4" position="absolute 237 73 393 95" onclick="btn_reset00_onclick" style="color:red;"/>
  312. <Combo id="cmb_orddrid00" taborder="28" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="cmb_orddrid_onitemchanged" position="absolute 395 73 451 92">
  313. <Dataset id="innerdataset">
  314. <ColumnInfo>
  315. <Column id="codecolumn" size="256"/>
  316. <Column id="datacolumn" size="256"/>
  317. </ColumnInfo>
  318. <Rows>
  319. <Row>
  320. <Col id="codecolumn">Y</Col>
  321. <Col id="datacolumn">Y</Col>
  322. </Row>
  323. <Row>
  324. <Col id="codecolumn">N</Col>
  325. <Col id="datacolumn">N</Col>
  326. </Row>
  327. </Rows>
  328. </Dataset>
  329. </Combo>
  330. <Button id="btn_reset01" taborder="29" text="발행내역 취소" class="btn4" position="absolute 228 178 336 200" anchor="top right" style="font:Dotum,8,bold;" onclick="btn_reset01_onclick"/>
  331. </Layout>
  332. </Layouts>
  333. <Objects>
  334. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  335. <ColumnInfo>
  336. <Column id="pid" type="STRING" size="256"/>
  337. <Column id="patnm" type="STRING" size="256"/>
  338. <Column id="appdd" type="STRING" size="256"/>
  339. <Column id="sexage" type="STRING" size="256"/>
  340. <Column id="appmanflag" type="STRING" size="256"/>
  341. <Column id="appmannm" type="STRING" size="256"/>
  342. <Column id="trustyn" type="STRING" size="256"/>
  343. <Column id="issgoalcd" type="STRING" size="256"/>
  344. <Column id="issgoalnm" type="STRING" size="256"/>
  345. <Column id="appmanetc" type="STRING" size="256"/>
  346. <Column id="slidecopies" type="STRING" size="256"/>
  347. <Column id="slidecopinm" type="STRING" size="256"/>
  348. <Column id="mislidecopies" type="STRING" size="256"/>
  349. <Column id="mislidecopinm" type="STRING" size="256"/>
  350. <Column id="ptnomemo" type="STRING" size="256"/>
  351. <Column id="ptno" type="STRING" size="256"/>
  352. <Column id="seqflagcd" type="STRING" size="256"/>
  353. <Column id="instcd" type="STRING" size="256"/>
  354. <Column id="userid" type="STRING" size="256"/>
  355. <Column id="siteyn" type="STRING" size="256"/>
  356. <Column id="appdeptcd" type="STRING" size="256"/>
  357. <Column id="appdrid" type="STRING" size="256"/>
  358. <Column id="yy" type="STRING" size="256"/>
  359. <Column id="mm" type="STRING" size="256"/>
  360. <Column id="dd" type="STRING" size="256"/>
  361. <Column id="flag" type="STRING" size="256"/>
  362. <Column id="seqno" type="STRING" size="256"/>
  363. </ColumnInfo>
  364. <Rows>
  365. <Row>
  366. <Col id="flag">1</Col>
  367. </Row>
  368. </Rows>
  369. </Dataset>
  370. <Dataset id="ds_grd_slide" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  371. <ColumnInfo>
  372. <Column id="pid" type="STRING" size="255"/>
  373. <Column id="appdd" type="STRING" size="255"/>
  374. <Column id="apptm" type="STRING" size="255"/>
  375. <Column id="appmanflag" type="STRING" size="255"/>
  376. <Column id="appmannm" type="STRING" size="255"/>
  377. <Column id="trustyn" type="STRING" size="255"/>
  378. <Column id="siteyn" type="STRING" size="255"/>
  379. <Column id="issgoalcd" type="STRING" size="255"/>
  380. <Column id="issgoalnm" type="STRING" size="255"/>
  381. <Column id="slidecopies" type="BIGDECIMAL" size="255"/>
  382. <Column id="slidecopinm" type="STRING" size="255"/>
  383. <Column id="mislidecopies" type="BIGDECIMAL" size="255"/>
  384. <Column id="mislidecopinm" type="STRING" size="255"/>
  385. <Column id="ptno" type="STRING" size="255"/>
  386. <Column id="ptnomemo" type="STRING" size="255"/>
  387. <Column id="appdeptcd" type="STRING" size="255"/>
  388. <Column id="appdrid" type="STRING" size="255"/>
  389. <Column id="cnclyn" type="STRING" size="255"/>
  390. <Column id="cncldt" type="STRING" size="255"/>
  391. <Column id="prntdt" type="STRING" size="255"/>
  392. <Column id="seqno" type="STRING" size="256"/>
  393. <Column id="orddeptnm" type="STRING" size="256"/>
  394. <Column id="orddrnm" type="STRING" size="256"/>
  395. <Column id="patnm" type="STRING" size="256"/>
  396. </ColumnInfo>
  397. </Dataset>
  398. <Dataset id="ds_grd_testrsltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  399. <ColumnInfo>
  400. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  401. <Column id="ptno" type="STRING" size="256" sumtext="병리번호"/>
  402. <Column id="dispptno" type="STRING" size="256" sumtext="표시병리번호"/>
  403. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  404. <Column id="acptdd" type="STRING" size="256" sumtext="접수일자"/>
  405. <Column id="testcd" type="STRING" size="256" sumtext="검사코드"/>
  406. <Column id="testnm" type="STRING" size="256" sumtext="검사명"/>
  407. <Column id="tgrupcd" type="STRING" size="256" sumtext="검사그룹코드"/>
  408. <Column id="acptstatcd" type="STRING" size="256" sumtext="접수상태"/>
  409. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  410. <Column id="patnm" type="STRING" size="256" sumtext="환자명"/>
  411. <Column id="reqfrmno" type="STRING" size="256" sumtext="의뢰지번호"/>
  412. <Column id="reqfrmflagcd" type="STRING" size="256" sumtext="의뢰지구분코드"/>
  413. <Column id="sexage" type="STRING" size="256" sumtext="성별나이"/>
  414. <Column id="readdd" type="STRING" size="256" sumtext="판독일자"/>
  415. <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
  416. <Column id="orddrnm" type="STRING" size="256" sumtext="진료의"/>
  417. <Column id="readdrnm" type="STRING" size="256" sumtext="판독의"/>
  418. <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방발생구분"/>
  419. <Column id="ptnoworkflagcd" type="STRING" size="256" sumtext="작업구분코드"/>
  420. <Column id="diagcnts" type="STRING" size="256" sumtext="Mcode"/>
  421. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시처방유일번호"/>
  422. <Column id="grosdrnm" type="STRING" size="256" sumtext="육안검사의"/>
  423. <Column id="realdiagcnts" type="STRING" size="256" sumtext="진단내용"/>
  424. </ColumnInfo>
  425. </Dataset>
  426. <Dataset id="ds_init_combo1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  427. <ColumnInfo>
  428. <Column id="choi" type="STRING" size="256" sumtext="선택"/>
  429. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  430. <Column id="baseflagcd" type="STRING" size="256" sumtext="구분코드"/>
  431. <Column id="resncd" type="STRING" size="256" sumtext="사유코드"/>
  432. <Column id="resncnts" type="STRING" size="256" sumtext="사유내용"/>
  433. </ColumnInfo>
  434. </Dataset>
  435. <Dataset id="ds_refData" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  436. <ColumnInfo>
  437. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  438. <Column id="refcrite" type="STRING" size="256" sumtext="검색조건"/>
  439. <Column id="refval" type="STRING" size="256" sumtext="검색값"/>
  440. <Column id="acptfromdd" type="STRING" size="256" sumtext="접수시작일자"/>
  441. <Column id="acpttodd" type="STRING" size="256" sumtext="접수종료일자"/>
  442. <Column id="userdeptcd" type="STRING" size="256" sumtext="병리과코드"/>
  443. <Column id="extrpart" type="STRING" size="256" sumtext="채취내용"/>
  444. <Column id="diag" type="STRING" size="256" sumtext="진단내용"/>
  445. <Column id="extrmthd" type="STRING" size="256" sumtext="채취방법"/>
  446. <Column id="refflagcd" type="STRING" size="256" sumtext="조회구분코드"/>
  447. <Column id="ptnocode" type="STRING" size="256" sumtext="병리번호코드"/>
  448. <Column id="fromyear" type="STRING" size="256" sumtext="시작년도"/>
  449. <Column id="fromptno" type="STRING" size="256" sumtext="시작병리번호"/>
  450. <Column id="toptno" type="STRING" size="256" sumtext="종료병리번호"/>
  451. <Column id="srchmthd" type="STRING" size="256" sumtext="조회날자구분"/>
  452. <Column id="workflaglist" type="STRING" size="256" sumtext="작업구분"/>
  453. <Column id="scrnid" type="STRING" size="256" sumtext="화면ID"/>
  454. <Column id="toyear" type="STRING" size="256" sumtext="종료년도"/>
  455. <Column id="orddeptid" type="STRING" size="256" sumtext="진료과"/>
  456. <Column id="sreadId" type="STRING" size="256" sumtext="판독의"/>
  457. <Column id="diagchk" type="STRING" size="256" sumtext="진단내용검색방법"/>
  458. <Column id="sGrossId" type="STRING" size="256" sumtext="sGrossId"/>
  459. </ColumnInfo>
  460. <Rows>
  461. <Row/>
  462. </Rows>
  463. </Dataset>
  464. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  465. <ColumnInfo>
  466. <Column id="pid" type="STRING" size="256"/>
  467. <Column id="patnm" type="STRING" size="256"/>
  468. <Column id="appdd" type="STRING" size="256"/>
  469. <Column id="sexage" type="STRING" size="256"/>
  470. <Column id="appmanflag" type="STRING" size="256"/>
  471. <Column id="trustyn" type="STRING" size="256"/>
  472. <Column id="issgoalcd" type="STRING" size="256"/>
  473. <Column id="appmanetc" type="STRING" size="256"/>
  474. <Column id="slidecopies" type="STRING" size="256"/>
  475. <Column id="slidecopinm" type="STRING" size="256"/>
  476. <Column id="mislidecopies" type="STRING" size="256"/>
  477. <Column id="mislidecopinm" type="STRING" size="256"/>
  478. <Column id="ptnomemo" type="STRING" size="256"/>
  479. <Column id="ptno" type="STRING" size="256"/>
  480. </ColumnInfo>
  481. <Rows>
  482. <Row/>
  483. </Rows>
  484. </Dataset>
  485. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  486. <ColumnInfo>
  487. <Column id="detlrefcrite" type="STRING" size="256"/>
  488. <Column id="userdeptcd" type="STRING" size="256"/>
  489. </ColumnInfo>
  490. <Rows>
  491. <Row/>
  492. </Rows>
  493. </Dataset>
  494. <Dataset id="ds_hosoenvinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  495. <ColumnInfo>
  496. <Column id="instcd" type="STRING" size="256"/>
  497. <Column id="lendrtnterm" type="STRING" size="256"/>
  498. <Column id="recvqualmthdcd" type="STRING" size="256"/>
  499. <Column id="plgydeptcd" type="STRING" size="256"/>
  500. <Column id="plgyteamcd" type="STRING" size="256"/>
  501. <Column id="doctjobgradcd" type="STRING" size="256"/>
  502. <Column id="teamjobgradcd" type="STRING" size="256"/>
  503. </ColumnInfo>
  504. <Rows>
  505. <Row/>
  506. </Rows>
  507. </Dataset>
  508. <Dataset id="ds_grd_testrsltref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  509. <ColumnInfo>
  510. <Column id="reptrslt" type="STRING"/>
  511. <Column id="level" type="STRING"/>
  512. <Column id="judgmark" type="STRING"/>
  513. <Column id="tkdt" type="STRING"/>
  514. <Column id="rsltdd" type="STRING"/>
  515. <Column id="suppdept" type="STRING"/>
  516. <Column id="pacsno" type="STRING"/>
  517. <Column id="spcno" type="STRING"/>
  518. </ColumnInfo>
  519. </Dataset>
  520. <Dataset id="ds_mainot" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  521. <ColumnInfo>
  522. <Column id="choi" type="STRING" size="256"/>
  523. <Column id="pid" type="STRING" size="256"/>
  524. <Column id="ptno" type="STRING" size="256"/>
  525. <Column id="prcpdd" type="STRING" size="256"/>
  526. <Column id="orddeptcd" type="STRING" size="256"/>
  527. <Column id="orddrid" type="STRING" size="256"/>
  528. <Column id="inorddeptnm" type="STRING" size="256"/>
  529. <Column id="usernm" type="STRING" size="256"/>
  530. </ColumnInfo>
  531. <Rows>
  532. <Row/>
  533. </Rows>
  534. </Dataset>
  535. <Dataset id="ds_grd_slide00" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  536. <ColumnInfo>
  537. <Column id="pid" type="STRING" size="255"/>
  538. <Column id="appdd" type="STRING" size="255"/>
  539. <Column id="apptm" type="STRING" size="255"/>
  540. <Column id="appmanflag" type="STRING" size="255"/>
  541. <Column id="appmannm" type="STRING" size="255"/>
  542. <Column id="trustyn" type="STRING" size="255"/>
  543. <Column id="siteyn" type="STRING" size="255"/>
  544. <Column id="issgoalcd" type="STRING" size="255"/>
  545. <Column id="issgoalnm" type="STRING" size="255"/>
  546. <Column id="slidecopies" type="BIGDECIMAL" size="255"/>
  547. <Column id="slidecopinm" type="STRING" size="255"/>
  548. <Column id="mislidecopies" type="BIGDECIMAL" size="255"/>
  549. <Column id="mislidecopinm" type="STRING" size="255"/>
  550. <Column id="ptno" type="STRING" size="255"/>
  551. <Column id="ptnomemo" type="STRING" size="255"/>
  552. <Column id="appdeptcd" type="STRING" size="255"/>
  553. <Column id="appdrid" type="STRING" size="255"/>
  554. <Column id="cnclyn" type="STRING" size="255"/>
  555. <Column id="cncldt" type="STRING" size="255"/>
  556. <Column id="prntdt" type="STRING" size="255"/>
  557. <Column id="seqno" type="STRING" size="256"/>
  558. <Column id="orddeptnm" type="STRING" size="256"/>
  559. <Column id="orddrnm" type="STRING" size="256"/>
  560. <Column id="patnm" type="STRING" size="256"/>
  561. </ColumnInfo>
  562. </Dataset>
  563. </Objects>
  564. <Bind>
  565. <BindItem id="item18" compid="grp_sea.output5" propid="value" datasetid="ds_init" columnid="patnm"/>
  566. <BindItem id="item19" compid="grp_sea.output00" propid="value" datasetid="ds_init" columnid="sexage"/>
  567. <BindItem id="item24" compid="group2.rdo_appmanflag" propid="value" datasetid="ds_init" columnid="appmanflag"/>
  568. <BindItem id="item20" compid="group2.rdo_trustyn" propid="value" datasetid="ds_init" columnid="trustyn"/>
  569. <BindItem id="item26" compid="group2.ipt_appmannm" propid="value" datasetid="ds_init" columnid="appmanetc"/>
  570. <BindItem id="item25" compid="cmb_orddrid" propid="value" datasetid="ds_init" columnid="issgoalcd"/>
  571. <BindItem id="item0" compid="ipt_issgoaletc" propid="value" datasetid="ds_init" columnid="issgoalnm"/>
  572. <BindItem id="item1" compid="grp_sea.pidno" propid="value" datasetid="ds_init" columnid="pid"/>
  573. <BindItem id="item2" compid="group00.input2" propid="value" datasetid="ds_init" columnid="ptno"/>
  574. <BindItem id="item3" compid="group00.input01" propid="value" datasetid="ds_init" columnid="ptnomemo"/>
  575. <BindItem id="item4" compid="group00.input4" propid="value" datasetid="ds_init" columnid="slidecopies"/>
  576. <BindItem id="item5" compid="group00.input03" propid="value" datasetid="ds_init" columnid="slidecopinm"/>
  577. <BindItem id="item6" compid="group00.input00" propid="value" datasetid="ds_init" columnid="mislidecopies"/>
  578. <BindItem id="item7" compid="group00.input05" propid="value" datasetid="ds_init" columnid="mislidecopinm"/>
  579. <BindItem id="item8" compid="cmb_orddrid00" propid="value" datasetid="ds_init" columnid="siteyn"/>
  580. </Bind>
  581. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  582. * System Name :
  583. * Job Name :
  584. * Creator :
  585. * Make Date : 2015-11-13
  586. * Description :
  587. *---------------------------------------------------------------------------------------
  588. * Modify Date Modifier Modify Description
  589. *---------------------------------------------------------------------------------------
  590. * 2015-11-13 Live Converter TF->XP
  591. *
  592. *---------------------------------------------------------------------------------------
  593. ****************************************************************************************/
  594. include "com_commonxp::comm_main.xjs";
  595. include "lis_commonxp::LZZ001.xjs";
  596. include "lis_commonxp::LPZ001.xjs";
  597. function SMLPP00500_oninit(obj:Form, e:InitEventInfo)
  598. {
  599. frmf_initForm(obj);
  600. }
  601. function SMLPP00500_onload(obj:Form, e:LoadEventInfo)
  602. {
  603. grdf_initGrid(grd_slide);
  604. grdf_initGrid(grd_testrsltlist);
  605. fExeInitialize();
  606. }
  607. function fExeInitialize()
  608. {
  609. var sCurDate = "";
  610. dsf_createDsRow("ds_send", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}]);
  611. var oParam = {};
  612. oParam.id = "TRLPZ00101";
  613. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  614. oParam.method = "reqGetHospitalEnvironmentSetInfo";
  615. oParam.inds = "refData=ds_send";
  616. oParam.outds = "ds_hosoenvinfo=hospenvinfo";
  617. oParam.async = false;
  618. //oParam.callback = "cf_TRLPZ00101";
  619. tranf_submit(oParam);
  620. lpzfUserDeptCd(ds_hosoenvinfo, ds_hidden);
  621. dsf_createDsRow("ds_send", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  622. ,{col: "baseflagcd", val: 'K2'}]);
  623. var oParam = {};
  624. oParam.id = "TRLPZ00103";
  625. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  626. oParam.method = "reqGetReasonCodeList";
  627. oParam.inds = "refData=ds_send";
  628. oParam.outds = "ds_init_combo1=refrslt";
  629. oParam.async = false;
  630. //oParam.callback = "cf_TRLPZ00103";
  631. tranf_submit(oParam);
  632. ds_init_combo1.deleteRow(4);
  633. // 병원환경정보를 취득하여 병리과와 병리팀 코드를 편집한다.
  634. lpzfUserDeptCd(ds_hosoenvinfo, ds_hidden);
  635. grp_sea.pidno.setFocus();
  636. }
  637. //사본발행목적 변경
  638. function cmb_orddrid_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  639. {
  640. if(ds_init.getColumn(0, "issgoalcd") == 4)
  641. {
  642. ipt_issgoaletc.enable = true;
  643. ds_init.setColumn(0, "issgoalnm","");
  644. }
  645. else
  646. {
  647. ipt_issgoaletc.enable = false;
  648. var is_row = ds_init_combo1.findRow("resncd",ds_init.getColumn(0, "issgoalcd"));
  649. // trace(is_row);
  650. // .SetColumn(0, "issgoalcd",)
  651. ds_init.setColumn(0, "issgoalnm",ds_init_combo1.getColumn(is_row,'resncnts'))
  652. }
  653. }
  654. function grp_sea_btn_hngnm_onclick(obj:Button, e:ClickEventInfo)
  655. {
  656. var sPid = "";
  657. var objArg = new Object();
  658. frmf_modal("SPPMC02500","SPPMC02500","","",1,150,150,"","","","","","M");
  659. if (frmf_getParameter("SPPMC02500_popupendflag") == "ok")
  660. {
  661. sPid = ds_patinfolist.getColumn(0, "pid");
  662. if (utlf_isNull(sPid) || sPid == " ")
  663. {
  664. return;
  665. }
  666. var srchpid = sPid;
  667. }
  668. }
  669. //구비서류 도움말
  670. function btn_help_onclick(obj:Button, e:ClickEventInfo)
  671. {
  672. frmf_setParameter("SPMRC02600_param","A");
  673. frmf_modal("SPMRC02600", "SPMRC02600", null, null, null, null, null, null, null, null, null, null, "M");
  674. }
  675. //통합결과조회
  676. function btn_sytsrsltref_onclick(obj:Button, e:ClickEventInfo)
  677. {
  678. fExePopupCallSytsRslt();
  679. }
  680. function fExePopupCallSytsRslt()
  681. {
  682. var pid = ds_init.getColumn(0,"pid");
  683. var objParam = [{col:"srchpid", type:"string", size:10, val: pid}]
  684. dsf_createDsRow("ds_send_reqdata_pid", objParam, false)
  685. var objArg = new Object();
  686. objArg.arg_ds_send_singdata = ds_send_reqdata_pid;
  687. frmf_open("SMAER00800", "SMAER00800", objArg, null, null, null, null, null, null, null, null, null, "M");
  688. /*
  689. if( utlf_isNull(ds_init.getColumn))
  690. {
  691. frmf_modal("SMAER00800", "SMAER00800", "", null, null, null, null, null, null, null, null, null, "M");
  692. }
  693. else
  694. {
  695. var objArg = new Object();
  696. objArg.arg_ds_send_singdata = ds_init;
  697. frmf_modal("SMAER00800", "SMAER00800", "", null, null, null, null, null, null, null, null, null, "M");
  698. }
  699. */
  700. }
  701. //등록번호 조회
  702. function grp_sea_pidno_onkeyup(obj:Edit, e:KeyEventInfo)
  703. {
  704. if(e.keycode == 13)
  705. {
  706. ds_grd_testrsltref.clearData(); // 결과조회 초기화.
  707. fExe_retrieve();
  708. }
  709. }
  710. function Button00_onclick(obj:Button, e:ClickEventInfo)
  711. {
  712. ds_init.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  713. ds_init.setColumn(0, "userid", sysf_getUserId());
  714. //ds_init.setColumn(0, "siteyn", "N");
  715. // trace("init = " + ds_init.saveXML());
  716. var oParam = {};
  717. oParam.id = "TXLPJ00401";
  718. oParam.service = "plgyacptmngtapp.SpecimenAccept";
  719. oParam.method = "reqExeSlideAccept";
  720. oParam.inds = "acptenv=ds_init";
  721. oParam.outds = "";
  722. oParam.transaction = false;
  723. oParam.async = false;
  724. //oParam.callback = "cf_TXLPJ00401";
  725. tranf_submit(oParam);
  726. fExe_retrieve();
  727. }
  728. //검사결과 목록 클릭
  729. function grd_testrsltlist_oncellclick(obj:Grid, e:GridClickEventInfo)
  730. {
  731. fExePtNoClick();
  732. }
  733. function fExe_retrieve()
  734. {
  735. ds_init.setColumn(0, "pid", grp_sea.pidno.text);
  736. var sPid = grp_sea.pidno.text;
  737. //--------------------------------------------------------
  738. // 등록번호 조회 시 최소 4자리 이상 입력하도록 메세지 표시
  739. if(!utlf_isNull(ds_init.getColumn(0, "pid")))
  740. {
  741. if (sPid.length < 3)
  742. {
  743. sysf_messageBox("등록번호를 4자리 이상 ", "C001");
  744. return false;
  745. }
  746. }
  747. dsf_createDsRow("ds_temp_send", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}
  748. ,{col : "flag", val : ds_init.getColumn(0, "flag")}
  749. ,{col : "pid", val : ds_init.getColumn(0, "pid")}]);
  750. var oParam = {};
  751. oParam.id = "TRLPJ02602";
  752. oParam.service = "plgyacptmngtapp.SpecimenAccept";
  753. oParam.method = "reqGetSlideList";
  754. oParam.inds = "refData=ds_temp_send";
  755. // oParam.outds = "ds_grd_slide=refrslt";
  756. oParam.outds = "ds_grd_slide=refrslt ds_mainot=refrsltot";
  757. oParam.async = false;
  758. tranf_submit(oParam);
  759. if(ds_main.rowcount < 0)
  760. {
  761. alert("조회x");
  762. }
  763. else
  764. {
  765. ds_grd_slide.rowposition = 0;
  766. ds_init.setColumn(0, "appmanflag", ds_grd_slide.getColumn(0, "appmanflag")); //사본발행 신청인
  767. ds_init.setColumn(0, "trustyn", ds_grd_slide.getColumn(0, "trustyn")); //위임장,동의서 유무
  768. ds_init.setColumn(0, "issgoalcd", ds_grd_slide.getColumn(0, "issgoalcd")); //사본발행목적
  769. ds_init.setColumn(0, "issgoalnm", ds_grd_slide.getColumn(0, "issgoalnm")); //사본발행목적
  770. ds_init.setColumn(0, "ptno", ds_grd_slide.getColumn(0, "ptno")); //병리번호
  771. ds_init.setColumn(0, "slidecopies", ds_grd_slide.getColumn(0, "slidecopies")); //d
  772. ds_init.setColumn(0, "slidecopinm", ds_grd_slide.getColumn(0, "slidecopinm")); //병리번호
  773. ds_init.setColumn(0, "mislidecopies", ds_grd_slide.getColumn(0, "mislidecopies")); //병리번호
  774. ds_init.setColumn(0, "mislidecopinm", ds_grd_slide.getColumn(0, "mislidecopinm")); //병리번호
  775. ds_init.setColumn(0, "ptnomemo", ds_grd_slide.getColumn(0, "ptnomemo")); //병리메모
  776. if (utlf_isNull(ds_grd_slide.getColumn(0, "siteyn")) || ds_grd_slide.getColumn(0, "siteyn") == "")
  777. {
  778. ds_init.setColumn(0, "siteyn", "N"); //외부 위임여부
  779. }
  780. else
  781. {
  782. ds_init.setColumn(0, "siteyn", ds_grd_slide.getColumn(0, "siteyn")); //외부 위임여부
  783. }
  784. }
  785. ds_refData.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  786. ds_refData.setColumn(0, "refcrite", "2");
  787. ds_refData.setColumn(0, "refval", ds_init.getColumn(0, "pid"));
  788. ds_refData.setColumn(0, "acptfromdd", utlf_getCurrentDate());
  789. ds_refData.setColumn(0, "acpttodd", utlf_getCurrentDate());
  790. ds_refData.setColumn(0, "userdeptcd", ds_hidden.getColumn(0, "userdeptcd"));
  791. ds_refData.setColumn(0, "refflagcd", "1");
  792. ds_refData.setColumn(0, "ptnocode", "");
  793. ds_refData.setColumn(0, "extrpart", "");
  794. ds_refData.setColumn(0, "diag", "");
  795. ds_refData.setColumn(0, "extrmthd", "");
  796. var oParam = {};
  797. oParam.id = "TRLPP00501";
  798. oParam.service = "plgyrefmngtapp.TestRsltRef";
  799. oParam.method = "reqGetTestRsltList";
  800. oParam.inds = "refData=ds_refData";
  801. oParam.outds = "ds_grd_testrsltlist=refrslt";
  802. oParam.async = false;
  803. //oParam.callback = "cf_TRLPP00501";
  804. tranf_submit(oParam);
  805. if(ds_grd_testrsltlist.rowcount > 0)
  806. {
  807. ds_init.setColumn(0, "patnm", ds_grd_testrsltlist.getColumn(0, "patnm"));
  808. ds_init.setColumn(0, "sexage", ds_grd_testrsltlist.getColumn(0, "sexage"));
  809. }
  810. }
  811. function fExePtNoClick()
  812. {
  813. var iRowNo = -1;
  814. var sScrNode = ds_grd_testrsltlist;
  815. //var sDescNode = ds_patinfo;
  816. //------------------------------------------
  817. if(ds_grd_testrsltlist.rowposition < 0)
  818. {
  819. return false;
  820. }
  821. //----------------------------
  822. iRowNo = ds_grd_testrsltlist.rowposition;
  823. // 검사결과 조회
  824. dsf_createDsRow("ds_send_refrslt", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}
  825. ,{col : "ptno", val : ds_grd_testrsltlist.getColumn(iRowNo, "ptno")}
  826. ,{col : "pid", val : ds_grd_testrsltlist.getColumn(iRowNo, "pid")}
  827. ,{col : "workflagcd", val : ds_grd_testrsltlist.getColumn(iRowNo, "ptnoworkflagcd")}
  828. ,{col : "prcpgenrflag", val : ds_grd_testrsltlist.getColumn(iRowNo, "prcpgenrflag")}
  829. ,{col : "scrno", val : "10"}]);
  830. var oParam = {};
  831. oParam.id = "TRLPZ00107";
  832. oParam.service = "plgyrefmngtapp.TestRsltRef";
  833. oParam.method = "reqGetTestRsltInfo";
  834. oParam.inds = "refData=ds_send_refrslt";
  835. oParam.outds = "ds_grd_testrsltref=refrslt";
  836. oParam.async = false;
  837. //oParam.callback = "cf_TRLPZ00107";
  838. tranf_submit(oParam);
  839. ds_init.setColumn(0, "ptno", ds_grd_testrsltlist.getColumn(iRowNo, "ptno"));
  840. }
  841. //병리번호 비고 체크
  842. function group00_CheckBox00_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  843. {
  844. if(group00.CheckBox00.value == 1)
  845. {
  846. group00.input01.enable = true;
  847. }
  848. else
  849. {
  850. group00.input01.enable = false;
  851. ds_init.setColumn(0, "ptnomemo", "");
  852. }
  853. }
  854. //염색슬라이드 비고 체크
  855. function group00_CheckBox01_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  856. {
  857. if(group00.CheckBox01.value == 1)
  858. {
  859. group00.input03.enable = true;
  860. }
  861. else
  862. {
  863. group00.input03.enable = false;
  864. ds_init.setColumn(0, "slidecopinm", "");
  865. }
  866. }
  867. //미염색슬라이드 비고 체크
  868. function group00_CheckBox02_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  869. {
  870. if(group00.CheckBox02.value == 1)
  871. {
  872. group00.input05.enable = true;
  873. }
  874. else
  875. {
  876. group00.input05.enable = false;
  877. ds_init.setColumn(0, "mislidecopinm", "");
  878. }
  879. }
  880. //사본발행 신청인 변경
  881. function rdo_appmanflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  882. {
  883. var Appmanflag = group2.rdo_appmanflag.value;
  884. trace("Appmanflag= " + Appmanflag);
  885. if(Appmanflag == 1)
  886. {
  887. ds_init.setColumn(0, "appmannm", "환자본인");
  888. group2.ipt_appmannm.enable = false;
  889. }
  890. else if(Appmanflag == 2)
  891. {
  892. ds_init.setColumn(0, "appmannm", "직계가족");
  893. group2.ipt_appmannm.enable = false;
  894. }
  895. else if(Appmanflag == 3)
  896. {
  897. ds_init.setColumn(0, "appmannm", "보험회사직원");
  898. group2.ipt_appmannm.enable = false;
  899. }
  900. else if(Appmanflag == 4)
  901. {
  902. ds_init.setColumn(0, "appmannm", "대리인");
  903. group2.ipt_appmannm.enable = false;
  904. }
  905. else if(Appmanflag == 9)
  906. {
  907. group2.ipt_appmannm.enable = true;
  908. ds_init.setColumn(0, "appmannm", "기타");
  909. }
  910. else
  911. {
  912. group2.ipt_appmannm.value = "";
  913. group2.ipt_appmannm.enable = false;
  914. }
  915. }
  916. function grd_slide00_oncellclick(obj:Grid, e:GridClickEventInfo)
  917. {
  918. iRowNo = ds_mainot.rowposition;
  919. if( ds_mainot.getColumn(iRowNo, "choi") == 1)
  920. {
  921. ds_init.setColumn(0, "appdeptcd", ds_mainot.getColumn(iRowNo, "orddeptcd"));
  922. ds_init.setColumn(0, "appdrid", ds_mainot.getColumn(iRowNo, "orddrid"));
  923. }else
  924. {
  925. alert("OT 내역 미선택 됨");
  926. }
  927. }
  928. function group4_group6_btn_reset_onclick(obj:Button, e:ClickEventInfo)
  929. {
  930. grp_sea.pidno.value = "9999999";
  931. //ds_init.setColumn(0,"pid","9999999");
  932. fExe_retrieve();
  933. ds_grd_slide.clearData();
  934. ds_mainot.clearData();
  935. ds_grd_testrsltlist.clearData();
  936. ds_grd_testrsltref.clearData();
  937. ds_init.setColumn(0,"pid","");
  938. grp_sea.output5.value = "";
  939. grp_sea.output00.value = "";
  940. grp_sea.pidno.setFocus();
  941. }
  942. function grd_slide_oncellclick(obj:Grid, e:GridClickEventInfo)
  943. {
  944. grd_select()
  945. // iRowNo = ds_grd_slide.rowposition;
  946. // ds_init.setColumn(0, "appmanflag", ds_grd_slide.getColumn(iRowNo, "appmanflag")); //사본발행 신청인
  947. // ds_init.setColumn(0, "trustyn", ds_grd_slide.getColumn(iRowNo, "trustyn")); //위임장,동의서 유무
  948. // ds_init.setColumn(0, "issgoalcd", ds_grd_slide.getColumn(iRowNo, "issgoalcd")); //사본발행목적
  949. // ds_init.setColumn(0, "issgoalnm", ds_grd_slide.getColumn(iRowNo, "issgoalnm")); //사본발행목적
  950. // ds_init.setColumn(0, "ptno", ds_grd_slide.getColumn(iRowNo, "ptno")); //병리번호
  951. //
  952. // ds_init.setColumn(0, "slidecopies", ds_grd_slide.getColumn(iRowNo, "slidecopies")); //d
  953. // ds_init.setColumn(0, "slidecopinm", ds_grd_slide.getColumn(iRowNo, "slidecopinm")); //병리번호
  954. // ds_init.setColumn(0, "mislidecopies", ds_grd_slide.getColumn(iRowNo, "mislidecopies")); //병리번호
  955. // ds_init.setColumn(0, "mislidecopinm", ds_grd_slide.getColumn(iRowNo, "mislidecopinm")); //병리번호
  956. // ds_init.setColumn(0, "ptnomemo", ds_grd_slide.getColumn(iRowNo, "ptnomemo")); //병리메모
  957. }
  958. function grd_select()
  959. {
  960. iRowNo = ds_grd_slide.rowposition;
  961. ds_init.setColumn(0, "appmanflag", ds_grd_slide.getColumn(iRowNo, "appmanflag")); //사본발행 신청인
  962. ds_init.setColumn(0, "appmannm", ds_grd_slide.getColumn(iRowNo, "appmannm")); //사본발행 신청인명
  963. ds_init.setColumn(0, "trustyn", ds_grd_slide.getColumn(iRowNo, "trustyn")); //위임장,동의서 유무
  964. ds_init.setColumn(0, "issgoalcd", ds_grd_slide.getColumn(iRowNo, "issgoalcd")); //사본발행목적
  965. ds_init.setColumn(0, "issgoalnm", ds_grd_slide.getColumn(iRowNo, "issgoalnm")); //사본발행목적
  966. ds_init.setColumn(0, "ptno", ds_grd_slide.getColumn(iRowNo, "ptno")); //병리번호
  967. ds_init.setColumn(0, "slidecopies", ds_grd_slide.getColumn(iRowNo, "slidecopies")); //d
  968. ds_init.setColumn(0, "slidecopinm", ds_grd_slide.getColumn(iRowNo, "slidecopinm")); //병리번호
  969. ds_init.setColumn(0, "mislidecopies", ds_grd_slide.getColumn(iRowNo, "mislidecopies")); //병리번호
  970. ds_init.setColumn(0, "mislidecopinm", ds_grd_slide.getColumn(iRowNo, "mislidecopinm")); //병리번호
  971. ds_init.setColumn(0, "ptnomemo", ds_grd_slide.getColumn(iRowNo, "ptnomemo")); //병리메모
  972. if (utlf_isNull(ds_grd_slide.getColumn(iRowNo, "siteyn")) || ds_grd_slide.getColumn(iRowNo, "siteyn") == "")
  973. {
  974. ds_init.setColumn(0, "siteyn", "N"); //외부 위임여부
  975. }
  976. else
  977. {
  978. ds_init.setColumn(0, "siteyn", ds_grd_slide.getColumn(iRowNo, "siteyn")); //외부 위임여부
  979. }
  980. }
  981. function btn_prt_onclick(obj:Button, e:ClickEventInfo)
  982. {
  983. var toDate = utlf_getCurrentDate();
  984. // ds_grd_slide.setColumn(0, "yy", toDate.substring(0,4));
  985. // ds_grd_slide.setColumn(0, "mm", toDate.substring(4,6));
  986. // ds_grd_slide.setColumn(0, "dd", toDate.substring(6,8));
  987. // ds_grd_slide.setColumn(0, "patnm", ds_init.getColumn(0, "patnm"));
  988. grd_select();
  989. ds_init.setColumn(0, "yy", toDate.substring(0,4));
  990. ds_init.setColumn(0, "mm", toDate.substring(4,6));
  991. ds_init.setColumn(0, "dd", toDate.substring(6,8));
  992. var objDOM = rptf_createDOM(); // DOM 객체 설정
  993. // rptf_setNodeListToDOM(objDOM, "/root/main/init", ds_grd_slide); // 데이터셋 1
  994. rptf_setNodeListToDOM(objDOM, "/root/main/init", ds_init); // 데이터셋 1
  995. var objParam = new Object();
  996. objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  997. var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
  998. rptf_exeReportPreview30(["RPLPP00701"],[objParam], option);
  999. }
  1000. function btn_reset00_onclick(obj:Button, e:ClickEventInfo)
  1001. {
  1002. var objArg = new Object();
  1003. // var sPid = grp_sea.pidno.text;
  1004. objArg.plgv_SMMMI00100_pid = ds_init.getColumn(0, "pid");
  1005. objArg.plgv_SMMMI00100_partcd = 'P';
  1006. frmf_modal("SPLPJ02730", "SPLPJ02730", objArg, null, null, null, null, null, null, null, null, null, "M");
  1007. }
  1008. function btn_reset01_onclick(obj:Button, e:ClickEventInfo)
  1009. {
  1010. iRowNo = ds_grd_slide.rowposition;
  1011. ds_init.setColumn(0, "seqno", ds_grd_slide.getColumn(iRowNo, "seqno")); //발행 번호
  1012. ds_init.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  1013. ds_init.setColumn(0, "userid", sysf_getUserId());
  1014. //ds_init.setColumn(0, "siteyn", "N");
  1015. // trace("init = " + ds_init.saveXML());
  1016. var oParam = {};
  1017. oParam.id = "TXLPJ00401";
  1018. oParam.service = "plgyacptmngtapp.SpecimenAccept";
  1019. oParam.method = "reqExeSlideAccept2";
  1020. oParam.inds = "acptenv=ds_init";
  1021. oParam.outds = "";
  1022. oParam.transaction = false;
  1023. oParam.async = false;
  1024. //oParam.callback = "cf_TXLPJ00401";
  1025. tranf_submit(oParam);
  1026. fExe_retrieve();
  1027. }
  1028. ]]></Script>
  1029. </Form>
  1030. </FDL>