SMLPJ00200_전달검체수신확인.xfdl 79 KB

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