SMADT12001_통합마약현황.xfdl 197 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADT12000" classname="SMADT12000_통합마약조회" inheritanceid="" position="absolute 0 0 1180 883" titletext="New Form" onload="SMADT12000_onload" onkeyup="SMADT12000_onkeyup" oninit="SMADT12000_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Shape id="line01" class="line_10" position="absolute 0 49 1178 55"/>
  8. <Shape id="line00" class="line_10" position="absolute 0 297 1178 303"/>
  9. <Static id="caption6" text=" 통합 마약 관리" class="tit_1" position="absolute 0 0 160 25" onclick="caption6_onclick"/>
  10. <Static id="caption00" text="처방정보" class="tit_2" position="absolute 0 33 82 54"/>
  11. <Static id="caption01" text="조제 재고 정보" class="tit_2" position="absolute 0 281 138 302"/>
  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 302 1178 533" 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 275 1178 297" class="btn4" onclick="but_ok_onclick" onkeyup="but_ok_onkeyup"/>
  311. <Button id="Button00" taborder="24" text="화면닫기" position="absolute 1100 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 273" 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 938 562 1178 722">
  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 39 562 936 721">
  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. <Static id="caption02" text="이송 정보 현황" class="tit_2" position="absolute 0 541 166 562" onclick="caption02_onclick"/>
  842. <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 39 726 825 882">
  843. <Formats>
  844. <Format id="default">
  845. <Columns>
  846. <Column size="27" band="left"/>
  847. <Column size="78" band="left"/>
  848. <Column size="94" band="left"/>
  849. <Column size="62" band="left"/>
  850. <Column size="100"/>
  851. <Column size="99"/>
  852. <Column size="34"/>
  853. <Column size="30"/>
  854. <Column size="60"/>
  855. <Column size="40"/>
  856. <Column size="43"/>
  857. <Column size="56"/>
  858. <Column size="44"/>
  859. </Columns>
  860. <Rows>
  861. <Row size="30" band="head"/>
  862. <Row size="22"/>
  863. </Rows>
  864. <Band id="head">
  865. <Cell/>
  866. <Cell col="1" text="처방&#10;코드" wordwrap="char"/>
  867. <Cell col="2" text="LabelNo"/>
  868. <Cell col="3" text="유효기간" wordwrap="char"/>
  869. <Cell col="4" text="제조번호" wordwrap="char"/>
  870. <Cell col="5" text="일련번호" wordwrap="char"/>
  871. <Cell col="6" colspan="2" text="seq" taborder="undefined">
  872. <Cell text="seq" wordwrap="char" taborder="undefined"/>
  873. <Cell col="1"/>
  874. </Cell>
  875. <Cell col="8" text="이송일자"/>
  876. <Cell col="9" text="이전"/>
  877. <Cell col="10" text="저장소"/>
  878. <Cell col="11" text="등록번호"/>
  879. <Cell col="12" text="투약번호"/>
  880. </Band>
  881. <Band id="body">
  882. <Cell celltype="head" text="expr:currow + 1"/>
  883. <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"/>
  884. <Cell col="2" text="bind:labelno" mask="@@@@-@@-@@ @@@"/>
  885. <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"/>
  886. <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"/>
  887. <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"/>
  888. <Cell col="6" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:seq" taborder="undefined">
  889. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  890. </Cell>
  891. <Cell col="7" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:histno"/>
  892. <Cell col="8" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:indd"/>
  893. <Cell col="9" text="bind:opp_storge_no"/>
  894. <Cell col="10" text="bind:storge_no"/>
  895. <Cell col="11" text="bind:in_pid"/>
  896. <Cell col="12" displaytype="text" edittype="text" text="bind:in_drugno"/>
  897. </Band>
  898. </Format>
  899. <Format id="format_copy"/>
  900. </Formats>
  901. </Grid>
  902. <Static id="caption03" text="저장소 불출" onclick="caption02_onclick" class="tit_2" position="absolute 0 562 31 644"/>
  903. <Static id="caption04" text="저장소 이송" onclick="caption02_onclick" class="tit_2" position="absolute 0 726 31 806"/>
  904. <Button id="But_Create" taborder="30" text="데이타 생성" position="absolute 766 27 862 49" onclick="But_Create_onclick" visible="false" class="btn4"/>
  905. <Button id="But_View" taborder="31" text="데이타 조회" visible="true" position="absolute 865 27 961 49" onclick="But_View_onclick" class="btn4"/>
  906. <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 828 726 1178 880">
  907. <Formats>
  908. <Format id="default">
  909. <Columns>
  910. <Column size="27" band="left"/>
  911. <Column size="72" band="left"/>
  912. <Column size="49" band="left"/>
  913. <Column size="51" band="left"/>
  914. <Column size="59" band="left"/>
  915. <Column size="45"/>
  916. <Column size="29"/>
  917. </Columns>
  918. <Rows>
  919. <Row size="30" band="head"/>
  920. <Row size="22"/>
  921. </Rows>
  922. <Band id="head">
  923. <Cell/>
  924. <Cell col="1" text="처방&#10;코드" wordwrap="char"/>
  925. <Cell col="2" text="등록번호"/>
  926. <Cell col="3" text="환자명" wordwrap="char"/>
  927. <Cell col="4" text="투약일자" wordwrap="char"/>
  928. <Cell col="5" text="투약번호" wordwrap="char"/>
  929. <Cell col="6" text="수량"/>
  930. </Band>
  931. <Band id="body">
  932. <Cell celltype="head" text="expr:currow + 1"/>
  933. <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"/>
  934. <Cell col="2" text="bind:pid"/>
  935. <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"/>
  936. <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"/>
  937. <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"/>
  938. <Cell col="6" text="bind:qty"/>
  939. </Band>
  940. </Format>
  941. <Format id="format_copy"/>
  942. </Formats>
  943. </Grid>
  944. <Button id="But_BatcodePrt" taborder="33" text="LabelNo 바코드출력" position="absolute 299 275 432 297" onclick="But_BatcodePrt_onclick" class="btn2"/>
  945. <Button id="But_ReCreat" taborder="34" text="미전송데이타 생성" position="absolute 964 27 1097 49" onclick="But_ReCreat_onclick" class="btn4" enable="false"/>
  946. <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 575 562 912 721" visible="false">
  947. <Formats>
  948. <Format id="default">
  949. <Columns>
  950. <Column size="27" band="left"/>
  951. <Column size="78" band="left"/>
  952. <Column size="94" band="left"/>
  953. <Column size="96" band="left"/>
  954. <Column size="69" band="left"/>
  955. <Column size="114"/>
  956. <Column size="108"/>
  957. <Column size="34"/>
  958. <Column size="26"/>
  959. <Column size="69"/>
  960. <Column size="45"/>
  961. <Column size="63"/>
  962. <Column size="51"/>
  963. </Columns>
  964. <Rows>
  965. <Row size="30" band="head"/>
  966. <Row size="22"/>
  967. </Rows>
  968. <Band id="head">
  969. <Cell/>
  970. <Cell col="1" text="처방&#10;코드" wordwrap="char"/>
  971. <Cell col="2" text="LabelNo"/>
  972. <Cell col="3" text="제품번호" wordwrap="char"/>
  973. <Cell col="4" text="유효기간" wordwrap="char"/>
  974. <Cell col="5" text="제조번호" wordwrap="char"/>
  975. <Cell col="6" text="일련번호" wordwrap="char"/>
  976. <Cell col="7" colspan="2" text="seq" taborder="undefined">
  977. <Cell text="seq" wordwrap="char" taborder="undefined"/>
  978. <Cell col="1"/>
  979. </Cell>
  980. <Cell col="9" text="불출일자"/>
  981. <Cell col="10" text="저장소"/>
  982. <Cell col="11" text="둥록번호"/>
  983. <Cell col="12" text="투약번호"/>
  984. </Band>
  985. <Band id="body">
  986. <Cell celltype="head" text="expr:currow + 1"/>
  987. <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"/>
  988. <Cell col="2" text="bind:labelno" mask="@@@@-@@-@@ @@@"/>
  989. <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"/>
  990. <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"/>
  991. <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"/>
  992. <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"/>
  993. <Cell col="7" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:seq" taborder="undefined">
  994. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  995. </Cell>
  996. <Cell col="8" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:histno"/>
  997. <Cell col="9" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:outdd"/>
  998. <Cell col="10" text="bind:storge_no"/>
  999. <Cell col="11" text="bind:pid"/>
  1000. <Cell col="12" displaytype="text" edittype="text" text="bind:drugno"/>
  1001. </Band>
  1002. </Format>
  1003. <Format id="format_copy"/>
  1004. </Formats>
  1005. </Grid>
  1006. <Shape id="line02" class="line_10" position="absolute 0 557 1178 563"/>
  1007. <Shape id="line03" class="line_10" position="absolute 0 721 1178 727"/>
  1008. </Layout>
  1009. </Layouts>
  1010. <Bind>
  1011. <BindItem id="item12" compid="SMADT12000" propid="text" datasetid="ds_main_prntlist_patinfo" columnid=""/>
  1012. </Bind>
  1013. <Objects>
  1014. <Dataset id="ds_srchbarcode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1015. <ColumnInfo>
  1016. <Column id="barcode" type="STRING" size="256"/>
  1017. </ColumnInfo>
  1018. <Rows>
  1019. <Row/>
  1020. </Rows>
  1021. </Dataset>
  1022. <Dataset id="ds_senddata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1023. <ColumnInfo>
  1024. <Column id="type" type="STRING" size="256"/>
  1025. <Column id="ioflag" type="STRING" size="256"/>
  1026. <Column id="prcpdd" type="STRING" size="256"/>
  1027. <Column id="prcpno" type="STRING" size="256"/>
  1028. </ColumnInfo>
  1029. <Rows>
  1030. <Row/>
  1031. </Rows>
  1032. </Dataset>
  1033. <Dataset id="ds_finddrugno" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1034. <ColumnInfo>
  1035. <Column id="pid" type="STRING" size="256"/>
  1036. <Column id="drugdd" type="STRING" size="256"/>
  1037. <Column id="drugno" type="STRING" size="256"/>
  1038. <Column id="prcpno" type="STRING" size="256"/>
  1039. <Column id="ioflag" type="STRING" size="256"/>
  1040. <Column id="prcphistno" type="STRING" size="256"/>
  1041. <Column id="drugseqno" type="STRING" size="256"/>
  1042. <Column id="drugkind" type="STRING" size="256"/>
  1043. <Column id="drugflag" type="STRING" size="256"/>
  1044. <Column id="drugstat" type="STRING" size="256"/>
  1045. <Column id="prcpdd" type="STRING" size="256"/>
  1046. <Column id="orddd" type="STRING" size="256"/>
  1047. </ColumnInfo>
  1048. <Rows>
  1049. <Row/>
  1050. </Rows>
  1051. </Dataset>
  1052. <Dataset id="ds_send_prntinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1053. <Dataset id="ds_main_prntlist_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1054. <ColumnInfo>
  1055. <Column id="pid" type="STRING" size="256"/>
  1056. <Column id="orddd" type="STRING" size="256"/>
  1057. <Column id="prcpdd" type="STRING" size="256"/>
  1058. <Column id="drugfl" type="STRING" size="256"/>
  1059. <Column id="rcprcpdd" type="STRING" size="256"/>
  1060. <Column id="prcpno" type="STRING" size="256"/>
  1061. <Column id="prcphistno" type="STRING" size="256"/>
  1062. <Column id="drugdd" type="STRING" size="256"/>
  1063. <Column id="drugno" type="STRING" size="256"/>
  1064. <Column id="sumdt" type="STRING" size="256"/>
  1065. <Column id="orddrnm" type="STRING" size="256"/>
  1066. <Column id="orddeptnm" type="STRING" size="256"/>
  1067. <Column id="wardnm" type="STRING" size="256"/>
  1068. <Column id="roomcd" type="STRING" size="256"/>
  1069. <Column id="isdeptcdnm" type="STRING" size="256"/>
  1070. <Column id="sex" type="STRING" size="256"/>
  1071. <Column id="age" type="STRING" size="256"/>
  1072. <Column id="patbdwt" type="STRING" size="256"/>
  1073. <Column id="patbdht" type="STRING" size="256"/>
  1074. <Column id="patnm" type="STRING" size="256"/>
  1075. <Column id="rrgstno" type="STRING" size="256"/>
  1076. <Column id="addr" type="STRING" size="256"/>
  1077. <Column id="medispclidnm" type="STRING" size="256"/>
  1078. <Column id="medispclid_licnsno" type="STRING" size="256"/>
  1079. <Column id="atdoctidnm" type="STRING" size="256"/>
  1080. <Column id="atdoctid_licnsno" type="STRING" size="256"/>
  1081. <Column id="psptno" type="STRING" size="256"/>
  1082. </ColumnInfo>
  1083. <Rows>
  1084. <Row/>
  1085. </Rows>
  1086. </Dataset>
  1087. <Dataset id="ds_main_prntlist_diaginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1088. <ColumnInfo>
  1089. <Column id="diagcd1" type="STRING" size="512"/>
  1090. <Column id="diagcd" type="STRING" size="256"/>
  1091. <Column id="icd10cd" type="STRING" size="256"/>
  1092. </ColumnInfo>
  1093. </Dataset>
  1094. <Dataset id="ds_main_narclist_narclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1095. <Dataset id="ds_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1096. <Dataset id="ds_send_stoc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1097. <ColumnInfo>
  1098. <Column id="drugcd" type="STRING" size="256"/>
  1099. <Column id="storge_no" type="STRING" size="256"/>
  1100. <Column id="prcpno" type="STRING" size="256"/>
  1101. <Column id="seltype" type="STRING" size="256"/>
  1102. <Column id="drugdd" type="STRING" size="256"/>
  1103. <Column id="pid" type="STRING" size="256"/>
  1104. <Column id="boxflag" type="STRING" size="256"/>
  1105. <Column id="gtin" type="STRING" size="256"/>
  1106. <Column id="prd_valid_de" type="STRING" size="256"/>
  1107. <Column id="mnf_no" type="STRING" size="256"/>
  1108. <Column id="mnf_seq" type="STRING" size="256"/>
  1109. <Column id="workflag" type="STRING" size="256"/>
  1110. <Column id="ioflag" type="STRING" size="256"/>
  1111. <Column id="drugno" type="STRING" size="256"/>
  1112. </ColumnInfo>
  1113. <Rows>
  1114. <Row/>
  1115. </Rows>
  1116. </Dataset>
  1117. <Dataset id="ds_adnmstoclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1118. <ColumnInfo>
  1119. <column id="instcd" type="STRING" size="256"/>
  1120. <column id="drugcd" type="STRING" size="256"/>
  1121. <column id="infg" type="STRING" size="256"/>
  1122. <column id="histno" type="STRING" size="256"/>
  1123. <column id="gtin" type="STRING" size="256"/>
  1124. <column id="prd_valid_de" type="STRING" size="256"/>
  1125. <column id="mnf_no" type="STRING" size="256"/>
  1126. <column id="mnf_seq" type="STRING" size="256"/>
  1127. <column id="seq" type="STRING" size="256"/>
  1128. <column id="prd_sgtin" type="STRING" size="256"/>
  1129. <column id="storge_no" type="STRING" size="256"/>
  1130. <column id="prtm_se_nm" type="STRING" size="256"/>
  1131. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1132. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1133. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1134. <column id="prd_pce_unit" type="STRING" size="256"/>
  1135. <column id="in_pce_qy" type="STRING" size="256"/>
  1136. <column id="indd" type="STRING" size="256"/>
  1137. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1138. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1139. <column id="opp_storge_no" type="STRING" size="256"/>
  1140. <column id="in_dtl_cd" type="STRING" size="256"/>
  1141. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1142. <column id="out_fg" type="STRING" size="256"/>
  1143. <column id="out_pce_qy" type="STRING" size="256"/>
  1144. <column id="fnshfg" type="STRING" size="256"/>
  1145. <column id="prcpno" type="STRING" size="256"/>
  1146. <column id="drugdd" type="STRING" size="256"/>
  1147. <column id="drugno" type="STRING" size="256"/>
  1148. <column id="ioflag" type="STRING" size="256"/>
  1149. <column id="drugseqno" type="STRING" size="256"/>
  1150. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1151. <column id="pat_id_no" type="STRING" size="256"/>
  1152. <column id="pat_in" type="STRING" size="256"/>
  1153. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1154. <column id="lcns_no" type="STRING" size="256"/>
  1155. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1156. <column id="prsc_ord_no" type="STRING" size="256"/>
  1157. <column id="diss_code" type="STRING" size="256"/>
  1158. <column id="once_qy" type="FLOAT" size="256"/>
  1159. <column id="ade_cnt" type="FLOAT" size="256"/>
  1160. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1161. <column id="sum_qy" type="FLOAT" size="256"/>
  1162. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1163. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1164. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1165. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1166. <column id="dsuse_loc" type="STRING" size="256"/>
  1167. <column id="dsuse_de" type="STRING" size="256"/>
  1168. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1169. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1170. <column id="outdd" type="STRING" size="256"/>
  1171. <column id="out_bssh_cd" type="STRING" size="256"/>
  1172. <column id="out_bssh_nm" type="STRING" size="256"/>
  1173. <column id="out_storge_no" type="STRING" size="256"/>
  1174. <column id="out_dtl_cd" type="STRING" size="256"/>
  1175. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1176. <column id="insendfg" type="STRING" size="256"/>
  1177. <column id="outsendfg" type="STRING" size="256"/>
  1178. <column id="spreqy" type="STRING" size="256"/>
  1179. <column id="spredd" type="STRING" size="256"/>
  1180. <column id="spredt" type="STRING" size="256"/>
  1181. <column id="rtnfg" type="STRING" size="256"/>
  1182. <column id="rtndd" type="STRING" size="256"/>
  1183. <column id="rtndt" type="STRING" size="256"/>
  1184. <Column id="pid" type="STRING" size="256"/>
  1185. <Column id="indt" type="STRING" size="256"/>
  1186. <Column id="outdt" type="STRING" size="256"/>
  1187. <column id="in_prcpno" type="STRING" size="256"/>
  1188. <column id="in_drugdd" type="STRING" size="256"/>
  1189. <column id="in_drugno" type="STRING" size="256"/>
  1190. <column id="in_ioflag" type="STRING" size="256"/>
  1191. <column id="in_pid" type="STRING" size="256"/>
  1192. <Column id="sprefg" type="STRING" size="256"/>
  1193. </ColumnInfo>
  1194. <Rows>
  1195. <Row/>
  1196. </Rows>
  1197. </Dataset>
  1198. <Dataset id="ds_adnmstocorder" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1199. <ColumnInfo>
  1200. <Column id="flag" type="STRING" size="256"/>
  1201. <column id="instcd" type="STRING" size="256"/>
  1202. <column id="drugcd" type="STRING" size="256"/>
  1203. <column id="infg" type="STRING" size="256"/>
  1204. <column id="histno" type="STRING" size="256"/>
  1205. <column id="gtin" type="STRING" size="256"/>
  1206. <column id="prd_valid_de" type="STRING" size="256"/>
  1207. <column id="mnf_no" type="STRING" size="256"/>
  1208. <column id="mnf_seq" type="STRING" size="256"/>
  1209. <column id="seq" type="STRING" size="256"/>
  1210. <column id="prd_sgtin" type="STRING" size="256"/>
  1211. <column id="storge_no" type="STRING" size="256"/>
  1212. <column id="prtm_se_nm" type="STRING" size="256"/>
  1213. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1214. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1215. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1216. <column id="prd_pce_unit" type="STRING" size="256"/>
  1217. <column id="in_pce_qy" type="STRING" size="256"/>
  1218. <column id="indd" type="STRING" size="256"/>
  1219. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1220. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1221. <column id="opp_storge_no" type="STRING" size="256"/>
  1222. <column id="in_dtl_cd" type="STRING" size="256"/>
  1223. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1224. <column id="out_fg" type="STRING" size="256"/>
  1225. <column id="out_pce_qy" type="STRING" size="256"/>
  1226. <column id="fnshfg" type="STRING" size="256"/>
  1227. <column id="prcpno" type="STRING" size="256"/>
  1228. <column id="drugdd" type="STRING" size="256"/>
  1229. <column id="drugno" type="STRING" size="256"/>
  1230. <column id="ioflag" type="STRING" size="256"/>
  1231. <column id="drugseqno" type="STRING" size="256"/>
  1232. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1233. <column id="pat_id_no" type="STRING" size="256"/>
  1234. <column id="pat_nm" type="STRING" size="256"/>
  1235. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1236. <column id="lcns_no" type="STRING" size="256"/>
  1237. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1238. <column id="prsc_ord_no" type="STRING" size="256"/>
  1239. <column id="diss_code" type="STRING" size="256"/>
  1240. <column id="once_qty" type="FLOAT" size="256"/>
  1241. <column id="ade_cnt" type="FLOAT" size="256"/>
  1242. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1243. <column id="sum_qy" type="FLOAT" size="256"/>
  1244. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1245. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1246. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1247. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1248. <column id="dsuse_loc" type="STRING" size="256"/>
  1249. <column id="dsuse_de" type="STRING" size="256"/>
  1250. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1251. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1252. <column id="outdd" type="STRING" size="256"/>
  1253. <column id="out_bssh_cd" type="STRING" size="256"/>
  1254. <column id="out_bssh_nm" type="STRING" size="256"/>
  1255. <column id="out_storge_no" type="STRING" size="256"/>
  1256. <column id="out_dtl_cd" type="STRING" size="256"/>
  1257. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1258. <column id="insendfg" type="STRING" size="256"/>
  1259. <column id="outsendfg" type="STRING" size="256"/>
  1260. <column id="spreqy" type="STRING" size="256"/>
  1261. <column id="spredd" type="STRING" size="256"/>
  1262. <column id="spredt" type="STRING" size="256"/>
  1263. <column id="rtnfg" type="STRING" size="256"/>
  1264. <column id="rtndd" type="STRING" size="256"/>
  1265. <column id="rtndt" type="STRING" size="256"/>
  1266. <Column id="pid" type="STRING" size="256"/>
  1267. <Column id="labelno" type="STRING" size="256"/>
  1268. <Column id="indt" type="STRING" size="256"/>
  1269. <Column id="outdt" type="STRING" size="256"/>
  1270. <column id="in_prcpno" type="STRING" size="256"/>
  1271. <column id="in_drugdd" type="STRING" size="256"/>
  1272. <column id="in_drugno" type="STRING" size="256"/>
  1273. <column id="in_ioflag" type="STRING" size="256"/>
  1274. <column id="in_pid" type="STRING" size="256"/>
  1275. <Column id="sprefg" type="STRING" size="256"/>
  1276. </ColumnInfo>
  1277. <Rows>
  1278. <Row/>
  1279. </Rows>
  1280. </Dataset>
  1281. <Dataset id="ds_sendstocupdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1282. <ColumnInfo>
  1283. <Column id="instcd" type="STRING" size="255" value=""/>
  1284. <Column id="infg" type="STRING" size="255" value=""/>
  1285. <Column id="histno" type="STRING" size="255" value=""/>
  1286. <Column id="gtin" type="STRING" size="255" value=""/>
  1287. <Column id="prd_valid_de" type="STRING" size="255" value=""/>
  1288. <Column id="mnf_no" type="STRING" size="255" value=""/>
  1289. <Column id="mnf_seq" type="STRING" size="255" value=""/>
  1290. <Column id="seq" type="STRING" size="255" value=""/>
  1291. <Column id="prcpno" type="STRING" size="255" value=""/>
  1292. <Column id="drugdd" type="STRING" size="255" value=""/>
  1293. <Column id="drugno" type="STRING" size="255" value=""/>
  1294. <Column id="ioflag" type="STRING" size="255" value=""/>
  1295. <Column id="drugseqno" type="STRING" size="255" value=""/>
  1296. <Column id="pat_id_no_ty_cd" type="STRING" size="255" value=""/>
  1297. <Column id="pat_id_no" type="STRING" size="255" value=""/>
  1298. <Column id="pat_nm" type="STRING" size="255" value=""/>
  1299. <Column id="lcns_asort_cd" type="STRING" size="255" value=""/>
  1300. <Column id="lcns_no" type="STRING" size="255" value=""/>
  1301. <Column id="prsc_doc_nm" type="STRING" size="255" value=""/>
  1302. <Column id="prsc_ord_no" type="STRING" size="255" value=""/>
  1303. <Column id="diss_code" type="STRING" size="255" value=""/>
  1304. <Column id="once_qy" type="FLOAT" size="255" value=""/>
  1305. <Column id="ade_cnt" type="FLOAT" size="255" value=""/>
  1306. <Column id="tot_dcnt" type="FLOAT" size="255" value=""/>
  1307. <Column id="sum_qy" type="FLOAT" size="255" value=""/>
  1308. <Column id="spreqy" type="FLOAT" size="256"/>
  1309. <Column id="rtnqy" type="STRING" size="256"/>
  1310. <Column id="pid" type="STRING" size="256"/>
  1311. <Column id="storge_no" type="STRING" size="256"/>
  1312. <Column id="in_prcpno" type="STRING" size="256"/>
  1313. <Column id="in_drugno" type="STRING" size="256"/>
  1314. <Column id="in_drugdd" type="STRING" size="256"/>
  1315. <Column id="in_ioflag" type="STRING" size="256"/>
  1316. <Column id="in_pid" type="STRING" size="256"/>
  1317. <Column id="out_storge_no" type="STRING" size="256"/>
  1318. <Column id="new_storge_no" type="STRING" size="256"/>
  1319. <Column id="indt" type="STRING" size="256"/>
  1320. <Column id="outdt" type="STRING" size="256"/>
  1321. </ColumnInfo>
  1322. <Rows>
  1323. <Row/>
  1324. </Rows>
  1325. </Dataset>
  1326. <Dataset id="ds_sumlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1327. <ColumnInfo>
  1328. <Column id="code" type="STRING" size="256"/>
  1329. <Column id="order" type="STRING" size="256"/>
  1330. <Column id="outsum" type="STRING" size="256"/>
  1331. <Column id="jaegosum" type="STRING" size="256"/>
  1332. </ColumnInfo>
  1333. <Rows>
  1334. <Row/>
  1335. </Rows>
  1336. </Dataset>
  1337. <Dataset id="ds_send_selstoc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1338. <ColumnInfo>
  1339. <Column id="drugcd" type="STRING" size="256"/>
  1340. <Column id="prcpno" type="STRING" size="256"/>
  1341. <Column id="drugno" type="STRING" size="256"/>
  1342. <Column id="pat_id_no" type="STRING" size="256"/>
  1343. <Column id="seltype" type="STRING" size="256"/>
  1344. <Column id="drugdd" type="STRING" size="256"/>
  1345. <Column id="pid" type="STRING" size="256"/>
  1346. </ColumnInfo>
  1347. <Rows>
  1348. <Row/>
  1349. </Rows>
  1350. </Dataset>
  1351. <Dataset id="ds_adnmstoclistmachi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1352. <ColumnInfo>
  1353. <column id="instcd" type="STRING" size="256"/>
  1354. <column id="drugcd" type="STRING" size="256"/>
  1355. <column id="infg" type="STRING" size="256"/>
  1356. <column id="histno" type="STRING" size="256"/>
  1357. <column id="gtin" type="STRING" size="256"/>
  1358. <column id="prd_valid_de" type="STRING" size="256"/>
  1359. <column id="mnf_no" type="STRING" size="256"/>
  1360. <column id="mnf_seq" type="STRING" size="256"/>
  1361. <column id="seq" type="STRING" size="256"/>
  1362. <column id="prd_sgtin" type="STRING" size="256"/>
  1363. <column id="storge_no" type="STRING" size="256"/>
  1364. <column id="prtm_se_nm" type="STRING" size="256"/>
  1365. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1366. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1367. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1368. <column id="prd_pce_unit" type="STRING" size="256"/>
  1369. <column id="in_pce_qy" type="STRING" size="256"/>
  1370. <column id="indd" type="STRING" size="256"/>
  1371. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1372. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1373. <column id="opp_storge_no" type="STRING" size="256"/>
  1374. <column id="in_dtl_cd" type="STRING" size="256"/>
  1375. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1376. <column id="out_fg" type="STRING" size="256"/>
  1377. <column id="out_pce_qy" type="STRING" size="256"/>
  1378. <column id="fnshfg" type="STRING" size="256"/>
  1379. <column id="prcpno" type="STRING" size="256"/>
  1380. <column id="drugdd" type="STRING" size="256"/>
  1381. <column id="drugno" type="STRING" size="256"/>
  1382. <column id="ioflag" type="STRING" size="256"/>
  1383. <column id="drugseqno" type="STRING" size="256"/>
  1384. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1385. <column id="pat_id_no" type="STRING" size="256"/>
  1386. <column id="pat_in" type="STRING" size="256"/>
  1387. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1388. <column id="lcns_no" type="STRING" size="256"/>
  1389. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1390. <column id="prsc_ord_no" type="STRING" size="256"/>
  1391. <column id="diss_code" type="STRING" size="256"/>
  1392. <column id="once_qy" type="FLOAT" size="256"/>
  1393. <column id="ade_cnt" type="FLOAT" size="256"/>
  1394. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1395. <column id="sum_qy" type="FLOAT" size="256"/>
  1396. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1397. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1398. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1399. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1400. <column id="dsuse_loc" type="STRING" size="256"/>
  1401. <column id="dsuse_de" type="STRING" size="256"/>
  1402. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1403. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1404. <column id="outdd" type="STRING" size="256"/>
  1405. <column id="out_bssh_cd" type="STRING" size="256"/>
  1406. <column id="out_bssh_nm" type="STRING" size="256"/>
  1407. <column id="out_storge_no" type="STRING" size="256"/>
  1408. <column id="out_dtl_cd" type="STRING" size="256"/>
  1409. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1410. <column id="insendfg" type="STRING" size="256"/>
  1411. <column id="outsendfg" type="STRING" size="256"/>
  1412. <column id="spreqy" type="STRING" size="256"/>
  1413. <column id="spredd" type="STRING" size="256"/>
  1414. <column id="spredt" type="STRING" size="256"/>
  1415. <column id="rtnfg" type="STRING" size="256"/>
  1416. <column id="rtndd" type="STRING" size="256"/>
  1417. <column id="rtndt" type="STRING" size="256"/>
  1418. <Column id="pid" type="STRING" size="256"/>
  1419. <Column id="indt" type="STRING" size="256"/>
  1420. <Column id="outdt" type="STRING" size="256"/>
  1421. <column id="in_prcpno" type="STRING" size="256"/>
  1422. <column id="in_drugdd" type="STRING" size="256"/>
  1423. <column id="in_drugno" type="STRING" size="256"/>
  1424. <column id="in_ioflag" type="STRING" size="256"/>
  1425. <column id="in_pid" type="STRING" size="256"/>
  1426. <Column id="ar_storge_no" type="STRING" size="256"/>
  1427. </ColumnInfo>
  1428. <Rows>
  1429. <Row/>
  1430. </Rows>
  1431. </Dataset>
  1432. <Dataset id="ds_adnmstocordermachi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1433. <ColumnInfo>
  1434. <column id="instcd" type="STRING" size="256"/>
  1435. <column id="drugcd" type="STRING" size="256"/>
  1436. <column id="infg" type="STRING" size="256"/>
  1437. <column id="histno" type="STRING" size="256"/>
  1438. <column id="gtin" type="STRING" size="256"/>
  1439. <column id="prd_valid_de" type="STRING" size="256"/>
  1440. <column id="mnf_no" type="STRING" size="256"/>
  1441. <column id="mnf_seq" type="STRING" size="256"/>
  1442. <column id="seq" type="STRING" size="256"/>
  1443. <column id="prd_sgtin" type="STRING" size="256"/>
  1444. <column id="storge_no" type="STRING" size="256"/>
  1445. <column id="prtm_se_nm" type="STRING" size="256"/>
  1446. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1447. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1448. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1449. <column id="prd_pce_unit" type="STRING" size="256"/>
  1450. <column id="in_pce_qy" type="STRING" size="256"/>
  1451. <column id="indd" type="STRING" size="256"/>
  1452. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1453. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1454. <column id="opp_storge_no" type="STRING" size="256"/>
  1455. <column id="in_dtl_cd" type="STRING" size="256"/>
  1456. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1457. <column id="out_fg" type="STRING" size="256"/>
  1458. <column id="out_pce_qy" type="STRING" size="256"/>
  1459. <column id="fnshfg" type="STRING" size="256"/>
  1460. <column id="prcpno" type="STRING" size="256"/>
  1461. <column id="drugdd" type="STRING" size="256"/>
  1462. <column id="drugno" type="STRING" size="256"/>
  1463. <column id="ioflag" type="STRING" size="256"/>
  1464. <column id="drugseqno" type="STRING" size="256"/>
  1465. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1466. <column id="pat_id_no" type="STRING" size="256"/>
  1467. <column id="pat_nm" type="STRING" size="256"/>
  1468. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1469. <column id="lcns_no" type="STRING" size="256"/>
  1470. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1471. <column id="prsc_ord_no" type="STRING" size="256"/>
  1472. <column id="diss_code" type="STRING" size="256"/>
  1473. <column id="once_qty" type="FLOAT" size="256"/>
  1474. <column id="ade_cnt" type="FLOAT" size="256"/>
  1475. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1476. <column id="sum_qy" type="FLOAT" size="256"/>
  1477. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1478. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1479. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1480. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1481. <column id="dsuse_loc" type="STRING" size="256"/>
  1482. <column id="dsuse_de" type="STRING" size="256"/>
  1483. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1484. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1485. <column id="outdd" type="STRING" size="256"/>
  1486. <column id="out_bssh_cd" type="STRING" size="256"/>
  1487. <column id="out_bssh_nm" type="STRING" size="256"/>
  1488. <column id="out_storge_no" type="STRING" size="256"/>
  1489. <column id="out_dtl_cd" type="STRING" size="256"/>
  1490. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1491. <column id="insendfg" type="STRING" size="256"/>
  1492. <column id="outsendfg" type="STRING" size="256"/>
  1493. <column id="spreqy" type="STRING" size="256"/>
  1494. <column id="spredd" type="STRING" size="256"/>
  1495. <column id="spredt" type="STRING" size="256"/>
  1496. <column id="rtnfg" type="STRING" size="256"/>
  1497. <column id="rtndd" type="STRING" size="256"/>
  1498. <column id="rtndt" type="STRING" size="256"/>
  1499. <Column id="pid" type="STRING" size="256"/>
  1500. <Column id="labelno" type="STRING" size="256"/>
  1501. <Column id="indt" type="STRING" size="256"/>
  1502. <Column id="outdt" type="STRING" size="256"/>
  1503. <column id="in_prcpno" type="STRING" size="256"/>
  1504. <column id="in_drugdd" type="STRING" size="256"/>
  1505. <column id="in_drugno" type="STRING" size="256"/>
  1506. <column id="in_ioflag" type="STRING" size="256"/>
  1507. <column id="in_pid" type="STRING" size="256"/>
  1508. <Column id="ar_storge_no" type="STRING" size="256"/>
  1509. </ColumnInfo>
  1510. <Rows>
  1511. <Row/>
  1512. </Rows>
  1513. </Dataset>
  1514. <Dataset id="ds_adnmstoclistmachi_old" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1515. <ColumnInfo>
  1516. <column id="instcd" type="STRING" size="256"/>
  1517. <column id="drugcd" type="STRING" size="256"/>
  1518. <column id="infg" type="STRING" size="256"/>
  1519. <column id="histno" type="STRING" size="256"/>
  1520. <column id="gtin" type="STRING" size="256"/>
  1521. <column id="prd_valid_de" type="STRING" size="256"/>
  1522. <column id="mnf_no" type="STRING" size="256"/>
  1523. <column id="mnf_seq" type="STRING" size="256"/>
  1524. <column id="seq" type="STRING" size="256"/>
  1525. <column id="prd_sgtin" type="STRING" size="256"/>
  1526. <column id="storge_no" type="STRING" size="256"/>
  1527. <column id="prtm_se_nm" type="STRING" size="256"/>
  1528. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1529. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1530. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1531. <column id="prd_pce_unit" type="STRING" size="256"/>
  1532. <column id="in_pce_qy" type="STRING" size="256"/>
  1533. <column id="indd" type="STRING" size="256"/>
  1534. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1535. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1536. <column id="opp_storge_no" type="STRING" size="256"/>
  1537. <column id="in_dtl_cd" type="STRING" size="256"/>
  1538. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1539. <column id="out_fg" type="STRING" size="256"/>
  1540. <column id="out_pce_qy" type="STRING" size="256"/>
  1541. <column id="fnshfg" type="STRING" size="256"/>
  1542. <column id="prcpno" type="STRING" size="256"/>
  1543. <column id="drugdd" type="STRING" size="256"/>
  1544. <column id="drugno" type="STRING" size="256"/>
  1545. <column id="ioflag" type="STRING" size="256"/>
  1546. <column id="drugseqno" type="STRING" size="256"/>
  1547. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1548. <column id="pat_id_no" type="STRING" size="256"/>
  1549. <column id="pat_in" type="STRING" size="256"/>
  1550. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1551. <column id="lcns_no" type="STRING" size="256"/>
  1552. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1553. <column id="prsc_ord_no" type="STRING" size="256"/>
  1554. <column id="diss_code" type="STRING" size="256"/>
  1555. <column id="once_qy" type="FLOAT" size="256"/>
  1556. <column id="ade_cnt" type="FLOAT" size="256"/>
  1557. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1558. <column id="sum_qy" type="FLOAT" size="256"/>
  1559. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1560. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1561. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1562. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1563. <column id="dsuse_loc" type="STRING" size="256"/>
  1564. <column id="dsuse_de" type="STRING" size="256"/>
  1565. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1566. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1567. <column id="outdd" type="STRING" size="256"/>
  1568. <column id="out_bssh_cd" type="STRING" size="256"/>
  1569. <column id="out_bssh_nm" type="STRING" size="256"/>
  1570. <column id="out_storge_no" type="STRING" size="256"/>
  1571. <column id="out_dtl_cd" type="STRING" size="256"/>
  1572. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1573. <column id="insendfg" type="STRING" size="256"/>
  1574. <column id="outsendfg" type="STRING" size="256"/>
  1575. <column id="spreqy" type="STRING" size="256"/>
  1576. <column id="spredd" type="STRING" size="256"/>
  1577. <column id="spredt" type="STRING" size="256"/>
  1578. <column id="rtnfg" type="STRING" size="256"/>
  1579. <column id="rtndd" type="STRING" size="256"/>
  1580. <column id="rtndt" type="STRING" size="256"/>
  1581. <Column id="pid" type="STRING" size="256"/>
  1582. <Column id="indt" type="STRING" size="256"/>
  1583. <Column id="outdt" type="STRING" size="256"/>
  1584. <column id="in_prcpno" type="STRING" size="256"/>
  1585. <column id="in_drugdd" type="STRING" size="256"/>
  1586. <column id="in_drugno" type="STRING" size="256"/>
  1587. <column id="in_ioflag" type="STRING" size="256"/>
  1588. <column id="in_pid" type="STRING" size="256"/>
  1589. <Column id="ar_storge_no" type="STRING" size="256"/>
  1590. </ColumnInfo>
  1591. <Rows>
  1592. <Row/>
  1593. </Rows>
  1594. </Dataset>
  1595. <Dataset id="ds_adnmprdt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1596. <ColumnInfo>
  1597. <Column id="drugcd" type="STRING" size="256"/>
  1598. <Column id="ordnm" type="STRING" size="256"/>
  1599. <Column id="hngnm" type="STRING" size="256"/>
  1600. <Column id="gtin" type="STRING" size="256"/>
  1601. <Column id="prtm_se_nm" type="STRING" size="256"/>
  1602. <Column id="prd_min_distb_qy" type="STRING" size="256"/>
  1603. <Column id="prd_min_distb_unit" type="STRING" size="256"/>
  1604. <Column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1605. <Column id="prd_pce_unit" type="STRING" size="256"/>
  1606. </ColumnInfo>
  1607. </Dataset>
  1608. <Dataset id="ds_sendadnmprdt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1609. <ColumnInfo>
  1610. <Column id="basedd" type="STRING" size="256"/>
  1611. <Column id="srchcnts" type="STRING" size="256"/>
  1612. <Column id="srchflag" type="STRING" size="256"/>
  1613. </ColumnInfo>
  1614. <Rows>
  1615. <Row/>
  1616. </Rows>
  1617. </Dataset>
  1618. <Dataset id="ds_adnmstocbox" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1619. <ColumnInfo>
  1620. <Column id="drugcd" type="STRING" size="256"/>
  1621. <Column id="gtin" type="STRING" size="256"/>
  1622. <Column id="prd_valid_de" type="STRING" size="256"/>
  1623. <Column id="mnf_no" type="STRING" size="256"/>
  1624. <Column id="mnf_seq" type="STRING" size="256"/>
  1625. </ColumnInfo>
  1626. </Dataset>
  1627. <Dataset id="ds_storge_no" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1628. <ColumnInfo>
  1629. <Column id="storg_no" type="STRING" size="256"/>
  1630. <Column id="storg_nm" type="STRING" size="256"/>
  1631. <Column id="deptcd" type="STRING" size="256"/>
  1632. <Column id="deptnm" type="STRING" size="256"/>
  1633. <Column id="moveflag" type="STRING" size="256"/>
  1634. </ColumnInfo>
  1635. <Rows>
  1636. <Row/>
  1637. </Rows>
  1638. </Dataset>
  1639. <Dataset id="ds_send_deptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1640. <ColumnInfo>
  1641. <Column id="deptcd" type="STRING" size="256"/>
  1642. <Column id="deptnm" type="STRING" size="256"/>
  1643. <Column id="workflag" type="STRING" size="256"/>
  1644. </ColumnInfo>
  1645. <Rows>
  1646. <Row/>
  1647. </Rows>
  1648. </Dataset>
  1649. <Dataset id="ds_adnmstocmoveerr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1650. <ColumnInfo>
  1651. <column id="instcd" type="STRING" size="256"/>
  1652. <column id="drugcd" type="STRING" size="256"/>
  1653. <column id="prcpno" type="STRING" size="256"/>
  1654. <column id="drugdd" type="STRING" size="256"/>
  1655. <column id="drugno" type="STRING" size="256"/>
  1656. <column id="ioflag" type="STRING" size="256"/>
  1657. <column id="pid" type="STRING" size="256"/>
  1658. <Column id="patnm" type="STRING" size="256"/>
  1659. <Column id="qty" type="STRING" size="256"/>
  1660. </ColumnInfo>
  1661. <Rows>
  1662. <Row/>
  1663. </Rows>
  1664. </Dataset>
  1665. <Dataset id="ds_mainprtdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1666. <ColumnInfo>
  1667. <Column id="pid" type="STRING" size="256"/>
  1668. <Column id="patnm" type="STRING" size="256"/>
  1669. <Column id="drugcd" type="STRING" size="256"/>
  1670. <Column id="drugnm" type="STRING" size="256"/>
  1671. <Column id="drugno" type="STRING" size="256"/>
  1672. <Column id="drugdd" type="STRING" size="256"/>
  1673. <Column id="storge_no" type="STRING" size="256"/>
  1674. <Column id="labelno" type="STRING" size="256"/>
  1675. <Column id="prd_valid_de" type="STRING" size="256"/>
  1676. <Column id="mnf_no" type="STRING" size="256"/>
  1677. <Column id="mnf_seq" type="STRING" size="256"/>
  1678. <Column id="seq" type="STRING" size="256"/>
  1679. </ColumnInfo>
  1680. </Dataset>
  1681. <Dataset id="ds_adnmstocordermove" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1682. <ColumnInfo>
  1683. <column id="instcd" type="STRING" size="256"/>
  1684. <column id="drugcd" type="STRING" size="256"/>
  1685. <column id="infg" type="STRING" size="256"/>
  1686. <column id="histno" type="STRING" size="256"/>
  1687. <column id="gtin" type="STRING" size="256"/>
  1688. <column id="prd_valid_de" type="STRING" size="256"/>
  1689. <column id="mnf_no" type="STRING" size="256"/>
  1690. <column id="mnf_seq" type="STRING" size="256"/>
  1691. <column id="seq" type="STRING" size="256"/>
  1692. <column id="prd_sgtin" type="STRING" size="256"/>
  1693. <column id="storge_no" type="STRING" size="256"/>
  1694. <column id="prtm_se_nm" type="STRING" size="256"/>
  1695. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1696. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1697. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1698. <column id="prd_pce_unit" type="STRING" size="256"/>
  1699. <column id="in_pce_qy" type="STRING" size="256"/>
  1700. <column id="indd" type="STRING" size="256"/>
  1701. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1702. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1703. <column id="opp_storge_no" type="STRING" size="256"/>
  1704. <column id="in_dtl_cd" type="STRING" size="256"/>
  1705. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1706. <column id="out_fg" type="STRING" size="256"/>
  1707. <column id="out_pce_qy" type="STRING" size="256"/>
  1708. <column id="fnshfg" type="STRING" size="256"/>
  1709. <column id="prcpno" type="STRING" size="256"/>
  1710. <column id="drugdd" type="STRING" size="256"/>
  1711. <column id="drugno" type="STRING" size="256"/>
  1712. <column id="ioflag" type="STRING" size="256"/>
  1713. <column id="drugseqno" type="STRING" size="256"/>
  1714. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1715. <column id="pat_id_no" type="STRING" size="256"/>
  1716. <column id="pat_nm" type="STRING" size="256"/>
  1717. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1718. <column id="lcns_no" type="STRING" size="256"/>
  1719. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1720. <column id="prsc_ord_no" type="STRING" size="256"/>
  1721. <column id="diss_code" type="STRING" size="256"/>
  1722. <column id="once_qty" type="FLOAT" size="256"/>
  1723. <column id="ade_cnt" type="FLOAT" size="256"/>
  1724. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1725. <column id="sum_qy" type="FLOAT" size="256"/>
  1726. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1727. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1728. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1729. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1730. <column id="dsuse_loc" type="STRING" size="256"/>
  1731. <column id="dsuse_de" type="STRING" size="256"/>
  1732. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1733. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1734. <column id="outdd" type="STRING" size="256"/>
  1735. <column id="out_bssh_cd" type="STRING" size="256"/>
  1736. <column id="out_bssh_nm" type="STRING" size="256"/>
  1737. <column id="out_storge_no" type="STRING" size="256"/>
  1738. <column id="out_dtl_cd" type="STRING" size="256"/>
  1739. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1740. <column id="insendfg" type="STRING" size="256"/>
  1741. <column id="outsendfg" type="STRING" size="256"/>
  1742. <column id="spreqy" type="STRING" size="256"/>
  1743. <column id="spredd" type="STRING" size="256"/>
  1744. <column id="spredt" type="STRING" size="256"/>
  1745. <column id="rtnfg" type="STRING" size="256"/>
  1746. <column id="rtndd" type="STRING" size="256"/>
  1747. <column id="rtndt" type="STRING" size="256"/>
  1748. <Column id="pid" type="STRING" size="256"/>
  1749. <Column id="labelno" type="STRING" size="256"/>
  1750. <Column id="indt" type="STRING" size="256"/>
  1751. <Column id="outdt" type="STRING" size="256"/>
  1752. <column id="in_prcpno" type="STRING" size="256"/>
  1753. <column id="in_drugdd" type="STRING" size="256"/>
  1754. <column id="in_drugno" type="STRING" size="256"/>
  1755. <column id="in_ioflag" type="STRING" size="256"/>
  1756. <column id="in_pid" type="STRING" size="256"/>
  1757. <Column id="ar_storge_no" type="STRING" size="256"/>
  1758. </ColumnInfo>
  1759. <Rows>
  1760. <Row/>
  1761. </Rows>
  1762. </Dataset>
  1763. <Dataset id="ds_adnmstoclistmove" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1764. <ColumnInfo>
  1765. <column id="instcd" type="STRING" size="256"/>
  1766. <column id="drugcd" type="STRING" size="256"/>
  1767. <column id="infg" type="STRING" size="256"/>
  1768. <column id="histno" type="STRING" size="256"/>
  1769. <column id="gtin" type="STRING" size="256"/>
  1770. <column id="prd_valid_de" type="STRING" size="256"/>
  1771. <column id="mnf_no" type="STRING" size="256"/>
  1772. <column id="mnf_seq" type="STRING" size="256"/>
  1773. <column id="seq" type="STRING" size="256"/>
  1774. <column id="prd_sgtin" type="STRING" size="256"/>
  1775. <column id="storge_no" type="STRING" size="256"/>
  1776. <column id="prtm_se_nm" type="STRING" size="256"/>
  1777. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  1778. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  1779. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  1780. <column id="prd_pce_unit" type="STRING" size="256"/>
  1781. <column id="in_pce_qy" type="STRING" size="256"/>
  1782. <column id="indd" type="STRING" size="256"/>
  1783. <column id="opp_bssh_cd" type="STRING" size="256"/>
  1784. <column id="opp_bssh_nm" type="STRING" size="256"/>
  1785. <column id="opp_storge_no" type="STRING" size="256"/>
  1786. <column id="in_dtl_cd" type="STRING" size="256"/>
  1787. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  1788. <column id="out_fg" type="STRING" size="256"/>
  1789. <column id="out_pce_qy" type="STRING" size="256"/>
  1790. <column id="fnshfg" type="STRING" size="256"/>
  1791. <column id="prcpno" type="STRING" size="256"/>
  1792. <column id="drugdd" type="STRING" size="256"/>
  1793. <column id="drugno" type="STRING" size="256"/>
  1794. <column id="ioflag" type="STRING" size="256"/>
  1795. <column id="drugseqno" type="STRING" size="256"/>
  1796. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  1797. <column id="pat_id_no" type="STRING" size="256"/>
  1798. <column id="pat_in" type="STRING" size="256"/>
  1799. <column id="lcns_asort_cd" type="STRING" size="256"/>
  1800. <column id="lcns_no" type="STRING" size="256"/>
  1801. <column id="prsc_doc_nm" type="STRING" size="256"/>
  1802. <column id="prsc_ord_no" type="STRING" size="256"/>
  1803. <column id="diss_code" type="STRING" size="256"/>
  1804. <column id="once_qy" type="FLOAT" size="256"/>
  1805. <column id="ade_cnt" type="FLOAT" size="256"/>
  1806. <column id="tot_dcnt" type="FLOAT" size="256"/>
  1807. <column id="sum_qy" type="FLOAT" size="256"/>
  1808. <column id="aft_dsuse_qy" type="FLOAT" size="256"/>
  1809. <column id="dsuse_se_cd" type="STRING" size="256"/>
  1810. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  1811. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  1812. <column id="dsuse_loc" type="STRING" size="256"/>
  1813. <column id="dsuse_de" type="STRING" size="256"/>
  1814. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  1815. <column id="dsuse_doc_de" type="STRING" size="256"/>
  1816. <column id="outdd" type="STRING" size="256"/>
  1817. <column id="out_bssh_cd" type="STRING" size="256"/>
  1818. <column id="out_bssh_nm" type="STRING" size="256"/>
  1819. <column id="out_storge_no" type="STRING" size="256"/>
  1820. <column id="out_dtl_cd" type="STRING" size="256"/>
  1821. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  1822. <column id="insendfg" type="STRING" size="256"/>
  1823. <column id="outsendfg" type="STRING" size="256"/>
  1824. <column id="spreqy" type="STRING" size="256"/>
  1825. <column id="spredd" type="STRING" size="256"/>
  1826. <column id="spredt" type="STRING" size="256"/>
  1827. <column id="rtnfg" type="STRING" size="256"/>
  1828. <column id="rtndd" type="STRING" size="256"/>
  1829. <column id="rtndt" type="STRING" size="256"/>
  1830. <Column id="pid" type="STRING" size="256"/>
  1831. <Column id="indt" type="STRING" size="256"/>
  1832. <Column id="outdt" type="STRING" size="256"/>
  1833. <column id="in_prcpno" type="STRING" size="256"/>
  1834. <column id="in_drugdd" type="STRING" size="256"/>
  1835. <column id="in_drugno" type="STRING" size="256"/>
  1836. <column id="in_ioflag" type="STRING" size="256"/>
  1837. <column id="in_pid" type="STRING" size="256"/>
  1838. <Column id="ar_storge_no" type="STRING" size="256"/>
  1839. </ColumnInfo>
  1840. <Rows>
  1841. <Row/>
  1842. </Rows>
  1843. </Dataset>
  1844. <Dataset id="ds_drugcd_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1845. <ColumnInfo>
  1846. <Column id="drugcd" type="STRING" size="256"/>
  1847. </ColumnInfo>
  1848. <Rows>
  1849. <Row/>
  1850. </Rows>
  1851. </Dataset>
  1852. <Dataset id="ds_drugcd_desc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1853. <ColumnInfo>
  1854. <Column id="desc" type="STRING" size="256"/>
  1855. </ColumnInfo>
  1856. <Rows>
  1857. <Row/>
  1858. </Rows>
  1859. </Dataset>
  1860. </Objects>
  1861. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  1862. * System Name :
  1863. * Job Name :
  1864. * Creator :
  1865. * Make Date : 2018-03-08
  1866. * Description :
  1867. ****************************************************************************************/
  1868. //=======================================================================================
  1869. // Lib Include
  1870. //---------------------------------------------------------------------------------------
  1871. include "com_commonxp::comm_main.xjs"
  1872. include "ast_commonxp::AST.xjs"
  1873. var ArSendFlag = "";
  1874. var Arstorge_no = "";
  1875. var ArprdtQty = 0;
  1876. var ArprdtBox = 0;
  1877. var ArprdtComBox = 0;
  1878. var ArprdtFlag = "N";
  1879. var ASgtin = "";
  1880. var ASprd_valid_de = "";
  1881. var ASmnf_no = "";
  1882. var ASmnf_seq = "";
  1883. var TMPASgtin = "";
  1884. var TMPASprd_valid_de = "";
  1885. var TMPASmnf_no = "";
  1886. var TMPASmnf_seq = "";
  1887. var OpenViewFlag = "N";
  1888. var ArMoveflag = "N";
  1889. var ArMoveStorgno = "N";
  1890. var FrFindflag = "N";
  1891. var FCreflag = "N";
  1892. var Ardesc = "";
  1893. function SMADT12000_oninit(obj:Form, e:InitEventInfo)
  1894. {
  1895. frmf_initForm(obj); // 폼 초기화
  1896. }
  1897. function SMADT12000_onload(obj:Form, e:LoadEventInfo)
  1898. {
  1899. fInit();
  1900. if (ArSendFlag == "Spre" || ArSendFlag == "Rtn") {
  1901. but_ok.click();
  1902. but_ok.enable = false ;
  1903. fSearchData();
  1904. }
  1905. }
  1906. function fInit() {
  1907. ds_main_narclist_narclist.clearData();
  1908. ds_adnmstocorder.clearData();
  1909. ds_adnmstocordermachi.clearData();
  1910. grdf_initGrid(grd_narclist02);
  1911. grdf_initGrid(grd_narclist01);
  1912. grdf_setGridSort(grd_narclist04);
  1913. grdf_setGridSort(grd_narclist06);
  1914. grdf_setGridSort(grd_narclist07);
  1915. grdf_setGridSort(grd_narclist03);
  1916. grdf_setGridSort(grd_narclist05);
  1917. ds_main_narclist_narclist.copyData(arg_ds_sendnarcstoc);
  1918. ArSendFlag = arg_flag ;
  1919. ds_send_prntinfo.clear();
  1920. dsf_copyColInfo(ds_send_prntinfo,ds_finddrugno);
  1921. ds_send_prntinfo.addRow();
  1922. ////Prcp , Rtn 넘어오는 Flag 값//
  1923. // alert(ArSendFlag) ;
  1924. //저장소 정보 찾기
  1925. var Vdeptcd = ds_main_narclist_narclist.getColumn(0, "stocdeptcd");
  1926. ds_send_deptcd.clearData();
  1927. ds_send_deptcd.addRow();
  1928. ds_send_deptcd.setColumn(0,"deptcd" , Vdeptcd );
  1929. ds_send_deptcd.setColumn(0,"deptnm" , "" );
  1930. ds_send_deptcd.setColumn(0,"workflag" , "Y" );
  1931. var oParam = {};
  1932. oParam.id = "TRADT12014";
  1933. oParam.service = "pharmacydrugsumapp.NarcManagent";
  1934. oParam.method = "reqGetFindStorgno";
  1935. oParam.inds = "req=ds_send_deptcd";
  1936. oParam.outds = "ds_storge_no=storgno";
  1937. oParam.async = false;
  1938. tranf_submit(oParam);
  1939. Arstorge_no = ds_storge_no.getColumn(0, "storge_no");
  1940. //alert(ArSendFlag);
  1941. ///// 화면 Open시 데이타 생성
  1942. but_ok.enable = true ;
  1943. But_Create.click();
  1944. var cnt = 0;
  1945. /////////////////
  1946. }
  1947. function But_Create_onclick(obj:Button, e:ClickEventInfo)
  1948. {//trace("ArSendFlag : "+ ArSendFlag);
  1949. if (ArSendFlag == "Prcp") {
  1950. but_ok.text = '불출승인';
  1951. but_ok.enable = false ;
  1952. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  1953. ds_adnmstocorder.clearData();
  1954. ds_adnmstocordermachi.clearData();
  1955. FCreflag = "Y";
  1956. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  1957. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  1958. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  1959. var Fprcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  1960. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  1961. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  1962. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  1963. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  1964. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  1965. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  1966. var Fisdeptnm = ds_main_narclist_narclist.getColumn(i, "issdeptcdnm");
  1967. var Forddeptcd = ds_main_narclist_narclist.getColumn(i, "orddeptcd");
  1968. var Ftotdrugqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty"));
  1969. var narcflag = ds_main_narclist_narclist.getColumn(i, "narcflag");
  1970. ds_send_stoc.setColumn(0,"pid" , "" );
  1971. ds_send_stoc.setColumn(0,"drugcd" , "" );
  1972. ds_send_stoc.setColumn(0,"drugdd" , "" );
  1973. ds_send_stoc.setColumn(0,"prcpno" , "" );
  1974. ds_send_stoc.setColumn(0,"storge_no" , "" );
  1975. ds_send_stoc.setColumn(0,"boxflag" , "" );
  1976. ds_send_stoc.setColumn(0,"gtin" , "" );
  1977. ds_send_stoc.setColumn(0,"prd_valid_de", "" );
  1978. ds_send_stoc.setColumn(0,"mnf_no" , "" );
  1979. ds_send_stoc.setColumn(0,"mnf_seq" , "" );
  1980. ds_send_stoc.setColumn(0,"ioflag" , "" );
  1981. ds_send_stoc.setColumn(0,"workflag" , "" );
  1982. /////////////////데이타 생성유무를 체크하여 재생성을 막는루틴
  1983. ds_send_stoc.setColumn(0,"pid" , Fpid );
  1984. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  1985. ds_send_stoc.setColumn(0,"drugdd" , Fdrugdd );
  1986. ds_send_stoc.setColumn(0,"prcpno" , Fprcpno );
  1987. var oParam = {};
  1988. oParam.id = "TRADT12007";
  1989. oParam.service = "pharmacydrugsumapp.NarcManagent";
  1990. oParam.method = "reqGetNarcStocOkList";
  1991. oParam.inds = "req=ds_send_stoc";
  1992. oParam.outds = "ds_adnmstoclist=stocdata";
  1993. oParam.async = false;
  1994. tranf_submit(oParam);
  1995. if ( ds_adnmstoclist.rowcount >= Ftotdrugqty ){
  1996. FCreflag = "N";
  1997. }
  1998. //////////////
  1999. ///일반물품 정보 찾기
  2000. // alert('일반물품 정보 찾기');
  2001. ArMoveStorgno = "";
  2002. ArMoveflag = "N";
  2003. ds_drugcd_send.setColumn(0,"drugcd" , Fprcpcd );
  2004. var oParam = {};
  2005. oParam.id = "TRADT12019";
  2006. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2007. oParam.method = "reqGetDrugcdDesc";
  2008. oParam.inds = "req=ds_drugcd_send";
  2009. oParam.outds = "ds_drugcd_desc=desc";
  2010. oParam.async = false;
  2011. tranf_submit(oParam);
  2012. Ardesc = ds_drugcd_desc.getColumn(0, "drugdesc");
  2013. // alert(Ardesc);
  2014. if ( Ardesc == "중점" || (Ardesc == "일반" && narcflag == "M")) {
  2015. /////////////////
  2016. /////////////////////
  2017. ///부서별 저장소 및 이송유무 찾기
  2018. ////////////////////
  2019. ds_send_deptcd.clearData();
  2020. ds_send_deptcd.addRow();
  2021. ds_send_deptcd.setColumn(0,"deptcd" , "" );
  2022. ds_send_deptcd.setColumn(0,"deptnm" , Fisdeptnm );
  2023. ds_send_deptcd.setColumn(0,"workflag" , "N" );
  2024. var oParam = {};
  2025. oParam.id = "TRADT12014";
  2026. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2027. oParam.method = "reqGetFindStorgno";
  2028. oParam.inds = "req=ds_send_deptcd";
  2029. oParam.outds = "ds_storge_no=storgno";
  2030. oParam.async = false;
  2031. tranf_submit(oParam);
  2032. if ( ds_storge_no.rowcount == 0 ) {
  2033. ArMoveflag = "N";
  2034. } else {
  2035. ArMoveflag = ds_storge_no.getColumn(0, "moveflag");
  2036. ArMoveStorgno = ds_storge_no.getColumn(0, "storge_no");
  2037. }
  2038. //alert(Fisdeptnm +':'+ ds_storge_no.rowcount + ':' + ArMoveflag + ':'+ ArMoveStorgno);
  2039. }
  2040. ////////////////////////////
  2041. //////// 2018년 7월 9일 일반약품은 저장소 이동없음 김민주과 협의
  2042. if (Ardesc == "일반" && narcflag != "M"){
  2043. ArMoveflag == "N";
  2044. ArMoveStorgno == "";
  2045. }
  2046. /////////
  2047. ds_send_prntinfo.setColumn(0,"pid" , Fpid );
  2048. ds_send_prntinfo.setColumn(0,"drugdd" , Fdrugdd );
  2049. ds_send_prntinfo.setColumn(0,"prcpdd" , Fprcpdd );
  2050. ds_send_prntinfo.setColumn(0,"orddd" , Forddd );
  2051. ds_send_prntinfo.setColumn(0,"drugno" , Fdrugno );
  2052. ds_send_prntinfo.setColumn(0,"prcpno" , Fprcpno );
  2053. ds_send_prntinfo.setColumn(0,"ioflag" , Fioflag );
  2054. ds_send_prntinfo.setColumn(0,"prcphistno" , Fprcphistno );
  2055. ds_send_prntinfo.setColumn(0,"drugseqno" , Fdrugseqno );
  2056. dsf_makeValue(ds_send_prntinfo,"orddeptcd","string",Forddeptcd );
  2057. var oParam = {};
  2058. oParam.id = "TRADT30103";
  2059. oParam.service = "pharmacyprescriptionapp.Narcotics";
  2060. oParam.method = "reqGetNarcPrntData";
  2061. oParam.inds = "req=ds_send_prntinfo";
  2062. oParam.outds = "ds_main_prntlist_patinfo=patinfo ds_main_prntlist_diaginfo=diaginfo ds_main_prntlist_prntlist=prntlist ds_main_prntlist_resn=resn";
  2063. oParam.async = false;
  2064. ///oParam.callback = "cf_TRADT30103";
  2065. tranf_submit(oParam);
  2066. ArprdtFlag = "N";
  2067. var sPrcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd"); // 처방코드명
  2068. var sPrcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2069. var sDrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2070. var sPid = ds_main_narclist_narclist.getColumn(i, "pid");
  2071. var sTotdrugqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty"));
  2072. //////// 약품별 박수 수량찾기
  2073. ds_sendadnmprdt.setColumn(0,"basedd" , sDrugdd );
  2074. ds_sendadnmprdt.setColumn(0,"srchcnts" , sPrcpcd );
  2075. ds_sendadnmprdt.setColumn(0,"srchflag" , '1' );
  2076. //마약류 품목 목록 조회
  2077. var oParam = {};
  2078. oParam.id = "TRADT12121";
  2079. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2080. oParam.method = "reqGetPrdList";
  2081. oParam.inds = "req=ds_sendadnmprdt";
  2082. oParam.outds = "ds_adnmprdt=prdlist";
  2083. oParam.async = false;
  2084. tranf_submit(oParam);
  2085. ArprdtQty = ds_adnmprdt.getColumn(0, "prd_tot_pce_qy");
  2086. if ( sTotdrugqty >= ArprdtQty ) {
  2087. ArprdtFlag = "Y";
  2088. ArprdtBox = parseInt( sTotdrugqty / ArprdtQty) ;
  2089. }
  2090. //trace("ArMoveflag : "+ArMoveflag);
  2091. //////////
  2092. if ( ArMoveflag == "Y" ) { ///Fisdeptnm == '마취회복실'
  2093. //alert("저장소 이동 : "+ArMoveflag) ;
  2094. ds_adnmstoclistmachi.clearData();
  2095. ds_adnmstoclistmachi_old.clearData();
  2096. ds_adnmstocbox.clearData();
  2097. ds_send_stoc.setColumn(0,"pid" , "" );
  2098. ds_send_stoc.setColumn(0,"drugcd" , "" );
  2099. ds_send_stoc.setColumn(0,"drugdd" , "" );
  2100. ds_send_stoc.setColumn(0,"prcpno" , "" );
  2101. ds_send_stoc.setColumn(0,"storge_no" , "" );
  2102. ds_send_stoc.setColumn(0,"boxflag" , "" );
  2103. ds_send_stoc.setColumn(0,"gtin" , "" );
  2104. ds_send_stoc.setColumn(0,"prd_valid_de", "" );
  2105. ds_send_stoc.setColumn(0,"mnf_no" , "" );
  2106. ds_send_stoc.setColumn(0,"mnf_seq" , "" );
  2107. ds_send_stoc.setColumn(0,"ioflag" , "" );
  2108. ds_send_stoc.setColumn(0,"workflag" , "" );
  2109. ds_send_stoc.setColumn(0,"drugcd" , sPrcpcd );
  2110. ds_send_stoc.setColumn(0,"prcpno" , sPrcpno );
  2111. ds_send_stoc.setColumn(0,"drugdd" , sDrugdd );
  2112. ds_send_stoc.setColumn(0,"storge_no" , ArMoveStorgno );
  2113. ds_send_stoc.setColumn(0,"pid" , sPid );
  2114. ds_send_stoc.setColumn(0,"seltype" , 'S' );
  2115. ds_send_stoc.setColumn(0,"boxflag" , 'N' );
  2116. var oParam = {};
  2117. oParam.id = "TRADT12001";
  2118. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2119. oParam.method = "reqGetNarcStocList";
  2120. oParam.inds = "req=ds_send_stoc";
  2121. oParam.outds = "ds_adnmstoclistmachi=stocdata";
  2122. oParam.async = false;
  2123. tranf_submit(oParam);
  2124. ds_send_stoc.setColumn(0,"drugcd" , sPrcpcd );
  2125. ds_send_stoc.setColumn(0,"prcpno" , sPrcpno );
  2126. ds_send_stoc.setColumn(0,"drugdd" , sDrugdd );
  2127. ds_send_stoc.setColumn(0,"storge_no" , ArMoveStorgno );
  2128. ds_send_stoc.setColumn(0,"pid" , sPid );
  2129. ds_send_stoc.setColumn(0,"seltype" , 'O' );
  2130. var oParam = {};
  2131. oParam.id = "TRADT12001";
  2132. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2133. oParam.method = "reqGetNarcStocList";
  2134. oParam.inds = "req=ds_send_stoc";
  2135. oParam.outds = "ds_adnmstoclistmachi_old=stocdata";
  2136. oParam.async = false;
  2137. tranf_submit(oParam);
  2138. }
  2139. ds_send_stoc.setColumn(0,"drugcd" , sPrcpcd );
  2140. ds_send_stoc.setColumn(0,"storge_no" , Arstorge_no );
  2141. ds_send_stoc.setColumn(0,"prcpno" , sPrcpno );
  2142. ds_send_stoc.setColumn(0,"seltype" , 'A' );
  2143. ds_send_stoc.setColumn(0,"boxflag" , ArprdtFlag );
  2144. ds_send_stoc.setColumn(0,"gtin" , "" );
  2145. ds_send_stoc.setColumn(0,"prd_valid_de" , '' );
  2146. ds_send_stoc.setColumn(0,"mnf_no" , '' );
  2147. ds_send_stoc.setColumn(0,"mnf_seq" , '' );
  2148. /////저장소별 코드별 박스수량 찾기
  2149. var oParam = {};
  2150. oParam.id = "TRADT12013";
  2151. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2152. oParam.method = "reqGetStocBox";
  2153. oParam.inds = "req=ds_send_stoc";
  2154. oParam.outds = "ds_adnmstocbox=stocdata";
  2155. oParam.async = false;
  2156. tranf_submit(oParam);
  2157. //박스 데이타 만들기
  2158. ASgtin = "";
  2159. ASprd_valid_de = "";
  2160. ASmnf_no = "";
  2161. ASmnf_seq = "";
  2162. ArprdtComBox = 1;
  2163. TMPASgtin = "";
  2164. TMPASprd_valid_de = "";
  2165. TMPASmnf_no = "";
  2166. TMPASmnf_seq = "";
  2167. //trace("ArprdtFlag : "+ArprdtFlag);
  2168. if ( ArprdtFlag == "Y") {
  2169. for(var ii = 0; ii < ds_adnmstocbox.rowcount ; ii++){
  2170. var Fgtin = ds_adnmstocbox.getColumn(ii, "gtin");
  2171. var Fprd_valid_de = ds_adnmstocbox.getColumn(ii, "prd_valid_de");
  2172. var Fmnf_no = ds_adnmstocbox.getColumn(ii, "mnf_no");
  2173. var Fmnf_seq = ds_adnmstocbox.getColumn(ii, "mnf_seq");
  2174. var Fboxcnt = ds_adnmstocbox.getColumn(ii, "boxcnt");
  2175. if ( Fboxcnt == ArprdtQty ) {
  2176. // alert("ArprdtBox ; " + ArprdtBox );
  2177. if ( ArprdtBox >= ArprdtComBox ) {
  2178. if ( ArprdtComBox == 1 ) {
  2179. ASgtin = ASgtin + Fgtin ;
  2180. ASprd_valid_de = ASprd_valid_de + Fprd_valid_de;
  2181. ASmnf_no = ASmnf_no + Fmnf_no;
  2182. ASmnf_seq = ASmnf_seq + Fmnf_seq ;
  2183. TMPASgtin = ASgtin;
  2184. TMPASprd_valid_de = ASprd_valid_de;
  2185. TMPASmnf_no = ASmnf_no;
  2186. TMPASmnf_seq = ASmnf_seq;
  2187. } else {
  2188. if ( TMPASgtin <> Fgtin) {
  2189. ASgtin = ASgtin + "','" + Fgtin ;
  2190. TMPASgtin = Fgtin;
  2191. }
  2192. if ( TMPASprd_valid_de <> Fprd_valid_de) {
  2193. ASprd_valid_de = ASprd_valid_de + "','" + Fprd_valid_de;
  2194. TMPASprd_valid_de = Fprd_valid_de;
  2195. }
  2196. if ( TMPASmnf_no <> Fmnf_no) {
  2197. ASmnf_no = ASmnf_no + "','" + Fmnf_no;
  2198. TMPASmnf_no = Fmnf_no;
  2199. }
  2200. if ( TMPASmnf_seq <> Fmnf_seq) {
  2201. ASmnf_seq = ASmnf_seq + "','" + Fmnf_seq ;
  2202. TMPASmnf_seq = Fmnf_seq;
  2203. }
  2204. }
  2205. ArprdtComBox = ArprdtComBox + 1;
  2206. // alert("ArprdtComBox ; " + ArprdtComBox );
  2207. }
  2208. }
  2209. }
  2210. ds_send_stoc.setColumn(0,"gtin" , ASgtin );
  2211. ds_send_stoc.setColumn(0,"prd_valid_de" , ASprd_valid_de );
  2212. ds_send_stoc.setColumn(0,"mnf_no" , ASmnf_no );
  2213. ds_send_stoc.setColumn(0,"mnf_seq" , ASmnf_seq );
  2214. }
  2215. //////////
  2216. var oParam = {};
  2217. oParam.id = "TRADT12001";
  2218. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2219. oParam.method = "reqGetNarcStocList";
  2220. oParam.inds = "req=ds_send_stoc";
  2221. oParam.outds = "ds_adnmstoclist=stocdata";
  2222. oParam.async = false;
  2223. tranf_submit(oParam);
  2224. // trace ( "총건수 : " + ds_adnmstoclist.rowcount + ds_adnmstoclistmachi.rowcount);
  2225. // trace ( "stco건수 : " + ds_adnmstoclist.rowcount);
  2226. // trace ( "machi건수 : " + ds_adnmstoclistmachi.rowcount);
  2227. ///////대상자별 불출유무를 체크하여 산위단 화면에 노랑생상 넣기
  2228. if ( ArMoveflag == "Y" ) { /////Fisdeptnm == '마취회복실'
  2229. if ( ds_adnmstoclist.rowcount + ds_adnmstoclistmachi.rowcount >= sTotdrugqty ){
  2230. ds_main_narclist_narclist.setColumn(i,"sel" , "Y" );
  2231. }else{
  2232. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2233. }
  2234. }else{
  2235. if ( ds_adnmstoclist.rowcount >= sTotdrugqty ){
  2236. ds_main_narclist_narclist.setColumn(i,"sel" , "Y" );
  2237. }else{
  2238. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2239. }
  2240. }
  2241. //////// 마취회복실 있는 수량 체크하여 불출 수량과 같은지 아니면 병동약국 저장소 수량 체크하기
  2242. //////// 이 수량이 약국에서 마취회복실 이동 수량 만듦
  2243. if ( ArMoveflag == "Y" ) { ////Fisdeptnm == '마취회복실'
  2244. if ( ds_adnmstoclistmachi.rowcount > 0 ){
  2245. if ( ds_adnmstoclistmachi.rowcount <= sTotdrugqty ){
  2246. sTotdrugqty = ds_adnmstoclistmachi.rowcount ;
  2247. }
  2248. }else{
  2249. if ( ds_adnmstoclist.rowcount <= sTotdrugqty ){
  2250. sTotdrugqty = ds_adnmstoclist.rowcount ;
  2251. }
  2252. }
  2253. }else {
  2254. if ( ds_adnmstoclist.rowcount <= sTotdrugqty ){
  2255. sTotdrugqty = ds_adnmstoclist.rowcount ;
  2256. }
  2257. }
  2258. // alert(Fpid + ':' + Fdrugdd + ':' + Fdrugno + ':' + sTotdrugqty);
  2259. ///등록된 데이타 수만큼 제한후 부터 처리하기 위해 기존 등록된 데이타 수 찾기
  2260. var scnt = 0 ;
  2261. for (var oo = 0; oo < ds_adnmstocorder.rowcount; oo++){
  2262. var ScCode = ds_adnmstocorder.getColumn(oo, "drugcd");
  2263. var Scfnshfg = ds_adnmstocorder.getColumn(oo, "fnshfg");
  2264. if ( Scfnshfg == '0') {
  2265. if ( sPrcpcd == ScCode) {
  2266. scnt = scnt + 1;
  2267. }
  2268. }
  2269. }
  2270. // alert("Fisdeptnm : " + Fisdeptnm);
  2271. if ( ArMoveflag == "Y" ) { ////Fisdeptnm == "마취회복실"
  2272. var Amachicnt = ds_adnmstoclistmachi.rowcount;
  2273. //alert("Amachicnt : " + Amachicnt);
  2274. //alert("scnt : " + scnt);
  2275. //alert("sTotdrugqty : " + sTotdrugqty);
  2276. if ( Amachicnt >= sTotdrugqty ) {
  2277. for(var k = scnt; k < sTotdrugqty + scnt ; k++){
  2278. var nRow = ds_adnmstocorder.addRow();
  2279. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclistmachi, k);
  2280. ds_adnmstocorder.setColumn(nRow,"prcpno", ds_main_narclist_narclist.getColumn(i, "prcpno"));
  2281. ds_adnmstocorder.setColumn(nRow,"drugdd", ds_main_narclist_narclist.getColumn(i, "drugdd"));
  2282. ds_adnmstocorder.setColumn(nRow,"drugno", ds_main_narclist_narclist.getColumn(i, "drugno"));
  2283. ds_adnmstocorder.setColumn(nRow,"ioflag", ds_main_narclist_narclist.getColumn(i, "ioflag"));
  2284. ds_adnmstocorder.setColumn(nRow,"drugseqno", ds_main_narclist_narclist.getColumn(i, "drugseqno"));
  2285. //alert(parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpqty")));
  2286. ds_adnmstocorder.setColumn(nRow,"once_qty", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpqty")));
  2287. ds_adnmstocorder.setColumn(nRow,"ade_cnt", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcptims")));
  2288. ds_adnmstocorder.setColumn(nRow,"tot_dcnt", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpdayno")));
  2289. ds_adnmstocorder.setColumn(nRow,"sum_qy", parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty")));
  2290. if(!utlf_isNull(ds_main_narclist_narclist.getColumn(i, "spreqty"))) {
  2291. ds_adnmstocorder.setColumn(nRow,"spreqy", parseFloat(ds_main_narclist_narclist.getColumn(i, "spreqty")));
  2292. } else {
  2293. ds_adnmstocorder.setColumn(nRow,"spreqy", 0);
  2294. }
  2295. var Rrgstno = ds_main_prntlist_patinfo.getColumn(0, "rrgstno");
  2296. var psptno = ds_main_prntlist_patinfo.getColumn(0, "psptno");
  2297. // alert(Rrgstno.substr(7,7) );
  2298. if(Rrgstno.length == 14) {
  2299. var RRrgstno1 = Rrgstno.substr(0,6);
  2300. var RRrgstno2 = Rrgstno.substr(7,7);
  2301. var RRrgstnoall = RRrgstno1 + RRrgstno2;
  2302. //ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '01');
  2303. if(!utlf_isRsrNo(RRrgstnoall)) {
  2304. if(utlf_isForegnResidentNo(RRrgstnoall)) {
  2305. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '02'); //외국인등록번호
  2306. } else {
  2307. if( (!utlf_isNull(psptno) && psptno != '-')) {
  2308. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '03');
  2309. RRrgstnoall = psptno;
  2310. } else {
  2311. if(utlf_getSex(RRrgstnoall) == "M") {
  2312. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '06'); //무명남
  2313. } else {
  2314. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '07'); //무명녀
  2315. }
  2316. }
  2317. }
  2318. } else {
  2319. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '01'); //주민번호
  2320. }
  2321. ds_adnmstocorder.setColumn(nRow,"pat_id_no", RRrgstnoall );
  2322. }
  2323. ds_adnmstocorder.setColumn(nRow,"pid", ds_main_prntlist_patinfo.getColumn(0, "pid"));
  2324. ds_adnmstocorder.setColumn(nRow,"pat_nm", ds_main_prntlist_patinfo.getColumn(0, "patnm"));
  2325. ds_adnmstocorder.setColumn(nRow,"lcns_asort_cd", '1');
  2326. ds_adnmstocorder.setColumn(nRow,"lcns_no", ds_main_prntlist_patinfo.getColumn(0, "medispclid_licnsno"));
  2327. ds_adnmstocorder.setColumn(nRow,"prsc_doc_nm", ds_main_prntlist_patinfo.getColumn(0, "medispclidnm"));
  2328. ds_adnmstocorder.setColumn(nRow,"prsc_ord_no", ds_main_narclist_narclist.getColumn(i, "drugno"));
  2329. /////
  2330. var Diagcnt = ds_main_prntlist_diaginfo.rowcount;
  2331. if ( Diagcnt > 0 ) {
  2332. var sDiss_code = ds_main_prntlist_diaginfo.getColumn(0, "diagcd1");
  2333. var tDiss_code = sDiss_code.indexOf(" ");
  2334. var stDiss_code = sDiss_code.substr(0, tDiss_code);
  2335. ds_adnmstocorder.setColumn(nRow,"diss_code", stDiss_code);
  2336. } else {
  2337. var sDiss_code = ds_main_prntlist_patinfo.getColumn(0, "diagcd");
  2338. var tDiss_code = sDiss_code.indexOf(".");
  2339. var stDiss_code = sDiss_code.substr(0, tDiss_code);
  2340. ds_adnmstocorder.setColumn(nRow,"diss_code", stDiss_code);
  2341. }
  2342. /* dsf_makeValue(ds_adnmstocorder,"patnm","string", ds_main_narclist_narclist.getColumn(0, "patnm"),nRow ); */
  2343. }
  2344. /////마취회복실 이송데이타 만들기
  2345. var Mordcnt = ds_adnmstocorder.rowcount;
  2346. // alert("마취 데이타 만들기 "+ Mordcnt);
  2347. if ( Mordcnt > 0 ) {
  2348. var Mfnshfg = ds_adnmstocorder.getColumn(0, "fnshfg");
  2349. // alert("마취 데이타 Mfnshfg "+ Mfnshfg+ ':' + ds_adnmstoclist.rowcount);
  2350. if (Mfnshfg == 1 ) {
  2351. // trace(Mfnshfg);
  2352. ds_send_stoc.setColumn(0,"pid" , "" );
  2353. ds_send_stoc.setColumn(0,"drugcd" , "" );
  2354. ds_send_stoc.setColumn(0,"drugdd" , "" );
  2355. ds_send_stoc.setColumn(0,"prcpno" , "" );
  2356. ds_send_stoc.setColumn(0,"storge_no" , "" );
  2357. ds_send_stoc.setColumn(0,"boxflag" , "" );
  2358. ds_send_stoc.setColumn(0,"gtin" , "" );
  2359. ds_send_stoc.setColumn(0,"prd_valid_de", "" );
  2360. ds_send_stoc.setColumn(0,"mnf_no" , "" );
  2361. ds_send_stoc.setColumn(0,"mnf_seq" , "" );
  2362. ds_send_stoc.setColumn(0,"ioflag" , "" );
  2363. ds_send_stoc.setColumn(0,"workflag" , "" );
  2364. ds_send_stoc.setColumn(0,"drugcd" , sPrcpcd );
  2365. ds_send_stoc.setColumn(0,"prcpno" , sPrcpno );
  2366. ds_send_stoc.setColumn(0,"drugdd" , sDrugdd );
  2367. ds_send_stoc.setColumn(0,"storge_no" , ArMoveStorgno );
  2368. ds_send_stoc.setColumn(0,"pid" , sPid );
  2369. // trace("TRADT12009");
  2370. var oParam = {};
  2371. oParam.id = "TRADT12009";
  2372. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2373. oParam.method = "reqGetNarcStocMoveList";
  2374. oParam.inds = "req=ds_send_stoc";
  2375. oParam.outds = "ds_adnmstocordermachi=stocmovedata";
  2376. oParam.async = false;
  2377. tranf_submit(oParam);
  2378. } else {
  2379. for(var k = 0; k < sTotdrugqty + scnt ; k++){
  2380. var nRow = ds_adnmstocordermachi.addRow();
  2381. ds_adnmstocordermachi.copyRow(nRow, ds_adnmstoclist, k);
  2382. ds_adnmstocordermachi.setColumn(nRow,"ar_storge_no", ArMoveStorgno);
  2383. }
  2384. }
  2385. } else {
  2386. for(var k = 0; k < sTotdrugqty + scnt ; k++){
  2387. var nRow = ds_adnmstocordermachi.addRow();
  2388. ds_adnmstocordermachi.copyRow(nRow, ds_adnmstoclist, k);
  2389. ds_adnmstocordermachi.setColumn(nRow,"ar_storge_no", ArMoveStorgno);
  2390. }
  2391. }
  2392. ///////
  2393. } else {
  2394. for(var k = scnt; k < sTotdrugqty + scnt ; k++){
  2395. var nRow = ds_adnmstocorder.addRow();
  2396. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k);
  2397. ds_adnmstocorder.setColumn(nRow,"prcpno", ds_main_narclist_narclist.getColumn(i, "prcpno"));
  2398. ds_adnmstocorder.setColumn(nRow,"drugdd", ds_main_narclist_narclist.getColumn(i, "drugdd"));
  2399. ds_adnmstocorder.setColumn(nRow,"drugno", ds_main_narclist_narclist.getColumn(i, "drugno"));
  2400. ds_adnmstocorder.setColumn(nRow,"ioflag", ds_main_narclist_narclist.getColumn(i, "ioflag"));
  2401. ds_adnmstocorder.setColumn(nRow,"drugseqno", ds_main_narclist_narclist.getColumn(i, "drugseqno"));
  2402. ///alert(parseInt(ds_main_narclist_narclist.getColumn(i, "prcpqty")));
  2403. ds_adnmstocorder.setColumn(nRow,"once_qty", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpqty")));
  2404. ds_adnmstocorder.setColumn(nRow,"ade_cnt", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcptims")));
  2405. ds_adnmstocorder.setColumn(nRow,"tot_dcnt", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpdayno")));
  2406. ds_adnmstocorder.setColumn(nRow,"sum_qy", parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty")));
  2407. if(!utlf_isNull(ds_main_narclist_narclist.getColumn(i, "spreqty"))) {
  2408. ds_adnmstocorder.setColumn(nRow,"spreqy", parseFloat(ds_main_narclist_narclist.getColumn(i, "spreqty")));
  2409. } else {
  2410. ds_adnmstocorder.setColumn(nRow,"spreqy", 0);
  2411. }
  2412. var Rrgstno = ds_main_prntlist_patinfo.getColumn(0, "rrgstno");
  2413. var psptno = ds_main_prntlist_patinfo.getColumn(0, "psptno");
  2414. // alert(Rrgstno.substr(7,7) );
  2415. if (Rrgstno.length == 14) {
  2416. var RRrgstno1 = Rrgstno.substr(0,6);
  2417. var RRrgstno2 = Rrgstno.substr(7,7);
  2418. var RRrgstnoall = RRrgstno1 + RRrgstno2
  2419. //ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '01');
  2420. if(!utlf_isRsrNo(RRrgstnoall)) {
  2421. if(utlf_isForegnResidentNo(RRrgstnoall)) {
  2422. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '02'); //외국인등록번호
  2423. } else {
  2424. if( (!utlf_isNull(psptno) && psptno != '-')) {
  2425. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '03');
  2426. RRrgstnoall = psptno;
  2427. } else {
  2428. if(utlf_getSex(RRrgstnoall) == "M") {
  2429. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '06'); //무명남
  2430. } else {
  2431. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '07'); //무명녀
  2432. }
  2433. }
  2434. }
  2435. } else {
  2436. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '01'); //주민번호
  2437. }
  2438. ds_adnmstocorder.setColumn(nRow,"pat_id_no", RRrgstnoall );
  2439. }
  2440. ds_adnmstocorder.setColumn(nRow,"pid", ds_main_prntlist_patinfo.getColumn(0, "pid"));
  2441. ds_adnmstocorder.setColumn(nRow,"pat_nm", ds_main_prntlist_patinfo.getColumn(0, "patnm"));
  2442. ds_adnmstocorder.setColumn(nRow,"lcns_asort_cd", '1');
  2443. ds_adnmstocorder.setColumn(nRow,"lcns_no", ds_main_prntlist_patinfo.getColumn(0, "medispclid_licnsno"));
  2444. ds_adnmstocorder.setColumn(nRow,"prsc_doc_nm", ds_main_prntlist_patinfo.getColumn(0, "medispclidnm"));
  2445. ds_adnmstocorder.setColumn(nRow,"prsc_ord_no", ds_main_narclist_narclist.getColumn(i, "drugno"));
  2446. var Diagcnt = ds_main_prntlist_diaginfo.rowcount;
  2447. if ( Diagcnt > 0 ) {
  2448. var sDiss_code = ds_main_prntlist_diaginfo.getColumn(0, "diagcd1");
  2449. sDiss_code = sDiss_code.substr(0,6);
  2450. var tDiss_code = sDiss_code.indexOf(" ");
  2451. var stDiss_code = sDiss_code.substr(0, tDiss_code);
  2452. ds_adnmstocorder.setColumn(nRow,"diss_code", stDiss_code);
  2453. } else {
  2454. var sDiss_code = ds_main_prntlist_patinfo.getColumn(0, "diagcd");
  2455. var tDiss_code = sDiss_code.indexOf(".");
  2456. var stDiss_code = sDiss_code.substr(0, tDiss_code);
  2457. ds_adnmstocorder.setColumn(nRow,"diss_code", stDiss_code);
  2458. }
  2459. /* dsf_makeValue(ds_adnmstocorder,"patnm","string", ds_main_narclist_narclist.getColumn(0, "patnm"),nRow ); */
  2460. }
  2461. }
  2462. } else {
  2463. for(var k = scnt; k < sTotdrugqty + scnt ; k++){
  2464. var nRow = ds_adnmstocorder.addRow();
  2465. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k);
  2466. ds_adnmstocorder.setColumn(nRow,"prcpno", ds_main_narclist_narclist.getColumn(i, "prcpno"));
  2467. ds_adnmstocorder.setColumn(nRow,"drugdd", ds_main_narclist_narclist.getColumn(i, "drugdd"));
  2468. ds_adnmstocorder.setColumn(nRow,"drugno", ds_main_narclist_narclist.getColumn(i, "drugno"));
  2469. ds_adnmstocorder.setColumn(nRow,"ioflag", ds_main_narclist_narclist.getColumn(i, "ioflag"));
  2470. ds_adnmstocorder.setColumn(nRow,"drugseqno", ds_main_narclist_narclist.getColumn(i, "drugseqno"));
  2471. ds_adnmstocorder.setColumn(nRow,"once_qty", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpqty")));
  2472. ds_adnmstocorder.setColumn(nRow,"ade_cnt", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcptims")));
  2473. ds_adnmstocorder.setColumn(nRow,"tot_dcnt", parseFloat(ds_main_narclist_narclist.getColumn(i, "prcpdayno")));
  2474. ds_adnmstocorder.setColumn(nRow,"sum_qy", parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty")));
  2475. if(!utlf_isNull(ds_main_narclist_narclist.getColumn(i, "spreqty"))) {
  2476. ds_adnmstocorder.setColumn(nRow,"spreqy", parseFloat(ds_main_narclist_narclist.getColumn(i, "spreqty")));
  2477. } else {
  2478. ds_adnmstocorder.setColumn(nRow,"spreqy", 0);
  2479. }
  2480. var Rrgstno = ds_main_prntlist_patinfo.getColumn(0, "rrgstno");
  2481. var psptno = ds_main_prntlist_patinfo.getColumn(0, "psptno");
  2482. // alert(Rrgstno.substr(7,7) );
  2483. if (Rrgstno.length == 14) {
  2484. var RRrgstno1 = Rrgstno.substr(0,6);
  2485. var RRrgstno2 = Rrgstno.substr(7,7);
  2486. var RRrgstnoall = RRrgstno1 + RRrgstno2
  2487. //ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '01');
  2488. if(!utlf_isRsrNo(RRrgstnoall)) {
  2489. if(utlf_isForegnResidentNo(RRrgstnoall)) {
  2490. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '02'); //외국인등록번호
  2491. } else {
  2492. if( (!utlf_isNull(psptno) && psptno != '-')) {
  2493. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '03');
  2494. RRrgstnoall = psptno;
  2495. } else {
  2496. if(utlf_getSex(RRrgstnoall) == "M") {
  2497. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '06'); //무명남
  2498. } else {
  2499. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '07'); //무명녀
  2500. }
  2501. }
  2502. }
  2503. } else {
  2504. ds_adnmstocorder.setColumn(nRow,"pat_id_no_ty_cd", '01'); //주민번호
  2505. }
  2506. ds_adnmstocorder.setColumn(nRow,"pat_id_no", RRrgstnoall );
  2507. }
  2508. ds_adnmstocorder.setColumn(nRow,"pid", ds_main_prntlist_patinfo.getColumn(0, "pid"));
  2509. ds_adnmstocorder.setColumn(nRow,"pat_nm", ds_main_prntlist_patinfo.getColumn(0, "patnm"));
  2510. ds_adnmstocorder.setColumn(nRow,"lcns_asort_cd", '1');
  2511. ds_adnmstocorder.setColumn(nRow,"lcns_no", ds_main_prntlist_patinfo.getColumn(0, "medispclid_licnsno"));
  2512. ds_adnmstocorder.setColumn(nRow,"prsc_doc_nm", ds_main_prntlist_patinfo.getColumn(0, "medispclidnm"));
  2513. ds_adnmstocorder.setColumn(nRow,"prsc_ord_no", ds_main_narclist_narclist.getColumn(i, "drugno"));
  2514. var Diagcnt = ds_main_prntlist_diaginfo.rowcount;
  2515. if ( Diagcnt > 0 ) {
  2516. var sDiss_code = ds_main_prntlist_diaginfo.getColumn(0, "diagcd1");
  2517. var tDiss_code = sDiss_code.indexOf(" ");
  2518. var stDiss_code = sDiss_code.substr(0, tDiss_code);
  2519. ds_adnmstocorder.setColumn(nRow,"diss_code", stDiss_code);
  2520. } else {
  2521. var sDiss_code = ds_main_prntlist_patinfo.getColumn(0, "diagcd");
  2522. var tDiss_code = sDiss_code.indexOf(".");
  2523. var stDiss_code = sDiss_code.substr(0, tDiss_code);
  2524. ds_adnmstocorder.setColumn(nRow,"diss_code", stDiss_code);
  2525. }
  2526. // trace(ds_adnmstocorder.saveXML());
  2527. /* dsf_makeValue(ds_adnmstocorder,"patnm","string", ds_main_narclist_narclist.getColumn(0, "patnm"),nRow ); */
  2528. }
  2529. }
  2530. ////건당계산
  2531. /////FCreflag Flag = 'Y'일경우 생성 즉 생성된 데이타는 안만듬
  2532. if ( FCreflag == "Y" ) {
  2533. but_ok.click();
  2534. }
  2535. }
  2536. } else if (ArSendFlag == "Rtn") {
  2537. but_ok.text = '반품승인'
  2538. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  2539. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  2540. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2541. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  2542. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  2543. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  2544. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2545. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  2546. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  2547. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  2548. var sPrcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2549. var sPrcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2550. var sRtndrurqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "returnqty")); //반환량
  2551. ds_send_selstoc.setColumn(0, "drugcd", "");
  2552. ds_send_selstoc.setColumn(0, "prcpno", "");
  2553. ds_send_selstoc.setColumn(0, "drugno", "");
  2554. ds_send_selstoc.setColumn(0, "pat_id_no", "");
  2555. ds_send_selstoc.setColumn(0, "seltype", "");
  2556. ds_send_selstoc.setColumn(0, "drugdd", "");
  2557. ds_send_selstoc.setColumn(0, "pid", "");
  2558. ds_send_selstoc.setColumn(0,"drugcd" , sPrcpcd );
  2559. ds_send_selstoc.setColumn(0,"prcpno" , Fprcpno );
  2560. ds_send_selstoc.setColumn(0,"drugdd" , Fdrugdd );
  2561. ds_send_selstoc.setColumn(0,"drugno" , Fdrugno );
  2562. ds_send_selstoc.setColumn(0,"pid" , Fpid );
  2563. ds_send_selstoc.setColumn(0,"seltype" , 'R' );
  2564. var oParam = {};
  2565. oParam.id = "TRADT12005";
  2566. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2567. oParam.method = "reqGetOrdSelList";
  2568. oParam.inds = "req=ds_send_selstoc";
  2569. oParam.outds = "ds_adnmstoclist=stocdata";
  2570. oParam.async = false;
  2571. tranf_submit(oParam);
  2572. if (ds_adnmstoclist.rowcount > 0 ) {
  2573. for(var k = 0; k < sRtndrurqty ; k++){
  2574. ///// RTNDD // RTNDT // RTNFG
  2575. var nRow = ds_adnmstocorder.addRow();
  2576. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k);
  2577. }
  2578. }else{
  2579. alert("해당코드는 불출되지 않아 반환데이타를 만들수 없습니다.!")
  2580. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2581. }
  2582. }
  2583. } else if (ArSendFlag == "Spre") {
  2584. but_ok.text = '잔량승인'
  2585. /// alert("sprefg");
  2586. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  2587. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  2588. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2589. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  2590. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  2591. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  2592. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2593. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  2594. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  2595. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  2596. var sPrcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2597. var sPrcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2598. var sSpreqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "spreqty")); //잔량
  2599. var sPrcptims = parseInt(ds_main_narclist_narclist.getColumn(i, "prcptims")); //횟수
  2600. // alert(sSpreqty) ;
  2601. if ( sSpreqty == 0 || utlf_isNull(sSpreqty)) {
  2602. alert("해당코드는 잔량데이타가 없습니다.!")
  2603. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2604. }else{
  2605. ds_send_selstoc.setColumn(0, "drugcd", "");
  2606. ds_send_selstoc.setColumn(0, "prcpno", "");
  2607. ds_send_selstoc.setColumn(0, "drugno", "");
  2608. ds_send_selstoc.setColumn(0, "pat_id_no", "");
  2609. ds_send_selstoc.setColumn(0, "seltype", "");
  2610. ds_send_selstoc.setColumn(0, "drugdd", "");
  2611. ds_send_selstoc.setColumn(0, "pid", "");
  2612. ds_send_selstoc.setColumn(0,"drugcd" , sPrcpcd );
  2613. ds_send_selstoc.setColumn(0,"prcpno" , Fprcpno );
  2614. ds_send_selstoc.setColumn(0,"drugdd" , Fdrugdd );
  2615. ds_send_selstoc.setColumn(0,"drugno" , Fdrugno );
  2616. ds_send_selstoc.setColumn(0,"pid" , Fpid );
  2617. ds_send_selstoc.setColumn(0,"seltype" , 'S' );
  2618. var oParam = {};
  2619. oParam.id = "TRADT12005";
  2620. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2621. oParam.method = "reqGetOrdSelList";
  2622. oParam.inds = "req=ds_send_selstoc";
  2623. oParam.outds = "ds_adnmstoclist=stocdata";
  2624. oParam.async = false;
  2625. tranf_submit(oParam);
  2626. if (ds_adnmstoclist.rowcount > 0 ) {
  2627. for(var k = 0; k < sPrcptims ; k++){
  2628. // alert(ds_adnmstoclist.getColumn(k, "sprefg");
  2629. ds_adnmstoclist.setColumn(k,"spreqy", sSpreqty);
  2630. var nRow = ds_adnmstocorder.addRow();
  2631. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k); ///sSpreqty
  2632. // ds_adnmstocorder.setColumn(k,"spreqy" , sSpreqty );
  2633. }
  2634. }else{
  2635. alert("해당코드는 불출되지 않아 잔량데이타를 만들수 없습니다.!")
  2636. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2637. }
  2638. }
  2639. }
  2640. }
  2641. }
  2642. function fSearchData() {
  2643. ds_adnmstocorder.clearData();
  2644. ds_adnmstocordermachi.clearData();
  2645. ds_adnmstoclistmachi_old.clearData();
  2646. ds_adnmstocmoveerr.clearData();
  2647. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  2648. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  2649. var Fpatnm = ds_main_narclist_narclist.getColumn(i, "patnm");
  2650. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  2651. var Fdrugcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2652. var Fprcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  2653. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  2654. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  2655. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  2656. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  2657. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  2658. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  2659. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  2660. var Fisdeptnm = ds_main_narclist_narclist.getColumn(i, "issdeptcdnm");
  2661. var Ftotdrugqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty")); // 처방코드명
  2662. ds_send_stoc.setColumn(0,"pid" , "" );
  2663. ds_send_stoc.setColumn(0,"drugcd" , "" );
  2664. ds_send_stoc.setColumn(0,"drugdd" , "" );
  2665. ds_send_stoc.setColumn(0,"prcpno" , "" );
  2666. ds_send_stoc.setColumn(0,"storge_no" , "" );
  2667. ds_send_stoc.setColumn(0,"boxflag" , "" );
  2668. ds_send_stoc.setColumn(0,"gtin" , "" );
  2669. ds_send_stoc.setColumn(0,"prd_valid_de", "" );
  2670. ds_send_stoc.setColumn(0,"mnf_no" , "" );
  2671. ds_send_stoc.setColumn(0,"mnf_seq" , "" );
  2672. ds_send_stoc.setColumn(0,"ioflag" , "" );
  2673. ds_send_stoc.setColumn(0,"workflag" , "" );
  2674. /////////////////////
  2675. ///부서별 저장소 및 이송유무 찾기
  2676. ////////////////////
  2677. ds_send_deptcd.clearData();
  2678. ds_send_deptcd.addRow();
  2679. ArMoveStorgno = "";
  2680. ArMoveflag = "N";
  2681. ds_send_deptcd.setColumn(0,"deptcd" , "" );
  2682. ds_send_deptcd.setColumn(0,"deptnm" , Fisdeptnm );
  2683. ds_send_deptcd.setColumn(0,"workflag" , "N" );
  2684. var oParam = {};
  2685. oParam.id = "TRADT12014";
  2686. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2687. oParam.method = "reqGetFindStorgno";
  2688. oParam.inds = "req=ds_send_deptcd";
  2689. oParam.outds = "ds_storge_no=storgno";
  2690. oParam.async = false;
  2691. tranf_submit(oParam);
  2692. if ( ds_storge_no.rowcount < 0 ) {
  2693. ArMoveflag = "N";
  2694. } else {
  2695. ArMoveflag = ds_storge_no.getColumn(0, "moveflag");
  2696. ArMoveStorgno = ds_storge_no.getColumn(0, "storge_no");
  2697. }
  2698. //////// 2018년 7월 9일 일반약품은 저장소 이동없음 김민주과 협의
  2699. if ( Ardesc == "일반"){
  2700. ArMoveflag == "N";
  2701. ArMoveStorgno == "";
  2702. }
  2703. /////////
  2704. ////////////////////////////
  2705. ds_send_prntinfo.setColumn(0,"pid" , Fpid );
  2706. ds_send_prntinfo.setColumn(0,"drugdd" , Fdrugdd );
  2707. ds_send_prntinfo.setColumn(0,"prcpdd" , Fprcpdd );
  2708. ds_send_prntinfo.setColumn(0,"orddd" , Forddd );
  2709. ds_send_prntinfo.setColumn(0,"drugno" , Fdrugno );
  2710. ds_send_prntinfo.setColumn(0,"prcpno" , Fprcpno );
  2711. ds_send_prntinfo.setColumn(0,"ioflag" , Fioflag );
  2712. ds_send_prntinfo.setColumn(0,"prcphistno" , Fprcphistno );
  2713. ds_send_prntinfo.setColumn(0,"drugseqno" , Fdrugseqno );
  2714. // alert(sPrcpcd);
  2715. ds_send_stoc.setColumn(0,"pid" , Fpid );
  2716. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  2717. ds_send_stoc.setColumn(0,"drugdd" , Fdrugdd );
  2718. ds_send_stoc.setColumn(0,"prcpno" , Fprcpno );
  2719. var oParam = {};
  2720. oParam.id = "TRADT12007";
  2721. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2722. oParam.method = "reqGetNarcStocOkList";
  2723. oParam.inds = "req=ds_send_stoc";
  2724. oParam.outds = "ds_adnmstoclist=stocdata";
  2725. oParam.async = false;
  2726. tranf_submit(oParam);
  2727. if ( ds_adnmstoclist.rowcount >= Ftotdrugqty ){
  2728. ds_main_narclist_narclist.setColumn(i,"sel" , "Y" );
  2729. }else{
  2730. ds_main_narclist_narclist.setColumn(i,"sel" , "N" );
  2731. }
  2732. for(var k = 0; k < ds_adnmstoclist.rowcount ; k++){
  2733. var nRow = ds_adnmstocorder.addRow();
  2734. ds_adnmstocorder.copyRow(nRow, ds_adnmstoclist, k);
  2735. }
  2736. if ( ArMoveflag == "Y" ) { /////Fisdeptnm == '마취회복실'
  2737. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  2738. ds_send_stoc.setColumn(0,"storge_no" , ArMoveStorgno );
  2739. ds_send_stoc.setColumn(0,"prcpno" , Fprcpno );
  2740. var oParam = {};
  2741. oParam.id = "TRADT12007";
  2742. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2743. oParam.method = "reqGetNarcStocOkList";
  2744. oParam.inds = "req=ds_send_stoc";
  2745. oParam.outds = "ds_adnmstoclistmachi=stocdata";
  2746. oParam.async = false;
  2747. tranf_submit(oParam);
  2748. for(var k = 0; k < ds_adnmstoclistmachi.rowcount ; k++){
  2749. var nRow = ds_adnmstocordermachi.addRow();
  2750. ds_adnmstocordermachi.copyRow(nRow, ds_adnmstoclistmachi, k);
  2751. }
  2752. ds_send_stoc.setColumn(0,"seltype" , 'O' );
  2753. var oParam = {};
  2754. oParam.id = "TRADT12001";
  2755. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2756. oParam.method = "reqGetNarcStocList";
  2757. oParam.inds = "req=ds_send_stoc";
  2758. oParam.outds = "ds_adnmstoclistmachi=stocdata";
  2759. oParam.async = false;
  2760. tranf_submit(oParam);
  2761. if ( ds_adnmstoclistmachi.rowcount > 0 ) {
  2762. for(var k = 0; k < ds_adnmstoclistmachi.rowcount ; k++){
  2763. var nRow = ds_adnmstoclistmachi_old.addRow();
  2764. ds_adnmstoclistmachi_old.copyRow(nRow, ds_adnmstoclistmachi, k);
  2765. }
  2766. }else{
  2767. var nRow = ds_adnmstocmoveerr.addRow();
  2768. ds_adnmstocmoveerr.setColumn(nRow,"pid" , Fpid );
  2769. ds_adnmstocmoveerr.setColumn(nRow,"drugdd" , Fdrugdd );
  2770. ds_adnmstocmoveerr.setColumn(nRow,"drugcd" , Fdrugcd );
  2771. ds_adnmstocmoveerr.setColumn(nRow,"drugno" , Fdrugno );
  2772. ds_adnmstocmoveerr.setColumn(nRow,"prcpno" , Fprcpno );
  2773. ds_adnmstocmoveerr.setColumn(nRow,"ioflag" , Fioflag );
  2774. ds_adnmstocmoveerr.setColumn(nRow,"patnm" , Fpatnm );
  2775. ds_adnmstocmoveerr.setColumn(nRow,"qty" , Ftotdrugqty );
  2776. }
  2777. }
  2778. }
  2779. ////////////////합계 만들기
  2780. ds_sumlist.clearData();
  2781. var Vcnt = 0;
  2782. var VCode = "";
  2783. for (var ss = 0; ss < ds_main_narclist_narclist.rowcount ; ss++){
  2784. var VCode = ds_main_narclist_narclist.getColumn(ss, "prcpcd"); // 처방코드명
  2785. if ( ss == 0 ) {
  2786. var sRow = ds_sumlist.addRow();
  2787. ds_sumlist.setColumn(sRow,"code", VCode);
  2788. } else {
  2789. var FCodeFlag = "Y" ;
  2790. var Sdacnt = ds_sumlist.rowcount ;
  2791. for (var se = 0; se < Sdacnt ; se++){
  2792. var VCodeSave = ds_sumlist.getColumn(se, "code"); // 처방코드명
  2793. if ( VCode == VCodeSave ) {
  2794. var FCodeFlag = "N";
  2795. break ;
  2796. }
  2797. }
  2798. if ( FCodeFlag == "Y" ) {
  2799. var nRow = ds_sumlist.addRow();
  2800. ds_sumlist.setColumn(nRow,"code", VCode);
  2801. }
  2802. }
  2803. }
  2804. for ( var sm = 0; sm < ds_sumlist.rowcount ; sm++ ){
  2805. var VSCode = ds_sumlist.getColumn(sm, "code"); // 처방코드명
  2806. // alert (VSCode )
  2807. //// 처방현황 조회
  2808. var VordSum = 0 ;
  2809. var Vorsqty = 0 ;
  2810. for (var sn = 0; sn < ds_main_narclist_narclist.rowcount ; sn++){
  2811. var VNCode = ds_main_narclist_narclist.getColumn(sn, "prcpcd"); // 처방코드명
  2812. var Vordqty = ds_main_narclist_narclist.getColumn(sn, "totdrugqty"); // 처방코드명
  2813. if ( VSCode == VNCode ) {
  2814. // alert (VSCode +" : " + VNCode+" : " + Vordqty)
  2815. VordSum = VordSum + Vordqty ;
  2816. }
  2817. }
  2818. //// 재고불출현황 조회
  2819. var VDrgSum = 0 ;
  2820. for (var sn = 0; sn < ds_adnmstocorder.rowcount ; sn++){
  2821. var VNCode = ds_adnmstocorder.getColumn(sn, "drugcd"); // 처방코드명
  2822. if ( VSCode == VNCode ) {
  2823. // alert (VSCode +" : " + VNCode+" : " + Vordqty)
  2824. VDrgSum = VDrgSum + 1 ;
  2825. }
  2826. }
  2827. ds_send_stoc.setColumn(0,"drugcd" , VSCode );
  2828. ds_send_stoc.setColumn(0,"seltype" , "S" );
  2829. ds_send_stoc.setColumn(0,"storge_no" , Arstorge_no );
  2830. var oParam = {};
  2831. oParam.id = "TRADT12002";
  2832. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2833. oParam.method = "reqGetNarcStocCodeList";
  2834. oParam.inds = "req=ds_send_stoc";
  2835. oParam.outds = "ds_adnmstoclist=stocdata";
  2836. oParam.async = false;
  2837. tranf_submit(oParam);
  2838. ds_sumlist.setColumn(sm,"order", VordSum);
  2839. ds_sumlist.setColumn(sm,"outsum", VDrgSum);
  2840. ds_sumlist.setColumn(sm,"jaegosum", ds_adnmstoclist.rowcount);
  2841. }
  2842. }
  2843. function But_View_onclick(obj:Button, e:ClickEventInfo)
  2844. {
  2845. fSearchData();
  2846. }
  2847. function but_ok_onclick(obj:Button, e:ClickEventInfo)
  2848. {
  2849. ///조회 조건에 따라
  2850. if (ArSendFlag == "Prcp") {
  2851. //alert(ds_adnmstocorder.rowcount);
  2852. for(var q = 0; q < ds_adnmstocorder.rowcount ; q++){
  2853. var sFnshfg = ds_adnmstocorder.getColumn(q, "fnshfg");
  2854. var sInstcd = ds_adnmstocorder.getColumn(q, "instcd");
  2855. var sInfg = ds_adnmstocorder.getColumn(q, "infg");
  2856. var sHistno = ds_adnmstocorder.getColumn(q, "histno");
  2857. var sGtin = ds_adnmstocorder.getColumn(q, "gtin");
  2858. var sPrd_valid_de = ds_adnmstocorder.getColumn(q, "prd_valid_de");
  2859. var sMnf_no = ds_adnmstocorder.getColumn(q, "mnf_no");
  2860. var sMnf_seq = ds_adnmstocorder.getColumn(q, "mnf_seq");
  2861. var sSeq = ds_adnmstocorder.getColumn(q, "seq");
  2862. var sPrcpno = ds_adnmstocorder.getColumn(q, "prcpno");
  2863. var sDrugdd = ds_adnmstocorder.getColumn(q, "drugdd");
  2864. var sDrugno = ds_adnmstocorder.getColumn(q, "drugno");
  2865. var sIoflag = ds_adnmstocorder.getColumn(q, "ioflag");
  2866. var sDrugseqno = ds_adnmstocorder.getColumn(q, "drugseqno");
  2867. var sOnce_qty = parseFloat(ds_adnmstocorder.getColumn(q, "once_qty"));
  2868. var sAde_cnt = parseFloat(ds_adnmstocorder.getColumn(q, "ade_cnt"));
  2869. var sTot_dcnt = parseFloat(ds_adnmstocorder.getColumn(q, "tot_dcnt"));
  2870. var sSum_qy = parseFloat(ds_adnmstocorder.getColumn(q, "sum_qy"));
  2871. var sSpreqy = parseFloat(ds_adnmstocorder.getColumn(q, "spreqy"));
  2872. var sPat_id_no_ty_cd = ds_adnmstocorder.getColumn(q, "pat_id_no_ty_cd");
  2873. var sPat_id_no = ds_adnmstocorder.getColumn(q, "pat_id_no");
  2874. var sPid = ds_adnmstocorder.getColumn(q, "pid");
  2875. var sPat_nm = ds_adnmstocorder.getColumn(q, "pat_nm");
  2876. var sLcns_no = ds_adnmstocorder.getColumn(q, "lcns_no");
  2877. var sPrsc_doc_nm = ds_adnmstocorder.getColumn(q, "prsc_doc_nm");
  2878. var sPrsc_ord_no = ds_adnmstocorder.getColumn(q, "prsc_ord_no");
  2879. var sDiss_code = ds_adnmstocorder.getColumn(q, "diss_code");
  2880. //trace(ds_sendstocupdata.saveXML());
  2881. if ( sFnshfg == '1' ) {
  2882. //alert("이미 등록된 데이타 등록하지 않습니다.!")
  2883. } else {
  2884. ds_sendstocupdata.clearData();
  2885. ds_sendstocupdata.addRow();
  2886. ds_sendstocupdata.setColumn(0,"instcd" , sInstcd );
  2887. ds_sendstocupdata.setColumn(0,"infg" , sInfg );
  2888. ds_sendstocupdata.setColumn(0,"histno" , sHistno );
  2889. ds_sendstocupdata.setColumn(0,"gtin" , sGtin );
  2890. ds_sendstocupdata.setColumn(0,"prd_valid_de" , sPrd_valid_de );
  2891. ds_sendstocupdata.setColumn(0,"mnf_no" , sMnf_no );
  2892. ds_sendstocupdata.setColumn(0,"mnf_seq" , sMnf_seq );
  2893. ds_sendstocupdata.setColumn(0,"seq" , sSeq);
  2894. ds_sendstocupdata.setColumn(0,"prcpno" , sPrcpno );
  2895. ds_sendstocupdata.setColumn(0,"drugdd" , sDrugdd );
  2896. ds_sendstocupdata.setColumn(0,"drugno" , sDrugno);
  2897. ds_sendstocupdata.setColumn(0,"ioflag" , sIoflag);
  2898. ds_sendstocupdata.setColumn(0,"drugseqno" , sDrugseqno );
  2899. ds_sendstocupdata.setColumn(0,"pat_id_no_ty_cd" , utlf_isNull(sPat_id_no_ty_cd) ? "01" : sPat_id_no_ty_cd); /// 01. 주민번호
  2900. ds_sendstocupdata.setColumn(0,"pat_id_no" , sPat_id_no );
  2901. ds_sendstocupdata.setColumn(0,"pat_nm" , sPat_nm );
  2902. ds_sendstocupdata.setColumn(0,"lcns_asort_cd" , "1" ); //// 1.의사
  2903. ds_sendstocupdata.setColumn(0,"lcns_no" , sLcns_no );
  2904. ds_sendstocupdata.setColumn(0,"prsc_doc_nm" , sPrsc_doc_nm );
  2905. ds_sendstocupdata.setColumn(0,"prsc_ord_no" , sDrugno );
  2906. ds_sendstocupdata.setColumn(0,"diss_code" , sDiss_code );
  2907. ds_sendstocupdata.setColumn(0,"once_qy" , sOnce_qty );
  2908. ds_sendstocupdata.setColumn(0,"ade_cnt" , sAde_cnt);
  2909. ds_sendstocupdata.setColumn(0,"tot_dcnt" , sTot_dcnt );
  2910. ds_sendstocupdata.setColumn(0,"sum_qy" , sSum_qy );
  2911. ds_sendstocupdata.setColumn(0,"pid" , sPid );
  2912. ds_sendstocupdata.setColumn(0,"spreqy" , sSpreqy );
  2913. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "I" );
  2914. var oParam = {};
  2915. oParam.id = "TXADT12001";
  2916. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2917. oParam.method = "reqGetStocUpData";
  2918. oParam.inds = "req=ds_sendstocupdata";
  2919. //oParam.outds = "ds_adnmstoclist=stocdata";
  2920. oParam.async = false;
  2921. tranf_submit(oParam);
  2922. }
  2923. }
  2924. //////////////
  2925. for(var q = 0; q < ds_adnmstocordermachi.rowcount ; q++){
  2926. var smFnshfg = ds_adnmstocordermachi.getColumn(q, "fnshfg");
  2927. var smInstcd = ds_adnmstocordermachi.getColumn(q, "instcd");
  2928. var smInfg = ds_adnmstocordermachi.getColumn(q, "infg");
  2929. var smHistno = ds_adnmstocordermachi.getColumn(q, "histno");
  2930. var smGtin = ds_adnmstocordermachi.getColumn(q, "gtin");
  2931. var smPrd_valid_de = ds_adnmstocordermachi.getColumn(q, "prd_valid_de");
  2932. var smMnf_no = ds_adnmstocordermachi.getColumn(q, "mnf_no");
  2933. var smMnf_seq = ds_adnmstocordermachi.getColumn(q, "mnf_seq");
  2934. var smSeq = ds_adnmstocordermachi.getColumn(q, "seq");
  2935. var smStorge_no = ds_adnmstocordermachi.getColumn(q, "storge_no");
  2936. var smMovestorge_no= ds_adnmstocordermachi.getColumn(q, "ar_storge_no");
  2937. //trace(ds_sendstocupdata.saveXML());
  2938. if ( sFnshfg == '1' ) {
  2939. // alert("이미 등록된 데이타 등록하지 않습니다.!")
  2940. } else {
  2941. ds_sendstocupdata.clearData();
  2942. ds_sendstocupdata.addRow();
  2943. ds_sendstocupdata.setColumn(0,"instcd" , smInstcd );
  2944. ds_sendstocupdata.setColumn(0,"infg" , smInfg );
  2945. ds_sendstocupdata.setColumn(0,"histno" , smHistno );
  2946. ds_sendstocupdata.setColumn(0,"gtin" , smGtin );
  2947. ds_sendstocupdata.setColumn(0,"prd_valid_de" , smPrd_valid_de );
  2948. ds_sendstocupdata.setColumn(0,"mnf_no" , smMnf_no );
  2949. ds_sendstocupdata.setColumn(0,"mnf_seq" , smMnf_seq );
  2950. ds_sendstocupdata.setColumn(0,"seq" , smSeq);
  2951. ds_sendstocupdata.setColumn(0,"storge_no" , smStorge_no);
  2952. ds_sendstocupdata.setColumn(0,"out_storge_no" , smMovestorge_no);
  2953. ds_sendstocupdata.setColumn(0,"new_storge_no" , smMovestorge_no);
  2954. //trace(sPrcpno) ;
  2955. ds_sendstocupdata.setColumn(0,"in_prcpno" , sPrcpno);
  2956. ds_sendstocupdata.setColumn(0,"in_drugno" , sDrugno);
  2957. ds_sendstocupdata.setColumn(0,"in_drugdd" , sDrugdd);
  2958. ds_sendstocupdata.setColumn(0,"in_ioflag" , sIoflag);
  2959. ds_sendstocupdata.setColumn(0,"in_pid" , sPid);
  2960. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "I" );
  2961. //trace(ds_sendstocupdata.saveXML());
  2962. var oParam = {};
  2963. oParam.id = "TXADT12002";
  2964. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2965. oParam.method = "reqGetStocCreate";
  2966. oParam.inds = "req=ds_sendstocupdata";
  2967. //oParam.outds = "ds_adnmstoclist=stocdata";
  2968. oParam.async = false;
  2969. tranf_submit(oParam);
  2970. ds_sendstocupdata.setColumn(0,"ordtype" , "M");
  2971. //trace(ds_sendstocupdata.saveXML());
  2972. var oParam = {};
  2973. oParam.id = "TXADT12001";
  2974. oParam.service = "pharmacydrugsumapp.NarcManagent";
  2975. oParam.method = "reqGetStocUpData";
  2976. oParam.inds = "req=ds_sendstocupdata";
  2977. //oParam.outds = "ds_adnmstoclist=stocdata";
  2978. oParam.async = false;
  2979. tranf_submit(oParam);
  2980. }
  2981. }
  2982. //////////////
  2983. } else if (ArSendFlag == "Rtn") {
  2984. for(var q = 0; q < ds_adnmstocorder.rowcount ; q++){
  2985. var Sseq = q + 1;
  2986. var sPid = ds_adnmstocorder.getColumn(q, "pid");
  2987. var sPat_nm = ds_adnmstocorder.getColumn(q, "pat_nm");
  2988. var sDrugno = ds_adnmstocorder.getColumn(q, "drugno");
  2989. var sDrugcd = ds_adnmstocorder.getColumn(q, "drugcd");
  2990. var sFnshfg = ds_adnmstocorder.getColumn(q, "rtnfg");
  2991. var sInstcd = ds_adnmstocorder.getColumn(q, "instcd");
  2992. var sInfg = ds_adnmstocorder.getColumn(q, "infg");
  2993. var sHistno = ds_adnmstocorder.getColumn(q, "histno");
  2994. var sGtin = ds_adnmstocorder.getColumn(q, "gtin");
  2995. var sPrd_valid_de = ds_adnmstocorder.getColumn(q, "prd_valid_de");
  2996. var sMnf_no = ds_adnmstocorder.getColumn(q, "mnf_no");
  2997. var sMnf_seq = ds_adnmstocorder.getColumn(q, "mnf_seq");
  2998. var sSeq = ds_adnmstocorder.getColumn(q, "seq");
  2999. //trace(ds_sendstocupdata.saveXML());
  3000. if ( sFnshfg == '1' ) {
  3001. alert(Sseq+ "번 Row 환자"+ sPid +"("+sPat_nm +") 투약번호:"+sDrugno +" 의 처방("+ sDrugcd + ")은 이미 반환승인되었습니다.!")
  3002. } else {
  3003. ds_sendstocupdata.clearData();
  3004. ds_sendstocupdata.addRow();
  3005. ds_sendstocupdata.setColumn(0,"instcd" , sInstcd );
  3006. ds_sendstocupdata.setColumn(0,"infg" , sInfg );
  3007. ds_sendstocupdata.setColumn(0,"histno" , sHistno );
  3008. ds_sendstocupdata.setColumn(0,"gtin" , sGtin );
  3009. ds_sendstocupdata.setColumn(0,"prd_valid_de" , sPrd_valid_de );
  3010. ds_sendstocupdata.setColumn(0,"mnf_no" , sMnf_no );
  3011. ds_sendstocupdata.setColumn(0,"mnf_seq" , sMnf_seq );
  3012. ds_sendstocupdata.setColumn(0,"seq" , sSeq);
  3013. ds_sendstocupdata.setColumn(0,"storge_no" , Arstorge_no);
  3014. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "R" );
  3015. var oParam = {};
  3016. oParam.id = "TXADT12001";
  3017. oParam.service = "pharmacydrugsumapp.NarcManagent";
  3018. oParam.method = "reqGetStocUpData";
  3019. oParam.inds = "req=ds_sendstocupdata";
  3020. //oParam.outds = "ds_adnmstoclist=stocdata";
  3021. oParam.async = false;
  3022. tranf_submit(oParam);
  3023. var oParam = {};
  3024. oParam.id = "TXADT12003";
  3025. oParam.service = "pharmacydrugsumapp.NarcManagent";
  3026. oParam.method = "reqGetStocMove";
  3027. oParam.inds = "req=ds_sendstocupdata";
  3028. //oParam.outds = "ds_adnmstoclist=stocdata";
  3029. oParam.async = false;
  3030. tranf_submit(oParam);
  3031. }
  3032. }
  3033. fInit();
  3034. } else if (ArSendFlag == "Spre") {
  3035. for(var q = 0; q < ds_adnmstocorder.rowcount ; q++){
  3036. var Sseq = q + 1;
  3037. var sPid = ds_adnmstocorder.getColumn(q, "pid");
  3038. var sPat_nm = ds_adnmstocorder.getColumn(q, "pat_nm");
  3039. var sDrugno = ds_adnmstocorder.getColumn(q, "drugno");
  3040. var sDrugcd = ds_adnmstocorder.getColumn(q, "drugcd");
  3041. var sFnshfg = ds_adnmstocorder.getColumn(q, "sprefg");
  3042. var sInstcd = ds_adnmstocorder.getColumn(q, "instcd");
  3043. var sInfg = ds_adnmstocorder.getColumn(q, "infg");
  3044. var sHistno = ds_adnmstocorder.getColumn(q, "histno");
  3045. var sGtin = ds_adnmstocorder.getColumn(q, "gtin");
  3046. var sPrd_valid_de = ds_adnmstocorder.getColumn(q, "prd_valid_de");
  3047. var sMnf_no = ds_adnmstocorder.getColumn(q, "mnf_no");
  3048. var sMnf_seq = ds_adnmstocorder.getColumn(q, "mnf_seq");
  3049. var sSeq = ds_adnmstocorder.getColumn(q, "seq");
  3050. var sSpreqy = parseFloat(ds_adnmstocorder.getColumn(q, "spreqy"));
  3051. //trace(ds_sendstocupdata.saveXML());
  3052. if ( sFnshfg == '1' ) {
  3053. alert(Sseq+ "번 Row 환자"+ sPid +"("+sPat_nm +") 투약번호:"+sDrugno +" 의 처방("+ sDrugcd + ")은 이미 잔량승인되었습니다.!")
  3054. } else {
  3055. ds_sendstocupdata.clearData();
  3056. ds_sendstocupdata.addRow();
  3057. ds_sendstocupdata.setColumn(0,"instcd" , sInstcd );
  3058. ds_sendstocupdata.setColumn(0,"infg" , sInfg );
  3059. ds_sendstocupdata.setColumn(0,"histno" , sHistno );
  3060. ds_sendstocupdata.setColumn(0,"gtin" , sGtin );
  3061. ds_sendstocupdata.setColumn(0,"prd_valid_de" , sPrd_valid_de );
  3062. ds_sendstocupdata.setColumn(0,"mnf_no" , sMnf_no );
  3063. ds_sendstocupdata.setColumn(0,"mnf_seq" , sMnf_seq );
  3064. ds_sendstocupdata.setColumn(0,"seq" , sSeq);
  3065. ds_sendstocupdata.setColumn(0,"spreqy" , sSpreqy);
  3066. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "S" );
  3067. var oParam = {};
  3068. oParam.id = "TXADT12001";
  3069. oParam.service = "pharmacydrugsumapp.NarcManagent";
  3070. oParam.method = "reqGetStocUpData";
  3071. oParam.inds = "req=ds_sendstocupdata";
  3072. //oParam.outds = "ds_adnmstoclist=stocdata";
  3073. oParam.async = false;
  3074. tranf_submit(oParam);
  3075. }
  3076. }
  3077. fInit();
  3078. }
  3079. }
  3080. function Button00_onclick(obj:Button, e:ClickEventInfo)
  3081. {
  3082. this.close();
  3083. }
  3084. function grd_narclist01_onheadclick(obj:Grid, e:GridClickEventInfo)
  3085. {
  3086. // obj.enableevent = false;
  3087. // if(e.col == 1) fn_chkAll(obj);
  3088. // obj.enableevent = true;
  3089. }
  3090. /******************************************************************
  3091. * Argument : fn_chkAll(obj)
  3092. * Description : head checkbox click event
  3093. ******************************************************************/
  3094. function fn_chkAll(obj){
  3095. if( obj.getCellProperty("Head", 1, "displaytype") == "checkbox"){
  3096. if( utlf_isNull(obj.getCellProperty("Head", 1, "text")) ){
  3097. obj.setCellProperty("Head", 1, "text","expr:1");
  3098. for( var i = 0; i < ds_adnmstocorder.rowcount; i++ ){
  3099. var narcstat = ds_adnmstocorder.getColumn(i, "flag");
  3100. if( narcstat == "1"){
  3101. ds_adnmstocorder.setColumn(i, "flag", "0");
  3102. } else {
  3103. ds_adnmstocorder.setColumn(i, "flag", "1");
  3104. }
  3105. }
  3106. } else {
  3107. obj.setCellProperty("Head", 1, "text", "");
  3108. for( var i = 0; i < ds_adnmstocorder.rowcount; i++ ){
  3109. ds_adnmstocorder.setColumn(i, "flag", "0");
  3110. }
  3111. }
  3112. }
  3113. }
  3114. function But_BatcodePrt_onclick(obj:Button, e:ClickEventInfo)
  3115. {
  3116. for(var qq = 0; qq < ds_adnmstocorder.rowcount ; qq++){
  3117. var SFlag = ds_adnmstocorder.getColumn(qq, "flag");
  3118. if ( SFlag == '1'){
  3119. ds_mainprtdata.clearData();
  3120. FrFindflag = "N";
  3121. var Spid = ds_adnmstocorder.getColumn(qq, "pid");
  3122. var Spatnm = ds_adnmstocorder.getColumn(qq, "pat_nm");
  3123. var Sdrugcd = ds_adnmstocorder.getColumn(qq, "drugcd");
  3124. ////////////// 명칭 찾기
  3125. for(var ww = 0; ww < ds_main_narclist_narclist.rowcount ; ww++){
  3126. if (FrFindflag == "N") {
  3127. var Fdrugcd = ds_main_narclist_narclist.getColumn(ww, "prcpcd");
  3128. if (Sdrugcd == Fdrugcd) {
  3129. var Sdrugnm = ds_main_narclist_narclist.getColumn(ww, "drugnm");
  3130. // alert(Sdrugnm);
  3131. FrFindflag = "Y" ;
  3132. }
  3133. }
  3134. }
  3135. var Sdrugno = ds_adnmstocorder.getColumn(qq, "drugno");
  3136. var Sdrugdd = ds_adnmstocorder.getColumn(qq, "drugdd");
  3137. var Sstorge_no = ds_adnmstocorder.getColumn(qq, "storge_no");
  3138. var Slabelno = ds_adnmstocorder.getColumn(qq, "labelno");
  3139. var Sprd_valid_de = ds_adnmstocorder.getColumn(qq, "prd_valid_de");
  3140. var Smnf_no = ds_adnmstocorder.getColumn(qq, "mnf_no");
  3141. var Smnf_seq = ds_adnmstocorder.getColumn(qq, "mnf_seq");
  3142. var Sseq = ds_adnmstocorder.getColumn(qq, "seq");
  3143. dsf_makeValue(ds_mainprtdata,"pid","string", Spid );
  3144. dsf_makeValue(ds_mainprtdata,"patnm","string", Spatnm );
  3145. dsf_makeValue(ds_mainprtdata,"drugcd","string", Sdrugcd );
  3146. dsf_makeValue(ds_mainprtdata,"drugnm","string", Sdrugnm );
  3147. dsf_makeValue(ds_mainprtdata,"drugno","string", Sdrugno );
  3148. dsf_makeValue(ds_mainprtdata,"drugdd","string", Sdrugdd );
  3149. dsf_makeValue(ds_mainprtdata,"storge_no","string", Sstorge_no );
  3150. dsf_makeValue(ds_mainprtdata,"labelno","string", Slabelno );
  3151. dsf_makeValue(ds_mainprtdata,"prd_valid_de","string", Sprd_valid_de );
  3152. dsf_makeValue(ds_mainprtdata,"mnf_no","string", Smnf_no );
  3153. dsf_makeValue(ds_mainprtdata,"mnf_seq","string", Smnf_seq );
  3154. dsf_makeValue(ds_mainprtdata,"seq","string", Sseq );
  3155. var posx = "";
  3156. var posy = "";
  3157. var printnm = "";
  3158. var objDOM = rptf_createDOM(); // DOM 객체 설정
  3159. rptf_setNodeListToDOM(objDOM, "/root/main/prtdata", ds_mainprtdata); // 데이터셋 1
  3160. var objParam = new Object();
  3161. objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  3162. var option = "open=0;save=0;directprint=1;printdialog=0;print=0;zoom=0;";
  3163. rptf_exeReportPreview30(["RFADT12004"],[objParam], option);
  3164. }
  3165. }
  3166. }
  3167. function But_ReCreat_onclick(obj:Button, e:ClickEventInfo)
  3168. {
  3169. for(var i = 0; i < ds_main_narclist_narclist.rowcount ; i++){
  3170. ds_adnmstocorder.clearData();
  3171. ds_adnmstocordermove.clearData();
  3172. ds_adnmstocordermachi.clearData();
  3173. var Fpid = ds_main_narclist_narclist.getColumn(i, "pid");
  3174. var Fpatnm = ds_main_narclist_narclist.getColumn(i, "patnm");
  3175. var Fdrugdd = ds_main_narclist_narclist.getColumn(i, "drugdd");
  3176. var Fdrugcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  3177. var Fprcpcd = ds_main_narclist_narclist.getColumn(i, "prcpcd");
  3178. var Fprcpdd = ds_main_narclist_narclist.getColumn(i, "prcpdd");
  3179. var Forddd = ds_main_narclist_narclist.getColumn(i, "orddd");
  3180. var Fdrugno = ds_main_narclist_narclist.getColumn(i, "drugno");
  3181. var Fprcpno = ds_main_narclist_narclist.getColumn(i, "prcpno");
  3182. var Fioflag = ds_main_narclist_narclist.getColumn(i, "ioflag");
  3183. var Fprcphistno = ds_main_narclist_narclist.getColumn(i, "prcphistno");
  3184. var Fdrugseqno = ds_main_narclist_narclist.getColumn(i, "drugseqno");
  3185. var Fisdeptnm = ds_main_narclist_narclist.getColumn(i, "issdeptcdnm");
  3186. var Ftotdrugqty = parseFloat(ds_main_narclist_narclist.getColumn(i, "totdrugqty")); // 처방코드명
  3187. ds_send_stoc.setColumn(0,"pid" , "" );
  3188. ds_send_stoc.setColumn(0,"drugcd" , "" );
  3189. ds_send_stoc.setColumn(0,"drugdd" , "" );
  3190. ds_send_stoc.setColumn(0,"prcpno" , "" );
  3191. ds_send_stoc.setColumn(0,"storge_no" , "" );
  3192. ds_send_stoc.setColumn(0,"boxflag" , "" );
  3193. ds_send_stoc.setColumn(0,"gtin" , "" );
  3194. ds_send_stoc.setColumn(0,"prd_valid_de", "" );
  3195. ds_send_stoc.setColumn(0,"mnf_no" , "" );
  3196. ds_send_stoc.setColumn(0,"mnf_seq" , "" );
  3197. ds_send_stoc.setColumn(0,"ioflag" , "" );
  3198. ds_send_stoc.setColumn(0,"workflag" , "" );
  3199. /////////////////////
  3200. ///부서별 저장소 및 이송유무 찾기
  3201. ////////////////////
  3202. ds_send_deptcd.clearData();
  3203. ds_send_deptcd.addRow();
  3204. ArMoveStorgno = "";
  3205. ArMoveflag = "N";
  3206. ds_send_deptcd.setColumn(0,"deptcd" , "" );
  3207. ds_send_deptcd.setColumn(0,"deptnm" , Fisdeptnm );
  3208. ds_send_deptcd.setColumn(0,"workflag" , "N" );
  3209. var oParam = {};
  3210. oParam.id = "TRADT12014";
  3211. oParam.service = "pharmacydrugsumapp.NarcManagent";
  3212. oParam.method = "reqGetFindStorgno";
  3213. oParam.inds = "req=ds_send_deptcd";
  3214. oParam.outds = "ds_storge_no=storgno";
  3215. oParam.async = false;
  3216. tranf_submit(oParam);
  3217. if ( ds_storge_no.rowcount < 0 ) {
  3218. ArMoveflag = "N";
  3219. } else {
  3220. ArMoveflag = ds_storge_no.getColumn(0, "moveflag");
  3221. ArMoveStorgno = ds_storge_no.getColumn(0, "storge_no");
  3222. }
  3223. //////// 2018년 7월 9일 일반약품은 저장소 이동없음 김민주과 협의
  3224. if ( Ardesc == "일반"){
  3225. ArMoveflag == "N";
  3226. ArMoveStorgno == "";
  3227. }
  3228. /////////
  3229. ////////////////////////////
  3230. //////등록된 데이타 찾기
  3231. ds_send_stoc.setColumn(0,"pid" , Fpid );
  3232. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  3233. ds_send_stoc.setColumn(0,"drugdd" , Fdrugdd );
  3234. ds_send_stoc.setColumn(0,"prcpno" , Fprcpno );
  3235. ds_send_stoc.setColumn(0,"drugno" , Fdrugno );
  3236. ds_send_stoc.setColumn(0,"ioflag" , Fioflag );
  3237. ds_send_stoc.setColumn(0,"workflag" , "OK" );
  3238. var oParam = {};
  3239. oParam.id = "TRADT12007";
  3240. oParam.service = "pharmacydrugsumapp.NarcManagent";
  3241. oParam.method = "reqGetNarcStocOkList";
  3242. oParam.inds = "req=ds_send_stoc";
  3243. oParam.outds = "ds_adnmstoclist=stocdata";
  3244. oParam.async = false;
  3245. tranf_submit(oParam);
  3246. var Fokcnt = ds_adnmstoclist.rowcount ;
  3247. var Fmoveokflag = "N";
  3248. var Fmovecnt = 0;
  3249. if ( Ftotdrugqty > Fokcnt ) {
  3250. Fmoveokflag = "Y";
  3251. Fmovecnt = Ftotdrugqty - Fokcnt;
  3252. }
  3253. //////해당 저장소에 해당물건 찾기
  3254. ds_send_stoc.setColumn(0,"drugcd" , Fprcpcd );
  3255. ds_send_stoc.setColumn(0,"storge_no" , Arstorge_no );
  3256. ds_send_stoc.setColumn(0,"seltype" , "S" );
  3257. var oParam = {};
  3258. oParam.id = "TRADT12001";
  3259. oParam.service = "pharmacydrugsumapp.NarcManagent";
  3260. oParam.method = "reqGetNarcStocList";
  3261. oParam.inds = "req=ds_send_stoc";
  3262. oParam.outds = "ds_adnmstoclistmove=stocdata";
  3263. oParam.async = false;
  3264. tranf_submit(oParam);
  3265. if ( ArMoveflag == "Y" && Fmoveokflag == "Y" ) {
  3266. for(var k = 0 ; k < Fmovecnt ; k++){
  3267. var nRow = ds_adnmstocordermove.addRow();
  3268. ds_adnmstocordermove.copyRow(nRow, ds_adnmstoclistmove, k);
  3269. ds_adnmstocordermove.setColumn(nRow,"ar_storge_no" , ArMoveStorgno );
  3270. }
  3271. }
  3272. for(var q = 0; q < ds_adnmstocordermove.rowcount ; q++){
  3273. var smFnshfg = ds_adnmstocordermove.getColumn(q, "fnshfg");
  3274. var smInstcd = ds_adnmstocordermove.getColumn(q, "instcd");
  3275. var smInfg = ds_adnmstocordermove.getColumn(q, "infg");
  3276. var smHistno = ds_adnmstocordermove.getColumn(q, "histno");
  3277. var smGtin = ds_adnmstocordermove.getColumn(q, "gtin");
  3278. var smPrd_valid_de = ds_adnmstocordermove.getColumn(q,"prd_valid_de");
  3279. var smMnf_no = ds_adnmstocordermove.getColumn(q, "mnf_no");
  3280. var smMnf_seq = ds_adnmstocordermove.getColumn(q, "mnf_seq");
  3281. var smSeq = ds_adnmstocordermove.getColumn(q, "seq");
  3282. var smStorge_no = ds_adnmstocordermove.getColumn(q, "storge_no");
  3283. var smMoveStorge_no= ds_adnmstocordermove.getColumn(q,"ar_storge_no");
  3284. ds_sendstocupdata.clearData();
  3285. ds_sendstocupdata.addRow();
  3286. ds_sendstocupdata.setColumn(0,"instcd" , smInstcd );
  3287. ds_sendstocupdata.setColumn(0,"infg" , smInfg );
  3288. ds_sendstocupdata.setColumn(0,"histno" , smHistno );
  3289. ds_sendstocupdata.setColumn(0,"gtin" , smGtin );
  3290. ds_sendstocupdata.setColumn(0,"prd_valid_de" , smPrd_valid_de );
  3291. ds_sendstocupdata.setColumn(0,"mnf_no" , smMnf_no );
  3292. ds_sendstocupdata.setColumn(0,"mnf_seq" , smMnf_seq );
  3293. ds_sendstocupdata.setColumn(0,"seq" , smSeq);
  3294. ds_sendstocupdata.setColumn(0,"storge_no" , smStorge_no);
  3295. ds_sendstocupdata.setColumn(0,"out_storge_no" , smMoveStorge_no);
  3296. ds_sendstocupdata.setColumn(0,"new_storge_no" , smMoveStorge_no);
  3297. //trace(sPrcpno)
  3298. ds_sendstocupdata.setColumn(0,"in_prcpno" , Fprcpno);
  3299. ds_sendstocupdata.setColumn(0,"in_drugno" , Fdrugno);
  3300. ds_sendstocupdata.setColumn(0,"in_drugdd" , Fdrugdd);
  3301. ds_sendstocupdata.setColumn(0,"in_ioflag" , Fioflag);
  3302. ds_sendstocupdata.setColumn(0,"in_pid" , Fpid);
  3303. dsf_makeValue(ds_sendstocupdata,"ordtype","string", "I" );
  3304. //trace(ds_sendstocupdata.saveXML());
  3305. var oParam = {};
  3306. oParam.id = "TXADT12002";
  3307. oParam.service = "pharmacydrugsumapp.NarcManagent";
  3308. oParam.method = "reqGetStocCreate";
  3309. oParam.inds = "req=ds_sendstocupdata";
  3310. //oParam.outds = "ds_adnmstoclist=stocdata";
  3311. oParam.async = false;
  3312. tranf_submit(oParam);
  3313. ds_sendstocupdata.setColumn(0,"ordtype" , "M");
  3314. //trace(ds_sendstocupdata.saveXML());
  3315. var oParam = {};
  3316. oParam.id = "TXADT12001";
  3317. oParam.service = "pharmacydrugsumapp.NarcManagent";
  3318. oParam.method = "reqGetStocUpData";
  3319. oParam.inds = "req=ds_sendstocupdata";
  3320. //oParam.outds = "ds_adnmstoclist=stocdata";
  3321. oParam.async = false;
  3322. tranf_submit(oParam);
  3323. }
  3324. }
  3325. }
  3326. ]]></Script>
  3327. </Form>
  3328. </FDL>