SMADT12008_통합마약현황일반.xfdl 175 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADT12008" classname="SMADT12000_통합마약조회" inheritanceid="" position="absolute 0 0 1179 880" titletext="New Form" onkeyup="SMADT12000_onkeyup" oninit="SMADT12008_oninit" onload="SMADT12008_onload">
  5. <Layouts>
  6. <Layout>
  7. <Shape id="line00" class="line_10" position="absolute 0 305 1178 311"/>
  8. <Static id="caption6" text=" 통합 마약 관리 일반" class="tit_1" position="absolute 0 0 160 25" onclick="caption6_onclick"/>
  9. <Static id="caption00" text="처방정보" class="tit_2" position="absolute 0 33 82 54"/>
  10. <Static id="caption01" text="조제 재고 정보" class="tit_2" position="absolute 0 289 138 310"/>
  11. <Shape id="line01" class="line_10" position="absolute 0 49 1178 55"/>
  12. <Grid id="grd_narclist00" class="grd_orderlist" taborder="21" binddataset="ds_adnmstoclist" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 610 261 744 328" visible="false">
  13. <Formats>
  14. <Format id="default">
  15. <Columns>
  16. <Column size="77" band="left"/>
  17. <Column size="67" band="left"/>
  18. <Column size="123" band="left"/>
  19. <Column size="34" band="left"/>
  20. <Column size="24" band="left"/>
  21. <Column size="70" band="left"/>
  22. <Column size="109"/>
  23. <Column size="69"/>
  24. <Column size="28"/>
  25. <Column size="13"/>
  26. <Column size="36"/>
  27. <Column size="29"/>
  28. <Column size="35"/>
  29. <Column size="31"/>
  30. <Column size="40"/>
  31. <Column size="28"/>
  32. <Column size="40"/>
  33. <Column size="29"/>
  34. <Column size="54"/>
  35. <Column size="32"/>
  36. <Column size="69"/>
  37. <Column size="28"/>
  38. <Column size="29"/>
  39. <Column size="32"/>
  40. <Column size="35"/>
  41. <Column size="8"/>
  42. <Column size="70"/>
  43. <Column size="8"/>
  44. <Column size="70"/>
  45. <Column size="8"/>
  46. <Column size="0"/>
  47. <Column size="0"/>
  48. <Column size="70"/>
  49. <Column size="9"/>
  50. <Column size="70"/>
  51. <Column size="9"/>
  52. <Column size="70"/>
  53. <Column size="9"/>
  54. <Column size="70"/>
  55. <Column size="0"/>
  56. <Column size="0"/>
  57. <Column size="7"/>
  58. <Column size="70"/>
  59. <Column size="100"/>
  60. <Column size="7"/>
  61. <Column size="85"/>
  62. <Column size="7"/>
  63. <Column size="85"/>
  64. <Column size="0"/>
  65. <Column size="0"/>
  66. <Column size="0"/>
  67. <Column size="0"/>
  68. <Column size="0"/>
  69. <Column size="0"/>
  70. <Column size="0"/>
  71. <Column size="0"/>
  72. <Column size="0"/>
  73. <Column size="0"/>
  74. <Column size="0"/>
  75. <Column size="0"/>
  76. <Column size="0"/>
  77. <Column size="0"/>
  78. <Column size="0"/>
  79. <Column size="0"/>
  80. <Column size="0"/>
  81. <Column size="0"/>
  82. <Column size="0"/>
  83. <Column size="40"/>
  84. </Columns>
  85. <Rows>
  86. <Row size="30" band="head"/>
  87. <Row size="22"/>
  88. </Rows>
  89. <Band id="head">
  90. <Cell text="처방&#10;코드" wordwrap="char"/>
  91. <Cell col="1" text="입고구분" wordwrap="char"/>
  92. <Cell col="2" text="제품번호" wordwrap="char"/>
  93. <Cell col="3" colspan="2" taborder="undefined">
  94. <Cell/>
  95. <Cell col="1"/>
  96. </Cell>
  97. <Cell col="5" text="유효기간" wordwrap="char"/>
  98. <Cell col="6" text="제조번호" wordwrap="char"/>
  99. <Cell col="7" text="일련번호" wordwrap="char"/>
  100. <Cell col="8" colspan="2" text="seq" wordwrap="char" taborder="undefined"/>
  101. <Cell col="10" colspan="2" text="바코드_RFID" wordwrap="char" taborder="undefined"/>
  102. <Cell col="12" colspan="2" text="저장소_NO" wordwrap="char" taborder="undefined"/>
  103. <Cell col="14" colspan="2" text="유통수량" wordwrap="char" taborder="undefined"/>
  104. <Cell col="16" colspan="2" text="낱개수량" wordwrap="char" taborder="undefined"/>
  105. <Cell col="18" text="입고수량" wordwrap="char"/>
  106. <Cell col="19" colspan="2" text="입고일자" wordwrap="char" taborder="undefined"/>
  107. <Cell col="21" colspan="2" text="반환횟수" wordwrap="char" taborder="undefined"/>
  108. <Cell col="23" colspan="2" text="반환수량" wordwrap="char" taborder="undefined"/>
  109. <Cell col="25" style="align:left;padding:0 0 0 8;" text="불출신청일자" wordwrap="char"/>
  110. <Cell col="26" text="불출&#10;신청자" wordwrap="char"/>
  111. <Cell col="27" style="align:left;padding:0 0 0 8;" text="조제일시" wordwrap="char"/>
  112. <Cell col="28" text="조제&#10;약사" wordwrap="char"/>
  113. <Cell col="29" style="align:left;padding:0 0 0 8;" text="투약일시" wordwrap="char"/>
  114. <Cell col="30" text="투약&#10;약사" wordwrap="char"/>
  115. <Cell col="31" text="수령일시" wordwrap="char"/>
  116. <Cell col="32" text="수령&#10;담당자" wordwrap="char"/>
  117. <Cell col="33" style="align:left;padding:0 0 0 8;" text="병동수령일시" wordwrap="char"/>
  118. <Cell col="34" text="부서확인&#10;간호사" wordwrap="char"/>
  119. <Cell col="35" style="align:left;padding:0 0 0 8;" text="간호투약일시" wordwrap="char"/>
  120. <Cell col="36" text="간호투약&#10;간호사" wordwrap="char"/>
  121. <Cell col="37" style="align:left;padding:0 0 0 8;" text="반환신청일시" wordwrap="char"/>
  122. <Cell col="38" text="반환신청&#10;간호사" wordwrap="char"/>
  123. <Cell col="39" text="반환일시" wordwrap="char"/>
  124. <Cell col="40" text="반환&#10;담당자" wordwrap="char"/>
  125. <Cell col="41" style="align:left;padding:0 0 0 8;" text="반환확인일시" wordwrap="char"/>
  126. <Cell col="42" text="반환확인&#10;약사" wordwrap="char"/>
  127. <Cell col="43" text="반환사유" wordwrap="char"/>
  128. <Cell col="44" style="align:left;padding:0 0 0 8;" text="잔량반납&#10;신청일시" wordwrap="char"/>
  129. <Cell col="45" text="잔량반납신청&#10;간호사" wordwrap="char"/>
  130. <Cell col="46" style="align:left;padding:0 0 0 8;" text="잔량반납&#10;확인일시" wordwrap="char"/>
  131. <Cell col="47" text="잔량반납확인&#10;약사" wordwrap="char"/>
  132. <Cell col="48" text="prcpno"/>
  133. <Cell col="49" text="prcphistno"/>
  134. <Cell col="50" text="drugdd"/>
  135. <Cell col="51" text="drugno"/>
  136. <Cell col="52" text="ioflag"/>
  137. <Cell col="53" text="instcd"/>
  138. <Cell col="54" text="narcflag"/>
  139. <Cell col="55" text="prntflag"/>
  140. <Cell col="56" text="orddd"/>
  141. <Cell col="57" text="orddeptcd"/>
  142. <Cell col="58" text="prcpgenrflag"/>
  143. <Cell col="59" text="prntdt"/>
  144. <Cell col="60" text="caption1"/>
  145. <Cell col="61" text="반납반환&#10;표시여부"/>
  146. <Cell col="62" text="투약기록&#10;완료여부"/>
  147. <Cell col="63" text="간호&#10;실시횟수"/>
  148. <Cell col="64" text="간호&#10;반환횟수"/>
  149. <Cell col="65" text="투약x반환불가&#10;횟수"/>
  150. <Cell col="66"/>
  151. <Cell col="67"/>
  152. </Band>
  153. <Band id="body">
  154. <Cell style="align:center top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  155. <Cell col="1" style="align:left top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:infg" wordwrap="char" mask="expr:utlf_isNull(prcpdd) || prcpdd=='-' ? '' : '####/##/##'" autosizerow="limitmin"/>
  156. <Cell col="2" style="align:left top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:gtin" wordwrap="char" autosizerow="limitmin"/>
  157. <Cell col="3" text="bind:seq"/>
  158. <Cell col="4" text="bind:histno"/>
  159. <Cell col="5" style="align:left top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:prd_valid_de" wordwrap="char" autosizerow="limitmin"/>
  160. <Cell col="6" displaytype="text" style="align:left top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:mnf_no" wordwrap="char" autosizerow="limitmin"/>
  161. <Cell col="7" displaytype="text" style="align:left top;padding:4 2 1 2;background2:#f0f0f0ff;" text="bind:mnf_seq" wordwrap="char" autosizerow="limitmin"/>
  162. <Cell col="8" colspan="2" style="background2:#f0f0f0ff;" text="bind:seq" taborder="undefined">
  163. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  164. <Cell col="1" style="background2:#f0f0f0ff;" text="bind:prcpqtyunit"/>
  165. </Cell>
  166. <Cell col="10" colspan="2" style="background2:#f0f0f0ff;" text="bind:prd_sgtin" taborder="undefined">
  167. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:dayprcpqty"/>
  168. <Cell col="1" style="background2:#f0f0f0ff;" text="bind:dayprcpqtyunit"/>
  169. </Cell>
  170. <Cell col="12" colspan="2" style="background2:#f0f0f0ff;" text="bind:storge_no" taborder="undefined">
  171. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:prcpqty2"/>
  172. <Cell col="1" style="background2:#f0f0f0ff;" text="bind:prcpqtyunit2"/>
  173. </Cell>
  174. <Cell col="14" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:prd_min_distb_qy"/>
  175. <Cell col="15" style="background2:#f0f0f0ff;" text="bind:prd_min_distb_unit"/>
  176. <Cell col="16" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:prd_tot_pce_qy"/>
  177. <Cell col="17" style="background2:#f0f0f0ff;" text="bind:prd_pce_unit"/>
  178. <Cell col="18" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:in_pce_qy"/>
  179. <Cell col="19" colspan="2" style="background2:#f0f0f0ff;" text="bind:indd" taborder="undefined">
  180. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:spreqty"/>
  181. <Cell col="1" style="background2:#f0f0f0ff;" text="bind:prcpvolunit"/>
  182. </Cell>
  183. <Cell col="21" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:rtnqty" mask="99999999999"/>
  184. <Cell col="22" style="background2:#f0f0f0ff;" text="bind:rtnunit"/>
  185. <Cell col="23" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:returnqty"/>
  186. <Cell col="24" style="background2:#f0f0f0ff;" text="bind:prcpqtyunit"/>
  187. <Cell col="25" style="background2:#f0f0f0ff;" text="bind:reqdt" mask="expr:utlf_isNull(reqdt) || reqdt=='-' ? '' : '####/##/## ##:##'"/>
  188. <Cell col="26" style="background2:#f0f0f0ff;" text="bind:reqidnm"/>
  189. <Cell col="27" style="background2:#f0f0f0ff;" text="bind:prcpdt" mask="expr:utlf_isNull(prcpdt) || prcpdt=='-' ? '' : '####/##/## ##:##'"/>
  190. <Cell col="28" style="background2:#f0f0f0ff;" text="bind:prcpidnm"/>
  191. <Cell col="29" style="background2:#f0f0f0ff;" text="bind:drugdt" mask="expr:utlf_isNull(drugdt) || drugdt=='-' ? '' : '####/##/## ##:##'"/>
  192. <Cell col="30" style="background2:#f0f0f0ff;" text="bind:drugidnm"/>
  193. <Cell col="31" style="background2:#f0f0f0ff;" text="bind:delivedt" mask="expr:utlf_isNull(delivedt) || delivedt=='-' ? '' : '####/##/##'"/>
  194. <Cell col="32" style="background2:#f0f0f0ff;" text="bind:deliveidnm"/>
  195. <Cell col="33" style="background2:#f0f0f0ff;" text="bind:acptdt" mask="expr:utlf_isNull(acptdt) || acptdt=='-' ? '' : '####/##/## ##:##'"/>
  196. <Cell col="34" style="background2:#f0f0f0ff;" text="bind:acptidnm"/>
  197. <Cell col="35" style="background2:#f0f0f0ff;" text="bind:nrexecdt" mask="expr:utlf_isNull(nrexecdt) || nrexecdt=='-' ? '' : '####/##/## ##:##'"/>
  198. <Cell col="36" style="background2:#f0f0f0ff;" text="bind:nrexecridnm"/>
  199. <Cell col="37" style="background2:#f0f0f0ff;" text="bind:rtnappdt" mask="expr:utlf_isNull(rtnappdt) || rtnappdt=='-' ? '' : '####/##/## ##:##'"/>
  200. <Cell col="38" style="background2:#f0f0f0ff;" text="bind:rtnappidnm"/>
  201. <Cell col="39" style="background2:#f0f0f0ff;" text="bind:rtndt" mask="expr:utlf_isNull(rtndt) || rtndt=='-' ? '' : '####/##/##''"/>
  202. <Cell col="40" style="background2:#f0f0f0ff;" text="bind:rtnidnm"/>
  203. <Cell col="41" style="background2:#f0f0f0ff;" text="bind:rtncnfmdt" mask="expr:utlf_isNull(rtncnfmdt) || rtncnfmdt=='-' ? '' : '####/##/## ##:##'"/>
  204. <Cell col="42" style="background2:#f0f0f0ff;" text="bind:rtncnfmidnm"/>
  205. <Cell col="43" displaytype="text" style="background2:#f0f0f0ff;" text="bind:rtnresn"/>
  206. <Cell col="44" style="background2:#f0f0f0ff;" text="bind:spredt" mask="expr:utlf_isNull(spredt) || spredt=='-' ? '' : '####/##/## ##:##'"/>
  207. <Cell col="45" style="background2:#f0f0f0ff;" text="bind:spreidnm"/>
  208. <Cell col="46" style="background2:#f0f0f0ff;" text="bind:sprecnfmdt" mask="expr:utlf_isNull(sprecnfmdt) || sprecnfmdt=='-' ? '' : '####/##/## ##:##'"/>
  209. <Cell col="47" style="background2:#f0f0f0ff;" text="bind:sprecnfmidnm"/>
  210. <Cell col="48" text="bind:prcpno"/>
  211. <Cell col="49" text="bind:prcphistno"/>
  212. <Cell col="50" text="bind:drugdd"/>
  213. <Cell col="51" text="bind:drugno"/>
  214. <Cell col="52" text="bind:ioflag"/>
  215. <Cell col="53" text="bind:instcd"/>
  216. <Cell col="54" text="bind:narcflag"/>
  217. <Cell col="55" text="bind:prntflag"/>
  218. <Cell col="56" text="bind:orddd"/>
  219. <Cell col="57" text="bind:orddeptcd"/>
  220. <Cell col="58" text="bind:prcpgenrflag"/>
  221. <Cell col="59" text="bind:prntdt"/>
  222. <Cell col="60" text="bind:presqty2"/>
  223. <Cell col="61" text="bind:statvisible"/>
  224. <Cell col="62" text="bind:medrendyn"/>
  225. <Cell col="63" text="bind:medrqty"/>
  226. <Cell col="64" text="bind:medrtims"/>
  227. <Cell col="65" text="bind:medrx"/>
  228. <Cell col="66" text="bind:drugseqno"/>
  229. <Cell col="67"/>
  230. </Band>
  231. </Format>
  232. </Formats>
  233. </Grid>
  234. <Grid id="grd_narclist01" class="grd_orderlist" taborder="22" binddataset="ds_adnmstocorder" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 0 310 1178 879" onheadclick="grd_narclist01_onheadclick">
  235. <Formats>
  236. <Format id="default">
  237. <Columns>
  238. <Column size="27" band="left"/>
  239. <Column size="20" band="left"/>
  240. <Column size="58" band="left"/>
  241. <Column size="60" band="left"/>
  242. <Column size="54" band="left"/>
  243. <Column size="80" band="left"/>
  244. <Column size="99" band="left"/>
  245. <Column size="125" band="left"/>
  246. <Column size="66" band="left"/>
  247. <Column size="136"/>
  248. <Column size="120"/>
  249. <Column size="30"/>
  250. <Column size="19"/>
  251. <Column size="49"/>
  252. <Column size="73"/>
  253. <Column size="69"/>
  254. <Column size="68"/>
  255. <Column size="16"/>
  256. </Columns>
  257. <Rows>
  258. <Row size="30" band="head"/>
  259. <Row size="22"/>
  260. </Rows>
  261. <Band id="head">
  262. <Cell/>
  263. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:flag"/>
  264. <Cell col="2" text=" 등록번호"/>
  265. <Cell col="3" text="환자명"/>
  266. <Cell col="4" text="투약번호"/>
  267. <Cell col="5" text="처방&#10;코드" wordwrap="char"/>
  268. <Cell col="6" text="LabelNo"/>
  269. <Cell col="7" text="제품번호" wordwrap="char"/>
  270. <Cell col="8" text="유효기간" wordwrap="char"/>
  271. <Cell col="9" text="제조번호" wordwrap="char"/>
  272. <Cell col="10" text="일련번호" wordwrap="char"/>
  273. <Cell col="11" colspan="2" text="seq" taborder="undefined">
  274. <Cell text="seq" wordwrap="char" taborder="undefined"/>
  275. <Cell col="1"/>
  276. </Cell>
  277. <Cell col="13" text="잔량"/>
  278. <Cell col="14" text="불출일자"/>
  279. <Cell col="15" text="반환일자"/>
  280. <Cell col="16" text="잔량일자"/>
  281. <Cell col="17"/>
  282. </Band>
  283. <Band id="body">
  284. <Cell celltype="head" text="expr:currow + 1"/>
  285. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:flag" expr="expr:(flag == 'Y' || flag == '1') ? '1' : '0'"/>
  286. <Cell col="2" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:pid"/>
  287. <Cell col="3" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:pat_nm"/>
  288. <Cell col="4" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugno"/>
  289. <Cell col="5" style="align:center top;padding:4 2 3 2;background:EXPR(seq == '1' ? 'yellow' : '');background2:EXPR(seq == '1' ? 'yellow' : '');" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  290. <Cell col="6" style="background:EXPR(seq == '1' ? 'yellow' : '');background2:EXPR(seq == '1' ? 'yellow' : '');" text="bind:labelno" mask="@@@@-@@-@@ @@@"/>
  291. <Cell col="7" style="align:left top;padding:4 2 3 2;background:EXPR(seq == '1' ? 'yellow' : '');background2:EXPR(seq == '1' ? 'yellow' : '');" text="bind:gtin" wordwrap="char" autosizerow="limitmin"/>
  292. <Cell col="8" style="align:center;padding:4 2 3 2;background:EXPR(seq == '1' ? 'yellow' : '');background2:EXPR(seq == '1' ? 'yellow' : '');" text="bind:prd_valid_de" wordwrap="char" autosizerow="limitmin"/>
  293. <Cell col="9" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(seq == '1' ? 'yellow' : '');background2:EXPR(seq == '1' ? 'yellow' : '');" text="bind:mnf_no" wordwrap="char" autosizerow="limitmin"/>
  294. <Cell col="10" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(seq == '1' ? 'yellow' : '');background2:EXPR(seq == '1' ? 'yellow' : '');" text="bind:mnf_seq" wordwrap="char" autosizerow="limitmin"/>
  295. <Cell col="11" style="background:EXPR(seq == '1' ? 'yellow' : '');background2:EXPR(seq == '1' ? 'yellow' : '');" text="bind:seq" taborder="undefined">
  296. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  297. </Cell>
  298. <Cell col="12" style="background:EXPR(EXPR( seq == '1' ? 'yellow' : ''));background2:EXPR(EXPR( seq == '1' ? 'yellow' : ''));" text="bind:histno"/>
  299. <Cell col="13" text="bind:spreqy"/>
  300. <Cell col="14" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:outdd"/>
  301. <Cell col="15" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:rtndd"/>
  302. <Cell col="16" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:spredd"/>
  303. <Cell col="17" text="bind:infg"/>
  304. </Band>
  305. </Format>
  306. <Format id="format_copy"/>
  307. <Format id="format_copy_2"/>
  308. </Formats>
  309. </Grid>
  310. <Button id="but_ok" taborder="23" text="불출승인" position="absolute 1092 283 1178 305" class="btn3" onclick="but_ok_onclick" onkeyup="but_ok_onkeyup"/>
  311. <Button id="Button00" taborder="24" text="화면닫기" position="absolute 1098 27 1178 49" onclick="Button00_onclick" class="btn4"/>
  312. <Grid id="grd_narclist02" class="grd_orderlist" taborder="25" binddataset="ds_main_narclist_narclist" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 0 54 1178 281" anchor="all">
  313. <Formats>
  314. <Format id="default">
  315. <Columns>
  316. <Column size="30" band="left"/>
  317. <Column size="20" band="left"/>
  318. <Column size="26" band="left"/>
  319. <Column size="67" band="left"/>
  320. <Column size="44" band="left"/>
  321. <Column size="82" band="left"/>
  322. <Column size="36" band="left"/>
  323. <Column size="57" band="left"/>
  324. <Column size="46" band="left"/>
  325. <Column size="74"/>
  326. <Column size="151"/>
  327. <Column size="28"/>
  328. <Column size="30"/>
  329. <Column size="27"/>
  330. <Column size="30"/>
  331. <Column size="28"/>
  332. <Column size="31"/>
  333. <Column size="40"/>
  334. <Column size="31"/>
  335. <Column size="40"/>
  336. <Column size="31"/>
  337. <Column size="28"/>
  338. <Column size="39"/>
  339. <Column size="27"/>
  340. <Column size="28"/>
  341. <Column size="29"/>
  342. <Column size="32"/>
  343. <Column size="33"/>
  344. <Column size="8"/>
  345. <Column size="70"/>
  346. <Column size="8"/>
  347. <Column size="70"/>
  348. <Column size="8"/>
  349. <Column size="0"/>
  350. <Column size="0"/>
  351. <Column size="70"/>
  352. <Column size="9"/>
  353. <Column size="70"/>
  354. <Column size="9"/>
  355. <Column size="70"/>
  356. <Column size="9"/>
  357. <Column size="70"/>
  358. <Column size="0"/>
  359. <Column size="0"/>
  360. <Column size="7"/>
  361. <Column size="70"/>
  362. <Column size="100"/>
  363. <Column size="7"/>
  364. <Column size="85"/>
  365. <Column size="7"/>
  366. <Column size="85"/>
  367. <Column size="0"/>
  368. <Column size="0"/>
  369. <Column size="0"/>
  370. <Column size="0"/>
  371. <Column size="0"/>
  372. <Column size="0"/>
  373. <Column size="0"/>
  374. <Column size="0"/>
  375. <Column size="0"/>
  376. <Column size="0"/>
  377. <Column size="0"/>
  378. <Column size="0"/>
  379. <Column size="0"/>
  380. <Column size="0"/>
  381. <Column size="0"/>
  382. <Column size="0"/>
  383. <Column size="0"/>
  384. <Column size="0"/>
  385. <Column size="0"/>
  386. </Columns>
  387. <Rows>
  388. <Row size="30" band="head"/>
  389. <Row size="24"/>
  390. </Rows>
  391. <Band id="head">
  392. <Cell/>
  393. <Cell col="1" displaytype="checkbox" edittype="checkbox"/>
  394. <Cell col="2" text="처방&#10;상태" wordwrap="char"/>
  395. <Cell col="3" text="처방일자" wordwrap="char"/>
  396. <Cell col="4" text="투약번호" wordwrap="char"/>
  397. <Cell col="5" text="수행부서" wordwrap="char"/>
  398. <Cell col="6" text="병실" wordwrap="char"/>
  399. <Cell col="7" text="환자번호" wordwrap="char"/>
  400. <Cell col="8" text="환자명" wordwrap="char"/>
  401. <Cell col="9" text="약품코드" wordwrap="char"/>
  402. <Cell col="10" text="약품명" wordwrap="char"/>
  403. <Cell col="11" colspan="2" text="총량" wordwrap="char" taborder="undefined"/>
  404. <Cell col="13" colspan="2" text="일수량" wordwrap="char" taborder="undefined"/>
  405. <Cell col="15" colspan="2" text="1회수량" wordwrap="char" taborder="undefined"/>
  406. <Cell col="17" colspan="2" text="일용량" wordwrap="char" taborder="undefined"/>
  407. <Cell col="19" colspan="2" text="1회용량" wordwrap="char" taborder="undefined"/>
  408. <Cell col="21" text="횟수" wordwrap="char"/>
  409. <Cell col="22" colspan="2" text="잔량" wordwrap="char" taborder="undefined"/>
  410. <Cell col="24" colspan="2" text="반환횟수" wordwrap="char" taborder="undefined"/>
  411. <Cell col="26" colspan="2" text="반환수량" wordwrap="char" taborder="undefined"/>
  412. <Cell col="28" style="align:left;padding:0 0 0 8;" text="불출신청일자" wordwrap="char"/>
  413. <Cell col="29" text="불출&#10;신청자" wordwrap="char"/>
  414. <Cell col="30" style="align:left;padding:0 0 0 8;" text="조제일시" wordwrap="char"/>
  415. <Cell col="31" text="조제&#10;약사" wordwrap="char"/>
  416. <Cell col="32" style="align:left;padding:0 0 0 8;" text="투약일시" wordwrap="char"/>
  417. <Cell col="33" text="투약&#10;약사" wordwrap="char"/>
  418. <Cell col="34" text="수령일시" wordwrap="char"/>
  419. <Cell col="35" text="수령&#10;담당자" wordwrap="char"/>
  420. <Cell col="36" style="align:left;padding:0 0 0 8;" text="병동수령일시" wordwrap="char"/>
  421. <Cell col="37" text="부서확인&#10;간호사" wordwrap="char"/>
  422. <Cell col="38" style="align:left;padding:0 0 0 8;" text="간호투약일시" wordwrap="char"/>
  423. <Cell col="39" text="간호투약&#10;간호사" wordwrap="char"/>
  424. <Cell col="40" style="align:left;padding:0 0 0 8;" text="반환신청일시" wordwrap="char"/>
  425. <Cell col="41" text="반환신청&#10;간호사" wordwrap="char"/>
  426. <Cell col="42" text="반환일시" wordwrap="char"/>
  427. <Cell col="43" text="반환&#10;담당자" wordwrap="char"/>
  428. <Cell col="44" style="align:left;padding:0 0 0 8;" text="반환확인일시" wordwrap="char"/>
  429. <Cell col="45" text="반환확인&#10;약사" wordwrap="char"/>
  430. <Cell col="46" text="반환사유" wordwrap="char"/>
  431. <Cell col="47" style="align:left;padding:0 0 0 8;" text="잔량반납&#10;신청일시" wordwrap="char"/>
  432. <Cell col="48" text="잔량반납신청&#10;간호사" wordwrap="char"/>
  433. <Cell col="49" style="align:left;padding:0 0 0 8;" text="잔량반납&#10;확인일시" wordwrap="char"/>
  434. <Cell col="50" text="잔량반납확인&#10;약사" wordwrap="char"/>
  435. <Cell col="51" text="prcpno"/>
  436. <Cell col="52" text="prcphistno"/>
  437. <Cell col="53" text="drugdd"/>
  438. <Cell col="54" text="drugno"/>
  439. <Cell col="55" text="ioflag"/>
  440. <Cell col="56" text="instcd"/>
  441. <Cell col="57" text="narcflag"/>
  442. <Cell col="58" text="prntflag"/>
  443. <Cell col="59" text="orddd"/>
  444. <Cell col="60" text="orddeptcd"/>
  445. <Cell col="61" text="prcpgenrflag"/>
  446. <Cell col="62" text="prntdt"/>
  447. <Cell col="63" text="caption1"/>
  448. <Cell col="64" text="반납반환&#10;표시여부"/>
  449. <Cell col="65" text="투약기록&#10;완료여부"/>
  450. <Cell col="66" text="간호&#10;실시횟수"/>
  451. <Cell col="67" text="간호&#10;반환횟수"/>
  452. <Cell col="68" text="투약x반환불가&#10;횟수"/>
  453. <Cell col="69"/>
  454. </Band>
  455. <Band id="body">
  456. <Cell celltype="head" text="expr:currow+1"/>
  457. <Cell col="1" displaytype="checkbox" edittype="expr:utlf_isNull(getColumn(currow, 'narcstat')) || getColumn(currow, 'narcstat') == '1' ? 'none' : 'checkbox'" style="background:EXPR(sel = 'Y' ? f0f0f0ff'' : '');background2:#f0f0f0ff;controlbackground:EXPR(utlf_isNull(getColumn(currow, 'narcstat')) || getColumn(currow, 'narcstat') == '1' ? 'silver' : '');controlborder:EXPR(utlf_isNull(getColumn(currow, 'narcstat')) || getColumn(currow, 'narcstat') == '1' ? '1 solid #708090cc' : ''));" text="bind:sel" expr="expr:(sel==&quot;Y&quot;||sel==1)?1:0"/>
  458. <Cell col="2" style="align:center top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcphistcd" wordwrap="char" autosizerow="limitmin"/>
  459. <Cell col="3" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpdd" wordwrap="char" mask="expr:utlf_isNull(prcpdd) || prcpdd=='-' ? '' : '####/##/##'" autosizerow="limitmin"/>
  460. <Cell col="4" displaytype="text" style="align:center top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:drugno" wordwrap="char" autosizerow="limitmin"/>
  461. <Cell col="5" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:issdeptcdnm" wordwrap="char" autosizerow="limitmin"/>
  462. <Cell col="6" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:roomcd" wordwrap="char" autosizerow="limitmin"/>
  463. <Cell col="7" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:pid" wordwrap="char" autosizerow="limitmin"/>
  464. <Cell col="8" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:patnm" wordwrap="char" autosizerow="limitmin"/>
  465. <Cell col="9" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpcd" wordwrap="char" autosizerow="limitmin"/>
  466. <Cell col="10" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:drugnm" wordwrap="char" autosizerow="limitmin"/>
  467. <Cell col="11" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:totdrugqty"/>
  468. <Cell col="12" style="background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpqtyunit"/>
  469. <Cell col="13" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:dayprcpqty"/>
  470. <Cell col="14" style="background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:dayprcpqtyunit"/>
  471. <Cell col="15" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpqty2"/>
  472. <Cell col="16" style="background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpqtyunit2"/>
  473. <Cell col="17" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpvol"/>
  474. <Cell col="18" style="background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpvolunit"/>
  475. <Cell col="19" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpvol2"/>
  476. <Cell col="20" style="background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpvolunit2"/>
  477. <Cell col="21" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcptims"/>
  478. <Cell col="22" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:spreqty"/>
  479. <Cell col="23" style="background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpvolunit"/>
  480. <Cell col="24" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:rtnqty" mask="99999999999"/>
  481. <Cell col="25" style="background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:rtnunit"/>
  482. <Cell col="26" style="align:right;padding:0 2 0 0;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:returnqty"/>
  483. <Cell col="27" style="background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:prcpqtyunit"/>
  484. <Cell col="28" style="background2:#f0f0f0ff;" text="bind:reqdt" mask="expr:utlf_isNull(reqdt) || reqdt=='-' ? '' : '####/##/## ##:##'"/>
  485. <Cell col="29" style="background2:#f0f0f0ff;" text="bind:reqidnm"/>
  486. <Cell col="30" style="background2:#f0f0f0ff;" text="bind:prcpdt" mask="expr:utlf_isNull(prcpdt) || prcpdt=='-' ? '' : '####/##/## ##:##'"/>
  487. <Cell col="31" style="background2:#f0f0f0ff;" text="bind:prcpidnm"/>
  488. <Cell col="32" style="background2:#f0f0f0ff;" text="bind:drugdt" mask="expr:utlf_isNull(drugdt) || drugdt=='-' ? '' : '####/##/## ##:##'"/>
  489. <Cell col="33" style="background2:#f0f0f0ff;" text="bind:drugidnm"/>
  490. <Cell col="34" style="background2:#f0f0f0ff;" text="bind:delivedt" mask="expr:utlf_isNull(delivedt) || delivedt=='-' ? '' : '####/##/##'"/>
  491. <Cell col="35" style="background2:#f0f0f0ff;" text="bind:deliveidnm"/>
  492. <Cell col="36" style="background2:#f0f0f0ff;" text="bind:acptdt" mask="expr:utlf_isNull(acptdt) || acptdt=='-' ? '' : '####/##/## ##:##'"/>
  493. <Cell col="37" style="background2:#f0f0f0ff;" text="bind:acptidnm"/>
  494. <Cell col="38" style="background2:#f0f0f0ff;" text="bind:nrexecdt" mask="expr:utlf_isNull(nrexecdt) || nrexecdt=='-' ? '' : '####/##/## ##:##'"/>
  495. <Cell col="39" style="background2:#f0f0f0ff;" text="bind:nrexecridnm"/>
  496. <Cell col="40" style="background2:#f0f0f0ff;" text="bind:rtnappdt" mask="expr:utlf_isNull(rtnappdt) || rtnappdt=='-' ? '' : '####/##/## ##:##'"/>
  497. <Cell col="41" style="background2:#f0f0f0ff;" text="bind:rtnappidnm"/>
  498. <Cell col="42" style="background2:#f0f0f0ff;" text="bind:rtndt" mask="expr:utlf_isNull(rtndt) || rtndt=='-' ? '' : '####/##/##''"/>
  499. <Cell col="43" style="background2:#f0f0f0ff;" text="bind:rtnidnm"/>
  500. <Cell col="44" style="background2:#f0f0f0ff;" text="bind:rtncnfmdt" mask="expr:utlf_isNull(rtncnfmdt) || rtncnfmdt=='-' ? '' : '####/##/## ##:##'"/>
  501. <Cell col="45" style="background2:#f0f0f0ff;" text="bind:rtncnfmidnm"/>
  502. <Cell col="46" displaytype="text" style="background2:#f0f0f0ff;" text="bind:rtnresn"/>
  503. <Cell col="47" style="background2:#f0f0f0ff;" text="bind:spredt" mask="expr:utlf_isNull(spredt) || spredt=='-' ? '' : '####/##/## ##:##'"/>
  504. <Cell col="48" style="background2:#f0f0f0ff;" text="bind:spreidnm"/>
  505. <Cell col="49" style="background2:#f0f0f0ff;" text="bind:sprecnfmdt" mask="expr:utlf_isNull(sprecnfmdt) || sprecnfmdt=='-' ? '' : '####/##/## ##:##'"/>
  506. <Cell col="50" style="background2:#f0f0f0ff;" text="bind:sprecnfmidnm"/>
  507. <Cell col="51" text="bind:prcpno"/>
  508. <Cell col="52" text="bind:prcphistno"/>
  509. <Cell col="53" text="bind:drugdd"/>
  510. <Cell col="54" text="bind:drugno"/>
  511. <Cell col="55" text="bind:ioflag"/>
  512. <Cell col="56" text="bind:instcd"/>
  513. <Cell col="57" text="bind:narcflag"/>
  514. <Cell col="58" text="bind:prntflag"/>
  515. <Cell col="59" text="bind:orddd"/>
  516. <Cell col="60" text="bind:orddeptcd"/>
  517. <Cell col="61" text="bind:prcpgenrflag"/>
  518. <Cell col="62" text="bind:prntdt"/>
  519. <Cell col="63" text="bind:presqty2"/>
  520. <Cell col="64" text="bind:statvisible"/>
  521. <Cell col="65" text="bind:medrendyn"/>
  522. <Cell col="66" text="bind:medrqty"/>
  523. <Cell col="67" text="bind:medrtims"/>
  524. <Cell col="68" text="bind:medrx"/>
  525. <Cell col="69" text="bind:drugseqno"/>
  526. </Band>
  527. </Format>
  528. </Formats>
  529. </Grid>
  530. <Grid id="grd_narclist03" class="grd_sumlist" taborder="26" binddataset="ds_sumlist" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 918 692 1157 856">
  531. <Formats>
  532. <Format id="default">
  533. <Columns>
  534. <Column size="84" band="left"/>
  535. <Column size="43" band="left"/>
  536. <Column size="43"/>
  537. <Column size="43"/>
  538. </Columns>
  539. <Rows>
  540. <Row size="30" band="head"/>
  541. <Row size="22"/>
  542. </Rows>
  543. <Band id="head">
  544. <Cell text="처방코드"/>
  545. <Cell col="1" text="처방수"/>
  546. <Cell col="2" text="확인수"/>
  547. <Cell col="3" text="재고수"/>
  548. </Band>
  549. <Band id="body">
  550. <Cell style="align:left;" text="bind:code"/>
  551. <Cell col="1" text="bind:order"/>
  552. <Cell col="2" text="bind:outsum"/>
  553. <Cell col="3" text="bind:jaegosum"/>
  554. </Band>
  555. </Format>
  556. <Format id="format_copy"/>
  557. </Formats>
  558. </Grid>
  559. <Grid id="grd_narclist04" class="grd_orderlist" taborder="27" binddataset="ds_adnmstocordermachi" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 976 268 1069 309" visible="false">
  560. <Formats>
  561. <Format id="default">
  562. <Columns>
  563. <Column size="27" band="left"/>
  564. <Column size="78" band="left"/>
  565. <Column size="94" band="left"/>
  566. <Column size="96" band="left"/>
  567. <Column size="69" band="left"/>
  568. <Column size="114"/>
  569. <Column size="108"/>
  570. <Column size="34"/>
  571. <Column size="26"/>
  572. <Column size="69"/>
  573. <Column size="45"/>
  574. <Column size="63"/>
  575. <Column size="51"/>
  576. </Columns>
  577. <Rows>
  578. <Row size="30" band="head"/>
  579. <Row size="22"/>
  580. </Rows>
  581. <Band id="head">
  582. <Cell/>
  583. <Cell col="1" text="처방&#10;코드" wordwrap="char"/>
  584. <Cell col="2" text="LabelNo"/>
  585. <Cell col="3" text="제품번호" wordwrap="char"/>
  586. <Cell col="4" text="유효기간" wordwrap="char"/>
  587. <Cell col="5" text="제조번호" wordwrap="char"/>
  588. <Cell col="6" text="일련번호" wordwrap="char"/>
  589. <Cell col="7" colspan="2" text="seq" taborder="undefined">
  590. <Cell text="seq" wordwrap="char" taborder="undefined"/>
  591. <Cell col="1"/>
  592. </Cell>
  593. <Cell col="9" text="불출일자"/>
  594. <Cell col="10" text="저장소"/>
  595. <Cell col="11" text="둥록번호"/>
  596. <Cell col="12" text="투약번호"/>
  597. </Band>
  598. <Band id="body">
  599. <Cell celltype="head" text="expr:currow + 1"/>
  600. <Cell col="1" style="align:center top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  601. <Cell col="2" text="bind:labelno" mask="@@@@-@@-@@ @@@"/>
  602. <Cell col="3" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:gtin" wordwrap="char" autosizerow="limitmin"/>
  603. <Cell col="4" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:prd_valid_de" wordwrap="char" autosizerow="limitmin"/>
  604. <Cell col="5" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_no" wordwrap="char" autosizerow="limitmin"/>
  605. <Cell col="6" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_seq" wordwrap="char" autosizerow="limitmin"/>
  606. <Cell col="7" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:seq" taborder="undefined">
  607. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  608. </Cell>
  609. <Cell col="8" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:histno"/>
  610. <Cell col="9" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:outdd"/>
  611. <Cell col="10" text="bind:storge_no"/>
  612. <Cell col="11" text="bind:pid"/>
  613. <Cell col="12" displaytype="text" edittype="text" text="bind:drugno"/>
  614. </Band>
  615. </Format>
  616. <Format id="format_copy"/>
  617. </Formats>
  618. </Grid>
  619. <Grid id="grd_narclist05" class="grd_orderlist" taborder="28" binddataset="ds_adnmstoclistmachi" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" visible="false" position="absolute 466 261 600 328">
  620. <Formats>
  621. <Format id="default">
  622. <Columns>
  623. <Column size="77" band="left"/>
  624. <Column size="67" band="left"/>
  625. <Column size="123" band="left"/>
  626. <Column size="34" band="left"/>
  627. <Column size="24" band="left"/>
  628. <Column size="70" band="left"/>
  629. <Column size="109"/>
  630. <Column size="69"/>
  631. <Column size="28"/>
  632. <Column size="13"/>
  633. <Column size="36"/>
  634. <Column size="29"/>
  635. <Column size="35"/>
  636. <Column size="31"/>
  637. <Column size="40"/>
  638. <Column size="28"/>
  639. <Column size="40"/>
  640. <Column size="29"/>
  641. <Column size="54"/>
  642. <Column size="32"/>
  643. <Column size="69"/>
  644. <Column size="28"/>
  645. <Column size="29"/>
  646. <Column size="32"/>
  647. <Column size="35"/>
  648. <Column size="8"/>
  649. <Column size="70"/>
  650. <Column size="8"/>
  651. <Column size="70"/>
  652. <Column size="8"/>
  653. <Column size="0"/>
  654. <Column size="0"/>
  655. <Column size="70"/>
  656. <Column size="9"/>
  657. <Column size="70"/>
  658. <Column size="9"/>
  659. <Column size="70"/>
  660. <Column size="9"/>
  661. <Column size="70"/>
  662. <Column size="0"/>
  663. <Column size="0"/>
  664. <Column size="7"/>
  665. <Column size="70"/>
  666. <Column size="100"/>
  667. <Column size="7"/>
  668. <Column size="85"/>
  669. <Column size="7"/>
  670. <Column size="85"/>
  671. <Column size="0"/>
  672. <Column size="0"/>
  673. <Column size="0"/>
  674. <Column size="0"/>
  675. <Column size="0"/>
  676. <Column size="0"/>
  677. <Column size="0"/>
  678. <Column size="0"/>
  679. <Column size="0"/>
  680. <Column size="0"/>
  681. <Column size="0"/>
  682. <Column size="0"/>
  683. <Column size="0"/>
  684. <Column size="0"/>
  685. <Column size="0"/>
  686. <Column size="0"/>
  687. <Column size="0"/>
  688. <Column size="0"/>
  689. <Column size="0"/>
  690. <Column size="40"/>
  691. </Columns>
  692. <Rows>
  693. <Row size="30" band="head"/>
  694. <Row size="22"/>
  695. </Rows>
  696. <Band id="head">
  697. <Cell text="처방&#10;코드" wordwrap="char"/>
  698. <Cell col="1" text="입고구분" wordwrap="char"/>
  699. <Cell col="2" text="제품번호" wordwrap="char"/>
  700. <Cell col="3" colspan="2" taborder="undefined">
  701. <Cell/>
  702. <Cell col="1"/>
  703. </Cell>
  704. <Cell col="5" text="유효기간" wordwrap="char"/>
  705. <Cell col="6" text="제조번호" wordwrap="char"/>
  706. <Cell col="7" text="일련번호" wordwrap="char"/>
  707. <Cell col="8" colspan="2" text="seq" wordwrap="char" taborder="undefined"/>
  708. <Cell col="10" colspan="2" text="바코드_RFID" wordwrap="char" taborder="undefined"/>
  709. <Cell col="12" colspan="2" text="저장소_NO" wordwrap="char" taborder="undefined"/>
  710. <Cell col="14" colspan="2" text="유통수량" wordwrap="char" taborder="undefined"/>
  711. <Cell col="16" colspan="2" text="낱개수량" wordwrap="char" taborder="undefined"/>
  712. <Cell col="18" text="입고수량" wordwrap="char"/>
  713. <Cell col="19" colspan="2" text="입고일자" wordwrap="char" taborder="undefined"/>
  714. <Cell col="21" colspan="2" text="반환횟수" wordwrap="char" taborder="undefined"/>
  715. <Cell col="23" colspan="2" text="반환수량" wordwrap="char" taborder="undefined"/>
  716. <Cell col="25" style="align:left;padding:0 0 0 8;" text="불출신청일자" wordwrap="char"/>
  717. <Cell col="26" text="불출&#10;신청자" wordwrap="char"/>
  718. <Cell col="27" style="align:left;padding:0 0 0 8;" text="조제일시" wordwrap="char"/>
  719. <Cell col="28" text="조제&#10;약사" wordwrap="char"/>
  720. <Cell col="29" style="align:left;padding:0 0 0 8;" text="투약일시" wordwrap="char"/>
  721. <Cell col="30" text="투약&#10;약사" wordwrap="char"/>
  722. <Cell col="31" text="수령일시" wordwrap="char"/>
  723. <Cell col="32" text="수령&#10;담당자" wordwrap="char"/>
  724. <Cell col="33" style="align:left;padding:0 0 0 8;" text="병동수령일시" wordwrap="char"/>
  725. <Cell col="34" text="부서확인&#10;간호사" wordwrap="char"/>
  726. <Cell col="35" style="align:left;padding:0 0 0 8;" text="간호투약일시" wordwrap="char"/>
  727. <Cell col="36" text="간호투약&#10;간호사" wordwrap="char"/>
  728. <Cell col="37" style="align:left;padding:0 0 0 8;" text="반환신청일시" wordwrap="char"/>
  729. <Cell col="38" text="반환신청&#10;간호사" wordwrap="char"/>
  730. <Cell col="39" text="반환일시" wordwrap="char"/>
  731. <Cell col="40" text="반환&#10;담당자" wordwrap="char"/>
  732. <Cell col="41" style="align:left;padding:0 0 0 8;" text="반환확인일시" wordwrap="char"/>
  733. <Cell col="42" text="반환확인&#10;약사" wordwrap="char"/>
  734. <Cell col="43" text="반환사유" wordwrap="char"/>
  735. <Cell col="44" style="align:left;padding:0 0 0 8;" text="잔량반납&#10;신청일시" wordwrap="char"/>
  736. <Cell col="45" text="잔량반납신청&#10;간호사" wordwrap="char"/>
  737. <Cell col="46" style="align:left;padding:0 0 0 8;" text="잔량반납&#10;확인일시" wordwrap="char"/>
  738. <Cell col="47" text="잔량반납확인&#10;약사" wordwrap="char"/>
  739. <Cell col="48" text="prcpno"/>
  740. <Cell col="49" text="prcphistno"/>
  741. <Cell col="50" text="drugdd"/>
  742. <Cell col="51" text="drugno"/>
  743. <Cell col="52" text="ioflag"/>
  744. <Cell col="53" text="instcd"/>
  745. <Cell col="54" text="narcflag"/>
  746. <Cell col="55" text="prntflag"/>
  747. <Cell col="56" text="orddd"/>
  748. <Cell col="57" text="orddeptcd"/>
  749. <Cell col="58" text="prcpgenrflag"/>
  750. <Cell col="59" text="prntdt"/>
  751. <Cell col="60" text="caption1"/>
  752. <Cell col="61" text="반납반환&#10;표시여부"/>
  753. <Cell col="62" text="투약기록&#10;완료여부"/>
  754. <Cell col="63" text="간호&#10;실시횟수"/>
  755. <Cell col="64" text="간호&#10;반환횟수"/>
  756. <Cell col="65" text="투약x반환불가&#10;횟수"/>
  757. <Cell col="66"/>
  758. <Cell col="67"/>
  759. </Band>
  760. <Band id="body">
  761. <Cell style="align:center top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  762. <Cell col="1" style="align:left top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:infg" wordwrap="char" mask="expr:utlf_isNull(prcpdd) || prcpdd=='-' ? '' : '####/##/##'" autosizerow="limitmin"/>
  763. <Cell col="2" style="align:left top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:gtin" wordwrap="char" autosizerow="limitmin"/>
  764. <Cell col="3" text="bind:seq"/>
  765. <Cell col="4" text="bind:histno"/>
  766. <Cell col="5" style="align:left top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:prd_valid_de" wordwrap="char" autosizerow="limitmin"/>
  767. <Cell col="6" displaytype="text" style="align:left top;padding:4 2 3 2;background2:#f0f0f0ff;" text="bind:mnf_no" wordwrap="char" autosizerow="limitmin"/>
  768. <Cell col="7" displaytype="text" style="align:left top;padding:4 2 1 2;background2:#f0f0f0ff;" text="bind:mnf_seq" wordwrap="char" autosizerow="limitmin"/>
  769. <Cell col="8" colspan="2" style="background2:#f0f0f0ff;" text="bind:seq" taborder="undefined">
  770. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  771. <Cell col="1" style="background2:#f0f0f0ff;" text="bind:prcpqtyunit"/>
  772. </Cell>
  773. <Cell col="10" colspan="2" style="background2:#f0f0f0ff;" text="bind:prd_sgtin" taborder="undefined">
  774. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:dayprcpqty"/>
  775. <Cell col="1" style="background2:#f0f0f0ff;" text="bind:dayprcpqtyunit"/>
  776. </Cell>
  777. <Cell col="12" colspan="2" style="background2:#f0f0f0ff;" text="bind:storge_no" taborder="undefined">
  778. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:prcpqty2"/>
  779. <Cell col="1" style="background2:#f0f0f0ff;" text="bind:prcpqtyunit2"/>
  780. </Cell>
  781. <Cell col="14" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:prd_min_distb_qy"/>
  782. <Cell col="15" style="background2:#f0f0f0ff;" text="bind:prd_min_distb_unit"/>
  783. <Cell col="16" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:prd_tot_pce_qy"/>
  784. <Cell col="17" style="background2:#f0f0f0ff;" text="bind:prd_pce_unit"/>
  785. <Cell col="18" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:in_pce_qy"/>
  786. <Cell col="19" colspan="2" style="background2:#f0f0f0ff;" text="bind:indd" taborder="undefined">
  787. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:spreqty"/>
  788. <Cell col="1" style="background2:#f0f0f0ff;" text="bind:prcpvolunit"/>
  789. </Cell>
  790. <Cell col="21" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:rtnqty" mask="99999999999"/>
  791. <Cell col="22" style="background2:#f0f0f0ff;" text="bind:rtnunit"/>
  792. <Cell col="23" style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:returnqty"/>
  793. <Cell col="24" style="background2:#f0f0f0ff;" text="bind:prcpqtyunit"/>
  794. <Cell col="25" style="background2:#f0f0f0ff;" text="bind:reqdt" mask="expr:utlf_isNull(reqdt) || reqdt=='-' ? '' : '####/##/## ##:##'"/>
  795. <Cell col="26" style="background2:#f0f0f0ff;" text="bind:reqidnm"/>
  796. <Cell col="27" style="background2:#f0f0f0ff;" text="bind:prcpdt" mask="expr:utlf_isNull(prcpdt) || prcpdt=='-' ? '' : '####/##/## ##:##'"/>
  797. <Cell col="28" style="background2:#f0f0f0ff;" text="bind:prcpidnm"/>
  798. <Cell col="29" style="background2:#f0f0f0ff;" text="bind:drugdt" mask="expr:utlf_isNull(drugdt) || drugdt=='-' ? '' : '####/##/## ##:##'"/>
  799. <Cell col="30" style="background2:#f0f0f0ff;" text="bind:drugidnm"/>
  800. <Cell col="31" style="background2:#f0f0f0ff;" text="bind:delivedt" mask="expr:utlf_isNull(delivedt) || delivedt=='-' ? '' : '####/##/##'"/>
  801. <Cell col="32" style="background2:#f0f0f0ff;" text="bind:deliveidnm"/>
  802. <Cell col="33" style="background2:#f0f0f0ff;" text="bind:acptdt" mask="expr:utlf_isNull(acptdt) || acptdt=='-' ? '' : '####/##/## ##:##'"/>
  803. <Cell col="34" style="background2:#f0f0f0ff;" text="bind:acptidnm"/>
  804. <Cell col="35" style="background2:#f0f0f0ff;" text="bind:nrexecdt" mask="expr:utlf_isNull(nrexecdt) || nrexecdt=='-' ? '' : '####/##/## ##:##'"/>
  805. <Cell col="36" style="background2:#f0f0f0ff;" text="bind:nrexecridnm"/>
  806. <Cell col="37" style="background2:#f0f0f0ff;" text="bind:rtnappdt" mask="expr:utlf_isNull(rtnappdt) || rtnappdt=='-' ? '' : '####/##/## ##:##'"/>
  807. <Cell col="38" style="background2:#f0f0f0ff;" text="bind:rtnappidnm"/>
  808. <Cell col="39" style="background2:#f0f0f0ff;" text="bind:rtndt" mask="expr:utlf_isNull(rtndt) || rtndt=='-' ? '' : '####/##/##''"/>
  809. <Cell col="40" style="background2:#f0f0f0ff;" text="bind:rtnidnm"/>
  810. <Cell col="41" style="background2:#f0f0f0ff;" text="bind:rtncnfmdt" mask="expr:utlf_isNull(rtncnfmdt) || rtncnfmdt=='-' ? '' : '####/##/## ##:##'"/>
  811. <Cell col="42" style="background2:#f0f0f0ff;" text="bind:rtncnfmidnm"/>
  812. <Cell col="43" displaytype="text" style="background2:#f0f0f0ff;" text="bind:rtnresn"/>
  813. <Cell col="44" style="background2:#f0f0f0ff;" text="bind:spredt" mask="expr:utlf_isNull(spredt) || spredt=='-' ? '' : '####/##/## ##:##'"/>
  814. <Cell col="45" style="background2:#f0f0f0ff;" text="bind:spreidnm"/>
  815. <Cell col="46" style="background2:#f0f0f0ff;" text="bind:sprecnfmdt" mask="expr:utlf_isNull(sprecnfmdt) || sprecnfmdt=='-' ? '' : '####/##/## ##:##'"/>
  816. <Cell col="47" style="background2:#f0f0f0ff;" text="bind:sprecnfmidnm"/>
  817. <Cell col="48" text="bind:prcpno"/>
  818. <Cell col="49" text="bind:prcphistno"/>
  819. <Cell col="50" text="bind:drugdd"/>
  820. <Cell col="51" text="bind:drugno"/>
  821. <Cell col="52" text="bind:ioflag"/>
  822. <Cell col="53" text="bind:instcd"/>
  823. <Cell col="54" text="bind:narcflag"/>
  824. <Cell col="55" text="bind:prntflag"/>
  825. <Cell col="56" text="bind:orddd"/>
  826. <Cell col="57" text="bind:orddeptcd"/>
  827. <Cell col="58" text="bind:prcpgenrflag"/>
  828. <Cell col="59" text="bind:prntdt"/>
  829. <Cell col="60" text="bind:presqty2"/>
  830. <Cell col="61" text="bind:statvisible"/>
  831. <Cell col="62" text="bind:medrendyn"/>
  832. <Cell col="63" text="bind:medrqty"/>
  833. <Cell col="64" text="bind:medrtims"/>
  834. <Cell col="65" text="bind:medrx"/>
  835. <Cell col="66" text="bind:drugseqno"/>
  836. <Cell col="67"/>
  837. </Band>
  838. </Format>
  839. </Formats>
  840. </Grid>
  841. <Grid id="grd_narclist06" class="grd_orderlist" taborder="29" binddataset="ds_adnmstoclistmachi_old" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 896 272 966 310" visible="false">
  842. <Formats>
  843. <Format id="default">
  844. <Columns>
  845. <Column size="27" band="left"/>
  846. <Column size="78" band="left"/>
  847. <Column size="94" band="left"/>
  848. <Column size="62" band="left"/>
  849. <Column size="100"/>
  850. <Column size="99"/>
  851. <Column size="34"/>
  852. <Column size="30"/>
  853. <Column size="60"/>
  854. <Column size="40"/>
  855. <Column size="43"/>
  856. <Column size="56"/>
  857. <Column size="44"/>
  858. </Columns>
  859. <Rows>
  860. <Row size="30" band="head"/>
  861. <Row size="22"/>
  862. </Rows>
  863. <Band id="head">
  864. <Cell/>
  865. <Cell col="1" text="처방&#10;코드" wordwrap="char"/>
  866. <Cell col="2" text="LabelNo"/>
  867. <Cell col="3" text="유효기간" wordwrap="char"/>
  868. <Cell col="4" text="제조번호" wordwrap="char"/>
  869. <Cell col="5" text="일련번호" wordwrap="char"/>
  870. <Cell col="6" colspan="2" text="seq" taborder="undefined">
  871. <Cell text="seq" wordwrap="char" taborder="undefined"/>
  872. <Cell col="1"/>
  873. </Cell>
  874. <Cell col="8" text="이송일자"/>
  875. <Cell col="9" text="이전"/>
  876. <Cell col="10" text="저장소"/>
  877. <Cell col="11" text="등록번호"/>
  878. <Cell col="12" text="투약번호"/>
  879. </Band>
  880. <Band id="body">
  881. <Cell celltype="head" text="expr:currow + 1"/>
  882. <Cell col="1" style="align:center top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  883. <Cell col="2" text="bind:labelno" mask="@@@@-@@-@@ @@@"/>
  884. <Cell col="3" style="align:center;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:prd_valid_de" wordwrap="char" autosizerow="limitmin"/>
  885. <Cell col="4" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_no" wordwrap="char" autosizerow="limitmin"/>
  886. <Cell col="5" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_seq" wordwrap="char" autosizerow="limitmin"/>
  887. <Cell col="6" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:seq" taborder="undefined">
  888. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  889. </Cell>
  890. <Cell col="7" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:histno"/>
  891. <Cell col="8" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:indd"/>
  892. <Cell col="9" text="bind:opp_storge_no"/>
  893. <Cell col="10" text="bind:storge_no"/>
  894. <Cell col="11" text="bind:in_pid"/>
  895. <Cell col="12" displaytype="text" edittype="text" text="bind:in_drugno"/>
  896. </Band>
  897. </Format>
  898. <Format id="format_copy"/>
  899. </Formats>
  900. </Grid>
  901. <Button id="But_Create" taborder="30" text="데이타 생성" position="absolute 892 27 992 49" onclick="But_Create_onclick" visible="false" class="btn4"/>
  902. <Button id="But_View" taborder="31" text="데이타 조회" visible="true" position="absolute 995 27 1095 49" onclick="But_View_onclick" class="btn4"/>
  903. <Grid id="grd_narclist07" class="grd_orderlist" taborder="32" binddataset="ds_adnmstocmoveerr" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 832 272 879 309" visible="false">
  904. <Formats>
  905. <Format id="default">
  906. <Columns>
  907. <Column size="27" band="left"/>
  908. <Column size="72" band="left"/>
  909. <Column size="49" band="left"/>
  910. <Column size="51" band="left"/>
  911. <Column size="59" band="left"/>
  912. <Column size="45"/>
  913. <Column size="29"/>
  914. </Columns>
  915. <Rows>
  916. <Row size="30" band="head"/>
  917. <Row size="22"/>
  918. </Rows>
  919. <Band id="head">
  920. <Cell/>
  921. <Cell col="1" text="처방&#10;코드" wordwrap="char"/>
  922. <Cell col="2" text="등록번호"/>
  923. <Cell col="3" text="환자명" wordwrap="char"/>
  924. <Cell col="4" text="투약일자" wordwrap="char"/>
  925. <Cell col="5" text="투약번호" wordwrap="char"/>
  926. <Cell col="6" text="수량"/>
  927. </Band>
  928. <Band id="body">
  929. <Cell celltype="head" text="expr:currow + 1"/>
  930. <Cell col="1" style="align:center top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  931. <Cell col="2" text="bind:pid"/>
  932. <Cell col="3" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:patnm" wordwrap="char" autosizerow="limitmin"/>
  933. <Cell col="4" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugdd" wordwrap="char" autosizerow="limitmin"/>
  934. <Cell col="5" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugno" wordwrap="char" autosizerow="limitmin"/>
  935. <Cell col="6" text="bind:qty"/>
  936. </Band>
  937. </Format>
  938. <Format id="format_copy"/>
  939. </Formats>
  940. </Grid>
  941. <Button id="But_BatcodePrt" taborder="33" text="LabelNo 바코드출력" position="absolute 299 283 432 305" onclick="But_BatcodePrt_onclick" class="btn2"/>
  942. <Grid id="grd_stocmove" class="grd_orderlist" taborder="35" binddataset="ds_adnmstocordermove" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 757 284 812 298" visible="false">
  943. <Formats>
  944. <Format id="default">
  945. <Columns>
  946. <Column size="27" band="left"/>
  947. <Column size="78" band="left"/>
  948. <Column size="94" band="left"/>
  949. <Column size="96" band="left"/>
  950. <Column size="69" band="left"/>
  951. <Column size="114"/>
  952. <Column size="108"/>
  953. <Column size="34"/>
  954. <Column size="26"/>
  955. <Column size="69"/>
  956. <Column size="45"/>
  957. <Column size="63"/>
  958. <Column size="51"/>
  959. </Columns>
  960. <Rows>
  961. <Row size="30" band="head"/>
  962. <Row size="22"/>
  963. </Rows>
  964. <Band id="head">
  965. <Cell/>
  966. <Cell col="1" text="처방&#10;코드" wordwrap="char"/>
  967. <Cell col="2" text="LabelNo"/>
  968. <Cell col="3" text="제품번호" wordwrap="char"/>
  969. <Cell col="4" text="유효기간" wordwrap="char"/>
  970. <Cell col="5" text="제조번호" wordwrap="char"/>
  971. <Cell col="6" text="일련번호" wordwrap="char"/>
  972. <Cell col="7" colspan="2" text="seq" taborder="undefined">
  973. <Cell text="seq" wordwrap="char" taborder="undefined"/>
  974. <Cell col="1"/>
  975. </Cell>
  976. <Cell col="9" text="불출일자"/>
  977. <Cell col="10" text="저장소"/>
  978. <Cell col="11" text="둥록번호"/>
  979. <Cell col="12" text="투약번호"/>
  980. </Band>
  981. <Band id="body">
  982. <Cell celltype="head" text="expr:currow + 1"/>
  983. <Cell col="1" style="align:center top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  984. <Cell col="2" text="bind:labelno" mask="@@@@-@@-@@ @@@"/>
  985. <Cell col="3" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:gtin" wordwrap="char" autosizerow="limitmin"/>
  986. <Cell col="4" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:prd_valid_de" wordwrap="char" autosizerow="limitmin"/>
  987. <Cell col="5" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_no" wordwrap="char" autosizerow="limitmin"/>
  988. <Cell col="6" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_seq" wordwrap="char" autosizerow="limitmin"/>
  989. <Cell col="7" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:seq" taborder="undefined">
  990. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  991. </Cell>
  992. <Cell col="8" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:histno"/>
  993. <Cell col="9" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:outdd"/>
  994. <Cell col="10" text="bind:storge_no"/>
  995. <Cell col="11" text="bind:pid"/>
  996. <Cell col="12" displaytype="text" edittype="text" text="bind:drugno"/>
  997. </Band>
  998. </Format>
  999. <Format id="format_copy"/>
  1000. </Formats>
  1001. </Grid>
  1002. </Layout>
  1003. </Layouts>
  1004. <Bind>
  1005. <BindItem id="item12" compid="SMADT12008" propid="text" datasetid="ds_main_prntlist_patinfo" columnid=""/>
  1006. </Bind>
  1007. <Objects>
  1008. <Dataset id="ds_srchbarcode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1009. <ColumnInfo>
  1010. <Column id="barcode" type="STRING" size="256"/>
  1011. </ColumnInfo>
  1012. <Rows>
  1013. <Row/>
  1014. </Rows>
  1015. </Dataset>
  1016. <Dataset id="ds_senddata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1017. <ColumnInfo>
  1018. <Column id="type" type="STRING" size="256"/>
  1019. <Column id="ioflag" type="STRING" size="256"/>
  1020. <Column id="prcpdd" type="STRING" size="256"/>
  1021. <Column id="prcpno" type="STRING" size="256"/>
  1022. </ColumnInfo>
  1023. <Rows>
  1024. <Row/>
  1025. </Rows>
  1026. </Dataset>
  1027. <Dataset id="ds_finddrugno" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1028. <ColumnInfo>
  1029. <Column id="pid" type="STRING" size="256"/>
  1030. <Column id="drugdd" type="STRING" size="256"/>
  1031. <Column id="drugno" type="STRING" size="256"/>
  1032. <Column id="prcpno" type="STRING" size="256"/>
  1033. <Column id="ioflag" type="STRING" size="256"/>
  1034. <Column id="prcphistno" type="STRING" size="256"/>
  1035. <Column id="drugseqno" type="STRING" size="256"/>
  1036. <Column id="drugkind" type="STRING" size="256"/>
  1037. <Column id="drugflag" type="STRING" size="256"/>
  1038. <Column id="drugstat" type="STRING" size="256"/>
  1039. <Column id="prcpdd" type="STRING" size="256"/>
  1040. <Column id="orddd" type="STRING" size="256"/>
  1041. </ColumnInfo>
  1042. <Rows>
  1043. <Row/>
  1044. </Rows>
  1045. </Dataset>
  1046. <Dataset id="ds_send_prntinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1047. <Dataset id="ds_main_prntlist_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1048. <ColumnInfo>
  1049. <Column id="pid" type="STRING" size="256"/>
  1050. <Column id="orddd" type="STRING" size="256"/>
  1051. <Column id="prcpdd" type="STRING" size="256"/>
  1052. <Column id="drugfl" type="STRING" size="256"/>
  1053. <Column id="rcprcpdd" type="STRING" size="256"/>
  1054. <Column id="prcpno" type="STRING" size="256"/>
  1055. <Column id="prcphistno" type="STRING" size="256"/>
  1056. <Column id="drugdd" type="STRING" size="256"/>
  1057. <Column id="drugno" type="STRING" size="256"/>
  1058. <Column id="sumdt" type="STRING" size="256"/>
  1059. <Column id="orddrnm" type="STRING" size="256"/>
  1060. <Column id="orddeptnm" type="STRING" size="256"/>
  1061. <Column id="wardnm" type="STRING" size="256"/>
  1062. <Column id="roomcd" type="STRING" size="256"/>
  1063. <Column id="isdeptcdnm" type="STRING" size="256"/>
  1064. <Column id="sex" type="STRING" size="256"/>
  1065. <Column id="age" type="STRING" size="256"/>
  1066. <Column id="patbdwt" type="STRING" size="256"/>
  1067. <Column id="patbdht" type="STRING" size="256"/>
  1068. <Column id="patnm" type="STRING" size="256"/>
  1069. <Column id="rrgstno" type="STRING" size="256"/>
  1070. <Column id="addr" type="STRING" size="256"/>
  1071. <Column id="medispclidnm" type="STRING" size="256"/>
  1072. <Column id="medispclid_licnsno" type="STRING" size="256"/>
  1073. <Column id="atdoctidnm" type="STRING" size="256"/>
  1074. <Column id="atdoctid_licnsno" type="STRING" size="256"/>
  1075. <Column id="psptno" type="STRING" size="256"/>
  1076. </ColumnInfo>
  1077. <Rows>
  1078. <Row/>
  1079. </Rows>
  1080. </Dataset>
  1081. <Dataset id="ds_main_prntlist_diaginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1082. <ColumnInfo>
  1083. <Column id="diagcd1" type="STRING" size="512"/>
  1084. <Column id="diagcd" type="STRING" size="256"/>
  1085. <Column id="icd10cd" type="STRING" size="256"/>
  1086. </ColumnInfo>
  1087. </Dataset>
  1088. <Dataset id="ds_main_narclist_narclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1089. <Dataset id="ds_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1090. <Dataset id="ds_send_stoc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1091. <ColumnInfo>
  1092. <Column id="drugcd" type="STRING" size="256"/>
  1093. <Column id="storge_no" type="STRING" size="256"/>
  1094. <Column id="prcpno" type="STRING" size="256"/>
  1095. <Column id="seltype" type="STRING" size="256"/>
  1096. <Column id="drugdd" type="STRING" size="256"/>
  1097. <Column id="pid" type="STRING" size="256"/>
  1098. <Column id="boxflag" type="STRING" size="256"/>
  1099. <Column id="gtin" type="STRING" size="256"/>
  1100. <Column id="prd_valid_de" type="STRING" size="256"/>
  1101. <Column id="mnf_no" type="STRING" size="256"/>
  1102. <Column id="mnf_seq" type="STRING" size="256"/>
  1103. <Column id="workflag" type="STRING" size="256"/>
  1104. <Column id="ioflag" type="STRING" size="256"/>
  1105. <Column id="drugno" type="STRING" size="256"/>
  1106. </ColumnInfo>
  1107. <Rows>
  1108. <Row/>
  1109. </Rows>
  1110. </Dataset>
  1111. <Dataset id="ds_adnmstoclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1112. <ColumnInfo>
  1113. <column id="instcd" type="STRING" size="256"/>
  1114. <column id="drugcd" type="STRING" size="256"/>
  1115. <column id="infg" type="STRING" size="256"/>
  1116. <column id="histno" type="STRING" size="256"/>
  1117. <column id="gtin" type="STRING" size="256"/>
  1118. <column id="prd_valid_de" type="STRING" size="256"/>
  1119. <column id="mnf_no" type="STRING" size="256"/>
  1120. <column id="mnf_seq" type="STRING" size="256"/>
  1121. <column id="seq" type="STRING" size="256"/>
  1122. <column id="prd_sgtin" type="STRING" size="256"/>
  1123. <column id="storge_no" type="STRING" size="256"/>
  1124. <column id="prtm_se_nm" type="STRING" size="256"/>
  1125. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1126. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1127. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1128. <column id="prd_pce_unit" type="STRING" size="256"/>
  1129. <column id="in_pce_qy" type="STRING" size="256"/>
  1130. <column id="indd" type="STRING" size="256"/>
  1131. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1132. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1133. <column id="opp_storge_no" type="STRING" size="256"/>
  1134. <column id="in_dtl_cd" type="STRING" size="256"/>
  1135. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1136. <column id="out_fg" type="STRING" size="256"/>
  1137. <column id="out_pce_qy" type="STRING" size="256"/>
  1138. <column id="fnshfg" type="STRING" size="256"/>
  1139. <column id="prcpno" type="STRING" size="256"/>
  1140. <column id="drugdd" type="STRING" size="256"/>
  1141. <column id="drugno" type="STRING" size="256"/>
  1142. <column id="ioflag" type="STRING" size="256"/>
  1143. <column id="drugseqno" type="STRING" size="256"/>
  1144. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1145. <column id="pat_id_no" type="STRING" size="256"/>
  1146. <column id="pat_in" type="STRING" size="256"/>
  1147. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1148. <column id="lcns_no" type="STRING" size="256"/>
  1149. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1150. <column id="prsc_ord_no" type="STRING" size="256"/>
  1151. <column id="diss_code" type="STRING" size="256"/>
  1152. <column id="once_qy" type="FLOAT" size="256"/>
  1153. <column id="ade_cnt" type="FLOAT" size="256"/>
  1154. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1155. <column id="sum_qy" type="FLOAT" size="256"/>
  1156. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1157. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1158. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1159. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1160. <column id="dsuse_loc" type="STRING" size="256"/>
  1161. <column id="dsuse_de" type="STRING" size="256"/>
  1162. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1163. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1164. <column id="outdd" type="STRING" size="256"/>
  1165. <column id="out_bssh_cd" type="STRING" size="256"/>
  1166. <column id="out_bssh_nm" type="STRING" size="256"/>
  1167. <column id="out_storge_no" type="STRING" size="256"/>
  1168. <column id="out_dtl_cd" type="STRING" size="256"/>
  1169. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1170. <column id="insendfg" type="STRING" size="256"/>
  1171. <column id="outsendfg" type="STRING" size="256"/>
  1172. <column id="spreqy" type="STRING" size="256"/>
  1173. <column id="spredd" type="STRING" size="256"/>
  1174. <column id="spredt" type="STRING" size="256"/>
  1175. <column id="rtnfg" type="STRING" size="256"/>
  1176. <column id="rtndd" type="STRING" size="256"/>
  1177. <column id="rtndt" type="STRING" size="256"/>
  1178. <Column id="pid" type="STRING" size="256"/>
  1179. <Column id="indt" type="STRING" size="256"/>
  1180. <Column id="outdt" type="STRING" size="256"/>
  1181. <column id="in_prcpno" type="STRING" size="256"/>
  1182. <column id="in_drugdd" type="STRING" size="256"/>
  1183. <column id="in_drugno" type="STRING" size="256"/>
  1184. <column id="in_ioflag" type="STRING" size="256"/>
  1185. <column id="in_pid" type="STRING" size="256"/>
  1186. <Column id="sprefg" type="STRING" size="256"/>
  1187. </ColumnInfo>
  1188. <Rows>
  1189. <Row/>
  1190. </Rows>
  1191. </Dataset>
  1192. <Dataset id="ds_adnmstocorder" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1193. <ColumnInfo>
  1194. <Column id="flag" type="STRING" size="256"/>
  1195. <column id="instcd" type="STRING" size="256"/>
  1196. <column id="drugcd" type="STRING" size="256"/>
  1197. <column id="infg" type="STRING" size="256"/>
  1198. <column id="histno" type="STRING" size="256"/>
  1199. <column id="gtin" type="STRING" size="256"/>
  1200. <column id="prd_valid_de" type="STRING" size="256"/>
  1201. <column id="mnf_no" type="STRING" size="256"/>
  1202. <column id="mnf_seq" type="STRING" size="256"/>
  1203. <column id="seq" type="STRING" size="256"/>
  1204. <column id="prd_sgtin" type="STRING" size="256"/>
  1205. <column id="storge_no" type="STRING" size="256"/>
  1206. <column id="prtm_se_nm" type="STRING" size="256"/>
  1207. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1208. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1209. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1210. <column id="prd_pce_unit" type="STRING" size="256"/>
  1211. <column id="in_pce_qy" type="STRING" size="256"/>
  1212. <column id="indd" type="STRING" size="256"/>
  1213. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1214. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1215. <column id="opp_storge_no" type="STRING" size="256"/>
  1216. <column id="in_dtl_cd" type="STRING" size="256"/>
  1217. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1218. <column id="out_fg" type="STRING" size="256"/>
  1219. <column id="out_pce_qy" type="STRING" size="256"/>
  1220. <column id="fnshfg" type="STRING" size="256"/>
  1221. <column id="prcpno" type="STRING" size="256"/>
  1222. <column id="drugdd" type="STRING" size="256"/>
  1223. <column id="drugno" type="STRING" size="256"/>
  1224. <column id="ioflag" type="STRING" size="256"/>
  1225. <column id="drugseqno" type="STRING" size="256"/>
  1226. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1227. <column id="pat_id_no" type="STRING" size="256"/>
  1228. <column id="pat_nm" type="STRING" size="256"/>
  1229. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1230. <column id="lcns_no" type="STRING" size="256"/>
  1231. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1232. <column id="prsc_ord_no" type="STRING" size="256"/>
  1233. <column id="diss_code" type="STRING" size="256"/>
  1234. <column id="once_qty" type="FLOAT" size="256"/>
  1235. <column id="ade_cnt" type="FLOAT" size="256"/>
  1236. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1237. <column id="sum_qy" type="FLOAT" size="256"/>
  1238. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1239. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1240. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1241. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1242. <column id="dsuse_loc" type="STRING" size="256"/>
  1243. <column id="dsuse_de" type="STRING" size="256"/>
  1244. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1245. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1246. <column id="outdd" type="STRING" size="256"/>
  1247. <column id="out_bssh_cd" type="STRING" size="256"/>
  1248. <column id="out_bssh_nm" type="STRING" size="256"/>
  1249. <column id="out_storge_no" type="STRING" size="256"/>
  1250. <column id="out_dtl_cd" type="STRING" size="256"/>
  1251. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1252. <column id="insendfg" type="STRING" size="256"/>
  1253. <column id="outsendfg" type="STRING" size="256"/>
  1254. <column id="spreqy" type="STRING" size="256"/>
  1255. <column id="spredd" type="STRING" size="256"/>
  1256. <column id="spredt" type="STRING" size="256"/>
  1257. <column id="rtnfg" type="STRING" size="256"/>
  1258. <column id="rtndd" type="STRING" size="256"/>
  1259. <column id="rtndt" type="STRING" size="256"/>
  1260. <Column id="pid" type="STRING" size="256"/>
  1261. <Column id="labelno" type="STRING" size="256"/>
  1262. <Column id="indt" type="STRING" size="256"/>
  1263. <Column id="outdt" type="STRING" size="256"/>
  1264. <column id="in_prcpno" type="STRING" size="256"/>
  1265. <column id="in_drugdd" type="STRING" size="256"/>
  1266. <column id="in_drugno" type="STRING" size="256"/>
  1267. <column id="in_ioflag" type="STRING" size="256"/>
  1268. <column id="in_pid" type="STRING" size="256"/>
  1269. <Column id="sprefg" type="STRING" size="256"/>
  1270. </ColumnInfo>
  1271. <Rows>
  1272. <Row/>
  1273. </Rows>
  1274. </Dataset>
  1275. <Dataset id="ds_sendstocupdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1276. <ColumnInfo>
  1277. <Column id="instcd" type="STRING" size="255" value=""/>
  1278. <Column id="infg" type="STRING" size="255" value=""/>
  1279. <Column id="histno" type="STRING" size="255" value=""/>
  1280. <Column id="gtin" type="STRING" size="255" value=""/>
  1281. <Column id="prd_valid_de" type="STRING" size="255" value=""/>
  1282. <Column id="mnf_no" type="STRING" size="255" value=""/>
  1283. <Column id="mnf_seq" type="STRING" size="255" value=""/>
  1284. <Column id="seq" type="STRING" size="255" value=""/>
  1285. <Column id="prcpno" type="STRING" size="255" value=""/>
  1286. <Column id="drugdd" type="STRING" size="255" value=""/>
  1287. <Column id="drugno" type="STRING" size="255" value=""/>
  1288. <Column id="ioflag" type="STRING" size="255" value=""/>
  1289. <Column id="drugseqno" type="STRING" size="255" value=""/>
  1290. <Column id="pat_id_no_ty_cd" type="STRING" size="255" value=""/>
  1291. <Column id="pat_id_no" type="STRING" size="255" value=""/>
  1292. <Column id="pat_nm" type="STRING" size="255" value=""/>
  1293. <Column id="lcns_asort_cd" type="STRING" size="255" value=""/>
  1294. <Column id="lcns_no" type="STRING" size="255" value=""/>
  1295. <Column id="prsc_doc_nm" type="STRING" size="255" value=""/>
  1296. <Column id="prsc_ord_no" type="STRING" size="255" value=""/>
  1297. <Column id="diss_code" type="STRING" size="255" value=""/>
  1298. <Column id="once_qy" type="FLOAT" size="255" value=""/>
  1299. <Column id="ade_cnt" type="FLOAT" size="255" value=""/>
  1300. <Column id="tot_dcnt" type="FLOAT" size="255" value=""/>
  1301. <Column id="sum_qy" type="FLOAT" size="255" value=""/>
  1302. <Column id="spreqy" type="FLOAT" size="256"/>
  1303. <Column id="rtnqy" type="STRING" size="256"/>
  1304. <Column id="pid" type="STRING" size="256"/>
  1305. <Column id="storge_no" type="STRING" size="256"/>
  1306. <Column id="in_prcpno" type="STRING" size="256"/>
  1307. <Column id="in_drugno" type="STRING" size="256"/>
  1308. <Column id="in_drugdd" type="STRING" size="256"/>
  1309. <Column id="in_ioflag" type="STRING" size="256"/>
  1310. <Column id="in_pid" type="STRING" size="256"/>
  1311. <Column id="out_storge_no" type="STRING" size="256"/>
  1312. <Column id="new_storge_no" type="STRING" size="256"/>
  1313. <Column id="indt" type="STRING" size="256"/>
  1314. <Column id="outdt" type="STRING" size="256"/>
  1315. </ColumnInfo>
  1316. <Rows>
  1317. <Row/>
  1318. </Rows>
  1319. </Dataset>
  1320. <Dataset id="ds_sumlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1321. <ColumnInfo>
  1322. <Column id="code" type="STRING" size="256"/>
  1323. <Column id="order" type="STRING" size="256"/>
  1324. <Column id="outsum" type="STRING" size="256"/>
  1325. <Column id="jaegosum" type="STRING" size="256"/>
  1326. </ColumnInfo>
  1327. <Rows>
  1328. <Row/>
  1329. </Rows>
  1330. </Dataset>
  1331. <Dataset id="ds_send_selstoc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1332. <ColumnInfo>
  1333. <Column id="drugcd" type="STRING" size="256"/>
  1334. <Column id="prcpno" type="STRING" size="256"/>
  1335. <Column id="drugno" type="STRING" size="256"/>
  1336. <Column id="pat_id_no" type="STRING" size="256"/>
  1337. <Column id="seltype" type="STRING" size="256"/>
  1338. <Column id="drugdd" type="STRING" size="256"/>
  1339. <Column id="pid" type="STRING" size="256"/>
  1340. </ColumnInfo>
  1341. <Rows>
  1342. <Row/>
  1343. </Rows>
  1344. </Dataset>
  1345. <Dataset id="ds_adnmstoclistmachi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1346. <ColumnInfo>
  1347. <column id="instcd" type="STRING" size="256"/>
  1348. <column id="drugcd" type="STRING" size="256"/>
  1349. <column id="infg" type="STRING" size="256"/>
  1350. <column id="histno" type="STRING" size="256"/>
  1351. <column id="gtin" type="STRING" size="256"/>
  1352. <column id="prd_valid_de" type="STRING" size="256"/>
  1353. <column id="mnf_no" type="STRING" size="256"/>
  1354. <column id="mnf_seq" type="STRING" size="256"/>
  1355. <column id="seq" type="STRING" size="256"/>
  1356. <column id="prd_sgtin" type="STRING" size="256"/>
  1357. <column id="storge_no" type="STRING" size="256"/>
  1358. <column id="prtm_se_nm" type="STRING" size="256"/>
  1359. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1360. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1361. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1362. <column id="prd_pce_unit" type="STRING" size="256"/>
  1363. <column id="in_pce_qy" type="STRING" size="256"/>
  1364. <column id="indd" type="STRING" size="256"/>
  1365. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1366. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1367. <column id="opp_storge_no" type="STRING" size="256"/>
  1368. <column id="in_dtl_cd" type="STRING" size="256"/>
  1369. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1370. <column id="out_fg" type="STRING" size="256"/>
  1371. <column id="out_pce_qy" type="STRING" size="256"/>
  1372. <column id="fnshfg" type="STRING" size="256"/>
  1373. <column id="prcpno" type="STRING" size="256"/>
  1374. <column id="drugdd" type="STRING" size="256"/>
  1375. <column id="drugno" type="STRING" size="256"/>
  1376. <column id="ioflag" type="STRING" size="256"/>
  1377. <column id="drugseqno" type="STRING" size="256"/>
  1378. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1379. <column id="pat_id_no" type="STRING" size="256"/>
  1380. <column id="pat_in" type="STRING" size="256"/>
  1381. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1382. <column id="lcns_no" type="STRING" size="256"/>
  1383. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1384. <column id="prsc_ord_no" type="STRING" size="256"/>
  1385. <column id="diss_code" type="STRING" size="256"/>
  1386. <column id="once_qy" type="FLOAT" size="256"/>
  1387. <column id="ade_cnt" type="FLOAT" size="256"/>
  1388. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1389. <column id="sum_qy" type="FLOAT" size="256"/>
  1390. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1391. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1392. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1393. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1394. <column id="dsuse_loc" type="STRING" size="256"/>
  1395. <column id="dsuse_de" type="STRING" size="256"/>
  1396. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1397. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1398. <column id="outdd" type="STRING" size="256"/>
  1399. <column id="out_bssh_cd" type="STRING" size="256"/>
  1400. <column id="out_bssh_nm" type="STRING" size="256"/>
  1401. <column id="out_storge_no" type="STRING" size="256"/>
  1402. <column id="out_dtl_cd" type="STRING" size="256"/>
  1403. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1404. <column id="insendfg" type="STRING" size="256"/>
  1405. <column id="outsendfg" type="STRING" size="256"/>
  1406. <column id="spreqy" type="STRING" size="256"/>
  1407. <column id="spredd" type="STRING" size="256"/>
  1408. <column id="spredt" type="STRING" size="256"/>
  1409. <column id="rtnfg" type="STRING" size="256"/>
  1410. <column id="rtndd" type="STRING" size="256"/>
  1411. <column id="rtndt" type="STRING" size="256"/>
  1412. <Column id="pid" type="STRING" size="256"/>
  1413. <Column id="indt" type="STRING" size="256"/>
  1414. <Column id="outdt" type="STRING" size="256"/>
  1415. <column id="in_prcpno" type="STRING" size="256"/>
  1416. <column id="in_drugdd" type="STRING" size="256"/>
  1417. <column id="in_drugno" type="STRING" size="256"/>
  1418. <column id="in_ioflag" type="STRING" size="256"/>
  1419. <column id="in_pid" type="STRING" size="256"/>
  1420. <Column id="ar_storge_no" type="STRING" size="256"/>
  1421. </ColumnInfo>
  1422. <Rows>
  1423. <Row/>
  1424. </Rows>
  1425. </Dataset>
  1426. <Dataset id="ds_adnmstocordermachi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1427. <ColumnInfo>
  1428. <column id="instcd" type="STRING" size="256"/>
  1429. <column id="drugcd" type="STRING" size="256"/>
  1430. <column id="infg" type="STRING" size="256"/>
  1431. <column id="histno" type="STRING" size="256"/>
  1432. <column id="gtin" type="STRING" size="256"/>
  1433. <column id="prd_valid_de" type="STRING" size="256"/>
  1434. <column id="mnf_no" type="STRING" size="256"/>
  1435. <column id="mnf_seq" type="STRING" size="256"/>
  1436. <column id="seq" type="STRING" size="256"/>
  1437. <column id="prd_sgtin" type="STRING" size="256"/>
  1438. <column id="storge_no" type="STRING" size="256"/>
  1439. <column id="prtm_se_nm" type="STRING" size="256"/>
  1440. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1441. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1442. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1443. <column id="prd_pce_unit" type="STRING" size="256"/>
  1444. <column id="in_pce_qy" type="STRING" size="256"/>
  1445. <column id="indd" type="STRING" size="256"/>
  1446. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1447. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1448. <column id="opp_storge_no" type="STRING" size="256"/>
  1449. <column id="in_dtl_cd" type="STRING" size="256"/>
  1450. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1451. <column id="out_fg" type="STRING" size="256"/>
  1452. <column id="out_pce_qy" type="STRING" size="256"/>
  1453. <column id="fnshfg" type="STRING" size="256"/>
  1454. <column id="prcpno" type="STRING" size="256"/>
  1455. <column id="drugdd" type="STRING" size="256"/>
  1456. <column id="drugno" type="STRING" size="256"/>
  1457. <column id="ioflag" type="STRING" size="256"/>
  1458. <column id="drugseqno" type="STRING" size="256"/>
  1459. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1460. <column id="pat_id_no" type="STRING" size="256"/>
  1461. <column id="pat_nm" type="STRING" size="256"/>
  1462. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1463. <column id="lcns_no" type="STRING" size="256"/>
  1464. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1465. <column id="prsc_ord_no" type="STRING" size="256"/>
  1466. <column id="diss_code" type="STRING" size="256"/>
  1467. <column id="once_qty" type="FLOAT" size="256"/>
  1468. <column id="ade_cnt" type="FLOAT" size="256"/>
  1469. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1470. <column id="sum_qy" type="FLOAT" size="256"/>
  1471. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1472. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1473. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1474. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1475. <column id="dsuse_loc" type="STRING" size="256"/>
  1476. <column id="dsuse_de" type="STRING" size="256"/>
  1477. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1478. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1479. <column id="outdd" type="STRING" size="256"/>
  1480. <column id="out_bssh_cd" type="STRING" size="256"/>
  1481. <column id="out_bssh_nm" type="STRING" size="256"/>
  1482. <column id="out_storge_no" type="STRING" size="256"/>
  1483. <column id="out_dtl_cd" type="STRING" size="256"/>
  1484. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1485. <column id="insendfg" type="STRING" size="256"/>
  1486. <column id="outsendfg" type="STRING" size="256"/>
  1487. <column id="spreqy" type="STRING" size="256"/>
  1488. <column id="spredd" type="STRING" size="256"/>
  1489. <column id="spredt" type="STRING" size="256"/>
  1490. <column id="rtnfg" type="STRING" size="256"/>
  1491. <column id="rtndd" type="STRING" size="256"/>
  1492. <column id="rtndt" type="STRING" size="256"/>
  1493. <Column id="pid" type="STRING" size="256"/>
  1494. <Column id="labelno" type="STRING" size="256"/>
  1495. <Column id="indt" type="STRING" size="256"/>
  1496. <Column id="outdt" type="STRING" size="256"/>
  1497. <column id="in_prcpno" type="STRING" size="256"/>
  1498. <column id="in_drugdd" type="STRING" size="256"/>
  1499. <column id="in_drugno" type="STRING" size="256"/>
  1500. <column id="in_ioflag" type="STRING" size="256"/>
  1501. <column id="in_pid" type="STRING" size="256"/>
  1502. <Column id="ar_storge_no" type="STRING" size="256"/>
  1503. </ColumnInfo>
  1504. <Rows>
  1505. <Row/>
  1506. </Rows>
  1507. </Dataset>
  1508. <Dataset id="ds_adnmstoclistmachi_old" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1509. <ColumnInfo>
  1510. <column id="instcd" type="STRING" size="256"/>
  1511. <column id="drugcd" type="STRING" size="256"/>
  1512. <column id="infg" type="STRING" size="256"/>
  1513. <column id="histno" type="STRING" size="256"/>
  1514. <column id="gtin" type="STRING" size="256"/>
  1515. <column id="prd_valid_de" type="STRING" size="256"/>
  1516. <column id="mnf_no" type="STRING" size="256"/>
  1517. <column id="mnf_seq" type="STRING" size="256"/>
  1518. <column id="seq" type="STRING" size="256"/>
  1519. <column id="prd_sgtin" type="STRING" size="256"/>
  1520. <column id="storge_no" type="STRING" size="256"/>
  1521. <column id="prtm_se_nm" type="STRING" size="256"/>
  1522. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1523. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1524. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1525. <column id="prd_pce_unit" type="STRING" size="256"/>
  1526. <column id="in_pce_qy" type="STRING" size="256"/>
  1527. <column id="indd" type="STRING" size="256"/>
  1528. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1529. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1530. <column id="opp_storge_no" type="STRING" size="256"/>
  1531. <column id="in_dtl_cd" type="STRING" size="256"/>
  1532. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1533. <column id="out_fg" type="STRING" size="256"/>
  1534. <column id="out_pce_qy" type="STRING" size="256"/>
  1535. <column id="fnshfg" type="STRING" size="256"/>
  1536. <column id="prcpno" type="STRING" size="256"/>
  1537. <column id="drugdd" type="STRING" size="256"/>
  1538. <column id="drugno" type="STRING" size="256"/>
  1539. <column id="ioflag" type="STRING" size="256"/>
  1540. <column id="drugseqno" type="STRING" size="256"/>
  1541. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1542. <column id="pat_id_no" type="STRING" size="256"/>
  1543. <column id="pat_in" type="STRING" size="256"/>
  1544. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1545. <column id="lcns_no" type="STRING" size="256"/>
  1546. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1547. <column id="prsc_ord_no" type="STRING" size="256"/>
  1548. <column id="diss_code" type="STRING" size="256"/>
  1549. <column id="once_qy" type="FLOAT" size="256"/>
  1550. <column id="ade_cnt" type="FLOAT" size="256"/>
  1551. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1552. <column id="sum_qy" type="FLOAT" size="256"/>
  1553. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1554. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1555. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1556. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1557. <column id="dsuse_loc" type="STRING" size="256"/>
  1558. <column id="dsuse_de" type="STRING" size="256"/>
  1559. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1560. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1561. <column id="outdd" type="STRING" size="256"/>
  1562. <column id="out_bssh_cd" type="STRING" size="256"/>
  1563. <column id="out_bssh_nm" type="STRING" size="256"/>
  1564. <column id="out_storge_no" type="STRING" size="256"/>
  1565. <column id="out_dtl_cd" type="STRING" size="256"/>
  1566. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1567. <column id="insendfg" type="STRING" size="256"/>
  1568. <column id="outsendfg" type="STRING" size="256"/>
  1569. <column id="spreqy" type="STRING" size="256"/>
  1570. <column id="spredd" type="STRING" size="256"/>
  1571. <column id="spredt" type="STRING" size="256"/>
  1572. <column id="rtnfg" type="STRING" size="256"/>
  1573. <column id="rtndd" type="STRING" size="256"/>
  1574. <column id="rtndt" type="STRING" size="256"/>
  1575. <Column id="pid" type="STRING" size="256"/>
  1576. <Column id="indt" type="STRING" size="256"/>
  1577. <Column id="outdt" type="STRING" size="256"/>
  1578. <column id="in_prcpno" type="STRING" size="256"/>
  1579. <column id="in_drugdd" type="STRING" size="256"/>
  1580. <column id="in_drugno" type="STRING" size="256"/>
  1581. <column id="in_ioflag" type="STRING" size="256"/>
  1582. <column id="in_pid" type="STRING" size="256"/>
  1583. <Column id="ar_storge_no" type="STRING" size="256"/>
  1584. </ColumnInfo>
  1585. <Rows>
  1586. <Row/>
  1587. </Rows>
  1588. </Dataset>
  1589. <Dataset id="ds_adnmprdt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1590. <ColumnInfo>
  1591. <Column id="drugcd" type="STRING" size="256"/>
  1592. <Column id="ordnm" type="STRING" size="256"/>
  1593. <Column id="hngnm" type="STRING" size="256"/>
  1594. <Column id="gtin" type="STRING" size="256"/>
  1595. <Column id="prtm_se_nm" type="STRING" size="256"/>
  1596. <Column id="prd_min_distb_qy" type="STRING" size="256"/>
  1597. <Column id="prd_min_distb_unit" type="STRING" size="256"/>
  1598. <Column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1599. <Column id="prd_pce_unit" type="STRING" size="256"/>
  1600. </ColumnInfo>
  1601. </Dataset>
  1602. <Dataset id="ds_sendadnmprdt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1603. <ColumnInfo>
  1604. <Column id="basedd" type="STRING" size="256"/>
  1605. <Column id="srchcnts" type="STRING" size="256"/>
  1606. <Column id="srchflag" type="STRING" size="256"/>
  1607. </ColumnInfo>
  1608. <Rows>
  1609. <Row/>
  1610. </Rows>
  1611. </Dataset>
  1612. <Dataset id="ds_adnmstocbox" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1613. <ColumnInfo>
  1614. <Column id="drugcd" type="STRING" size="256"/>
  1615. <Column id="gtin" type="STRING" size="256"/>
  1616. <Column id="prd_valid_de" type="STRING" size="256"/>
  1617. <Column id="mnf_no" type="STRING" size="256"/>
  1618. <Column id="mnf_seq" type="STRING" size="256"/>
  1619. </ColumnInfo>
  1620. </Dataset>
  1621. <Dataset id="ds_storge_no" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1622. <ColumnInfo>
  1623. <Column id="storg_no" type="STRING" size="256"/>
  1624. <Column id="storg_nm" type="STRING" size="256"/>
  1625. <Column id="deptcd" type="STRING" size="256"/>
  1626. <Column id="deptnm" type="STRING" size="256"/>
  1627. <Column id="moveflag" type="STRING" size="256"/>
  1628. </ColumnInfo>
  1629. <Rows>
  1630. <Row/>
  1631. </Rows>
  1632. </Dataset>
  1633. <Dataset id="ds_send_deptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1634. <ColumnInfo>
  1635. <Column id="deptcd" type="STRING" size="256"/>
  1636. <Column id="deptnm" type="STRING" size="256"/>
  1637. <Column id="workflag" type="STRING" size="256"/>
  1638. </ColumnInfo>
  1639. <Rows>
  1640. <Row/>
  1641. </Rows>
  1642. </Dataset>
  1643. <Dataset id="ds_adnmstocmoveerr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1644. <ColumnInfo>
  1645. <column id="instcd" type="STRING" size="256"/>
  1646. <column id="drugcd" type="STRING" size="256"/>
  1647. <column id="prcpno" type="STRING" size="256"/>
  1648. <column id="drugdd" type="STRING" size="256"/>
  1649. <column id="drugno" type="STRING" size="256"/>
  1650. <column id="ioflag" type="STRING" size="256"/>
  1651. <column id="pid" type="STRING" size="256"/>
  1652. <Column id="patnm" type="STRING" size="256"/>
  1653. <Column id="qty" type="STRING" size="256"/>
  1654. </ColumnInfo>
  1655. <Rows>
  1656. <Row/>
  1657. </Rows>
  1658. </Dataset>
  1659. <Dataset id="ds_mainprtdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1660. <ColumnInfo>
  1661. <Column id="pid" type="STRING" size="256"/>
  1662. <Column id="patnm" type="STRING" size="256"/>
  1663. <Column id="drugcd" type="STRING" size="256"/>
  1664. <Column id="drugnm" type="STRING" size="256"/>
  1665. <Column id="drugno" type="STRING" size="256"/>
  1666. <Column id="drugdd" type="STRING" size="256"/>
  1667. <Column id="storge_no" type="STRING" size="256"/>
  1668. <Column id="labelno" type="STRING" size="256"/>
  1669. <Column id="prd_valid_de" type="STRING" size="256"/>
  1670. <Column id="mnf_no" type="STRING" size="256"/>
  1671. <Column id="mnf_seq" type="STRING" size="256"/>
  1672. <Column id="seq" type="STRING" size="256"/>
  1673. </ColumnInfo>
  1674. </Dataset>
  1675. <Dataset id="ds_adnmstocordermove" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1676. <ColumnInfo>
  1677. <column id="instcd" type="STRING" size="256"/>
  1678. <column id="drugcd" type="STRING" size="256"/>
  1679. <column id="infg" type="STRING" size="256"/>
  1680. <column id="histno" type="STRING" size="256"/>
  1681. <column id="gtin" type="STRING" size="256"/>
  1682. <column id="prd_valid_de" type="STRING" size="256"/>
  1683. <column id="mnf_no" type="STRING" size="256"/>
  1684. <column id="mnf_seq" type="STRING" size="256"/>
  1685. <column id="seq" type="STRING" size="256"/>
  1686. <column id="prd_sgtin" type="STRING" size="256"/>
  1687. <column id="storge_no" type="STRING" size="256"/>
  1688. <column id="prtm_se_nm" type="STRING" size="256"/>
  1689. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1690. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1691. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1692. <column id="prd_pce_unit" type="STRING" size="256"/>
  1693. <column id="in_pce_qy" type="STRING" size="256"/>
  1694. <column id="indd" type="STRING" size="256"/>
  1695. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1696. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1697. <column id="opp_storge_no" type="STRING" size="256"/>
  1698. <column id="in_dtl_cd" type="STRING" size="256"/>
  1699. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1700. <column id="out_fg" type="STRING" size="256"/>
  1701. <column id="out_pce_qy" type="STRING" size="256"/>
  1702. <column id="fnshfg" type="STRING" size="256"/>
  1703. <column id="prcpno" type="STRING" size="256"/>
  1704. <column id="drugdd" type="STRING" size="256"/>
  1705. <column id="drugno" type="STRING" size="256"/>
  1706. <column id="ioflag" type="STRING" size="256"/>
  1707. <column id="drugseqno" type="STRING" size="256"/>
  1708. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1709. <column id="pat_id_no" type="STRING" size="256"/>
  1710. <column id="pat_nm" type="STRING" size="256"/>
  1711. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1712. <column id="lcns_no" type="STRING" size="256"/>
  1713. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1714. <column id="prsc_ord_no" type="STRING" size="256"/>
  1715. <column id="diss_code" type="STRING" size="256"/>
  1716. <column id="once_qty" type="FLOAT" size="256"/>
  1717. <column id="ade_cnt" type="FLOAT" size="256"/>
  1718. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1719. <column id="sum_qy" type="FLOAT" size="256"/>
  1720. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1721. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1722. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1723. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1724. <column id="dsuse_loc" type="STRING" size="256"/>
  1725. <column id="dsuse_de" type="STRING" size="256"/>
  1726. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1727. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1728. <column id="outdd" type="STRING" size="256"/>
  1729. <column id="out_bssh_cd" type="STRING" size="256"/>
  1730. <column id="out_bssh_nm" type="STRING" size="256"/>
  1731. <column id="out_storge_no" type="STRING" size="256"/>
  1732. <column id="out_dtl_cd" type="STRING" size="256"/>
  1733. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1734. <column id="insendfg" type="STRING" size="256"/>
  1735. <column id="outsendfg" type="STRING" size="256"/>
  1736. <column id="spreqy" type="STRING" size="256"/>
  1737. <column id="spredd" type="STRING" size="256"/>
  1738. <column id="spredt" type="STRING" size="256"/>
  1739. <column id="rtnfg" type="STRING" size="256"/>
  1740. <column id="rtndd" type="STRING" size="256"/>
  1741. <column id="rtndt" type="STRING" size="256"/>
  1742. <Column id="pid" type="STRING" size="256"/>
  1743. <Column id="labelno" type="STRING" size="256"/>
  1744. <Column id="indt" type="STRING" size="256"/>
  1745. <Column id="outdt" type="STRING" size="256"/>
  1746. <column id="in_prcpno" type="STRING" size="256"/>
  1747. <column id="in_drugdd" type="STRING" size="256"/>
  1748. <column id="in_drugno" type="STRING" size="256"/>
  1749. <column id="in_ioflag" type="STRING" size="256"/>
  1750. <column id="in_pid" type="STRING" size="256"/>
  1751. <Column id="ar_storge_no" type="STRING" size="256"/>
  1752. </ColumnInfo>
  1753. <Rows>
  1754. <Row/>
  1755. </Rows>
  1756. </Dataset>
  1757. <Dataset id="ds_adnmstoclistmove" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1758. <ColumnInfo>
  1759. <column id="instcd" type="STRING" size="256"/>
  1760. <column id="drugcd" type="STRING" size="256"/>
  1761. <column id="infg" type="STRING" size="256"/>
  1762. <column id="histno" type="STRING" size="256"/>
  1763. <column id="gtin" type="STRING" size="256"/>
  1764. <column id="prd_valid_de" type="STRING" size="256"/>
  1765. <column id="mnf_no" type="STRING" size="256"/>
  1766. <column id="mnf_seq" type="STRING" size="256"/>
  1767. <column id="seq" type="STRING" size="256"/>
  1768. <column id="prd_sgtin" type="STRING" size="256"/>
  1769. <column id="storge_no" type="STRING" size="256"/>
  1770. <column id="prtm_se_nm" type="STRING" size="256"/>
  1771. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1772. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1773. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1774. <column id="prd_pce_unit" type="STRING" size="256"/>
  1775. <column id="in_pce_qy" type="STRING" size="256"/>
  1776. <column id="indd" type="STRING" size="256"/>
  1777. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1778. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1779. <column id="opp_storge_no" type="STRING" size="256"/>
  1780. <column id="in_dtl_cd" type="STRING" size="256"/>
  1781. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1782. <column id="out_fg" type="STRING" size="256"/>
  1783. <column id="out_pce_qy" type="STRING" size="256"/>
  1784. <column id="fnshfg" type="STRING" size="256"/>
  1785. <column id="prcpno" type="STRING" size="256"/>
  1786. <column id="drugdd" type="STRING" size="256"/>
  1787. <column id="drugno" type="STRING" size="256"/>
  1788. <column id="ioflag" type="STRING" size="256"/>
  1789. <column id="drugseqno" type="STRING" size="256"/>
  1790. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1791. <column id="pat_id_no" type="STRING" size="256"/>
  1792. <column id="pat_in" type="STRING" size="256"/>
  1793. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1794. <column id="lcns_no" type="STRING" size="256"/>
  1795. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1796. <column id="prsc_ord_no" type="STRING" size="256"/>
  1797. <column id="diss_code" type="STRING" size="256"/>
  1798. <column id="once_qy" type="FLOAT" size="256"/>
  1799. <column id="ade_cnt" type="FLOAT" size="256"/>
  1800. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1801. <column id="sum_qy" type="FLOAT" size="256"/>
  1802. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1803. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1804. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1805. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1806. <column id="dsuse_loc" type="STRING" size="256"/>
  1807. <column id="dsuse_de" type="STRING" size="256"/>
  1808. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1809. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1810. <column id="outdd" type="STRING" size="256"/>
  1811. <column id="out_bssh_cd" type="STRING" size="256"/>
  1812. <column id="out_bssh_nm" type="STRING" size="256"/>
  1813. <column id="out_storge_no" type="STRING" size="256"/>
  1814. <column id="out_dtl_cd" type="STRING" size="256"/>
  1815. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1816. <column id="insendfg" type="STRING" size="256"/>
  1817. <column id="outsendfg" type="STRING" size="256"/>
  1818. <column id="spreqy" type="STRING" size="256"/>
  1819. <column id="spredd" type="STRING" size="256"/>
  1820. <column id="spredt" type="STRING" size="256"/>
  1821. <column id="rtnfg" type="STRING" size="256"/>
  1822. <column id="rtndd" type="STRING" size="256"/>
  1823. <column id="rtndt" type="STRING" size="256"/>
  1824. <Column id="pid" type="STRING" size="256"/>
  1825. <Column id="indt" type="STRING" size="256"/>
  1826. <Column id="outdt" type="STRING" size="256"/>
  1827. <column id="in_prcpno" type="STRING" size="256"/>
  1828. <column id="in_drugdd" type="STRING" size="256"/>
  1829. <column id="in_drugno" type="STRING" size="256"/>
  1830. <column id="in_ioflag" type="STRING" size="256"/>
  1831. <column id="in_pid" type="STRING" size="256"/>
  1832. <Column id="ar_storge_no" type="STRING" size="256"/>
  1833. </ColumnInfo>
  1834. <Rows>
  1835. <Row/>
  1836. </Rows>
  1837. </Dataset>
  1838. <Dataset id="ds_drugcd_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1839. <ColumnInfo>
  1840. <Column id="drugcd" type="STRING" size="256"/>
  1841. </ColumnInfo>
  1842. <Rows>
  1843. <Row/>
  1844. </Rows>
  1845. </Dataset>
  1846. <Dataset id="ds_drugcd_desc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1847. <ColumnInfo>
  1848. <Column id="desc" type="STRING" size="256"/>
  1849. </ColumnInfo>
  1850. <Rows>
  1851. <Row/>
  1852. </Rows>
  1853. </Dataset>
  1854. </Objects>
  1855. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  1856. * System Name :
  1857. * Job Name :
  1858. * Creator :
  1859. * Make Date : 2018-03-08
  1860. * Description :
  1861. ****************************************************************************************/
  1862. //=======================================================================================
  1863. // Lib Include
  1864. //---------------------------------------------------------------------------------------
  1865. include "com_commonxp::comm_main.xjs"
  1866. include "ast_commonxp::AST.xjs"
  1867. var ArSendFlag = "";
  1868. var Arstorge_no = "";
  1869. var ArprdtQty = 0;
  1870. var ArprdtBox = 0;
  1871. var ArprdtComBox = 0;
  1872. var ArprdtFlag = "N";
  1873. var ASgtin = "";
  1874. var ASprd_valid_de = "";
  1875. var ASmnf_no = "";
  1876. var ASmnf_seq = "";
  1877. var TMPASgtin = "";
  1878. var TMPASprd_valid_de = "";
  1879. var TMPASmnf_no = "";
  1880. var TMPASmnf_seq = "";
  1881. var OpenViewFlag = "N";
  1882. var ArMoveflag = "N";
  1883. var ArMoveStorgno = "N";
  1884. var FrFindflag = "N";
  1885. var FCreflag = "N";
  1886. var Ardesc = "";
  1887. function SMADT12008_oninit(obj:Form, e:InitEventInfo)
  1888. {
  1889. frmf_initForm(obj); // 폼 초기화
  1890. }
  1891. function SMADT12008_onload(obj:Form, e:LoadEventInfo)
  1892. {
  1893. ds_main_narclist_narclist.clearData()
  1894. ds_adnmstocorder.clearData();
  1895. ds_adnmstocordermachi.clearData();
  1896. grdf_initGrid(grd_narclist02);
  1897. grdf_initGrid(grd_narclist01);
  1898. grdf_initGrid(grd_narclist04);
  1899. grdf_initGrid(grd_narclist06);
  1900. grdf_initGrid(grd_narclist07);
  1901. grdf_initGrid(grd_narclist03);
  1902. grdf_initGrid(grd_narclist05);
  1903. ds_main_narclist_narclist.copyData(arg_ds_sendnarcstoc);
  1904. ArSendFlag = arg_flag ;
  1905. ds_send_prntinfo.clear();
  1906. dsf_copyColInfo(ds_send_prntinfo,ds_finddrugno);
  1907. ds_send_prntinfo.addRow();
  1908. ////Prcp , Rtn 넘어오는 Flag 값//
  1909. //alert(ArSendFlag) ;
  1910. //저장소 정보 찾기
  1911. var Vdeptcd = ds_main_narclist_narclist.getColumn(0, "stocdeptcd");
  1912. ds_send_deptcd.clearData();
  1913. ds_send_deptcd.addRow();
  1914. ds_send_deptcd.setColumn(0,"deptcd" , Vdeptcd );
  1915. ds_send_deptcd.setColumn(0,"deptnm" , "" );
  1916. ds_send_deptcd.setColumn(0,"workflag" , "Y" );
  1917. var oParam = {};
  1918. oParam.id = "TRADT12014";
  1919. oParam.service = "pharmacydrugsumapp.NarcManagent";
  1920. oParam.method = "reqGetFindStorgno";
  1921. oParam.inds = "req=ds_send_deptcd";
  1922. oParam.outds = "ds_storge_no=storgno";
  1923. oParam.async = false;
  1924. tranf_submit(oParam);
  1925. Arstorge_no = ds_storge_no.getColumn(0, "storge_no");
  1926. //alert(ArSendFlag);
  1927. ///// 화면 Open시 데이타 생성
  1928. // but_ok.enable = true ;
  1929. But_Create.click();
  1930. /////////////////
  1931. }
  1932. function But_Create_onclick(obj:Button, e:ClickEventInfo)
  1933. {
  1934. if (ArSendFlag == "Prcp") {
  1935. but_ok.text = '불출승인'
  1936. // but_ok.enable = false ;
  1937. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  1938. ds_adnmstocorder.clearData();
  1939. ds_adnmstocordermachi.clearData();
  1940. FCreflag = "Y";
  1941. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  1942. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  1943. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  1944. var Fprcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  1945. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  1946. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  1947. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  1948. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  1949. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  1950. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  1951. var Fisdeptnm = ds_main_narclist_narclist.getColumn(i, "issdeptcdnm");
  1952. var Forddeptcd = ds_main_narclist_narclist.getColumn(i, "orddeptcd");
  1953. var Ftotdrugqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty"));
  1954. ds_send_stoc.setColumn(0,"pid" , "" );
  1955. ds_send_stoc.setColumn(0,"drugcd" , "" );
  1956. ds_send_stoc.setColumn(0,"drugdd" , "" );
  1957. ds_send_stoc.setColumn(0,"prcpno" , "" );
  1958. ds_send_stoc.setColumn(0,"storge_no" , "" );
  1959. ds_send_stoc.setColumn(0,"boxflag" , "" );
  1960. ds_send_stoc.setColumn(0,"gtin" , "" );
  1961. ds_send_stoc.setColumn(0,"prd_valid_de", "" );
  1962. ds_send_stoc.setColumn(0,"mnf_no" , "" );
  1963. ds_send_stoc.setColumn(0,"mnf_seq" , "" );
  1964. ds_send_stoc.setColumn(0,"ioflag" , "" );
  1965. ds_send_stoc.setColumn(0,"workflag" , "" );
  1966. /////////////////데이타 생성유무를 체크하여 재생성을 막는루틴
  1967. ds_send_stoc.setColumn(0,"pid" , Fpid );
  1968. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  1969. ds_send_stoc.setColumn(0,"drugdd" , Fdrugdd );
  1970. ds_send_stoc.setColumn(0,"prcpno" , Fprcpno );
  1971. var oParam = {};
  1972. oParam.id = "TRADT12007";
  1973. oParam.service = "pharmacydrugsumapp.NarcManagent";
  1974. oParam.method = "reqGetNarcStocOkList";
  1975. oParam.inds = "req=ds_send_stoc";
  1976. oParam.outds = "ds_adnmstoclist=stocdata";
  1977. oParam.async = false;
  1978. tranf_submit(oParam);
  1979. if ( ds_adnmstoclist.rowcount >= Ftotdrugqty ){
  1980. FCreflag = "N";
  1981. }
  1982. //////////////
  1983. ///일반물품 정보 찾기
  1984. // alert('일반물품 정보 찾기');
  1985. ArMoveStorgno = "";
  1986. ArMoveflag = "N";
  1987. ds_drugcd_send.setColumn(0,"drugcd" , Fprcpcd );
  1988. var oParam = {};
  1989. oParam.id = "TRADT12019";
  1990. oParam.service = "pharmacydrugsumapp.NarcManagent";
  1991. oParam.method = "reqGetDrugcdDesc";
  1992. oParam.inds = "req=ds_drugcd_send";
  1993. oParam.outds = "ds_drugcd_desc=desc";
  1994. oParam.async = false;
  1995. tranf_submit(oParam);
  1996. Ardesc = ds_drugcd_desc.getColumn(0, "drugdesc");
  1997. // alert(Ardesc);
  1998. //////// Ardesc == "증점은 무시"
  1999. if ( Ardesc == "일반"){
  2000. ArMoveflag == "N";
  2001. ArMoveStorgno == "";
  2002. }
  2003. /////////
  2004. ds_send_prntinfo.setColumn(0,"pid" , Fpid );
  2005. ds_send_prntinfo.setColumn(0,"drugdd" , Fdrugdd );
  2006. ds_send_prntinfo.setColumn(0,"prcpdd" , Fprcpdd );
  2007. ds_send_prntinfo.setColumn(0,"orddd" , Forddd );
  2008. ds_send_prntinfo.setColumn(0,"drugno" , Fdrugno );
  2009. ds_send_prntinfo.setColumn(0,"prcpno" , Fprcpno );
  2010. ds_send_prntinfo.setColumn(0,"ioflag" , Fioflag );
  2011. ds_send_prntinfo.setColumn(0,"prcphistno" , Fprcphistno );
  2012. ds_send_prntinfo.setColumn(0,"drugseqno" , Fdrugseqno );
  2013. dsf_makeValue(ds_send_prntinfo,"orddeptcd","string",Forddeptcd );
  2014. var oParam = {};
  2015. oParam.id = "TRADT30103";
  2016. oParam.service = "pharmacyprescriptionapp.Narcotics";
  2017. oParam.method = "reqGetNarcPrntData";
  2018. oParam.inds = "req=ds_send_prntinfo";
  2019. oParam.outds = "ds_main_prntlist_patinfo=patinfo ds_main_prntlist_diaginfo=diaginfo ds_main_prntlist_prntlist=prntlist ds_main_prntlist_resn=resn";
  2020. oParam.async = false;
  2021. ///oParam.callback = "cf_TRADT30103";
  2022. tranf_submit(oParam);
  2023. ArprdtFlag = "N";
  2024. var sPrcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd"); // 처방코드명
  2025. var sPrcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2026. var sDrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2027. var sPid = ds_main_narclist_narclist.getColumn(i, "pid");
  2028. var sTotdrugqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty"));
  2029. //////// 약품별 박수 수량찾기
  2030. ds_sendadnmprdt.setColumn(0,"basedd" , sDrugdd );
  2031. ds_sendadnmprdt.setColumn(0,"srchcnts" , sPrcpcd );
  2032. ds_sendadnmprdt.setColumn(0,"srchflag" , '1' );
  2033. //마약류 품목 목록 조회
  2034. var oParam = {};
  2035. oParam.id = "TRADT12121";
  2036. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2037. oParam.method = "reqGetPrdList";
  2038. oParam.inds = "req=ds_sendadnmprdt";
  2039. oParam.outds = "ds_adnmprdt=prdlist";
  2040. oParam.async = false;
  2041. tranf_submit(oParam);
  2042. ArprdtQty = ds_adnmprdt.getColumn(0, "prd_tot_pce_qy");
  2043. if ( sTotdrugqty >= ArprdtQty ) {
  2044. ArprdtFlag = "Y";
  2045. ArprdtBox = parseInt( sTotdrugqty / ArprdtQty) ;
  2046. }
  2047. ds_send_stoc.setColumn(0,"drugcd" , sPrcpcd );
  2048. ds_send_stoc.setColumn(0,"storge_no" , Arstorge_no );
  2049. ds_send_stoc.setColumn(0,"prcpno" , sPrcpno );
  2050. ds_send_stoc.setColumn(0,"seltype" , 'A' );
  2051. ds_send_stoc.setColumn(0,"boxflag" , ArprdtFlag );
  2052. ds_send_stoc.setColumn(0,"gtin" , "" );
  2053. ds_send_stoc.setColumn(0,"prd_valid_de" , '' );
  2054. ds_send_stoc.setColumn(0,"mnf_no" , '' );
  2055. ds_send_stoc.setColumn(0,"mnf_seq" , '' );
  2056. /////저장소별 코드별 박스수량 찾기
  2057. var oParam = {};
  2058. oParam.id = "TRADT12013";
  2059. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2060. oParam.method = "reqGetStocBox";
  2061. oParam.inds = "req=ds_send_stoc";
  2062. oParam.outds = "ds_adnmstocbox=stocdata";
  2063. oParam.async = false;
  2064. tranf_submit(oParam);
  2065. //박스 데이타 만들기
  2066. ASgtin = "";
  2067. ASprd_valid_de = "";
  2068. ASmnf_no = "";
  2069. ASmnf_seq = "";
  2070. ArprdtComBox = 1;
  2071. TMPASgtin = "";
  2072. TMPASprd_valid_de = "";
  2073. TMPASmnf_no = "";
  2074. TMPASmnf_seq = "";
  2075. if ( ArprdtFlag == "Y") {
  2076. for(var ii = 0; ii < ds_adnmstocbox.rowcount ; ii++){
  2077. var Fgtin = ds_adnmstocbox.getColumn(ii, "gtin");
  2078. var Fprd_valid_de = ds_adnmstocbox.getColumn(ii, "prd_valid_de");
  2079. var Fmnf_no = ds_adnmstocbox.getColumn(ii, "mnf_no");
  2080. var Fmnf_seq = ds_adnmstocbox.getColumn(ii, "mnf_seq");
  2081. var Fboxcnt = ds_adnmstocbox.getColumn(ii, "boxcnt");
  2082. if ( Fboxcnt == ArprdtQty ) {
  2083. // alert("ArprdtBox ; " + ArprdtBox );
  2084. if ( ArprdtBox >= ArprdtComBox ) {
  2085. if ( ArprdtComBox == 1 ) {
  2086. ASgtin = ASgtin + Fgtin ;
  2087. ASprd_valid_de = ASprd_valid_de + Fprd_valid_de;
  2088. ASmnf_no = ASmnf_no + Fmnf_no;
  2089. ASmnf_seq = ASmnf_seq + Fmnf_seq ;
  2090. TMPASgtin = ASgtin;
  2091. TMPASprd_valid_de = ASprd_valid_de;
  2092. TMPASmnf_no = ASmnf_no;
  2093. TMPASmnf_seq = ASmnf_seq;
  2094. } else {
  2095. if ( TMPASgtin <> Fgtin) {
  2096. ASgtin = ASgtin + "','" + Fgtin ;
  2097. TMPASgtin = Fgtin;
  2098. }
  2099. if ( TMPASprd_valid_de <> Fprd_valid_de) {
  2100. ASprd_valid_de = ASprd_valid_de + "','" + Fprd_valid_de;
  2101. TMPASprd_valid_de = Fprd_valid_de;
  2102. }
  2103. if ( TMPASmnf_no <> Fmnf_no) {
  2104. ASmnf_no = ASmnf_no + "','" + Fmnf_no;
  2105. TMPASmnf_no = Fmnf_no;
  2106. }
  2107. if ( TMPASmnf_seq <> Fmnf_seq) {
  2108. ASmnf_seq = ASmnf_seq + "','" + Fmnf_seq ;
  2109. TMPASmnf_seq = Fmnf_seq;
  2110. }
  2111. }
  2112. ArprdtComBox = ArprdtComBox + 1;
  2113. // alert("ArprdtComBox ; " + ArprdtComBox );
  2114. }
  2115. }
  2116. }
  2117. ds_send_stoc.setColumn(0,"gtin" , ASgtin );
  2118. ds_send_stoc.setColumn(0,"prd_valid_de" , ASprd_valid_de );
  2119. ds_send_stoc.setColumn(0,"mnf_no" , ASmnf_no );
  2120. ds_send_stoc.setColumn(0,"mnf_seq" , ASmnf_seq );
  2121. }
  2122. //////////
  2123. var oParam = {};
  2124. oParam.id = "TRADT12001";
  2125. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2126. oParam.method = "reqGetNarcStocList";
  2127. oParam.inds = "req=ds_send_stoc";
  2128. oParam.outds = "ds_adnmstoclist=stocdata";
  2129. oParam.async = false;
  2130. tranf_submit(oParam);
  2131. // trace ( "총건수 : " + ds_adnmstoclist.rowcount + ds_adnmstoclistmachi.rowcount);
  2132. // trace ( "stco건수 : " + ds_adnmstoclist.rowcount);
  2133. // trace ( "machi건수 : " + ds_adnmstoclistmachi.rowcount);
  2134. ///////대상자별 불출유무를 체크하여 산위단 화면에 노랑생상 넣기
  2135. if ( ds_adnmstoclist.rowcount >= sTotdrugqty ){
  2136. ds_main_narclist_narclist.setColumn(i,"sel" , "Y" );
  2137. }else{
  2138. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2139. }
  2140. if ( ds_adnmstoclist.rowcount <= sTotdrugqty ){
  2141. sTotdrugqty = ds_adnmstoclist.rowcount ;
  2142. }
  2143. // alert(Fpid + ':' + Fdrugdd + ':' + Fdrugno + ':' + sTotdrugqty);
  2144. ///등록된 데이타 수만큼 제한후 부터 처리하기 위해 기존 등록된 데이타 수 찾기
  2145. var scnt = 0 ;
  2146. for (var oo = 0; oo < ds_adnmstocorder.rowcount; oo++){
  2147. var ScCode = ds_adnmstocorder.getColumn(oo, "drugcd");
  2148. var Scfnshfg = ds_adnmstocorder.getColumn(oo, "fnshfg");
  2149. if ( Scfnshfg == '0') {
  2150. if ( sPrcpcd == ScCode) {
  2151. scnt = scnt + 1;
  2152. }
  2153. }
  2154. }
  2155. // alert("Fisdeptnm : " + Fisdeptnm);
  2156. for(var k = scnt; k < sTotdrugqty + scnt ; k++){
  2157. var nRow = ds_adnmstocorder.addRow();
  2158. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k);
  2159. ds_adnmstocorder.setColumn(nRow,"prcpno", ds_main_narclist_narclist.getColumn(i, "prcpno"));
  2160. ds_adnmstocorder.setColumn(nRow,"drugdd", ds_main_narclist_narclist.getColumn(i, "drugdd"));
  2161. ds_adnmstocorder.setColumn(nRow,"drugno", ds_main_narclist_narclist.getColumn(i, "drugno"));
  2162. ds_adnmstocorder.setColumn(nRow,"ioflag", ds_main_narclist_narclist.getColumn(i, "ioflag"));
  2163. ds_adnmstocorder.setColumn(nRow,"drugseqno", ds_main_narclist_narclist.getColumn(i, "drugseqno"));
  2164. ds_adnmstocorder.setColumn(nRow,"once_qty", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpqty")));
  2165. ds_adnmstocorder.setColumn(nRow,"ade_cnt", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcptims")));
  2166. ds_adnmstocorder.setColumn(nRow,"tot_dcnt", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpdayno")));
  2167. ds_adnmstocorder.setColumn(nRow,"sum_qy", parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty")));
  2168. if(!utlf_isNull(ds_main_narclist_narclist.getColumn(i, "spreqty"))) {
  2169. ds_adnmstocorder.setColumn(nRow,"spreqy", parseFloat(ds_main_narclist_narclist.getColumn(i, "spreqty")));
  2170. } else {
  2171. ds_adnmstocorder.setColumn(nRow,"spreqy", 0);
  2172. }
  2173. var Rrgstno = ds_main_prntlist_patinfo.getColumn(0, "rrgstno");
  2174. var psptno = ds_main_prntlist_patinfo.getColumn(0, "psptno");
  2175. // alert(Rrgstno.substr(7,7) );
  2176. if (Rrgstno.length == 14) {
  2177. var RRrgstno1 = Rrgstno.substr(0,6);
  2178. var RRrgstno2 = Rrgstno.substr(7,7);
  2179. var RRrgstnoall = RRrgstno1 + RRrgstno2;
  2180. if(!utlf_isRsrNo(RRrgstnoall)) {
  2181. if(utlf_isForegnResidentNo(RRrgstnoall)) {
  2182. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '02'); //외국인등록번호
  2183. } else {
  2184. if( (!utlf_isNull(psptno) && psptno != '-')) {
  2185. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '03');
  2186. RRrgstnoall = psptno;
  2187. } else {
  2188. if(utlf_getSex(RRrgstnoall) == "M") {
  2189. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '06'); //무명남
  2190. } else {
  2191. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '07'); //무명녀
  2192. }
  2193. }
  2194. }
  2195. } else {
  2196. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '01'); //주민번호
  2197. }
  2198. ds_adnmstocorder.setColumn(nRow,"pat_id_no", RRrgstnoall );
  2199. }
  2200. ds_adnmstocorder.setColumn(nRow,"pid", ds_main_prntlist_patinfo.getColumn(0, "pid"));
  2201. ds_adnmstocorder.setColumn(nRow,"pat_nm", ds_main_prntlist_patinfo.getColumn(0, "patnm"));
  2202. ds_adnmstocorder.setColumn(nRow,"lcns_asort_cd", '1');
  2203. ds_adnmstocorder.setColumn(nRow,"lcns_no", ds_main_prntlist_patinfo.getColumn(0, "medispclid_licnsno"));
  2204. ds_adnmstocorder.setColumn(nRow,"prsc_doc_nm", ds_main_prntlist_patinfo.getColumn(0, "medispclidnm"));
  2205. ds_adnmstocorder.setColumn(nRow,"prsc_ord_no", ds_main_narclist_narclist.getColumn(i, "drugno"));
  2206. var Diagcnt = ds_main_prntlist_diaginfo.rowcount;
  2207. if ( Diagcnt > 0 ) {
  2208. var sDiss_code = ds_main_prntlist_diaginfo.getColumn(0, "diagcd1");
  2209. var tDiss_code = sDiss_code.indexOf(" ");
  2210. var stDiss_code = sDiss_code.substr(0, tDiss_code);
  2211. ds_adnmstocorder.setColumn(nRow,"diss_code", stDiss_code);
  2212. }
  2213. // trace(ds_adnmstocorder.saveXML());
  2214. /* dsf_makeValue(ds_adnmstocorder,"patnm","string", ds_main_narclist_narclist.getColumn(0, "patnm"),nRow ); */
  2215. }
  2216. ////건당계산
  2217. /////FCreflag Flag = 'Y'일경우 생성 즉 생성된 데이타는 안만듬
  2218. if ( FCreflag == "Y" ) {
  2219. but_ok.click();
  2220. }
  2221. }
  2222. } else if (ArSendFlag == "Rtn") {
  2223. but_ok.text = '반품승인'
  2224. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  2225. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  2226. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2227. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  2228. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  2229. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  2230. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2231. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  2232. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  2233. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  2234. var sPrcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2235. var sPrcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2236. var sRtndrurqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "returnqty")); //반환량
  2237. ds_send_selstoc.setColumn(0, "drugcd", "");
  2238. ds_send_selstoc.setColumn(0, "prcpno", "");
  2239. ds_send_selstoc.setColumn(0, "drugno", "");
  2240. ds_send_selstoc.setColumn(0, "pat_id_no", "");
  2241. ds_send_selstoc.setColumn(0, "seltype", "");
  2242. ds_send_selstoc.setColumn(0, "drugdd", "");
  2243. ds_send_selstoc.setColumn(0, "pid", "");
  2244. ds_send_selstoc.setColumn(0,"drugcd" , sPrcpcd );
  2245. ds_send_selstoc.setColumn(0,"prcpno" , Fprcpno );
  2246. ds_send_selstoc.setColumn(0,"drugdd" , Fdrugdd );
  2247. ds_send_selstoc.setColumn(0,"drugno" , Fdrugno );
  2248. ds_send_selstoc.setColumn(0,"pid" , Fpid );
  2249. ds_send_selstoc.setColumn(0,"seltype" , 'R' );
  2250. var oParam = {};
  2251. oParam.id = "TRADT12005";
  2252. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2253. oParam.method = "reqGetOrdSelList";
  2254. oParam.inds = "req=ds_send_selstoc";
  2255. oParam.outds = "ds_adnmstoclist=stocdata";
  2256. oParam.async = false;
  2257. tranf_submit(oParam);
  2258. if (ds_adnmstoclist.rowcount > 0 ) {
  2259. for(var k = 0; k < sRtndrurqty ; k++){
  2260. ///// RTNDD // RTNDT // RTNFG
  2261. var nRow = ds_adnmstocorder.addRow();
  2262. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k);
  2263. }
  2264. }else{
  2265. alert("해당코드는 불출되지 않아 반환데이타를 만들수 없습니다.!")
  2266. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2267. }
  2268. }
  2269. } else if (ArSendFlag == "Spre") {
  2270. but_ok.text = '잔량승인'
  2271. /// alert("sprefg");
  2272. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  2273. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  2274. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2275. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  2276. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  2277. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  2278. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2279. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  2280. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  2281. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  2282. var sPrcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2283. var sPrcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2284. var sSpreqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "spreqty")); //잔량
  2285. var sPrcptims = parseInt(ds_main_narclist_narclist.getColumn(i, "prcptims")); //횟수
  2286. // alert(sSpreqty) ;
  2287. if ( sSpreqty == 0 || utlf_isNull(sSpreqty)) {
  2288. alert("해당코드는 잔량데이타가 없습니다.!")
  2289. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2290. }else{
  2291. ds_send_selstoc.setColumn(0, "drugcd", "");
  2292. ds_send_selstoc.setColumn(0, "prcpno", "");
  2293. ds_send_selstoc.setColumn(0, "drugno", "");
  2294. ds_send_selstoc.setColumn(0, "pat_id_no", "");
  2295. ds_send_selstoc.setColumn(0, "seltype", "");
  2296. ds_send_selstoc.setColumn(0, "drugdd", "");
  2297. ds_send_selstoc.setColumn(0, "pid", "");
  2298. ds_send_selstoc.setColumn(0,"drugcd" , sPrcpcd );
  2299. ds_send_selstoc.setColumn(0,"prcpno" , Fprcpno );
  2300. ds_send_selstoc.setColumn(0,"drugdd" , Fdrugdd );
  2301. ds_send_selstoc.setColumn(0,"drugno" , Fdrugno );
  2302. ds_send_selstoc.setColumn(0,"pid" , Fpid );
  2303. ds_send_selstoc.setColumn(0,"seltype" , 'S' );
  2304. var oParam = {};
  2305. oParam.id = "TRADT12005";
  2306. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2307. oParam.method = "reqGetOrdSelList";
  2308. oParam.inds = "req=ds_send_selstoc";
  2309. oParam.outds = "ds_adnmstoclist=stocdata";
  2310. oParam.async = false;
  2311. tranf_submit(oParam);
  2312. if (ds_adnmstoclist.rowcount > 0 ) {
  2313. for(var k = 0; k < sPrcptims ; k++){
  2314. // alert(ds_adnmstoclist.getColumn(k, "sprefg");
  2315. ds_adnmstoclist.setColumn(k,"spreqy", sSpreqty);
  2316. var nRow = ds_adnmstocorder.addRow();
  2317. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k); ///sSpreqty
  2318. // ds_adnmstocorder.setColumn(k,"spreqy" , sSpreqty );
  2319. }
  2320. }else{
  2321. alert("해당코드는 불출되지 않아 잔량데이타를 만들수 없습니다.!")
  2322. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2323. }
  2324. }
  2325. }
  2326. }
  2327. }
  2328. function But_View_onclick(obj:Button, e:ClickEventInfo)
  2329. {
  2330. ds_adnmstocorder.clearData();
  2331. ds_adnmstocordermachi.clearData();
  2332. ds_adnmstoclistmachi_old.clearData();
  2333. ds_adnmstocmoveerr.clearData();
  2334. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  2335. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  2336. var Fpatnm = ds_main_narclist_narclist.getColumn(i, "patnm");
  2337. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2338. var Fdrugcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2339. var Fprcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2340. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  2341. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  2342. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  2343. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2344. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  2345. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  2346. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  2347. var Fisdeptnm = ds_main_narclist_narclist.getColumn(i, "issdeptcdnm");
  2348. var Ftotdrugqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty")); // 처방코드명
  2349. ds_send_stoc.setColumn(0,"pid" , "" );
  2350. ds_send_stoc.setColumn(0,"drugcd" , "" );
  2351. ds_send_stoc.setColumn(0,"drugdd" , "" );
  2352. ds_send_stoc.setColumn(0,"prcpno" , "" );
  2353. ds_send_stoc.setColumn(0,"storge_no" , "" );
  2354. ds_send_stoc.setColumn(0,"boxflag" , "" );
  2355. ds_send_stoc.setColumn(0,"gtin" , "" );
  2356. ds_send_stoc.setColumn(0,"prd_valid_de", "" );
  2357. ds_send_stoc.setColumn(0,"mnf_no" , "" );
  2358. ds_send_stoc.setColumn(0,"mnf_seq" , "" );
  2359. ds_send_stoc.setColumn(0,"ioflag" , "" );
  2360. ds_send_stoc.setColumn(0,"workflag" , "" );
  2361. /////////////////////
  2362. ///부서별 저장소 및 이송유무 찾기
  2363. ////////////////////
  2364. ds_send_deptcd.clearData();
  2365. ds_send_deptcd.addRow();
  2366. ArMoveStorgno = "";
  2367. ArMoveflag = "N";
  2368. ds_send_deptcd.setColumn(0,"deptcd" , "" );
  2369. ds_send_deptcd.setColumn(0,"deptnm" , Fisdeptnm );
  2370. ds_send_deptcd.setColumn(0,"workflag" , "N" );
  2371. var oParam = {};
  2372. oParam.id = "TRADT12014";
  2373. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2374. oParam.method = "reqGetFindStorgno";
  2375. oParam.inds = "req=ds_send_deptcd";
  2376. oParam.outds = "ds_storge_no=storgno";
  2377. oParam.async = false;
  2378. tranf_submit(oParam);
  2379. if ( ds_storge_no.rowcount < 0 ) {
  2380. ArMoveflag = "N";
  2381. } else {
  2382. ArMoveflag = ds_storge_no.getColumn(0, "moveflag");
  2383. ArMoveStorgno = ds_storge_no.getColumn(0, "storge_no");
  2384. }
  2385. //////// 2018년 7월 9일 일반약품은 저장소 이동없음 김민주과 협의
  2386. if ( Ardesc == "일반"){
  2387. ArMoveflag == "N";
  2388. ArMoveStorgno == "";
  2389. }
  2390. /////////
  2391. ////////////////////////////
  2392. ds_send_prntinfo.setColumn(0,"pid" , Fpid );
  2393. ds_send_prntinfo.setColumn(0,"drugdd" , Fdrugdd );
  2394. ds_send_prntinfo.setColumn(0,"prcpdd" , Fprcpdd );
  2395. ds_send_prntinfo.setColumn(0,"orddd" , Forddd );
  2396. ds_send_prntinfo.setColumn(0,"drugno" , Fdrugno );
  2397. ds_send_prntinfo.setColumn(0,"prcpno" , Fprcpno );
  2398. ds_send_prntinfo.setColumn(0,"ioflag" , Fioflag );
  2399. ds_send_prntinfo.setColumn(0,"prcphistno" , Fprcphistno );
  2400. ds_send_prntinfo.setColumn(0,"drugseqno" , Fdrugseqno );
  2401. // alert(sPrcpcd);
  2402. ds_send_stoc.setColumn(0,"pid" , Fpid );
  2403. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  2404. ds_send_stoc.setColumn(0,"drugdd" , Fdrugdd );
  2405. ds_send_stoc.setColumn(0,"prcpno" , Fprcpno );
  2406. var oParam = {};
  2407. oParam.id = "TRADT12007";
  2408. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2409. oParam.method = "reqGetNarcStocOkList";
  2410. oParam.inds = "req=ds_send_stoc";
  2411. oParam.outds = "ds_adnmstoclist=stocdata";
  2412. oParam.async = false;
  2413. tranf_submit(oParam);
  2414. if ( ds_adnmstoclist.rowcount >= Ftotdrugqty ){
  2415. ds_main_narclist_narclist.setColumn(i,"sel" , "Y" );
  2416. }else{
  2417. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2418. }
  2419. for(var k = 0; k < ds_adnmstoclist.rowcount ; k++){
  2420. var nRow = ds_adnmstocorder.addRow();
  2421. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k);
  2422. }
  2423. }
  2424. ////////////////합계 만들기
  2425. ds_sumlist.clearData();
  2426. var Vcnt = 0;
  2427. var VCode = "";
  2428. for (var ss = 0; ss < ds_main_narclist_narclist.rowcount ; ss++){
  2429. var VCode = ds_main_narclist_narclist.getColumn(ss, "prcpcd"); // 처방코드명
  2430. if ( ss == 0 ) {
  2431. var sRow = ds_sumlist.addRow();
  2432. ds_sumlist.setColumn(sRow,"code", VCode);
  2433. } else {
  2434. var FCodeFlag = "Y" ;
  2435. var Sdacnt = ds_sumlist.rowcount ;
  2436. for (var se = 0; se < Sdacnt ; se++){
  2437. var VCodeSave = ds_sumlist.getColumn(se, "code"); // 처방코드명
  2438. if ( VCode == VCodeSave ) {
  2439. var FCodeFlag = "N";
  2440. break ;
  2441. }
  2442. }
  2443. if ( FCodeFlag == "Y" ) {
  2444. var nRow = ds_sumlist.addRow();
  2445. ds_sumlist.setColumn(nRow,"code", VCode);
  2446. }
  2447. }
  2448. }
  2449. for ( var sm = 0; sm < ds_sumlist.rowcount ; sm++ ){
  2450. var VSCode = ds_sumlist.getColumn(sm, "code"); // 처방코드명
  2451. // alert (VSCode )
  2452. //// 처방현황 조회
  2453. var VordSum = 0 ;
  2454. var Vorsqty = 0 ;
  2455. for (var sn = 0; sn < ds_main_narclist_narclist.rowcount ; sn++){
  2456. var VNCode = ds_main_narclist_narclist.getColumn(sn, "prcpcd"); // 처방코드명
  2457. var Vordqty = ds_main_narclist_narclist.getColumn(sn, "totdrugqty"); // 처방코드명
  2458. if ( VSCode == VNCode ) {
  2459. // alert (VSCode +" : " + VNCode+" : " + Vordqty)
  2460. VordSum = VordSum + Vordqty ;
  2461. }
  2462. }
  2463. //// 재고불출현황 조회
  2464. var VDrgSum = 0 ;
  2465. for (var sn = 0; sn < ds_adnmstocorder.rowcount ; sn++){
  2466. var VNCode = ds_adnmstocorder.getColumn(sn, "drugcd"); // 처방코드명
  2467. if ( VSCode == VNCode ) {
  2468. // alert (VSCode +" : " + VNCode+" : " + Vordqty)
  2469. VDrgSum = VDrgSum + 1 ;
  2470. }
  2471. }
  2472. ds_send_stoc.setColumn(0,"drugcd" , VSCode );
  2473. ds_send_stoc.setColumn(0,"seltype" , "S" );
  2474. ds_send_stoc.setColumn(0,"storge_no" , Arstorge_no );
  2475. var oParam = {};
  2476. oParam.id = "TRADT12002";
  2477. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2478. oParam.method = "reqGetNarcStocCodeList";
  2479. oParam.inds = "req=ds_send_stoc";
  2480. oParam.outds = "ds_adnmstoclist=stocdata";
  2481. oParam.async = false;
  2482. tranf_submit(oParam);
  2483. ds_sumlist.setColumn(sm,"order", VordSum);
  2484. ds_sumlist.setColumn(sm,"outsum", VDrgSum);
  2485. ds_sumlist.setColumn(sm,"jaegosum", ds_adnmstoclist.rowcount);
  2486. }
  2487. }
  2488. function but_ok_onclick(obj:Button, e:ClickEventInfo)
  2489. {
  2490. ///조회 조건에 따라
  2491. if (ArSendFlag == "Prcp") {
  2492. // alert(ds_adnmstocorder.rowcount);
  2493. for(var q = 0; q < ds_adnmstocorder.rowcount ; q++){
  2494. var sFnshfg = ds_adnmstocorder.getColumn(q, "fnshfg");
  2495. var sInstcd = ds_adnmstocorder.getColumn(q, "instcd");
  2496. var sInfg = ds_adnmstocorder.getColumn(q, "infg");
  2497. var sHistno = ds_adnmstocorder.getColumn(q, "histno");
  2498. var sGtin = ds_adnmstocorder.getColumn(q, "gtin");
  2499. var sPrd_valid_de = ds_adnmstocorder.getColumn(q, "prd_valid_de");
  2500. var sMnf_no = ds_adnmstocorder.getColumn(q, "mnf_no");
  2501. var sMnf_seq = ds_adnmstocorder.getColumn(q, "mnf_seq");
  2502. var sSeq = ds_adnmstocorder.getColumn(q, "seq");
  2503. var sPrcpno = ds_adnmstocorder.getColumn(q, "prcpno");
  2504. var sDrugdd = ds_adnmstocorder.getColumn(q, "drugdd");
  2505. var sDrugno = ds_adnmstocorder.getColumn(q, "drugno");
  2506. var sIoflag = ds_adnmstocorder.getColumn(q, "ioflag");
  2507. var sDrugseqno = ds_adnmstocorder.getColumn(q, "drugseqno");
  2508. var sOnce_qty = parseFloat(ds_adnmstocorder.getColumn(q, "once_qty"));
  2509. var sAde_cnt = parseFloat(ds_adnmstocorder.getColumn(q, "ade_cnt"));
  2510. var sTot_dcnt = parseFloat(ds_adnmstocorder.getColumn(q, "tot_dcnt"));
  2511. var sSum_qy = parseFloat(ds_adnmstocorder.getColumn(q, "sum_qy"));
  2512. var sSpreqy = parseFloat(ds_adnmstocorder.getColumn(q, "spreqy"));
  2513. var sPat_id_no = ds_adnmstocorder.getColumn(q, "pat_id_no");
  2514. var sPid = ds_adnmstocorder.getColumn(q, "pid");
  2515. var sPat_nm = ds_adnmstocorder.getColumn(q, "pat_nm");
  2516. var sLcns_no = ds_adnmstocorder.getColumn(q, "lcns_no");
  2517. var sPrsc_doc_nm = ds_adnmstocorder.getColumn(q, "prsc_doc_nm");
  2518. var sPrsc_ord_no = ds_adnmstocorder.getColumn(q, "prsc_ord_no");
  2519. var sDiss_code = ds_adnmstocorder.getColumn(q, "diss_code");
  2520. var sPat_id_no_ty_cd = ds_adnmstocorder.getColumn(q, "pat_id_no_ty_cd");
  2521. //trace(ds_sendstocupdata.saveXML());
  2522. if ( sFnshfg == '1' ) {
  2523. // alert("이미 등록된 데이타 등록하지 않습니다.!")
  2524. } else {
  2525. ds_sendstocupdata.clearData();
  2526. ds_sendstocupdata.addRow();
  2527. ds_sendstocupdata.setColumn(0,"instcd" , sInstcd );
  2528. ds_sendstocupdata.setColumn(0,"infg" , sInfg );
  2529. ds_sendstocupdata.setColumn(0,"histno" , sHistno );
  2530. ds_sendstocupdata.setColumn(0,"gtin" , sGtin );
  2531. ds_sendstocupdata.setColumn(0,"prd_valid_de" , sPrd_valid_de );
  2532. ds_sendstocupdata.setColumn(0,"mnf_no" , sMnf_no );
  2533. ds_sendstocupdata.setColumn(0,"mnf_seq" , sMnf_seq );
  2534. ds_sendstocupdata.setColumn(0,"seq" , sSeq);
  2535. ds_sendstocupdata.setColumn(0,"prcpno" , sPrcpno );
  2536. ds_sendstocupdata.setColumn(0,"drugdd" , sDrugdd );
  2537. ds_sendstocupdata.setColumn(0,"drugno" , sDrugno);
  2538. ds_sendstocupdata.setColumn(0,"ioflag" , sIoflag);
  2539. ds_sendstocupdata.setColumn(0,"drugseqno" , sDrugseqno );
  2540. ds_sendstocupdata.setColumn(0,"pat_id_no_ty_cd" , utlf_isNull(sPat_id_no_ty_cd) ? "05" : sPat_id_no_ty_cd); /// 01. 주민번호
  2541. ds_sendstocupdata.setColumn(0,"pat_id_no" , sPat_id_no );
  2542. ds_sendstocupdata.setColumn(0,"pat_nm" , sPat_nm );
  2543. ds_sendstocupdata.setColumn(0,"lcns_asort_cd" , "1" ); //// 1.의사
  2544. ds_sendstocupdata.setColumn(0,"lcns_no" , sLcns_no );
  2545. ds_sendstocupdata.setColumn(0,"prsc_doc_nm" , sPrsc_doc_nm );
  2546. ds_sendstocupdata.setColumn(0,"prsc_ord_no" , sDrugno );
  2547. ds_sendstocupdata.setColumn(0,"diss_code" , sDiss_code );
  2548. ds_sendstocupdata.setColumn(0,"once_qy" , sOnce_qty );
  2549. ds_sendstocupdata.setColumn(0,"ade_cnt" , sAde_cnt);
  2550. ds_sendstocupdata.setColumn(0,"tot_dcnt" , sTot_dcnt );
  2551. ds_sendstocupdata.setColumn(0,"sum_qy" , sSum_qy );
  2552. ds_sendstocupdata.setColumn(0,"pid" , sPid );
  2553. ds_sendstocupdata.setColumn(0,"spreqy" , sSpreqy );
  2554. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "I" );
  2555. var oParam = {};
  2556. oParam.id = "TXADT12001";
  2557. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2558. oParam.method = "reqGetStocUpData";
  2559. oParam.inds = "req=ds_sendstocupdata";
  2560. //oParam.outds = "ds_adnmstoclist=stocdata";
  2561. oParam.async = false;
  2562. tranf_submit(oParam);
  2563. }
  2564. }
  2565. //////////////
  2566. for(var q = 0; q < ds_adnmstocordermachi.rowcount ; q++){
  2567. var smFnshfg = ds_adnmstocordermachi.getColumn(q, "fnshfg");
  2568. var smInstcd = ds_adnmstocordermachi.getColumn(q, "instcd");
  2569. var smInfg = ds_adnmstocordermachi.getColumn(q, "infg");
  2570. var smHistno = ds_adnmstocordermachi.getColumn(q, "histno");
  2571. var smGtin = ds_adnmstocordermachi.getColumn(q, "gtin");
  2572. var smPrd_valid_de = ds_adnmstocordermachi.getColumn(q, "prd_valid_de");
  2573. var smMnf_no = ds_adnmstocordermachi.getColumn(q, "mnf_no");
  2574. var smMnf_seq = ds_adnmstocordermachi.getColumn(q, "mnf_seq");
  2575. var smSeq = ds_adnmstocordermachi.getColumn(q, "seq");
  2576. var smStorge_no = ds_adnmstocordermachi.getColumn(q, "storge_no");
  2577. var smMovestorge_no= ds_adnmstocordermachi.getColumn(q, "ar_storge_no");
  2578. //trace(ds_sendstocupdata.saveXML());
  2579. if ( sFnshfg == '1' ) {
  2580. // alert("이미 등록된 데이타 등록하지 않습니다.!")
  2581. } else {
  2582. ds_sendstocupdata.clearData();
  2583. ds_sendstocupdata.addRow();
  2584. ds_sendstocupdata.setColumn(0,"instcd" , smInstcd );
  2585. ds_sendstocupdata.setColumn(0,"infg" , smInfg );
  2586. ds_sendstocupdata.setColumn(0,"histno" , smHistno );
  2587. ds_sendstocupdata.setColumn(0,"gtin" , smGtin );
  2588. ds_sendstocupdata.setColumn(0,"prd_valid_de" , smPrd_valid_de );
  2589. ds_sendstocupdata.setColumn(0,"mnf_no" , smMnf_no );
  2590. ds_sendstocupdata.setColumn(0,"mnf_seq" , smMnf_seq );
  2591. ds_sendstocupdata.setColumn(0,"seq" , smSeq);
  2592. ds_sendstocupdata.setColumn(0,"storge_no" , smStorge_no);
  2593. ds_sendstocupdata.setColumn(0,"out_storge_no" , smMovestorge_no);
  2594. ds_sendstocupdata.setColumn(0,"new_storge_no" , smMovestorge_no);
  2595. //trace(sPrcpno) ;
  2596. ds_sendstocupdata.setColumn(0,"in_prcpno" , sPrcpno);
  2597. ds_sendstocupdata.setColumn(0,"in_drugno" , sDrugno);
  2598. ds_sendstocupdata.setColumn(0,"in_drugdd" , sDrugdd);
  2599. ds_sendstocupdata.setColumn(0,"in_ioflag" , sIoflag);
  2600. ds_sendstocupdata.setColumn(0,"in_pid" , sPid);
  2601. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "I" );
  2602. //trace(ds_sendstocupdata.saveXML());
  2603. var oParam = {};
  2604. oParam.id = "TXADT12002";
  2605. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2606. oParam.method = "reqGetStocCreate";
  2607. oParam.inds = "req=ds_sendstocupdata";
  2608. //oParam.outds = "ds_adnmstoclist=stocdata";
  2609. oParam.async = false;
  2610. tranf_submit(oParam);
  2611. ds_sendstocupdata.setColumn(0,"ordtype" , "M");
  2612. //trace(ds_sendstocupdata.saveXML());
  2613. var oParam = {};
  2614. oParam.id = "TXADT12001";
  2615. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2616. oParam.method = "reqGetStocUpData";
  2617. oParam.inds = "req=ds_sendstocupdata";
  2618. //oParam.outds = "ds_adnmstoclist=stocdata";
  2619. oParam.async = false;
  2620. tranf_submit(oParam);
  2621. }
  2622. }
  2623. //////////////
  2624. } else if (ArSendFlag == "Rtn") {
  2625. for(var q = 0; q < ds_adnmstocorder.rowcount ; q++){
  2626. var Sseq = q + 1;
  2627. var sPid = ds_adnmstocorder.getColumn(q, "pid");
  2628. var sPat_nm = ds_adnmstocorder.getColumn(q, "pat_nm");
  2629. var sDrugno = ds_adnmstocorder.getColumn(q, "drugno");
  2630. var sDrugcd = ds_adnmstocorder.getColumn(q, "drugcd");
  2631. var sFnshfg = ds_adnmstocorder.getColumn(q, "rtnfg");
  2632. var sInstcd = ds_adnmstocorder.getColumn(q, "instcd");
  2633. var sInfg = ds_adnmstocorder.getColumn(q, "infg");
  2634. var sHistno = ds_adnmstocorder.getColumn(q, "histno");
  2635. var sGtin = ds_adnmstocorder.getColumn(q, "gtin");
  2636. var sPrd_valid_de = ds_adnmstocorder.getColumn(q, "prd_valid_de");
  2637. var sMnf_no = ds_adnmstocorder.getColumn(q, "mnf_no");
  2638. var sMnf_seq = ds_adnmstocorder.getColumn(q, "mnf_seq");
  2639. var sSeq = ds_adnmstocorder.getColumn(q, "seq");
  2640. //trace(ds_sendstocupdata.saveXML());
  2641. if ( sFnshfg == '1' ) {
  2642. alert(Sseq+ "번 Row 환자"+ sPid +"("+sPat_nm +") 투약번호:"+sDrugno +" 의 처방("+ sDrugcd + ")은 이미 반환승인되었습니다.!")
  2643. } else {
  2644. ds_sendstocupdata.clearData();
  2645. ds_sendstocupdata.addRow();
  2646. ds_sendstocupdata.setColumn(0,"instcd" , sInstcd );
  2647. ds_sendstocupdata.setColumn(0,"infg" , sInfg );
  2648. ds_sendstocupdata.setColumn(0,"histno" , sHistno );
  2649. ds_sendstocupdata.setColumn(0,"gtin" , sGtin );
  2650. ds_sendstocupdata.setColumn(0,"prd_valid_de" , sPrd_valid_de );
  2651. ds_sendstocupdata.setColumn(0,"mnf_no" , sMnf_no );
  2652. ds_sendstocupdata.setColumn(0,"mnf_seq" , sMnf_seq );
  2653. ds_sendstocupdata.setColumn(0,"seq" , sSeq);
  2654. ds_sendstocupdata.setColumn(0,"storge_no" , Arstorge_no);
  2655. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "R" );
  2656. var oParam = {};
  2657. oParam.id = "TXADT12001";
  2658. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2659. oParam.method = "reqGetStocUpData";
  2660. oParam.inds = "req=ds_sendstocupdata";
  2661. //oParam.outds = "ds_adnmstoclist=stocdata";
  2662. oParam.async = false;
  2663. tranf_submit(oParam);
  2664. var oParam = {};
  2665. oParam.id = "TXADT12003";
  2666. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2667. oParam.method = "reqGetStocMove";
  2668. oParam.inds = "req=ds_sendstocupdata";
  2669. //oParam.outds = "ds_adnmstoclist=stocdata";
  2670. oParam.async = false;
  2671. tranf_submit(oParam);
  2672. }
  2673. }
  2674. this.reload();
  2675. } else if (ArSendFlag == "Spre") {
  2676. for(var q = 0; q < ds_adnmstocorder.rowcount ; q++){
  2677. var Sseq = q + 1;
  2678. var sPid = ds_adnmstocorder.getColumn(q, "pid");
  2679. var sPat_nm = ds_adnmstocorder.getColumn(q, "pat_nm");
  2680. var sDrugno = ds_adnmstocorder.getColumn(q, "drugno");
  2681. var sDrugcd = ds_adnmstocorder.getColumn(q, "drugcd");
  2682. var sFnshfg = ds_adnmstocorder.getColumn(q, "sprefg");
  2683. var sInstcd = ds_adnmstocorder.getColumn(q, "instcd");
  2684. var sInfg = ds_adnmstocorder.getColumn(q, "infg");
  2685. var sHistno = ds_adnmstocorder.getColumn(q, "histno");
  2686. var sGtin = ds_adnmstocorder.getColumn(q, "gtin");
  2687. var sPrd_valid_de = ds_adnmstocorder.getColumn(q, "prd_valid_de");
  2688. var sMnf_no = ds_adnmstocorder.getColumn(q, "mnf_no");
  2689. var sMnf_seq = ds_adnmstocorder.getColumn(q, "mnf_seq");
  2690. var sSeq = ds_adnmstocorder.getColumn(q, "seq");
  2691. var sSpreqy = parseFloat(ds_adnmstocorder.getColumn(q, "spreqy"));
  2692. //trace(ds_sendstocupdata.saveXML());
  2693. if ( sFnshfg == '1' ) {
  2694. alert(Sseq+ "번 Row 환자"+ sPid +"("+sPat_nm +") 투약번호:"+sDrugno +" 의 처방("+ sDrugcd + ")은 이미 잔량승인되었습니다.!")
  2695. } else {
  2696. ds_sendstocupdata.clearData();
  2697. ds_sendstocupdata.addRow();
  2698. ds_sendstocupdata.setColumn(0,"instcd" , sInstcd );
  2699. ds_sendstocupdata.setColumn(0,"infg" , sInfg );
  2700. ds_sendstocupdata.setColumn(0,"histno" , sHistno );
  2701. ds_sendstocupdata.setColumn(0,"gtin" , sGtin );
  2702. ds_sendstocupdata.setColumn(0,"prd_valid_de" , sPrd_valid_de );
  2703. ds_sendstocupdata.setColumn(0,"mnf_no" , sMnf_no );
  2704. ds_sendstocupdata.setColumn(0,"mnf_seq" , sMnf_seq );
  2705. ds_sendstocupdata.setColumn(0,"seq" , sSeq);
  2706. ds_sendstocupdata.setColumn(0,"spreqy" , sSpreqy);
  2707. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "S" );
  2708. var oParam = {};
  2709. oParam.id = "TXADT12001";
  2710. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2711. oParam.method = "reqGetStocUpData";
  2712. oParam.inds = "req=ds_sendstocupdata";
  2713. //oParam.outds = "ds_adnmstoclist=stocdata";
  2714. oParam.async = false;
  2715. tranf_submit(oParam);
  2716. }
  2717. }
  2718. this.reload();
  2719. }
  2720. }
  2721. function Button00_onclick(obj:Button, e:ClickEventInfo)
  2722. {
  2723. this.close();
  2724. }
  2725. function grd_narclist01_onheadclick(obj:Grid, e:GridClickEventInfo)
  2726. {
  2727. // obj.enableevent = false;
  2728. // if(e.col == 1) fn_chkAll(obj);
  2729. // obj.enableevent = true;
  2730. }
  2731. /******************************************************************
  2732. * Argument : fn_chkAll(obj)
  2733. * Description : head checkbox click event
  2734. ******************************************************************/
  2735. function fn_chkAll(obj){
  2736. if( obj.getCellProperty("Head", 1, "displaytype") == "checkbox"){
  2737. if( utlf_isNull(obj.getCellProperty("Head", 1, "text")) ){
  2738. obj.setCellProperty("Head", 1, "text","expr:1");
  2739. for( var i = 0; i < ds_adnmstocorder.rowcount; i++ ){
  2740. var narcstat = ds_adnmstocorder.getColumn(i, "flag");
  2741. if( narcstat == "1"){
  2742. ds_adnmstocorder.setColumn(i, "flag", "0");
  2743. } else {
  2744. ds_adnmstocorder.setColumn(i, "flag", "1");
  2745. }
  2746. }
  2747. } else {
  2748. obj.setCellProperty("Head", 1, "text", "");
  2749. for( var i = 0; i < ds_adnmstocorder.rowcount; i++ ){
  2750. ds_adnmstocorder.setColumn(i, "flag", "0");
  2751. }
  2752. }
  2753. }
  2754. }
  2755. function But_BatcodePrt_onclick(obj:Button, e:ClickEventInfo)
  2756. {
  2757. for(var qq = 0; qq < ds_adnmstocorder.rowcount ; qq++){
  2758. var SFlag = ds_adnmstocorder.getColumn(qq, "flag");
  2759. if ( SFlag == '1'){
  2760. ds_mainprtdata.clearData();
  2761. FrFindflag = "N";
  2762. var Spid = ds_adnmstocorder.getColumn(qq, "pid");
  2763. var Spatnm = ds_adnmstocorder.getColumn(qq, "pat_nm");
  2764. var Sdrugcd = ds_adnmstocorder.getColumn(qq, "drugcd");
  2765. ////////////// 명칭 찾기
  2766. for(var ww = 0; ww < ds_main_narclist_narclist.rowcount ; ww++){
  2767. if (FrFindflag == "N") {
  2768. var Fdrugcd = ds_main_narclist_narclist.getColumn(ww, "prcpcd");
  2769. if (Sdrugcd == Fdrugcd) {
  2770. var Sdrugnm = ds_main_narclist_narclist.getColumn(ww, "drugnm");
  2771. // alert(Sdrugnm);
  2772. FrFindflag = "Y" ;
  2773. }
  2774. }
  2775. }
  2776. var Sdrugno = ds_adnmstocorder.getColumn(qq, "drugno");
  2777. var Sdrugdd = ds_adnmstocorder.getColumn(qq, "drugdd");
  2778. var Sstorge_no = ds_adnmstocorder.getColumn(qq, "storge_no");
  2779. var Slabelno = ds_adnmstocorder.getColumn(qq, "labelno");
  2780. var Sprd_valid_de = ds_adnmstocorder.getColumn(qq, "prd_valid_de");
  2781. var Smnf_no = ds_adnmstocorder.getColumn(qq, "mnf_no");
  2782. var Smnf_seq = ds_adnmstocorder.getColumn(qq, "mnf_seq");
  2783. var Sseq = ds_adnmstocorder.getColumn(qq, "seq");
  2784. dsf_makeValue(ds_mainprtdata,"pid","string", Spid );
  2785. dsf_makeValue(ds_mainprtdata,"patnm","string", Spatnm );
  2786. dsf_makeValue(ds_mainprtdata,"drugcd","string", Sdrugcd );
  2787. dsf_makeValue(ds_mainprtdata,"drugnm","string", Sdrugnm );
  2788. dsf_makeValue(ds_mainprtdata,"drugno","string", Sdrugno );
  2789. dsf_makeValue(ds_mainprtdata,"drugdd","string", Sdrugdd );
  2790. dsf_makeValue(ds_mainprtdata,"storge_no","string", Sstorge_no );
  2791. dsf_makeValue(ds_mainprtdata,"labelno","string", Slabelno );
  2792. dsf_makeValue(ds_mainprtdata,"prd_valid_de","string", Sprd_valid_de );
  2793. dsf_makeValue(ds_mainprtdata,"mnf_no","string", Smnf_no );
  2794. dsf_makeValue(ds_mainprtdata,"mnf_seq","string", Smnf_seq );
  2795. dsf_makeValue(ds_mainprtdata,"seq","string", Sseq );
  2796. var posx = "";
  2797. var posy = "";
  2798. var printnm = "";
  2799. var objDOM = rptf_createDOM(); // DOM 객체 설정
  2800. rptf_setNodeListToDOM(objDOM, "/root/main/prtdata", ds_mainprtdata); // 데이터셋 1
  2801. var objParam = new Object();
  2802. objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  2803. var option = "open=0;save=0;directprint=1;printdialog=0;print=0;zoom=0;";
  2804. rptf_exeReportPreview30(["RFADT12004"],[objParam], option);
  2805. }
  2806. }
  2807. }
  2808. function But_ReCreat_onclick(obj:Button, e:ClickEventInfo)
  2809. {
  2810. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  2811. ds_adnmstocorder.clearData();
  2812. ds_adnmstocordermove.clearData();
  2813. ds_adnmstocordermachi.clearData();
  2814. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  2815. var Fpatnm = ds_main_narclist_narclist.getColumn(i, "patnm");
  2816. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2817. var Fdrugcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2818. var Fprcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2819. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  2820. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  2821. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  2822. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2823. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  2824. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  2825. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  2826. var Fisdeptnm = ds_main_narclist_narclist.getColumn(i, "issdeptcdnm");
  2827. var Ftotdrugqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty")); // 처방코드명
  2828. ds_send_stoc.setColumn(0,"pid" , "" );
  2829. ds_send_stoc.setColumn(0,"drugcd" , "" );
  2830. ds_send_stoc.setColumn(0,"drugdd" , "" );
  2831. ds_send_stoc.setColumn(0,"prcpno" , "" );
  2832. ds_send_stoc.setColumn(0,"storge_no" , "" );
  2833. ds_send_stoc.setColumn(0,"boxflag" , "" );
  2834. ds_send_stoc.setColumn(0,"gtin" , "" );
  2835. ds_send_stoc.setColumn(0,"prd_valid_de", "" );
  2836. ds_send_stoc.setColumn(0,"mnf_no" , "" );
  2837. ds_send_stoc.setColumn(0,"mnf_seq" , "" );
  2838. ds_send_stoc.setColumn(0,"ioflag" , "" );
  2839. ds_send_stoc.setColumn(0,"workflag" , "" );
  2840. /////////////////////
  2841. ///부서별 저장소 및 이송유무 찾기
  2842. ////////////////////
  2843. ds_send_deptcd.clearData();
  2844. ds_send_deptcd.addRow();
  2845. ArMoveStorgno = "";
  2846. ArMoveflag = "N";
  2847. ds_send_deptcd.setColumn(0,"deptcd" , "" );
  2848. ds_send_deptcd.setColumn(0,"deptnm" , Fisdeptnm );
  2849. ds_send_deptcd.setColumn(0,"workflag" , "N" );
  2850. var oParam = {};
  2851. oParam.id = "TRADT12014";
  2852. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2853. oParam.method = "reqGetFindStorgno";
  2854. oParam.inds = "req=ds_send_deptcd";
  2855. oParam.outds = "ds_storge_no=storgno";
  2856. oParam.async = false;
  2857. tranf_submit(oParam);
  2858. if ( ds_storge_no.rowcount < 0 ) {
  2859. ArMoveflag = "N";
  2860. } else {
  2861. ArMoveflag = ds_storge_no.getColumn(0, "moveflag");
  2862. ArMoveStorgno = ds_storge_no.getColumn(0, "storge_no");
  2863. }
  2864. //////// 2018년 7월 9일 일반약품은 저장소 이동없음 김민주과 협의
  2865. if ( Ardesc == "일반"){
  2866. ArMoveflag == "N";
  2867. ArMoveStorgno == "";
  2868. }
  2869. /////////
  2870. ////////////////////////////
  2871. //////등록된 데이타 찾기
  2872. ds_send_stoc.setColumn(0,"pid" , Fpid );
  2873. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  2874. ds_send_stoc.setColumn(0,"drugdd" , Fdrugdd );
  2875. ds_send_stoc.setColumn(0,"prcpno" , Fprcpno );
  2876. ds_send_stoc.setColumn(0,"drugno" , Fdrugno );
  2877. ds_send_stoc.setColumn(0,"ioflag" , Fioflag );
  2878. ds_send_stoc.setColumn(0,"workflag" , "OK" );
  2879. var oParam = {};
  2880. oParam.id = "TRADT12007";
  2881. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2882. oParam.method = "reqGetNarcStocOkList";
  2883. oParam.inds = "req=ds_send_stoc";
  2884. oParam.outds = "ds_adnmstoclist=stocdata";
  2885. oParam.async = false;
  2886. tranf_submit(oParam);
  2887. var Fokcnt = ds_adnmstoclist.rowcount ;
  2888. var Fmoveokflag = "N";
  2889. var Fmovecnt = 0;
  2890. if ( Ftotdrugqty > Fokcnt ) {
  2891. Fmoveokflag = "Y";
  2892. Fmovecnt = Ftotdrugqty - Fokcnt;
  2893. }
  2894. //////해당 저장소에 해당물건 찾기
  2895. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  2896. ds_send_stoc.setColumn(0,"storge_no" , Arstorge_no );
  2897. ds_send_stoc.setColumn(0,"seltype" , "S" );
  2898. var oParam = {};
  2899. oParam.id = "TRADT12001";
  2900. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2901. oParam.method = "reqGetNarcStocList";
  2902. oParam.inds = "req=ds_send_stoc";
  2903. oParam.outds = "ds_adnmstoclistmove=stocdata";
  2904. oParam.async = false;
  2905. tranf_submit(oParam);
  2906. if ( ArMoveflag == "Y" && Fmoveokflag == "Y" ) {
  2907. for(var k = 0 ; k < Fmovecnt ; k++){
  2908. var nRow = ds_adnmstocordermove.addRow();
  2909. ds_adnmstocordermove.copyRow(nRow, ds_adnmstoclistmove, k);
  2910. ds_adnmstocordermove.setColumn(nRow,"ar_storge_no" , ArMoveStorgno );
  2911. }
  2912. }
  2913. for(var q = 0; q < ds_adnmstocordermove.rowcount ; q++){
  2914. var smFnshfg = ds_adnmstocordermove.getColumn(q, "fnshfg");
  2915. var smInstcd = ds_adnmstocordermove.getColumn(q, "instcd");
  2916. var smInfg = ds_adnmstocordermove.getColumn(q, "infg");
  2917. var smHistno = ds_adnmstocordermove.getColumn(q, "histno");
  2918. var smGtin = ds_adnmstocordermove.getColumn(q, "gtin");
  2919. var smPrd_valid_de = ds_adnmstocordermove.getColumn(q,"prd_valid_de");
  2920. var smMnf_no = ds_adnmstocordermove.getColumn(q, "mnf_no");
  2921. var smMnf_seq = ds_adnmstocordermove.getColumn(q, "mnf_seq");
  2922. var smSeq = ds_adnmstocordermove.getColumn(q, "seq");
  2923. var smStorge_no = ds_adnmstocordermove.getColumn(q, "storge_no");
  2924. var smMoveStorge_no= ds_adnmstocordermove.getColumn(q,"ar_storge_no");
  2925. ds_sendstocupdata.clearData();
  2926. ds_sendstocupdata.addRow();
  2927. ds_sendstocupdata.setColumn(0,"instcd" , smInstcd );
  2928. ds_sendstocupdata.setColumn(0,"infg" , smInfg );
  2929. ds_sendstocupdata.setColumn(0,"histno" , smHistno );
  2930. ds_sendstocupdata.setColumn(0,"gtin" , smGtin );
  2931. ds_sendstocupdata.setColumn(0,"prd_valid_de" , smPrd_valid_de );
  2932. ds_sendstocupdata.setColumn(0,"mnf_no" , smMnf_no );
  2933. ds_sendstocupdata.setColumn(0,"mnf_seq" , smMnf_seq );
  2934. ds_sendstocupdata.setColumn(0,"seq" , smSeq);
  2935. ds_sendstocupdata.setColumn(0,"storge_no" , smStorge_no);
  2936. ds_sendstocupdata.setColumn(0,"out_storge_no" , smMoveStorge_no);
  2937. ds_sendstocupdata.setColumn(0,"new_storge_no" , smMoveStorge_no);
  2938. //trace(sPrcpno)
  2939. ds_sendstocupdata.setColumn(0,"in_prcpno" , Fprcpno);
  2940. ds_sendstocupdata.setColumn(0,"in_drugno" , Fdrugno);
  2941. ds_sendstocupdata.setColumn(0,"in_drugdd" , Fdrugdd);
  2942. ds_sendstocupdata.setColumn(0,"in_ioflag" , Fioflag);
  2943. ds_sendstocupdata.setColumn(0,"in_pid" , Fpid);
  2944. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "I" );
  2945. trace(ds_sendstocupdata.saveXML());
  2946. var oParam = {};
  2947. oParam.id = "TXADT12002";
  2948. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2949. oParam.method = "reqGetStocCreate";
  2950. oParam.inds = "req=ds_sendstocupdata";
  2951. //oParam.outds = "ds_adnmstoclist=stocdata";
  2952. oParam.async = false;
  2953. tranf_submit(oParam);
  2954. ds_sendstocupdata.setColumn(0,"ordtype" , "M");
  2955. trace(ds_sendstocupdata.saveXML());
  2956. var oParam = {};
  2957. oParam.id = "TXADT12001";
  2958. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2959. oParam.method = "reqGetStocUpData";
  2960. oParam.inds = "req=ds_sendstocupdata";
  2961. //oParam.outds = "ds_adnmstoclist=stocdata";
  2962. oParam.async = false;
  2963. tranf_submit(oParam);
  2964. }
  2965. }
  2966. }
  2967. ]]></Script>
  2968. </Form>
  2969. </FDL>