SMLPJ00201_전달검체수신확인2.xfdl 65 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMLPJ00200" position="absolute 0 0 1194 789" titletext="전달검체 수신확인" oninit="SMLPJ00200_oninit" onload="SMLPJ00200_onload" ontimer="SMLPJ00200_ontimer" hotkey="F2">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 13 1194 789" id="grp_biz" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Static text="처방목록" position="absolute 1 54 76 70" id="caption6" class="tit_2" anchor="default"/>
  11. <Shape position="absolute 0 71 1194 77" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  12. <Div position="absolute 0 12 1194 48" align="align:center top;" id="grp_sea" class="div_SA" anchor="left top right">
  13. <Layouts>
  14. <Layout>
  15. <Shape position="absolute 1105 8 1111 28" linetype="vertical" id="line13" class="line_4" anchor="default"/>
  16. <Static text="~" position="absolute 804 11 816 28" align="align:center middle;" id="caption4" class="search_no_b" anchor="default"/>
  17. <Static text="검색방법 :" position="absolute 920 9 1017 26" align="align:center middle;" id="caption5" class="search_name" anchor="default"/>
  18. <Calendar position="absolute 814 8 913 28" id="input3" class="input_search" taborder="6" mask="yyyy-mm-dd" anchor="default" autoselect="true" onkeyup="grp_biz_grp_sea_input3_onkeyup"/>
  19. <Calendar position="absolute 701 8 801 28" id="ipt_ddfrom" class="input_search" taborder="5" mask="yyyy-mm-dd" anchor="default" autoselect="true" autoskip="true"/>
  20. <Combo position="absolute 993 8 1093 28" id="cmbseaflagcd" class="combo_search" taborder="7" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="grp_biz_grp_sea_cmbseaflagcd_onitemchanged">
  21. <Dataset id="innerdataset">
  22. <ColumnInfo>
  23. <Column id="codecolumn"/>
  24. <Column id="datacolumn"/>
  25. </ColumnInfo>
  26. <Rows>
  27. <Row>
  28. <Col id="codecolumn">0</Col>
  29. <Col id="datacolumn">미확인</Col>
  30. </Row>
  31. <Row>
  32. <Col id="codecolumn">1</Col>
  33. <Col id="datacolumn">확인</Col>
  34. </Row>
  35. <Row>
  36. <Col id="codecolumn">2</Col>
  37. <Col id="datacolumn">전체</Col>
  38. </Row>
  39. </Rows>
  40. </Dataset>
  41. </Combo>
  42. <Button position="absolute 1123 8 1179 28" id="btn_sea" class="btn1" taborder="8" text="조회" anchor="default" onclick="grp_biz_grp_sea_btn_sea_onclick"/>
  43. <Edit position="absolute 96 8 208 28" id="ipt_pidno" class="input_search" taborder="1" anchor="default" onkeydown="grp_biz_grp_sea_ipt_pidno_onkeydown" autoselect="true" oneditclick="grp_biz_grp_sea_ipt_pidno_oneditclick"/>
  44. <Static text="등록번호:" position="absolute 25 10 96 27" align="align:center middle;" id="caption7" class="search_name" anchor="default"/>
  45. <Combo position="absolute 599 8 699 28" id="cmbddflag" class="combo_search" taborder="4" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="grp_biz_grp_sea_cmbddflag_onitemchanged">
  46. <Dataset id="innerdataset">
  47. <ColumnInfo>
  48. <Column id="codecolumn"/>
  49. <Column id="datacolumn"/>
  50. </ColumnInfo>
  51. <Rows>
  52. <Row>
  53. <Col id="codecolumn">0</Col>
  54. <Col id="datacolumn">발송일자</Col>
  55. </Row>
  56. <Row>
  57. <Col id="codecolumn">1</Col>
  58. <Col id="datacolumn">수신일자</Col>
  59. </Row>
  60. <Row>
  61. <Col id="codecolumn">2</Col>
  62. <Col id="datacolumn">처방일자</Col>
  63. </Row>
  64. </Rows>
  65. </Dataset>
  66. </Combo>
  67. <CheckBox id="checkbox5" taborder="9" text="Urine" value="0" truevalue="1" falsevalue="0" visible="true" position="absolute 547 8 614 28"/>
  68. <Static id="caption9" text="진료과 :" class="search_name" position="absolute 220 11 314 28"/>
  69. <Combo id="cmborddept" taborder="10" innerdataset="@ds_init_lb0002" codecolumn="cd" datacolumn="nm" onitemchanged="group3_group6_combo1_onitemchanged" position="absolute 284 9 484 28"/>
  70. </Layout>
  71. </Layouts>
  72. </Div>
  73. <Grid position="absolute 1 76 1192 768" id="grd_prcplist" class="datagrid2" taborder="9" binddataset="ds_grd_prcplist" oncellclick="grp_biz_grd_prcplist_oncellclick" cellsizingtype="col" anchor="all">
  74. <Formats>
  75. <Format id="default">
  76. <Columns>
  77. <Column size="0"/>
  78. <Column size="0"/>
  79. <Column size="25"/>
  80. <Column size="25"/>
  81. <Column size="25"/>
  82. <Column size="0"/>
  83. <Column size="0"/>
  84. <Column size="0"/>
  85. <Column size="100"/>
  86. <Column size="100"/>
  87. <Column size="70"/>
  88. <Column size="70"/>
  89. <Column size="0"/>
  90. <Column size="107"/>
  91. <Column size="82"/>
  92. <Column size="0"/>
  93. <Column size="54"/>
  94. <Column size="80"/>
  95. <Column size="241"/>
  96. <Column size="100"/>
  97. <Column size="100"/>
  98. <Column size="60"/>
  99. <Column size="100"/>
  100. <Column size="60"/>
  101. <Column size="60"/>
  102. <Column size="0"/>
  103. <Column size="0"/>
  104. <Column size="0"/>
  105. <Column size="0"/>
  106. <Column size="0"/>
  107. <Column size="0"/>
  108. <Column size="0"/>
  109. <Column size="0"/>
  110. <Column size="0"/>
  111. <Column size="0"/>
  112. <Column size="0"/>
  113. <Column size="0"/>
  114. <Column size="0"/>
  115. <Column size="0"/>
  116. <Column size="0"/>
  117. <Column size="0"/>
  118. <Column size="0"/>
  119. <Column size="123"/>
  120. <Column size="60"/>
  121. <Column size="75"/>
  122. <Column size="0"/>
  123. <Column size="0"/>
  124. <Column size="0"/>
  125. <Column size="0"/>
  126. </Columns>
  127. <Rows>
  128. <Row size="26" band="head"/>
  129. <Row size="24"/>
  130. </Rows>
  131. <Band id="head">
  132. <Cell text="선택"/>
  133. <Cell col="1" text="기관코드"/>
  134. <Cell col="2" colspan="3" text="감염정보" taborder="undefined"/>
  135. <Cell col="5" text="caption1"/>
  136. <Cell col="6" text="caption2"/>
  137. <Cell col="7" text="caption3"/>
  138. <Cell col="8" text="검체명"/>
  139. <Cell col="9" text="바코드번호"/>
  140. <Cell col="10" text="등록번호"/>
  141. <Cell col="11" text="성명"/>
  142. <Cell col="12" text="진료과코드"/>
  143. <Cell col="13" text="진료과"/>
  144. <Cell col="14" text="발송과"/>
  145. <Cell col="15" text="진료의ID"/>
  146. <Cell col="16" text="진료의사"/>
  147. <Cell col="17" text="검사코드"/>
  148. <Cell col="18" text="처방명"/>
  149. <Cell col="19" text="처방일시"/>
  150. <Cell col="20" text="바코드 출력시간"/>
  151. <Cell col="21" text="출력자"/>
  152. <Cell col="22" text="전달시간"/>
  153. <Cell col="23" text="전달자"/>
  154. <Cell col="24" text="수신자"/>
  155. <Cell col="25" text="전송일자"/>
  156. <Cell col="26" text="전송번호"/>
  157. <Cell col="27" text="전송일련번호"/>
  158. <Cell col="28" text="검체전송일자"/>
  159. <Cell col="29" text="검체전송번호"/>
  160. <Cell col="30" text="검체전송일련번호"/>
  161. <Cell col="31" text="현재상태코드"/>
  162. <Cell col="32" text="처방상태코드"/>
  163. <Cell col="33" text="처방발생구분"/>
  164. <Cell col="34" text="처방일자"/>
  165. <Cell col="35" text="처방번호"/>
  166. <Cell col="36" text="실시처방고유번호"/>
  167. <Cell col="37" text="처리구분"/>
  168. <Cell col="38" text="취소구분코드"/>
  169. <Cell col="39" text="취소코드"/>
  170. <Cell col="40" text="spcstatcd"/>
  171. <Cell col="41" text="workflagcd"/>
  172. <Cell col="42" text="접수일시"/>
  173. <Cell col="43" text="검체상태"/>
  174. <Cell col="44" text="병리번호"/>
  175. <Cell col="45" text="의뢰지구분"/>
  176. <Cell col="46" text="cnfmid"/>
  177. <Cell col="47" text="reqfrmVal"/>
  178. <Cell col="48" text="mmospccd"/>
  179. </Band>
  180. <Band id="body">
  181. <Cell displaytype="checkbox" edittype="checkbox" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:choi"/>
  182. <Cell col="1" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:instcd"/>
  183. <Cell col="2" displaytype="normal" edittype="none" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);backgroundimage:EXPR(disp1 == 'Y'?&quot;../../../com/hismainxp/images/injector_en.gif&quot;:&quot;&quot;);" text="bind:disp1img"/>
  184. <Cell col="3" displaytype="normal" edittype="none" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);backgroundimage:EXPR(disp2 == 'Y'?&quot;../../../com/hismainxp/images/touch_en.gif&quot;:&quot;&quot;);" text="bind:disp2img"/>
  185. <Cell col="4" displaytype="normal" edittype="none" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);backgroundimage:EXPR(disp3=='Y'?&quot;../../../com/hismainxp/images/air_en.gif&quot;:&quot;&quot;);" text="bind:disp3img"/>
  186. <Cell col="5" displaytype="none" edittype="none" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:disp1"/>
  187. <Cell col="6" displaytype="none" edittype="none" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:disp2"/>
  188. <Cell col="7" displaytype="none" edittype="none" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:disp3"/>
  189. <Cell col="8" style="align:left;background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:spcnm"/>
  190. <Cell col="9" edittype="text" style="align:center middle;background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" class="text_center" text="bind:spcbarcdno"/>
  191. <Cell col="10" edittype="text" style="align:center middle;background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" class="text_center" text="bind:pid"/>
  192. <Cell col="11" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" class="text_center" text="bind:patnm"/>
  193. <Cell col="12" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:orddeptcd"/>
  194. <Cell col="13" style="align:left middle;background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" class="text_center" text="bind:orddeptnm" wordwrap="char"/>
  195. <Cell col="14" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" class="text_center" text="bind:oproomnm" wordwrap="char"/>
  196. <Cell col="15" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:orddrid"/>
  197. <Cell col="16" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" class="text_center" text="bind:orddrnm"/>
  198. <Cell col="17" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:testcd"/>
  199. <Cell col="18" style="align:left;background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:testnm"/>
  200. <Cell col="19" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:prcprgstdt"/>
  201. <Cell col="20" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:delivedt"/>
  202. <Cell col="21" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" class="text_center" text="bind:delivenm"/>
  203. <Cell col="22" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:cnfmdt"/>
  204. <Cell col="23" text="bind:transfernm"/>
  205. <Cell col="24" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" class="text_center" text="bind:cnfmnm"/>
  206. <Cell col="25" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:trandd"/>
  207. <Cell col="26" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:tranno"/>
  208. <Cell col="27" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:transeqno"/>
  209. <Cell col="28" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:spctrandd"/>
  210. <Cell col="29" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:spctranno"/>
  211. <Cell col="30" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:spctranseqno"/>
  212. <Cell col="31" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:preststatcd"/>
  213. <Cell col="32" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:orgprcpstatcd"/>
  214. <Cell col="33" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:prcpgenrflag"/>
  215. <Cell col="34" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:prcpdd"/>
  216. <Cell col="35" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:prcpno"/>
  217. <Cell col="36" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:execprcpuniqno"/>
  218. <Cell col="37" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:tretflag"/>
  219. <Cell col="38" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:resncdkind"/>
  220. <Cell col="39" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:resncd"/>
  221. <Cell col="40" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:spcstatcd"/>
  222. <Cell col="41" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:workflagcd"/>
  223. <Cell col="42" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:acptdt"/>
  224. <Cell col="43" displaytype="combo" style="align:center middle;" text="bind:orgprcpstatcd" combodataset="ds_prcpstatcd" combocodecol="cd" combodatacol="nm" combodisplay="edit"/>
  225. <Cell col="44" style="background:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);background2:EXPR(!utlf_isNull(backcolor)?backcolor:&quot;&quot;);" text="bind:ptno"/>
  226. <Cell col="45" text="bind:reqfrmflagcd"/>
  227. <Cell col="46" text="bind:cnfmid"/>
  228. <Cell col="47" text="bind:reqfrmno"/>
  229. <Cell col="48" text="bind:mmospccd"/>
  230. </Band>
  231. </Format>
  232. </Formats>
  233. </Grid>
  234. <Div id="grp_resncancle" taborder="10" style="shadow:outer 3,3 3 gray;" class="div_DA" visible="false" position="absolute 390 195 810 270">
  235. <Layouts>
  236. <Layout>
  237. <Static id="cap_cnclresn" text="취소사유" class="cell_2" position="absolute 15 15 95 38"/>
  238. <Combo id="cbo_cnclresn" taborder="1" innerdataset="ds_init_cbo_cnclresn" codecolumn="resncd" datacolumn="resncnts" class="combo_default" position="absolute 15 40 400 60"/>
  239. <Shape id="line3" class="line_3" position="absolute 16 58 400 64"/>
  240. <Shape id="line2" class="line_3" position="absolute 16 12 400 18"/>
  241. <Button id="btn_cncresn" taborder="2" text="확인취소" class="btn2" position="absolute 334 17 398 38"/>
  242. </Layout>
  243. </Layouts>
  244. </Div>
  245. </Layout>
  246. </Layouts>
  247. </Div>
  248. <Div position="absolute 0 -1 1194 26" id="grp_btn" scrollbars="none" anchor="left top right">
  249. <Layouts>
  250. <Layout width="1194" height="27">
  251. <Shape position="absolute 0 22 1194 28" linetype="horizontal" id="line9" class="line_6" anchor="left top right" visible="false"/>
  252. <Button position="absolute 1114 5 1194 25" id="btn_cnfm" class="btn4" taborder="13" text="확인취소" anchor="top right" onclick="grp_btn_btn_cnfm_onclick" visible="false"/>
  253. <Button position="absolute 3 5 126 25" id="btn_excel" class="btn7" taborder="10" text="EXCEL저장 [F9]" anchor="default" onclick="grp_btn_btn_excel_onclick" hotkey="F9" visible="false"/>
  254. <Button position="absolute 129 5 197 25" id="btn_clear" class="btn3" taborder="11" text="초기화" anchor="default" onclick="grp_btn_btn_clear_onclick" visible="false"/>
  255. <Button position="absolute 1026 5 1110 25" id="btn_save" class="btn4" taborder="12" text="확인 [F2]" anchor="top right" onclick="grp_btn_btn_save_onclick" hotkey="F2" visible="false"/>
  256. <Button position="absolute 201 5 293 25" id="button26" class="btn3" text="프린터설정" anchor="default" onclick="grp_btn_button26_onclick" visible="false"/>
  257. <Button position="absolute 298 5 402 25" id="btn_reprnt" class="btn3" text="바코드재출력" anchor="default" onclick="grp_btn_btn_reprnt_onclick" visible="false"/>
  258. <Button id="btn_cnfm2" taborder="14" text="부적합등록" class="btn4" position="absolute 931 4 1020 24" onclick="grp_btn_btn_cnfm2_onclick" anchor="top right" visible="false"/>
  259. <Static id="caption01" text="전달검체 수신확인2" onclick="&quot;caption6_onclick&quot;" class="tit_1" position="absolute 0 0 155 24"/>
  260. </Layout>
  261. </Layouts>
  262. </Div>
  263. </Layout>
  264. </Layouts>
  265. <Objects>
  266. <Dataset id="ds_init_cmb_trsmdeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  267. <ColumnInfo>
  268. <Column id="depthngnm" type="STRING"/>
  269. <Column id="deptcd" type="STRING"/>
  270. </ColumnInfo>
  271. </Dataset>
  272. <Dataset id="ds_grd_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_prcplist_oncolumnchanged">
  273. <ColumnInfo>
  274. <Column id="choi" type="STRING"/>
  275. <Column id="instcd" type="STRING"/>
  276. <Column id="disp1img" type="STRING"/>
  277. <Column id="disp2img" type="STRING"/>
  278. <Column id="disp3img" type="STRING"/>
  279. <Column id="disp1" type="STRING"/>
  280. <Column id="disp2" type="STRING"/>
  281. <Column id="disp3" type="STRING"/>
  282. <Column id="spcnm" type="STRING"/>
  283. <Column id="spcbarcdno" type="STRING"/>
  284. <Column id="spccnt" type="STRING"/>
  285. <Column id="formrecseq" type="STRING"/>
  286. <Column id="pid" type="STRING"/>
  287. <Column id="patnm" type="STRING"/>
  288. <Column id="orddeptcd" type="STRING"/>
  289. <Column id="orddeptnm" type="STRING"/>
  290. <Column id="oproomnm" type="STRING"/>
  291. <Column id="orddrid" type="STRING"/>
  292. <Column id="orddrnm" type="STRING"/>
  293. <Column id="testcd" type="STRING"/>
  294. <Column id="testnm" type="STRING"/>
  295. <Column id="rcptflag" type="STRING"/>
  296. <Column id="prcprgstdt" type="STRING"/>
  297. <Column id="delivedt" type="STRING"/>
  298. <Column id="delivenm" type="STRING"/>
  299. <Column id="cnfmdt" type="STRING"/>
  300. <Column id="cnfmnm" type="STRING"/>
  301. <Column id="trandd" type="STRING"/>
  302. <Column id="tranno" type="STRING"/>
  303. <Column id="transeqno" type="STRING"/>
  304. <Column id="spctrandd" type="STRING"/>
  305. <Column id="spctranno" type="STRING"/>
  306. <Column id="spctranseqno" type="STRING"/>
  307. <Column id="preststatcd" type="STRING"/>
  308. <Column id="orgprcpstatcd" type="STRING"/>
  309. <Column id="prcpgenrflag" type="STRING"/>
  310. <Column id="prcpdd" type="STRING"/>
  311. <Column id="prcpno" type="STRING"/>
  312. <Column id="execprcpuniqno" type="STRING"/>
  313. <Column id="tretflag" type="STRING"/>
  314. <Column id="resncdkind" type="STRING"/>
  315. <Column id="resncd" type="STRING"/>
  316. <Column id="spcstatcd" type="STRING"/>
  317. <Column id="workflagcd" type="STRING"/>
  318. <Column id="acptdt" type="STRING"/>
  319. <Column id="ptno" type="STRING"/>
  320. <Column id="reqfrmflagcd" type="STRING"/>
  321. <Column id="cnfmid" type="STRING"/>
  322. <Column id="reqfrmno" type="STRING"/>
  323. <Column id="mmospccd" type="STRING"/>
  324. <Column id="backcolor" type="STRING" size="256"/>
  325. <Column id="prcpcd" type="STRING" size="256"/>
  326. <Column id="spccd" type="STRING" size="256"/>
  327. <Column id="prcpnm" type="STRING" size="256"/>
  328. <Column id="reqno" type="STRING" size="256"/>
  329. <Column id="transfernm" type="STRING" size="256"/>
  330. </ColumnInfo>
  331. </Dataset>
  332. <Dataset id="ds_init_cbo_cnclresn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  333. <ColumnInfo>
  334. <Column id="resncnts" type="STRING"/>
  335. <Column id="resncd" type="STRING"/>
  336. </ColumnInfo>
  337. </Dataset>
  338. <Dataset id="ds_init_testdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  339. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  340. <ColumnInfo>
  341. <Column id="ddfrom" type="STRING" size="256"/>
  342. <Column id="ddto" type="STRING" size="256"/>
  343. <Column id="trsmdeptcd" type="STRING" size="256"/>
  344. <Column id="testdeptcd" type="STRING" size="256"/>
  345. <Column id="seaflagcd" type="STRING" size="256"/>
  346. <Column id="barcdno" type="STRING" size="256"/>
  347. <Column id="ddflagcd" type="STRING" size="256"/>
  348. <Column id="pidno" type="STRING" size="256"/>
  349. <Column id="urine" type="STRING" size="256"/>
  350. <Column id="transferid" type="STRING" size="256"/>
  351. </ColumnInfo>
  352. <Rows>
  353. <Row>
  354. <Col id="ddfrom"/>
  355. <Col id="ddto"/>
  356. <Col id="trsmdeptcd"/>
  357. <Col id="testdeptcd"/>
  358. <Col id="seaflagcd">0</Col>
  359. <Col id="barcdno"/>
  360. <Col id="ddflagcd">0</Col>
  361. </Row>
  362. </Rows>
  363. </Dataset>
  364. <Dataset id="ds_init_sysdtinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  365. <ColumnInfo>
  366. <Column id="sysdd" type="STRING" size="256"/>
  367. <Column id="systm" type="STRING" size="256"/>
  368. </ColumnInfo>
  369. <Rows>
  370. <Row>
  371. <Col id="systm"/>
  372. <Col id="sysdd"/>
  373. </Row>
  374. </Rows>
  375. </Dataset>
  376. <Dataset id="ds_barcdprntsetup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  377. <Dataset id="ds_init_hospenvinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  378. <ColumnInfo>
  379. <Column id="instcd" type="STRING" size="256"/>
  380. <Column id="lendrtnterm" type="STRING" size="256"/>
  381. <Column id="recvqualmthdcd" type="STRING" size="256"/>
  382. <Column id="reptautoprntflagcd" type="STRING" size="256"/>
  383. </ColumnInfo>
  384. <Rows>
  385. <Row>
  386. <Col id="instcd"/>
  387. <Col id="lendrtnterm"/>
  388. <Col id="recvqualmthdcd"/>
  389. <Col id="reptautoprntflagcd"/>
  390. </Row>
  391. </Rows>
  392. </Dataset>
  393. <Dataset id="ds_spcbarcdstatinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  394. <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  395. <ColumnInfo>
  396. <Column id="loginid" type="STRING" size="256"/>
  397. <Column id="loginnm" type="STRING" size="256"/>
  398. </ColumnInfo>
  399. <Rows>
  400. <Row/>
  401. </Rows>
  402. </Dataset>
  403. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  404. <ColumnInfo>
  405. <Column id="resncd" type="STRING" size="256"/>
  406. <Column id="interval" type="STRING" size="256"/>
  407. </ColumnInfo>
  408. <Rows>
  409. <Row>
  410. <Col id="interval">10</Col>
  411. <Col id="resncd"/>
  412. </Row>
  413. </Rows>
  414. </Dataset>
  415. <Dataset id="ds_barcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  416. <Dataset id="ds_data_setupinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  417. <ColumnInfo>
  418. <Column id="dsvaluepath" type="STRING" size="256"/>
  419. <Column id="prntkind" type="STRING" size="256"/>
  420. <Column id="commkind" type="STRING" size="256"/>
  421. <Column id="rexgbn" type="STRING" size="256"/>
  422. </ColumnInfo>
  423. </Dataset>
  424. <Dataset id="ds_data_blank" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  425. <ColumnInfo>
  426. <Column id="dsvaluepath" type="STRING" size="256"/>
  427. <Column id="left" type="STRING" size="256"/>
  428. <Column id="top" type="STRING" size="256"/>
  429. <Column id="b472size" type="STRING" size="256"/>
  430. </ColumnInfo>
  431. </Dataset>
  432. <Dataset id="ds_data_comm01" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  433. <ColumnInfo>
  434. <Column id="setupval" type="STRING" size="256"/>
  435. </ColumnInfo>
  436. </Dataset>
  437. <Dataset id="ds_data_comm02" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  438. <ColumnInfo>
  439. <Column id="dsvaluepath" type="STRING" size="256"/>
  440. <Column id="comm" type="STRING" size="256"/>
  441. <Column id="databit" type="STRING" size="256"/>
  442. <Column id="stopbit" type="STRING" size="256"/>
  443. <Column id="baudrate" type="STRING" size="256"/>
  444. <Column id="parity" type="STRING" size="256"/>
  445. </ColumnInfo>
  446. <Rows>
  447. <Row>
  448. <Col id="dsvaluepath">/setupinfo</Col>
  449. <Col id="comm">2</Col>
  450. <Col id="databit">8</Col>
  451. <Col id="stopbit">1</Col>
  452. <Col id="baudrate">9600</Col>
  453. <Col id="parity">n</Col>
  454. </Row>
  455. </Rows>
  456. </Dataset>
  457. <Dataset id="ds_data_comm03" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  458. <ColumnInfo>
  459. <Column id="dsvaluepath" type="STRING" size="256"/>
  460. <Column id="comm" type="STRING" size="256"/>
  461. <Column id="databit" type="STRING" size="256"/>
  462. <Column id="stopbit" type="STRING" size="256"/>
  463. <Column id="baudrate" type="STRING" size="256"/>
  464. <Column id="parity" type="STRING" size="256"/>
  465. </ColumnInfo>
  466. <Rows>
  467. <Row>
  468. <Col id="dsvaluepath">/setupinfo</Col>
  469. <Col id="comm">2</Col>
  470. <Col id="databit">8</Col>
  471. <Col id="stopbit">1</Col>
  472. <Col id="baudrate">9600</Col>
  473. <Col id="parity">n</Col>
  474. </Row>
  475. </Rows>
  476. </Dataset>
  477. <Dataset id="ds_deny" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  478. <ColumnInfo>
  479. <Column id="pid" type="STRING" size="256"/>
  480. <Column id="rgst" type="STRING" size="256"/>
  481. <Column id="name" type="STRING" size="256"/>
  482. <Column id="deptcd" type="STRING" size="256"/>
  483. <Column id="drname" type="STRING" size="256"/>
  484. <Column id="resncd" type="STRING" size="256"/>
  485. <Column id="lcomment" type="STRING" size="256"/>
  486. <Column id="canceltime" type="STRING" size="256"/>
  487. </ColumnInfo>
  488. <Rows>
  489. <Row/>
  490. </Rows>
  491. </Dataset>
  492. <Dataset id="ds_perdeny" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  493. <ColumnInfo>
  494. <Column id="pid" type="STRING" size="256"/>
  495. <Column id="rgst" type="STRING" size="256"/>
  496. <Column id="name" type="STRING" size="256"/>
  497. <Column id="deptcd" type="STRING" size="256"/>
  498. <Column id="drname" type="STRING" size="256"/>
  499. <Column id="resncd" type="STRING" size="256"/>
  500. <Column id="lcomment" type="STRING" size="256"/>
  501. <Column id="canceltime" type="STRING" size="256"/>
  502. </ColumnInfo>
  503. <Rows>
  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="prcpdd" type="STRING" size="256"/>
  511. <Column id="execprcpuniqno" type="STRING" size="256"/>
  512. <Column id="instcd" type="STRING" size="256"/>
  513. </ColumnInfo>
  514. <Rows>
  515. <Row/>
  516. </Rows>
  517. </Dataset>
  518. <Dataset id="ds_init_dept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  519. <ColumnInfo>
  520. <Column id="depthngnm" type="STRING"/>
  521. <Column id="deptcd" type="STRING"/>
  522. </ColumnInfo>
  523. </Dataset>
  524. <Dataset id="ds_init_lb0002" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  525. <ColumnInfo>
  526. <Column id="cd" type="STRING"/>
  527. <Column id="nm" type="STRING"/>
  528. </ColumnInfo>
  529. </Dataset>
  530. <Dataset id="ds_init_usernm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  531. <ColumnInfo>
  532. <Column id="usernm" type="STRING"/>
  533. </ColumnInfo>
  534. </Dataset>
  535. <Dataset id="ds_prcpstatcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  536. <ColumnInfo>
  537. <Column id="cd" type="STRING" size="256"/>
  538. <Column id="nm" type="STRING" size="256"/>
  539. </ColumnInfo>
  540. <Rows>
  541. <Row>
  542. <Col id="cd">000</Col>
  543. <Col id="nm">처방</Col>
  544. </Row>
  545. <Row>
  546. <Col id="nm">채취/채혈</Col>
  547. <Col id="cd">410</Col>
  548. </Row>
  549. <Row>
  550. <Col id="cd">420</Col>
  551. <Col id="nm">전달/확인</Col>
  552. </Row>
  553. <Row>
  554. <Col id="nm">검체접수</Col>
  555. <Col id="cd">430</Col>
  556. </Row>
  557. <Row>
  558. <Col id="cd">510</Col>
  559. <Col id="nm">검사중</Col>
  560. </Row>
  561. <Row>
  562. <Col id="nm">예비결과</Col>
  563. <Col id="cd">710</Col>
  564. </Row>
  565. <Row>
  566. <Col id="cd">720</Col>
  567. <Col id="nm">중간결과</Col>
  568. </Row>
  569. <Row>
  570. <Col id="cd">730</Col>
  571. <Col id="nm">최종결과</Col>
  572. </Row>
  573. <Row>
  574. <Col id="cd">740</Col>
  575. <Col id="nm">추가결과</Col>
  576. </Row>
  577. </Rows>
  578. </Dataset>
  579. </Objects>
  580. <Bind>
  581. <BindItem id="item1" compid="grp_biz.grp_sea.cmbseaflagcd" propid="value" datasetid="ds_init" columnid="seaflagcd"/>
  582. <BindItem id="item2" compid="grp_biz.grp_sea.input3" propid="value" datasetid="ds_init" columnid="ddto"/>
  583. <BindItem id="item3" compid="grp_biz.grp_sea.ipt_ddfrom" propid="value" datasetid="ds_init" columnid="ddfrom"/>
  584. <BindItem id="item4" compid="grp_biz.grp_sea.cmbddflag" propid="value" datasetid="ds_init" columnid="ddflagcd"/>
  585. <BindItem id="item6" compid="grp_biz.grp_sea.ipt_pidno" propid="value" datasetid="ds_init" columnid="pidno"/>
  586. <BindItem id="item15" compid="grp_biz.grp_sea.cmborddept" propid="value" datasetid="ds_init" columnid="trsmdeptcd"/>
  587. </Bind>
  588. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  589. * System Name :
  590. * Job Name :
  591. * Creator :
  592. * Make Date : 2015-11-13
  593. * Description :
  594. *---------------------------------------------------------------------------------------
  595. * Modify Date Modifier Modify Description
  596. *---------------------------------------------------------------------------------------
  597. * 2015-11-13 Live Converter TF->XP
  598. *
  599. *---------------------------------------------------------------------------------------
  600. ****************************************************************************************/
  601. include "com_commonxp::comm_main.xjs";
  602. include "lis_commonxp::LLZ001.xjs";
  603. include "lis_commonxp::LPZ001.xjs";
  604. include "com_commodulexp::SSZFM00901.xjs";
  605. var COL_SPCINFO = 11;
  606. var interval_id;
  607. var sAutoSearYN = "N";
  608. var iAcptPrcpCnt = Array(); // 수신확인한 검체 갯수
  609. var sBarCode = "";
  610. var iCnt = 0;
  611. var arErrorCode = new HashArray();
  612. var param = "";
  613. function SMLPJ00200_oninit(obj:Form, e:InitEventInfo)
  614. {
  615. frmf_initForm(obj); // 화면공통
  616. }
  617. function SMLPJ00200_onload(obj:Form, e:LoadEventInfo)
  618. {
  619. fExeInitialize();
  620. grdf_initGrid(grp_biz.grd_prcplist);
  621. //lzzfMakeBrcdPrntObjHanDo("CommAX");
  622. }
  623. function fExeInitialize()
  624. {
  625. //타부서에서는 버튼 비활성화
  626. grp_btn.btn_save.enable = frmf_checkAuth("X");
  627. grp_btn.btn_cnfm.enable = frmf_checkAuth("X");
  628. var iMaxRowCnt = 0;
  629. var instcd = sysf_getUserInfo("dutdmlplceinstcd");
  630. var standard_yn = "orduseyn";
  631. var ord_deptflag = "D";
  632. //var rslt_ref = "/root/init/deptlist";
  633. var sort_field = "dispseq";
  634. var sort_method = "asc";
  635. appf_getDeptCodeList(instcd,standard_yn,ord_deptflag,sort_field,"","","","","ds_init_cmb_trsmdeptcd",false,"");
  636. //--------------
  637. // 시행부서 검색
  638. ord_deptflag = "E";
  639. appf_getDeptCodeList(instcd,standard_yn,ord_deptflag,sort_field,"","","","","ds_init_testdept",false,"");
  640. //-------------------------------------------------------
  641. iMaxRowCnt = ds_init_testdept.rowcount;
  642. ds_init_testdept.filter("deptcd == ''");
  643. ds_init_testdept.applyChange();
  644. ds_init_testdept.clearData();
  645. ds_init_testdept.filter("");
  646. for (var iNo=0; iNo < ds_init_testdept.rowcount; iNo++)
  647. {
  648. ds_init_testdept.setColumn(iNo,"deptflagcd", "E");
  649. }
  650. //---------------------------------------------------------
  651. ds_init_cmb_trsmdeptcd.filter("deptcd == ''");
  652. ds_init_cmb_trsmdeptcd.applyChange();
  653. ds_init_cmb_trsmdeptcd.clearData();
  654. ds_init_cmb_trsmdeptcd.filter("");
  655. for (var iNo=0; iNo < ds_init_cmb_trsmdeptcd.rowcount; iNo++)
  656. {
  657. ds_init_cmb_trsmdeptcd.setColumn(iNo,"deptflagcd", "-");
  658. }
  659. dsf_copyDs(ds_init_cmb_trsmdeptcd,ds_init_testdept,"after");
  660. //-------------------------------------------------------
  661. iMaxRowCnt = ds_init_cmb_trsmdeptcd.addRow();
  662. ds_init_cmb_trsmdeptcd.setColumn(iMaxRowCnt,"deptcd", "ZZZZZ");
  663. ds_init_cmb_trsmdeptcd.setColumn(iMaxRowCnt,"depthngnm", "전 체");
  664. //---------------------
  665. // Instance Node 초기화
  666. ds_grd_prcplist.clearData();
  667. //---------------------
  668. // 병원환경설정 정보조회
  669. fGetHospEnvSetInfo();
  670. //------------------------------------------
  671. ds_init.setColumn(0,"barcdno", ""); // 바코드번호 초기화
  672. ds_init.setColumn(0,"trsmdeptcd", ""); // 발송과 초기화
  673. ds_init.setColumn(0,"ddflagcd", "0"); // 일자구분코드(0:발송일자, 1:수신일자)
  674. ds_init.setColumn(0,"seaflagcd", "0"); // 검색방법(0:미확인, 1:확인, 2:전체)
  675. ds_init.setColumn(0,"trsmdeptcd", "ZZZZZ");
  676. //--------------------------------------------------
  677. dsf_createDsRow("ds_send_scrnid", [{col: "scrnid", val: frmf_getScreenID()}]);
  678. var oParam = {};
  679. oParam.id = "TRLLC90101";
  680. oParam.service = "diagtestapplib.LisCommon";
  681. oParam.method = "reqGetSetUpInfo";
  682. oParam.inds = "scrnid=ds_send_scrnid";
  683. oParam.outds = "ds_barcdprntsetup=getSetUpInfo";
  684. oParam.async = false;
  685. oParam.callback = "cf_TRLLC90101";
  686. tranf_submit(oParam);
  687. //---------------------------------
  688. // 수신확인방법(0:선조회, 1:후조회)
  689. if (ds_init_hospenvinfo.getColumn(0,"recvqualmthdcd") == "0") {
  690. fGetPrcpCnfmList("1");
  691. }
  692. dsf_createDsRow("ds_temp_search"
  693. , [{col: "codeflag", val: "0002|"}]);
  694. // 서브밋호출
  695. var oParam = {};
  696. oParam.id = "TRLZZ00101";
  697. oParam.service = "diagtestapplib.DiagTestBaseInfoMngt";
  698. oParam.method = "reqGetInitCodeInfo";
  699. oParam.inds = "cond=ds_temp_search";
  700. oParam.outds = "ds_init_lb0002=0002 ";
  701. oParam.async = false;
  702. tranf_submit(oParam);
  703. grp_biz.grp_sea.cmborddept.value = '00';
  704. }
  705. function cf_TRLLC90101(sSvcId, nErrorCode, sErrorMsg)
  706. {
  707. if(nErrorCode < 0) return;
  708. var pParamObj = new Object();
  709. pParamObj.pathYN = "N";
  710. pParamObj.nullColumnYN = "N";
  711. lf_convertXmlToDs(ds_barcdprntsetup.getColumn(0,"prntsetupinfo"),pParamObj);
  712. }
  713. function cf_TXLPJ00202(sSvcId, nErrorCode, sErrorMsg)
  714. {
  715. if(nErrorCode < 0) return;
  716. var pParamObj = new Object();
  717. pParamObj.pathYN = "N";
  718. pParamObj.nullColumnYN = "N";
  719. lf_convertXmlToDs(ds_barcdprntsetup.getColumn(0,"prntsetupinfo"),pParamObj);
  720. }
  721. function cf_TXLPJ00203(sSvcId, nErrorCode, sErrorMsg)
  722. {
  723. if(nErrorCode < 0) return;
  724. var pParamObj = new Object();
  725. pParamObj.pathYN = "N";
  726. pParamObj.nullColumnYN = "N";
  727. }
  728. /* @group : 전달검체수신확인
  729. * @ver : 2007.02.12 (CMCDEV-0001)
  730. * @by : 유동철(ACK)
  731. * @-----------------------------------
  732. * @type : function
  733. * @access : public
  734. * @desc : 병원환경설정 정보조회 처리 Function
  735. */
  736. function fGetHospEnvSetInfo()
  737. {
  738. dsf_createDsRow("ds_send_refdata", [{col: "instcd", val:sysf_getUserInfo("dutplceinstcd")}]);
  739. var oParam = {};
  740. oParam.id = "TRLPZ00101";
  741. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  742. oParam.method = "reqGetHospitalEnvironmentSetInfo";
  743. oParam.inds = "refData=ds_send_refdata";
  744. oParam.outds = "ds_init_hospenvinfo=hospenvinfo";
  745. oParam.async = false;
  746. // oParam.callback = "cf_TRLPZ00101";
  747. tranf_submit(oParam);
  748. //--------------------
  749. var oParam = {};
  750. oParam.id = "TRLPZ00102";
  751. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  752. oParam.method = "reqGetSystemDateTimeInformation";
  753. oParam.inds = "refData=ds_send_refdata";
  754. oParam.outds = "ds_init_sysdtinfo=sysdtinfo";
  755. oParam.async = false;
  756. //oParam.callback = "cf_TRLPZ00102";
  757. tranf_submit(oParam); // 시스템 현재일시를 조회
  758. fExeSysDtSet(); // 시스템일자를 설정
  759. //----------------------------------------------
  760. dsf_createDsRow("ds_send_refdata"
  761. , [{col: "instcd", val:sysf_getUserInfo("dutplceinstcd")}
  762. ,{col: "baseflagcd", val:"'20'"}
  763. ]);
  764. var oParam = {};
  765. oParam.id = "TRLPZ00103";
  766. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  767. oParam.method = "reqGetReasonCodeList";
  768. oParam.inds = "refData=ds_send_refdata";
  769. oParam.outds = "ds_init_cbo_cnclresn=refrslt";
  770. oParam.async = false;
  771. //oParam.callback = "cf_TRLPZ00103";
  772. tranf_submit(oParam);
  773. ds_init_cbo_cnclresn.filterstr = "resncd != 'ZZZZ'";
  774. }
  775. /* @group : 전달검체수신확인
  776. * @ver : 2007.02.12 (CMCDEV-0001)
  777. * @by : 유동철(ACK)
  778. * @-----------------------------------
  779. * @type : function
  780. * @access : public
  781. * @desc : 시스템일시 설정 처리 Function
  782. */
  783. function fExeSysDtSet()
  784. {
  785. var sTDay = ds_init_sysdtinfo.getColumn(0,"sysdd");
  786. ds_init.setColumn(0,"ddfrom", sTDay.toDate().getAddDate(-3,"D").getDateFormat("YYYYMMDD"));
  787. ds_init.setColumn(0,"ddto", ds_init_sysdtinfo.getColumn(0,"sysdd"));
  788. }
  789. /* @group : 전달검체수신확인
  790. * @ver : 2007.02.12 (CMCDEV-0001)
  791. * @by : 유동철(ACK)
  792. * @-----------------------------------
  793. * @type : function
  794. * @access : public
  795. * @desc : 의뢰지 검체정보 조회 처리 Function
  796. */
  797. function fExePopupOpenSpeciman()
  798. {
  799. if(!utlf_isNull(ds_grd_prcplist.getColumn(ds_grd_prcplist.rowposition,"pid")))
  800. {
  801. ds_grd_prcplist.setColumn(ds_grd_prcplist.rowposition,"testhngnm",
  802. ds_grd_prcplist.getColumn(ds_grd_prcplist.rowposition,"testnm"));
  803. ds_grd_prcplist.setColumn(ds_grd_prcplist.rowposition,"reprspccd",
  804. ds_grd_prcplist.getColumn(ds_grd_prcplist.rowposition,"mmospccd"));
  805. ds_grd_prcplist.setColumn(ds_grd_prcplist.rowposition,"prcpcd",
  806. ds_grd_prcplist.getColumn(ds_grd_prcplist.rowposition,"testcd"));
  807. ds_grd_prcplist.setColumn(ds_grd_prcplist.rowposition,"spccd",
  808. ds_grd_prcplist.getColumn(ds_grd_prcplist.rowposition,"mmospccd"));
  809. ds_grd_prcplist.setColumn(ds_grd_prcplist.rowposition,"prcpnm",
  810. ds_grd_prcplist.getColumn(ds_grd_prcplist.rowposition,"testnm"));
  811. ds_grd_prcplist.setColumn(ds_grd_prcplist.rowposition,"reqno",
  812. ds_grd_prcplist.getColumn(ds_grd_prcplist.rowposition,"reqfrmno"));
  813. lpzfExeReqFrmInfo(ds_grd_prcplist, ds_grd_prcplist.rowposition);
  814. }
  815. }
  816. /* @group : 전달검체수신확인
  817. * @ver : 2007.02.12 (CMCDEV-0001)
  818. * @by : 유동철(ACK)
  819. * @-----------------------------------
  820. * @type : function
  821. * @access : public
  822. * @desc : "처방리스트" 그리트 클릭 처리 Function
  823. */
  824. function fExeOrdListClick()
  825. {
  826. switch (grp_biz.grd_prcplist.currentcol)
  827. {
  828. case COL_SPCINFO : fExePopupOpenSpeciman();
  829. break;
  830. }
  831. }
  832. function cf_TRLPJ00203(sSvcId, nErrorCode, sErrorMsg)
  833. {
  834. arErrorCode.push(sSvcId, nErrorCode);
  835. }
  836. function cf_TRLPJ00204(sSvcId, nErrorCode, sErrorMsg)
  837. {
  838. arErrorCode.push(sSvcId, nErrorCode);
  839. }
  840. //조회
  841. function fGetPrcpCnfmList(param)
  842. {
  843. var bState = false;
  844. var iMaxRowCnt = 0;
  845. var sDeptFlagCd = "";
  846. // // 선 조회일 경우 처리(0:선조회, 1:후조회)
  847. // if (ds_init_hospenvinfo.getColumn(0, "recvqualmthdcd") == "0")
  848. // {
  849. // trace("123");
  850. // //-------------------------------------
  851. // // 바코드번호 입력 후 검색 할 경우 처리
  852. // if (param == "0")
  853. // {
  854. // trace("456");
  855. // dsf_createDsRow("ds_send_refdata" , [{col: "instcd", val:sysf_getUserInfo("dutplceinstcd")}
  856. // ,{col: "spcbarcdno", val:grp_biz.grp_sea.ipt_barcdno.value}]);
  857. //
  858. //
  859. //
  860. // var oParam = {};
  861. // oParam.id = "TRLPJ00203";
  862. // oParam.service = "plgyacptmngtapp.SpecimenAccept";
  863. // oParam.method = "reqGetSpcBarCdInfo";
  864. // oParam.inds = "refData=ds_send_refdata";
  865. // oParam.outds = "ds_spcbarcdstatinfo=reflist";
  866. // oParam.async = false;
  867. // oParam.callback = "cf_TRLPJ00203";
  868. //
  869. // tranf_submit(oParam);
  870. //
  871. // if (arErrorCode.pop("TRLPJ00203") > -1)
  872. // {
  873. //
  874. // // 검색방법:미확인
  875. // if (ds_init.getColumn(0,"seaflagcd") == "0")
  876. // {
  877. // if (ds_spcbarcdstatinfo.getColumn(0,"spcstatcd") != "0")
  878. // {
  879. // sysf_messageBox(ds_spcbarcdstatinfo.getColumn(0,"spcstatnm"), "I007");
  880. // return false;
  881. // }
  882. // }
  883. // else if (ds_init.getColumn(0,"seaflagcd") == "1")
  884. // {
  885. // if (ds_spcbarcdstatinfo.getColumn(0,"spcstatcd") != "2"
  886. // && ds_spcbarcdstatinfo.getColumn(0,"spcstatcd") != "5")
  887. // {
  888. // sysf_messageBox(ds_spcbarcdstatinfo.getColumn(0,"spcstatnm"), "I007");
  889. // return false;
  890. // }
  891. // }
  892. // }
  893. // else
  894. // {
  895. // sysf_messageBox("바코드 정보를 조회할 수 없습니다!", "I007");
  896. // return false;
  897. // }
  898. // }
  899. // else
  900. // {
  901. // //ds_grd_prcplist.clearData();
  902. // bState = true;
  903. // }
  904. // }
  905. // else
  906. // {
  907. // bState = true;
  908. // }
  909. // trace("bState="+bState);
  910. bState = true;
  911. if (bState)
  912. {
  913. //---------------------------------
  914. sDeptFlagCd = ds_init_cmb_trsmdeptcd.lookup("deptcd",ds_init.getColumn(0,"trsmdeptcd"),"deptflagcd");
  915. dsf_createDsRow("ds_send_refdata" , [{col: "instcd", val:sysf_getUserInfo("dutplceinstcd")} // 기관코드
  916. ,{col: "fromdd", val:ds_init.getColumn(0,"ddfrom")} // 검색시작일자
  917. ,{col: "todd", val:ds_init.getColumn(0,"ddto")} // 검색종료일자
  918. ,{col: "barcdno", val:ds_init.getColumn(0,"barcdno")} // 바코드번호
  919. ,{col: "delivedeptcd", val:ds_init.getColumn(0,"trsmdeptcd")} // 발송과코드
  920. ,{col: "ddflagcd", val:ds_init.getColumn(0,"ddflagcd")} // 일자구분코드(0:발송일자,1:수신일자)
  921. ,{col: "refflagcd", val:ds_init.getColumn(0,"seaflagcd")} // 검색구분코드(0:미확인,1:확인,2:전체)
  922. ,{col: "trsmdeptcd", val:ds_init.getColumn(0,"trsmdeptcd")} // 발송과
  923. ,{col: "deptflagcd", val:sDeptFlagCd} // 발송과 구분(E:시행부서)
  924. ,{col: "pidno", val:ds_init.getColumn(0,"pidno")} // 등록번호
  925. ,{col: "urinecheck", val:grp_biz.grp_sea.checkbox5.value}]);
  926. // ds_init_lb0002 변경 ,{col: "pidno", val:ds_init.getColumn(0,"pidno")}]); // 등록번호 backup 2018.5.8
  927. var oParam = {};
  928. oParam.id = "TRLPJ00201";
  929. oParam.service = "plgyacptmngtapp.SpecimenAccept";
  930. oParam.method = "reqGetPrcpCnfmList";
  931. oParam.inds = "refData=ds_send_refdata";
  932. oParam.outds = "ds_grd_prcplist=refrslt";
  933. oParam.async = false;
  934. //oParam.callback = "cf_TRLPJ00201";
  935. tranf_submit(oParam);
  936. //return true;
  937. // if (arErrorCode.pop("TRLPJ00201") > -1)
  938. // {
  939. // // 후 조회, 바코드입력시에만 처리
  940. // //if (ds_init_hospenvinfo.getColumn(0,"recvqualmthdcd") != "0" && param == "0")
  941. // if (ds_init_hospenvinfo.getColumn(0,"recvqualmthdcd") == "0" && param == "0")
  942. // {
  943. // //---------------------------------------------------------------
  944. // iMaxRowCnt = ds_grd_prcplist.rowcount;
  945. //
  946. // if (iMaxRowCnt > 24)
  947. // {
  948. // ds_grd_prcplist.rowposition = Number(iMaxRowCnt) - 24;
  949. // grp_biz.grd_prcplist.vscrollbar.pos = Number(iMaxRowCnt) - 24;
  950. // }
  951. //
  952. // // 바코드로 조회한 경우 해당되는 바코드의 색을 변경
  953. // for(var i = 0; i < ds_grd_prcplist.rowcount; i++)
  954. // {
  955. // if(ds_grd_prcplist.getColumn(i, "spcbarcdno") == grp_biz.grp_sea.ipt_barcdno.value)
  956. // {
  957. // for(var j=0; j<=46; j++)
  958. // {
  959. // grp_biz.grd_prcplist.setCellProperty("body", j, "background-color", "#99ffcc");
  960. // }
  961. // }
  962. // }
  963. // //ds_grd_prcplist.setColumn(ds_grd_prcplist.rowcount-1,"backcolor","#99ffcc");
  964. //
  965. // }
  966. // else if (ds_init_hospenvinfo.getColumn(0,"recvqualmthdcd") == "0") // 선조회일 경우 자동선택을 비활성화 한다.
  967. // {
  968. // for (var iNo=0; iNo < ds_grd_prcplist.rowcount; iNo++)
  969. // {
  970. // ds_grd_prcplist.setColumn(iNo,"choi", "0");
  971. // }
  972. // }
  973. // }
  974. }
  975. }
  976. function cf_TRLPJ00201(sSvcId, nErrorCode, sErrorMsg)
  977. {
  978. arErrorCode.push(sSvcId, nErrorCode);
  979. ds_grd_prcplist.addColumn("choi","string");
  980. ds_grd_prcplist.addColumn("backcolor","string");
  981. ds_grd_prcplist.addColumn("testhngnm","string");
  982. ds_grd_prcplist.addColumn("reprspccd","string");
  983. ds_grd_prcplist.addColumn("tretflag","string");
  984. ds_grd_prcplist.addColumn("resncdkind","string");
  985. ds_grd_prcplist.addColumn("resncd","string");
  986. ds_grd_prcplist.addColumn("workflagcd","string");
  987. for (var i = 0; i< ds_grd_prcplist.rowcount; i++)
  988. {
  989. ds_grd_prcplist.setColumn(i,"choi","1");
  990. }
  991. }
  992. function fSelectBarcdInfo(sCheck)
  993. {
  994. // var sBarCode = grp_biz.grp_sea.ipt_barcdno.value;
  995. if(sCheck == "1")
  996. {
  997. ds_init.setColumn(0,"pidno", "-");
  998. ds_init.setColumn(0,"barcdno", sBarCode.toUpperCase());
  999. }
  1000. else if(sCheck == "2")
  1001. {
  1002. ds_init.setColumn(0,"barcdno", "-");
  1003. ds_init.setColumn(0,"pidno", grp_biz.grp_sea.ipt_pidno.value);
  1004. }
  1005. // 바코드 길이 검사(11자리가 아닐경우 바코드 오류)
  1006. if ((sCheck == "1") && (sBarCode.length != 11))
  1007. {
  1008. sysf_messageBox("바코드번호 오류", "E008");
  1009. return false;
  1010. }
  1011. fGetPrcpCnfmList("0");
  1012. if(sCheck == "1")
  1013. {
  1014. ds_init.setColumn(0,"barcdno", "");
  1015. grp_biz.grp_sea.ipt_barcdno.setFocus();
  1016. }
  1017. else if(sCheck == "2")
  1018. {
  1019. ds_init.setColumn(0,"pidno", "");
  1020. grp_biz.grp_sea.ipt_pidno.setFocus();
  1021. }
  1022. }
  1023. /* @group : 전달검체수신확인
  1024. * @ver : 2007.05.07 (CMCDEV-0001)
  1025. * @by : 유동철(ACK)
  1026. * @-----------------------------------
  1027. * @type : function
  1028. * @access : public
  1029. * @desc : 바코드번호 검색 처리 Function
  1030. */
  1031. function fExeBarCdNoSea(sBarCdNo, pMaxRow)
  1032. {
  1033. var iFindRowNo = -1;
  1034. var iRowNo = 0;
  1035. //------------------------------
  1036. if (utlf_isNull(sBarCdNo)) return true;
  1037. do{
  1038. iFindRowNo = ds_grd_prcplist.findRow("spcbarcdno", sBarCdNo, iFindRowNo+1);
  1039. //iRowNo = Number(iFindRowNo) + 1;
  1040. //alert("iRowNo="+iRowNo);
  1041. //---------------------------
  1042. if (Number(iFindRowNo) > -1)
  1043. {
  1044. if (ds_grd_prcplist.getColumn(iFindRowNo, "choi") == "0")
  1045. {
  1046. ds_grd_prcplist.enableevent = false;
  1047. ds_grd_prcplist.setColumn(iFindRowNo, "choi", "1");
  1048. ds_grd_prcplist.setColumn(iFindRowNo, "backcolor", "#99ffcc");
  1049. ds_grd_prcplist.enableevent = true;
  1050. if ((Number(pMaxRow) - 24) > 0)
  1051. {
  1052. if (iFindRowNo < (Number(pMaxRow) - 24))
  1053. {
  1054. ds_grd_prcplist.rowposition = iFindRowNo;
  1055. grp_biz.grd_prcplist.vscrollbar.pos = iFindRowNo;
  1056. }
  1057. else
  1058. {
  1059. ds_grd_prcplist.rowposition = Number(pMaxRow) - 24;
  1060. grp_biz.grd_prcplist.vscrollbar.pos = Number(pMaxRow) - 24;
  1061. }
  1062. }
  1063. }
  1064. else
  1065. {
  1066. sysf_messageBox("검색된 바코드번호", "E008");
  1067. return false;
  1068. }
  1069. }
  1070. else
  1071. {
  1072. return true;
  1073. }
  1074. }
  1075. while (iFindRowNo != -1);
  1076. }
  1077. function fExeRefMthdChange()
  1078. {
  1079. fGetPrcpCnfmList("1");
  1080. }
  1081. function grp_biz_grp_sea_ipt_pidno_onkeydown(obj:Edit, e:KeyEventInfo)
  1082. {
  1083. if(e.keycode == 13)
  1084. {
  1085. ds_grd_prcplist.clearData();
  1086. if(utlf_isNull(obj.value))
  1087. {
  1088. alert("등록번호를 입력하세요");
  1089. grp_biz.grp_sea.ipt_pidno.setFocus();
  1090. }
  1091. else
  1092. {
  1093. ds_init.setColumn(0, "pidno", obj.value);
  1094. fGetPrcpCnfmList("1");
  1095. }
  1096. //ds_init_hospenvinfo.setColumn(0,"recvqualmthdcd", "0");
  1097. }
  1098. }
  1099. function ds_grd_prcplist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1100. {
  1101. obj.enableevent = false;
  1102. if(e.columnid == "choi")
  1103. {
  1104. sBarCdNo = ds_grd_prcplist.getColumn(e.row,"spcbarcdno");
  1105. for (var iNo=0; iNo < obj.rowcount; iNo++)
  1106. {
  1107. if(obj.getColumn(iNo,"spcbarcdno") == sBarCdNo)
  1108. {
  1109. obj.setColumn(iNo,"choi", obj.getColumn(e.row,"choi"));
  1110. if( obj.getColumn(e.row,"choi") == "0")
  1111. {
  1112. ds_grd_prcplist.setColumn(iNo,"backcolor","#FFFFFF");
  1113. }
  1114. else
  1115. {
  1116. ds_grd_prcplist.setColumn(iNo,"backcolor","#99ffcc");
  1117. }
  1118. }
  1119. }
  1120. }
  1121. obj.enableevent = true;
  1122. }
  1123. function grp_btn_button26_onclick(obj:Button, e:ClickEventInfo)
  1124. {
  1125. var objArg = new Object();
  1126. if(ds_barcdprntsetup.rowcount == 0)
  1127. {
  1128. ds_barcdprntsetup.addRow();
  1129. }
  1130. objArg.arg_sSetupInfo = ds_barcdprntsetup.getColumn(0,"prntsetupinfo");
  1131. objArg.arg_sCallBackFunction = "lf_convertXmlToDs";
  1132. frmf_modal("SPLLC90100","SPLLC90100",objArg,"","","","","","","","","","M");
  1133. ds_barcdprntsetup.setColumn(0, "prntsetupinfo", frmf_getParameter("SetupInfo"));
  1134. }
  1135. function SMLPJ00200_ontimer(obj:Form, e:TimerEventInfo)
  1136. {
  1137. fGetPrcpCnfmList("1");
  1138. }
  1139. function grp_biz_grp_sea_cmbseaflagcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1140. {
  1141. //obj.updateToDataset();
  1142. //fExeRefMthdChange();
  1143. }
  1144. function grp_biz_grp_sea_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  1145. {
  1146. var ddflag = "";
  1147. ddflag = fsetRefFromdd();
  1148. if(ddflag)
  1149. {
  1150. if(utlf_isNull(grp_biz.grp_sea.ipt_pidno.value))
  1151. {
  1152. if(grp_biz.grp_sea.cmborddept.value == "00")
  1153. {
  1154. alert("진료과를 선택해주세요.");
  1155. }
  1156. else
  1157. {
  1158. fGetPrcpCnfmList("1");
  1159. }
  1160. }
  1161. else
  1162. {
  1163. fGetPrcpCnfmList("1");
  1164. }
  1165. }
  1166. }
  1167. function grp_biz_grd_prcplist_oncellclick(obj:Grid, e:GridClickEventInfo)
  1168. {
  1169. fExeOrdListClick();
  1170. }
  1171. function grp_btn_btn_save_onclick(obj:Button, e:ClickEventInfo)
  1172. {
  1173. //fExePrcpCnfm("0");
  1174. fGetPrcpCnfmList("1");
  1175. ds_init.setColumn(0,'transferid',"");
  1176. ds_init_usernm.setColumn(0,'usernm',"");
  1177. }
  1178. function grp_btn_btn_excel_onclick(obj:Button, e:ClickEventInfo)
  1179. {
  1180. grdf_exportExcel(grp_biz.grd_prcplist, "전달검체수신확인");
  1181. }
  1182. function grp_btn_btn_clear_onclick(obj:Button, e:ClickEventInfo)
  1183. {
  1184. ds_grd_prcplist.clearData();
  1185. }
  1186. function grp_btn_btn_cnfm2_onclick(obj:Button, e:ClickEventInfo)
  1187. {
  1188. grp_deny.visible = true;
  1189. //ds_deny.setColumn(0, "canceltime", utlf_getCurrentDateTime());
  1190. //-----------------------
  1191. // 블럭번호 지정여부 확인
  1192. for(var iRowNo = 0; iRowNo < ds_grd_prcplist.rowcount; iRowNo++)
  1193. {
  1194. if(ds_grd_prcplist.getColumn(iRowNo, "choi") == 1)
  1195. {
  1196. ds_send.setColumn(0, "instcd", ds_grd_prcplist.getColumn(iRowNo, "instcd"));
  1197. ds_send.setColumn(0, "pid", ds_grd_prcplist.getColumn(iRowNo, "pid"));
  1198. ds_send.setColumn(0, "prcpdd", ds_grd_prcplist.getColumn(iRowNo, "prcpdd"));
  1199. ds_send.setColumn(0, "execprcpuniqno", ds_grd_prcplist.getColumn(iRowNo, "execprcpuniqno"));
  1200. var oParam = {};
  1201. oParam.id = "TRLPJ00204";
  1202. oParam.service = "plgyacptmngtapp.SpecimenAccept";
  1203. oParam.method = "reqGetBujukList";
  1204. oParam.inds = "refData=ds_send";
  1205. oParam.outds = "ds_perdeny=reflist";
  1206. oParam.async = false;
  1207. oParam.callback = "cf_TRLPJ00204";
  1208. tranf_submit(oParam);
  1209. if(ds_perdeny.rowcount > 0)
  1210. {
  1211. ds_deny.setColumn(0,"resncd",ds_perdeny.getColumn(0,"resncd"));
  1212. ds_deny.setColumn(0,"lcomment",ds_perdeny.getColumn(0,"lcomment"));
  1213. ds_deny.setColumn(0,"canceltime",ds_perdeny.getColumn(0,"canceltime"));
  1214. }
  1215. else
  1216. {
  1217. ds_deny.setColumn(0,"resncd",'');
  1218. ds_deny.setColumn(0,"lcomment",'');
  1219. ds_deny.setColumn(0, "canceltime", utlf_getCurrentDateTime());
  1220. }
  1221. ds_deny.setColumn(0,"pid",ds_grd_prcplist.getColumn(iRowNo,"pid"));
  1222. ds_deny.setColumn(0,"name",ds_grd_prcplist.getColumn(iRowNo,"patnm"));
  1223. ds_deny.setColumn(0,"deptcd",ds_grd_prcplist.getColumn(iRowNo,"orddeptnm"));
  1224. ds_deny.setColumn(0,"drname",ds_grd_prcplist.getColumn(iRowNo,"orddrnm"));
  1225. // ds_deny.setColumn(0,"name",ds_grd_prcplist.getColumn(iRowNo,"orddeptnm"));
  1226. }
  1227. }
  1228. }
  1229. function fExePrcpCnfm2(param)
  1230. {
  1231. var iRowNo = ds_grd_prcplist.findRow("choi","1");
  1232. var iNo = 0;
  1233. if (iRowNo < 0)
  1234. {
  1235. sysf_messageBox("처방을 선택하여 주십시오! 확인을", "E001");
  1236. return false;
  1237. }
  1238. // 확인취소일 경우 취소사유 입력여부를 검사
  1239. if (param == "1")
  1240. {
  1241. if (!frmf_isRequiredControls(new Array("grp_deny.cbo_cnclresn"))) return false;
  1242. }
  1243. // 선택여부에 따라 접수검체가 존재하는지 검사
  1244. for (iRowNo=0; iRowNo < ds_grd_prcplist.rowcount; iRowNo++)
  1245. {
  1246. if (ds_grd_prcplist.getColumn(iRowNo,"choi") == "1")
  1247. {
  1248. if (ds_grd_prcplist.getColumn(iRowNo,"preststatcd") == "5" && ds_grd_prcplist.getColumn(iRowNo,"spcstatcd") == "5")
  1249. {
  1250. if (param == "1" && ds_grd_prcplist.getColumn(iRowNo,"workflagcd") == "1002")
  1251. {
  1252. // Continue
  1253. }
  1254. else
  1255. {
  1256. sysf_messageBox("접수된 처방은 확인 및 확인취소를 ", "E001");
  1257. return false;
  1258. }
  1259. }
  1260. }
  1261. }
  1262. // 선택여부에 따라 그리드 변경상태를 설정
  1263. for (iRowNo=0; iRowNo < ds_grd_prcplist.rowcount; iRowNo++)
  1264. {
  1265. if (ds_grd_prcplist.getColumn(iRowNo,"choi") == "1")
  1266. {
  1267. //검체접수자를 화면 오픈시 확인한 사람으로 등록.
  1268. grdf_setStatus(grp_biz.grd_prcplist, "U", iRowNo)
  1269. }
  1270. // 처리구분 추가
  1271. ds_grd_prcplist.setColumn(iRowNo,"tretflag", param);
  1272. ds_grd_prcplist.setColumn(iRowNo,"resncdkind", ds_deny.getColumn(0,"resncd")); //사유
  1273. ds_grd_prcplist.setColumn(iRowNo,"resncd", ds_deny.getColumn(0,"lcomment")); //조치사항
  1274. }
  1275. dsf_createDs("ds_send_updatedata");
  1276. ds_grd_prcplist.filter("choi == '1'");
  1277. ds_send_updatedata.copyData(ds_grd_prcplist,true);
  1278. ds_grd_prcplist.filter("");
  1279. ds_send_updatedata.addColumn("instcd","string");
  1280. for(var i=0;i<ds_send_updatedata.rowcount;i++)
  1281. {
  1282. ds_send_updatedata.setColumn(i,"instcd",sysf_getUserInfo("dutplceinstcd"));
  1283. }
  1284. // 검채 수신 확인 갯수 구하기 iNo
  1285. for (iRowNo=0; iRowNo < ds_grd_prcplist.rowcount; iRowNo++)
  1286. {
  1287. var sBarcdTmp = ds_grd_prcplist.getColumn(iRowNo,"spcbarcdno");
  1288. if (ds_grd_prcplist.getColumn(iRowNo,"choi") == "1")
  1289. {
  1290. if(iNo == 0)
  1291. {
  1292. iAcptPrcpCnt[iNo] = sBarcdTmp;
  1293. iNo++;
  1294. }
  1295. else
  1296. {
  1297. var iCheck = 0;
  1298. for(var i = 0; i < iAcptPrcpCnt.length; i++)
  1299. {
  1300. if (sBarcdTmp == iAcptPrcpCnt[i])
  1301. {
  1302. iCheck = 1;
  1303. break;
  1304. }
  1305. }
  1306. if(iCheck == 0)
  1307. {
  1308. iAcptPrcpCnt[iNo] = sBarcdTmp;
  1309. iNo++;
  1310. }
  1311. }
  1312. }
  1313. }
  1314. if(iAcptPrcpCnt.length > 0)
  1315. {
  1316. if(param == "0")
  1317. {
  1318. sysf_messageBox("바코드 " + iAcptPrcpCnt.length + " 건 확인 ", "I001");
  1319. }
  1320. else if (param == "1")
  1321. {
  1322. sysf_messageBox("바코드 " + iAcptPrcpCnt.length + " 건 부적합 취소 ", "I001");
  1323. }
  1324. iAcptPrcpCnt = Array();
  1325. iCnt = 0;
  1326. }
  1327. var oParam = {};
  1328. oParam.id = "TXLPJ00202";
  1329. oParam.service = "plgyacptmngtapp.SpecimenAccept";
  1330. oParam.method = "reqExePrcpCnfm2";
  1331. oParam.inds = "refData=ds_send_updatedata";
  1332. oParam.outds = "ds_barcdlist=reflist";
  1333. oParam.async = false;
  1334. oParam.callback = "cf_TXLPJ00202";
  1335. tranf_submit(oParam);
  1336. }
  1337. function grp_biz_grp_sea_input3_onkeyup(obj:Calendar, e:KeyEventInfo)
  1338. {
  1339. if(e.keycode == 13)
  1340. {
  1341. fGetPrcpCnfmList("1");
  1342. }
  1343. }
  1344. function grp_biz_grp_sea_cmbddflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1345. {
  1346. }
  1347. // 조회일자 3일 이전으로 못가게 막기
  1348. function fsetRefFromdd()
  1349. {
  1350. var todd = ds_init.getColumn(0,"ddto");
  1351. var mDate = todd.toDate("YYYYMMDD").getAddDate(-3);
  1352. var fromdd = ds_init.getColumn(0,"ddfrom");
  1353. trace("mDate = " + mDate.getDateFormat("YYYYMMDD"));
  1354. trace("fromdd = " + fromdd);
  1355. if(utlf_isNull(grp_biz.grp_sea.ipt_pidno.value))
  1356. {
  1357. if(mDate.getDateFormat("YYYYMMDD") > fromdd)
  1358. {
  1359. sysf_messageBox("3일 이내의 기간만 검색","I006");
  1360. return false;
  1361. }
  1362. else if(todd < fromdd)
  1363. {
  1364. sysf_messageBox("기간설정이 잘못", "E005");
  1365. return false;
  1366. }
  1367. else
  1368. {
  1369. return true;
  1370. }
  1371. }
  1372. else
  1373. {
  1374. return true;
  1375. }
  1376. }
  1377. ]]></Script>
  1378. </Form>
  1379. </FDL>