FrmFilpOutStorage.xml 137 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "倒运出库管理">
  3. <query id = "FrmFilpOutStorage.doQueryData" desc = "查询库存数据">
  4. SELECT (SELECT T2.BASENAME
  5. FROM COM_BASE_INFO T2
  6. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  7. (SELECT T1.BASENAME
  8. FROM COM_BASE_INFO T1
  9. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  10. T.MAT_STATUS AS MAT_STATUS_CODE,
  11. T.LOT_NO,
  12. T.STOVE_NO,
  13. T.JUDGE_STOVE_NO,
  14. T.BATCH_NO,
  15. T.BATCH_GROUD_NO,
  16. MAX(T.MATERIAL_NO) MATERIAL_NO,
  17. MAX(T.MATERIAL_NAME) MATERIAL_NAME,
  18. MAX(T.PRODUCCODE) PRODUCCODE,
  19. MAX(T.PRODUCNAME) PRODUCNAME,
  20. MAX(T.STEELCODE) STEELCODE,
  21. MAX(T.STEELNAME) STEELNAME,
  22. MAX(T.GRADECODE) GRADECODE,
  23. MAX(T.GRADENAME) GRADENAME,
  24. MAX(T.SPEC_CODE) SPEC_CODE,
  25. MAX(T.SPEC_NAME) SPEC_NAME,
  26. MAX(T.MODEL_CODE) MODEL_CODE,
  27. MAX(T.MODEL_DESC) MODEL_DESC,
  28. --MAX(T.STD_CODE)STD_CODE,
  29. --MAX(T.STD_NAME)STD_NAME,
  30. MAX(T.STD_STYLE) STD_STYLE,
  31. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  32. MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
  33. MAX(T.PROCESS_CDOE) PROCESS_CDOE,
  34. MAX(T.PROCESS_DESC) PROCESS_DESC,
  35. T.NEXT_PROCESS_CDOE,
  36. T.NEXT_PROCESS_DESC,
  37. T.PLINE_CODE,
  38. T.PLINE_NAME,
  39. MAX(T.ACT_DIMATER) ACT_DIMATER,
  40. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  41. SUM(T.ACT_LEN) ACT_LEN,
  42. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  43. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  44. SUM(T.ACT_COUNT) ACT_COUNT,
  45. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  46. T.BELONG_CODE,
  47. T.BELONG_NAME,
  48. --T.MAT_GOWHERE_CODE,
  49. --T.MAT_GOWHERE_NAME,
  50. --T.MAT_GOWHERE_NAME AS UPDATE_GO_WHERE_CODE,
  51. T.JUDGE_RESULT,
  52. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  53. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  54. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  55. T.PIPMEMO,
  56. DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
  57. MAX(T.TARGET) TARGET,
  58. T.FLAG_STOVE_NO_ZG,
  59. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  60. (CASE
  61. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  62. (SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
  63. FROM PLN_ORDER_DBK_S T1
  64. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  65. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  66. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  67. (SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
  68. FROM PLN_ORDER_RCL_S T2
  69. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  70. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  71. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  72. (SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
  73. FROM PLN_ORDER_JGX_S T3
  74. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  75. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  76. ELSE
  77. NULL
  78. END) ORDER_NO_NEXT,
  79. --MAX(T.JUDGE_STD_DES)JUDGE_STD_DES,
  80. S.STORAGE_NO,
  81. S.LOCATION_NO,
  82. (SELECT S2.LOCATION_NAME
  83. FROM YDM_BS_LOCATION S2
  84. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  85. S.LARY_NO,
  86. S.LOC_NO,
  87. T.PRO_PLAN_ID_NEXT,
  88. T.GX_PLAN_NO_NEXT,
  89. (SELECT S1.STORAGE_NAME
  90. FROM YDM_BS_STORAGE S1
  91. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  92. (CASE
  93. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  94. (SELECT (SELECT T5.STORAGE_NAME
  95. FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
  96. WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
  97. AND T4.PLINE_CODE = T1.PLINE_CODE)
  98. FROM PLN_ZY_DBK_M T1
  99. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  100. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  101. AND ROWNUM = 1)
  102. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  103. (SELECT (SELECT T7.STORAGE_NAME
  104. FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
  105. WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
  106. AND T6.PLINE_CODE = T2.PLINE_CODE)
  107. FROM PLN_ZY_RCL_M T2
  108. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  109. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  110. AND ROWNUM = 1)
  111. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  112. (SELECT (SELECT T9.STORAGE_NAME
  113. FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
  114. WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
  115. AND T8.PLINE_CODE = T3.PLINE_CODE)
  116. FROM PLN_ZY_JGX_M T3
  117. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  118. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  119. AND ROWNUM = 1)
  120. ELSE
  121. NULL
  122. END) DIRECTION,
  123. '0' BAR_CODE,
  124. T.SUBCONTRACT_NO,
  125. T.SUBCONTRACT_NO_SEQ,
  126. '否' LOCK_BILL_FLAG,
  127. T.HEAT_PLAN_NO
  128. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  129. WHERE T.MAT_NO = S.MAT_NO #INSTOCK_TIME# #JUDGE_STOVE_NO#
  130. #FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS#
  131. GROUP BY T.LOT_NO,
  132. T.STOVE_NO,
  133. T.JUDGE_STOVE_NO,
  134. T.BATCH_NO,
  135. T.BATCH_GROUD_NO,
  136. T.PLINE_CODE,
  137. T.PLINE_NAME,
  138. T.MAT_STATUS,
  139. T.QCM_STAUS,
  140. T.BELONG_CODE,
  141. T.BELONG_NAME,
  142. T.MAT_GOWHERE_CODE,
  143. T.MAT_GOWHERE_NAME,
  144. T.PIPMEMO,
  145. T.FLAG_STOVE_NO_ZG,
  146. S.STORAGE_NO,
  147. S.LOCATION_NO,
  148. S.LARY_NO,
  149. S.LOC_NO,
  150. T.PRO_PLAN_ID_NEXT,
  151. T.GX_PLAN_NO_NEXT,
  152. T.JUDGE_RESULT,
  153. T.NEXT_PROCESS_CDOE,
  154. T.NEXT_PROCESS_DESC,
  155. T.PRODUCT_FLAG,
  156. T.SUBCONTRACT_NO,
  157. T.SUBCONTRACT_NO_SEQ,
  158. T.HEAT_PLAN_NO
  159. UNION ALL
  160. SELECT (SELECT T2.BASENAME
  161. FROM COM_BASE_INFO T2
  162. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  163. (SELECT T1.BASENAME
  164. FROM COM_BASE_INFO T1
  165. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  166. T.MAT_STATUS AS MAT_STATUS_CODE,
  167. T.LOT_NO,
  168. T.STOVE_NO,
  169. T.JUDGE_STOVE_NO,
  170. T.BATCH_NO,
  171. T.BATCH_GROUD_NO,
  172. MAX(T.MATERIAL_NO) MATERIAL_NO,
  173. MAX(T.MATERIAL_NAME) MATERIAL_NAME,
  174. MAX(T.PRODUCCODE) PRODUCCODE,
  175. MAX(T.PRODUCNAME) PRODUCNAME,
  176. MAX(T.STEELCODE) STEELCODE,
  177. MAX(T.STEELNAME) STEELNAME,
  178. MAX(T.GRADECODE) GRADECODE,
  179. MAX(T.GRADENAME) GRADENAME,
  180. MAX(T.SPEC_CODE) SPEC_CODE,
  181. MAX(T.SPEC_NAME) SPEC_NAME,
  182. MAX(T.MODEL_CODE) MODEL_CODE,
  183. MAX(T.MODEL_DESC) MODEL_DESC,
  184. --MAX(T.STD_CODE)STD_CODE,
  185. --MAX(T.STD_NAME)STD_NAME,
  186. MAX(T.STD_STYLE) STD_STYLE,
  187. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  188. MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
  189. '' PROCESS_CDOE,
  190. '' PROCESS_DESC,
  191. '' NEXT_PROCESS_CDOE,
  192. '' NEXT_PROCESS_DESC,
  193. T.PLINE_CODE,
  194. T.PLINE_NAME,
  195. MAX(T.ACT_DIMATER) ACT_DIMATER,
  196. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  197. SUM(T.ACT_LEN) ACT_LEN,
  198. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  199. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  200. SUM(T.ACT_COUNT) ACT_COUNT,
  201. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  202. T.BELONG_CODE,
  203. T.BELONG_NAME,
  204. --'' MAT_GOWHERE_CODE,
  205. --'' MAT_GOWHERE_NAME,
  206. --'' UPDATE_GO_WHERE_CODE,
  207. T.JUDGE_RESULT,
  208. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  209. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  210. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  211. T.PIPMEMO,
  212. '合格' QCM_STAUS,
  213. '' TARGET,
  214. T.FLAG_STOVE_NO_ZG,
  215. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  216. '' ORDER_NO_NEXT,
  217. --MAX(T.JUDGE_STD_NAME) JUDGE_STD_DES,
  218. S.STORAGE_NO,
  219. S.LOCATION_NO,
  220. (SELECT S2.LOCATION_NAME
  221. FROM YDM_BS_LOCATION S2
  222. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  223. S.LARY_NO,
  224. S.LOC_NO,
  225. '' PRO_PLAN_ID_NEXT,
  226. '' GX_PLAN_NO_NEXT,
  227. (SELECT S1.STORAGE_NAME
  228. FROM YDM_BS_STORAGE S1
  229. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  230. '' DIRECTION,
  231. '1' BAR_CODE,
  232. T.SUBCONTRACT_NO,
  233. T.SUBCONTRACT_NO_SEQ,
  234. DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
  235. ''HEAT_PLAN_NO
  236. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  237. WHERE T.MAT_NO = S.MAT_NO
  238. AND T.BELONG_CODE IN ('100101', '100102', '100103') #INSTOCK_TIME#
  239. #JUDGE_STOVE_NO# #FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS1#
  240. GROUP BY T.LOT_NO,
  241. T.STOVE_NO,
  242. T.JUDGE_STOVE_NO,
  243. T.BATCH_NO,
  244. T.BATCH_GROUD_NO,
  245. T.PLINE_CODE,
  246. T.PLINE_NAME,
  247. T.MAT_STATUS,
  248. T.QCM_STAUS,
  249. T.BELONG_CODE,
  250. T.BELONG_NAME,
  251. T.PIPMEMO,
  252. T.FLAG_STOVE_NO_ZG,
  253. S.STORAGE_NO,
  254. S.LOCATION_NO,
  255. S.LARY_NO,
  256. S.LOC_NO,
  257. T.JUDGE_RESULT,
  258. T.PRODUCT_FLAG,
  259. T.SUBCONTRACT_NO,
  260. T.SUBCONTRACT_NO_SEQ,
  261. T.LOCK_BILL_FLAG,
  262. T.HEAT_PLAN_NO
  263. </query>
  264. <query id = "FrmFilpOutStorage.doQueryDataBc" desc = "查询BC库存">
  265. SELECT (SELECT T2.BASENAME
  266. FROM COM_BASE_INFO T2
  267. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  268. (SELECT T1.BASENAME
  269. FROM COM_BASE_INFO T1
  270. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  271. T.MAT_STATUS AS MAT_STATUS_CODE,
  272. T.LOT_NO,
  273. T.STOVE_NO,
  274. T.JUDGE_STOVE_NO,
  275. T.BATCH_NO,
  276. T.BATCH_GROUD_NO,
  277. T.MATERIAL_NO,
  278. T.MATERIAL_NAME,
  279. MAX(T.PRODUCCODE) PRODUCCODE,
  280. MAX(T.PRODUCNAME) PRODUCNAME,
  281. MAX(T.STEELCODE) STEELCODE,
  282. MAX(T.STEELNAME) STEELNAME,
  283. MAX(T.GRADECODE) GRADECODE,
  284. MAX(T.GRADENAME) GRADENAME,
  285. MAX(T.SPEC_CODE) SPEC_CODE,
  286. MAX(T.SPEC_NAME) SPEC_NAME,
  287. MAX(T.MODEL_CODE) MODEL_CODE,
  288. MAX(T.MODEL_DESC) MODEL_DESC,
  289. MAX(T.STD_STYLE) STD_STYLE,
  290. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  291. MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
  292. MAX(T.PROCESS_CDOE) PROCESS_CDOE,
  293. MAX(T.PROCESS_DESC) PROCESS_DESC,
  294. T.NEXT_PROCESS_CDOE,
  295. T.NEXT_PROCESS_DESC,
  296. T.PLINE_CODE,
  297. T.PLINE_NAME,
  298. MAX(T.ACT_DIMATER) ACT_DIMATER,
  299. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  300. SUM(T.ACT_LEN) ACT_LEN,
  301. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  302. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  303. SUM(T.ACT_COUNT) ACT_COUNT,
  304. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  305. T.BELONG_CODE,
  306. T.BELONG_NAME,
  307. T.JUDGE_RESULT,
  308. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  309. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  310. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  311. T.PIPMEMO,
  312. T.MEMO1,
  313. DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
  314. MAX(T.TARGET) TARGET,
  315. T.FLAG_STOVE_NO_ZG,
  316. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  317. (CASE
  318. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  319. (SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
  320. FROM PLN_ORDER_DBK_S T1
  321. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  322. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  323. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  324. (SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
  325. FROM PLN_ORDER_RCL_S T2
  326. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  327. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  328. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  329. (SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
  330. FROM PLN_ORDER_JGX_S T3
  331. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  332. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  333. ELSE
  334. NULL
  335. END) ORDER_NO_NEXT,
  336. T.PRO_PLAN_ID_NEXT,
  337. T.GX_PLAN_NO_NEXT,
  338. S.STORAGE_NO,
  339. S.LOCATION_NO,
  340. (SELECT S2.LOCATION_NAME
  341. FROM YDM_BS_LOCATION S2
  342. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  343. S.LARY_NO,
  344. S.LOC_NO,
  345. T.HEAT_PLAN_NO,
  346. (SELECT S1.STORAGE_NAME
  347. FROM YDM_BS_STORAGE S1
  348. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  349. (CASE
  350. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  351. (SELECT (SELECT T5.STORAGE_NAME
  352. FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
  353. WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
  354. AND T4.PLINE_CODE = T1.PLINE_CODE)
  355. FROM PLN_ZY_DBK_M T1
  356. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  357. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  358. AND ROWNUM = 1)
  359. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  360. (SELECT (SELECT T7.STORAGE_NAME
  361. FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
  362. WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
  363. AND T6.PLINE_CODE = T2.PLINE_CODE)
  364. FROM PLN_ZY_RCL_M T2
  365. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  366. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  367. AND ROWNUM = 1)
  368. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  369. (SELECT (SELECT T9.STORAGE_NAME
  370. FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
  371. WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
  372. AND T8.PLINE_CODE = T3.PLINE_CODE)
  373. FROM PLN_ZY_JGX_M T3
  374. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  375. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  376. AND ROWNUM = 1)
  377. ELSE
  378. NULL
  379. END) DIRECTION,
  380. '0' BAR_CODE,
  381. T.SUBCONTRACT_NO,
  382. T.SUBCONTRACT_NO_SEQ,
  383. '否' LOCK_BILL_FLAG,
  384. T.OFFLINE_DOC,
  385. T.MEMO,DECODE(min(t.SCRAP_FRIM_FLAG),'0','未申请','1','已申请','审核通过') SCRAP_FRIM_FLAG
  386. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  387. WHERE T.MAT_NO = S.MAT_NO
  388. AND T.PRODUCT_FLAG = '801401' #INSTOCK_TIME# #JUDGE_STOVE_NO#
  389. #FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS# #ORDER_NO#
  390. GROUP BY T.LOT_NO,
  391. T.STOVE_NO,
  392. T.JUDGE_STOVE_NO,
  393. T.BATCH_NO,
  394. T.BATCH_GROUD_NO,
  395. T.PLINE_CODE,
  396. T.PLINE_NAME,
  397. T.MAT_STATUS,
  398. T.QCM_STAUS,
  399. T.BELONG_CODE,
  400. T.BELONG_NAME,
  401. T.MAT_GOWHERE_CODE,
  402. T.MAT_GOWHERE_NAME,
  403. T.PIPMEMO,
  404. T.MEMO1,
  405. T.FLAG_STOVE_NO_ZG,
  406. S.STORAGE_NO,
  407. S.LOCATION_NO,
  408. S.LARY_NO,
  409. S.LOC_NO,
  410. T.PRO_PLAN_ID_NEXT,
  411. T.GX_PLAN_NO_NEXT,
  412. T.JUDGE_RESULT,
  413. T.NEXT_PROCESS_CDOE,
  414. T.NEXT_PROCESS_DESC,
  415. T.PRODUCT_FLAG,
  416. T.SUBCONTRACT_NO,
  417. T.SUBCONTRACT_NO_SEQ,
  418. T.OFFLINE_DOC,
  419. T.MEMO,
  420. T.MATERIAL_NO,
  421. T.MATERIAL_NAME,
  422. T.HEAT_PLAN_NO
  423. UNION ALL
  424. SELECT (SELECT T2.BASENAME
  425. FROM COM_BASE_INFO T2
  426. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  427. (SELECT T1.BASENAME
  428. FROM COM_BASE_INFO T1
  429. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  430. T.MAT_STATUS AS MAT_STATUS_CODE,
  431. T.LOT_NO,
  432. T.STOVE_NO,
  433. T.JUDGE_STOVE_NO,
  434. T.BATCH_NO,
  435. T.BATCH_GROUD_NO,
  436. T.MATERIAL_NO,
  437. T.MATERIAL_NAME,
  438. MAX(T.PRODUCCODE) PRODUCCODE,
  439. MAX(T.PRODUCNAME) PRODUCNAME,
  440. MAX(T.STEELCODE) STEELCODE,
  441. MAX(T.STEELNAME) STEELNAME,
  442. MAX(T.GRADECODE) GRADECODE,
  443. MAX(T.GRADENAME) GRADENAME,
  444. MAX(T.SPEC_CODE) SPEC_CODE,
  445. MAX(T.SPEC_NAME) SPEC_NAME,
  446. MAX(T.MODEL_CODE) MODEL_CODE,
  447. MAX(T.MODEL_DESC) MODEL_DESC,
  448. MAX(T.STD_STYLE) STD_STYLE,
  449. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  450. MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
  451. MAX(T.PROCESS_CDOE) PROCESS_CDOE,
  452. MAX(T.PROCESS_DESC) PROCESS_DESC,
  453. T.NEXT_PROCESS_CDOE,
  454. T.NEXT_PROCESS_DESC,
  455. T.PLINE_CODE,
  456. T.PLINE_NAME,
  457. MAX(T.ACT_DIMATER) ACT_DIMATER,
  458. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  459. SUM(T.ACT_LEN) ACT_LEN,
  460. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  461. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  462. SUM(T.ACT_COUNT) ACT_COUNT,
  463. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  464. T.BELONG_CODE,
  465. T.BELONG_NAME,
  466. T.JUDGE_RESULT,
  467. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  468. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  469. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  470. T.PIPMEMO,
  471. T.MEMO1,
  472. DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
  473. MAX(T.TARGET) TARGET,
  474. T.FLAG_STOVE_NO_ZG,
  475. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  476. (CASE
  477. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  478. (SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
  479. FROM PLN_ORDER_DBK_S T1
  480. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  481. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  482. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  483. (SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
  484. FROM PLN_ORDER_RCL_S T2
  485. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  486. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  487. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  488. (SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
  489. FROM PLN_ORDER_JGX_S T3
  490. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  491. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  492. ELSE
  493. NULL
  494. END) ORDER_NO_NEXT,
  495. T.PRO_PLAN_ID_NEXT,
  496. T.GX_PLAN_NO_NEXT,
  497. S.STORAGE_NO,
  498. S.LOCATION_NO,
  499. (SELECT S2.LOCATION_NAME
  500. FROM YDM_BS_LOCATION S2
  501. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  502. S.LARY_NO,
  503. S.LOC_NO,
  504. T.HEAT_PLAN_NO,
  505. (SELECT S1.STORAGE_NAME
  506. FROM YDM_BS_STORAGE S1
  507. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  508. (CASE
  509. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  510. (SELECT (SELECT T5.STORAGE_NAME
  511. FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
  512. WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
  513. AND T4.PLINE_CODE = T1.PLINE_CODE)
  514. FROM PLN_ZY_DBK_M T1
  515. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  516. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  517. AND ROWNUM = 1)
  518. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  519. (SELECT (SELECT T7.STORAGE_NAME
  520. FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
  521. WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
  522. AND T6.PLINE_CODE = T2.PLINE_CODE)
  523. FROM PLN_ZY_RCL_M T2
  524. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  525. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  526. AND ROWNUM = 1)
  527. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  528. (SELECT (SELECT T9.STORAGE_NAME
  529. FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
  530. WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
  531. AND T8.PLINE_CODE = T3.PLINE_CODE)
  532. FROM PLN_ZY_JGX_M T3
  533. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  534. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  535. AND ROWNUM = 1)
  536. ELSE
  537. NULL
  538. END) DIRECTION,
  539. '0' BAR_CODE,
  540. T.SUBCONTRACT_NO,
  541. T.SUBCONTRACT_NO_SEQ,
  542. '否' LOCK_BILL_FLAG,
  543. T.OFFLINE_DOC,
  544. T.MEMO,DECODE(min(t.SCRAP_FRIM_FLAG),'0','未申请','1','已申请','审核通过') SCRAP_FRIM_FLAG
  545. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  546. WHERE T.MAT_NO = S.MAT_NO
  547. AND T.PRODUCT_FLAG = '801402' #INSTOCK_TIME# #JUDGE_STOVE_NO#
  548. #FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS# #ORDER_NO#
  549. GROUP BY T.LOT_NO,
  550. T.STOVE_NO,
  551. T.JUDGE_STOVE_NO,
  552. T.BATCH_NO,
  553. T.BATCH_GROUD_NO,
  554. T.PLINE_CODE,
  555. T.PLINE_NAME,
  556. T.MAT_STATUS,
  557. T.QCM_STAUS,
  558. T.BELONG_CODE,
  559. T.BELONG_NAME,
  560. T.MAT_GOWHERE_CODE,
  561. T.MAT_GOWHERE_NAME,
  562. T.PIPMEMO,
  563. T.MEMO1,
  564. T.FLAG_STOVE_NO_ZG,
  565. S.STORAGE_NO,
  566. S.LOCATION_NO,
  567. S.LARY_NO,
  568. S.LOC_NO,
  569. T.PRO_PLAN_ID_NEXT,
  570. T.GX_PLAN_NO_NEXT,
  571. T.JUDGE_RESULT,
  572. T.NEXT_PROCESS_CDOE,
  573. T.NEXT_PROCESS_DESC,
  574. T.PRODUCT_FLAG,
  575. T.SUBCONTRACT_NO,
  576. T.SUBCONTRACT_NO_SEQ,
  577. T.OFFLINE_DOC,
  578. T.MEMO,
  579. T.MATERIAL_NO,
  580. T.MATERIAL_NAME,
  581. T.HEAT_PLAN_NO
  582. </query>
  583. <query id = "FrmFilpOutStorage.doQueryDataZc" desc = "查询ZC库存数据">
  584. SELECT (SELECT T2.BASENAME
  585. FROM COM_BASE_INFO T2
  586. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  587. (SELECT T1.BASENAME
  588. FROM COM_BASE_INFO T1
  589. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  590. T.MAT_STATUS AS MAT_STATUS_CODE,
  591. T.LOT_NO,
  592. T.STOVE_NO,
  593. T.JUDGE_STOVE_NO,
  594. T.BATCH_NO,
  595. T.BATCH_GROUD_NO,
  596. T.MATERIAL_NO,
  597. T.MATERIAL_NAME,
  598. MAX(T.PRODUCCODE) PRODUCCODE,
  599. MAX(T.PRODUCNAME) PRODUCNAME,
  600. MAX(T.STEELCODE) STEELCODE,
  601. MAX(T.STEELNAME) STEELNAME,
  602. MAX(T.GRADECODE) GRADECODE,
  603. MAX(T.GRADENAME) GRADENAME,
  604. MAX(T.SPEC_CODE) SPEC_CODE,
  605. MAX(T.SPEC_NAME) SPEC_NAME,
  606. MAX(T.MODEL_CODE) MODEL_CODE,
  607. MAX(T.MODEL_DESC) MODEL_DESC,
  608. MAX(T.STD_STYLE) STD_STYLE,
  609. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  610. MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
  611. '' PROCESS_CDOE,
  612. '' PROCESS_DESC,
  613. '' NEXT_PROCESS_CDOE,
  614. '' NEXT_PROCESS_DESC,
  615. T.PLINE_CODE,
  616. T.PLINE_NAME,
  617. MAX(T.ACT_DIMATER) ACT_DIMATER,
  618. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  619. SUM(T.ACT_LEN) ACT_LEN,
  620. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  621. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  622. SUM(T.ACT_COUNT) ACT_COUNT,
  623. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  624. T.BELONG_CODE,
  625. T.BELONG_NAME,
  626. T.JUDGE_RESULT,
  627. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  628. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  629. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  630. T.PIPMEMO,
  631. T.MEMO1,
  632. '合格' QCM_STAUS,
  633. '' TARGET,
  634. T.FLAG_STOVE_NO_ZG,
  635. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  636. '' ORDER_NO_NEXT,
  637. S.STORAGE_NO,
  638. S.LOCATION_NO,
  639. (SELECT S2.LOCATION_NAME
  640. FROM YDM_BS_LOCATION S2
  641. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  642. S.LARY_NO,
  643. S.LOC_NO,
  644. '' PRO_PLAN_ID_NEXT,
  645. '' GX_PLAN_NO_NEXT,
  646. (SELECT S1.STORAGE_NAME
  647. FROM YDM_BS_STORAGE S1
  648. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  649. '' DIRECTION,
  650. '1' BAR_CODE,
  651. T.SUBCONTRACT_NO,
  652. T.SUBCONTRACT_NO_SEQ,
  653. DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
  654. ''OFFLINE_DOC,
  655. T.MEMO,
  656. ''HEAT_PLAN_NO
  657. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  658. WHERE T.MAT_NO = S.MAT_NO
  659. AND T.BELONG_CODE IN ('100101', '100102', '100103','100105')
  660. AND T.PRODUCT_FLAG = '801402' #INSTOCK_TIME# #JUDGE_STOVE_NO#
  661. #FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS# #ORDER_NO#
  662. GROUP BY T.LOT_NO,
  663. T.STOVE_NO,
  664. T.JUDGE_STOVE_NO,
  665. T.BATCH_NO,
  666. T.BATCH_GROUD_NO,
  667. T.PLINE_CODE,
  668. T.PLINE_NAME,
  669. T.MAT_STATUS,
  670. T.QCM_STAUS,
  671. T.BELONG_CODE,
  672. T.BELONG_NAME,
  673. T.PIPMEMO,
  674. T.MEMO1,
  675. T.FLAG_STOVE_NO_ZG,
  676. S.STORAGE_NO,
  677. S.LOCATION_NO,
  678. S.LARY_NO,
  679. S.LOC_NO,
  680. T.JUDGE_RESULT,
  681. T.PRODUCT_FLAG,
  682. T.SUBCONTRACT_NO,
  683. T.SUBCONTRACT_NO_SEQ,
  684. T.LOCK_BILL_FLAG,
  685. T.MEMO,
  686. T.MATERIAL_NO,
  687. T.MATERIAL_NAME
  688. UNION ALL
  689. SELECT (SELECT T2.BASENAME
  690. FROM COM_BASE_INFO T2
  691. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  692. (SELECT T1.BASENAME
  693. FROM COM_BASE_INFO T1
  694. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  695. T.MAT_STATUS AS MAT_STATUS_CODE,
  696. T.LOT_NO,
  697. T.STOVE_NO,
  698. T.JUDGE_STOVE_NO,
  699. T.BATCH_NO,
  700. T.BATCH_GROUD_NO,
  701. T.MATERIAL_NO,
  702. T.MATERIAL_NAME,
  703. MAX(T.PRODUCCODE) PRODUCCODE,
  704. MAX(T.PRODUCNAME) PRODUCNAME,
  705. MAX(T.STEELCODE) STEELCODE,
  706. MAX(T.STEELNAME) STEELNAME,
  707. MAX(T.GRADECODE) GRADECODE,
  708. MAX(T.GRADENAME) GRADENAME,
  709. MAX(T.SPEC_CODE) SPEC_CODE,
  710. MAX(T.SPEC_NAME) SPEC_NAME,
  711. MAX(T.MODEL_CODE) MODEL_CODE,
  712. MAX(T.MODEL_DESC) MODEL_DESC,
  713. MAX(T.STD_STYLE) STD_STYLE,
  714. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  715. MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
  716. '' PROCESS_CDOE,
  717. '' PROCESS_DESC,
  718. '' NEXT_PROCESS_CDOE,
  719. '' NEXT_PROCESS_DESC,
  720. T.PLINE_CODE,
  721. T.PLINE_NAME,
  722. MAX(T.ACT_DIMATER) ACT_DIMATER,
  723. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  724. SUM(T.ACT_LEN) ACT_LEN,
  725. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  726. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  727. SUM(T.ACT_COUNT) ACT_COUNT,
  728. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  729. T.BELONG_CODE,
  730. T.BELONG_NAME,
  731. T.JUDGE_RESULT,
  732. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  733. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  734. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  735. T.PIPMEMO,
  736. T.MEMO1,
  737. '合格' QCM_STAUS,
  738. '' TARGET,
  739. T.FLAG_STOVE_NO_ZG,
  740. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  741. '' ORDER_NO_NEXT,
  742. S.STORAGE_NO,
  743. S.LOCATION_NO,
  744. (SELECT S2.LOCATION_NAME
  745. FROM YDM_BS_LOCATION S2
  746. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  747. S.LARY_NO,
  748. S.LOC_NO,
  749. '' PRO_PLAN_ID_NEXT,
  750. '' GX_PLAN_NO_NEXT,
  751. (SELECT S1.STORAGE_NAME
  752. FROM YDM_BS_STORAGE S1
  753. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  754. '' DIRECTION,
  755. '1' BAR_CODE,
  756. T.SUBCONTRACT_NO,
  757. T.SUBCONTRACT_NO_SEQ,
  758. DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
  759. ''OFFLINE_DOC,
  760. T.MEMO,
  761. ''HEAT_PLAN_NO
  762. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  763. WHERE T.MAT_NO = S.MAT_NO
  764. AND T.BELONG_CODE IN ('100101', '100102', '100103','100105')
  765. AND T.PRODUCT_FLAG = '801403' #INSTOCK_TIME# #JUDGE_STOVE_NO#
  766. #FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS# #ORDER_NO#
  767. GROUP BY T.LOT_NO,
  768. T.STOVE_NO,
  769. T.JUDGE_STOVE_NO,
  770. T.BATCH_NO,
  771. T.BATCH_GROUD_NO,
  772. T.PLINE_CODE,
  773. T.PLINE_NAME,
  774. T.MAT_STATUS,
  775. T.QCM_STAUS,
  776. T.BELONG_CODE,
  777. T.BELONG_NAME,
  778. T.PIPMEMO,
  779. T.MEMO1,
  780. T.FLAG_STOVE_NO_ZG,
  781. S.STORAGE_NO,
  782. S.LOCATION_NO,
  783. S.LARY_NO,
  784. S.LOC_NO,
  785. T.JUDGE_RESULT,
  786. T.PRODUCT_FLAG,
  787. T.SUBCONTRACT_NO,
  788. T.SUBCONTRACT_NO_SEQ,
  789. T.LOCK_BILL_FLAG,
  790. T.MEMO,
  791. T.MATERIAL_NO,
  792. T.MATERIAL_NAME
  793. </query>
  794. <query id = "FrmFilpOutStorage.doQueryDataMat" desc = "查询材料号">
  795. SELECT (SELECT T2.BASENAME
  796. FROM COM_BASE_INFO T2
  797. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  798. (SELECT T1.BASENAME
  799. FROM COM_BASE_INFO T1
  800. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  801. T.MAT_STATUS AS MAT_STATUS_CODE,
  802. T.LOT_NO,
  803. T.STOVE_NO,
  804. T.JUDGE_STOVE_NO,
  805. T.BATCH_NO,
  806. T.BATCH_GROUD_NO,
  807. T.MATERIAL_NO,
  808. T.MATERIAL_NAME,
  809. T.PRODUCCODE,
  810. T.PRODUCNAME,
  811. T.STEELCODE,
  812. T.STEELNAME,
  813. T.GRADECODE,
  814. T.GRADENAME,
  815. T.SPEC_CODE,
  816. T.SPEC_NAME,
  817. T.MODEL_CODE,
  818. T.MODEL_DESC,
  819. T.STD_CODE,
  820. T.STD_NAME,
  821. T.STD_STYLE,
  822. T.STD_STYLE_DESC,
  823. T.PLINE_CODE,
  824. T.PLINE_NAME,
  825. T.ACT_DIMATER,
  826. T.ACT_HEIGHT,
  827. T.ACT_LEN,
  828. T.ACT_LEN_MIN,
  829. T.ACT_LEN_MAX,
  830. T.ACT_COUNT,
  831. T.ACT_WEIGHT,
  832. T.BELONG_CODE,
  833. T.BELONG_NAME,
  834. T.JUDGE_RESULT,
  835. DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
  836. T.FLAG_STOVE_NO_ZG,
  837. S.STORAGE_NO,
  838. S.LOCATION_NO,
  839. (SELECT S2.LOCATION_NAME
  840. FROM YDM_BS_LOCATION S2
  841. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  842. S.LARY_NO,
  843. S.LOC_NO,
  844. (SELECT S1.STORAGE_NAME
  845. FROM YDM_BS_STORAGE S1
  846. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  847. '0' BAR_CODE,
  848. T.SUBCONTRACT_NO,
  849. T.SUBCONTRACT_NO_SEQ,
  850. '否' LOCK_BILL_FLAG,
  851. T.MEASURING_SEQ,
  852. T.MAT_NO
  853. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  854. WHERE T.MAT_NO = S.MAT_NO
  855. #INSTOCK_TIME#
  856. #JUDGE_STOVE_NO#
  857. #FLAG_STOVE_NO_ZG#
  858. #STORAGE_NO#
  859. #QCM_STATUS#
  860. UNION ALL
  861. SELECT (SELECT T2.BASENAME
  862. FROM COM_BASE_INFO T2
  863. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  864. (SELECT T1.BASENAME
  865. FROM COM_BASE_INFO T1
  866. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  867. T.MAT_STATUS AS MAT_STATUS_CODE,
  868. T.LOT_NO,
  869. T.STOVE_NO,
  870. T.JUDGE_STOVE_NO,
  871. T.BATCH_NO,
  872. T.BATCH_GROUD_NO,
  873. T.MATERIAL_NO,
  874. T.MATERIAL_NAME,
  875. T.PRODUCCODE,
  876. T.PRODUCNAME,
  877. T.STEELCODE,
  878. T.STEELNAME,
  879. T.GRADECODE,
  880. T.GRADENAME,
  881. T.SPEC_CODE,
  882. T.SPEC_NAME,
  883. T.MODEL_CODE,
  884. T.MODEL_DESC,
  885. T.STD_CODE,
  886. T.STD_NAME,
  887. T.STD_STYLE,
  888. T.STD_STYLE_DESC,
  889. T.PLINE_CODE,
  890. T.PLINE_NAME,
  891. T.ACT_DIMATER,
  892. T.ACT_HEIGHT,
  893. T.ACT_LEN,
  894. T.ACT_LEN_MIN,
  895. T.ACT_LEN_MAX,
  896. T.ACT_COUNT,
  897. T.ACT_WEIGHT,
  898. T.BELONG_CODE,
  899. T.BELONG_NAME,
  900. T.JUDGE_RESULT,
  901. '合格' QCM_STAUS,
  902. T.FLAG_STOVE_NO_ZG,
  903. S.STORAGE_NO,
  904. S.LOCATION_NO,
  905. (SELECT S2.LOCATION_NAME
  906. FROM YDM_BS_LOCATION S2
  907. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  908. S.LARY_NO,
  909. S.LOC_NO,
  910. (SELECT S1.STORAGE_NAME
  911. FROM YDM_BS_STORAGE S1
  912. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  913. '1' BAR_CODE,
  914. T.SUBCONTRACT_NO,
  915. T.SUBCONTRACT_NO_SEQ,
  916. DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
  917. T.MEASURING_SEQ,
  918. T.MAT_NO
  919. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  920. WHERE T.MAT_NO = S.MAT_NO
  921. AND T.BELONG_CODE IN ('100101', '100102', '100103')
  922. #INSTOCK_TIME#
  923. #JUDGE_STOVE_NO#
  924. #FLAG_STOVE_NO_ZG#
  925. #STORAGE_NO#
  926. #QCM_STATUS1#
  927. </query>
  928. <query id = "FrmFilpOutStorage.doQueryOutList" desc = "查询倒库出库信息">
  929. SELECT
  930. T.OUTSTOCK_DOC,
  931. MAX(T.OUTSTOCK_TYPE_CODE)OUTSTOCK_TYPE_CODE,
  932. MAX(T.OUTSTOCK_TYPE_NAME)OUTSTOCK_TYPE_NAME,
  933. T.VEHICLE_NO,
  934. --T.LOT_NO,
  935. T.STOVE_NO,
  936. T.JUDGE_STOVE_NO,
  937. T.BATCH_NO,
  938. T.BATCH_GROUD_NO,
  939. T.MATERIAL_NO,
  940. T.MATERIAL_NAME,
  941. MAX(T.PRODUCCODE)PRODUCCODE,
  942. MAX(T.PRODUCNAME)PRODUCNAME,
  943. MAX(T.STD_CODE)STD_CODE,
  944. MAX(T.STD_NAME)STD_NAME,
  945. MAX(T.GRADECODE)GRADECODE,
  946. MAX(T.GRADENAME)GRADENAME,
  947. MAX(T.STEELCODE)STEELCODE,
  948. MAX(T.STEELNAME)STEELNAME,
  949. MAX(T.STD_STYLE)STD_STYLE,
  950. MAX(T.STD_STYLE_DESC)STD_STYLE_DESC,
  951. MAX(T.SPEC_CODE)SPEC_CODE,
  952. MAX(T.SPEC_NAME)SPEC_NAME,
  953. MAX(T.MODEL_CODE)MODEL_CODE,
  954. MAX(T.MODEL_DESC)MODEL_DESC,
  955. MAX(T.PRO_ORDER_NO)PRO_ORDER_NO,
  956. MAX(T.PLINE_CODE)PLINE_CODE,
  957. MAX(T.PLINE_NAME)PLINE_NAME,
  958. MAX(T.ACT_DIMATER)ACT_DIMATER,
  959. MAX(T.ACT_HEIGHT)ACT_HEIGHT,
  960. SUM(T.ACT_LEN)ACT_LEN,
  961. MAX(T.ACT_LEN_MIN)ACT_LEN_MIN,
  962. MAX(T.ACT_LEN_MAX)ACT_LEN_MAX,
  963. SUM(T.ACT_COUNT)ACT_COUNT,
  964. SUM(T.ACT_WEIGHT)ACT_WEIGHT,
  965. SUM(T.PONDER_GROSS_WT)PONDER_GROSS_WT,
  966. MAX(T.BELONG_CODE)BELONG_CODE,
  967. MAX(T.BELONG_NAME)BELONG_NAME,
  968. MAX(T.STORAGE_NO)STORAGE_NO,
  969. (SELECT T2.STORAGE_NAME FROM YDM_BS_STORAGE T2 WHERE T2.STORAGE_NO = T.STORAGE_NO)STORAGE_NAME,
  970. T.TAR_STORAGE_NO,
  971. (SELECT T1.STORAGE_NAME FROM YDM_BS_STORAGE T1 WHERE T1.STORAGE_NO = T.TAR_STORAGE_NO)TAR_STORAGE_NAME,
  972. MAX(TO_CHAR(T.OUTSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS')) OUTSTOCK_TIME,
  973. MAX(TO_CHAR(T.LEAVE_FACTORY_TIME, 'YYYY-MM-DD HH24:MI:SS')) LEAVE_FACTORY_TIME,
  974. MAX(T.LEAVE_FACTORY_NAME) LEAVE_FACTORY_NAME,
  975. MAX(T.CREATE_NAME)CREATE_NAME,
  976. MAX(T.JUDGE_STD_NAME)JUDGE_STD_NAME,
  977. DECODE(T.QCM_STAUS,'00','合格','11','待处理','22','判废')QCM_STAUS,
  978. MAX(DECODE(T.TAR_REC_FLAG,'0','未接收','1','已接收'))TAR_REC_FLAG,
  979. MAX(T.DRIVER)DRIVER,
  980. DECODE(T.OUT_TYPE,'0','写卡倒运','1','票据倒运','2','纠错倒运','3','外委倒运','4','装车皮倒运')OUT_TYPE,
  981. MAX(T.FLAG_STOVE_NO_ZG)FLAG_STOVE_NO_ZG,
  982. DECODE(T.PRODUCT_FLAG,'801401','在制品','801402','成品','801403','商品')PRODUCT_FLAG,
  983. MAX((SELECT T1.FINAL_USER_DESC
  984. FROM PLN_SALEORD T1
  985. WHERE (T1.ORD_LN_DLY_PK = T.ORD_LN_DLY_PK OR
  986. T1.ORD_LN_DLY_PK = SUBSTR(T.ORD_LN_DLY_PK,0,INSTR(T.ORD_LN_DLY_PK,'-')-1)))) FINAL_USER_DESC,
  987. (CASE WHEN T.OUT_BC ='1'
  988. THEN '白班'
  989. WHEN T.OUT_BC ='2'
  990. THEN '中班'
  991. WHEN T.OUT_BC ='3'
  992. THEN '晚班' end) OUT_BC,
  993. (CASE WHEN T.OUT_BZ ='1'
  994. THEN '甲'
  995. WHEN T.OUT_BZ ='2'
  996. THEN '乙'
  997. WHEN T.OUT_BZ ='3'
  998. THEN '丙'
  999. WHEN T.OUT_BZ ='4'
  1000. THEN '丁' end) OUT_BZ
  1001. FROM YDM_BC_OUTLIST T
  1002. WHERE T.OUTSTOCK_TYPE_CODE = '800803'
  1003. AND T.VALIDFLAG = '1'
  1004. </query>
  1005. <query id = "FrmFilpOutStorage.doQueryTmsDemand" desc = "查询运输需求">
  1006. <![CDATA[
  1007. SELECT
  1008. T.CAR_WT_VAL,
  1009. T.CURRENT_JOB_NO,
  1010. TO_CHAR(T.TRANSPORT_START_TIME, 'YYYY-MM-DD HH24:MI:SS') TRANSPORT_START_TIME,
  1011. T.COST_COUNT,
  1012. DECODE(T.VALIDFLAG,'00','无效','10','草稿','20','待分派','30','执行中','40','结束','50','关闭')VALIDFLAG,
  1013. T.OUTPUT_QTY_VAL,
  1014. T.DELETE_USERID,
  1015. T.URGENCY_TYPE_CODE,
  1016. T.DEMAND_ORG_DESC,
  1017. T.DIMATER_VAL,
  1018. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  1019. T.START_AREA_DESC,
  1020. T.END_AREA_DESC,
  1021. T.UOM_DESC,
  1022. T.MATERIALS_CODE,
  1023. T.ARCHIVE_FLAG,
  1024. TO_CHAR(T.DELETE_TIME, 'YYYY-MM-DD HH24:MI:SS') DELETE_TIME,
  1025. T.STATUS,
  1026. T.DEMAND_VERTICAL_NO,
  1027. T.PRO_ORDER_SQE,
  1028. T.DEMAND_NO,
  1029. T.COST_TYPE_DESC,
  1030. T.REFE_TYPE_NAME,
  1031. T.DEMAND_ORG_CODE,
  1032. T.DEMAND_QTY_VAL,
  1033. T.HEAT_NO,
  1034. T.CREATE_NAME,
  1035. T.GROUP_NO,
  1036. T.CARRIER_NAME,
  1037. T.UOM_CODE,
  1038. T.OUTPUT_WT_VAL,
  1039. T.ACCOUNT_YEAR_MONTH,
  1040. T.END_NODE_CODE,
  1041. T.CARRIER_CODE,
  1042. T.START_NODE_DESC,
  1043. T.END_AREA_CODE,
  1044. T.DELETE_NAME,
  1045. T.DEMAND_DESC,
  1046. T.TRAN_CLASS_CODE,
  1047. T.SCRAP_QTY_VAL,
  1048. T.CAR_USE_CODE,
  1049. T.CAR_USE_DESC,
  1050. T.MATERIALS_SPEC,
  1051. T.OFFLINE_QTY_VAL,
  1052. T.EXECUTE_SQE,
  1053. T.BATCH_NO,
  1054. T.HEIGHT_VAL,
  1055. T.LEN_MIN_VAL,
  1056. T.LEN_MAX_VAL,
  1057. T.PREVIOUS_JOB_NO,
  1058. T.ARCHIVE_NO,
  1059. T.DEMAND_WT_VAL,
  1060. T.UPDATE_USERID,
  1061. T.LOGO_NO,
  1062. T.OFFLINE_WT_VAL,
  1063. T.UPDATE_NAME,
  1064. T.END_NODE_DESC,
  1065. T.SCRAP_WT_VAL,
  1066. T.START_NODE_CODE,
  1067. TO_CHAR(T.TRANSPORT_END_TIME, 'YYYY-MM-DD HH24:MI:SS') TRANSPORT_END_TIME,
  1068. T.SOURCE_SIGN,
  1069. T.WEIGHING_IF,
  1070. T.CREATE_USERID,
  1071. T.ARCHIVE_DATE,
  1072. T.URGENCY_TYPE_DESC,
  1073. T.TRAN_CLASS_DESC,
  1074. T.COST_TYPE_CODE,
  1075. T.REFE_TYPE_CODE,
  1076. T.CAR_TYPE_DESC,
  1077. T.WIDE_VAL,
  1078. T.LEN_VAL,
  1079. T.CALCULATE_CAR_VAL,
  1080. T.PRO_ORDER_NO,
  1081. T.CAR_TYPE_CODE,
  1082. T.MEMO,
  1083. TO_CHAR(T.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  1084. T.MATERIALS_DESC,
  1085. T.REFE_NO,
  1086. T.START_AREA_CODE,
  1087. S.PLN_QTY_VAL,
  1088. S.PLN_WT_VAL
  1089. FROM TMS_DEMAND_M T LEFT JOIN TMS_PLN_C S ON T.DEMAND_NO = S.DEMAND_NO
  1090. WHERE 1 = 1
  1091. AND T.IS_SURE = '1'
  1092. ]]>
  1093. </query>
  1094. <query id = "FrmFilpOutStorage.doQueryStorageNo" desc = "查询目标库">
  1095. SELECT T.STORAGE_NAME,T.STORAGE_NO FROM YDM_BS_STORAGE T WHERE T.STORAGE_TYPE_NO IN ('800202','800205') AND T.VALIDFLAG = '1'
  1096. </query>
  1097. <query id = "FrmFilpOutStorage.updateGoWhere" desc = "修改去向">
  1098. <![CDATA[
  1099. DECLARE
  1100. BEGIN
  1101. FOR MYROW IN (SELECT *
  1102. FROM (SELECT T.MAT_NO
  1103. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  1104. WHERE T.MAT_NO = S.MAT_NO
  1105. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1106. AND T.BATCH_NO = '#BATCH_NO#'
  1107. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  1108. AND S.STORAGE_NO = '#STORAGE_NO#'
  1109. AND T.PLINE_CODE = '#PLINE_CODE#'
  1110. AND T.QCM_STAUS = '#QCM_STAUS#'
  1111. AND NVL(T.PRO_PLAN_ID_NEXT,'/') = NVL('#PRO_PLAN_ID_NEXT#','/')
  1112. AND NVL(T.GX_PLAN_NO_NEXT,'/') = NVL('#GX_PLAN_NO_NEXT#','/')
  1113. AND NVL(T.MAT_GOWHERE_CODE,'/') = NVL('#MAT_GOWHERE_CODE#','/')
  1114. AND NVL(T.FLAG_STOVE_NO_ZG,'/') = NVL('#FLAG_STOVE_NO_ZG#','/')
  1115. ORDER BY T.MAT_NO ASC)
  1116. WHERE ROWNUM <= #ACT_COUNT#) LOOP
  1117. UPDATE MAT_BC_M T
  1118. SET T.MAT_GOWHERE_CODE = '#UPDATE_GO_WHERE_CODE#',
  1119. T.MAT_GOWHERE_NAME = '#UPDATE_GO_WHERE#'
  1120. WHERE T.MAT_NO = MYROW.MAT_NO
  1121. AND T.PLINE_CODE = '#PLINE_CODE#';
  1122. END LOOP;
  1123. END;
  1124. ]]>
  1125. </query>
  1126. <query id = "FrmFilpOutStorage.updateFalgStove" desc = "修改标识炉号">
  1127. <![CDATA[
  1128. DECLARE
  1129. BEGIN
  1130. FOR MYROW IN (SELECT *
  1131. FROM (SELECT T.MAT_NO
  1132. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  1133. WHERE T.MAT_NO = S.MAT_NO
  1134. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1135. AND T.BATCH_NO = '#BATCH_NO#'
  1136. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  1137. AND S.STORAGE_NO = '#STORAGE_NO#'
  1138. AND T.PLINE_CODE = '#PLINE_CODE#'
  1139. AND T.QCM_STAUS = '#QCM_STAUS#'
  1140. AND NVL(T.PRO_PLAN_ID_NEXT,'/') = NVL('#PRO_PLAN_ID_NEXT#','/')
  1141. AND NVL(T.GX_PLAN_NO_NEXT,'/') = NVL('#GX_PLAN_NO_NEXT#','/')
  1142. AND NVL(T.FLAG_STOVE_NO_ZG,'/') = NVL('#FLAG_STOVE_NO_ZG#','/')
  1143. ORDER BY T.MAT_NO ASC)
  1144. WHERE ROWNUM <= #ACT_COUNT#) LOOP
  1145. UPDATE MAT_BC_M T
  1146. SET T.FLAG_STOVE_NO_ZG = '#UPDATE_FLAG_STOVE#'
  1147. WHERE T.MAT_NO = MYROW.MAT_NO
  1148. AND T.PLINE_CODE = '#PLINE_CODE#';
  1149. END LOOP;
  1150. END;
  1151. ]]>
  1152. </query>
  1153. <query id = "FrmFilpOutStorage.getOutDoc" desc = "不写卡生成倒库单号">
  1154. SELECT ?|| TO_CHAR(SYSDATE, 'YYMMDD') ||
  1155. LPAD(NVL(MAX(SUBSTR(OUTSTOCK_DOC, length(OUTSTOCK_DOC) - 4)), 0) + 1, 5, 0) OUTSTOCK_DOC
  1156. FROM YDM_BC_OUTLISTDOC T
  1157. WHERE T.OUTSTOCK_DOC LIKE ?|| TO_CHAR(SYSDATE, 'YYMMDD')|| '_____'
  1158. </query>
  1159. <query id = "FrmFilpOutStorage.getOutDoc1" desc = "写卡取倒库单号">
  1160. SELECT ?|| TO_CHAR(SYSDATE, 'YYMMDD') ||
  1161. LPAD(NVL(MAX(SUBSTR(OUTSTOCK_DOC, 11)), 0), 5, 0) OUTSTOCK_DOC
  1162. FROM YDM_BC_OUTLISTDOC T
  1163. WHERE T.OUTSTOCK_DOC LIKE ?|| TO_CHAR(SYSDATE, 'YYMMDD')|| '_____'
  1164. </query>
  1165. <query id = "" desc = "生成入库单号">
  1166. SELECT 'IC' || TO_CHAR(?, 'YYMMDD') ||
  1167. LPAD(NVL(MAX(SUBSTR(T.INSTOCK_DOC, 9)), 0) + 1, 5, 0) INSTOCK_DOC
  1168. FROM YDM_BC_INLIST T
  1169. WHERE T.INSTOCK_TYPE_CODE = ?
  1170. AND TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD') =
  1171. TO_CHAR(?, 'YYYY-MM-DD')
  1172. </query>
  1173. <query id = "FrmFilpOutStorage.doQueryMatBcCount" desc = "查询库存支数">
  1174. SELECT NVL(SUM(T.ACT_COUNT),'0')ACOUNT
  1175. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  1176. WHERE T.MAT_NO = S.MAT_NO
  1177. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1178. AND T.BATCH_NO = '#BATCH_NO#'
  1179. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  1180. AND S.STORAGE_NO = '#STORAGE_NO#'
  1181. AND T.PLINE_CODE = '#PLINE_CODE#'
  1182. AND T.QCM_STAUS = '#QCM_STAUS#'
  1183. AND T.BELONG_CODE = '#BELONG_CODE#'
  1184. AND NVL(T.PRO_PLAN_ID_NEXT, '/') = NVL('#PRO_PLAN_ID_NEXT#', '/')
  1185. AND NVL(T.GX_PLAN_NO_NEXT, '/') = NVL('#GX_PLAN_NO_NEXT#', '/')
  1186. --AND NVL(T.MAT_GOWHERE_CODE, '/') = NVL('#MAT_GOWHERE_CODE#', '/')
  1187. AND NVL(T.FLAG_STOVE_NO_ZG, '/') = NVL('#FLAG_STOVE_NO_ZG#', '/')
  1188. AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
  1189. AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
  1190. AND NVL(T.OFFLINE_DOC,'/') = NVL('#OFFLINE_DOC#','/')
  1191. AND NVL(T.MEMO,'/') = NVL('#MEMO#','/')
  1192. </query>
  1193. <query id = "FrmFilpOutStorage.doQueryMatBcScrap" desc = "查询废品是否审核">
  1194. <![CDATA[
  1195. SELECT NVL(SUM(T.ACT_COUNT), '0') ACOUNT
  1196. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  1197. WHERE T.MAT_NO = S.MAT_NO
  1198. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1199. AND T.BATCH_NO = '#BATCH_NO#'
  1200. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  1201. AND S.STORAGE_NO = '#STORAGE_NO#'
  1202. AND T.PLINE_CODE = '#PLINE_CODE#'
  1203. AND T.QCM_STAUS = '#QCM_STAUS#'
  1204. AND T.BELONG_CODE = '#BELONG_CODE#'
  1205. AND T.FLAG_STOVE_NO_ZG = '#FLAG_STOVE_NO_ZG#'
  1206. AND T.SCRAP_FRIM_FLAG <> '2'
  1207. ]]>
  1208. </query>
  1209. <query id = "FrmFilpOutStorage.doQueryMatZcCount" desc = "查询库存支数">
  1210. SELECT NVL(SUM(T.ACT_COUNT),'0')ACOUNT
  1211. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  1212. WHERE T.MAT_NO = S.MAT_NO
  1213. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1214. AND T.BATCH_NO = '#BATCH_NO#'
  1215. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  1216. AND S.STORAGE_NO = '#STORAGE_NO#'
  1217. AND T.PLINE_CODE = '#PLINE_CODE#'
  1218. AND T.BELONG_CODE = '#BELONG_CODE#'
  1219. AND T.PRODUCT_FLAG = '#PRODUCT_FLAG#'
  1220. AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
  1221. AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
  1222. </query>
  1223. <query id = "FrmFilpOutStorage.getPCode" desc = "查询产线集合">
  1224. SELECT T.PLINE_CODE,T.PLINE_NAME FROM COM_BASE_PLINE T WHERE T.VALIDFLAG='1'
  1225. </query>
  1226. <query id = "FrmFilpOutStorage.doQueryMilPlan" desc = "查询炉计划">
  1227. <![CDATA[
  1228. SELECT ID,
  1229. SEQ,
  1230. STOVE_NO,
  1231. JUDGE_STOVE_NO,
  1232. LOT_NO,
  1233. CONTRACT_NO,
  1234. IMP_PROCESS,
  1235. PLINE_CODE,
  1236. (SELECT T1.PLINE_NAME FROM COM_BASE_PLINE T1 WHERE T1.PLINE_CODE = T.PLINE_CODE)PLINE_NAME,
  1237. STATUS,
  1238. PRODUCER,
  1239. PROCESS_STATUS,
  1240. DB_LENGTH,
  1241. DB_HEIGHT,
  1242. ROLL_LENGTH,
  1243. SAW_NUM,
  1244. TARGET_LENGTH,
  1245. FINISH_USER,
  1246. TARGET_LIABRARY,
  1247. VARIETIES,
  1248. PIPE_SIZE,
  1249. BUCKLE_TYPE,
  1250. LENGTH_RANGE,
  1251. ROLL_STANDRAD,
  1252. PIPE_SECTION,
  1253. STEELCODE,
  1254. STEELNAME,
  1255. GRADECODE,
  1256. GRADENAME,
  1257. STEEL_STANDRAD,
  1258. TARGET,
  1259. BRANCH,
  1260. TON,
  1261. CUT_TARGET,
  1262. CUT_LENGTH,
  1263. CUT_WEIGHT,
  1264. DB_NUM,
  1265. START_TIME,
  1266. END_TIME,
  1267. TOM,
  1268. TOC,
  1269. DECODE(NODE_STATUS,
  1270. '70',
  1271. '管排距结炉',
  1272. '80',
  1273. '矫直结炉',
  1274. '90',
  1275. '探伤结炉',
  1276. '96',
  1277. '表检结炉') NODE_STATUS,
  1278. CUT_HEAD_LENGTHP,
  1279. CUT_TRAIL_LENGTHP,
  1280. CONTROL_THICKP,
  1281. OFFLINE_FLAG,
  1282. IS_BATCH,
  1283. OFFLINE_DATE,
  1284. CUT_TYPE,
  1285. ROLLING_STATUS,
  1286. PRODUCE_STANDRAD,
  1287. SIMPLE_PROCESS,
  1288. BACK_LINE_FLAG,
  1289. BACK_PLAN_FLAG,
  1290. FEED_SEQ,
  1291. FEED_TIME,
  1292. LOT_SEQ,
  1293. FEED_HEAT_NO,
  1294. LENGTHCP,
  1295. CUT_HEAD_LENGTHA,
  1296. CUT_TRAIL_LENGTHA,
  1297. ORDER_LENGTHA,
  1298. HOT_CHECK_FLAG,
  1299. BACK_SLAB_FLAG,
  1300. BACK_SLAB_TIME,
  1301. BATCH_MAX,
  1302. CODE_SAMPLE_FLAG,
  1303. VARIETIES_CODE,
  1304. PIPE_SIZE_CODE,
  1305. BUCKLE_TYPE_CODE,
  1306. ROLL_STANDRAD_CODE,
  1307. STD_STYLE,
  1308. STD_STYLE_DESC,
  1309. CHECK_NO,
  1310. ORD_LN_DLY_PK,
  1311. PRT_FLAG,
  1312. PRO_PLAN_ID,
  1313. GX_PLAN_NO,
  1314. TUBE_TYPE,
  1315. TUBE_SUORCE,
  1316. PREDICT_PIECE,
  1317. PREDICT_TON,
  1318. TYPE,
  1319. IS_LOAD,
  1320. COL_TIME,
  1321. COL_USER,
  1322. COL_SHIFT,
  1323. COL_GROUP,
  1324. USER_ID,
  1325. BAL_YEAR_MONTH,
  1326. (SELECT NVL(SUM(T1.ACT_COUNT),0)
  1327. FROM PORT_MIL_BATCH_SAMPLE_RESULT T1
  1328. WHERE T1.PLAN_ID = T.ID
  1329. AND T1.JUDGE_STOVE_NO = T.JUDGE_STOVE_NO
  1330. AND T1.STATUS = '0') ACT_COUNT,
  1331. (SELECT NVL(SUM(T1.ACT_COUNT),0)
  1332. FROM PORT_MIL_BATCH_SAMPLE_RESULT T1
  1333. WHERE T1.PLAN_ID = T.ID
  1334. AND T1.JUDGE_STOVE_NO = T.JUDGE_STOVE_NO
  1335. AND T1.STATUS = '0') LX_COUNT,
  1336. (SELECT NVL(SUM(T1.ACT_COUNT),0)
  1337. FROM PORT_MIL_BATCH_SAMPLE_RESULT T1
  1338. WHERE T1.PLAN_ID = T.ID
  1339. AND T1.JUDGE_STOVE_NO = T.JUDGE_STOVE_NO
  1340. AND T1.STATUS = '3') OFF_COUNT,
  1341. (SELECT NVL(SUM(T1.ACT_COUNT),0)
  1342. FROM PORT_MIL_BATCH_SAMPLE_RESULT T1
  1343. WHERE T1.PLAN_ID = T.ID
  1344. AND T1.JUDGE_STOVE_NO = T.JUDGE_STOVE_NO
  1345. AND T1.STATUS = '3') HT_COUNT
  1346. FROM MIL_PLAN T
  1347. WHERE T.NODE_STATUS >= '70'
  1348. AND T.NODE_STATUS < '99'
  1349. ]]>
  1350. </query>
  1351. <query id = "FrmFilpOutStorage.SelectMilNode" desc = "查询结炉状态">
  1352. SELECT T.NODE_STATUS,T.STATUS FROM MIL_PLAN T WHERE T.ID = '#ID#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1353. </query>
  1354. <query id = "FrmFilpOutStorage.SelectQualifiedCount" desc = "查询合格支数">
  1355. SELECT NVL(SUM(T.ACT_COUNT),0)ACOUNT
  1356. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  1357. WHERE T.PLAN_ID = '#ID#'
  1358. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1359. AND T.STATUS = '0'
  1360. </query>
  1361. <query id = "FrmFilpOutStorage.doQueryStoreNo" desc = "查询仓库">
  1362. SELECT S.STORAGE_NO, S.STORAGE_TYPE_NO, S.STORAGE_TYPE_NAME
  1363. FROM COM_BASE_PLINE T, YDM_BS_STORAGE S
  1364. WHERE T.DEPARTMENT_CODE = S.MANAGEMENT_NO
  1365. AND T.PLINE_CODE = ?
  1366. </query>
  1367. <query id = "FrmFilpOutStorage.OfflineResultSql" desc = "离线">
  1368. <![CDATA[
  1369. DECLARE
  1370. V_OFFCOUNT MIL_OFFLINE_RESLUT.OFFLINE_NUM%TYPE := NULL;
  1371. V_RESULTCOUNT MIL_STRAIGHTENING_RESULT.OFFLINE_NUM_TOTAL%TYPE := NULL;
  1372. V_QUALIFIED_NUM MIL_STRAIGHTENING_RESULT.QUALIFIED_NUM%TYPE := NULL;
  1373. V_COUNT MIL_INSTORE_RESULT.QUALIFIED_NUM%TYPE := NULL;
  1374. BEGIN
  1375. SELECT COUNT(1)
  1376. INTO V_OFFCOUNT
  1377. FROM MIL_OFFLINE_RESLUT T
  1378. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1379. AND T.PLINE_CODE = '#PLINE_CODE#'
  1380. AND T.OFFLINE_PRO = '#OFFLINE_PRO#';
  1381. IF (V_OFFCOUNT > 0) THEN
  1382. UPDATE MIL_OFFLINE_RESLUT T
  1383. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
  1384. TO_NUMBER('#OFFLINE_NUM#')
  1385. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1386. AND T.OFFLINE_PRO = '#OFFLINE_PRO#';
  1387. ELSE
  1388. INSERT INTO MIL_OFFLINE_RESLUT
  1389. (RECHECK_NUM,
  1390. PRODUCNAME,
  1391. STEELCODE,
  1392. STEELNAME,
  1393. GRADECODE,
  1394. GRADENAME,
  1395. SPEC_CODE,
  1396. SPEC_NAME,
  1397. MODEL_CODE,
  1398. MODEL_DESC,
  1399. STD_CODE,
  1400. STD_NAME,
  1401. STD_STYLE,
  1402. STD_STYLE_DESC,
  1403. ACT_LEN_RANGE,
  1404. CONTRACT_NO,
  1405. PRODUCCODE,
  1406. INSTORAGE_NUM,
  1407. QUALIFIED_NUM,
  1408. SCRAP_NUM,
  1409. ZP_M_LH,
  1410. LOT_NO,
  1411. STOVE_NO,
  1412. JUDGE_STOVE_NO,
  1413. DIAMETER,
  1414. THICKNESS,
  1415. LENGTH,
  1416. PLINE_CODE,
  1417. OFFLINE_PRO,
  1418. REAL_TIME_STATUS,
  1419. OFFLINE_NUM,
  1420. BACKLINE_NUM,
  1421. GROUP_NUM,
  1422. FINAL_NUM,
  1423. ZP_FLAG,
  1424. STATUS,
  1425. TYPE_FLAG,
  1426. OFFLINE_TIME,
  1427. REMARK,
  1428. COL_USER,
  1429. COL_SHIFT,
  1430. COL_GROUP,
  1431. OFFLINE_TYPE,
  1432. ZP_HEIGHT,
  1433. TARGET,
  1434. IMP_PROCESS,
  1435. PRO_PLAN_ID,
  1436. GX_PLAN_NO)
  1437. VALUES
  1438. ('0',
  1439. '#PRODUCNAME#',
  1440. '#STEELCODE#',
  1441. '#STEELNAME#',
  1442. '#GRADECODE#',
  1443. '#GRADENAME#',
  1444. '#SPEC_CODE#',
  1445. '#SPEC_NAME#',
  1446. '#MODEL_CODE#',
  1447. '#MODEL_DESC#',
  1448. '#STD_CODE#',
  1449. '#STD_NAME#',
  1450. '#STD_STYLE#',
  1451. '#STD_STYLE_DESC#',
  1452. '#ACT_LEN_RANGE#',
  1453. '#CONTRACT_NO#',
  1454. '#PRODUCCODE#',
  1455. '0',
  1456. '0',
  1457. '0',
  1458. '',
  1459. '#LOT_NO#',
  1460. '#STOVE_NO#',
  1461. '#JUDGE_STOVE_NO#',
  1462. '#DIAMETER#',
  1463. '#THICKNESS#',
  1464. '#LENGTH#',
  1465. '#PLINE_CODE#',
  1466. '#OFFLINE_PRO#',
  1467. '0',
  1468. '#OFFLINE_NUM#',
  1469. '0',
  1470. '0',
  1471. '0',
  1472. '0',
  1473. '0',
  1474. '0',
  1475. TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1476. '',
  1477. '#COL_USER#',
  1478. '#COL_SHIFT#',
  1479. '#COL_GROUP#',
  1480. '#OFFLINE_TYPE#',
  1481. '#ZP_HEIGHT#',
  1482. '#TARGET#',
  1483. '#IMP_PROCESS#',
  1484. '#PRO_PLAN_ID#',
  1485. '#GX_PLAN_NO#');
  1486. END IF;
  1487. IF ('#OFFLINE_PRO#' = 'JZ') THEN
  1488. UPDATE MIL_STRAIGHTENING_RESULT T
  1489. SET T.OFFLINE_NUM_TOTAL = TO_NUMBER(T.OFFLINE_NUM_TOTAL) +
  1490. TO_NUMBER('#OFFLINE_NUM#'),
  1491. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
  1492. TO_NUMBER('#OFFLINE_NUM#')
  1493. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1494. AND T.PLINE_CODE = '#PLINE_CODE#';
  1495. FOR MYROW IN (SELECT *
  1496. FROM (SELECT T.SEQ
  1497. FROM MIL_STRAIGH_RACK T
  1498. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1499. AND T.PLINE_CODE = '#PLINE_CODE#'
  1500. AND T.OFFLINE_FLAG = '0'
  1501. AND T.STATUS = '0'
  1502. ORDER BY T.SEQ ASC)
  1503. WHERE ROWNUM <= #OFFLINE_NUM#) LOOP
  1504. UPDATE MIL_STRAIGH_RACK T
  1505. SET T.OFFLINE_FLAG = '1',
  1506. T.STATUS = '3',
  1507. T.OFFLINE_TIME = TO_DATE('#OFFLINE_TIME#',
  1508. 'YYYY-MM-DD HH24:MI:SS')
  1509. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1510. AND T.PLINE_CODE = '#PLINE_CODE#'
  1511. AND T.SEQ = MYROW.SEQ;
  1512. INSERT INTO MIL_SLAB_SCRAP_SEQ
  1513. (COL_NO,
  1514. COL_TYPE,
  1515. JUDGE_STOVE_NO,
  1516. PROCESS_NO,
  1517. SEQ,
  1518. TIME,
  1519. FLAG,
  1520. COL_MODE,
  1521. COL_TIME,
  1522. COL_USER,
  1523. COL_SHIFT,
  1524. COL_GROUP,
  1525. RESULT_NO,
  1526. PRO_PLAN_ID,
  1527. GX_PLAN_NO)
  1528. VALUES
  1529. ('1',
  1530. '1',
  1531. '#JUDGE_STOVE_NO#',
  1532. '9',
  1533. MYROW.SEQ,
  1534. TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1535. '0',
  1536. '0',
  1537. TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1538. '#COL_USER#',
  1539. '#COL_SHIFT#',
  1540. '#COL_GROUP#',
  1541. '#ID#',
  1542. '#PRO_PLAN_ID#',
  1543. '#GX_PLAN_NO#');
  1544. END LOOP;
  1545. ELSIF ('#OFFLINE_PRO#' = 'TS') THEN
  1546. IF ('#PLINE_CODE#' = 'C010') THEN
  1547. UPDATE MIL_ET_RESULT T
  1548. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
  1549. TO_NUMBER('#OFFLINE_NUM#')
  1550. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1551. AND T.PLINE_CODE = '#PLINE_CODE#';
  1552. ELSE
  1553. UPDATE MIL_MT_RESULT T
  1554. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
  1555. TO_NUMBER('#OFFLINE_NUM#')
  1556. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1557. AND T.PLINE_CODE = '#PLINE_CODE#';
  1558. END IF;
  1559. FOR MYROW IN (SELECT *
  1560. FROM (SELECT T.SEQ
  1561. FROM MIL_TESTING_RACK T
  1562. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1563. AND T.PLINE_CODE = '#PLINE_CODE#'
  1564. AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  1565. AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
  1566. AND T.OFFLINE_FLAG = '0'
  1567. AND T.STATUS = '0'
  1568. AND T.SUSPECT_FLAG = '0'
  1569. ORDER BY T.SEQ ASC)
  1570. WHERE ROWNUM <= #OFFLINE_NUM#) LOOP
  1571. UPDATE MIL_TESTING_RACK T
  1572. SET T.OFFLINE_FLAG = '1',
  1573. T.OFFLINE_TYPE = '1',
  1574. T.OFFLINE_TIME = TO_DATE('#OFFLINE_TIME#',
  1575. 'YYYY-MM-DD HH24:MI:SS')
  1576. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1577. AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  1578. AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
  1579. AND T.PLINE_CODE = '#PLINE_CODE#'
  1580. AND T.SEQ = MYROW.SEQ;
  1581. INSERT INTO MIL_SLAB_SCRAP_SEQ
  1582. (COL_NO,
  1583. COL_TYPE,
  1584. JUDGE_STOVE_NO,
  1585. PROCESS_NO,
  1586. SEQ,
  1587. TIME,
  1588. FLAG,
  1589. COL_MODE,
  1590. COL_TIME,
  1591. COL_USER,
  1592. COL_SHIFT,
  1593. COL_GROUP,
  1594. RESULT_NO,
  1595. PRO_PLAN_ID,
  1596. GX_PLAN_NO)
  1597. VALUES
  1598. ('1',
  1599. '1',
  1600. '#JUDGE_STOVE_NO#',
  1601. '10',
  1602. MYROW.SEQ,
  1603. TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1604. '0',
  1605. '0',
  1606. TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1607. '#COL_USER#',
  1608. '#COL_SHIFT#',
  1609. '#COL_GROUP#',
  1610. '#ID#',
  1611. '#PRO_PLAN_ID#',
  1612. '#GX_PLAN_NO#');
  1613. END LOOP;
  1614. ELSIF ('#OFFLINE_PRO#' = 'ZJ') THEN
  1615. UPDATE MIL_SURFACE_RESULT T
  1616. SET T.OFFLINE_QUANTITY = TO_NUMBER(T.OFFLINE_QUANTITY) +
  1617. TO_NUMBER('#OFFLINE_NUM#')
  1618. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1619. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1620. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  1621. FOR MYROWOFFLINE IN (SELECT *
  1622. FROM (SELECT T.SEQ, T.JUDGE_STOVE_NO
  1623. FROM MIL_QA_RACK T
  1624. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1625. AND T.OFFLINE_FLAG = '0'
  1626. AND T.STATUS = '0'
  1627. ORDER BY T.SEQ ASC)
  1628. WHERE ROWNUM <= #OFFLINE_NUM#) LOOP
  1629. UPDATE MIL_QA_RACK T
  1630. SET T.OFFLINE_FLAG = '1', T.STATUS = '2'
  1631. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1632. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1633. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1634. AND T.SEQ = MYROWOFFLINE.SEQ;
  1635. INSERT INTO MIL_SLAB_SCRAP_SEQ
  1636. (COL_NO,
  1637. COL_TYPE,
  1638. JUDGE_STOVE_NO,
  1639. PROCESS_NO,
  1640. SEQ,
  1641. TIME,
  1642. FLAG,
  1643. COL_MODE,
  1644. COL_TIME,
  1645. COL_USER,
  1646. COL_SHIFT,
  1647. COL_GROUP,
  1648. RESULT_NO,
  1649. PRO_PLAN_ID,
  1650. GX_PLAN_NO)
  1651. VALUES
  1652. ('0',
  1653. '1',
  1654. '#JUDGE_STOVE_NO#',
  1655. '11',
  1656. MYROWOFFLINE.SEQ,
  1657. TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1658. '0',
  1659. '0',
  1660. TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1661. '#COL_USER#',
  1662. '#COL_SHIFT#',
  1663. '#COL_GROUP#',
  1664. '#ID#',
  1665. '#PRO_PLAN_ID#',
  1666. '#GX_PLAN_NO#');
  1667. END LOOP;
  1668. ELSIF ('#OFFLINE_PRO#' = 'XX') THEN
  1669. SELECT COUNT(1)
  1670. INTO V_COUNT
  1671. FROM MIL_INSTORE_RESULT T
  1672. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1673. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1674. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1675. AND T.RESULT_NO = '#ID#';
  1676. IF (V_COUNT > 0) THEN
  1677. UPDATE MIL_INSTORE_RESULT T
  1678. SET T.OFFLINE_NUM = TO_NUMBER(NVL(OFFLINE_NUM, 0)) + TO_NUMBER('#OFFLINE_NUM#')
  1679. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1680. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1681. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1682. AND T.RESULT_NO = '#ID#';
  1683. ELSE
  1684. INSERT INTO MIL_INSTORE_RESULT
  1685. (RESULT_NO,
  1686. JUDGE_STOVE_NO,
  1687. LOT_NO,
  1688. PLINE_CODE,
  1689. TYPE,
  1690. TARGET_DIAMETER,
  1691. TARGET_THICKNESS,
  1692. TARGET_LENGTH,
  1693. QUALIFIED_NUM,
  1694. QUALIFIED_TONS,
  1695. SCRAP_NUM,
  1696. SCRAP_TONS,
  1697. OFFLINE_NUM,
  1698. OFFLINE_TONS,
  1699. PRO_PLAN_ID,
  1700. GX_PLAN_NO)
  1701. VALUES
  1702. ('#ID#',
  1703. '#JUDGE_STOVE_NO#',
  1704. '#LOT_NO#',
  1705. '#PLINE_CODE#',
  1706. '#GRADENAME#',
  1707. '',
  1708. '',
  1709. '#ACT_LEN_RANGE#',
  1710. '',
  1711. '',
  1712. '',
  1713. '',
  1714. '#OFFLINE_NUM#',
  1715. '',
  1716. '#PRO_PLAN_ID#',
  1717. '#GX_PLAN_NO#');
  1718. END IF;
  1719. END IF;
  1720. END;
  1721. ]]>
  1722. </query>
  1723. <query id = "FrmFilpOutStorage.queryMatNoM" desc = "查询材料号">
  1724. <![CDATA[
  1725. SELECT ? || ? ||
  1726. LPAD(NVL(MAX(SUBSTR(T.MAT_NO, LENGTH(T.MAT_NO) - 3)), 0) + 1, 4, 0) MAT_NO
  1727. FROM (SELECT MAX(T1.MAT_NO) MAT_NO
  1728. FROM MAT_BC_M T1
  1729. WHERE T1.JUDGE_STOVE_NO = ?
  1730. AND T1.BATCH_NO = ?
  1731. UNION ALL
  1732. SELECT MAX(T3.MAT_NO) MAT_NO
  1733. FROM MAT_ZC_BACKUP T3
  1734. WHERE T3.JUDGE_STOVE_NO = ?
  1735. AND T3.BATCH_NO = ?
  1736. UNION ALL
  1737. SELECT MAX(T4.MAT_NO) MAT_NO
  1738. FROM YDM_BC_INLIST T4
  1739. WHERE T4.JUDGE_STOVE_NO = ?
  1740. AND T4.BATCH_NO = ?) T
  1741. ]]>
  1742. </query>
  1743. <query id = "FrmFilpOutStorage.insertMatSql" desc = "离线入库存">
  1744. DECLARE
  1745. V_TIME MIL_OFFLINE_RESLUT.OFFLINE_TIME%TYPE := SYSDATE;
  1746. BEGIN
  1747. INSERT INTO YDM_BC_BUTTRESS
  1748. (JUDGE_STOVE_NO,
  1749. BATCH_NO,
  1750. BATCH_GROUD_NO,
  1751. STORAGE_NO,
  1752. LOCATION_NO,
  1753. STORAGE_TYPE_NO,
  1754. STORAGE_TYPE_NAME,
  1755. CREATE_NAME,
  1756. MAT_NO,
  1757. CREATE_TIME,
  1758. MANAGEMENT_NO,
  1759. MANAGEMENT_NAME,
  1760. DEPARTMENT_CODE,
  1761. DEPARTMENT_DESC)
  1762. VALUES
  1763. ('#JUDGE_STOVE_NO#',
  1764. '#BATCH_NO#',
  1765. '#BATCH_GROUD_NO#',
  1766. '#STORAGE_NO#',
  1767. '#LOCATION_NO#',
  1768. '#STORAGE_TYPE_NO#',
  1769. '#STORAGE_TYPE_NAME#',
  1770. '#CREATE_NAME#',
  1771. '#MAT_NO#',
  1772. TO_DATE('#CREATE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1773. '#MANAGEMENT_NO#',
  1774. '#MANAGEMENT_NAME#',
  1775. '#DEPARTMENT_CODE#',
  1776. '#DEPARTMENT_DESC#');
  1777. INSERT INTO MAT_BC_M
  1778. (JUDGE_STOVE_NO,
  1779. BATCH_NO,
  1780. BATCH_GROUD_NO,
  1781. ACT_COUNT,
  1782. ACT_WEIGHT,
  1783. CREATE_TIME,
  1784. MAT_NO,
  1785. PRODUCT_FLAG,
  1786. MAT_STATUS,
  1787. PLINE_CODE,
  1788. PLINE_NAME,
  1789. QCM_STAUS,
  1790. HEAT_PLAN_NO,
  1791. ZG_STOVE_SQE,
  1792. PRODUCCODE,
  1793. PRODUCNAME,
  1794. STEELCODE,
  1795. STEELNAME,
  1796. SPEC_CODE,
  1797. SPEC_NAME,
  1798. GRADECODE,
  1799. GRADENAME,
  1800. MODEL_CODE,
  1801. MODEL_DESC,
  1802. STD_CODE,
  1803. STD_NAME,
  1804. BELONG_CODE,
  1805. BELONG_NAME,
  1806. STD_STYLE,
  1807. STD_STYLE_DESC,
  1808. ACT_DIMATER,
  1809. ACT_HEIGHT,
  1810. ACT_LEN_MIN,
  1811. ACT_LEN_MAX,
  1812. LOT_NO,
  1813. PRO_ORDER_NO,
  1814. ACT_LEN,
  1815. TARGET,
  1816. PROCESS_STATUS,
  1817. FLAG_STOVE_NO_ZG,
  1818. INSTOCK_TIME,
  1819. STOVE_NO)
  1820. VALUES
  1821. ('#JUDGE_STOVE_NO#',
  1822. '#BATCH_NO#',
  1823. '#BATCH_GROUD_NO#',
  1824. '#ACT_COUNT#',
  1825. '#ACT_WEIGHT#',
  1826. TO_DATE('#CREATE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1827. '#MAT_NO#',
  1828. '#PRODUCT_FLAG#',
  1829. '#MAT_STATUS#',
  1830. '#PLINE_CODE#',
  1831. '#PLINE_NAME#',
  1832. '#QCM_STAUS#',
  1833. '#HEAT_PLAN_NO#',
  1834. '#ZG_STOVE_SQE#',
  1835. '#PRODUCCODE#',
  1836. '#PRODUCNAME#',
  1837. '#STEELCODE#',
  1838. '#STEELNAME#',
  1839. '#SPEC_CODE#',
  1840. '#SPEC_NAME#',
  1841. '#GRADECODE#',
  1842. '#GRADENAME#',
  1843. '#MODEL_CODE#',
  1844. '#MODEL_DESC#',
  1845. '#STD_CODE#',
  1846. '#STD_NAME#',
  1847. '#BELONG_CODE#',
  1848. '#BELONG_NAME#',
  1849. '#STD_STYLE#',
  1850. '#STD_STYLE_DESC#',
  1851. '#ACT_DIMATER#',
  1852. '#ACT_HEIGHT#',
  1853. '#ACT_LEN_MIN#',
  1854. '#ACT_LEN_MAX#',
  1855. '#LOT_NO#',
  1856. '#PRO_ORDER_NO#',
  1857. '#ACT_LEN#',
  1858. '#TARGET#',
  1859. '#PROCESS_STATUS#',
  1860. '#JUDGE_STOVE_NO#',
  1861. TO_DATE('#CREATE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1862. '#STOVE_NO#');
  1863. END;
  1864. </query>
  1865. <query id = "FrmFilpOutStorage.insertCheckDeatil" desc = "插入表检详细表">
  1866. DECLARE
  1867. V_COUNT MIL_CHECK_DEATIL_SIMPLE.OFFLINE_PRODUCT%TYPE := NULL;
  1868. BEGIN
  1869. SELECT NVL(COUNT(1),0)
  1870. INTO V_COUNT
  1871. FROM MIL_CHECK_DEATIL_SIMPLE T
  1872. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1873. AND T.RESULT_NO = '#RESULT_NO#'
  1874. AND T.DEFECT_CODE = '#DEFECT_CODE#';
  1875. IF (V_COUNT > 0) THEN
  1876. UPDATE MIL_CHECK_DEATIL_SIMPLE T
  1877. SET T.OFFLINE_PRODUCT = TO_NUMBER(NVL(T.OFFLINE_PRODUCT, 0)) +
  1878. TO_NUMBER('#OFFLINE_PRODUCT#')
  1879. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1880. AND T.RESULT_NO = '#RESULT_NO#'
  1881. AND T.DEFECT_CODE = '#DEFECT_CODE#';
  1882. ELSE
  1883. INSERT INTO MIL_CHECK_DEATIL_SIMPLE
  1884. (JUDGE_STOVE_NO,
  1885. DEFECT_ITEM,
  1886. OFFLINE_PRODUCT,
  1887. DEFECT_CODE,
  1888. RESULT_NO,
  1889. PRO_PLAN_ID,
  1890. GX_PLAN_NO)
  1891. VALUES
  1892. ('#JUDGE_STOVE_NO#',
  1893. '#DEFECT_ITEM#',
  1894. '#OFFLINE_PRODUCT#',
  1895. '#DEFECT_CODE#',
  1896. '#RESULT_NO#',
  1897. '#PRO_PLAN_ID#',
  1898. '#GX_PLAN_NO#');
  1899. END IF;
  1900. END;
  1901. </query>
  1902. <query id = "FrmFilpOutStorage.getStoreAll" desc = "查询所有仓库">
  1903. SELECT T.STORAGE_NO,T.STORAGE_NAME FROM YDM_BS_STORAGE T WHERE T.STORAGE_TYPE_NO IN('800202','800205') AND T.VALIDFLAG = '1' and t.seam_area = '1'
  1904. </query>
  1905. <query id = "FrmFilpOutStorage.doAdd" desc = "票据倒库">
  1906. <![CDATA[
  1907. DECLARE
  1908. V_OUTSTOCK_DOC YDM_BC_OUTLIST.OUTSTOCK_DOC%TYPE := NULL; --出库单号
  1909. V_OUTSTOCK_SQE YDM_BC_OUTLIST.OUTSTOCK_SQE%TYPE := NULL; --出库流水
  1910. V_MEMO COM_BASE_INFO.MEMO%TYPE := NULL;
  1911. V_BASENAME COM_BASE_INFO.BASENAME%TYPE := NULL;
  1912. V_OCOUNT NUMBER := 1;
  1913. V_TIME YDM_BC_OUTLIST.CREATE_TIME%TYPE := SYSDATE;
  1914. V_BATHYEAR MAT_BC_M.BAL_YEAR_MONTH%TYPE := TO_CHAR(SYSDATE, 'YYYYMM');
  1915. V_DATA_SOURCE YDM_BC_OUTLIST.DATA_SUORCE%TYPE := NULL;
  1916. V_COUNT YDM_BC_OUTLIST.ACT_COUNT%TYPE :=NULL;
  1917. BEGIN
  1918. SELECT COUNT(1)INTO V_COUNT FROM YDM_BC_OUTLISTDOC T WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#';
  1919. --生成出库单号
  1920. V_OUTSTOCK_DOC := '#OUTSTOCK_DOC#';
  1921. SELECT MEMO, BASENAME
  1922. INTO V_MEMO, V_BASENAME
  1923. FROM COM_BASE_INFO
  1924. WHERE BASECODE = '#OUTSTOCK_TYPE_CODE#';
  1925. SELECT TO_NUMBER(LPAD((NVL(MAX(SUBSTR(T.OUTSTOCK_SQE, 16)), 0) + 1), 4, 0)) OUTSTOCK_SQE
  1926. INTO V_OCOUNT
  1927. FROM YDM_BC_OUTLIST T
  1928. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#';
  1929. IF ('#BAR_CODE#' = '0') THEN
  1930. V_DATA_SOURCE := '0';
  1931. FOR MYROW IN (SELECT T.*,
  1932. S.STORAGE_NO,
  1933. S.LOCATION_NO,
  1934. S.LARY_NO,
  1935. S.LOC_NO,
  1936. S.STORAGE_ATTR,
  1937. S.STORAGE_ATTR_NAME,
  1938. S.STORAGE_TYPE_NO,
  1939. S.STORAGE_TYPE_NAME
  1940. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  1941. WHERE T.MAT_NO = S.MAT_NO
  1942. AND NVL(T.LOT_NO,'/') = NVL('#LOT_NO#','/')
  1943. AND NVL(T.STOVE_NO, '/') = NVL('#STOVE_NO#', '/')
  1944. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1945. AND T.BATCH_NO = '#BATCH_NO#'
  1946. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  1947. AND T.PRODUCT_FLAG = '#PRODUCT_FLAG#'
  1948. AND T.MAT_STATUS = '#MAT_STATUS_CODE#'
  1949. AND NVL(S.STORAGE_NO, '/') = NVL('#STORAGE_NO#', '/')
  1950. AND T.QCM_STAUS = '#QCM_STAUS#'
  1951. AND NVL(S.LOCATION_NO, '/') = NVL('#LOCATION_NO#', '/')
  1952. AND NVL(S.LARY_NO, '1') = NVL('#LARY_NO#', '1')
  1953. AND NVL(T.PRO_PLAN_ID_NEXT, '/') =
  1954. NVL('#PRO_PLAN_ID_NEXT#', '/')
  1955. AND NVL(T.GX_PLAN_NO_NEXT, '/') =
  1956. NVL('#GX_PLAN_NO_NEXT#', '/')
  1957. AND T.BELONG_CODE = '#BELONG_CODE#'
  1958. AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
  1959. AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
  1960. AND NVL(T.FLAG_STOVE_NO_ZG,'/') = NVL('#FLAG_STOVE_NO_ZG#','/')
  1961. AND S.STORAGE_NO IS NOT NULL
  1962. AND NVL(T.OFFLINE_DOC,'/') = NVL('#OFFLINE_DOC#','/')
  1963. AND NVL(T.MEMO,'/') = NVL('#MEMO#','/')
  1964. AND NVL(T.PIPMEMO,'/') = NVL('#PIPMEMO#','/')
  1965. AND NVL(T.MEMO1,'/') = NVL('#MEMO1#','/')
  1966. AND ROWNUM <= #ACT_COUNT#
  1967. ORDER BY T.MAT_NO DESC) LOOP
  1968. V_OUTSTOCK_SQE := V_OUTSTOCK_DOC || LPAD(V_OCOUNT, 4, 0);
  1969. INSERT INTO YDM_BC_OUTLIST
  1970. (OUTSTOCK_SQE,
  1971. OUTSTOCK_DOC,
  1972. OUTSTOCK_TYPE_CODE,
  1973. OUTSTOCK_TYPE_NAME,
  1974. ICCAR_NO,
  1975. VEHICLE_NO,
  1976. MAT_NO,
  1977. LOT_NO,
  1978. STOVE_NO,
  1979. JUDGE_STOVE_NO,
  1980. BATCH_NO,
  1981. BATCH_GROUD_NO,
  1982. MATERIAL_NO,
  1983. MATERIAL_NAME,
  1984. PRODUCCODE,
  1985. PRODUCNAME,
  1986. STD_CODE,
  1987. STD_NAME,
  1988. GRADECODE,
  1989. GRADENAME,
  1990. STEELCODE,
  1991. STEELNAME,
  1992. STD_STYLE,
  1993. STD_STYLE_DESC,
  1994. SPEC_CODE,
  1995. SPEC_NAME,
  1996. MODEL_CODE,
  1997. MODEL_DESC,
  1998. PRO_ORDER_NO,
  1999. PLINE_CODE,
  2000. PLINE_NAME,
  2001. ACT_DIMATER,
  2002. ACT_HEIGHT,
  2003. ACT_LEN,
  2004. ACT_LEN_MIN,
  2005. ACT_LEN_MAX,
  2006. ACT_COUNT,
  2007. ACT_WEIGHT,
  2008. ACT_THEORY_WEIGHT,
  2009. BELONG_CODE,
  2010. BELONG_NAME,
  2011. STORAGE_NO,
  2012. LOCATION_NO,
  2013. LARY_NO,
  2014. LOC_NO,
  2015. STORAGE_ATTR,
  2016. STORAGE_ATTR_NAME,
  2017. STORAGE_TYPE_NO,
  2018. STORAGE_TYPE_NAME,
  2019. TAR_STORAGE_NO,
  2020. TAR_REC_FLAG,
  2021. INSTOCK_TIME,
  2022. OUTSTOCK_TIME,
  2023. OUT_BC,
  2024. OUT_BZ,
  2025. CREATE_NAME,
  2026. CREATE_TIME,
  2027. ORD_PK,
  2028. ORD_LN_PK,
  2029. ORD_LN_DLY_PK,
  2030. ORDER_NO,
  2031. ORDER_SEQ,
  2032. DELIVERY_NO,
  2033. PRODUCT_FLAG,
  2034. MAT_STATUS,
  2035. JUDGE_STD_NAME,
  2036. BAL_YEAR_MONTH,
  2037. DATA_SUORCE,
  2038. QCM_STAUS,
  2039. LEAVE_FACTORY_FLAG,
  2040. BELONG_CODE_RESPONSE,
  2041. BELONG_NAME_RESPONSE,
  2042. DRIVER,
  2043. OUT_TYPE,
  2044. FLAG_STOVE_NO_ZG,
  2045. SUPERVISOR_NAME,
  2046. SUPERVISOR_CALL,
  2047. PRO_ORDER_ID,
  2048. GX_PLAN_NO,
  2049. PIPMEMO,
  2050. MEMO,
  2051. OUTSTOCK_PLAN_NO
  2052. )
  2053. VALUES
  2054. (V_OUTSTOCK_SQE,
  2055. V_OUTSTOCK_DOC,
  2056. '#OUTSTOCK_TYPE_CODE#',
  2057. '#OUTSTOCK_TYPE_NAME#',
  2058. '#ICCAR_NO#',
  2059. '#VEHICLE_NO#',
  2060. MYROW.MAT_NO,
  2061. MYROW.LOT_NO,
  2062. MYROW.STOVE_NO,
  2063. MYROW.JUDGE_STOVE_NO,
  2064. MYROW.BATCH_NO,
  2065. MYROW.BATCH_GROUD_NO,
  2066. MYROW.MATERIAL_NO,
  2067. MYROW.MATERIAL_NAME,
  2068. MYROW.PRODUCCODE,
  2069. MYROW.PRODUCNAME,
  2070. MYROW.STD_CODE,
  2071. MYROW.STD_NAME,
  2072. MYROW.GRADECODE,
  2073. MYROW.GRADENAME,
  2074. MYROW.STEELCODE,
  2075. MYROW.STEELNAME,
  2076. MYROW.STD_STYLE,
  2077. MYROW.STD_STYLE_DESC,
  2078. MYROW.SPEC_CODE,
  2079. MYROW.SPEC_NAME,
  2080. MYROW.MODEL_CODE,
  2081. MYROW.MODEL_DESC,
  2082. MYROW.PRO_ORDER_NO,
  2083. MYROW.PLINE_CODE,
  2084. MYROW.PLINE_NAME,
  2085. MYROW.ACT_DIMATER,
  2086. MYROW.ACT_HEIGHT,
  2087. MYROW.ACT_LEN,
  2088. MYROW.ACT_LEN_MIN,
  2089. MYROW.ACT_LEN_MAX,
  2090. MYROW.ACT_COUNT,
  2091. MYROW.ACT_WEIGHT,
  2092. MYROW.ACT_THEORY_WEIGHT,
  2093. MYROW.BELONG_CODE,
  2094. MYROW.BELONG_NAME,
  2095. MYROW.STORAGE_NO,
  2096. MYROW.LOCATION_NO,
  2097. MYROW.LARY_NO,
  2098. MYROW.LOC_NO,
  2099. MYROW.STORAGE_ATTR,
  2100. MYROW.STORAGE_ATTR_NAME,
  2101. MYROW.STORAGE_TYPE_NO,
  2102. MYROW.STORAGE_TYPE_NAME,
  2103. '#TAR_STORAGE_NO#',
  2104. '0',
  2105. MYROW.INSTOCK_TIME,
  2106. V_TIME,
  2107. '#OUT_BC#',
  2108. '#OUT_BZ#',
  2109. '#CREATE_NAME#',
  2110. V_TIME,
  2111. MYROW.ORD_PK,
  2112. MYROW.ORD_LN_PK,
  2113. MYROW.ORD_LN_DLY_PK,
  2114. MYROW.ORDER_NO,
  2115. MYROW.ORDER_SEQ,
  2116. MYROW.ORDER_SEQ_NO,
  2117. MYROW.PRODUCT_FLAG,
  2118. MYROW.MAT_STATUS,
  2119. MYROW.JUDGE_STD_DES,
  2120. V_BATHYEAR,
  2121. V_DATA_SOURCE,
  2122. MYROW.QCM_STAUS,
  2123. '0',
  2124. (SELECT T1.DEPARTMENT_CODE_P FROM COM_BASE_PLINE T1 WHERE T1.PLINE_CODE = MYROW.PLINE_CODE),
  2125. (SELECT T2.DEPARTMENT_DESC_P FROM COM_BASE_PLINE T2 WHERE T2.PLINE_CODE = MYROW.PLINE_CODE),
  2126. '#DRIVER#',
  2127. '#OUT_TYPE#',
  2128. MYROW.FLAG_STOVE_NO_ZG,
  2129. '#SUPERVISOR_NAME#',
  2130. '#SUPERVISOR_CALL#',
  2131. MYROW.PRO_ORDER_ID,
  2132. MYROW.GX_PLAN_NO,
  2133. MYROW.PIPMEMO,
  2134. MYROW.MEMO,
  2135. '#OUTSTOCK_PLAN_NO#'
  2136. );
  2137. UPDATE YDM_BC_BUTTRESS T SET T.STORAGE_NO = '',T.LOCATION_NO = '',T.LARY_NO = '' WHERE T.MAT_NO = MYROW.MAT_NO;
  2138. --UPDATE MAT_BC_M T
  2139. --SET T.MAT_GOWHERE_CODE = '#MAT_GOWHERE_CODE#',
  2140. -- T.MAT_GOWHERE_NAME = '#MAT_GOWHERE_NAME#'
  2141. --WHERE T.MAT_NO = MYROW.MAT_NO;
  2142. V_OCOUNT := V_OCOUNT + 1;
  2143. END LOOP;
  2144. ELSE
  2145. V_DATA_SOURCE := '1';
  2146. FOR MYROW IN (SELECT F.*,S1.BILL_NO
  2147. FROM (SELECT T.*,
  2148. S.STORAGE_NO,
  2149. S.LOCATION_NO,
  2150. S.LARY_NO,
  2151. S.LOC_NO,
  2152. S.STORAGE_ATTR,
  2153. S.STORAGE_ATTR_NAME,
  2154. S.STORAGE_TYPE_NO,
  2155. S.STORAGE_TYPE_NAME
  2156. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  2157. WHERE T.MAT_NO = S.MAT_NO
  2158. AND NVL(T.LOT_NO, '/') = NVL('#LOT_NO#', '/')
  2159. AND NVL(T.STOVE_NO, '/') = NVL('#STOVE_NO#', '/')
  2160. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2161. AND T.BATCH_NO = '#BATCH_NO#'
  2162. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2163. AND T.PRODUCT_FLAG = '#PRODUCT_FLAG#'
  2164. AND T.MAT_STATUS = '#MAT_STATUS_CODE#'
  2165. AND NVL(S.STORAGE_NO, '/') = NVL('#STORAGE_NO#', '/')
  2166. AND NVL(S.LOCATION_NO, '/') = NVL('#LOCATION_NO#', '/')
  2167. AND NVL(S.LARY_NO, '1') = NVL('#LARY_NO#', '1')
  2168. AND T.BELONG_CODE = '#BELONG_CODE#'
  2169. AND NVL(T.SUBCONTRACT_NO, '/') = NVL('#SUBCONTRACT_NO#', '/')
  2170. AND NVL(T.SUBCONTRACT_NO_SEQ, '/') =
  2171. NVL('#SUBCONTRACT_NO_SEQ#', '/')
  2172. AND NVL(T.FLAG_STOVE_NO_ZG,'/') = NVL('#FLAG_STOVE_NO_ZG#','/')
  2173. AND S.STORAGE_NO IS NOT NULL
  2174. AND T.LOCK_BILL_FLAG = '0'
  2175. AND NVL(T.PIPMEMO,'/') = NVL('#PIPMEMO#','/')
  2176. AND NVL(T.MEMO1,'/') = NVL('#MEMO1#','/')
  2177. AND NVL(T.MEMO,'/') = NVL('#MEMO#','/')
  2178. AND ROWNUM <= #ACT_COUNT#
  2179. ORDER BY T.MAT_NO DESC) F
  2180. LEFT JOIN YDM_ZC_BILL_C S1
  2181. ON F.MAT_NO = S1.MAT_NO
  2182. AND S1.EDIT_FLAG = '0'
  2183. --tzh 24.12.13 add 加入只查询实际的提单号
  2184. AND bill_no IN (select bill_no from YDM_ZC_BILL_m W1 where S1.BILL_NO=W1.BILL_NO AND W1.Loadvehicle_Type = '1')) LOOP
  2185. V_OUTSTOCK_SQE := V_OUTSTOCK_DOC || LPAD(V_OCOUNT, 4, 0);
  2186. INSERT INTO YDM_BC_OUTLIST
  2187. (OUTSTOCK_SQE,
  2188. OUTSTOCK_DOC,
  2189. OUTSTOCK_TYPE_CODE,
  2190. OUTSTOCK_TYPE_NAME,
  2191. ICCAR_NO,
  2192. VEHICLE_NO,
  2193. MAT_NO,
  2194. LOT_NO,
  2195. STOVE_NO,
  2196. JUDGE_STOVE_NO,
  2197. BATCH_NO,
  2198. BATCH_GROUD_NO,
  2199. MATERIAL_NO,
  2200. MATERIAL_NAME,
  2201. PRODUCCODE,
  2202. PRODUCNAME,
  2203. STD_CODE,
  2204. STD_NAME,
  2205. GRADECODE,
  2206. GRADENAME,
  2207. STEELCODE,
  2208. STEELNAME,
  2209. STD_STYLE,
  2210. STD_STYLE_DESC,
  2211. SPEC_CODE,
  2212. SPEC_NAME,
  2213. MODEL_CODE,
  2214. MODEL_DESC,
  2215. PRO_ORDER_NO,
  2216. PLINE_CODE,
  2217. PLINE_NAME,
  2218. ACT_DIMATER,
  2219. ACT_HEIGHT,
  2220. ACT_LEN,
  2221. ACT_LEN_MIN,
  2222. ACT_LEN_MAX,
  2223. ACT_COUNT,
  2224. ACT_WEIGHT,
  2225. ACT_THEORY_WEIGHT,
  2226. BELONG_CODE,
  2227. BELONG_NAME,
  2228. STORAGE_NO,
  2229. LOCATION_NO,
  2230. LARY_NO,
  2231. LOC_NO,
  2232. STORAGE_ATTR,
  2233. STORAGE_ATTR_NAME,
  2234. STORAGE_TYPE_NO,
  2235. STORAGE_TYPE_NAME,
  2236. TAR_STORAGE_NO,
  2237. TAR_REC_FLAG,
  2238. INSTOCK_TIME,
  2239. OUTSTOCK_TIME,
  2240. OUT_BC,
  2241. OUT_BZ,
  2242. CREATE_NAME,
  2243. CREATE_TIME,
  2244. ORD_PK,
  2245. ORD_LN_PK,
  2246. ORD_LN_DLY_PK,
  2247. ORDER_NO,
  2248. ORDER_SEQ,
  2249. DELIVERY_NO,
  2250. PRODUCT_FLAG,
  2251. MAT_STATUS,
  2252. JUDGE_STD_NAME,
  2253. JUDGE_STD_CODE,
  2254. BAL_YEAR_MONTH,
  2255. DATA_SUORCE,
  2256. QCM_STAUS,
  2257. LEAVE_FACTORY_FLAG,
  2258. BELONG_CODE_RESPONSE,
  2259. BELONG_NAME_RESPONSE,
  2260. DRIVER,
  2261. OUT_TYPE,
  2262. FLAG_STOVE_NO_ZG,
  2263. M_BILL_NO,
  2264. SUPERVISOR_NAME,
  2265. SUPERVISOR_CALL,
  2266. PRO_ORDER_ID,
  2267. GX_PLAN_NO,
  2268. PIPMEMO,
  2269. MEMO,
  2270. OUTSTOCK_PLAN_NO)
  2271. VALUES
  2272. (V_OUTSTOCK_SQE,
  2273. V_OUTSTOCK_DOC,
  2274. '#OUTSTOCK_TYPE_CODE#',
  2275. '#OUTSTOCK_TYPE_NAME#',
  2276. '#ICCAR_NO#',
  2277. '#VEHICLE_NO#',
  2278. MYROW.MAT_NO,
  2279. MYROW.LOT_NO,
  2280. MYROW.STOVE_NO,
  2281. MYROW.JUDGE_STOVE_NO,
  2282. MYROW.BATCH_NO,
  2283. MYROW.BATCH_GROUD_NO,
  2284. MYROW.MATERIAL_NO,
  2285. MYROW.MATERIAL_NAME,
  2286. MYROW.PRODUCCODE,
  2287. MYROW.PRODUCNAME,
  2288. MYROW.STD_CODE,
  2289. MYROW.STD_NAME,
  2290. MYROW.GRADECODE,
  2291. MYROW.GRADENAME,
  2292. MYROW.STEELCODE,
  2293. MYROW.STEELNAME,
  2294. MYROW.STD_STYLE,
  2295. MYROW.STD_STYLE_DESC,
  2296. MYROW.SPEC_CODE,
  2297. MYROW.SPEC_NAME,
  2298. MYROW.MODEL_CODE,
  2299. MYROW.MODEL_DESC,
  2300. MYROW.PRO_ORDER_NO,
  2301. MYROW.PLINE_CODE,
  2302. MYROW.PLINE_NAME,
  2303. MYROW.ACT_DIMATER,
  2304. MYROW.ACT_HEIGHT,
  2305. MYROW.ACT_LEN,
  2306. MYROW.ACT_LEN_MIN,
  2307. MYROW.ACT_LEN_MAX,
  2308. MYROW.ACT_COUNT,
  2309. MYROW.ACT_WEIGHT,
  2310. MYROW.ACT_THEORY_WEIGHT,
  2311. MYROW.BELONG_CODE,
  2312. MYROW.BELONG_NAME,
  2313. MYROW.STORAGE_NO,
  2314. MYROW.LOCATION_NO,
  2315. MYROW.LARY_NO,
  2316. MYROW.LOC_NO,
  2317. MYROW.STORAGE_ATTR,
  2318. MYROW.STORAGE_ATTR_NAME,
  2319. MYROW.STORAGE_TYPE_NO,
  2320. MYROW.STORAGE_TYPE_NAME,
  2321. '#TAR_STORAGE_NO#',
  2322. '0',
  2323. MYROW.INSTOCK_TIME,
  2324. V_TIME,
  2325. '#OUT_BC#',
  2326. '#OUT_BZ#',
  2327. '#CREATE_NAME#',
  2328. V_TIME,
  2329. MYROW.ORD_PK,
  2330. MYROW.ORD_LN_PK,
  2331. MYROW.ORD_LN_DLY_PK,
  2332. MYROW.ORDER_NO,
  2333. MYROW.ORDER_SEQ,
  2334. MYROW.ORDER_SEQ_NO,
  2335. MYROW.PRODUCT_FLAG,
  2336. MYROW.MAT_STATUS,
  2337. MYROW.JUDGE_STD_NAME,
  2338. MYROW.JUDGE_STD_CODE,
  2339. V_BATHYEAR,
  2340. V_DATA_SOURCE,
  2341. '00',
  2342. '0',
  2343. (SELECT T1.DEPARTMENT_CODE_P FROM COM_BASE_PLINE T1 WHERE T1.PLINE_CODE = MYROW.PLINE_CODE),
  2344. (SELECT T2.DEPARTMENT_DESC_P FROM COM_BASE_PLINE T2 WHERE T2.PLINE_CODE = MYROW.PLINE_CODE),
  2345. '#DRIVER#',
  2346. '#OUT_TYPE#',
  2347. MYROW.FLAG_STOVE_NO_ZG,
  2348. MYROW.BILL_NO,
  2349. '#SUPERVISOR_NAME#',
  2350. '#SUPERVISOR_CALL#',
  2351. MYROW.PRO_ORDER_ID,
  2352. MYROW.GX_PLAN_NO,
  2353. MYROW.PIPMEMO,
  2354. MYROW.MEMO,
  2355. '#OUTSTOCK_PLAN_NO#');
  2356. UPDATE YDM_ZC_BUTTRESS T SET T.STORAGE_NO = '',T.LOCATION_NO = '',T.LARY_NO = '' WHERE T.MAT_NO = MYROW.MAT_NO;
  2357. V_OCOUNT := V_OCOUNT + 1;
  2358. END LOOP;
  2359. END IF;
  2360. IF(V_COUNT = 0)THEN
  2361. INSERT INTO YDM_BC_OUTLISTDOC (OUTSTOCK_DOC)VALUES ('#OUTSTOCK_DOC#');
  2362. END IF;
  2363. END;
  2364. ]]>
  2365. </query>
  2366. <query id = "FrmFilpOutStorage.doAddMat" desc = "按支倒库">
  2367. <![CDATA[
  2368. DECLARE
  2369. V_OUTSTOCK_DOC YDM_BC_OUTLIST.OUTSTOCK_DOC%TYPE := NULL; --出库单号
  2370. V_OUTSTOCK_SQE YDM_BC_OUTLIST.OUTSTOCK_SQE%TYPE := NULL; --出库流水
  2371. V_MEMO COM_BASE_INFO.MEMO%TYPE := NULL;
  2372. V_BASENAME COM_BASE_INFO.BASENAME%TYPE := NULL;
  2373. V_OCOUNT NUMBER := 1;
  2374. V_TIME YDM_BC_OUTLIST.CREATE_TIME%TYPE := SYSDATE;
  2375. V_BATHYEAR MAT_BC_M.BAL_YEAR_MONTH%TYPE := TO_CHAR(SYSDATE, 'YYYYMM');
  2376. V_DATA_SOURCE YDM_BC_OUTLIST.DATA_SUORCE%TYPE := NULL;
  2377. V_COUNT YDM_BC_OUTLIST.ACT_COUNT%TYPE :=NULL;
  2378. BEGIN
  2379. SELECT COUNT(1)INTO V_COUNT FROM YDM_BC_OUTLISTDOC T WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#';
  2380. --生成出库单号
  2381. V_OUTSTOCK_DOC := '#OUTSTOCK_DOC#';
  2382. SELECT MEMO, BASENAME
  2383. INTO V_MEMO, V_BASENAME
  2384. FROM COM_BASE_INFO
  2385. WHERE BASECODE = '#OUTSTOCK_TYPE_CODE#';
  2386. SELECT TO_NUMBER(LPAD((NVL(MAX(SUBSTR(T.OUTSTOCK_SQE, 16)), 0) + 1), 4, 0)) OUTSTOCK_SQE
  2387. INTO V_OCOUNT
  2388. FROM YDM_BC_OUTLIST T
  2389. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#';
  2390. IF ('#BAR_CODE#' = '0') THEN
  2391. V_DATA_SOURCE := '0';
  2392. FOR MYROW IN (SELECT T.*,
  2393. S.STORAGE_NO,
  2394. S.LOCATION_NO,
  2395. S.LARY_NO,
  2396. S.LOC_NO,
  2397. S.STORAGE_ATTR,
  2398. S.STORAGE_ATTR_NAME,
  2399. S.STORAGE_TYPE_NO,
  2400. S.STORAGE_TYPE_NAME
  2401. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  2402. WHERE T.MAT_NO = S.MAT_NO
  2403. AND T.MAT_NO = '#MAT_NO_S#'
  2404. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2405. AND T.BATCH_NO = '#BATCH_NO#'
  2406. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2407. AND S.STORAGE_NO IS NOT NULL) LOOP
  2408. V_OUTSTOCK_SQE := V_OUTSTOCK_DOC || LPAD(V_OCOUNT, 4, 0);
  2409. INSERT INTO YDM_BC_OUTLIST
  2410. (OUTSTOCK_SQE,
  2411. OUTSTOCK_DOC,
  2412. OUTSTOCK_TYPE_CODE,
  2413. OUTSTOCK_TYPE_NAME,
  2414. ICCAR_NO,
  2415. VEHICLE_NO,
  2416. MAT_NO,
  2417. LOT_NO,
  2418. STOVE_NO,
  2419. JUDGE_STOVE_NO,
  2420. BATCH_NO,
  2421. BATCH_GROUD_NO,
  2422. MATERIAL_NO,
  2423. MATERIAL_NAME,
  2424. PRODUCCODE,
  2425. PRODUCNAME,
  2426. STD_CODE,
  2427. STD_NAME,
  2428. GRADECODE,
  2429. GRADENAME,
  2430. STEELCODE,
  2431. STEELNAME,
  2432. STD_STYLE,
  2433. STD_STYLE_DESC,
  2434. SPEC_CODE,
  2435. SPEC_NAME,
  2436. MODEL_CODE,
  2437. MODEL_DESC,
  2438. PRO_ORDER_NO,
  2439. PLINE_CODE,
  2440. PLINE_NAME,
  2441. ACT_DIMATER,
  2442. ACT_HEIGHT,
  2443. ACT_LEN,
  2444. ACT_LEN_MIN,
  2445. ACT_LEN_MAX,
  2446. ACT_COUNT,
  2447. ACT_WEIGHT,
  2448. ACT_THEORY_WEIGHT,
  2449. BELONG_CODE,
  2450. BELONG_NAME,
  2451. STORAGE_NO,
  2452. LOCATION_NO,
  2453. LARY_NO,
  2454. LOC_NO,
  2455. STORAGE_ATTR,
  2456. STORAGE_ATTR_NAME,
  2457. STORAGE_TYPE_NO,
  2458. STORAGE_TYPE_NAME,
  2459. TAR_STORAGE_NO,
  2460. TAR_REC_FLAG,
  2461. INSTOCK_TIME,
  2462. OUTSTOCK_TIME,
  2463. OUT_BC,
  2464. OUT_BZ,
  2465. CREATE_NAME,
  2466. CREATE_TIME,
  2467. ORD_PK,
  2468. ORD_LN_PK,
  2469. ORD_LN_DLY_PK,
  2470. ORDER_NO,
  2471. ORDER_SEQ,
  2472. DELIVERY_NO,
  2473. PRODUCT_FLAG,
  2474. MAT_STATUS,
  2475. JUDGE_STD_NAME,
  2476. BAL_YEAR_MONTH,
  2477. DATA_SUORCE,
  2478. QCM_STAUS,
  2479. LEAVE_FACTORY_FLAG,
  2480. BELONG_CODE_RESPONSE,
  2481. BELONG_NAME_RESPONSE,
  2482. DRIVER,
  2483. OUT_TYPE,
  2484. FLAG_STOVE_NO_ZG,
  2485. SUPERVISOR_NAME,
  2486. SUPERVISOR_CALL,
  2487. PRO_ORDER_ID,
  2488. GX_PLAN_NO,
  2489. OUTSTOCK_PLAN_NO)
  2490. VALUES
  2491. (V_OUTSTOCK_SQE,
  2492. V_OUTSTOCK_DOC,
  2493. '#OUTSTOCK_TYPE_CODE#',
  2494. '#OUTSTOCK_TYPE_NAME#',
  2495. '#ICCAR_NO#',
  2496. '#VEHICLE_NO#',
  2497. MYROW.MAT_NO,
  2498. MYROW.LOT_NO,
  2499. MYROW.STOVE_NO,
  2500. MYROW.JUDGE_STOVE_NO,
  2501. MYROW.BATCH_NO,
  2502. MYROW.BATCH_GROUD_NO,
  2503. MYROW.MATERIAL_NO,
  2504. MYROW.MATERIAL_NAME,
  2505. MYROW.PRODUCCODE,
  2506. MYROW.PRODUCNAME,
  2507. MYROW.STD_CODE,
  2508. MYROW.STD_NAME,
  2509. MYROW.GRADECODE,
  2510. MYROW.GRADENAME,
  2511. MYROW.STEELCODE,
  2512. MYROW.STEELNAME,
  2513. MYROW.STD_STYLE,
  2514. MYROW.STD_STYLE_DESC,
  2515. MYROW.SPEC_CODE,
  2516. MYROW.SPEC_NAME,
  2517. MYROW.MODEL_CODE,
  2518. MYROW.MODEL_DESC,
  2519. MYROW.PRO_ORDER_NO,
  2520. MYROW.PLINE_CODE,
  2521. MYROW.PLINE_NAME,
  2522. MYROW.ACT_DIMATER,
  2523. MYROW.ACT_HEIGHT,
  2524. MYROW.ACT_LEN,
  2525. MYROW.ACT_LEN_MIN,
  2526. MYROW.ACT_LEN_MAX,
  2527. MYROW.ACT_COUNT,
  2528. MYROW.ACT_WEIGHT,
  2529. MYROW.ACT_THEORY_WEIGHT,
  2530. MYROW.BELONG_CODE,
  2531. MYROW.BELONG_NAME,
  2532. MYROW.STORAGE_NO,
  2533. MYROW.LOCATION_NO,
  2534. MYROW.LARY_NO,
  2535. MYROW.LOC_NO,
  2536. MYROW.STORAGE_ATTR,
  2537. MYROW.STORAGE_ATTR_NAME,
  2538. MYROW.STORAGE_TYPE_NO,
  2539. MYROW.STORAGE_TYPE_NAME,
  2540. '#TAR_STORAGE_NO#',
  2541. '0',
  2542. MYROW.INSTOCK_TIME,
  2543. V_TIME,
  2544. '#OUT_BC#',
  2545. '#OUT_BZ#',
  2546. '#CREATE_NAME#',
  2547. V_TIME,
  2548. MYROW.ORD_PK,
  2549. MYROW.ORD_LN_PK,
  2550. MYROW.ORD_LN_DLY_PK,
  2551. MYROW.ORDER_NO,
  2552. MYROW.ORDER_SEQ,
  2553. MYROW.ORDER_SEQ_NO,
  2554. MYROW.PRODUCT_FLAG,
  2555. MYROW.MAT_STATUS,
  2556. MYROW.JUDGE_STD_DES,
  2557. V_BATHYEAR,
  2558. V_DATA_SOURCE,
  2559. MYROW.QCM_STAUS,
  2560. '0',
  2561. (SELECT T1.DEPARTMENT_CODE_P FROM COM_BASE_PLINE T1 WHERE T1.PLINE_CODE = MYROW.PLINE_CODE),
  2562. (SELECT T2.DEPARTMENT_DESC_P FROM COM_BASE_PLINE T2 WHERE T2.PLINE_CODE = MYROW.PLINE_CODE),
  2563. '#DRIVER#',
  2564. '#OUT_TYPE#',
  2565. MYROW.FLAG_STOVE_NO_ZG,
  2566. '#SUPERVISOR_NAME#',
  2567. '#SUPERVISOR_CALL#',
  2568. MYROW.PRO_ORDER_ID,
  2569. MYROW.GX_PLAN_NO,
  2570. '#OUTSTOCK_PLAN_NO#');
  2571. UPDATE YDM_BC_BUTTRESS T SET T.STORAGE_NO = '',T.LOCATION_NO = '',T.LARY_NO = '' WHERE T.MAT_NO = MYROW.MAT_NO;
  2572. UPDATE MAT_GP_M T
  2573. SET T.MAT_GOWHERE_CODE = '#MAT_GOWHERE_CODE#',
  2574. T.MAT_GOWHERE_NAME = '#MAT_GOWHERE_NAME#'
  2575. WHERE T.MAT_NO = MYROW.MAT_NO;
  2576. END LOOP;
  2577. ELSE
  2578. V_DATA_SOURCE := '1';
  2579. FOR MYROW IN (SELECT F.*,S1.BILL_NO
  2580. FROM (SELECT T.*,
  2581. S.STORAGE_NO,
  2582. S.LOCATION_NO,
  2583. S.LARY_NO,
  2584. S.LOC_NO,
  2585. S.STORAGE_ATTR,
  2586. S.STORAGE_ATTR_NAME,
  2587. S.STORAGE_TYPE_NO,
  2588. S.STORAGE_TYPE_NAME
  2589. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  2590. WHERE T.MAT_NO = S.MAT_NO
  2591. AND T.MAT_NO = '#MAT_NO_S#'
  2592. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2593. AND T.BATCH_NO = '#BATCH_NO#'
  2594. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2595. AND S.STORAGE_NO IS NOT NULL
  2596. AND T.LOCK_BILL_FLAG = '0') F
  2597. LEFT JOIN YDM_ZC_BILL_C S1
  2598. ON F.MAT_NO = S1.MAT_NO
  2599. AND S1.EDIT_FLAG = '0'
  2600. --tzh 24.12.13 add 加入只查询实际的提单号
  2601. AND bill_no IN (select bill_no from YDM_ZC_BILL_m W1 where S1.BILL_NO=W1.BILL_NO AND W1.Loadvehicle_Type = '1')) LOOP
  2602. V_OUTSTOCK_SQE := V_OUTSTOCK_DOC || LPAD(V_OCOUNT, 4, 0);
  2603. INSERT INTO YDM_BC_OUTLIST
  2604. (OUTSTOCK_SQE,
  2605. OUTSTOCK_DOC,
  2606. OUTSTOCK_TYPE_CODE,
  2607. OUTSTOCK_TYPE_NAME,
  2608. ICCAR_NO,
  2609. VEHICLE_NO,
  2610. MAT_NO,
  2611. LOT_NO,
  2612. STOVE_NO,
  2613. JUDGE_STOVE_NO,
  2614. BATCH_NO,
  2615. BATCH_GROUD_NO,
  2616. MATERIAL_NO,
  2617. MATERIAL_NAME,
  2618. PRODUCCODE,
  2619. PRODUCNAME,
  2620. STD_CODE,
  2621. STD_NAME,
  2622. GRADECODE,
  2623. GRADENAME,
  2624. STEELCODE,
  2625. STEELNAME,
  2626. STD_STYLE,
  2627. STD_STYLE_DESC,
  2628. SPEC_CODE,
  2629. SPEC_NAME,
  2630. MODEL_CODE,
  2631. MODEL_DESC,
  2632. PRO_ORDER_NO,
  2633. PLINE_CODE,
  2634. PLINE_NAME,
  2635. ACT_DIMATER,
  2636. ACT_HEIGHT,
  2637. ACT_LEN,
  2638. ACT_LEN_MIN,
  2639. ACT_LEN_MAX,
  2640. ACT_COUNT,
  2641. ACT_WEIGHT,
  2642. ACT_THEORY_WEIGHT,
  2643. BELONG_CODE,
  2644. BELONG_NAME,
  2645. STORAGE_NO,
  2646. LOCATION_NO,
  2647. LARY_NO,
  2648. LOC_NO,
  2649. STORAGE_ATTR,
  2650. STORAGE_ATTR_NAME,
  2651. STORAGE_TYPE_NO,
  2652. STORAGE_TYPE_NAME,
  2653. TAR_STORAGE_NO,
  2654. TAR_REC_FLAG,
  2655. INSTOCK_TIME,
  2656. OUTSTOCK_TIME,
  2657. OUT_BC,
  2658. OUT_BZ,
  2659. CREATE_NAME,
  2660. CREATE_TIME,
  2661. ORD_PK,
  2662. ORD_LN_PK,
  2663. ORD_LN_DLY_PK,
  2664. ORDER_NO,
  2665. ORDER_SEQ,
  2666. DELIVERY_NO,
  2667. PRODUCT_FLAG,
  2668. MAT_STATUS,
  2669. JUDGE_STD_NAME,
  2670. JUDGE_STD_CODE,
  2671. BAL_YEAR_MONTH,
  2672. DATA_SUORCE,
  2673. QCM_STAUS,
  2674. LEAVE_FACTORY_FLAG,
  2675. BELONG_CODE_RESPONSE,
  2676. BELONG_NAME_RESPONSE,
  2677. DRIVER,
  2678. OUT_TYPE,
  2679. FLAG_STOVE_NO_ZG,
  2680. M_BILL_NO,
  2681. SUPERVISOR_NAME,
  2682. SUPERVISOR_CALL,
  2683. PRO_ORDER_ID,
  2684. GX_PLAN_NO,
  2685. OUTSTOCK_PLAN_NO)
  2686. VALUES
  2687. (V_OUTSTOCK_SQE,
  2688. V_OUTSTOCK_DOC,
  2689. '#OUTSTOCK_TYPE_CODE#',
  2690. '#OUTSTOCK_TYPE_NAME#',
  2691. '#ICCAR_NO#',
  2692. '#VEHICLE_NO#',
  2693. MYROW.MAT_NO,
  2694. MYROW.LOT_NO,
  2695. MYROW.STOVE_NO,
  2696. MYROW.JUDGE_STOVE_NO,
  2697. MYROW.BATCH_NO,
  2698. MYROW.BATCH_GROUD_NO,
  2699. MYROW.MATERIAL_NO,
  2700. MYROW.MATERIAL_NAME,
  2701. MYROW.PRODUCCODE,
  2702. MYROW.PRODUCNAME,
  2703. MYROW.STD_CODE,
  2704. MYROW.STD_NAME,
  2705. MYROW.GRADECODE,
  2706. MYROW.GRADENAME,
  2707. MYROW.STEELCODE,
  2708. MYROW.STEELNAME,
  2709. MYROW.STD_STYLE,
  2710. MYROW.STD_STYLE_DESC,
  2711. MYROW.SPEC_CODE,
  2712. MYROW.SPEC_NAME,
  2713. MYROW.MODEL_CODE,
  2714. MYROW.MODEL_DESC,
  2715. MYROW.PRO_ORDER_NO,
  2716. MYROW.PLINE_CODE,
  2717. MYROW.PLINE_NAME,
  2718. MYROW.ACT_DIMATER,
  2719. MYROW.ACT_HEIGHT,
  2720. MYROW.ACT_LEN,
  2721. MYROW.ACT_LEN_MIN,
  2722. MYROW.ACT_LEN_MAX,
  2723. MYROW.ACT_COUNT,
  2724. MYROW.ACT_WEIGHT,
  2725. MYROW.ACT_THEORY_WEIGHT,
  2726. MYROW.BELONG_CODE,
  2727. MYROW.BELONG_NAME,
  2728. MYROW.STORAGE_NO,
  2729. MYROW.LOCATION_NO,
  2730. MYROW.LARY_NO,
  2731. MYROW.LOC_NO,
  2732. MYROW.STORAGE_ATTR,
  2733. MYROW.STORAGE_ATTR_NAME,
  2734. MYROW.STORAGE_TYPE_NO,
  2735. MYROW.STORAGE_TYPE_NAME,
  2736. '#TAR_STORAGE_NO#',
  2737. '0',
  2738. MYROW.INSTOCK_TIME,
  2739. V_TIME,
  2740. '#OUT_BC#',
  2741. '#OUT_BZ#',
  2742. '#CREATE_NAME#',
  2743. V_TIME,
  2744. MYROW.ORD_PK,
  2745. MYROW.ORD_LN_PK,
  2746. MYROW.ORD_LN_DLY_PK,
  2747. MYROW.ORDER_NO,
  2748. MYROW.ORDER_SEQ,
  2749. MYROW.ORDER_SEQ_NO,
  2750. MYROW.PRODUCT_FLAG,
  2751. MYROW.MAT_STATUS,
  2752. MYROW.JUDGE_STD_NAME,
  2753. MYROW.JUDGE_STD_CODE,
  2754. V_BATHYEAR,
  2755. V_DATA_SOURCE,
  2756. '00',
  2757. '0',
  2758. (SELECT T1.DEPARTMENT_CODE_P FROM COM_BASE_PLINE T1 WHERE T1.PLINE_CODE = MYROW.PLINE_CODE),
  2759. (SELECT T2.DEPARTMENT_DESC_P FROM COM_BASE_PLINE T2 WHERE T2.PLINE_CODE = MYROW.PLINE_CODE),
  2760. '#DRIVER#',
  2761. '#OUT_TYPE#',
  2762. MYROW.FLAG_STOVE_NO_ZG,
  2763. MYROW.BILL_NO,
  2764. '#SUPERVISOR_NAME#',
  2765. '#SUPERVISOR_CALL#',
  2766. MYROW.PRO_ORDER_ID,
  2767. MYROW.GX_PLAN_NO,
  2768. '#OUTSTOCK_PLAN_NO#');
  2769. UPDATE YDM_ZC_BUTTRESS T SET T.STORAGE_NO = '',T.LOCATION_NO = '',T.LARY_NO = '' WHERE T.MAT_NO = MYROW.MAT_NO;
  2770. END LOOP;
  2771. END IF;
  2772. IF(V_COUNT = 0)THEN
  2773. INSERT INTO YDM_BC_OUTLISTDOC (OUTSTOCK_DOC)VALUES ('#OUTSTOCK_DOC#');
  2774. END IF;
  2775. END;
  2776. ]]>
  2777. </query>
  2778. <query id = "FrmFilpOutStorage.selectYdmOutTarFlag" desc = "查询倒运记录是否已接收">
  2779. SELECT COUNT(1)ACOUNT
  2780. FROM YDM_BC_OUTLIST T
  2781. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
  2782. --AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2783. --AND T.BATCH_NO = '#BATCH_NO#'
  2784. -- AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2785. AND T.TAR_REC_FLAG = '1'
  2786. --AND T.QCM_STAUS = '#QCM_STAUS#'
  2787. </query>
  2788. <query id = "FrmFilpOutStorage.doDelte" desc = "撤销倒运">
  2789. DECLARE
  2790. BEGIN
  2791. FOR MYROW IN (SELECT *
  2792. FROM YDM_BC_OUTLIST T
  2793. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
  2794. --AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2795. --AND T.BATCH_NO = '#BATCH_NO#'
  2796. --AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2797. --AND T.QCM_STAUS = '#QCM_STAUS#'
  2798. AND T.VALIDFLAG = '1'
  2799. ORDER BY T.MAT_NO ASC) LOOP
  2800. IF (MYROW.DATA_SUORCE = '0') THEN
  2801. IF (MYROW.QCM_STAUS = '22') THEN
  2802. UPDATE YDM_BC_BUTTRESS S
  2803. SET S.STORAGE_NO = MYROW.STORAGE_NO,
  2804. S.LOCATION_NO = MYROW.LOCATION_NO,
  2805. S.LARY_NO = MYROW.LARY_NO
  2806. WHERE S.MAT_NO = MYROW.MAT_NO
  2807. AND S.STORAGE_NO IS NULL;
  2808. ELSE
  2809. UPDATE YDM_BC_BUTTRESS S
  2810. SET S.STORAGE_NO = MYROW.STORAGE_NO,
  2811. S.LOCATION_NO = MYROW.LOCATION_NO,
  2812. S.LARY_NO = MYROW.LARY_NO
  2813. WHERE S.MAT_NO = MYROW.MAT_NO
  2814. AND S.STORAGE_NO IS NULL;
  2815. END IF;
  2816. ELSE
  2817. UPDATE YDM_ZC_BUTTRESS S
  2818. SET S.STORAGE_NO = MYROW.STORAGE_NO,
  2819. S.LOCATION_NO = MYROW.LOCATION_NO,
  2820. S.LARY_NO = MYROW.LARY_NO
  2821. WHERE S.MAT_NO = MYROW.MAT_NO
  2822. AND S.STORAGE_NO IS NULL;
  2823. END IF;
  2824. DELETE FROM YDM_BC_OUTLIST T
  2825. WHERE T.MAT_NO = MYROW.MAT_NO
  2826. AND T.OUTSTOCK_DOC = MYROW.OUTSTOCK_DOC;
  2827. END LOOP;
  2828. DELETE FROM YDM_BC_OUTLISTDOC T WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#';
  2829. END;
  2830. </query>
  2831. <query id = "FrmFilpOutStorage.selectOutBcWgt" desc= "查询倒运支数重量">
  2832. <![CDATA[
  2833. SELECT SUM(T.ACT_WEIGHT)ACT_WEIGHT
  2834. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  2835. WHERE T.MAT_NO = S.MAT_NO
  2836. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2837. AND T.BATCH_NO = '#BATCH_NO#'
  2838. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2839. AND T.QCM_STAUS = '#QCM_STAUS#'
  2840. AND NVL(T.PRO_PLAN_ID_NEXT, '/') = NVL('#PRO_PLAN_ID_NEXT#', '/')
  2841. AND NVL(T.GX_PLAN_NO_NEXT, '/') = NVL('#GX_PLAN_NO_NEXT#', '/')
  2842. AND S.STORAGE_NO = '#STORAGE_NO#'
  2843. AND S.LOCATION_NO = '#LOCATION_NO#'
  2844. AND NVL(S.LARY_NO,'/') = NVL('#LARY_NO#','/')
  2845. WHERE ROWNUM <= #ACOUNT#
  2846. ]]>
  2847. </query>
  2848. <query id = "FrmFilpOutStorage.selectOutZcWgt" desc = "查询成品倒运支数重量">
  2849. <![CDATA[
  2850. SELECT SUM(T.ACT_WEIGHT)ACT_WEIGHT
  2851. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  2852. WHERE T.MAT_NO = S.MAT_NO
  2853. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2854. AND T.BATCH_NO = '#BATCH_NO#'
  2855. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2856. AND S.STORAGE_NO = '#STORAGE_NO#'
  2857. AND S.LOCATION_NO = '#LOCATION_NO#'
  2858. AND NVL(S.LARY_NO,'/') = NVL('#LARY_NO#','/')
  2859. WHERE ROWNUM <= #ACOUNT#
  2860. ]]>
  2861. </query>
  2862. <query id = "FrmFilpOutStorage.doQueryTarDepart" desc = "查询仓库对应科室">
  2863. SELECT T.MANAGEMENT_NO,T.MANAGEMENT_NAME FROM YDM_BS_STORAGE T WHERE T.STORAGE_NO = ?
  2864. </query>
  2865. <query id = "FrmFilpOutStorage.doQueryCount" desc = "查询单号下未接收">
  2866. SELECT NVL(SUM(T.ACT_COUNT), 0) ACT_COUNT
  2867. FROM YDM_BC_OUTLIST T
  2868. WHERE T.OUTSTOCK_DOC = ?
  2869. AND T.TAR_REC_FLAG = '0'
  2870. AND T.QCM_STAUS IN('00','11')
  2871. </query>
  2872. <query id = "FrmFilpOutStorage.insertOutdoc" desc = "保存倒库单号">
  2873. INSERT INTO YDM_BC_OUTLISTDOC (OUTSTOCK_DOC) VALUES (?)
  2874. </query>
  2875. <query id = "FrmFilpOutStorage.deleteDoc" desc = "删除倒库单号">
  2876. DELETE FROM YDM_BC_OUTLISTDOC T WHERE T.OUTSTOCK_DOC = ?
  2877. </query>
  2878. <query id = "FrmFilpOutStorage.doQueryMatBcCountMatNo" desc = "查询材料号是否在库">
  2879. SELECT NVL(COUNT(1),'0') ACOUNT
  2880. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  2881. WHERE T.MAT_NO = S.MAT_NO
  2882. AND T.MAT_NO = '#MAT_NO#'
  2883. AND S.STORAGE_NO = '#STORAGE_NO#'
  2884. </query>
  2885. <query id = "FrmFilpOutStorage.doQueryMatZcCountMatNo" desc = "查询材料号是否在库">
  2886. SELECT NVL(COUNT(1),'0') ACOUNT
  2887. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  2888. WHERE T.MAT_NO = S.MAT_NO
  2889. AND T.MAT_NO = '#MAT_NO#'
  2890. AND S.STORAGE_NO = '#STORAGE_NO#'
  2891. </query>
  2892. <query id = "FrmFilpOutStorage.getBcMatNo" desc = "查询BC队列">
  2893. SELECT T.*, L.LOCATION_NAME
  2894. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  2895. LEFT JOIN YDM_BS_LOCATION L
  2896. ON L.LOCATION_NO = S.LOCATION_NO
  2897. WHERE T.MAT_NO = S.MAT_NO
  2898. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2899. AND T.BATCH_NO = '#BATCH_NO#'
  2900. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2901. AND NVL(T.PRODUCCODE,'/') = NVL('#PRODUCCODE#','/')
  2902. AND NVL(T.MODEL_CODE,'/') = NVL('#MODEL_CODE#','/')
  2903. AND T.QCM_STAUS = '#QCM_STAUS#'
  2904. AND NVL(T.PRO_PLAN_ID_NEXT,'/') = NVL('#PRO_PLAN_ID_NEXT#','/')
  2905. AND NVL(T.GX_PLAN_NO_NEXT,'/') = NVL('#GX_PLAN_NO_NEXT#','/')
  2906. AND T.PLINE_CODE = '#PLINE_CODE#'
  2907. AND T.MAT_STATUS = '#MAT_STATUS_CODE#'
  2908. AND T.BELONG_CODE = '#BELONG_CODE#'
  2909. AND S.STORAGE_NO = '#STORAGE_NO#'
  2910. AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
  2911. AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
  2912. AND NVL(T.OFFLINE_DOC,'/') = NVL('#OFFLINE_DOC#','/')
  2913. AND NVL(T.MEMO,'/') = NVL('#MEMO#','/')
  2914. AND NVL(T.MEMO1,'/') = NVL('#MEMO1#','/')
  2915. AND NVL(T.PIPMEMO,'/') = NVL('#PIPMEMO#','/')
  2916. ORDER BY TO_NUMBER(T.MEASURING_SEQ) ASC
  2917. </query>
  2918. <query id = "FrmFilpOutStorage.getZcMatNo" desc = "查询ZC队列">
  2919. SELECT T.*, L.LOCATION_NAME
  2920. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  2921. LEFT JOIN YDM_BS_LOCATION L
  2922. ON L.LOCATION_NO = S.LOCATION_NO
  2923. WHERE T.MAT_NO = S.MAT_NO
  2924. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2925. AND T.BATCH_NO = '#BATCH_NO#'
  2926. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  2927. AND NVL(T.PRODUCCODE,'/') = NVL('#PRODUCCODE#','/')
  2928. AND NVL(T.MODEL_CODE,'/') = NVL('#MODEL_CODE#','/')
  2929. AND T.BELONG_CODE = '#BELONG_CODE#'
  2930. AND T.PLINE_CODE = '#PLINE_CODE#'
  2931. AND T.MAT_STATUS = '#MAT_STATUS_CODE#'
  2932. AND S.STORAGE_NO = '#STORAGE_NO#'
  2933. AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
  2934. AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
  2935. AND NVL(T.MEMO,'/') = NVL('#MEMO#','/')
  2936. AND NVL(T.MEMO1,'/') = NVL('#MEMO1#','/')
  2937. AND NVL(T.PIPMEMO,'/') = NVL('#PIPMEMO#','/')
  2938. ORDER BY TO_NUMBER(T.MEASURING_SEQ) ASC
  2939. </query>
  2940. <query id = "FrmFilpOutStorage.getSuperName" desc = "加载监装人">
  2941. SELECT T1.SUPERVISOR_CODE, T1.SUPERVISOR_NAME
  2942. FROM YDM_BC_SUPERVISOR T1,
  2943. (SELECT T.PLINE_CODE FROM COM_BASE_PLINE T WHERE T.PROCESS_CODE NOT IN('A','B','C')
  2944. </query>
  2945. <query id = "FrmFilpOutStorage.selectSuper" desc = "查询监装人">
  2946. SELECT T.SUPERVISOR_NAME,T.SUPERVISOR_CALL FROM YDM_BC_SUPERVISOR T WHERE T.SUPERVISOR_CODE = ?
  2947. </query>
  2948. <query id = "FrmFilpOutStorage.selectWayBill" desc = "查询司机是否有接单记录">
  2949. SELECT NVL(COUNT(1),0) ACOUNT,MAX(S.END_AREA_CODE)END_AREA_CODE,MAX(T.WAYBILL_NO)WAYBILL_NO
  2950. FROM TMS_WAYBILL_M T,TMS_PLN_C S,TMS_PLN_M P
  2951. WHERE T.PLN_NO = S.PLN_NO
  2952. AND T.PLN_NO = P.PLN_NO
  2953. AND S.PLN_NO = P.PLN_NO
  2954. AND S.HEAT_NO = ?
  2955. AND S.START_AREA_CODE = ?
  2956. AND T.CAR_LICENSE = ?
  2957. AND T.VALIDFLAG IN('20','35')
  2958. AND P.STATUS = '20'
  2959. </query>
  2960. <query id = "FrmFilpOutStorage.SelectWayM" desc = "查询运单主表信息">
  2961. SELECT T.*,S.START_NODE_CODE
  2962. FROM TMS_WAYBILL_M T,TMS_COM_LINE_M S
  2963. WHERE T.LINE_CODE = S.LINE_CODE
  2964. AND T.CAR_LICENSE = ?
  2965. AND T.VALIDFLAG IN('20','35')
  2966. </query>
  2967. <query id = "FrmFilpOutStorage.selectWgt" desc = "查询对应支数重量">
  2968. SELECT T.JUDGE_STOVE_NO,
  2969. T.BATCH_NO,
  2970. T.BATCH_GROUD_NO,
  2971. T.MATERIAL_NO,
  2972. T.MATERIAL_NAME,
  2973. T.SPEC_NAME,
  2974. T.ACT_DIMATER,
  2975. T.ACT_HEIGHT,
  2976. T.FLAG_STOVE_NO_ZG,
  2977. T.SUPERVISOR_NAME,
  2978. T.SUPERVISOR_CALL,
  2979. T.OUTSTOCK_DOC,
  2980. T.PRODUCT_FLAG,
  2981. T.MAT_STATUS,
  2982. T.STORAGE_NO,
  2983. T.PLINE_CODE,
  2984. T.PLINE_NAME,
  2985. T.PRODUCCODE,
  2986. T.PRODUCNAME,
  2987. T.QCM_STAUS,
  2988. T.PRODUCT_FLAG,
  2989. T.MAT_STATUS,
  2990. (SELECT T1.PRODUC_HEAD FROM COM_BASE_PRODUCT T1 WHERE T1.PRODUCCODE = T.PRODUCCODE)PRODUCT_CODE,
  2991. (SELECT S.BASENAME FROM COM_BASE_PRODUCT T2,COM_BASE_INFO S WHERE T2.PRODUC_HEAD = S.BASECODE AND T2.PRODUCCODE = T.PRODUCCODE)PRODUCT_NAME,
  2992. MAX(T.SUPERVISOR_NAME)SUPERVISOR_NAME,
  2993. MAX(T.SUPERVISOR_CALL)SUPERVISOR_CALL,
  2994. SUM(T.ACT_COUNT) ACT_COUNT,
  2995. SUM(T.ACT_WEIGHT) ACT_WEIGHT
  2996. FROM YDM_BC_OUTLIST T
  2997. WHERE T.OUTSTOCK_DOC = ?
  2998. GROUP BY T.JUDGE_STOVE_NO,
  2999. T.BATCH_NO,
  3000. T.BATCH_GROUD_NO,
  3001. T.MATERIAL_NO,
  3002. T.MATERIAL_NAME,
  3003. T.SPEC_NAME,
  3004. T.ACT_DIMATER,
  3005. T.ACT_HEIGHT,
  3006. T.FLAG_STOVE_NO_ZG,
  3007. T.SUPERVISOR_NAME,
  3008. T.SUPERVISOR_CALL,
  3009. T.OUTSTOCK_DOC,
  3010. T.PRODUCT_FLAG,
  3011. T.MAT_STATUS,
  3012. T.STORAGE_NO,
  3013. T.PLINE_CODE,
  3014. T.PLINE_NAME,
  3015. T.PRODUCCODE,
  3016. T.PRODUCNAME,
  3017. T.QCM_STAUS,
  3018. T.PRODUCT_FLAG,
  3019. T.MAT_STATUS
  3020. </query>
  3021. <query id = "FrmFilpOutStorage.insertWayC" desc = "新增运单子表信息">
  3022. DECLARE
  3023. V_WAYBILL_SQE TMS_WAYBILL_C.WAYBILL_SQE%TYPE := NULL;
  3024. BEGIN
  3025. SELECT LPAD(NVL(MAX(SUBSTR(T.WAYBILL_SQE,0)), 0) + 1,3,0)
  3026. INTO V_WAYBILL_SQE
  3027. FROM TMS_WAYBILL_C T
  3028. WHERE T.WAYBILL_NO = '#WAYBILL_NO#';
  3029. INSERT INTO TMS_WAYBILL_C
  3030. (MATERIALS_DIMATER,
  3031. MATERIALS_HEIGHT,
  3032. MAT_STATUS,
  3033. SUPERVISOR_NAME,
  3034. SUPERVISOR_CALL,
  3035. PRODUCT_FLAG,
  3036. MAT_TYPE,
  3037. WAYBILL_NO,
  3038. WAYBILL_SQE,
  3039. PLN_NO,
  3040. PLN_SQE,
  3041. HEAT_NO,
  3042. BATCH_NO,
  3043. LOGO_NO,
  3044. GROUP_NO,
  3045. MATERIALS_CODE,
  3046. MATERIALS_DESC,
  3047. MATERIALS_SPEC,
  3048. WAYBILL_QTY_VAL,
  3049. WAYBILL_WT_VAL,
  3050. REF_PLN_NO,
  3051. START_NODE_CODE,
  3052. START_NODE_DESC,
  3053. START_AREA_CODE,
  3054. START_AREA_DESC,
  3055. END_NODE_CODE,
  3056. END_NODE_DESC,
  3057. END_AREA_CODE,
  3058. END_AREA_DESC,
  3059. PLINE_CODE,
  3060. PLINE_NAME,
  3061. PROCESS_CDOE,
  3062. PROCESS_DESC,
  3063. PRODUCCODE,
  3064. PRODUCNAME,
  3065. PRODUCT_CODE,
  3066. PRODUCT_NAME,
  3067. QCM_STAUS,
  3068. DEMAND_ORG_CODE,
  3069. DEMAND_ORG_DESC
  3070. )
  3071. VALUES
  3072. ('#MATERIALS_DIMATER#',
  3073. '#MATERIALS_HEIGHT#',
  3074. '#MAT_STATUS#',
  3075. '#SUPERVISOR_NAME#',
  3076. '#SUPERVISOR_CALL#',
  3077. '#PRODUCT_FLAG#',
  3078. '#MAT_TYPE#',
  3079. '#WAYBILL_NO#',
  3080. V_WAYBILL_SQE,
  3081. '#PLN_NO#',
  3082. V_WAYBILL_SQE,
  3083. '#HEAT_NO#',
  3084. '#BATCH_NO#',
  3085. '#LOGO_NO#',
  3086. '#GROUP_NO#',
  3087. '#MATERIALS_CODE#',
  3088. '#MATERIALS_DESC#',
  3089. '#MATERIALS_SPEC#',
  3090. '#WAYBILL_QTY_VAL#',
  3091. '#WAYBILL_WT_VAL#',
  3092. '#REF_PLN_NO#',
  3093. '#START_NODE_CODE#',
  3094. '#START_NODE_DESC#',
  3095. '#START_AREA_CODE#',
  3096. '#START_AREA_DESC#',
  3097. '#END_NODE_CODE#',
  3098. '#END_NODE_DESC#',
  3099. '#END_AREA_CODE#',
  3100. '#END_AREA_DESC#',
  3101. '#PLINE_CODE#',
  3102. '#PLINE_NAME#',
  3103. '#PROCESS_CDOE#',
  3104. '#PROCESS_DESC#',
  3105. '#PRODUCCODE#',
  3106. '#PRODUCNAME#',
  3107. '#PRODUCT_CODE#',
  3108. '#PRODUCT_NAME#',
  3109. '#QCM_STAUS#',
  3110. '#DEMAND_ORG_CODE#',
  3111. '#DEMAND_ORG_DESC#');
  3112. END;
  3113. </query>
  3114. <query id = "FrmFilpOutStorage.insertExcute" desc = "新增装车实绩表">
  3115. DECLARE
  3116. V_EXECUTE_NO TMS_EXECUTE_B.EXECUTE_NO%TYPE := NULL;
  3117. BEGIN
  3118. SELECT TO_CHAR(SYSDATE, 'YYYYMMDD') ||
  3119. LPAD(NVL(MAX(SUBSTR(T.EXECUTE_NO,9)), 0) + 1, 5, 0)
  3120. INTO V_EXECUTE_NO
  3121. FROM TMS_EXECUTE_B T
  3122. WHERE EXECUTE_NO LIKE TO_CHAR(SYSDATE, 'YYYYMMDD')|| '_____';
  3123. INSERT INTO TMS_EXECUTE_B
  3124. (EXECUTE_NO,
  3125. UNLOADING_CODE,
  3126. CAR_LICENSE,
  3127. PLN_NO,
  3128. WAYBILL_NO,
  3129. EXECUTE_TIME,
  3130. REFE_NO,
  3131. ACCOUNT_YEAR_MONTH,
  3132. CREATE_TIME)
  3133. VALUES
  3134. ( V_EXECUTE_NO,
  3135. '#UNLOADING_CODE#',
  3136. '#CAR_LICENSE#',
  3137. '#PLN_NO#',
  3138. '#WAYBILL_NO#',
  3139. SYSDATE,
  3140. '#REFE_NO#',
  3141. '#ACCOUNT_YEAR_MONTH#',
  3142. SYSDATE);
  3143. END;
  3144. </query>
  3145. <query id = "FrmFilpOutStorage.updateWayM" desc = "修改运单主表状态">
  3146. UPDATE TMS_WAYBILL_M T SET T.VALIDFLAG = '#VALIDFLAG#' WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
  3147. </query>
  3148. <query id = "FrmFilpOutStorage.insertCraneWayC" desc = "新增吊车运单子表">
  3149. INSERT INTO TMS_WAYBILL_C
  3150. (WAYBILL_NO,
  3151. WAYBILL_SQE,
  3152. PLN_NO,
  3153. PLN_SQE,
  3154. HEAT_NO,
  3155. BATCH_NO,
  3156. LOGO_NO,
  3157. GROUP_NO,
  3158. MATERIALS_CODE,
  3159. MATERIALS_DESC,
  3160. MATERIALS_SPEC,
  3161. WAYBILL_QTY_VAL,
  3162. WAYBILL_WT_VAL,
  3163. UOM_CODE,
  3164. UOM_DESC,
  3165. PRO_ORDER_NO,
  3166. PRO_ORDER_SQE,
  3167. CURRENT_JOB_NO,
  3168. NEXT_JOB_NO,
  3169. MEMO,
  3170. REF_PLN_NO,
  3171. REF_PLN_SQE,
  3172. REFE_NO,
  3173. CAR_LICENSE,
  3174. AFFIRM_TIME,
  3175. MATERIALS_DIMATER,
  3176. MATERIALS_HEIGHT,
  3177. IS_SORT,
  3178. SUPERVISOR_NAME,
  3179. SUPERVISOR_CALL,
  3180. PRODUCT_FLAG,
  3181. MAT_STATUS,
  3182. MAT_TYPE,
  3183. START_NODE_CODE,
  3184. START_NODE_DESC,
  3185. END_NODE_CODE,
  3186. END_NODE_DESC,
  3187. START_AREA_CODE,
  3188. START_AREA_DESC,
  3189. END_AREA_DESC,
  3190. END_AREA_CODE,
  3191. PLINE_CODE,
  3192. PLINE_NAME,
  3193. PROCESS_CDOE,
  3194. PROCESS_DESC,
  3195. PRODUCCODE,
  3196. PRODUCNAME,
  3197. PRODUCT_CODE,
  3198. PRODUCT_NAME,
  3199. QCM_STAUS,
  3200. DEMAND_ORG_CODE,
  3201. DEMAND_ORG_DESC)
  3202. SELECT '#CRANE_WAYBILL_NO#',
  3203. (SELECT NVL(MAX(TO_NUMBER(WAYBILL_SQE)), 0)
  3204. FROM TMS_WAYBILL_C
  3205. WHERE WAYBILL_NO = '#CRANE_WAYBILL_NO#' ) + ROWNUM,
  3206. (SELECT PLN_NO FROM TMS_WAYBILL_M WHERE WAYBILL_NO = '#CRANE_WAYBILL_NO#'),
  3207. '1',
  3208. HEAT_NO,
  3209. BATCH_NO,
  3210. LOGO_NO,
  3211. GROUP_NO,
  3212. MATERIALS_CODE,
  3213. MATERIALS_DESC,
  3214. MATERIALS_SPEC,
  3215. WAYBILL_QTY_VAL,
  3216. WAYBILL_WT_VAL,
  3217. UOM_CODE,
  3218. UOM_DESC,
  3219. PRO_ORDER_NO,
  3220. PRO_ORDER_SQE,
  3221. CURRENT_JOB_NO,
  3222. NEXT_JOB_NO,
  3223. MEMO,
  3224. PLN_NO,
  3225. PLN_SQE,
  3226. '#WAYBILL_NO#',
  3227. (SELECT CAR_LICENSE FROM TMS_WAYBILL_M WHERE WAYBILL_NO = '#WAYBILL_NO#'),
  3228. SYSDATE,
  3229. MATERIALS_DIMATER,
  3230. MATERIALS_HEIGHT,
  3231. IS_SORT,
  3232. SUPERVISOR_NAME,
  3233. SUPERVISOR_CALL,
  3234. PRODUCT_FLAG,
  3235. MAT_STATUS,
  3236. MAT_TYPE,
  3237. START_NODE_CODE,
  3238. START_NODE_DESC,
  3239. START_NODE_CODE,
  3240. START_NODE_DESC,
  3241. START_AREA_CODE,
  3242. START_AREA_DESC,
  3243. START_AREA_DESC,
  3244. START_AREA_CODE,
  3245. PLINE_CODE,
  3246. PLINE_NAME,
  3247. PROCESS_CDOE,
  3248. PROCESS_DESC,
  3249. PRODUCCODE,
  3250. PRODUCNAME,
  3251. PRODUCT_CODE,
  3252. PRODUCT_NAME,
  3253. QCM_STAUS,
  3254. DEMAND_ORG_CODE,
  3255. DEMAND_ORG_DESC
  3256. FROM TMS_WAYBILL_C T
  3257. WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
  3258. AND T. START_NODE_CODE= '#NODE_CODE#'
  3259. </query>
  3260. <query id = "FrmFilpOutStorage.insertTraceM" desc = "写跟踪记录">
  3261. INSERT INTO TMS_TRACE_M
  3262. (WAYBILL_NO,
  3263. TRACE_NO,
  3264. NODE_CODE,
  3265. NODE_DESC,
  3266. NODE_TYPE_CODE,
  3267. NODE_TYPE_DESC,
  3268. REFE_NO,
  3269. EVENT_CODE,
  3270. EVENT_DESC,
  3271. EVENT_TIME
  3272. )
  3273. VALUES
  3274. ('#WAYBILL_NO#',
  3275. (SELECT TO_NUMBER(MAX(T.TRACE_NO), 0) + 1
  3276. FROM TMS_TRACE_M T
  3277. WHERE T.WAYBILL_NO = '#WAYBILL_NO#'),
  3278. '#NODE_CODE#',
  3279. '#NODE_DESC#',
  3280. '#NODE_TYPE_CODE#',
  3281. '#NODE_TYPE_DESC#',
  3282. '#REFE_NO#',
  3283. '#EVENT_CODE#',
  3284. '#EVENT_DESC#',
  3285. SYSDATE
  3286. )
  3287. </query>
  3288. <query id = "FrmFilpOutStorage.selectWayBillStaus" desc = "查询运单状态">
  3289. SELECT T.VALIDFLAG,T.WAYBILL_NO,T.PLN_NO
  3290. FROM TMS_WAYBILL_M T, TMS_WAYBILL_C S
  3291. WHERE T.WAYBILL_NO = S.WAYBILL_NO
  3292. AND S.REF_PLN_NO = ?
  3293. AND ROWNUM = 1
  3294. </query>
  3295. <query id = "FrmFilpOutStorage.cancelLoadFrim" desc = "撤销装车确认">
  3296. DECLARE
  3297. V_FLAG TMS_TRACE_M.EVENT_CODE%TYPE := NULL;
  3298. BEGIN
  3299. DELETE FROM TMS_WAYBILL_C T
  3300. WHERE (T.WAYBILL_NO = '#WAYBILL_NO#' AND T.LOGO_NO = '#LOGO_NO#' AND
  3301. T.REF_PLN_NO = '#REFE_NO#')
  3302. OR (T.REFE_NO = '#WAYBILL_NO#' AND T.START_NODE_CODE = '#NODE_CODE#');
  3303. DELETE FROM TMS_EXECUTE_B T
  3304. WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
  3305. AND T.REFE_NO = '#REFE_NO#'
  3306. AND T.REFE_NO = '#REFE_NO#';
  3307. DELETE FROM TMS_TRACE_M T
  3308. WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
  3309. AND T.REFE_NO = '#REFE_NO#'
  3310. AND T.EVENT_CODE IN ('RC04', 'RC14');
  3311. SELECT T.EVENT_CODE INTO V_FLAG
  3312. FROM TMS_TRACE_M T
  3313. WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
  3314. AND T.TRACE_NO = (SELECT MAX(T1.TRACE_NO)
  3315. FROM TMS_TRACE_M T1
  3316. WHERE T1.WAYBILL_NO = '#WAYBILL_NO#');
  3317. IF(V_FLAG = 'RC18')THEN
  3318. UPDATE
  3319. TMS_WAYBILL_M T SET T.VALIDFLAG = '35'
  3320. WHERE T.WAYBILL_NO = '#WAYBILL_NO#';
  3321. ELSE
  3322. UPDATE
  3323. TMS_WAYBILL_M T SET T.VALIDFLAG = '20'
  3324. WHERE T.WAYBILL_NO = '#WAYBILL_NO#';
  3325. END IF;
  3326. END;
  3327. </query>
  3328. <query id = "FrmFilpOutStorage.SelectStorageIsCarUser" desc = "查询是否限制了一车一卡">
  3329. SELECT T.IS_CAR_TAKING,T.IS_CAR_TAKING_BILL FROM YDM_BS_STORAGE T WHERE T.STORAGE_NO = ?
  3330. </query>
  3331. <query id = "FrmFilpOutStorage.selectStartArea" desc = "查询起点、区域">
  3332. SELECT T.START_NODE_CODE,
  3333. T.START_NODE_DESC,
  3334. T.START_AREA_CODE,
  3335. T.START_AREA_DESC,
  3336. T.END_NODE_CODE,
  3337. T.END_NODE_DESC,
  3338. T.END_AREA_CODE,
  3339. T.END_AREA_DESC,
  3340. S.DEMAND_ORG_CODE,
  3341. S.DEMAND_ORG_DESC
  3342. FROM TMS_PLN_C T,TMS_DEMAND_M S
  3343. WHERE T.DEMAND_NO = S.DEMAND_NO
  3344. AND T.PLN_NO = ?
  3345. AND T.HEAT_NO = ?
  3346. AND T.START_AREA_CODE = ?
  3347. </query>
  3348. <query id = "FrmFilpOutStorage.selectLineCount" desc = "查询计划线路条数">
  3349. SELECT COUNT(1) ACOUNT
  3350. FROM (SELECT T.START_NODE_CODE,
  3351. T.START_NODE_DESC,
  3352. T.START_AREA_CODE,
  3353. T.START_AREA_DESC,
  3354. T.END_NODE_CODE,
  3355. T.END_NODE_DESC,
  3356. T.END_AREA_CODE,
  3357. T.END_NODE_DESC
  3358. FROM TMS_PLN_C T
  3359. WHERE T.PLN_NO = ?
  3360. AND T.START_AREA_CODE = ?
  3361. GROUP BY T.START_NODE_CODE,
  3362. T.START_NODE_DESC,
  3363. T.START_AREA_CODE,
  3364. T.START_AREA_DESC,
  3365. T.END_NODE_CODE,
  3366. T.END_NODE_DESC,
  3367. T.END_AREA_CODE,
  3368. T.END_NODE_DESC)
  3369. </query>
  3370. <query id = "FrmFilpOutStorage.selectTmsWCount" desc = "查询实际打卡出库线路条数">
  3371. SELECT COUNT(1) ACOUNT
  3372. FROM (SELECT T.START_NODE_CODE,
  3373. T.START_NODE_DESC,
  3374. T.START_AREA_CODE,
  3375. T.START_AREA_DESC,
  3376. T.END_NODE_CODE,
  3377. T.END_NODE_DESC,
  3378. T.END_AREA_CODE,
  3379. T.END_AREA_DESC
  3380. FROM TMS_WAYBILL_C T
  3381. WHERE T.WAYBILL_NO = ?
  3382. AND T.START_AREA_CODE = ?
  3383. GROUP BY T.START_NODE_CODE,
  3384. T.START_NODE_DESC,
  3385. T.START_AREA_CODE,
  3386. T.START_AREA_DESC,
  3387. T.END_NODE_CODE,
  3388. T.END_NODE_DESC,
  3389. T.END_AREA_CODE,
  3390. T.END_AREA_DESC)
  3391. </query>
  3392. <query id = "FrmFilpOutStorage.selectTmsWayRealation" desc = "查询拖车、吊车关系表">
  3393. SELECT T.* FROM TMS_WAYBILL_RELATION T WHERE T.WAYBILL_NO = '#WAYBILL_NO#' AND T.NODE_CODE = '#NODE_CODE#'
  3394. </query>
  3395. <query id = "FrmFilpOutStorage.doQueryDataCarMat" desc = "根据车号查询库存">
  3396. SELECT (SELECT T2.BASENAME
  3397. FROM COM_BASE_INFO T2
  3398. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  3399. (SELECT T1.BASENAME
  3400. FROM COM_BASE_INFO T1
  3401. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  3402. T.MAT_STATUS AS MAT_STATUS_CODE,
  3403. T.LOT_NO,
  3404. T.STOVE_NO,
  3405. T.JUDGE_STOVE_NO,
  3406. T.BATCH_NO,
  3407. T.BATCH_GROUD_NO,
  3408. T.MATERIAL_NO,
  3409. T.MATERIAL_NAME,
  3410. MAX(T.PRODUCCODE) PRODUCCODE,
  3411. MAX(T.PRODUCNAME) PRODUCNAME,
  3412. MAX(T.STEELCODE) STEELCODE,
  3413. MAX(T.STEELNAME) STEELNAME,
  3414. MAX(T.GRADECODE) GRADECODE,
  3415. MAX(T.GRADENAME) GRADENAME,
  3416. MAX(T.SPEC_CODE) SPEC_CODE,
  3417. MAX(T.SPEC_NAME) SPEC_NAME,
  3418. MAX(T.MODEL_CODE) MODEL_CODE,
  3419. MAX(T.MODEL_DESC) MODEL_DESC,
  3420. MAX(T.STD_STYLE) STD_STYLE,
  3421. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  3422. MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
  3423. MAX(T.PROCESS_CDOE) PROCESS_CDOE,
  3424. MAX(T.PROCESS_DESC) PROCESS_DESC,
  3425. T.NEXT_PROCESS_CDOE,
  3426. T.NEXT_PROCESS_DESC,
  3427. T.PLINE_CODE,
  3428. T.PLINE_NAME,
  3429. MAX(T.ACT_DIMATER) ACT_DIMATER,
  3430. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  3431. SUM(T.ACT_LEN) ACT_LEN,
  3432. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  3433. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  3434. SUM(T.ACT_COUNT) ACT_COUNT,
  3435. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  3436. T.BELONG_CODE,
  3437. T.BELONG_NAME,
  3438. T.JUDGE_RESULT,
  3439. T.PIPMEMO,
  3440. T.MEMO1,
  3441. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  3442. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  3443. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  3444. DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
  3445. MAX(T.TARGET) TARGET,
  3446. T.FLAG_STOVE_NO_ZG,
  3447. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  3448. (CASE
  3449. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  3450. (SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
  3451. FROM PLN_ORDER_DBK_S T1
  3452. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3453. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  3454. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  3455. (SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
  3456. FROM PLN_ORDER_RCL_S T2
  3457. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3458. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  3459. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  3460. (SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
  3461. FROM PLN_ORDER_JGX_S T3
  3462. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3463. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  3464. ELSE
  3465. NULL
  3466. END) ORDER_NO_NEXT,
  3467. T.PRO_PLAN_ID_NEXT,
  3468. T.GX_PLAN_NO_NEXT,
  3469. S.STORAGE_NO,
  3470. S.LOCATION_NO,
  3471. (SELECT S2.LOCATION_NAME
  3472. FROM YDM_BS_LOCATION S2
  3473. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  3474. S.LARY_NO,
  3475. S.LOC_NO,
  3476. T.PRO_PLAN_ID_NEXT,
  3477. T.GX_PLAN_NO_NEXT,
  3478. (SELECT S1.STORAGE_NAME
  3479. FROM YDM_BS_STORAGE S1
  3480. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  3481. (CASE
  3482. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  3483. (SELECT (SELECT T5.STORAGE_NAME
  3484. FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
  3485. WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
  3486. AND T4.PLINE_CODE = T1.PLINE_CODE)
  3487. FROM PLN_ZY_DBK_M T1
  3488. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3489. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  3490. AND ROWNUM = 1)
  3491. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  3492. (SELECT (SELECT T7.STORAGE_NAME
  3493. FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
  3494. WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
  3495. AND T6.PLINE_CODE = T2.PLINE_CODE)
  3496. FROM PLN_ZY_RCL_M T2
  3497. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3498. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  3499. AND ROWNUM = 1)
  3500. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  3501. (SELECT (SELECT T9.STORAGE_NAME
  3502. FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
  3503. WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
  3504. AND T8.PLINE_CODE = T3.PLINE_CODE)
  3505. FROM PLN_ZY_JGX_M T3
  3506. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3507. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  3508. AND ROWNUM = 1)
  3509. ELSE
  3510. NULL
  3511. END) DIRECTION,
  3512. '0' BAR_CODE,
  3513. T.SUBCONTRACT_NO,
  3514. T.SUBCONTRACT_NO_SEQ,
  3515. '否' LOCK_BILL_FLAG,
  3516. T.OFFLINE_DOC,
  3517. T.MEMO
  3518. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  3519. WHERE T.MAT_NO = S.MAT_NO
  3520. AND T.PRODUCT_FLAG = '801401' #JUDGE_STOVE_NO# #STORAGE_NO#
  3521. #JUDGE_STOVE_NO1#
  3522. GROUP BY T.LOT_NO,
  3523. T.STOVE_NO,
  3524. T.JUDGE_STOVE_NO,
  3525. T.BATCH_NO,
  3526. T.BATCH_GROUD_NO,
  3527. T.PLINE_CODE,
  3528. T.PLINE_NAME,
  3529. T.MAT_STATUS,
  3530. T.QCM_STAUS,
  3531. T.BELONG_CODE,
  3532. T.BELONG_NAME,
  3533. T.MAT_GOWHERE_CODE,
  3534. T.MAT_GOWHERE_NAME,
  3535. T.FLAG_STOVE_NO_ZG,
  3536. S.STORAGE_NO,
  3537. S.LOCATION_NO,
  3538. S.LARY_NO,
  3539. S.LOC_NO,
  3540. T.PRO_PLAN_ID_NEXT,
  3541. T.GX_PLAN_NO_NEXT,
  3542. T.JUDGE_RESULT,
  3543. T.NEXT_PROCESS_CDOE,
  3544. T.NEXT_PROCESS_DESC,
  3545. T.PRODUCT_FLAG,
  3546. T.SUBCONTRACT_NO,
  3547. T.SUBCONTRACT_NO_SEQ,
  3548. T.OFFLINE_DOC,
  3549. T.MEMO,
  3550. T.PIPMEMO,
  3551. T.MEMO1,
  3552. T.MATERIAL_NO,
  3553. T.MATERIAL_NAME
  3554. UNION ALL
  3555. SELECT (SELECT T2.BASENAME
  3556. FROM COM_BASE_INFO T2
  3557. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  3558. (SELECT T1.BASENAME
  3559. FROM COM_BASE_INFO T1
  3560. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  3561. T.MAT_STATUS AS MAT_STATUS_CODE,
  3562. T.LOT_NO,
  3563. T.STOVE_NO,
  3564. T.JUDGE_STOVE_NO,
  3565. T.BATCH_NO,
  3566. T.BATCH_GROUD_NO,
  3567. T.MATERIAL_NO,
  3568. T.MATERIAL_NAME,
  3569. MAX(T.PRODUCCODE) PRODUCCODE,
  3570. MAX(T.PRODUCNAME) PRODUCNAME,
  3571. MAX(T.STEELCODE) STEELCODE,
  3572. MAX(T.STEELNAME) STEELNAME,
  3573. MAX(T.GRADECODE) GRADECODE,
  3574. MAX(T.GRADENAME) GRADENAME,
  3575. MAX(T.SPEC_CODE) SPEC_CODE,
  3576. MAX(T.SPEC_NAME) SPEC_NAME,
  3577. MAX(T.MODEL_CODE) MODEL_CODE,
  3578. MAX(T.MODEL_DESC) MODEL_DESC,
  3579. MAX(T.STD_STYLE) STD_STYLE,
  3580. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  3581. MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
  3582. MAX(T.PROCESS_CDOE) PROCESS_CDOE,
  3583. MAX(T.PROCESS_DESC) PROCESS_DESC,
  3584. T.NEXT_PROCESS_CDOE,
  3585. T.NEXT_PROCESS_DESC,
  3586. T.PLINE_CODE,
  3587. T.PLINE_NAME,
  3588. MAX(T.ACT_DIMATER) ACT_DIMATER,
  3589. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  3590. SUM(T.ACT_LEN) ACT_LEN,
  3591. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  3592. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  3593. SUM(T.ACT_COUNT) ACT_COUNT,
  3594. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  3595. T.BELONG_CODE,
  3596. T.BELONG_NAME,
  3597. T.JUDGE_RESULT,
  3598. T.PIPMEMO,
  3599. T.MEMO1,
  3600. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  3601. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  3602. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  3603. DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
  3604. MAX(T.TARGET) TARGET,
  3605. T.FLAG_STOVE_NO_ZG,
  3606. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  3607. (CASE
  3608. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  3609. (SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
  3610. FROM PLN_ORDER_DBK_S T1
  3611. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3612. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  3613. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  3614. (SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
  3615. FROM PLN_ORDER_RCL_S T2
  3616. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3617. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  3618. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  3619. (SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
  3620. FROM PLN_ORDER_JGX_S T3
  3621. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3622. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
  3623. ELSE
  3624. NULL
  3625. END) ORDER_NO_NEXT,
  3626. T.PRO_PLAN_ID_NEXT,
  3627. T.GX_PLAN_NO_NEXT,
  3628. S.STORAGE_NO,
  3629. S.LOCATION_NO,
  3630. (SELECT S2.LOCATION_NAME
  3631. FROM YDM_BS_LOCATION S2
  3632. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  3633. S.LARY_NO,
  3634. S.LOC_NO,
  3635. T.PRO_PLAN_ID_NEXT,
  3636. T.GX_PLAN_NO_NEXT,
  3637. (SELECT S1.STORAGE_NAME
  3638. FROM YDM_BS_STORAGE S1
  3639. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  3640. (CASE
  3641. WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
  3642. (SELECT (SELECT T5.STORAGE_NAME
  3643. FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
  3644. WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
  3645. AND T4.PLINE_CODE = T1.PLINE_CODE)
  3646. FROM PLN_ZY_DBK_M T1
  3647. WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3648. AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  3649. AND ROWNUM = 1)
  3650. WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
  3651. (SELECT (SELECT T7.STORAGE_NAME
  3652. FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
  3653. WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
  3654. AND T6.PLINE_CODE = T2.PLINE_CODE)
  3655. FROM PLN_ZY_RCL_M T2
  3656. WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3657. AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  3658. AND ROWNUM = 1)
  3659. WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
  3660. (SELECT (SELECT T9.STORAGE_NAME
  3661. FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
  3662. WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
  3663. AND T8.PLINE_CODE = T3.PLINE_CODE)
  3664. FROM PLN_ZY_JGX_M T3
  3665. WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
  3666. AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
  3667. AND ROWNUM = 1)
  3668. ELSE
  3669. NULL
  3670. END) DIRECTION,
  3671. '0' BAR_CODE,
  3672. T.SUBCONTRACT_NO,
  3673. T.SUBCONTRACT_NO_SEQ,
  3674. '否' LOCK_BILL_FLAG,
  3675. T.OFFLINE_DOC,
  3676. T.MEMO
  3677. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  3678. WHERE T.MAT_NO = S.MAT_NO
  3679. AND T.PRODUCT_FLAG = '801402' #JUDGE_STOVE_NO# #STORAGE_NO#
  3680. #JUDGE_STOVE_NO1#
  3681. GROUP BY T.LOT_NO,
  3682. T.STOVE_NO,
  3683. T.JUDGE_STOVE_NO,
  3684. T.BATCH_NO,
  3685. T.BATCH_GROUD_NO,
  3686. T.PLINE_CODE,
  3687. T.PLINE_NAME,
  3688. T.MAT_STATUS,
  3689. T.QCM_STAUS,
  3690. T.BELONG_CODE,
  3691. T.BELONG_NAME,
  3692. T.MAT_GOWHERE_CODE,
  3693. T.MAT_GOWHERE_NAME,
  3694. T.FLAG_STOVE_NO_ZG,
  3695. S.STORAGE_NO,
  3696. S.LOCATION_NO,
  3697. S.LARY_NO,
  3698. S.LOC_NO,
  3699. T.PRO_PLAN_ID_NEXT,
  3700. T.GX_PLAN_NO_NEXT,
  3701. T.JUDGE_RESULT,
  3702. T.NEXT_PROCESS_CDOE,
  3703. T.NEXT_PROCESS_DESC,
  3704. T.PRODUCT_FLAG,
  3705. T.SUBCONTRACT_NO,
  3706. T.SUBCONTRACT_NO_SEQ,
  3707. T.OFFLINE_DOC,
  3708. T.MEMO,
  3709. T.PIPMEMO,
  3710. T.MEMO1,
  3711. T.MATERIAL_NO,
  3712. T.MATERIAL_NAME
  3713. UNION ALL
  3714. SELECT (SELECT T2.BASENAME
  3715. FROM COM_BASE_INFO T2
  3716. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  3717. (SELECT T1.BASENAME
  3718. FROM COM_BASE_INFO T1
  3719. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  3720. T.MAT_STATUS AS MAT_STATUS_CODE,
  3721. T.LOT_NO,
  3722. T.STOVE_NO,
  3723. T.JUDGE_STOVE_NO,
  3724. T.BATCH_NO,
  3725. T.BATCH_GROUD_NO,
  3726. T.MATERIAL_NO,
  3727. T.MATERIAL_NAME,
  3728. MAX(T.PRODUCCODE) PRODUCCODE,
  3729. MAX(T.PRODUCNAME) PRODUCNAME,
  3730. MAX(T.STEELCODE) STEELCODE,
  3731. MAX(T.STEELNAME) STEELNAME,
  3732. MAX(T.GRADECODE) GRADECODE,
  3733. MAX(T.GRADENAME) GRADENAME,
  3734. MAX(T.SPEC_CODE) SPEC_CODE,
  3735. MAX(T.SPEC_NAME) SPEC_NAME,
  3736. MAX(T.MODEL_CODE) MODEL_CODE,
  3737. MAX(T.MODEL_DESC) MODEL_DESC,
  3738. MAX(T.STD_STYLE) STD_STYLE,
  3739. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  3740. MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
  3741. '' PROCESS_CDOE,
  3742. '' PROCESS_DESC,
  3743. '' NEXT_PROCESS_CDOE,
  3744. '' NEXT_PROCESS_DESC,
  3745. T.PLINE_CODE,
  3746. T.PLINE_NAME,
  3747. MAX(T.ACT_DIMATER) ACT_DIMATER,
  3748. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  3749. SUM(T.ACT_LEN) ACT_LEN,
  3750. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  3751. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  3752. SUM(T.ACT_COUNT) ACT_COUNT,
  3753. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  3754. T.BELONG_CODE,
  3755. T.BELONG_NAME,
  3756. T.JUDGE_RESULT,
  3757. T.PIPMEMO,
  3758. T.MEMO1,
  3759. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  3760. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  3761. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  3762. '合格' QCM_STAUS,
  3763. '' TARGET,
  3764. T.FLAG_STOVE_NO_ZG,
  3765. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  3766. '' ORDER_NO_NEXT,
  3767. '' PRO_PLAN_ID_NEXT,
  3768. '' GX_PLAN_NO_NEXT,
  3769. S.STORAGE_NO,
  3770. S.LOCATION_NO,
  3771. (SELECT S2.LOCATION_NAME
  3772. FROM YDM_BS_LOCATION S2
  3773. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  3774. S.LARY_NO,
  3775. S.LOC_NO,
  3776. '' PRO_PLAN_ID_NEXT,
  3777. '' GX_PLAN_NO_NEXT,
  3778. (SELECT S1.STORAGE_NAME
  3779. FROM YDM_BS_STORAGE S1
  3780. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  3781. '' DIRECTION,
  3782. '1' BAR_CODE,
  3783. T.SUBCONTRACT_NO,
  3784. T.SUBCONTRACT_NO_SEQ,
  3785. DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
  3786. '' OFFLINE_DOC,
  3787. T.MEMO
  3788. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  3789. WHERE T.MAT_NO = S.MAT_NO
  3790. AND T.BELONG_CODE IN ('100101', '100102', '100103')
  3791. AND T.PRODUCT_FLAG = '801402' #JUDGE_STOVE_NO# #STORAGE_NO#
  3792. #JUDGE_STOVE_NO1#
  3793. GROUP BY T.LOT_NO,
  3794. T.STOVE_NO,
  3795. T.JUDGE_STOVE_NO,
  3796. T.BATCH_NO,
  3797. T.BATCH_GROUD_NO,
  3798. T.PLINE_CODE,
  3799. T.PLINE_NAME,
  3800. T.MAT_STATUS,
  3801. T.QCM_STAUS,
  3802. T.BELONG_CODE,
  3803. T.BELONG_NAME,
  3804. T.FLAG_STOVE_NO_ZG,
  3805. S.STORAGE_NO,
  3806. S.LOCATION_NO,
  3807. S.LARY_NO,
  3808. S.LOC_NO,
  3809. T.JUDGE_RESULT,
  3810. T.PRODUCT_FLAG,
  3811. T.SUBCONTRACT_NO,
  3812. T.SUBCONTRACT_NO_SEQ,
  3813. T.LOCK_BILL_FLAG,
  3814. T.MEMO,
  3815. T.PIPMEMO,
  3816. T.MEMO1,
  3817. T.MATERIAL_NO,
  3818. T.MATERIAL_NAME
  3819. UNION ALL
  3820. SELECT (SELECT T2.BASENAME
  3821. FROM COM_BASE_INFO T2
  3822. WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
  3823. (SELECT T1.BASENAME
  3824. FROM COM_BASE_INFO T1
  3825. WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
  3826. T.MAT_STATUS AS MAT_STATUS_CODE,
  3827. T.LOT_NO,
  3828. T.STOVE_NO,
  3829. T.JUDGE_STOVE_NO,
  3830. T.BATCH_NO,
  3831. T.BATCH_GROUD_NO,
  3832. T.MATERIAL_NO,
  3833. T.MATERIAL_NAME,
  3834. MAX(T.PRODUCCODE) PRODUCCODE,
  3835. MAX(T.PRODUCNAME) PRODUCNAME,
  3836. MAX(T.STEELCODE) STEELCODE,
  3837. MAX(T.STEELNAME) STEELNAME,
  3838. MAX(T.GRADECODE) GRADECODE,
  3839. MAX(T.GRADENAME) GRADENAME,
  3840. MAX(T.SPEC_CODE) SPEC_CODE,
  3841. MAX(T.SPEC_NAME) SPEC_NAME,
  3842. MAX(T.MODEL_CODE) MODEL_CODE,
  3843. MAX(T.MODEL_DESC) MODEL_DESC,
  3844. MAX(T.STD_STYLE) STD_STYLE,
  3845. MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
  3846. MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
  3847. '' PROCESS_CDOE,
  3848. '' PROCESS_DESC,
  3849. '' NEXT_PROCESS_CDOE,
  3850. '' NEXT_PROCESS_DESC,
  3851. T.PLINE_CODE,
  3852. T.PLINE_NAME,
  3853. MAX(T.ACT_DIMATER) ACT_DIMATER,
  3854. MAX(T.ACT_HEIGHT) ACT_HEIGHT,
  3855. SUM(T.ACT_LEN) ACT_LEN,
  3856. MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
  3857. MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
  3858. SUM(T.ACT_COUNT) ACT_COUNT,
  3859. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  3860. T.BELONG_CODE,
  3861. T.BELONG_NAME,
  3862. T.JUDGE_RESULT,
  3863. T.PIPMEMO,
  3864. T.MEMO1,
  3865. MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
  3866. MAX(T.JUDGE_MAKER) JUDGE_MAKER,
  3867. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  3868. '合格' QCM_STAUS,
  3869. '' TARGET,
  3870. T.FLAG_STOVE_NO_ZG,
  3871. T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
  3872. '' ORDER_NO_NEXT,
  3873. '' PRO_PLAN_ID_NEXT,
  3874. '' GX_PLAN_NO_NEXT,
  3875. S.STORAGE_NO,
  3876. S.LOCATION_NO,
  3877. (SELECT S2.LOCATION_NAME
  3878. FROM YDM_BS_LOCATION S2
  3879. WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
  3880. S.LARY_NO,
  3881. S.LOC_NO,
  3882. '' PRO_PLAN_ID_NEXT,
  3883. '' GX_PLAN_NO_NEXT,
  3884. (SELECT S1.STORAGE_NAME
  3885. FROM YDM_BS_STORAGE S1
  3886. WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  3887. '' DIRECTION,
  3888. '1' BAR_CODE,
  3889. T.SUBCONTRACT_NO,
  3890. T.SUBCONTRACT_NO_SEQ,
  3891. DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
  3892. '' OFFLINE_DOC,
  3893. T.MEMO
  3894. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  3895. WHERE T.MAT_NO = S.MAT_NO
  3896. AND T.BELONG_CODE IN ('100101', '100102', '100103')
  3897. AND T.PRODUCT_FLAG = '801403' #JUDGE_STOVE_NO# #STORAGE_NO#
  3898. #JUDGE_STOVE_NO1#
  3899. GROUP BY T.LOT_NO,
  3900. T.STOVE_NO,
  3901. T.JUDGE_STOVE_NO,
  3902. T.BATCH_NO,
  3903. T.BATCH_GROUD_NO,
  3904. T.PLINE_CODE,
  3905. T.PLINE_NAME,
  3906. T.MAT_STATUS,
  3907. T.QCM_STAUS,
  3908. T.BELONG_CODE,
  3909. T.BELONG_NAME,
  3910. T.FLAG_STOVE_NO_ZG,
  3911. S.STORAGE_NO,
  3912. S.LOCATION_NO,
  3913. S.LARY_NO,
  3914. S.LOC_NO,
  3915. T.JUDGE_RESULT,
  3916. T.PRODUCT_FLAG,
  3917. T.SUBCONTRACT_NO,
  3918. T.SUBCONTRACT_NO_SEQ,
  3919. T.LOCK_BILL_FLAG,
  3920. T.MEMO,
  3921. T.PIPMEMO,
  3922. T.MEMO1,
  3923. T.MATERIAL_NO,
  3924. T.MATERIAL_NAME
  3925. </query>
  3926. <query id = "FrmFilpOutStorage.doQueryJudgeNo" desc = "根据车号查询炉号">
  3927. SELECT S.*
  3928. FROM TMS_PLN_M T, TMS_PLN_C S
  3929. WHERE T.PLN_NO = S.PLN_NO
  3930. AND T.CAR_LICENSE LIKE '%'||?||'%'
  3931. AND T.VALIDFLAG = '30'
  3932. </query>
  3933. <query id = "FrmFilpOutStorage.selectTmsPlanCount" desc = "查询装车点是否都已装车完毕">
  3934. SELECT COUNT(1)ACOUNT
  3935. FROM TMS_WAYBILL_C S
  3936. WHERE S.START_AREA_CODE = '#START_AREA_CODE#'
  3937. AND S.WAYBILL_NO = '#WAYBILL_NO#'
  3938. </query>
  3939. <query id = "FrmFilpOutStorage.selectTmsPlnC" desc = "查询运单计划表信息">
  3940. SELECT T.*,S. WAYBILL_NO FROM TMS_PLN_C T,TMS_WAYBILL_M S WHERE T.PLN_NO = S.PLN_NO
  3941. AND S.WAYBILL_NO = '#WAYBILL_NO#'
  3942. </query>
  3943. <query id = "FrmFilpOutStorage.selectTraceM" desc = "查询最大事件代码">
  3944. SELECT T.EVENT_CODE FROM TMS_TRACE_M T WHERE T.WAYBILL_NO = '#WAYBILL_NO#' ORDER BY T.TRACE_NO DESC
  3945. </query>
  3946. <query id = "FrmFilpOutStorage.selectTraceMNode" desc = "查询跟踪表最大的点">
  3947. SELECT T.NODE_CODE FROM TMS_TRACE_M T WHERE T.WAYBILL_NO = '#WAYBILL_NO#' ORDER BY T.TRACE_NO DESC
  3948. </query>
  3949. <query id = "FrmFilpOutStorage.selectTraceMUnload" desc = "查询到达点">
  3950. SELECT S.UNLOADING_AREA_CODE
  3951. FROM TMS_TRACE_M T, TMS_COM_UNLOADING S
  3952. WHERE T.NODE_CODE = S.UNLOADING_CODE
  3953. AND T.WAYBILL_NO = ?
  3954. ORDER BY T.TRACE_NO DESC
  3955. </query>
  3956. <query id = "FrmFilpOutStorage.selectProcess" desc = "查询工序代码">
  3957. SELECT T.PROCESS_CODE,T.PROCESS_DESC FROM COM_BASE_PLINE T WHERE T.PLINE_CODE = ?
  3958. </query>
  3959. <query id = "FrmFilpOutStorage.selectLoadingFlag" desc = "查询装点是否需要吊车">
  3960. SELECT T.IS_CRANE_LOADING,T.IS_CRANE_UNLOADING FROM YDM_BS_STORAGE T WHERE T.STORAGE_NO = '#STORAGE_NO#'
  3961. </query>
  3962. <query id = "FrmFilpOutStorage.selectTmsRelation" desc = "查询装点是否吊车已扫码">
  3963. SELECT COUNT(1)ACOUNT FROM TMS_WAYBILL_RELATION T WHERE T.WAYBILL_NO = ? AND T.AREA_CODE = ?
  3964. </query>
  3965. <query id = "FrmFilpOutStorage.queryStoreArea" desc = "查询仓库所属区域">
  3966. SELECT T.SEAM_AREA FROM YDM_BS_STORAGE T WHERE T.STORAGE_NO = ?
  3967. </query>
  3968. <query id = "FrmFilpOutStorage.doQueryCarNo" desc = "查询已过皮重车辆">
  3969. SELECT DISTINCT T.CAR_NO,T.CAR_NO AS CAR_NO1
  3970. FROM CMM_WEIGHT_RECORD T
  3971. WHERE T.VALIDFLAG = '1'
  3972. AND T.WT_TYPE = '0'
  3973. ORDER BY T.CAR_NO ASC
  3974. </query>
  3975. <query id="TmsDemand.doQueryPlnC" desc="查询计划">
  3976. <![CDATA[
  3977. SELECT * FROM TMS_PLN_C M WHERE 1=1
  3978. ]]>
  3979. </query>
  3980. ·
  3981. <query id="ComLgValidDataPurviewIds.getDepartmentBySectionID" desc="查询科室对应的部门">
  3982. <![CDATA[
  3983. SELECT T.DEPARTNAME, T.DEPARTID
  3984. FROM CORE_APP_DEPARTMENT T, CORE_APP_DEPARTMENT A
  3985. WHERE A.PID = T.DEPARTID
  3986. AND A.DEPARTID = ?
  3987. ]]>
  3988. </query>
  3989. <query id="ComLgValidDataPurviewIds.getDepartDescByDepartId" desc="根据部门表的ID获取对应的描述">
  3990. <![CDATA[
  3991. SELECT T.DEPARTNAME
  3992. FROM CORE_APP_DEPARTMENT T
  3993. WHERE T.DEPARTID = '#DEPARTID#'
  3994. ]]>
  3995. </query>
  3996. <query id = "FrmFilpOutStorage.selectjlgysByPline" desc = "查询计量供应商">
  3997. SELECT JL_SUPP FROM COM_BASE_PLINE WHERE PLINE_CODE = ?
  3998. </query>
  3999. <query id = "FrmFilpOutStorage.selectjlFalgByProduct" desc = "查询品名是否计量">
  4000. SELECT JL_FALG FROM COM_BASE_PRODUCT WHERE PRODUCCODE = ?
  4001. </query>
  4002. <query id = "FrmFilpOutStorage.selectTarFlag" desc = "查询过磅标识">
  4003. SELECT T.PRT_FLAG FROM MIL_PLAN T WHERE T.ID = '#HEAT_PLAN_NO#'
  4004. </query>
  4005. <query id = "FrmFilpOutStorage.getPreDictNo" desc = "查询预报编号">
  4006. SELECT TO_CHAR(SYSDATE, 'YYYYMMDD') ||
  4007. LPAD(NVL(MAX(SUBSTR(PREDICTION_NO, 9)), 0) + 1, 4, 0) PREDICTION_NO
  4008. FROM PRE_TRACK_SCALE T
  4009. WHERE T.PREDICTION_NO LIKE TO_CHAR(SYSDATE, 'YYYYMMDD')|| '____'
  4010. </query>
  4011. <query id = "FrmFilpOutStorage.InsertPreDictNo" desc = "插入计量预报信息">
  4012. INSERT INTO PRE_TRACK_SCALE(
  4013. PREDICTION_NO,
  4014. NOTICE_NO,
  4015. CAR_NO,
  4016. MATTER_NO,
  4017. MATTER_NAME,
  4018. CONTRACT_NO,
  4019. FORWARDING_UNIT_NO,
  4020. FORWARDING_UNIT_NAME,
  4021. RECEIVING_UINT_NO,
  4022. RECEIVING_UINT_NAME,
  4023. MATERIAL_NO,
  4024. MATERIAL_NAME,
  4025. SPEC_NO,
  4026. SPEC_NAME,
  4027. PREDICTION_TYPE,
  4028. METER_TYPE_NO,
  4029. METER_TYPE_NAME,
  4030. USED_TYPE,
  4031. EFFECTIVE_NUM,
  4032. VALUE_FLAG,
  4033. CREATE_MAN_NO,
  4034. CREATE_MAN_NAME,
  4035. CREATE_TIME,
  4036. HEAT_NO,
  4037. CAR_ALLOCATION_TIME,
  4038. EFFECTIVE_START_TIME,
  4039. EFFECTIVE_END_TIME,
  4040. MEMO,
  4041. CUSTOMER_SUPPLIER_NO,
  4042. CUSTOMER_SUPPLIER_NAME)
  4043. VALUES(
  4044. '#PREDICTION_NO#',
  4045. '#NOTICE_NO#',
  4046. '#CAR_NO#',
  4047. '#MATTER_NO#',
  4048. '#MATTER_NAME#',
  4049. '#CONTRACT_NO#',
  4050. '#FORWARDING_UNIT_NO#',
  4051. '#FORWARDING_UNIT_NAME#',
  4052. '#RECEIVING_UINT_NO#',
  4053. '#RECEIVING_UINT_NAME#',
  4054. '#MATERIAL_NO#',
  4055. '#MATERIAL_NAME#',
  4056. '#SPEC_NO#',
  4057. '#SPEC_NAME#',
  4058. '#PREDICTION_TYPE#',
  4059. '#METER_TYPE_NO#',
  4060. '#METER_TYPE_NAME#',
  4061. '#USED_TYPE#',
  4062. '#EFFECTIVE_NUM#',
  4063. '#VALUE_FLAG#',
  4064. '#CREATE_MAN_NO#',
  4065. '#CREATE_MAN_NAME#',
  4066. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  4067. '#HEAT_NO#',
  4068. TO_DATE('#CAR_ALLOCATION_TIME#','YYYY-MM-DD HH24:MI:SS'),
  4069. TO_DATE('#EFFECTIVE_START_TIME#','YYYY-MM-DD HH24:MI:SS'),
  4070. TO_DATE('#EFFECTIVE_END_TIME#','YYYY-MM-DD HH24:MI:SS'),
  4071. '产销下发',
  4072. '#CUSTOMER_SUPPLIER_NO#',
  4073. (SELECT CUSTOMER_SUPPLIER_NAME FROM METER_BASE_CUSTOMER_SUPPLIER WHERE CUSTOMER_SUPPLIER_NO = '#CUSTOMER_SUPPLIER_NO#' AND ROWNUM = 1))
  4074. </query>
  4075. <query id = "PreTrackNotice.InsertPreProcess_LINK" desc = "插入计量流程环节信息">
  4076. <![CDATA[
  4077. DECLARE
  4078. V_PRE_PROCESS_NO METER_WORK_PRE_PROCESS.PRE_PROCESS_NO%TYPE := NULL;
  4079. BEGIN
  4080. SELECT TO_CHAR(SYSDATE, 'YYYYMMDD') ||
  4081. (SELECT LPAD(NVL(MAX(TO_NUMBER(SUBSTR(PRE_PROCESS_NO,
  4082. LENGTH(PRE_PROCESS_NO) - 4))),
  4083. 0) + 1,
  4084. 5,
  4085. '0') PRE_PROCESS_NO
  4086. FROM METER_WORK_PRE_PROCESS
  4087. where instr(PRE_PROCESS_NO, to_char(sysdate, 'yyyyMMdd')) > 0)
  4088. into V_PRE_PROCESS_NO
  4089. FROM DUAL;
  4090. INSERT INTO METER_WORK_PRE_PROCESS
  4091. SELECT V_PRE_PROCESS_NO,
  4092. T2.PREDICTION_NO PREDICTION_NO,
  4093. T1.PROCESS_NO PROCESS_NO,
  4094. T2.CAR_NO CAR_NO,
  4095. T1.METER_TYPE_NO METER_TYPE_NO,
  4096. T1.METER_TYPE_NAME METER_TYPE_NAME,
  4097. T2.MATTER_NO MATTER_NO,
  4098. T2.MATTER_NAME MATTER_NAME,
  4099. '1',
  4100. T2.CREATE_MAN_NO,
  4101. T2.CREATE_MAN_NAME,
  4102. SYSDATE
  4103. FROM METER_WORK_METER_PROCESS T1, PRE_TRACK_SCALE T2
  4104. WHERE T1.METER_TYPE_NO = '#METER_TYPE_NO#'
  4105. AND T1.METER_TYPE_NAME = '#METER_TYPE_NAME#'
  4106. AND T2.PREDICTION_NO = '#PREDICTION_NO#'
  4107. AND T1.VALUE_FLAG = '0';
  4108. INSERT INTO METER_WORK_PRE_LINK
  4109. (PRE_LINK_NO,
  4110. PREDICTION_NO,
  4111. PROCESS_NO,
  4112. PRE_PROCESS_NO,
  4113. LINK_CODE,
  4114. LINK_NAME,
  4115. SEQ_NO,
  4116. LINK_NO,
  4117. VALUE_FLAG,
  4118. CREATE_MAN_NO,
  4119. CREATE_MAN_NAME,
  4120. CREATE_TIME)
  4121. SELECT TO_CHAR(SYSDATE, 'YYYYMMDD') ||
  4122. (SELECT LPAD(NVL(MAX(TO_NUMBER(SUBSTR(PRE_LINK_NO,
  4123. LENGTH(PRE_LINK_NO) - 3))),
  4124. 0),
  4125. 4,
  4126. '0') PRE_LINK_NO
  4127. FROM METER_WORK_PRE_LINK
  4128. where instr(PRE_LINK_NO, TO_CHAR(SYSDATE, 'YYYYMMDD')) > 0) +
  4129. ROWNUM,
  4130. T1.PREDICTION_NO PREDICTION_NO,
  4131. T.PROCESS_NO PROCESS_NO,
  4132. T1.PRE_PROCESS_NO PRE_PROCESS_NO,
  4133. T.LINK_CODE LINK_CODE,
  4134. T.LINK_NAME LINK_NAME,
  4135. T.LINK_ORDER_NUM SEQ_NO,
  4136. T.LINK_NO LINK_NO,
  4137. DECODE(T.LINK_CODE, '001021001', '1', '0'),
  4138. T1.CREATE_MAN_NO,
  4139. T1.CREATE_MAN_NAME,
  4140. SYSDATE
  4141. FROM METER_WORK_METER_LINK T, METER_WORK_PRE_PROCESS T1
  4142. WHERE T.PROCESS_NO = '#PROCESS_NO#'
  4143. AND T1.PRE_PROCESS_NO = V_PRE_PROCESS_NO;
  4144. END;
  4145. ]]>
  4146. </query>
  4147. <query id = "FrmFilpOutStorage.getStorageFlag" desc = "查询仓库所属单位、所在库位">
  4148. SELECT COUNT(1) ACOUNT
  4149. FROM YDM_BS_STORAGE T
  4150. WHERE T.STORAGE_NO = ?
  4151. AND T.SEAM_AREA = '0'
  4152. AND T.STORAGE_ATTR IN ('800302', '800303', '800304')
  4153. </query>
  4154. <query id = "FrmFilpOutStorage.selectJlMatter" desc = "查询计量系统物料码">
  4155. SELECT T.MATTER_NO, T.MATTER_NAME
  4156. FROM METER_BASE_MATTER_INFO T
  4157. WHERE T.INDEX_CODE = '#PRODUCCODE#'
  4158. </query>
  4159. <query id = "FrmFilpOutStorage.selectPreDictNoFlag" desc = "查询预报状态">
  4160. SELECT T.VALUE_FLAG FROM PRE_TRACK_SCALE T WHERE T.NOTICE_NO = '#OUTSTOCK_DOC#'
  4161. </query>
  4162. <query id = "FrmFilpOutStorage.deletePreDoctNo" desc = "撤销倒库删除预报信息">
  4163. DELETE FROM PRE_TRACK_SCALE T WHERE T.NOTICE_NO = '#OUTSTOCK_DOC#'
  4164. </query>
  4165. <query id = "FrmFilpOutStorage.updatePreDoctNo" desc = "撤销倒库作废预报信息">
  4166. UPDATE PRE_TRACK_SCALE T SET T.VALUE_FLAG = '3',T.MEMO = '撤销倒库,作废预报' WHERE T.NOTICE_NO = '#OUTSTOCK_DOC#'
  4167. </query>
  4168. <query id = "FrmFilpOutStorage.getLoadCode" desc = "查询装些点编号">
  4169. SELECT T.LOAD_POINT_NO
  4170. FROM METER_BASE_LOAD_POINT T
  4171. WHERE T.INDEX_CODE = ?
  4172. </query>
  4173. <query id = "FrmFilpOutStorage.selectOutInformation" desc = "查询出库信息">
  4174. SELECT
  4175. T.BALANCE_NO,
  4176. T.PROCESS_DESC,
  4177. T.PROCESS_CDOE,
  4178. T.STORAGE_ATTR_NAME,
  4179. T.STORAGE_TYPE_NO,
  4180. T.STORAGE_TYPE_NAME,
  4181. T.MANAGEMENT_NO,
  4182. T.MANAGEMENT_NAME,
  4183. T.TAR_STORAGE_NO,
  4184. (SELECT T2.STORAGE_NAME FROM YDM_BS_STORAGE T2 WHERE T2.STORAGE_NO = T.TAR_STORAGE_NO)TAR_STORAGE_NAME,
  4185. T.TAR_LOCATION_NO,
  4186. T.TAR_LARY_NO,
  4187. T.TAR_LOC_NO,
  4188. T.TAR_STORAGE_ATTR,
  4189. T.TAR_STORAGE_ATTR_NAME,
  4190. T.TAR_STORAGE_TYPE_NO,
  4191. T.TAR_STORAGE_TYPE_NAME,
  4192. T.TAR_MANAGEMENT_NO,
  4193. T.TAR_MANAGEMENT_NAME,
  4194. T.TAR_REC_FLAG,
  4195. TO_CHAR(T.RPO_TIME, 'YYYY-MM-DD HH24:MI:SS') RPO_TIME,
  4196. T.PRO_BC,
  4197. T.PRO_BZ,
  4198. TO_CHAR(T.INSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS') INSTOCK_TIME,
  4199. T.IN_BC,
  4200. T.IN_BZ,
  4201. TO_CHAR(T.OUTSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS') OUTSTOCK_TIME,
  4202. T.OUT_BC,
  4203. T.OUT_BZ,
  4204. T.MEMO,
  4205. T.HAND_FLAG,
  4206. T.VALIDFLAG,
  4207. T.CREATE_NAME,
  4208. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  4209. T.UPDATE_NAME,
  4210. TO_CHAR(T.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  4211. T.DELETE_NAME,
  4212. TO_CHAR(T.DELETE_TIME, 'YYYY-MM-DD HH24:MI:SS') DELETE_TIME,
  4213. T.ORD_PK,
  4214. T.ORD_LN_PK,
  4215. T.ORD_LN_DLY_PK,
  4216. T.DEPARTMENT_CODE,
  4217. T.DEPARTMENT_DESC,
  4218. T.TAR_DEPARTMENT_CODE,
  4219. T.TAR_DEPARTMENT_DESC,
  4220. T.ORDER_NO,
  4221. T.ORDER_SEQ,
  4222. T.DELIVERY_NO,
  4223. T.PRODUCT_FLAG,
  4224. T.MAT_STATUS,
  4225. T.JUDGE_STD_NAME,
  4226. T.JUDGE_STD_CODE,
  4227. T.PONDER_NO,
  4228. T.PONDER_GROSS_WT,
  4229. T.VSTEL,
  4230. T.VSTEL_DESC,
  4231. T.BAL_YEAR_MONTH,
  4232. T.M_BILL_NO,
  4233. T.SEND_NUM,
  4234. T.RECEIV_NO,
  4235. T.RECEIV_NM,
  4236. T.FINISHPRO_MOLD,
  4237. T.IN_MOLD,
  4238. T.LOAD_PLINE_CODE,
  4239. T.LOAD_PLINE_NAME,
  4240. T.GX_PLAN_NO,
  4241. T.PIPMEMO,
  4242. T.BELONG_CODE_RESPONSE,
  4243. T.BELONG_NAME_RESPONSE,
  4244. T.DATA_SUORCE,
  4245. T.QCM_STAUS,
  4246. T.LEAVE_FACTORY_NAME,
  4247. TO_CHAR(T.LEAVE_FACTORY_TIME, 'YYYY-MM-DD HH24:MI:SS') LEAVE_FACTORY_TIME,
  4248. T.LEAVE_FACTORY_FLAG,
  4249. T.SCRAP_REASON,
  4250. T.DRIVER,
  4251. T.LEAVE_MANAGEMENT_NO,
  4252. T.LEAVE_MANAGEMENT_NAME,
  4253. T.CUT_FLAG,
  4254. T.OUT_TYPE,
  4255. T.FLAG_STOVE_NO_ZG,
  4256. T.SUPERVISOR_NAME,
  4257. T.SUPERVISOR_CALL,
  4258. T.PRO_ORDER_ID,
  4259. T.OUTSTOCK_SQE,
  4260. T.OUTSTOCK_PLAN_NO,
  4261. T.OUTSTOCK_DOC,
  4262. T.OUTSTOCK_TYPE_CODE,
  4263. T.OUTSTOCK_TYPE_NAME,
  4264. T.ICCAR_NO,
  4265. T.VEHICLE_NO,
  4266. T.MAT_NO,
  4267. T.LOT_NO,
  4268. T.STOVE_NO,
  4269. T.JUDGE_STOVE_NO,
  4270. T.BATCH_NO,
  4271. T.BATCH_GROUD_NO,
  4272. T.MATERIAL_NO,
  4273. T.MATERIAL_NAME,
  4274. T.PRODUCCODE,
  4275. T.PRODUCNAME,
  4276. T.STD_CODE,
  4277. T.STD_NAME,
  4278. T.GRADECODE,
  4279. T.GRADENAME,
  4280. T.STEELCODE,
  4281. T.STEELNAME,
  4282. T.STD_STYLE,
  4283. T.STD_STYLE_DESC,
  4284. T.SPEC_CODE,
  4285. T.SPEC_NAME,
  4286. T.MODEL_CODE,
  4287. T.MODEL_DESC,
  4288. T.PRO_ORDER_NO,
  4289. T.PLINE_CODE,
  4290. T.PLINE_NAME,
  4291. T.ACT_DIMATER,
  4292. T.ACT_HEIGHT,
  4293. T.ACT_LEN,
  4294. T.ACT_LEN_MIN,
  4295. T.ACT_LEN_MAX,
  4296. T.ACT_COUNT,
  4297. T.ACT_WEIGHT,
  4298. T.ACT_THEORY_WEIGHT,
  4299. T.BELONG_CODE,
  4300. T.BELONG_NAME,
  4301. T.BAR_CODE,
  4302. T.STORAGE_NO,
  4303. (SELECT T1.STORAGE_NAME FROM YDM_BS_STORAGE T1 WHERE T1.STORAGE_NO = T.STORAGE_NO)STORAGE_NAME,
  4304. T.LOCATION_NO,
  4305. T.LARY_NO,
  4306. T.LOC_NO,
  4307. T.STORAGE_ATTR
  4308. FROM YDM_BC_OUTLIST T
  4309. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
  4310. AND ROWNUM = 1
  4311. </query>
  4312. <query id = "FrmFilpOutStorage.selectOutPreDictNo" desc = "查询预报是否存在">
  4313. SELECT COUNT(1) ACOUNT
  4314. FROM PRE_TRACK_SCALE T
  4315. WHERE T.NOTICE_NO = '#OUTSTOCK_DOC#'
  4316. AND T.CAR_NO = '#VEHICLE_NO#'
  4317. </query>
  4318. <query id = "FrmFilpOutStorage.updateOutstockPlanNo" desc = "天淮去天淮室外成品库">
  4319. UPDATE YDM_BC_OUTLIST T
  4320. SET T.OUTSTOCK_PLAN_NO = ''
  4321. WHERE T.OUTSTOCK_PLAN_NO = '1'
  4322. AND (T.TAR_STORAGE_NO = 'LSN1' OR T.TAR_STORAGE_NO = 'LSN2')
  4323. AND T.OUTSTOCK_TYPE_CODE = '800803'
  4324. AND T.VEHICLE_NO = ?
  4325. AND T.VALIDFLAG = '1'
  4326. </query>
  4327. <query id = "FrmFilpOutStorage.getCarNo" desc = "天淮内倒车辆是否只有一个出库单号">
  4328. SELECT COUNT(1) ACOUNT
  4329. FROM (SELECT DISTINCT T.OUTSTOCK_DOC
  4330. FROM YDM_BC_OUTLIST T
  4331. WHERE T.OUTSTOCK_PLAN_NO = '1'
  4332. AND (T.TAR_STORAGE_NO = 'LSN1' OR T.TAR_STORAGE_NO = 'LSN2')
  4333. AND T.OUTSTOCK_TYPE_CODE = '800803'
  4334. AND T.VEHICLE_NO = ?
  4335. AND T.VALIDFLAG = '1')
  4336. </query>
  4337. <query id = "FrmFilpOutStorage.doQueryNetWeight" desc = "查询过磅重量">
  4338. select actual_no,
  4339. prediction_no,
  4340. notice_no,
  4341. car_no,
  4342. trailer_no,
  4343. matter_no,
  4344. matter_name,
  4345. contract_no,
  4346. batch_no,
  4347. customer_supplier_no,
  4348. customer_supplier_name,
  4349. forwarding_unit_no,
  4350. forwarding_unit_name,
  4351. receiving_uint_no,
  4352. receiving_uint_name,
  4353. material_no,
  4354. material_name,
  4355. spec_no,
  4356. spec_name,
  4357. load_point_no,
  4358. load_point_name,
  4359. sample_no,
  4360. sample_voucher,
  4361. carrier_unit_no,
  4362. carrier_unit_name,
  4363. meter_type_no,
  4364. meter_type_name,
  4365. meter_process_no,
  4366. meter_process_edition_no,
  4367. actual_first1_no,
  4368. gross_weight,
  4369. gross_man_no,
  4370. gross_man_name,
  4371. gross_time,
  4372. base_spot1_no,
  4373. base_spot1_name,
  4374. gross_class,
  4375. gross_group,
  4376. gross_mode,
  4377. actual_first2_no,
  4378. tare_weight,
  4379. tare_man_no,
  4380. tare_man_name,
  4381. tare_time,
  4382. base_spot2_no,
  4383. base_spot2_name,
  4384. tare_class,
  4385. tare_group,
  4386. tare_mode,
  4387. TO_CHAR(NVL(T.NET_WEIGHT / 1000, 0), 'FM999999990.000') net_weight,
  4388. meter_num,
  4389. net_man_no,
  4390. net_man_name,
  4391. net_time,
  4392. net_spot3_no,
  4393. net_spot3_name,
  4394. net_group,
  4395. net_mode,
  4396. value_flag,
  4397. upload_flag,
  4398. check_man_no,
  4399. check_man_name,
  4400. check_time,
  4401. upload_man_no,
  4402. upload_man_name,
  4403. upload_time,
  4404. add_weight,
  4405. net_class,
  4406. tb_flage,
  4407. railway_no,
  4408. update_man_no,
  4409. update_man_name,
  4410. update_time,
  4411. memo,
  4412. heat_no,
  4413. shipment_gross_weight,
  4414. shipment_net_weight,
  4415. shipment_num,
  4416. bind_card_no,
  4417. prediction_type,
  4418. prediction_combination,
  4419. inter_read,
  4420. index_matter_name,
  4421. judge_type_no,
  4422. judge_type_name,
  4423. valid_man,
  4424. impurity_wgt,
  4425. len_wgt,
  4426. fe_wgt,
  4427. light_wgt,
  4428. cut_wgt,
  4429. meme2,
  4430. minus_time,
  4431. minus_man_no,
  4432. minus_man_name,
  4433. add_wgt_no,
  4434. add_wgt_pk,
  4435. gross_car_weight,
  4436. tare_car_weight,
  4437. gross_car_no,
  4438. tare_car_no,
  4439. unload_unit_no,
  4440. unload_unit_name,
  4441. unload_addr_no,
  4442. unload_addr_name,
  4443. print_count,
  4444. print_man_no,
  4445. print_man_name,
  4446. print_time,
  4447. settlement_no
  4448. from meter_work_car_actual T
  4449. WHERE T.NOTICE_NO = ?
  4450. AND T.METER_TYPE_NO IN( '001006003','001006009','001006010','001006011','001006012') --中控倒运(新)
  4451. </query>
  4452. </queryMap>