PMModuleLogic.cs 568 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139
  1. /*******************************************************************************
  2. * Copyright(c) 2014 DongkeSoft All rights reserved. / Confidential
  3. * 类的信息:
  4. * 1.程序名称:PMModuleLogic.cs
  5. * 2.功能描述:生产管理服务端业务逻辑
  6. * 编辑履历:
  7. * 作者 日期 版本 修改内容
  8. * 陈晓野 2015/03/21 1.00 新建
  9. *******************************************************************************/
  10. using System;
  11. using System.Collections.Generic;
  12. using System.Data;
  13. using System.Text;
  14. using Curtain.DataAccess;
  15. using Dongke.IBOSS.PRD.Basics.BaseResources;
  16. using Dongke.IBOSS.PRD.Basics.DataAccess;
  17. using Dongke.IBOSS.PRD.Service.CMNModuleService;
  18. using Dongke.IBOSS.PRD.Service.DataModels;
  19. using Dongke.IBOSS.PRD.WCF.DataModels;
  20. using Dongke.WinForm.Utilities;
  21. using Oracle.ManagedDataAccess.Client;
  22. using DataBaseType = Curtain.DataAccess.DataBaseType;
  23. using System.Threading;
  24. using System.Linq;
  25. namespace Dongke.IBOSS.PRD.Service.PMModuleService
  26. {
  27. /// <summary>
  28. /// 生产管理服务端业务逻辑
  29. /// </summary>
  30. public static class PMModuleLogic
  31. {
  32. #region 注浆管理
  33. #region 注浆登记一览
  34. /// <summary>
  35. /// 取得FPM0101画面(注浆登记)的初始化数据
  36. /// </summary>
  37. /// <param name="user">登录用户信息</param>
  38. /// <returns>初始化数据</returns>
  39. public static ServiceResultEntity GetFPM0101IData(SUserInfo user)
  40. {
  41. IDBConnection conn = null;
  42. try
  43. {
  44. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  45. DataTable dataTable = CMNModuleLogic.GetTP_MST_GMouldType(conn, user, Constant.ValueFlag.Effective);
  46. ServiceResultEntity sre = new ServiceResultEntity();
  47. sre.Data = new DataSet();
  48. sre.Data.Tables.Add(dataTable);
  49. return sre;
  50. }
  51. catch (Exception ex)
  52. {
  53. throw ex;
  54. }
  55. finally
  56. {
  57. if (conn != null &&
  58. conn.ConnState == ConnectionState.Open)
  59. {
  60. conn.Close();
  61. }
  62. }
  63. }
  64. /// <summary>
  65. /// 取得FPM0101画面(注浆登记)的查询数据
  66. /// </summary>
  67. /// <param name="user">登录用户信息</param>
  68. /// <param name="ids">多个注浆id(用[,]分开)</param>
  69. /// <returns>查询结果</returns>
  70. public static ServiceResultEntity GetFPM0101SData(SUserInfo user, string ids)
  71. {
  72. IDBConnection conn = null;
  73. try
  74. {
  75. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  76. List<OracleParameter> parameters = new List<OracleParameter>();
  77. StringBuilder sql = new StringBuilder(PMModuleLogic.GetFPM0101SSQL());
  78. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  79. parameters.Add(new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  80. //if (!string.IsNullOrWhiteSpace(ids))
  81. {
  82. //ids = "," + ids + ",";
  83. //sql.Append(" AND INSTR(:GroutingDailyIDs, ',' || GD.GroutingDailyID || ',') > 0");
  84. sql.Append(" AND GD.GroutingDailyID in ( "+ids+" )");
  85. parameters.Add(new OracleParameter(":GroutingDailyIDs", OracleDbType.Varchar2, ids, ParameterDirection.Input));
  86. }
  87. sql.Append(" ORDER BY GDD.GroutingLineCode, GDD.GroutingDate, GDD.GroutingDailyID, GDD.GroutingMouldCode");
  88. DataTable data = conn.GetSqlResultToDt(sql.ToString(), parameters.ToArray());
  89. ServiceResultEntity sre = new ServiceResultEntity();
  90. if (data == null || data.Rows.Count == 0)
  91. {
  92. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  93. return sre;
  94. }
  95. sre.Data = new DataSet();
  96. sre.Data.Tables.Add(data);
  97. return sre;
  98. }
  99. catch (Exception ex)
  100. {
  101. throw ex;
  102. }
  103. finally
  104. {
  105. if (conn != null &&
  106. conn.ConnState == ConnectionState.Open)
  107. {
  108. conn.Close();
  109. }
  110. }
  111. }
  112. /// <summary>
  113. /// 取得FPM0101画面(注浆登记)的查询数据
  114. /// </summary>
  115. /// <param name="user">登录用户信息</param>
  116. /// <param name="se">查询条件</param>
  117. /// <returns>查询结果</returns>
  118. public static ServiceResultEntity GetFPM0101SData(SUserInfo user, FPM0101_SE se)
  119. {
  120. IDBConnection conn = null;
  121. try
  122. {
  123. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  124. List<OracleParameter> parameters = new List<OracleParameter>();
  125. StringBuilder sql = new StringBuilder(PMModuleLogic.GetFPM0101SSQL());
  126. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  127. parameters.Add(new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  128. if (se != null)
  129. {
  130. // 成型线编码
  131. if (!string.IsNullOrEmpty(se.GroutingLineCode))
  132. {
  133. sql.Append(" AND INSTR(GD.GroutingLineCode, :GroutingLineCode) > 0");
  134. parameters.Add(new OracleParameter(":GroutingLineCode", OracleDbType.NVarchar2, se.GroutingLineCode, ParameterDirection.Input));
  135. }
  136. // 成型线名称
  137. if (!string.IsNullOrEmpty(se.GroutingLineName))
  138. {
  139. sql.Append(" AND INSTR(GD.GroutingLineName, :GroutingLineName) > 0");
  140. parameters.Add(new OracleParameter(":GroutingLineName", OracleDbType.NVarchar2, se.GroutingLineName, ParameterDirection.Input));
  141. }
  142. // 成型线类别
  143. if (se.GMouldTypeID.HasValue)
  144. {
  145. sql.Append(" AND GD.GMouldTypeID = :GMouldTypeID");
  146. parameters.Add(new OracleParameter(":GMouldTypeID", OracleDbType.Int32, se.GMouldTypeID.Value, ParameterDirection.Input));
  147. }
  148. // 注浆日期-开始
  149. if (se.GroutingDateBegin.HasValue)
  150. {
  151. sql.Append(" AND GD.GroutingDate >= :GroutingDateBegin");
  152. parameters.Add(new OracleParameter(":GroutingDateBegin", OracleDbType.Date, se.GroutingDateBegin.Value, ParameterDirection.Input));
  153. }
  154. // 注浆日期-结束
  155. if (se.GroutingDateEnd.HasValue)
  156. {
  157. sql.Append(" AND GD.GroutingDate <= :GroutingDateEnd");
  158. parameters.Add(new OracleParameter(":GroutingDateEnd", OracleDbType.Date, se.GroutingDateEnd.Value, ParameterDirection.Input));
  159. }
  160. // 注浆批次
  161. if (se.GroutingBatchNo.HasValue)
  162. {
  163. sql.Append(" AND GD.GroutingBatchNo = :GroutingBatchNo");
  164. parameters.Add(new OracleParameter(":GroutingBatchNo", OracleDbType.Int32, se.GroutingBatchNo.Value, ParameterDirection.Input));
  165. }
  166. // 注浆模具编号
  167. if (!string.IsNullOrEmpty(se.GroutingMouldCode))
  168. {
  169. sql.Append(" AND INSTR(GDD.GroutingMouldCode, :GroutingMouldCode) > 0");
  170. parameters.Add(new OracleParameter(":GroutingMouldCode", OracleDbType.NVarchar2, se.GroutingMouldCode, ParameterDirection.Input));
  171. }
  172. // 产品编号
  173. if (!string.IsNullOrEmpty(se.GoodsCode))
  174. {
  175. sql.Append(" AND INSTR(GDD.GoodsCode, :GoodsCode) > 0");
  176. parameters.Add(new OracleParameter(":GoodsCode", OracleDbType.NVarchar2, se.GoodsCode, ParameterDirection.Input));
  177. }
  178. // 产品名称
  179. if (!string.IsNullOrEmpty(se.GoodsName))
  180. {
  181. sql.Append(" AND INSTR(GDD.GoodsName, :GoodsName) > 0");
  182. parameters.Add(new OracleParameter(":GoodsName", OracleDbType.NVarchar2, se.GoodsName, ParameterDirection.Input));
  183. }
  184. // 备注
  185. if (!string.IsNullOrEmpty(se.Remarks))
  186. {
  187. sql.Append(" AND INSTR(GDD.Remarks, :Remarks) > 0");
  188. parameters.Add(new OracleParameter(":Remarks", OracleDbType.NVarchar2, se.Remarks, ParameterDirection.Input));
  189. }
  190. // 注浆标识
  191. if (!string.IsNullOrEmpty(se.GroutingFlag))
  192. {
  193. sql.Append(" AND GDD.GroutingFlag = :GroutingFlag");
  194. parameters.Add(new OracleParameter(":GroutingFlag", OracleDbType.Char, se.GroutingFlag, ParameterDirection.Input));
  195. }
  196. // 损坯标识
  197. if (!string.IsNullOrEmpty(se.ScrapFlag))
  198. {
  199. sql.Append(" AND GDD.ScrapFlag = :ScrapFlag");
  200. parameters.Add(new OracleParameter(":ScrapFlag", OracleDbType.Char, se.ScrapFlag, ParameterDirection.Input));
  201. }
  202. // 成型工号
  203. if (!string.IsNullOrEmpty(se.GroutingUserCode))
  204. {
  205. sql.Append(" AND INSTR(GDD.UserCode, :GroutingUserCode) > 0");
  206. parameters.Add(new OracleParameter(":GroutingUserCode", OracleDbType.NVarchar2, se.GroutingUserCode, ParameterDirection.Input));
  207. }
  208. // 条码
  209. if (!string.IsNullOrEmpty(se.BarCode))
  210. {
  211. sql.Append(" AND INSTR(GDD.BarCode, :BarCode) > 0");
  212. parameters.Add(new OracleParameter(":BarCode", OracleDbType.NVarchar2, se.BarCode, ParameterDirection.Input));
  213. }
  214. // 绑定条码
  215. if (!string.IsNullOrEmpty(se.BarCodeFlag))
  216. {
  217. if ("1" == se.BarCodeFlag)
  218. {
  219. sql.Append(" AND LENGTH(GDD.BarCode) > 0");
  220. }
  221. else
  222. {
  223. sql.Append(" AND (GDD.BarCode IS NULL OR LENGTH(GDD.BarCode) = 0)");
  224. }
  225. }
  226. // 交坯日期-开始
  227. if (se.DeliverTimeBegin.HasValue)
  228. {
  229. sql.Append(" AND GDD.DeliverTime >= :DeliverTimeBegin");
  230. parameters.Add(new OracleParameter(":DeliverTimeBegin", OracleDbType.Date, se.DeliverTimeBegin.Value, ParameterDirection.Input));
  231. }
  232. // 交坯日期-结束
  233. if (se.DeliverTimeEnd.HasValue)
  234. {
  235. sql.Append(" AND GDD.DeliverTime < :DeliverTimeEnd");
  236. parameters.Add(new OracleParameter(":DeliverTimeEnd", OracleDbType.Date, se.DeliverTimeEnd.Value.AddDays(1), ParameterDirection.Input));
  237. }
  238. // 交坯标识
  239. if (!string.IsNullOrEmpty(se.DeliverFlag))
  240. {
  241. sql.Append(" AND GDD.DeliverFlag = :DeliverFlag");
  242. parameters.Add(new OracleParameter(":DeliverFlag", OracleDbType.Char, se.DeliverFlag, ParameterDirection.Input));
  243. }
  244. // 试验标识
  245. if (!string.IsNullOrEmpty(se.TestMouldFlag))
  246. {
  247. sql.Append(" AND GDD.TestMouldFlag = :TestMouldFlag");
  248. parameters.Add(new OracleParameter(":TestMouldFlag", OracleDbType.Char, se.TestMouldFlag, ParameterDirection.Input));
  249. }
  250. }
  251. sql.Append(" ORDER BY GDD.GroutingDate, GDD.GroutingLineCode, GDD.GroutingDailyID, GDD.GroutingMouldCode");
  252. DataTable data = conn.GetSqlResultToDt(sql.ToString(), parameters.ToArray());
  253. ServiceResultEntity sre = new ServiceResultEntity();
  254. if (data == null || data.Rows.Count == 0)
  255. {
  256. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  257. return sre;
  258. }
  259. sre.Data = new DataSet();
  260. sre.Data.Tables.Add(data);
  261. return sre;
  262. }
  263. catch (Exception ex)
  264. {
  265. throw ex;
  266. }
  267. finally
  268. {
  269. if (conn != null &&
  270. conn.ConnState == ConnectionState.Open)
  271. {
  272. conn.Close();
  273. }
  274. }
  275. }
  276. /// <summary>
  277. /// 获取查询sql
  278. /// </summary>
  279. /// <returns>sql</returns>
  280. private static string GetFPM0101SSQL()
  281. {
  282. string selSql =
  283. "SELECT GDD.GroutingDailyDetailID," +
  284. " GDD.GroutingDailyID," +
  285. " GDD.GroutingLineDetailID," +
  286. " GDD.GroutingLineID," +
  287. // 成型线编码
  288. " GDD.GroutingLineCode," +
  289. // 成型线名称
  290. " GDD.GroutingLineName," +
  291. // 注浆日期
  292. " GDD.GroutingDate," +
  293. // 注浆批次
  294. " GDD.GroutingBatchNo," +
  295. // 成型工号
  296. " GDD.UserCode," +
  297. // 产品编码
  298. " GDD.GoodsCode," +
  299. // 产品名称
  300. " GDD.GoodsName," +
  301. // 20210113 增加列 注浆重量
  302. " GDD.SLURRY_WEIGHT," +
  303. // 注浆线模具编码
  304. " GDD.GroutingMouldCode," +
  305. // 模具状态
  306. " GMS.GMouldStatusName," +
  307. // 注浆标识
  308. " GDD.GroutingFlag," +
  309. // 注浆标识
  310. " decode(ML.LogoID, null, null,to_char( ML.LogoName || '[' || ML.LogoCode || ']')) LogoNameCode," +
  311. // 未注浆原因
  312. " DD.DictionaryValue AS NoGroutingRreason," +
  313. // 注浆次数
  314. " GDD.GroutingCount," +
  315. // 损坯标识
  316. " GDD.ScrapFlag," +
  317. // 备注
  318. " GDD.Remarks," +
  319. // 成型线类型
  320. " GMT.GMouldTypeName," +
  321. // 绑定条码
  322. " GDD.BarCode," +
  323. // 交坯时间
  324. " GDD.DeliverTime," +
  325. // 交坯标识
  326. " GDD.DeliverFlag," +
  327. // 成型班长
  328. " MU.UserName AS MONITORName," +
  329. // 创建时间
  330. " GDD.CreateTime," +
  331. // 创建工号
  332. " U.UserName AS Createuser," +
  333. // 试验线
  334. " GDD.TestFlag," +
  335. // 试验模具
  336. " GDD.TestMouldFlag," +
  337. // 试验线
  338. " CASE WHEN GDD.TestFlag = 1 THEN '试验线' WHEN GDD.TestFlag = 0 THEN '普通线' end TestFlagName" +
  339. // 注浆日报
  340. " FROM TP_PM_GroutingDaily GD" +
  341. // 注浆日报明细表
  342. " INNER JOIN TP_PM_GroutingDailyDetail GDD" +
  343. " ON GD.GroutingDailyID = GDD.GroutingDailyID" +
  344. // 成型线类型
  345. " INNER JOIN TP_MST_GMouldType GMT" +
  346. " ON GD.GMouldTypeID = GMT.GMouldTypeID" +
  347. // 模具状态
  348. " INNER JOIN TP_SYS_GMouldStatus GMS" +
  349. " ON GMS.GMouldStatusID = GDD.GMouldStatus" +
  350. // 创建工号
  351. " INNER JOIN TP_MST_User U" +
  352. " ON U.UserID = GDD.CreateUserID" +
  353. // 成型线
  354. " LEFT JOIN tp_pc_groutingline gl" +
  355. " ON gl.groutinglineid = GDD.GroutingLineID" +
  356. // 成型班长
  357. " LEFT JOIN tp_mst_user mu" +
  358. " ON mu.userid = gl.MONITORID" +
  359. // 未注浆原因
  360. " LEFT JOIN TP_MST_DataDictionary DD" +
  361. " ON DD.DictionaryID = GDD.NoGroutingRreason" +
  362. // 商标
  363. " LEFT JOIN TP_MST_Logo ML" +
  364. " ON ML.LogoID = GDD.LogoID" +
  365. // 账套
  366. " WHERE GD.AccountID = :AccountID" +
  367. " AND GD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  368. // 成型线操作权限
  369. " AND EXISTS (SELECT UP.PurviewID" +
  370. " FROM TP_MST_UserPurview UP" +
  371. " WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  372. " AND (UP.PurviewID = -1 OR UP.PurviewID = GD.GroutingLineID)" +
  373. " AND UP.UserId = :UPUserId)";
  374. return selSql;
  375. }
  376. #endregion 注浆登记一览
  377. #region 注浆登记
  378. /// <summary>
  379. /// 取得FPM0102画面(注浆登记)的初始化数据
  380. /// </summary>
  381. /// <param name="user">登录用户信息</param>
  382. /// <param name="groutingDailyID">注浆日报ID</param>
  383. /// <returns>
  384. /// 初始化数据
  385. /// 注浆数据
  386. /// OtherStatus = 1:没有可编辑的注浆信息
  387. /// OtherStatus = 2:没有可编辑的注浆明细信息
  388. /// </returns>
  389. public static ServiceResultEntity GetFPM0102IData(SUserInfo user, int groutingDailyID)
  390. {
  391. IDBConnection conn = null;
  392. try
  393. {
  394. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  395. ServiceResultEntity sre = new ServiceResultEntity();
  396. DataTable dataTable = CMNModuleLogic.GetTP_MST_DataDictionary(conn, user, Constant.DictionaryType.TPC004, Constant.ValueFlag.Effective);
  397. // 账务日期
  398. object date = CMNModuleLogic.GetAccountDate(conn, user);
  399. if (date == null || date == DBNull.Value)
  400. {
  401. // 服务器时间错误
  402. //throw new Exception("SystemDateTimeError");
  403. sre.Status = Constant.ServiceResultStatus.AccountDateError;
  404. return sre;
  405. }
  406. sre.Data = new DataSet();
  407. dataTable.TableName = Constant.DictionaryType.TPC004.ToString();
  408. sre.Data.Tables.Add(dataTable);
  409. sre.Result = date;
  410. // 编辑时,取得注浆日报信息
  411. if (groutingDailyID > 0)
  412. {
  413. StringBuilder sql = new StringBuilder();
  414. List<OracleParameter> parameters = new List<OracleParameter>();
  415. string gdSql =
  416. "SELECT GD.GroutingDailyID," +
  417. " GD.GroutingLineID," +
  418. " GD.GroutingLineCode," +
  419. " GD.GroutingLineName," +
  420. " GD.MouldQuantity," +
  421. " GD.GroutingDate," +
  422. " GD.OPTimeStamp" +
  423. " FROM TP_PM_GroutingDaily GD" +
  424. " WHERE GD.AccountID = :AccountID" +
  425. " AND GD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  426. // 成型线操作权限
  427. " AND EXISTS (SELECT UP.PurviewID" +
  428. " FROM TP_MST_UserPurview UP" +
  429. " WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  430. " AND (UP.PurviewID = -1 OR UP.PurviewID = GD.GroutingLineID)" +
  431. " AND UP.UserId = :UPUserId)" +
  432. " AND GD.GroutingDailyID = :GroutingDailyID";
  433. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  434. parameters.Add(new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  435. parameters.Add(new OracleParameter(":GroutingDailyID", OracleDbType.Int32, groutingDailyID, ParameterDirection.Input));
  436. DataTable gdData = conn.GetSqlResultToDt(gdSql, parameters.ToArray());
  437. if (gdData == null || gdData.Rows.Count == 0)
  438. {
  439. // 没有可编辑的注浆信息
  440. sre.Status = Constant.ServiceResultStatus.Other;
  441. sre.OtherStatus = 1;
  442. sre.Message = "没有可编辑的注浆信息";
  443. return sre;
  444. }
  445. gdData.TableName = "TP_PM_GroutingDaily";
  446. sre.Data.Tables.Add(gdData);
  447. string gddSql =
  448. "SELECT GDD.GroutingDailyID," +
  449. " GDD.GroutingDailyDetailID," +
  450. " GDD.GroutingLineID," +
  451. " GDD.GroutingLineDetailID," +
  452. " GDD.GroutingLineCode," +
  453. " GDD.GroutingLineName," +
  454. " GDD.GroutingDate," +
  455. " GDD.GroutingBatchNo," +
  456. " GDD.GroutingMouldCode," +
  457. //" GDD.MouldCode," +
  458. //" GDD.UserID as GroutingUserID," +
  459. " GDD.UserCode as GroutingUserCode," +
  460. " GDD.GoodsCode," +
  461. " GDD.GoodsName," +
  462. //" GDD.GMouldStatus," +
  463. " GMS.GMouldStatusName," +
  464. " GDD.GroutingFlag," +
  465. " GDD.NoGroutingRreason," +
  466. " GDD.Remarks," +
  467. " GDD.ScrapFlag," +
  468. " GDD.LogoID," +
  469. " GDD.DeliverFlag," +
  470. " GDD.BarCode" +
  471. " FROM TP_PM_GroutingDailyDetail GDD" +
  472. " INNER JOIN TP_SYS_GMouldStatus GMS" +
  473. " ON GMS.GMouldStatusID = GDD.GMouldStatus" +
  474. //" INNER JOIN TP_MST_Goods MG" +
  475. //" ON MG.Goodsid = GLD.GoodsID" +
  476. //" INNER JOIN TP_MST_User U" +
  477. //" ON U.Userid = GDD.Userid" +
  478. " WHERE GDD.AccountID = :AccountID" +
  479. " AND GDD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  480. " AND GDD.GroutingDailyID = :GroutingDailyID" +
  481. " ORDER BY GDD.GroutingMouldCode";
  482. parameters.Clear();
  483. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  484. parameters.Add(new OracleParameter(":GroutingDailyID", OracleDbType.Int32, groutingDailyID, ParameterDirection.Input));
  485. DataTable gddData = conn.GetSqlResultToDt(gddSql, parameters.ToArray());
  486. if (gddData == null || gddData.Rows.Count == 0)
  487. {
  488. // 没有可注浆的模具
  489. sre.Status = Constant.ServiceResultStatus.Other;
  490. sre.OtherStatus = 2;
  491. sre.Message = "没有可编辑的注浆明细信息";
  492. return sre;
  493. }
  494. gddData.TableName = "TP_PM_GroutingDailyDetail";
  495. sre.Data.Tables.Add(gddData);
  496. // 'S_PM_022', '注浆编辑限制天数' add by chenxy 2018-12-15 begin
  497. sre.Result = 1;
  498. string spm022 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_022' and ss.AccountID = " + user.AccountID);
  499. int spm022Value = 0;
  500. if (!string.IsNullOrWhiteSpace(spm022) && int.TryParse(spm022, out spm022Value) && spm022Value > 0)
  501. {
  502. DateTime tDate = DateTime.Now.Date;
  503. DateTime lastDate = tDate.AddDays(1 - spm022Value);
  504. DateTime gData = (DateTime)gdData.Rows[0]["GroutingDate"];
  505. if (gData < lastDate || gData > tDate)
  506. {
  507. sre.Result = 0;
  508. sre.Message = string.Format("允许注浆编辑的日期范围【{0:yyyy-MM-dd}】-【{1:yyyy-MM-dd}】", lastDate, tDate);
  509. }
  510. }
  511. // 'S_PM_022', '注浆编辑限制天数' add by chenxy 2018-12-15 end
  512. }
  513. return sre;
  514. }
  515. catch (Exception ex)
  516. {
  517. throw ex;
  518. }
  519. finally
  520. {
  521. if (conn != null &&
  522. conn.ConnState == ConnectionState.Open)
  523. {
  524. conn.Close();
  525. }
  526. }
  527. }
  528. /// <summary>
  529. /// 取得FPM0102画面(注浆登记)的成型线数据
  530. /// </summary>
  531. /// <param name="user">登录用户信息</param>
  532. /// <param name="groutingDate">注浆日期</param>
  533. /// <param name="groutingIDs">成型线ID(多个用【,】隔开)</param>
  534. /// <returns>
  535. /// 成型线数据
  536. /// OtherStatus = 1:注浆日期大于账务日期
  537. /// OtherStatus = 2:没有可注浆的成型线
  538. /// OtherStatus = 3:没有可注浆的模具
  539. /// </returns>
  540. public static ServiceResultEntity GetFPM0102_GroutingLine(SUserInfo user, DateTime? groutingDate, string groutingIDs)
  541. {
  542. IDBConnection conn = null;
  543. try
  544. {
  545. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  546. ServiceResultEntity sre = new ServiceResultEntity();
  547. // 账务日期
  548. object date = CMNModuleLogic.GetAccountDate(conn, user);
  549. if (date == null || date == DBNull.Value)
  550. {
  551. // 服务器时间错误
  552. //throw new Exception("SystemDateTimeError");
  553. sre.Status = Constant.ServiceResultStatus.AccountDateError;
  554. return sre;
  555. }
  556. DateTime accountDate = Convert.ToDateTime(date);
  557. // 成型线变更 ver41 by chenxy begin
  558. /* 注浆日期大于此成型线最后一次注浆日期
  559. if (groutingDate.HasValue && groutingDate > accountDate)
  560. {
  561. // 注浆日期大于账务日期
  562. sre.Status = Constant.ServiceResultStatus.Other;
  563. sre.OtherStatus = 1;
  564. sre.Message = string.Format("注浆日期({0})大于账务日期({1})",
  565. groutingDate.Value.ToString(Constant.S_DATE_YYYY_MM_DD),
  566. accountDate.ToString(Constant.S_DATE_YYYY_MM_DD));
  567. return sre;
  568. }
  569. */
  570. // 成型线变更 ver41 by chenxy end
  571. if (!groutingDate.HasValue)
  572. {
  573. groutingDate = accountDate;
  574. }
  575. sre.Result = groutingDate;
  576. // 'S_PM_021', '注浆登记限制天数' add by chenxy 2018-12-15 begin
  577. string spm021 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_021' and ss.AccountID = " + user.AccountID);
  578. int spm021Value = 0;
  579. if (!string.IsNullOrWhiteSpace(spm021) && int.TryParse(spm021, out spm021Value) && spm021Value > 0)
  580. {
  581. DateTime tDate = DateTime.Now.Date;
  582. DateTime lastDate = tDate.AddDays(1 - spm021Value);
  583. if (groutingDate < lastDate || groutingDate > tDate)
  584. {
  585. sre.Status = Constant.ServiceResultStatus.Other;
  586. sre.OtherStatus = 1;
  587. sre.Message = string.Format("允许注浆登记的日期范围【{0:yyyy-MM-dd}】-【{1:yyyy-MM-dd}】", lastDate, tDate);
  588. return sre;
  589. }
  590. }
  591. // 'S_PM_021', '注浆登记限制天数' add by chenxy 2018-12-15 end
  592. StringBuilder sql = new StringBuilder();
  593. List<OracleParameter> parameters = new List<OracleParameter>();
  594. string glSql =
  595. "SELECT GL.GroutingLineID," +
  596. " GL.GroutingLineCode," +
  597. " GL.GroutingLineName," +
  598. " GL.MouldQuantity," +
  599. " GL.UserID," +
  600. " U.UserCode," +
  601. " GL.monitorid," +
  602. " mu.usercode monitorcode," +
  603. //" mu.username || '[' || mu.usercode || ']' monitorcode," +
  604. // 成型线变更 ver41 by chenxy begin
  605. /*
  606. " GL.UserCount," +
  607. " decode((GL.UserCount, 1, GL.UserID, NULL) GroutingUserID," +
  608. " decode((GL.UserCount, 1, U.UserCode, NULL) GroutingUserCode," +
  609. //" GL.LastGroutingDate," +
  610. " GL.LastGroutingBatchNo," +
  611. " decode((GMT.CanManyTimes, '1', NULL, 1) GroutingNum," +
  612. " GMT.CanManyTimes," +
  613. */
  614. " decode(GMT.CanManyTimes, '1', decode(GL.LastGroutingDate, null, 1, :GroutingDate, NVL(GL.LastGroutingBatchNo, 1) + 1, 1), 1) GroutingBatchNo," +
  615. " GMT.CanManyTimes," +
  616. " GMT.GMouldTypeID," +
  617. " GMT.GMouldTypeName," +
  618. // 成型线变更 ver41 by chenxy end
  619. " GL.OPTimeStamp" +
  620. " FROM TP_PC_GroutingLine GL" +
  621. " INNER JOIN TP_MST_User U" +
  622. " ON U.UserID = GL.UserID " +
  623. " left JOIN TP_MST_User mU" +
  624. " ON mU.UserID = GL.monitorid" +
  625. " LEFT JOIN TP_MST_GMouldType GMT" +
  626. " ON GMT.GMouldTypeID = GL.GMouldTypeID " +
  627. //// 成型线操作权限
  628. //" INNER JOIN (SELECT UP.PurviewID" +
  629. //" FROM TP_MST_UserPurview UP" +
  630. //" WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  631. //" AND UP.UserId = :UPUserId) UP" +
  632. //" ON UP.PurviewID = GL.GroutingLineID" +
  633. " WHERE GL.AccountID = :AccountID" +
  634. " AND GL.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  635. " AND GL.GMouldStatus = '" + (int)Constant.GMouldStatus.Normal + "'" +
  636. // 成型线操作权限
  637. " AND EXISTS (SELECT UP.PurviewID" +
  638. " FROM TP_MST_UserPurview UP" +
  639. " WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  640. " AND (UP.PurviewID = -1 OR UP.PurviewID = GL.GroutingLineID)" +
  641. " AND UP.UserId = :UPUserId)" +
  642. // 未注浆
  643. // 成型线变更 ver41 by chenxy begin
  644. /*
  645. " AND NOT EXISTS (SELECT GD.GroutingDailyID" +
  646. " FROM TP_PM_GroutingDaily GD" +
  647. " WHERE GD.GroutingLineID = GL.GroutingLineID" +
  648. " AND GD.GroutingDate = :GroutingDate)"
  649. */
  650. // 注浆日期必须小于等于账务日期
  651. " AND :GroutingDate <= FUN_CMN_GetAccountDate(:AccountID)" +
  652. " AND (GL.LastGroutingDate IS NULL OR (GMT.CanManyTimes = '1' AND GL.LastGroutingDate <= :GroutingDate) OR (GMT.CanManyTimes <> '1' AND GL.LastGroutingDate < :GroutingDate))"
  653. // 成型线变更 ver41 by chenxy end
  654. // 有正常状态的模具
  655. + " AND EXISTS (SELECT 1 FROM TP_PC_GroutingLineDetail GLD WHERE GL.GroutingLineID = GLD.GroutingLineID AND GLD.ValueFlag = '1' AND GLD.GMouldStatus=1)"
  656. ;
  657. sql.Append(glSql);
  658. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  659. parameters.Add(new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  660. parameters.Add(new OracleParameter(":GroutingDate", OracleDbType.Date, groutingDate.Value.Date, ParameterDirection.Input));
  661. if (!string.IsNullOrWhiteSpace(groutingIDs))
  662. {
  663. groutingIDs = "," + groutingIDs + ",";
  664. sql.Append(" AND INSTR(:GroutingLineIDs, ',' || GL.GroutingLineID || ',') > 0");
  665. parameters.Add(new OracleParameter(":GroutingLineIDs", OracleDbType.Varchar2, groutingIDs, ParameterDirection.Input));
  666. }
  667. else
  668. {
  669. sql.Append(" AND GL.UserCount = 1");
  670. }
  671. sql.Append(" ORDER BY GroutingLineCode");
  672. DataTable glData = conn.GetSqlResultToDt(sql.ToString(), parameters.ToArray());
  673. if (glData == null || glData.Rows.Count == 0)
  674. {
  675. // 没有可注浆的成型线
  676. sre.Status = Constant.ServiceResultStatus.Other;
  677. sre.OtherStatus = 2;
  678. sre.Message = string.Format("注浆日期({0})没有可注浆的成型线",
  679. groutingDate.Value.ToString(Constant.S_DATE_YYYY_MM_DD));
  680. return sre;
  681. }
  682. sre.Data = new DataSet();
  683. glData.TableName = "TP_PC_GroutingLine";
  684. sre.Data.Tables.Add(glData);
  685. groutingIDs = ",";
  686. foreach (DataRow row in glData.Rows)
  687. {
  688. groutingIDs += row["GroutingLineID"] + ",";
  689. }
  690. string gldSql =
  691. "SELECT GLD.GroutingLineID," +
  692. " GL.GroutingLineCode," +
  693. " GL.GroutingLineName," +
  694. " GLD.GroutingLineDetailID," +
  695. " GLD.GroutingMouldCode," +
  696. // 成型线变更 ver41 by chenxy begin
  697. //" GL.UserID," +
  698. //" U.UserCode," +
  699. //" GL.UserCount," +
  700. " decode(GL.UserCount, 1, GL.UserID, NULL) GroutingUserID," +
  701. " decode(GL.UserCount, 1, U.UserCode, NULL) GroutingUserCode," +
  702. " decode(GMT.CanManyTimes, '1', decode(GL.LastGroutingDate, null, 1, :GroutingDate, NVL(GL.LastGroutingBatchNo, 1) + 1, 1), 1) GroutingBatchNo," +
  703. //" GMT.CanManyTimes," +
  704. " GL.monitorid," +
  705. " decode(mu.userid,null,'', mu.username || '[' || mu.usercode || ']') monitorcode," +
  706. " GMT.GMouldTypeID," +
  707. " GMT.GMouldTypeName," +
  708. // 成型线变更 ver41 by chenxy end
  709. " MG.GoodsCode," +
  710. " MG.GoodsName," +
  711. " CASE WHEN GLD.LogoID IS NULL THEN MG.LogoID ELSE GLD.LogoID END AS LogoID ," +
  712. " GLD.GMouldStatus," +
  713. " GMS.GMouldStatusName," +
  714. " CASE WHEN GLD.GMouldStatus = '" + (int)Constant.GMouldStatus.Normal + "' THEN '" + (int)Constant.GroutingFlag.Yes + "'" +
  715. " ELSE '" + (int)Constant.GroutingFlag.No + "'" +
  716. " END AS GroutingFlag" +
  717. " FROM TP_PC_GroutingLine GL" +
  718. " left JOIN TP_MST_User mU" +
  719. " ON mU.UserID = GL.monitorid" +
  720. " INNER JOIN TP_PC_GroutingLineDetail GLD" +
  721. " ON GL.GroutingLineID = GLD.GroutingLineID" +
  722. " INNER JOIN TP_SYS_GMouldStatus GMS" +
  723. " ON GMS.GMouldStatusID = GLD.GMouldStatus" +
  724. " INNER JOIN TP_MST_Goods MG" +
  725. " ON MG.Goodsid = GLD.GoodsID" +
  726. " INNER JOIN TP_MST_User U" +
  727. " ON U.Userid = GL.Userid" +
  728. " LEFT JOIN TP_MST_GMouldType GMT" +
  729. " ON GMT.GMouldTypeID = GL.GMouldTypeID " +
  730. " WHERE GL.AccountID = :AccountID" +
  731. " AND GLD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  732. " AND GLD.GMouldStatus = '" + (int)Constant.GMouldStatus.Normal + "'" +
  733. " AND INSTR(:GroutingLineIDs, ',' || GL.GroutingLineID || ',') > 0" +
  734. " ORDER BY GL.GroutingLineCode, GLD.GroutingMouldCode";
  735. parameters.Clear();
  736. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  737. parameters.Add(new OracleParameter(":GroutingLineIDs", OracleDbType.Varchar2, groutingIDs, ParameterDirection.Input));
  738. parameters.Add(new OracleParameter(":GroutingDate", OracleDbType.Date, groutingDate.Value.Date, ParameterDirection.Input));
  739. DataTable gldData = conn.GetSqlResultToDt(gldSql, parameters.ToArray());
  740. if (gldData == null || gldData.Rows.Count == 0)
  741. {
  742. // 没有可注浆的模具
  743. sre.Status = Constant.ServiceResultStatus.Other;
  744. sre.OtherStatus = 3;
  745. sre.Message = string.Format("注浆日期({0})没有可注浆的模具",
  746. groutingDate.Value.ToString(Constant.S_DATE_YYYY_MM_DD));
  747. return sre;
  748. }
  749. gldData.TableName = "TP_PC_GroutingLineDetail";
  750. sre.Data.Tables.Add(gldData);
  751. return sre;
  752. }
  753. catch (Exception ex)
  754. {
  755. throw ex;
  756. }
  757. finally
  758. {
  759. if (conn != null &&
  760. conn.ConnState == ConnectionState.Open)
  761. {
  762. conn.Close();
  763. }
  764. }
  765. }
  766. /// <summary>
  767. /// 取得FPM0104画面(选择成型线)的查询数据
  768. /// </summary>
  769. /// <param name="user">登录用户信息</param>
  770. /// <param name="se">查询条件</param>
  771. /// <returns>查询结果</returns>
  772. public static ServiceResultEntity GetFPM0104SData(SUserInfo user, FPM0104_SE se)
  773. {
  774. IDBConnection conn = null;
  775. try
  776. {
  777. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  778. ServiceResultEntity sre = new ServiceResultEntity();
  779. // 'S_PM_021', '注浆登记限制天数' add by chenxy 2018-12-15 begin
  780. string spm021 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_021' and ss.AccountID = " + user.AccountID);
  781. int spm021Value = 0;
  782. if (!string.IsNullOrWhiteSpace(spm021) && int.TryParse(spm021, out spm021Value) && spm021Value > 0)
  783. {
  784. DateTime tDate = DateTime.Now.Date;
  785. DateTime lastDate = tDate.AddDays(1-spm021Value);
  786. if (se.GroutingDate < lastDate || se.GroutingDate > tDate)
  787. {
  788. sre.Status = Constant.ServiceResultStatus.Other;
  789. sre.OtherStatus = -1;
  790. sre.Message = string.Format("允许注浆登记的日期范围【{0:yyyy-MM-dd}】-【{1:yyyy-MM-dd}】", lastDate, tDate);
  791. return sre;
  792. }
  793. }
  794. // 'S_PM_021', '注浆登记限制天数' add by chenxy 2018-12-15 end
  795. string sqlString =
  796. "SELECT " +
  797. " GL.GroutingLineID," +
  798. " GL.GroutingLineCode," +
  799. " GL.GroutingLineName," +
  800. " GMS.GMouldStatusName," +
  801. " GMT.GMouldTypeName," +
  802. " GL.MouldQuantity," +
  803. // 成型线变更 ver41 by chenxy begin
  804. //" U.UserCode AS GroutingUserCode," +
  805. //" WMSYS.WM_CONCAT(DISTINCT TO_CHAR(GS.GoodsCode)) AS GoodsCode" +
  806. " (select WM_CONCAT(DISTINCT TO_CHAR(gs.GoodsCode)) GoodsCode" +
  807. " from tp_pc_groutinglinedetail gld" +
  808. " left join tp_mst_goods gs" +
  809. " on gs.goodsid = gld.goodsid" +
  810. " where gld.groutinglineid = gl.groutinglineid" +
  811. " AND gld.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  812. " AND gld.GMouldStatus = '" + (int)Constant.GMouldStatus.Normal + "') GoodsCode," +
  813. //" GL.UserID," +
  814. //" U.UserCode," +
  815. " GL.UserCount," +
  816. " decode(GL.UserCount, 1, GL.UserID, NULL) GroutingUserID," +
  817. " decode(GL.UserCount, 1, U.UserCode, NULL) GroutingUserCode," +
  818. " GL.LastGroutingDate," +
  819. " GL.LastGroutingBatchNo," +
  820. " GL.monitorid," +
  821. //" mu.usercode monitorcode," +
  822. " decode(mu.userid,null,'', mu.username || '[' || mu.usercode || ']') monitorcode," +
  823. " decode(GMT.CanManyTimes, '1', NULL, 1) GroutingNum," +
  824. " GMT.CanManyTimes" +
  825. // 成型线变更 ver41 by chenxy end
  826. " FROM TP_PC_GroutingLine GL" +
  827. // 成型线变更 ver41 by chenxy begin
  828. //" INNER JOIN TP_PC_GroutingLineDetail GLD" +
  829. //" ON GLD.GroutingLineID = GL.GroutingLineID" +
  830. // 成型线变更 ver41 by chenxy end
  831. " INNER JOIN TP_SYS_GMouldStatus GMS" +
  832. " ON GMS.GMouldStatusID = GL.GMouldStatus" +
  833. " INNER JOIN TP_MST_GMouldType GMT" +
  834. " ON GMT.GMouldTypeID = GL.GMouldTypeID" +
  835. // 成型线变更 ver41 by chenxy begin
  836. //" INNER JOIN TP_MST_Goods GS" +
  837. //" ON GS.GoodsID = GLD.GoodsID" +
  838. // 成型线变更 ver41 by chenxy end
  839. " INNER JOIN TP_MST_User U" +
  840. " ON U.UserID = GL.UserID" +
  841. " left JOIN TP_MST_User mU" +
  842. " ON mU.UserID = GL.monitorid" +
  843. " WHERE GL.AccountID = :AccountID" +
  844. " AND GL.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  845. " AND GL.GMouldStatus = '" + (int)Constant.GMouldStatus.Normal + "'" +
  846. //// 成型线操作权限
  847. " AND EXISTS (SELECT UP.PurviewID" +
  848. " FROM TP_MST_UserPurview UP" +
  849. " WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  850. " AND (UP.PurviewID = -1 OR UP.PurviewID = GL.GroutingLineID)" +
  851. " AND UP.UserId = :UPUserId)" +
  852. // 未注浆
  853. // 成型线变更 ver41 by chenxy begin
  854. //" AND NOT EXISTS (SELECT GD.GroutingDailyID" +
  855. //" FROM TP_PM_GroutingDaily GD" +
  856. //" WHERE GD.GroutingLineID = GL.GroutingLineID" +
  857. //" AND GD.GroutingDate = :GroutingDate)" +
  858. // 注浆日期必须小于等于账务日期
  859. " AND :GroutingDate <= FUN_CMN_GetAccountDate(:AccountID)" +
  860. " AND (GL.LastGroutingDate IS NULL OR (GMT.CanManyTimes = '1' AND GL.LastGroutingDate <= :GroutingDate) OR (GMT.CanManyTimes <> '1' AND GL.LastGroutingDate < :GroutingDate))"
  861. // 成型线变更 ver41 by chenxy end
  862. // 有正常状态的模具
  863. + " AND EXISTS (SELECT 1 FROM TP_PC_GroutingLineDetail GLD WHERE GL.GroutingLineID = GLD.GroutingLineID AND GLD.ValueFlag = '1' AND GLD.GMouldStatus=1)"
  864. ;
  865. StringBuilder sql = new StringBuilder(sqlString);
  866. List<OracleParameter> parameters = new List<OracleParameter>();
  867. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  868. parameters.Add(new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  869. parameters.Add(new OracleParameter(":GroutingDate", OracleDbType.Date, se.GroutingDate, ParameterDirection.Input));
  870. if (se != null)
  871. {
  872. // 成型线编码
  873. if (!string.IsNullOrEmpty(se.GroutingLineCode))
  874. {
  875. sql.Append(" AND INSTR(GL.GroutingLineCode, :GroutingLineCode) > 0");
  876. parameters.Add(new OracleParameter(":GroutingLineCode", OracleDbType.NVarchar2, se.GroutingLineCode, ParameterDirection.Input));
  877. }
  878. // 成型线名称
  879. if (!string.IsNullOrEmpty(se.GroutingLineName))
  880. {
  881. sql.Append(" AND INSTR(GL.GroutingLineName, :GroutingLineName) > 0");
  882. parameters.Add(new OracleParameter(":GroutingLineName", OracleDbType.NVarchar2, se.GroutingLineName, ParameterDirection.Input));
  883. }
  884. // 成型工号
  885. if (!string.IsNullOrEmpty(se.GroutingUserCode))
  886. {
  887. sql.Append(" AND INSTR(U.UserCode, :GroutingUserCode) > 0");
  888. parameters.Add(new OracleParameter(":GroutingUserCode", OracleDbType.NVarchar2, se.GroutingUserCode, ParameterDirection.Input));
  889. }
  890. // 成型班长
  891. if (!string.IsNullOrEmpty(se.Monitorcode))
  892. {
  893. sql.Append(" AND INSTR(mu.UserCode, :Monitorcode) > 0");
  894. parameters.Add(new OracleParameter(":Monitorcode", OracleDbType.NVarchar2, se.Monitorcode, ParameterDirection.Input));
  895. }
  896. // 成型线类别
  897. if (se.GMouldTypeID.HasValue)
  898. {
  899. sql.Append(" AND GL.GMouldTypeID = :GMouldTypeID");
  900. parameters.Add(new OracleParameter(":GMouldTypeID", OracleDbType.Int32, se.GMouldTypeID.Value, ParameterDirection.Input));
  901. }
  902. // 备注
  903. if (!string.IsNullOrEmpty(se.Remarks))
  904. {
  905. sql.Append(" AND INSTR(GL.Remarks, :Remarks) > 0");
  906. parameters.Add(new OracleParameter(":Remarks", OracleDbType.NVarchar2, se.Remarks, ParameterDirection.Input));
  907. }
  908. }
  909. sqlString = sql.ToString() +
  910. // 成型线变更 ver41 by chenxy begin
  911. //" GROUP BY" +
  912. //" GL.GroutingLineID," +
  913. //" GL.GroutingLineCode," +
  914. //" GL.GroutingLineName," +
  915. //" GMS.GMouldStatusName," +
  916. //" GMT.GMouldTypeName," +
  917. //" GL.MouldQuantity," +
  918. //" U.UserCode" +
  919. // 成型线变更 ver41 by chenxy end
  920. " ORDER BY GL.GroutingLineCode";
  921. DataTable data = conn.GetSqlResultToDt(sqlString, parameters.ToArray());
  922. if (data == null || data.Rows.Count == 0)
  923. {
  924. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  925. return sre;
  926. }
  927. sre.Data = new DataSet();
  928. sre.Data.Tables.Add(data);
  929. // 成型线变更 ver41 by chenxy begin
  930. string groutingIDs = ",";
  931. foreach (DataRow row in data.Rows)
  932. {
  933. groutingIDs += row["GroutingLineID"] + ",";
  934. }
  935. string guSql = "select gu.groutinglineid, gu.remarks, u.userid groutinguserid, u.usercode groutingusercode" +
  936. " from TP_PC_GroutingUser gu" +
  937. " left join tp_mst_user u" +
  938. " on u.userid = gu.userid where INSTR(:GroutingLineIDs, ',' || gu.GroutingLineID || ',') > 0";
  939. parameters.Clear();
  940. parameters.Add(new OracleParameter(":GroutingLineIDs", OracleDbType.Varchar2, groutingIDs, ParameterDirection.Input));
  941. DataTable guData = conn.GetSqlResultToDt(guSql, parameters.ToArray());
  942. //if (guData == null || guData.Rows.Count == 0)
  943. //{
  944. // // 没有可注浆的模具
  945. // sre.Status = Constant.ServiceResultStatus.Other;
  946. // sre.OtherStatus = 3;
  947. // sre.Message = string.Format("注浆日期({0})没有可注浆的模具",
  948. // groutingDate.Value.ToString(Constant.S_DATE_YYYY_MM_DD));
  949. // return sre;
  950. //}
  951. guData.TableName = "TP_PC_GroutingUser";
  952. sre.Data.Tables.Add(guData);
  953. // 成型线变更 ver41 by chenxy end
  954. return sre;
  955. }
  956. catch (Exception ex)
  957. {
  958. throw ex;
  959. }
  960. finally
  961. {
  962. if (conn != null &&
  963. conn.ConnState == ConnectionState.Open)
  964. {
  965. conn.Close();
  966. }
  967. }
  968. }
  969. /// <summary>
  970. /// 返回班次配置信息
  971. /// </summary>
  972. /// <param name="sUserInfo"></param>
  973. /// <returns></returns>
  974. private static int? getClassesSettingID(IDBTransaction oracleTrConn, int userID, DateTime accountDate)
  975. {
  976. #region 将班次配置表中的数据插入生产者表中
  977. string sql = "select max(ClassesSettingID) as ClassesSettingID"
  978. + " from TP_PC_ClassesSetting"
  979. + " where ValueFlag = 1 and AccountDate=:accountDate"
  980. + " and UserID = :userID";
  981. OracleParameter[] paras = new OracleParameter[] {
  982. new OracleParameter(":accountDate",OracleDbType.Date,accountDate,ParameterDirection.Input),
  983. new OracleParameter(":userID",OracleDbType.Int32,userID,ParameterDirection.Input),
  984. };
  985. DataSet ds = oracleTrConn.GetSqlResultToDs(sql, paras);
  986. if (ds != null && ds.Tables[0].Rows.Count > 0)
  987. {
  988. return Convert.ToInt32(ds.Tables[0].Rows[0]["ClassesSettingID"]);
  989. }
  990. return null;
  991. #endregion
  992. }
  993. /// <summary>
  994. /// 保存FPM0102画面(注浆登记)的注浆数据
  995. /// </summary>
  996. /// <param name="user">登录用户信息</param>
  997. /// <param name="groutingDate">注浆日期(null:编辑;非null:新建)</param>
  998. /// <param name="groutingInfo">注浆数据</param>
  999. /// <returns>保存结果
  1000. /// OtherStatus = 1: 没有以下成型线的操作权限
  1001. /// OtherStatus = 2: 以下成型线已做过注浆
  1002. /// OtherStatus = 3: 以下成型工号已被停用
  1003. /// OtherStatus = 4: 补注浆,成型工号没有班次配置
  1004. /// OtherStatus = 5: 以下成型工号没有配置员工关联
  1005. /// </returns>
  1006. public static ServiceResultEntity SetFPM0102Data(SUserInfo user, DateTime? groutingDate, DataSet groutingInfo)
  1007. {
  1008. IDBTransaction tran = null;
  1009. try
  1010. {
  1011. ServiceResultEntity sre = new ServiceResultEntity();
  1012. if (groutingInfo == null ||
  1013. groutingInfo.Tables.Count != 2 ||
  1014. groutingInfo.Tables[0].Rows.Count < 1 ||
  1015. groutingInfo.Tables[1].Rows.Count < 1)
  1016. {
  1017. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  1018. return sre;
  1019. }
  1020. tran = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  1021. int executeResult = 0;
  1022. DataTable dtGroutingLine = groutingInfo.Tables[0].Copy();
  1023. DataTable dtGroutingDetail = groutingInfo.Tables[1].Copy();
  1024. // 新建注浆登记
  1025. if (groutingDate.HasValue)
  1026. {
  1027. #region 多条成型线绑定注浆(成型线组) 20260313
  1028. int spm33value = getSystemSet(tran, "S_PM_033", user);
  1029. //高压绑定注浆开关: 开启状态:绑定同一分组的成型线执行同步注浆操作; 关闭状态:沿用现有模式,仅支持单条成型线手动注浆。
  1030. if (spm33value == 1)
  1031. {
  1032. //增加主线标识、主注浆明细ID
  1033. dtGroutingDetail.Columns.Add("MAINGROUTINGFLAG", typeof(string));
  1034. dtGroutingDetail.Columns.Add("MAINGROUTINGDAILYDETAILID", typeof(int));
  1035. for (int i = 0; i < groutingInfo.Tables[0].Rows.Count; i++)
  1036. {
  1037. string sql = @" SELECT GL.GroutingLineID,GL.GroutingLineCode,GL.GroutingLineName,GL.MouldQuantity,GL.UserID,U.UserCode,
  1038. GL.monitorid,mu.usercode monitorcode,
  1039. decode(GMT.CanManyTimes, '1', decode(GL.LastGroutingDate, null, 1, :GroutingDate, NVL(GL.LastGroutingBatchNo, 1) + 1, 1), 1) GroutingBatchNo,
  1040. GMT.CanManyTimes,GMT.GMouldTypeID,GMT.GMouldTypeName,GL.OPTimeStamp
  1041. FROM TP_PC_GroutingLine GL
  1042. INNER JOIN TP_MST_User U ON U.UserID = GL.UserID
  1043. LEFT JOIN TP_MST_User mU ON mU.UserID = GL.monitorid
  1044. LEFT JOIN TP_MST_GMouldType GMT ON GMT.GMouldTypeID = GL.GMouldTypeID
  1045. WHERE GL.VALUEFLAG = 1
  1046. AND GL.GROUTINGLINECODE <> GL.H_LINECODE
  1047. AND GL.H_LINECODE = :pMainLineCode ";
  1048. List<OracleParameter> parameters = new List<OracleParameter>();
  1049. parameters.Add(new OracleParameter(":GroutingDate", OracleDbType.Date, groutingDate, ParameterDirection.Input));
  1050. parameters.Add(new OracleParameter(":pMainLineCode", OracleDbType.Varchar2, groutingInfo.Tables[0].Rows[i]["GROUTINGLINECODE"].ToString(), ParameterDirection.Input));
  1051. DataTable hlinedt = tran.GetSqlResultToDt(sql, parameters.ToArray());
  1052. //主成型注浆线明细模具个数
  1053. DataTable ldetaildt = tran.GetSqlResultToDt($@"
  1054. SELECT * FROM TP_PC_GROUTINGLINEDETAIL WHERE VALUEFLAG =1
  1055. AND GMouldStatus = '1' AND GROUTINGLINEID = '{ groutingInfo.Tables[0].Rows[i]["GROUTINGLINEID"]}'
  1056. ");
  1057. if (hlinedt != null && hlinedt.Rows.Count > 0)
  1058. {
  1059. // 辅成型注浆线主表 + 校验 + 主表插入
  1060. for (int j = 0; j < hlinedt.Rows.Count; j++)
  1061. {
  1062. DataRow row = hlinedt.Rows[j];
  1063. string currentLineID = row["GROUTINGLINEID"].ToString();
  1064. string currentLineCode = row["GROUTINGLINECODE"].ToString();
  1065. // 查询辅成型线模具明细(校验用)
  1066. DataTable hlinedetaildt = tran.GetSqlResultToDt($@"
  1067. SELECT * FROM TP_PC_GROUTINGLINEDETAIL
  1068. WHERE VALUEFLAG = 1 AND GMouldStatus = '1' AND GROUTINGLINEID = {currentLineID}
  1069. ");
  1070. // 模具个数校验(和主线明细数量对比)
  1071. if (hlinedetaildt == null || hlinedetaildt.Rows.Count == 0)
  1072. {
  1073. sre.Status = Constant.ServiceResultStatus.Other;
  1074. sre.OtherStatus = 1;
  1075. sre.Message = $"注浆失败:辅注浆成型线【{currentLineCode}】无正常模具";
  1076. return sre;
  1077. }
  1078. // ldetaildt 是主线的正常模具数量,你原来的逻辑
  1079. if (hlinedetaildt.Rows.Count != ldetaildt.Rows.Count)
  1080. {
  1081. sre.Status = Constant.ServiceResultStatus.Other;
  1082. sre.OtherStatus = 1;
  1083. sre.Message = $"注浆失败,请联系管理员核实【辅注浆成型线正常模具个数】是否准确-【{currentLineCode}】";
  1084. return sre;
  1085. }
  1086. //将辅成型注浆线总表信息复制到整体注浆总表中
  1087. // 修改成型工号(和主线保持一致)
  1088. row["UserID"] = groutingInfo.Tables[0].Rows[i]["UserID"].ToString();
  1089. row["UserCode"] = groutingInfo.Tables[0].Rows[i]["UserCode"].ToString();
  1090. // 计算批次号:已存在则最大+1,否则默认1
  1091. DataRow[] existRows = dtGroutingLine.Select("GroutingLineCode = '" + currentLineCode + "'");
  1092. if (existRows.Length > 0)
  1093. {
  1094. int maxBatch = existRows.Max(r => Convert.ToInt32(r["GroutingBatchNo"]));
  1095. row["GroutingBatchNo"] = maxBatch + 1;
  1096. }
  1097. // 加入到总注浆主表 dtGroutingLine
  1098. DataRow copyRow = dtGroutingLine.NewRow();
  1099. copyRow.ItemArray = row.ItemArray;
  1100. dtGroutingLine.Rows.Add(copyRow);
  1101. //将辅成型注浆线明细表信息复制到整体注浆明细表中
  1102. // 辅成型线自己的信息
  1103. int assistBatchNo = Convert.ToInt32(row["GroutingBatchNo"]);
  1104. // 当前 主成型线 编码(循环 i 对应的那条主线)
  1105. string mainLineCode = groutingInfo.Tables[0].Rows[i]["GROUTINGLINECODE"].ToString().Trim();
  1106. int mainBatchNo = Convert.ToInt32(groutingInfo.Tables[0].Rows[i]["GROUTINGBATCHNO"]);
  1107. // 获取【主成型线当前的所有明细】(用来取注浆状态)
  1108. DataRow[] mainDetailRows = groutingInfo.Tables[1].Select($"GROUTINGLINECODE = '{mainLineCode}' AND GROUTINGBATCHNO = {mainBatchNo}");
  1109. // 查询辅成型线自己的模具明细
  1110. DataTable assistDetailDt = tran.GetSqlResultToDt($@"
  1111. SELECT GLD.GroutingLineID, GL.GroutingLineCode,GL.GroutingLineName,GLD.GroutingLineDetailID,GLD.GroutingMouldCode,
  1112. decode(GL.UserCount, 1, GL.UserID, NULL) GroutingUserID,
  1113. '' GroutingUserCode, '' GroutingBatchNo,
  1114. GL.monitorid,'' monitorcode,GMT.GMouldTypeID,GMT.GMouldTypeName, MG.GoodsCode,MG.GoodsName,
  1115. CASE WHEN GLD.LogoID IS NULL THEN MG.LogoID ELSE GLD.LogoID END AS LogoID ,
  1116. GLD.GMouldStatus,GMS.GMouldStatusName,
  1117. CASE WHEN GLD.GMouldStatus = '1' THEN '1' ELSE '0' END AS GroutingFlag,
  1118. '' as NoGroutingRreason, '' as REMARKS
  1119. FROM TP_PC_GroutingLine GL
  1120. INNER JOIN TP_PC_GroutingLineDetail GLD ON GL.GroutingLineID = GLD.GroutingLineID
  1121. INNER JOIN TP_SYS_GMouldStatus GMS ON GMS.GMouldStatusID = GLD.GMouldStatus
  1122. INNER JOIN TP_MST_Goods MG ON MG.Goodsid = GLD.GoodsID
  1123. LEFT JOIN TP_MST_GMouldType GMT ON GMT.GMouldTypeID = GL.GMouldTypeID
  1124. WHERE GL.AccountID = 1 AND GLD.ValueFlag = '1' AND GLD.GMouldStatus = '1'
  1125. AND GL.GroutingLineID ={currentLineID}
  1126. ORDER BY GL.GroutingLineCode, GLD.GroutingMouldCode
  1127. ");
  1128. // 遍历辅线明细 → 按模具后缀匹配主线明细
  1129. foreach (DataRow assistDtlRow in assistDetailDt.Rows)
  1130. {
  1131. string assistMouldCode = assistDtlRow["GROUTINGMOULDCODE"].ToString().Trim();
  1132. string mouldSuffix = assistMouldCode.Split('-').Last(); // 取 001/002...
  1133. // 找到主线中【同后缀】的模具明细
  1134. DataRow mainMatchRow = Array.Find(mainDetailRows, r =>
  1135. r["GROUTINGMOULDCODE"].ToString().Trim().Split('-').Last() == mouldSuffix
  1136. );
  1137. if (mainMatchRow == null)
  1138. {
  1139. sre.Status = Constant.ServiceResultStatus.Other;
  1140. sre.OtherStatus = 1;
  1141. sre.Message = $"注浆失败:辅线{currentLineCode}模具{assistMouldCode}未匹配主成型线模具";
  1142. return sre;
  1143. }
  1144. // 创建新明细(完全正确的字段规则)
  1145. DataRow newRow = dtGroutingDetail.NewRow();
  1146. newRow["GroutingLineID"] = assistDtlRow["GroutingLineID"];
  1147. newRow["GROUTINGLINECODE"] = currentLineCode;
  1148. newRow["GroutingLineName"] = assistDtlRow["GroutingLineName"];
  1149. newRow["GroutingLineDetailID"] = assistDtlRow["GroutingLineDetailID"];
  1150. newRow["GROUTINGMOULDCODE"] = assistMouldCode;
  1151. newRow["GROUTINGBATCHNO"] = assistBatchNo;
  1152. newRow["GMOULDTYPEID"] = assistDtlRow["GMOULDTYPEID"];
  1153. newRow["GMOULDTYPENAME"] = assistDtlRow["GMOULDTYPENAME"];
  1154. newRow["GoodsCode"] = assistDtlRow["GoodsCode"];
  1155. newRow["GoodsName"] = assistDtlRow["GoodsName"];
  1156. newRow["GMOULDSTATUS"] = assistDtlRow["GMOULDSTATUS"];
  1157. newRow["GMouldStatusName"] = assistDtlRow["GMouldStatusName"];
  1158. // ↓↓↓【从主线明细复制注浆状态】
  1159. newRow["GROUTINGUSERID"] = mainMatchRow["GROUTINGUSERID"];
  1160. newRow["GROUTINGUSERCODE"] = mainMatchRow["GROUTINGUSERCODE"];
  1161. newRow["MONITORID"] = mainMatchRow["MONITORID"];
  1162. newRow["MONITORCODE"] = mainMatchRow["MONITORCODE"];
  1163. newRow["LogoID"] = mainMatchRow["LogoID"];
  1164. newRow["GROUTINGFLAG"] = mainMatchRow["GROUTINGFLAG"];
  1165. newRow["NoGroutingRreason"] = mainMatchRow["NoGroutingRreason"];
  1166. newRow["REMARKS"] = mainMatchRow["REMARKS"];
  1167. //增加主线标识、主注浆明细ID
  1168. newRow["MAINGROUTINGFLAG"] = mainMatchRow["GROUTINGMOULDCODE"] + "-" + mainMatchRow["GROUTINGBATCHNO"];
  1169. newRow["MAINGROUTINGDAILYDETAILID"] = 0;
  1170. // 加入总明细表
  1171. dtGroutingDetail.Rows.Add(newRow);
  1172. }
  1173. }
  1174. }
  1175. }
  1176. }
  1177. #endregion
  1178. #region 新建注浆登记
  1179. groutingDate = groutingDate.Value.Date;
  1180. #region 取得账务日期
  1181. // 账务日期
  1182. object date = CMNModuleLogic.GetAccountDate(tran, user);
  1183. if (date == null || date == DBNull.Value)
  1184. {
  1185. // 服务器时间错误
  1186. //throw new Exception("SystemDateTimeError");
  1187. sre.Status = Constant.ServiceResultStatus.AccountDateError;
  1188. return sre;
  1189. }
  1190. DateTime accountDate = Convert.ToDateTime(date).Date;
  1191. // 注浆日期不能大于账务日期
  1192. if (groutingDate > accountDate)
  1193. {
  1194. sre.Status = Constant.ServiceResultStatus.Other;
  1195. sre.OtherStatus = 1;
  1196. sre.Message = string.Format("注浆日期({0})不能大于账务日期({1})",
  1197. groutingDate.Value.ToString(Constant.S_DATE_YYYY_MM_DD),
  1198. accountDate.ToString(Constant.S_DATE_YYYY_MM_DD));
  1199. return sre;
  1200. }
  1201. #endregion 取得账务日期
  1202. #region 验证成型线时间戳
  1203. StringBuilder checkGLSql = new StringBuilder("select GroutingLineCode from TP_PC_GroutingLine where valueflag = '1' and (");
  1204. int index = 0;
  1205. foreach (DataRow item in dtGroutingLine.Rows)
  1206. {
  1207. if (index > 0)
  1208. {
  1209. checkGLSql.AppendLine(" or ");
  1210. }
  1211. checkGLSql.AppendFormat(" (GroutingLineID = {0} and OPTimeStamp <> to_timestamp('{1}','yyyy-mm-dd hh24:mi:ss.ff'))", item["GroutingLineID"], ((System.DateTime)item["OPTimeStamp"]).ToString("yyyy-MM-dd HH:mm:ss.ffffff"));
  1212. index++;
  1213. }
  1214. checkGLSql.AppendLine(")");
  1215. DataTable checkGLDataTable = tran.GetSqlResultToDt(checkGLSql.ToString());
  1216. if (checkGLDataTable != null && checkGLDataTable.Rows.Count > 0)
  1217. {
  1218. string code = null;
  1219. foreach (DataRow item in checkGLDataTable.Rows)
  1220. {
  1221. if (code == null)
  1222. {
  1223. code = item["GroutingLineCode"].ToString();
  1224. }
  1225. else
  1226. {
  1227. code += "," + item["GroutingLineCode"].ToString();
  1228. }
  1229. }
  1230. // 成型线信息被修改
  1231. sre.Status = Constant.ServiceResultStatus.Other;
  1232. sre.OtherStatus = 1;
  1233. sre.Message = "以下成形线数据已被修改,请重新选择成型线。" + System.Environment.NewLine + code;
  1234. return sre;
  1235. }
  1236. #endregion 验证成型线时间戳
  1237. #region 校验是否需要半成品卡控及卡控数量是否允许注浆操作
  1238. int systemSetvalue = getSystemSet(tran, "S_PC_003", user);
  1239. #region 无论是否需要校验,都需要此表,注浆成功后需要反写计划表中的实际注浆量
  1240. // 创建结果表
  1241. DataTable resultTable = new DataTable();
  1242. resultTable.Columns.Add("GOODSCODE", typeof(string));
  1243. resultTable.Columns.Add("LOGOID", typeof(string));
  1244. resultTable.Columns.Add("Count", typeof(int));
  1245. resultTable.Columns.Add("MAT20", typeof(string));
  1246. resultTable.Columns.Add("PRODPLANID", typeof(int));
  1247. // 使用字典进行分组计数
  1248. Dictionary<string, Dictionary<string, int>> groupDict =
  1249. new Dictionary<string, Dictionary<string, int>>();
  1250. foreach (DataRow row in dtGroutingDetail.Rows)
  1251. {
  1252. // 检查GROUTINGFLAG
  1253. string groutingFlag = row["GROUTINGFLAG"].ToString();
  1254. if (groutingFlag != "1") continue;
  1255. // 获取分组键
  1256. string goodsCode = row["GOODSCODE"].ToString();
  1257. string logoId = row["LOGOID"].ToString();
  1258. // 更新计数
  1259. if (!groupDict.ContainsKey(goodsCode))
  1260. groupDict[goodsCode] = new Dictionary<string, int>();
  1261. if (!groupDict[goodsCode].ContainsKey(logoId))
  1262. groupDict[goodsCode][logoId] = 0;
  1263. groupDict[goodsCode][logoId]++;
  1264. }
  1265. // 将分组结果添加到DataTable
  1266. foreach (var goodsPair in groupDict)
  1267. {
  1268. foreach (var logoPair in goodsPair.Value)
  1269. {
  1270. DataTable dt = tran.GetSqlResultToDt($@"
  1271. SELECT
  1272. G.SCRAPSUMFLAG
  1273. FROM
  1274. TP_MST_GOODS G
  1275. WHERE G.GOODSCODE = '{goodsPair.Key}'
  1276. ");
  1277. if (dt != null && dt.Rows.Count > 0 && dt.Rows[0]["SCRAPSUMFLAG"].ToString() == "1")
  1278. {
  1279. DataRow newRow = resultTable.NewRow();
  1280. newRow["GOODSCODE"] = goodsPair.Key;
  1281. newRow["LOGOID"] = logoPair.Key;
  1282. newRow["Count"] = logoPair.Value;
  1283. resultTable.Rows.Add(newRow);
  1284. }
  1285. }
  1286. }
  1287. #endregion
  1288. //S_PC_003为1时,需要校验当月该半成品物料的计划数量
  1289. if (systemSetvalue == 1)
  1290. {
  1291. for (int i = 0; i < resultTable.Rows.Count; i++)
  1292. {
  1293. //查询对应半成品物料(根据注浆的产品及商标)
  1294. string mat20 = getmaterialcodeMat20(tran, resultTable.Rows[i]["GOODSCODE"].ToString(), Convert.ToInt32(resultTable.Rows[i]["LOGOID"]));
  1295. if (!string.IsNullOrWhiteSpace(mat20))
  1296. {
  1297. resultTable.Rows[i]["MAT20"] = mat20;
  1298. //查询半成品物料当月对应的计划数量
  1299. DataTable planTabel = getPlanDetail(tran, 1, mat20, Convert.ToDateTime(groutingDate));
  1300. if (planTabel != null && planTabel.Rows.Count > 0)
  1301. {
  1302. resultTable.Rows[i]["PRODPLANID"] = Convert.ToInt32(planTabel.Rows[0]["PRODPLANID"]);
  1303. //有计划,计划数量
  1304. decimal planCount = Convert.ToDecimal(planTabel.Rows[0]["PLANCOUNT"]);
  1305. //已完成数量
  1306. decimal completedCount = 0;
  1307. if (!string.IsNullOrWhiteSpace(planTabel.Rows[0]["COMPLETEDCOUNT"].ToString()))
  1308. {
  1309. completedCount = Convert.ToDecimal(planTabel.Rows[0]["COMPLETEDCOUNT"]);
  1310. }
  1311. if (Convert.ToDecimal(resultTable.Rows[i]["Count"]) > planCount - completedCount)
  1312. {
  1313. sre.Status = Constant.ServiceResultStatus.Other;
  1314. sre.OtherStatus = 1;
  1315. sre.Message = "无法注浆:此次注浆超过产销卡控计划注浆数量,请核实。";
  1316. return sre;
  1317. }
  1318. }
  1319. else
  1320. {
  1321. //无计划,无法注浆
  1322. sre.Status = Constant.ServiceResultStatus.Other;
  1323. sre.OtherStatus = 1;
  1324. sre.Message = "无法注浆:该物料无产销计划,请核实。";
  1325. return sre;
  1326. }
  1327. }
  1328. }
  1329. }
  1330. #region 创建表存储每个新建的注浆明细ID
  1331. DataTable gddIDTable = new DataTable();
  1332. gddIDTable.Columns.Add("GOODSCODE", typeof(string));
  1333. gddIDTable.Columns.Add("LOGOID", typeof(int));
  1334. gddIDTable.Columns.Add("GROUTINGDAILYDETAILID", typeof(int));
  1335. gddIDTable.Columns.Add("GROUTINGFLAG", typeof(int));
  1336. #endregion
  1337. #endregion
  1338. #region 数据校验 插入班次配置
  1339. // 成型工ID
  1340. List<string> userIDs = new List<string>();
  1341. List<string> userCodes = new List<string>();
  1342. // 成型线ID
  1343. List<string> lineIDs = new List<string>();
  1344. List<string> lineCodes = new List<string>();
  1345. foreach (DataRow gdd in dtGroutingDetail.Rows)
  1346. {
  1347. string userID = gdd["GroutingUserID"].ToString();
  1348. if (!userIDs.Contains(userID))
  1349. {
  1350. userIDs.Add(userID);
  1351. userCodes.Add(gdd["GroutingUserCode"].ToString());
  1352. }
  1353. string lineID = gdd["GroutingLineID"].ToString();
  1354. if (!lineIDs.Contains(lineID))
  1355. {
  1356. lineIDs.Add(lineID);
  1357. lineCodes.Add(gdd["GroutingLineCode"].ToString());
  1358. }
  1359. }
  1360. #region 成型线校验
  1361. string strLineIDs = "," + string.Join(",", lineIDs) + ",";
  1362. string strNoLineCodes = null;
  1363. // 校验成型线操作权限
  1364. string checkPurviewSql =
  1365. "SELECT UP.PurviewID" +
  1366. " FROM TP_MST_UserPurview UP" +
  1367. " WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  1368. " AND (UP.PurviewID = -1 OR INSTR(:GroutingLineIDs, ',' || UP.PurviewID || ',') > 0)" +
  1369. " AND UP.UserId = :UPUserId Order by UP.PurviewID";
  1370. OracleParameter[] checkPurviewParas = new OracleParameter[]
  1371. {
  1372. new OracleParameter(":GroutingLineIDs", OracleDbType.Varchar2, strLineIDs, ParameterDirection.Input),
  1373. new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  1374. };
  1375. DataTable purviewData = tran.GetSqlResultToDt(checkPurviewSql, checkPurviewParas);
  1376. if (purviewData == null || purviewData.Rows.Count == 0)
  1377. {
  1378. strNoLineCodes = string.Join(",", lineCodes);
  1379. }
  1380. else if ("-1" == purviewData.Rows[0][0].ToString())
  1381. {
  1382. strNoLineCodes = null;
  1383. }
  1384. else if (lineIDs.Count != purviewData.Rows.Count)
  1385. {
  1386. for (int i = 0; i < lineIDs.Count; i++)
  1387. {
  1388. DataRow[] drs = purviewData.Select("PurviewID = " + lineIDs[i]);
  1389. if (drs == null || drs.Length == 0)
  1390. {
  1391. if (strNoLineCodes != null)
  1392. {
  1393. strNoLineCodes += "," + lineCodes[i];
  1394. }
  1395. else
  1396. {
  1397. strNoLineCodes += lineCodes[i];
  1398. }
  1399. }
  1400. }
  1401. }
  1402. if (strNoLineCodes != null)
  1403. {
  1404. sre.Status = Constant.ServiceResultStatus.Other;
  1405. sre.OtherStatus = 1;
  1406. sre.Message = "当前用户没有以下成型线的操作权限。"
  1407. + System.Environment.NewLine + strNoLineCodes;
  1408. return sre;
  1409. }
  1410. /* 已验证成型线时间戳,注浆时会修改成型线的最后注浆日期,时间戳会变。
  1411. // 校验成型线是否已注浆
  1412. string checkGroutingDailySql =
  1413. "SELECT GD.GroutingLineCode" +
  1414. " FROM TP_PM_GroutingDaily GD" +
  1415. " WHERE GD.AccountID = :AccountID" +
  1416. " AND GD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  1417. " AND GD.GroutingDate = :GroutingDate" +
  1418. " AND INSTR(:GroutingLineIDs, ',' || GD.GroutingLineID || ',') > 0";
  1419. OracleParameter[] checkGroutingDailyParas = new OracleParameter[]
  1420. {
  1421. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  1422. new OracleParameter(":GroutingDate", OracleDbType.Date, groutingDate.Value, ParameterDirection.Input),
  1423. new OracleParameter(":GroutingLineIDs", OracleDbType.Varchar2, strLineIDs, ParameterDirection.Input),
  1424. };
  1425. DataTable groutingDailyData = tran.GetSqlResultToDt(checkGroutingDailySql, checkGroutingDailyParas);
  1426. strNoLineCodes = null;
  1427. if (groutingDailyData != null && groutingDailyData.Rows.Count > 0)
  1428. {
  1429. foreach (DataRow item in groutingDailyData.Rows)
  1430. {
  1431. if (strNoLineCodes != null)
  1432. {
  1433. strNoLineCodes += "," + item["GroutingLineCode"];
  1434. }
  1435. else
  1436. {
  1437. strNoLineCodes += item["GroutingLineCode"];
  1438. }
  1439. }
  1440. }
  1441. if (strNoLineCodes != null)
  1442. {
  1443. sre.Status = Constant.ServiceResultStatus.Other;
  1444. sre.OtherStatus = 2;
  1445. sre.Message = groutingDate.Value.ToString(Constant.S_DATE_YYYY_MM_DD)
  1446. + ",以下成型线已做过注浆登记。"
  1447. + System.Environment.NewLine + strNoLineCodes;
  1448. return sre;
  1449. }
  1450. */
  1451. #endregion 成型线校验
  1452. string strNoUserCodes = null;
  1453. #region 校验成型工号是否有效
  1454. // 校验成型工号是否有效
  1455. string checkUserSql =
  1456. "SELECT UserID" +
  1457. " FROM TP_MST_User" +
  1458. " WHERE AccountID = :AccountID" +
  1459. " AND ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  1460. " AND INSTR(:UserIDs, ',' || UserID || ',') > 0";
  1461. string strUserIDs = "," + string.Join(",", userIDs) + ",";
  1462. OracleParameter[] checkUserParas = new OracleParameter[]
  1463. {
  1464. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  1465. new OracleParameter(":UserIDs", OracleDbType.Varchar2, strUserIDs, ParameterDirection.Input),
  1466. };
  1467. DataTable userData = tran.GetSqlResultToDt(checkUserSql, checkUserParas);
  1468. strNoUserCodes = null;
  1469. if (userData == null || userData.Rows.Count == 0)
  1470. {
  1471. strNoUserCodes = string.Join(",", userCodes);
  1472. }
  1473. else if (userIDs.Count != userData.Rows.Count)
  1474. {
  1475. for (int i = 0; i < userIDs.Count; i++)
  1476. {
  1477. DataRow[] drs = userData.Select("UserID = " + userIDs[i]);
  1478. if (drs == null || drs.Length == 0)
  1479. {
  1480. if (strNoUserCodes != null)
  1481. {
  1482. strNoUserCodes += "," + userCodes[i];
  1483. }
  1484. else
  1485. {
  1486. strNoUserCodes += userCodes[i];
  1487. }
  1488. }
  1489. }
  1490. }
  1491. if (strNoUserCodes != null)
  1492. {
  1493. sre.Status = Constant.ServiceResultStatus.Other;
  1494. sre.OtherStatus = 3;
  1495. sre.Message = "以下成型工号已被停用,不能注浆。"
  1496. + System.Environment.NewLine + strNoUserCodes;
  1497. return sre;
  1498. }
  1499. #endregion 校验成型工号是否有效
  1500. #region 校验成型工是否有班次配置
  1501. // 校验成型工是否有班次配置
  1502. string checkClassesSettingSql =
  1503. "SELECT UserID, Max(ClassesSettingID) as ClassesSettingID" +
  1504. " FROM TP_PC_ClassesSetting CS " +
  1505. " WHERE CS.AccountID = :AccountID" +
  1506. " AND CS.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  1507. " AND CS.AccountDate = :AccountDate" +
  1508. " AND INSTR(:UserIDs, ',' || CS.UserID || ',') > 0 group by UserID";
  1509. OracleParameter[] checkClassesSettingParas = new OracleParameter[]
  1510. {
  1511. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  1512. new OracleParameter(":AccountDate", OracleDbType.Date, groutingDate.Value, ParameterDirection.Input),
  1513. new OracleParameter(":UserIDs", OracleDbType.Varchar2, strUserIDs, ParameterDirection.Input),
  1514. };
  1515. DataTable classesSettingData = tran.GetSqlResultToDt(checkClassesSettingSql, checkClassesSettingParas);
  1516. Dictionary<string, string> userClassID = new Dictionary<string, string>();
  1517. // 补注浆日报
  1518. if (groutingDate.Value < accountDate)
  1519. {
  1520. #region 补注浆日报,校验班次配置
  1521. strNoUserCodes = null;
  1522. if (classesSettingData == null || classesSettingData.Rows.Count == 0)
  1523. {
  1524. strNoUserCodes = string.Join(",", userCodes);
  1525. }
  1526. else if (userIDs.Count != classesSettingData.Rows.Count)
  1527. {
  1528. for (int i = 0; i < userIDs.Count; i++)
  1529. {
  1530. DataRow[] drs = classesSettingData.Select("UserID = " + userIDs[i]);
  1531. if (drs == null || drs.Length == 0)
  1532. {
  1533. if (strNoUserCodes != null)
  1534. {
  1535. strNoUserCodes += "," + userCodes[i];
  1536. }
  1537. else
  1538. {
  1539. strNoUserCodes += userCodes[i];
  1540. }
  1541. }
  1542. }
  1543. }
  1544. else
  1545. {
  1546. foreach (DataRow item in classesSettingData.Rows)
  1547. {
  1548. userClassID.Add(item["UserID"].ToString(), item["ClassesSettingID"].ToString());
  1549. }
  1550. }
  1551. if (strNoUserCodes != null)
  1552. {
  1553. sre.Status = Constant.ServiceResultStatus.Other;
  1554. sre.OtherStatus = 4;
  1555. sre.Message = string.Format("以下成型工号在日期【{0}】没有配置班次,请确认后再注浆。", groutingDate.Value.ToString(Constant.S_DATE_YYYY_MM_DD))
  1556. + System.Environment.NewLine + strNoUserCodes;
  1557. return sre;
  1558. }
  1559. #endregion 补注浆日报,校验班次配置
  1560. }
  1561. else
  1562. {
  1563. // 无班次配置的成型工ID
  1564. List<string> userStaffIDs = new List<string>();
  1565. List<string> userStaffCodes = new List<string>();
  1566. strUserIDs = null;
  1567. if (classesSettingData != null && userIDs.Count != classesSettingData.Rows.Count)
  1568. {
  1569. //strUserIDs = null;
  1570. for (int i = 0; i < userIDs.Count; i++)
  1571. {
  1572. DataRow[] drs = classesSettingData.Select("UserID = " + userIDs[i]);
  1573. if (drs == null || drs.Length == 0)
  1574. {
  1575. strUserIDs += "," + userIDs[i];
  1576. userStaffIDs.Add(userIDs[i]);
  1577. userStaffCodes.Add(userCodes[i]);
  1578. }
  1579. else
  1580. {
  1581. userClassID.Add(drs[0]["UserID"].ToString(), drs[0]["ClassesSettingID"].ToString());
  1582. }
  1583. }
  1584. if (strUserIDs != null)
  1585. {
  1586. strUserIDs += ",";
  1587. }
  1588. }
  1589. if (strUserIDs != null)
  1590. {
  1591. #region 无班次配置的工号,校验员工关联(成型工号是否有员工)
  1592. // 无班次配置的工号,校验员工关联(成型工号是否有员工)
  1593. string checkUserStaffSql =
  1594. "SELECT DISTINCT U.UserID, U.UserCode, U.OrganizationID" +
  1595. " FROM TP_MST_User U " +
  1596. " INNER JOIN TP_MST_UserStaff US" +
  1597. " ON U.UserID = US.UserID " +
  1598. " WHERE U.AccountID = :AccountID" +
  1599. " AND INSTR(:UserIDs, ',' || U.UserID || ',') > 0";
  1600. OracleParameter[] checkUserStaffParas = new OracleParameter[]
  1601. {
  1602. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  1603. new OracleParameter(":UserIDs", OracleDbType.Varchar2, strUserIDs, ParameterDirection.Input),
  1604. };
  1605. DataTable userStaffData = tran.GetSqlResultToDt(checkUserStaffSql, checkUserStaffParas);
  1606. strNoUserCodes = null;
  1607. if (userStaffData == null || userStaffData.Rows.Count == 0)
  1608. {
  1609. strNoUserCodes = string.Join(",", userStaffCodes);
  1610. }
  1611. else
  1612. {
  1613. //for (int i = 0; i < userIDs.Count; i++)
  1614. for (int i = 0; i < userStaffIDs.Count; i++)
  1615. {
  1616. DataRow[] drs = userStaffData.Select("UserID = " + userStaffIDs[i]);
  1617. if (drs == null || drs.Length == 0)
  1618. {
  1619. if (strNoUserCodes != null)
  1620. {
  1621. strNoUserCodes += "," + userStaffCodes[i];
  1622. }
  1623. else
  1624. {
  1625. strNoUserCodes += userStaffCodes[i];
  1626. }
  1627. }
  1628. }
  1629. }
  1630. if (strNoUserCodes != null)
  1631. {
  1632. sre.Status = Constant.ServiceResultStatus.Other;
  1633. sre.OtherStatus = 5;
  1634. sre.Message = "以下成型工号没有配置员工关联,请确认后再注浆。"
  1635. + System.Environment.NewLine + strNoUserCodes;
  1636. return sre;
  1637. }
  1638. #endregion 无班次配置的工号,校验员工关联(成型工号是否有员工)
  1639. #region 插入班次配置
  1640. #region SQL
  1641. string seqClassesSettingSql = "SELECT SEQ_PC_ClassesSetting_ID.Nextval FROM DUAL";
  1642. string insertClassesSettingSql =
  1643. "INSERT INTO TP_PC_ClassesSetting" +
  1644. " (ClassesSettingID, AccountDate, UserID, UserCode, OrganizationID, AccountID, CreateUserID, UpdateUserID)" +
  1645. " VALUES" +
  1646. " (:ClassesSettingID, :AccountDate, :UserID, :UserCode, :OrganizationID, :AccountID, :CUserID, :CUserID)";
  1647. string insertClassesDetailSql =
  1648. "INSERT INTO TP_PC_ClassesDetail" +
  1649. " (ClassesSettingID, AccountDate, UserID, UserCode, UOrganizationID, UJobsID, StaffID, SOrganizationID, SJobsID, StaffStatus, AccountID, CreateUserID, UpdateUserID)" +
  1650. " SELECT :ClassesSettingID, :AccountDate, :UserID, :UserCode, :UOrganizationID, US.UJobsID, S.StaffID, S.OrganizationID, S.Jobs, S.StaffStatus, :AccountID, :CUserID, :CUserID" +
  1651. " FROM TP_MST_UserStaff US" +
  1652. " INNER JOIN TP_HR_Staff S" +
  1653. " ON S.StaffID = US.StaffID" +
  1654. " WHERE US.UserID = :UserID";
  1655. #endregion SQL
  1656. // 插入班次配置
  1657. foreach (DataRow userStaffRow in userStaffData.Rows)
  1658. {
  1659. object csSeq = tran.GetSqlResultToObj(seqClassesSettingSql);
  1660. // 插入班次配置
  1661. OracleParameter[] insertClassesSettingParas = new OracleParameter[]
  1662. {
  1663. new OracleParameter(":ClassesSettingID", OracleDbType.Int32, csSeq, ParameterDirection.Input),
  1664. new OracleParameter(":AccountDate", OracleDbType.Date, accountDate, ParameterDirection.Input),
  1665. new OracleParameter(":UserID", OracleDbType.Int32, userStaffRow["UserID"], ParameterDirection.Input),
  1666. new OracleParameter(":UserCode", OracleDbType.NVarchar2, userStaffRow["UserCode"], ParameterDirection.Input),
  1667. new OracleParameter(":OrganizationID", OracleDbType.Int32, userStaffRow["OrganizationID"], ParameterDirection.Input),
  1668. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  1669. new OracleParameter(":CUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  1670. };
  1671. executeResult = tran.ExecuteNonQuery(insertClassesSettingSql, insertClassesSettingParas);
  1672. if (executeResult <= 0)
  1673. {
  1674. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  1675. return sre;
  1676. }
  1677. // 插入班次配置明细
  1678. OracleParameter[] insertClassesDetailParas = new OracleParameter[]
  1679. {
  1680. new OracleParameter(":ClassesSettingID", OracleDbType.Int32, csSeq, ParameterDirection.Input),
  1681. new OracleParameter(":AccountDate", OracleDbType.Date, accountDate, ParameterDirection.Input),
  1682. new OracleParameter(":UserID", OracleDbType.Int32, userStaffRow["UserID"], ParameterDirection.Input),
  1683. new OracleParameter(":UserCode", OracleDbType.NVarchar2, userStaffRow["UserCode"], ParameterDirection.Input),
  1684. new OracleParameter(":UOrganizationID", OracleDbType.Int32, userStaffRow["OrganizationID"], ParameterDirection.Input),
  1685. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  1686. new OracleParameter(":CUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  1687. };
  1688. executeResult = tran.ExecuteNonQuery(insertClassesDetailSql, insertClassesDetailParas);
  1689. if (executeResult <= 0)
  1690. {
  1691. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  1692. return sre;
  1693. }
  1694. userClassID.Add(userStaffRow["UserID"].ToString(), csSeq.ToString());
  1695. }
  1696. #endregion 插入班次配置
  1697. }
  1698. else
  1699. {
  1700. foreach (DataRow item in classesSettingData.Rows)
  1701. {
  1702. userClassID.Add(item["UserID"].ToString(), item["ClassesSettingID"].ToString());
  1703. }
  1704. }
  1705. }
  1706. #endregion 校验成型工是否有班次配置
  1707. #endregion 数据校验
  1708. #region 取得默认商标
  1709. string logoSql = "select t.LogoID from TP_MST_Logo t where t.AccountID = :AccountID and t.ValueFlag ='1'" +
  1710. " order by t.IsDefault desc, t.DISPLAYNO";
  1711. OracleParameter[] logoParas = new OracleParameter[]
  1712. {
  1713. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input)
  1714. };
  1715. DataTable logoDataTable = tran.GetSqlResultToDt(logoSql, logoParas);
  1716. object logoID = null;
  1717. if (logoDataTable != null && logoDataTable.Rows.Count > 0)
  1718. {
  1719. logoID = logoDataTable.Rows[0]["LogoID"];
  1720. }
  1721. #endregion 取得默认商标
  1722. // 插入注浆日报
  1723. #region SQL
  1724. string seqGroutingDailySql = "SELECT SEQ_PM_GroutingDaily_ID.Nextval FROM DUAL";
  1725. string insertGroutingDailySql =
  1726. "INSERT INTO TP_PM_GroutingDaily " +
  1727. " (GroutingDailyID, " +
  1728. " GroutingLineID, " +
  1729. " GroutingLineCode, " +
  1730. " GroutingLineName, " +
  1731. " GroutingDate, " +
  1732. " UserID, " +
  1733. " UserCode, " +
  1734. " monitorid, " +
  1735. " monitorcode, " +
  1736. " MouldQuantity, " +
  1737. " GMouldTypeID, " +
  1738. " GMouldStatus, " +
  1739. " CanManyTimes, " +
  1740. " HighPressureFlag, " + //xuwei add 2019-11-14 高压注浆标识
  1741. " AccountID, " +
  1742. " ClassesSettingID, " +
  1743. " GroutingBatchNo, " +
  1744. " CreateUserID, " +
  1745. " UpdateUserID) " +
  1746. " SELECT :GroutingDailyID, " +
  1747. " :GroutingLineID, " +
  1748. " GL.GroutingLineCode, " +
  1749. " GL.GroutingLineName, " +
  1750. " :GroutingDate, " +
  1751. " :UserID, " +
  1752. " :UserCode, " +
  1753. " :monitorid, " +
  1754. " :monitorcode, " +
  1755. " GL.MouldQuantity, " +
  1756. " GL.GMouldTypeID, " +
  1757. " GL.GMouldStatus, " +
  1758. " :CanManyTimes, " +
  1759. " GL.HighPressureFlag, " + //xuwei add 2019-11-14 高压注浆标识
  1760. " :AccountID, " +
  1761. " :ClassesSettingID, " +
  1762. " :GroutingBatchNo, " +
  1763. " :CUserID, " +
  1764. " :CUserID " +
  1765. " FROM TP_PC_GroutingLine GL " +
  1766. " INNER JOIN TP_MST_GMouldType GMT " +
  1767. " ON GMT.GMouldTypeID = GL.GMouldTypeID " +
  1768. " WHERE GL.GroutingLineID = :GroutingLineID";
  1769. #endregion SQL
  1770. #region DetailSQL
  1771. string seqGroutingDailyDetailSql = "SELECT SEQ_PM_GroutingDailyD_ID.Nextval FROM DUAL";
  1772. string insertGroutingDailyDetailSql =
  1773. "INSERT INTO TP_PM_GroutingDailyDetail " +
  1774. " (GroutingDailyID, " +
  1775. " GroutingDailyDetailID, " +
  1776. " GroutingLineID, " +
  1777. " GroutingLineCode, " +
  1778. " GroutingLineName, " +
  1779. " GroutingLineDetailID, " +
  1780. " GroutingDate, " +
  1781. " GroutingMouldCode, " +
  1782. " MouldID, " +
  1783. " MouldCode, " +
  1784. " UserID, " +
  1785. " UserCode, " +
  1786. //" monitorid, " +
  1787. //" monitorcode, " +
  1788. " GoodsID, " +
  1789. " GoodsCode, " +
  1790. " GoodsName, " +
  1791. " GMouldStatus, " +
  1792. " GroutingCount, " +
  1793. " GroutingFlag, " +
  1794. //" BarCode, " +
  1795. " NoGroutingRreason, " +
  1796. " ScrapFlag, " +
  1797. " Remarks, " +
  1798. " AccountID, " +
  1799. " ClassesSettingID, " +
  1800. " GroutingBatchNo, " +
  1801. " LogoID, " +
  1802. " glazetypeid, " +
  1803. " CreateUserID, " +
  1804. " GMouldTypeID, " +
  1805. " CanManyTimes, " +
  1806. " UpdateUserID, " +
  1807. //2022年3月25日 21:10:07 by feiy 试验线
  1808. " TestFlag, " +
  1809. " TESTMOULDFLAG, " + // add 模具试验标识 by fubin 2022-6-6
  1810. " LUSTERWAREWEIGHT) " +
  1811. " SELECT :GroutingDailyID, " +
  1812. " :GroutingDailyDetailID, " +
  1813. " :GroutingLineID, " +
  1814. " GL.GroutingLineCode, " +
  1815. " GL.GroutingLineName, " +
  1816. " :GroutingLineDetailID, " +
  1817. " :GroutingDate, " +
  1818. " GLD.GroutingMouldCode, " +
  1819. " GLD.MouldID, " +
  1820. " GLD.MouldCode, " +
  1821. " :UserID, " +
  1822. " :UserCode, " +
  1823. //" :monitorid, " +
  1824. //" :monitorcode, " +
  1825. " GLD.GoodsID, " +
  1826. " G.GoodsCode, " +
  1827. " G.GoodsName, " +
  1828. " GLD.GMouldStatus, " +
  1829. " CASE WHEN :GroutingFlag = '" + (int)Constant.GroutingFlag.Yes + "'" +
  1830. " THEN GLD.GroutingCount + 1 " +
  1831. " ELSE GLD.GroutingCount END," +
  1832. " :GroutingFlag, " +
  1833. " :NoGroutingRreason, " +
  1834. " :ScrapFlag, " +
  1835. " :Remarks, " +
  1836. " :AccountID, " +
  1837. //" (select max(ClassesSettingID) from TP_PC_ClassesSetting where AccountDate=:GroutingDate and UserID = :UserID ), " +
  1838. " :ClassesSettingID, " +
  1839. " :GroutingBatchNo, " +
  1840. " :LogoID, " +
  1841. " g.glazetypeid, " +
  1842. " :CUserID, " +
  1843. " :GMouldTypeID, " +
  1844. " :CanManyTimes, " +
  1845. " :CUserID, " +
  1846. //2022年3月25日 21:10:07 by feiy 试验线
  1847. " GL.TestFlag, " +
  1848. " NVL(MOULD.TESTMOULDFLAG,'0'), " + // add 模具试验标识 by fubin 2022-6-6
  1849. " NVL(g.LUSTERWAREWEIGHT,0) " +
  1850. " FROM TP_PC_GroutingLine GL " +
  1851. " INNER JOIN TP_PC_GroutingLineDetail GLD " +
  1852. " ON GL.GroutingLineID = :GroutingLineID " +
  1853. " AND GLD.GroutingLineID = :GroutingLineID " +
  1854. " AND GLD.GroutingLineDetailID = :GroutingLineDetailID " +
  1855. " INNER JOIN TP_MST_Goods G " +
  1856. " ON G.GoodsID = GLD.GoodsID" +
  1857. " LEFT JOIN TP_PC_MOULD MOULD " +
  1858. " ON MOULD.MouldID = GLD.MouldID ";
  1859. #endregion DetailSQL
  1860. #region LineDetailSQL
  1861. string updateGroutingLineDetailSql =
  1862. "UPDATE TP_PC_GroutingLineDetail" +
  1863. " SET GroutingCount = GroutingCount + 1," +
  1864. " UpdateUserID = :UpdateUserID" +
  1865. " WHERE GroutingLineDetailID = :GroutingLineDetailID";
  1866. #endregion LineDetailSQL
  1867. #region LineSQL
  1868. string updateGroutingLineSql =
  1869. "UPDATE TP_PC_GroutingLine" +
  1870. " SET LastGroutingDate = :LastGroutingDate," +
  1871. " LastGroutingBatchNo = :LastGroutingBatchNo," +
  1872. " H_BatchIndex = H_BatchIndex+1," +
  1873. " UpdateUserID = :UpdateUserID" +
  1874. " WHERE GroutingLineID = :GroutingLineID";
  1875. #endregion LineSQL
  1876. #region ProducerSQL
  1877. //string insertGroutingProducerSql =
  1878. // "INSERT INTO TP_PM_GroutingProducer " +
  1879. // " (GroutingDailyID, " +
  1880. // " StaffID, " +
  1881. // " StaffCode, " +
  1882. // " StaffStatus, " +
  1883. // " UserID, " +
  1884. // " UserCode, " +
  1885. // " UJobsID, " +
  1886. // " SJobsID, " +
  1887. // " ClassesSettingID) " +
  1888. // //" AccountID, " +
  1889. // //" CreateUserID, " +
  1890. // //" UpdateUserID) " +
  1891. // " SELECT :GroutingDailyID, " +
  1892. // " CD.StaffID, " +
  1893. // " HS.StaffCode, " +
  1894. // " CD.StaffStatus, " +
  1895. // " :UserID, " +
  1896. // " CD.UserCode, " +
  1897. // " CD.UJobsID, " +
  1898. // " CD.SJobsID, " +
  1899. // " CD.ClassesSettingID " +
  1900. // //" :AccountID, " +
  1901. // //" :CUserID, " +
  1902. // //" :CUserID " +
  1903. // " FROM TP_PC_ClassesDetail CD " +
  1904. // " INNER JOIN TP_HR_Staff HS" +
  1905. // " ON HS.StaffID = CD.StaffID" +
  1906. // " WHERE CD.ClassesSettingID = " +
  1907. // " (SELECT MAX(ClassesSettingID) " +
  1908. // " FROM TP_PC_ClassesSetting " +
  1909. // " WHERE UserID = :UserID " +
  1910. // " AND AccountDate = :GroutingDate)";
  1911. #endregion ProducerSQL
  1912. string groutingDailyIDs = null;
  1913. foreach (DataRow lineRow in dtGroutingLine.Rows)
  1914. {
  1915. #region 插入注浆日报
  1916. // 插入注浆日报
  1917. object gdSeq = tran.GetSqlResultToObj(seqGroutingDailySql);
  1918. if (groutingDailyIDs == null)
  1919. {
  1920. groutingDailyIDs = gdSeq.ToString();
  1921. }
  1922. else
  1923. {
  1924. groutingDailyIDs += "," + gdSeq.ToString();
  1925. }
  1926. //int? ClassesSettingID = null;
  1927. //ClassesSettingID = getClassesSettingID(tran, Convert.ToInt32(lineRow["UserID"]), groutingDate.Value);
  1928. int ClassesSettingID = Convert.ToInt32(userClassID[lineRow["UserID"].ToString()]);
  1929. OracleParameter[] insertGroutingDailyParas = new OracleParameter[]
  1930. {
  1931. new OracleParameter(":ClassesSettingID", OracleDbType.Int32, ClassesSettingID, ParameterDirection.Input),
  1932. new OracleParameter(":GroutingBatchNo", OracleDbType.Int32, lineRow["GroutingBatchNo"], ParameterDirection.Input),
  1933. new OracleParameter(":CanManyTimes", OracleDbType.Char, lineRow["CanManyTimes"], ParameterDirection.Input),
  1934. new OracleParameter(":GroutingDailyID", OracleDbType.Int32, gdSeq, ParameterDirection.Input),
  1935. new OracleParameter(":GroutingLineID", OracleDbType.Int32, lineRow["GroutingLineID"], ParameterDirection.Input),
  1936. new OracleParameter(":GroutingDate", OracleDbType.Date, groutingDate.Value, ParameterDirection.Input),
  1937. new OracleParameter(":UserID", OracleDbType.Int32, lineRow["UserID"], ParameterDirection.Input),
  1938. new OracleParameter(":UserCode", OracleDbType.NVarchar2, lineRow["UserCode"], ParameterDirection.Input),
  1939. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  1940. new OracleParameter(":CUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  1941. new OracleParameter(":monitorid", OracleDbType.Int32, lineRow["monitorid"], ParameterDirection.Input),
  1942. new OracleParameter(":monitorcode", OracleDbType.NVarchar2, lineRow["monitorcode"], ParameterDirection.Input),
  1943. };
  1944. executeResult = tran.ExecuteNonQuery(insertGroutingDailySql, insertGroutingDailyParas);
  1945. if (executeResult <= 0)
  1946. {
  1947. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  1948. return sre;
  1949. }
  1950. #endregion 插入注浆日报
  1951. #region 更新成型线注浆日期
  1952. OracleParameter[] updateGroutingLineParas = new OracleParameter[]
  1953. {
  1954. new OracleParameter(":LastGroutingDate", OracleDbType.Date, groutingDate.Value, ParameterDirection.Input),
  1955. new OracleParameter(":LastGroutingBatchNo", OracleDbType.Int32, lineRow["GroutingBatchNo"], ParameterDirection.Input),
  1956. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  1957. new OracleParameter(":GroutingLineID", OracleDbType.Int32, lineRow["GroutingLineID"], ParameterDirection.Input),
  1958. };
  1959. executeResult = tran.ExecuteNonQuery(updateGroutingLineSql, updateGroutingLineParas);
  1960. if (executeResult <= 0)
  1961. {
  1962. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  1963. return sre;
  1964. }
  1965. #endregion 更新成型线注浆日期
  1966. // 插入注浆日报明细
  1967. DataRow[] groutingLineDetailRows = dtGroutingDetail.Select("GroutingLineID = " + lineRow["GroutingLineID"].ToString()
  1968. + " and GroutingBatchNo = " + lineRow["GroutingBatchNo"].ToString());
  1969. foreach (DataRow detailDataRow in groutingLineDetailRows)
  1970. {
  1971. object drLogoID = detailDataRow["logoID"];
  1972. if (drLogoID == null || drLogoID == DBNull.Value)
  1973. {
  1974. drLogoID = logoID;
  1975. }
  1976. // 插入注浆日报明细ID 20251215
  1977. object gddSeq = tran.GetSqlResultToObj(seqGroutingDailyDetailSql);
  1978. #region 插入注浆日报明细
  1979. OracleParameter[] insertGroutingDailyDetailParas = new OracleParameter[]
  1980. {
  1981. new OracleParameter(":ClassesSettingID", OracleDbType.Int32, ClassesSettingID, ParameterDirection.Input),
  1982. new OracleParameter(":GroutingBatchNo", OracleDbType.Int32, detailDataRow["GroutingBatchNo"], ParameterDirection.Input),
  1983. //new OracleParameter(":LogoID", OracleDbType.Int32, logoID, ParameterDirection.Input),
  1984. new OracleParameter(":LogoID", OracleDbType.Int32, drLogoID, ParameterDirection.Input),
  1985. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, gddSeq, ParameterDirection.Input),
  1986. new OracleParameter(":GroutingDailyID", OracleDbType.Int32, gdSeq, ParameterDirection.Input),
  1987. new OracleParameter(":GroutingLineID", OracleDbType.Int32, detailDataRow["GroutingLineID"], ParameterDirection.Input),
  1988. new OracleParameter(":GroutingLineDetailID", OracleDbType.Int32, detailDataRow["GroutingLineDetailID"], ParameterDirection.Input),
  1989. new OracleParameter(":GroutingDate", OracleDbType.Date, groutingDate.Value, ParameterDirection.Input),
  1990. new OracleParameter(":UserID", OracleDbType.Int32, detailDataRow["GroutingUserID"], ParameterDirection.Input),
  1991. new OracleParameter(":UserCode", OracleDbType.NVarchar2, detailDataRow["GroutingUserCode"], ParameterDirection.Input),
  1992. //new OracleParameter(":monitorid", OracleDbType.Int32, detailDataRow["monitorid"], ParameterDirection.Input),
  1993. //new OracleParameter(":monitorcode", OracleDbType.NVarchar2, detailDataRow["monitorcode"], ParameterDirection.Input),
  1994. new OracleParameter(":GroutingFlag", OracleDbType.Char, detailDataRow["GroutingFlag"], ParameterDirection.Input),
  1995. new OracleParameter(":NoGroutingRreason", OracleDbType.Int32, detailDataRow["NoGroutingRreason"], ParameterDirection.Input),
  1996. new OracleParameter(":ScrapFlag", OracleDbType.Char, (int)Constant.GroutingScrapFlag.No, ParameterDirection.Input),
  1997. new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  1998. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  1999. new OracleParameter(":CUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2000. new OracleParameter(":GMouldTypeID", OracleDbType.Int32, detailDataRow["GMouldTypeID"], ParameterDirection.Input),
  2001. new OracleParameter(":CanManyTimes", OracleDbType.Char, lineRow["CanManyTimes"], ParameterDirection.Input),
  2002. };
  2003. executeResult = tran.ExecuteNonQuery(insertGroutingDailyDetailSql, insertGroutingDailyDetailParas);
  2004. if (executeResult <= 0)
  2005. {
  2006. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2007. return sre;
  2008. }
  2009. #endregion 插入注浆日报明细
  2010. #region 更新成型线明细注浆次数
  2011. if (((int)Constant.GroutingFlag.Yes).ToString() == detailDataRow["GroutingFlag"].ToString())
  2012. {
  2013. OracleParameter[] updateGroutingLineDetailParas = new OracleParameter[]
  2014. {
  2015. new OracleParameter(":GroutingLineDetailID", OracleDbType.Int32, detailDataRow["GroutingLineDetailID"], ParameterDirection.Input),
  2016. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2017. };
  2018. executeResult = tran.ExecuteNonQuery(updateGroutingLineDetailSql, updateGroutingLineDetailParas);
  2019. if (executeResult <= 0)
  2020. {
  2021. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2022. return sre;
  2023. }
  2024. }
  2025. #endregion 更新成型线明细注浆次数
  2026. #region 插入注浆ID表
  2027. DataRow newRow = gddIDTable.NewRow();
  2028. newRow["GOODSCODE"] = detailDataRow["GOODSCODE"].ToString();
  2029. newRow["LOGOID"] = drLogoID;
  2030. newRow["GROUTINGDAILYDETAILID"] = Convert.ToInt32(gddSeq);
  2031. newRow["GROUTINGFLAG"] = detailDataRow["GroutingFlag"];
  2032. gddIDTable.Rows.Add(newRow);
  2033. #endregion
  2034. #region 有主线标识并且没有数据的 为绑定注浆里的主注浆线 20260313
  2035. if (dtGroutingDetail.Columns.Contains("MAINGROUTINGFLAG"))
  2036. {
  2037. if (string.IsNullOrWhiteSpace(detailDataRow["MAINGROUTINGFLAG"].ToString()))
  2038. {
  2039. //找到对应辅注浆线,更新MAINGROUTINGDAILYDETAILID为主成型线ID
  2040. DataRow[] gdrows = dtGroutingDetail.Select("MAINGROUTINGFLAG = '" + detailDataRow["GROUTINGMOULDCODE"] + "-" + detailDataRow["GROUTINGBATCHNO"] + "'");
  2041. if (gdrows != null && gdrows.Length > 0)
  2042. {
  2043. foreach (DataRow gdrow in gdrows)
  2044. {
  2045. gdrow["MAINGROUTINGDAILYDETAILID"] = gddSeq;
  2046. }
  2047. }
  2048. }
  2049. else
  2050. {
  2051. //辅成型线,更新MAINGROUTINGDAILYDETAILID 为主成型线注浆明细ID
  2052. string proSql = "UPDATE TP_PM_GroutingDailyDetail SET MAINGROUTINGDAILYDETAILID = :MAINGROUTINGDAILYDETAILID WHERE GROUTINGDAILYDETAILID = :GROUTINGDAILYDETAILID";
  2053. OracleParameter[] proParas = new OracleParameter[]
  2054. {
  2055. new OracleParameter(":MAINGROUTINGDAILYDETAILID", OracleDbType.Int32, Convert.ToInt32(detailDataRow["MAINGROUTINGDAILYDETAILID"]), ParameterDirection.Input),
  2056. new OracleParameter(":GROUTINGDAILYDETAILID", OracleDbType.Int32, gddSeq, ParameterDirection.Input),
  2057. };
  2058. executeResult = tran.ExecuteNonQuery(proSql, proParas);
  2059. }
  2060. }
  2061. #endregion
  2062. }
  2063. #region 插入注浆者
  2064. //// 插入注浆者
  2065. //OracleParameter[] InsertGroutingProducerParas = new OracleParameter[]
  2066. //{
  2067. // new OracleParameter(":GroutingDailyID", OracleDbType.Int32, gdSeq, ParameterDirection.Input),
  2068. // new OracleParameter(":UserID", OracleDbType.Int32, lineRow["UserID"], ParameterDirection.Input),
  2069. // //new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  2070. // //new OracleParameter(":CUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2071. // new OracleParameter(":GroutingDate", OracleDbType.Date, groutingDate.Value, ParameterDirection.Input),
  2072. //};
  2073. //executeResult = tran.ExecuteNonQuery(insertGroutingProducerSql, InsertGroutingProducerParas);
  2074. //if (executeResult <= 0)
  2075. //{
  2076. // sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2077. // return sre;
  2078. //}
  2079. #endregion 插入注浆者
  2080. }
  2081. // TODO 补录注浆日报时,是否更新大于注浆日期的注浆日报明细和生产数据中的注浆次数?
  2082. #region 注浆之后反写半成品卡控计划物料计划数量
  2083. for (int i = 0; i < resultTable.Rows.Count; i++)
  2084. {
  2085. int proPlanID = 0;
  2086. //S_PC_003为0时,需要查找每个产品对应的当月该半成品物料的计划ID
  2087. //为1时,校验时已经查询过,无须再查
  2088. if (systemSetvalue == 0)
  2089. {
  2090. //查询对应半成品物料(根据注浆的产品及商标)
  2091. string mat20 = getmaterialcodeMat20(tran, resultTable.Rows[i]["GOODSCODE"].ToString(), Convert.ToInt32(resultTable.Rows[i]["LOGOID"]));
  2092. if (!string.IsNullOrWhiteSpace(mat20))
  2093. {
  2094. resultTable.Rows[i]["MAT20"] = mat20;
  2095. //查询半成品物料当月对应的计划数量
  2096. DataTable planTabel = getPlanDetail(tran, 1, mat20, Convert.ToDateTime(groutingDate));
  2097. if (planTabel != null && planTabel.Rows.Count > 0)
  2098. {
  2099. //有计划,计划ID
  2100. proPlanID = Convert.ToInt32(planTabel.Rows[0]["PRODPLANID"]);
  2101. }
  2102. }
  2103. }
  2104. else
  2105. {
  2106. if (!string.IsNullOrWhiteSpace(resultTable.Rows[i]["PRODPLANID"].ToString()))
  2107. {
  2108. proPlanID = Convert.ToInt32(resultTable.Rows[i]["PRODPLANID"]);
  2109. }
  2110. }
  2111. if (proPlanID >0 )
  2112. {
  2113. string proSql = "UPDATE TP_SEMIFINISHED_PRODPLAN SET COMPLETEDCOUNT = COMPLETEDCOUNT + :PLANCOUNT WHERE PRODPLANID = :PRODPLANID AND MATERIALCODE = :MAT20";
  2114. OracleParameter[] proParas = new OracleParameter[]
  2115. {
  2116. new OracleParameter(":PLANCOUNT", OracleDbType.Int32, Convert.ToInt32(resultTable.Rows[i]["Count"]), ParameterDirection.Input),
  2117. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  2118. new OracleParameter(":MAT20", OracleDbType.Varchar2, resultTable.Rows[i]["MAT20"].ToString(), ParameterDirection.Input),
  2119. };
  2120. executeResult = tran.ExecuteNonQuery(proSql, proParas);
  2121. //查找注浆明细中该产品商标都有哪些,插入关联表
  2122. DataRow[] groutingDailyDetailRows = gddIDTable.Select("GOODSCODE = '" + resultTable.Rows[i]["GOODSCODE"].ToString()
  2123. + "' and LOGOID = " + resultTable.Rows[i]["LOGOID"].ToString() + " and GROUTINGFLAG = 1");
  2124. foreach (DataRow dailydetailDataRow in groutingDailyDetailRows)
  2125. {
  2126. proSql = "INSERT INTO TP_SEMIFINISHED_PRODPLANBAR (PRODPLANID,GROUTINGDAILYDETAILID,ACCOUNTID,CREATEUSERID) VALUES(:PRODPLANID,:GROUTINGDAILYDETAILID,:ACCOUNTID,:CREATEUSERID)";
  2127. proParas = new OracleParameter[]
  2128. {
  2129. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  2130. new OracleParameter(":GROUTINGDAILYDETAILID", OracleDbType.Int32, Convert.ToInt32( dailydetailDataRow["GROUTINGDAILYDETAILID"]), ParameterDirection.Input),
  2131. new OracleParameter(":ACCOUNTID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  2132. new OracleParameter(":CREATEUSERID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2133. };
  2134. executeResult = tran.ExecuteNonQuery(proSql, proParas);
  2135. }
  2136. }
  2137. }
  2138. #endregion
  2139. sre.Result = groutingDailyIDs;
  2140. #endregion 新建注浆登记
  2141. }
  2142. // 编辑注浆日报
  2143. else
  2144. {
  2145. #region 编辑注浆日报
  2146. #region 校验时间戳
  2147. // 校验时间戳
  2148. DataRow gdDataRow = dtGroutingLine.Rows[0];
  2149. string checkSql = "SELECT GroutingDailyID" +
  2150. " FROM TP_PM_GroutingDaily" +
  2151. " WHERE GroutingDailyID = :GroutingDailyID" +
  2152. " AND OPTimeStamp = :OPTimeStamp" +
  2153. " AND ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'";
  2154. OracleParameter[] checkParas = new OracleParameter[]
  2155. {
  2156. new OracleParameter(":GroutingDailyID", OracleDbType.Int32, gdDataRow["GroutingDailyID"], ParameterDirection.Input),
  2157. new OracleParameter(":OPTimeStamp", OracleDbType.TimeStamp, gdDataRow["OPTimeStamp"], ParameterDirection.Input),
  2158. };
  2159. object checkResult = tran.GetSqlResultToObj(checkSql, checkParas);
  2160. if (checkResult == null)
  2161. {
  2162. sre.Status = Constant.ServiceResultStatus.DataChanged;
  2163. return sre;
  2164. }
  2165. #endregion 校验时间戳
  2166. // 更新注浆日报表
  2167. string upgdSql = "UPDATE TP_PM_GroutingDaily SET UpdateUserID = :UpdateUserID WHERE GroutingDailyID = :GroutingDailyID";
  2168. OracleParameter[] upgdParas = new OracleParameter[]
  2169. {
  2170. new OracleParameter(":GroutingDailyID", OracleDbType.Int32, gdDataRow["GroutingDailyID"], ParameterDirection.Input),
  2171. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2172. };
  2173. executeResult = tran.ExecuteNonQuery(upgdSql, upgdParas);
  2174. if (executeResult <= 0)
  2175. {
  2176. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2177. return sre;
  2178. }
  2179. #region SQL
  2180. string updateGroutingDailyDetailSql =
  2181. "UPDATE TP_PM_GroutingDailyDetail" +
  2182. " SET GroutingCount = CASE" +
  2183. " WHEN GroutingFlag <> :GroutingFlag AND GroutingFlag = '" + (int)Constant.GroutingFlag.Yes + "'" +
  2184. " THEN GroutingCount - 1" +
  2185. " WHEN GroutingFlag <> :GroutingFlag AND GroutingFlag = '" + (int)Constant.GroutingFlag.No + "'" +
  2186. " THEN GroutingCount + 1" +
  2187. " ELSE GroutingCount END," +
  2188. " GroutingFlag = :GroutingFlag," +
  2189. " NoGroutingRreason = :NoGroutingRreason," +
  2190. " Remarks = :Remarks," +
  2191. " LogoID = :LogoID," +
  2192. " UpdateUserID = :UpdateUserID" +
  2193. " WHERE (GroutingDailyDetailID = :GroutingDailyDetailID OR MAINGROUTINGDAILYDETAILID = :GroutingDailyDetailID)";
  2194. string updateGroutingDailyDetailLogoSql =
  2195. "UPDATE TP_PM_GroutingDailyDetail" +
  2196. " SET Remarks = :Remarks," +
  2197. " LogoID = :LogoID," +
  2198. " UpdateUserID = :UpdateUserID" +
  2199. " WHERE (GroutingDailyDetailID = :GroutingDailyDetailID OR MAINGROUTINGDAILYDETAILID = :GroutingDailyDetailID)";
  2200. string updateGroutingDailyDetailRemarksSql =
  2201. "UPDATE TP_PM_GroutingDailyDetail" +
  2202. " SET Remarks = :Remarks," +
  2203. " UpdateUserID = :UpdateUserID" +
  2204. " WHERE (GroutingDailyDetailID = :GroutingDailyDetailID OR MAINGROUTINGDAILYDETAILID = :GroutingDailyDetailID)";
  2205. //string updateGroutingLineDetailSql =
  2206. // "UPDATE TP_PC_GroutingLineDetail" +
  2207. // " SET GroutingCount = CASE" +
  2208. // " WHEN :cGroutingFlag = '" + (int)Constant.GroutingFlag.Yes + "'" +
  2209. // " THEN GroutingCount + 1" +
  2210. // " WHEN :cGroutingFlag = '" + (int)Constant.GroutingFlag.No + "'" +
  2211. // " THEN GroutingCount - 1" +
  2212. // " ELSE GroutingCount END," +
  2213. // " UpdateUserID = :UpdateUserID" +
  2214. // " WHERE GroutingLineDetailID = :GroutingLineDetailID /*AND :oGroutingFlag <> :cGroutingFlag*/";
  2215. string updateGroutingLineDetailSql = " UPDATE TP_PC_GroutingLineDetail\n" +
  2216. " SET GroutingCount = CASE\n" +
  2217. " WHEN :cGroutingFlag = '" + (int)Constant.GroutingFlag.Yes + "'" +
  2218. " THEN GroutingCount + 1" +
  2219. " WHEN :cGroutingFlag = '" + (int)Constant.GroutingFlag.No + "'" +
  2220. " THEN GroutingCount - 1" +
  2221. " ELSE GroutingCount END," +
  2222. " UpdateUserID = :UpdateUserID\n" +
  2223. " WHERE GroutingLineDetailID IN (\n" +
  2224. "SELECT GroutingLineDetailID\n" +
  2225. " FROM tp_pm_groutingdailydetail\n" +
  2226. " WHERE GROUTINGDAILYDETAILID = :GroutingDailyDetailID\n" +
  2227. " UNION\n" +
  2228. " SELECT GroutingLineDetailID\n" +
  2229. " FROM tp_pm_groutingdailydetail\n" +
  2230. " WHERE MAINGROUTINGDAILYDETAILID = :GroutingDailyDetailID\n" +
  2231. ")";
  2232. #endregion SQL
  2233. // 更新注浆日报明细表
  2234. foreach (DataRow detailDataRow in dtGroutingDetail.Rows)
  2235. {
  2236. if (detailDataRow.RowState != DataRowState.Modified)
  2237. {
  2238. continue;
  2239. }
  2240. // 已交坯,不能修改注浆信息
  2241. if ("1" == detailDataRow["DeliverFlag"].ToString())
  2242. {
  2243. OracleParameter[] updateGroutingDailyDetailRemarksParas = new OracleParameter[]
  2244. {
  2245. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  2246. new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  2247. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2248. };
  2249. executeResult = tran.ExecuteNonQuery(updateGroutingDailyDetailRemarksSql, updateGroutingDailyDetailRemarksParas);
  2250. if (executeResult <= 0)
  2251. {
  2252. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2253. return sre;
  2254. }
  2255. continue;
  2256. }
  2257. // 已绑定条码、损坯,不能修改注浆信息,可以修改商标
  2258. if ((detailDataRow["BarCode"] != DBNull.Value && !string.IsNullOrWhiteSpace(detailDataRow["BarCode"].ToString())) ||
  2259. ((int)Constant.GroutingScrapFlag.Yes).ToString() == detailDataRow["ScrapFlag"].ToString())
  2260. {
  2261. OracleParameter[] updateGroutingDailyDetailLogoParas = new OracleParameter[]
  2262. {
  2263. new OracleParameter(":LogoID", OracleDbType.Int32, detailDataRow["LogoID"], ParameterDirection.Input),
  2264. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  2265. new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  2266. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2267. };
  2268. executeResult = tran.ExecuteNonQuery(updateGroutingDailyDetailLogoSql, updateGroutingDailyDetailLogoParas);
  2269. if (executeResult <= 0)
  2270. {
  2271. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2272. return sre;
  2273. }
  2274. continue;
  2275. }
  2276. OracleParameter[] updateGroutingDailyDetailParas = new OracleParameter[]
  2277. {
  2278. new OracleParameter(":LogoID", OracleDbType.Int32, detailDataRow["LogoID"], ParameterDirection.Input),
  2279. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  2280. new OracleParameter(":GroutingFlag", OracleDbType.Char, detailDataRow["GroutingFlag"], ParameterDirection.Input),
  2281. new OracleParameter(":NoGroutingRreason", OracleDbType.Int32, detailDataRow["NoGroutingRreason"], ParameterDirection.Input),
  2282. new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  2283. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2284. };
  2285. executeResult = tran.ExecuteNonQuery(updateGroutingDailyDetailSql, updateGroutingDailyDetailParas);
  2286. if (executeResult <= 0)
  2287. {
  2288. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2289. return sre;
  2290. }
  2291. // 更新成型线明细的注浆次数
  2292. string oGroutingFlag = detailDataRow["GroutingFlag", DataRowVersion.Original].ToString();
  2293. string cGroutingFlag = detailDataRow["GroutingFlag", DataRowVersion.Current].ToString();
  2294. if (oGroutingFlag != cGroutingFlag)
  2295. {
  2296. OracleParameter[] updateGroutingLineDetailParas = new OracleParameter[]
  2297. {
  2298. new OracleParameter(":GroutingLineDetailID", OracleDbType.Int32, detailDataRow["GroutingLineDetailID"], ParameterDirection.Input),
  2299. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  2300. new OracleParameter(":cGroutingFlag", OracleDbType.Char, cGroutingFlag, ParameterDirection.Input),
  2301. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2302. };
  2303. executeResult = tran.ExecuteNonQuery(updateGroutingLineDetailSql, updateGroutingLineDetailParas);
  2304. if (executeResult <= 0)
  2305. {
  2306. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2307. return sre;
  2308. }
  2309. }
  2310. #region 编辑时,取消注浆对应减去计划中实际注浆数及关联数据,修改为注浆对应判断是否允许注浆,允许时对应计划增加实际注浆数 20251215
  2311. if (oGroutingFlag != cGroutingFlag)
  2312. {
  2313. if (groutingDate is null)
  2314. {
  2315. object date = CMNModuleLogic.GetAccountDate(tran, user);
  2316. groutingDate = Convert.ToDateTime(date).Date;
  2317. }
  2318. #region 增加循环,查询主成型线编辑时,辅成型线的注浆信息
  2319. DataTable maindt = tran.GetSqlResultToDt($@"
  2320. SELECT GDD.GROUTINGDAILYDETAILID,GDD.GOODSCODE,GDD.LOGOID FROM tp_pm_groutingdailydetail GDD
  2321. WHERE (GDD.GROUTINGDAILYDETAILID= {detailDataRow["GROUTINGDAILYDETAILID"]} OR GDD.MAINGROUTINGDAILYDETAILID = {detailDataRow["GROUTINGDAILYDETAILID"]})
  2322. ");
  2323. foreach (DataRow frow in maindt.Rows)
  2324. {
  2325. //先查询是否是内胆座圈等不参与报工不计入注浆数据
  2326. DataTable dt = tran.GetSqlResultToDt($@"
  2327. SELECT
  2328. G.SCRAPSUMFLAG
  2329. FROM
  2330. TP_MST_GOODS G
  2331. WHERE G.GOODSCODE = '{frow["GOODSCODE"]}'
  2332. ");
  2333. if (dt != null && dt.Rows.Count > 0 && dt.Rows[0]["SCRAPSUMFLAG"].ToString() == "1")
  2334. {
  2335. if (cGroutingFlag == "0")
  2336. {
  2337. //取消注浆
  2338. //查询对应半成品物料(根据注浆的产品及商标)
  2339. string mat20 = getmaterialcodeMat20(tran, frow["GOODSCODE"].ToString(), Convert.ToInt32(frow["LOGOID"]));
  2340. int proPlanID = 0;
  2341. if (!string.IsNullOrWhiteSpace(mat20))
  2342. {
  2343. //查询半成品物料当月对应的计划数量
  2344. DataTable planTabel = getPlanDetail(tran, 1, mat20, Convert.ToDateTime(groutingDate));
  2345. if (planTabel != null && planTabel.Rows.Count > 0)
  2346. {
  2347. proPlanID = Convert.ToInt32(planTabel.Rows[0]["PRODPLANID"]);
  2348. }
  2349. }
  2350. if (proPlanID > 0)
  2351. {
  2352. string proSql = "DELETE FROM TP_SEMIFINISHED_PRODPLANBAR WHERE PRODPLANID = :PRODPLANID and GROUTINGDAILYDETAILID = :GROUTINGDAILYDETAILID";
  2353. OracleParameter[] proParas = new OracleParameter[]
  2354. {
  2355. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  2356. new OracleParameter(":GROUTINGDAILYDETAILID", OracleDbType.Int32, Convert.ToInt32( frow["GROUTINGDAILYDETAILID"]), ParameterDirection.Input),
  2357. new OracleParameter(":ACCOUNTID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  2358. new OracleParameter(":CREATEUSERID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2359. };
  2360. executeResult = tran.ExecuteNonQuery(proSql, proParas);
  2361. //确保之前的注浆数据绑定在该月计划单上
  2362. if (executeResult > 0)
  2363. {
  2364. proSql = "UPDATE TP_SEMIFINISHED_PRODPLAN SET COMPLETEDCOUNT = COMPLETEDCOUNT - :PLANCOUNT WHERE PRODPLANID = :PRODPLANID ";
  2365. proParas = new OracleParameter[]
  2366. {
  2367. new OracleParameter(":PLANCOUNT", OracleDbType.Int32, 1, ParameterDirection.Input),
  2368. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  2369. };
  2370. executeResult = tran.ExecuteNonQuery(proSql, proParas);
  2371. }
  2372. }
  2373. }
  2374. else
  2375. {
  2376. //注浆
  2377. int systemSetvalue = getSystemSet(tran, "S_PC_003", user);
  2378. int proPlanID = 0;
  2379. //查询对应半成品物料(根据注浆的产品及商标)
  2380. string mat20 = getmaterialcodeMat20(tran, frow["GOODSCODE"].ToString(), Convert.ToInt32(frow["LOGOID"]));
  2381. if (!string.IsNullOrWhiteSpace(mat20))
  2382. {
  2383. //查询半成品物料当月对应的计划数量
  2384. DataTable planTabel = getPlanDetail(tran, 1, mat20, Convert.ToDateTime(groutingDate));
  2385. if (planTabel != null && planTabel.Rows.Count > 0)
  2386. {
  2387. proPlanID = Convert.ToInt32(planTabel.Rows[0]["PRODPLANID"]);
  2388. //有计划,计划数量
  2389. decimal planCount = Convert.ToDecimal(planTabel.Rows[0]["PLANCOUNT"]);
  2390. //已完成数量
  2391. decimal completedCount = 0;
  2392. if (!string.IsNullOrWhiteSpace(planTabel.Rows[0]["COMPLETEDCOUNT"].ToString()))
  2393. {
  2394. completedCount = Convert.ToDecimal(planTabel.Rows[0]["COMPLETEDCOUNT"]);
  2395. }
  2396. if (systemSetvalue == 1 && 1 > planCount - completedCount)
  2397. {
  2398. sre.Status = Constant.ServiceResultStatus.Other;
  2399. sre.OtherStatus = 1;
  2400. sre.Message = "无法注浆:此次编辑注浆超过产销卡控计划注浆数量,请核实。";
  2401. return sre;
  2402. }
  2403. }
  2404. else
  2405. {
  2406. if (systemSetvalue == 1)
  2407. {
  2408. //无计划,无法注浆
  2409. sre.Status = Constant.ServiceResultStatus.Other;
  2410. sre.OtherStatus = 1;
  2411. sre.Message = "无法注浆:该物料无产销计划,请核实。";
  2412. return sre;
  2413. }
  2414. }
  2415. }
  2416. if (proPlanID > 0)
  2417. {
  2418. string proSql = "UPDATE TP_SEMIFINISHED_PRODPLAN SET COMPLETEDCOUNT = COMPLETEDCOUNT + :PLANCOUNT WHERE PRODPLANID = :PRODPLANID ";
  2419. OracleParameter[] proParas = new OracleParameter[]
  2420. {
  2421. new OracleParameter(":PLANCOUNT", OracleDbType.Int32, 1, ParameterDirection.Input),
  2422. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  2423. };
  2424. executeResult = tran.ExecuteNonQuery(proSql, proParas);
  2425. proSql = "INSERT INTO TP_SEMIFINISHED_PRODPLANBAR (PRODPLANID,GROUTINGDAILYDETAILID,ACCOUNTID,CREATEUSERID) VALUES(:PRODPLANID,:GROUTINGDAILYDETAILID,:ACCOUNTID,:CREATEUSERID)";
  2426. proParas = new OracleParameter[]
  2427. {
  2428. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  2429. new OracleParameter(":GROUTINGDAILYDETAILID", OracleDbType.Int32, Convert.ToInt32( frow["GROUTINGDAILYDETAILID"]), ParameterDirection.Input),
  2430. new OracleParameter(":ACCOUNTID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  2431. new OracleParameter(":CREATEUSERID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2432. };
  2433. executeResult = tran.ExecuteNonQuery(proSql, proParas);
  2434. }
  2435. }
  2436. }
  2437. }
  2438. #endregion
  2439. }
  2440. #endregion
  2441. // TODO 修改以前记录时,是否更新大于注浆日期的注浆日报明细和生产数据中的注浆次数?
  2442. }
  2443. #endregion 编辑注浆日报
  2444. }
  2445. tran.Commit();
  2446. return sre;
  2447. }
  2448. catch (Exception ex)
  2449. {
  2450. if (tran != null &&
  2451. tran.ConnState == ConnectionState.Open)
  2452. {
  2453. tran.Rollback();
  2454. }
  2455. throw ex;
  2456. }
  2457. finally
  2458. {
  2459. if (tran != null &&
  2460. tran.ConnState == ConnectionState.Open)
  2461. {
  2462. tran.Disconnect();
  2463. }
  2464. }
  2465. }
  2466. #endregion 注浆登记
  2467. #region 条码绑定
  2468. /// <summary>
  2469. /// 取得FPM0105画面(选择能绑定条码的注浆登记)的查询数据
  2470. /// </summary>
  2471. /// <param name="user">登录用户信息</param>
  2472. /// <param name="se">查询条件</param>
  2473. /// <returns>查询结果</returns>
  2474. public static ServiceResultEntity GetFPM0105SData(SUserInfo user, FPM0104_SE se)
  2475. {
  2476. IDBConnection conn = null;
  2477. try
  2478. {
  2479. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  2480. ServiceResultEntity sre = new ServiceResultEntity();
  2481. // 'S_PM_023', '注浆绑码限制天数' add by chenxy 2019-05-07 begin
  2482. string spm023 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_023' and ss.AccountID = " + user.AccountID);
  2483. int spm023Value = 0;
  2484. if (!string.IsNullOrWhiteSpace(spm023) && int.TryParse(spm023, out spm023Value) && spm023Value > 0)
  2485. {
  2486. DateTime tDate = DateTime.Now.Date;
  2487. DateTime lastDate = tDate.AddDays(1 - spm023Value);
  2488. if (se.GroutingDate < lastDate || se.GroutingDate > tDate)
  2489. {
  2490. sre.Status = Constant.ServiceResultStatus.Other;
  2491. sre.OtherStatus = -1;
  2492. sre.Message = string.Format("允许注浆绑码的日期范围【{0:yyyy-MM-dd}】-【{1:yyyy-MM-dd}】", lastDate, tDate);
  2493. return sre;
  2494. }
  2495. }
  2496. // 'S_PM_023', '注浆绑码限制天数' add by chenxy 2019-05-07 end
  2497. string sqlString =
  2498. "SELECT " +
  2499. " GD.GroutingDailyID," +
  2500. " GD.GroutingLineCode," +
  2501. " GD.GroutingLineName," +
  2502. " GMS.GMouldStatusName," +
  2503. " GMT.GMouldTypeName," +
  2504. " GD.MouldQuantity," +
  2505. " GD.GroutingBatchNo," +
  2506. " GD.UserCode AS GroutingUserCode," +
  2507. " WMSYS.WM_CONCAT(DISTINCT TO_CHAR(GDD.GoodsCode)) AS GoodsCode" +
  2508. " FROM TP_PM_GroutingDaily GD" +
  2509. " INNER JOIN TP_PM_GroutingDailyDetail GDD" +
  2510. " ON GDD.GroutingDailyID = GD.GroutingDailyID" +
  2511. " INNER JOIN TP_SYS_GMouldStatus GMS" +
  2512. " ON GMS.GMouldStatusID = GD.GMouldStatus" +
  2513. " INNER JOIN TP_MST_GMouldType GMT" +
  2514. " ON GMT.GMouldTypeID = GD.GMouldTypeID" +
  2515. " WHERE GD.AccountID = :AccountID" +
  2516. " AND GD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  2517. // 成型线操作权限
  2518. " AND EXISTS (SELECT UP.PurviewID" +
  2519. " FROM TP_MST_UserPurview UP" +
  2520. " WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  2521. " AND (UP.PurviewID = -1 OR UP.PurviewID = GD.GroutingLineID)" +
  2522. " AND UP.UserId = :UPUserId)" +
  2523. // 注浆,未绑定条码
  2524. " AND GD.GroutingDate = :GroutingDate" +
  2525. " AND GDD.GroutingFlag = '" + (int)Constant.GroutingFlag.Yes + "'" +
  2526. " AND GDD.ScrapFlag = '" + (int)Constant.GroutingScrapFlag.No + "'";
  2527. // 周兴 2018-4-2 增加
  2528. if (!se.IsBarCodeScrapReasonUseFlag)
  2529. {
  2530. sqlString += " AND (GDD.BARCODE IS NULL OR LENGTH(GDD.BARCODE) = 0)";
  2531. }
  2532. //" AND (GDD.BARCODE IS NULL OR GDD.BARCODE = '')"
  2533. sqlString += " AND GDD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'"
  2534. ;
  2535. StringBuilder sql = new StringBuilder(sqlString);
  2536. List<OracleParameter> parameters = new List<OracleParameter>();
  2537. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  2538. parameters.Add(new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  2539. parameters.Add(new OracleParameter(":GroutingDate", OracleDbType.Date, se.GroutingDate, ParameterDirection.Input));
  2540. if (se != null)
  2541. {
  2542. // 成型线编码
  2543. if (!string.IsNullOrEmpty(se.GroutingLineCode))
  2544. {
  2545. sql.Append(" AND INSTR(GD.GroutingLineCode, :GroutingLineCode) > 0");
  2546. parameters.Add(new OracleParameter(":GroutingLineCode", OracleDbType.NVarchar2, se.GroutingLineCode, ParameterDirection.Input));
  2547. }
  2548. // 成型线名称
  2549. if (!string.IsNullOrEmpty(se.GroutingLineName))
  2550. {
  2551. sql.Append(" AND INSTR(GD.GroutingLineName, :GroutingLineName) > 0");
  2552. parameters.Add(new OracleParameter(":GroutingLineName", OracleDbType.NVarchar2, se.GroutingLineName, ParameterDirection.Input));
  2553. }
  2554. // 成型工号
  2555. if (!string.IsNullOrEmpty(se.GroutingUserCode))
  2556. {
  2557. sql.Append(" AND INSTR(GDD.UserCode, :GroutingUserCode) > 0");
  2558. parameters.Add(new OracleParameter(":GroutingUserCode", OracleDbType.NVarchar2, se.GroutingUserCode, ParameterDirection.Input));
  2559. }
  2560. // 注浆批次
  2561. if (se.GroutingBatchNo.HasValue)
  2562. {
  2563. sql.Append(" AND GD.GroutingBatchNo = :GroutingBatchNo");
  2564. parameters.Add(new OracleParameter(":GroutingBatchNo", OracleDbType.Int32, se.GroutingBatchNo, ParameterDirection.Input));
  2565. }
  2566. // 成型线类别
  2567. if (se.GMouldTypeID.HasValue)
  2568. {
  2569. sql.Append(" AND GD.GMouldTypeID = :GMouldTypeID");
  2570. parameters.Add(new OracleParameter(":GMouldTypeID", OracleDbType.Int32, se.GMouldTypeID.Value, ParameterDirection.Input));
  2571. }
  2572. // 备注
  2573. if (!string.IsNullOrEmpty(se.Remarks))
  2574. {
  2575. sql.Append(" AND INSTR(GDD.Remarks, :Remarks) > 0");
  2576. parameters.Add(new OracleParameter(":Remarks", OracleDbType.NVarchar2, se.Remarks, ParameterDirection.Input));
  2577. }
  2578. }
  2579. sqlString = sql.ToString() +
  2580. " GROUP BY " +
  2581. " GD.GroutingDailyID," +
  2582. " GD.GroutingLineCode," +
  2583. " GD.GroutingLineName," +
  2584. " GMS.GMouldStatusName," +
  2585. " GMT.GMouldTypeName," +
  2586. " GD.MouldQuantity," +
  2587. " GD.GroutingBatchNo," +
  2588. " GD.UserCode" +
  2589. " ORDER BY GD.GroutingLineCode";
  2590. DataTable data = conn.GetSqlResultToDt(sqlString, parameters.ToArray());
  2591. if (data == null || data.Rows.Count == 0)
  2592. {
  2593. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  2594. return sre;
  2595. }
  2596. sre.Data = new DataSet();
  2597. sre.Data.Tables.Add(data);
  2598. return sre;
  2599. }
  2600. catch (Exception ex)
  2601. {
  2602. throw ex;
  2603. }
  2604. finally
  2605. {
  2606. if (conn != null &&
  2607. conn.ConnState == ConnectionState.Open)
  2608. {
  2609. conn.Close();
  2610. }
  2611. }
  2612. }
  2613. /// <summary>
  2614. /// 取得FPM0103画面(绑定条码)的注浆数据
  2615. /// </summary>
  2616. /// <param name="user">登录用户信息</param>
  2617. /// <param name="groutingDailyID">注浆日报ID</param>
  2618. /// <returns>
  2619. /// 注浆数据
  2620. /// OtherStatus = 1:没有可编辑的注浆信息
  2621. /// OtherStatus = 2:没有可编辑的注浆明细信息
  2622. /// </returns>
  2623. public static ServiceResultEntity GetFPM0103Data(SUserInfo user, int groutingDailyID)
  2624. {
  2625. ServiceResultEntity sre = new ServiceResultEntity();
  2626. if (groutingDailyID < 1)
  2627. {
  2628. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  2629. return sre;
  2630. }
  2631. IDBConnection conn = null;
  2632. try
  2633. {
  2634. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  2635. StringBuilder sql = new StringBuilder();
  2636. List<OracleParameter> parameters = new List<OracleParameter>();
  2637. string gdSql =
  2638. "SELECT GD.GroutingDailyID," +
  2639. " GD.GroutingLineID," +
  2640. " GD.GroutingLineCode," +
  2641. " GD.GroutingLineName," +
  2642. " GD.MouldQuantity," +
  2643. " GD.GroutingDate," +
  2644. //" GD.GroutingBatchNo," +
  2645. " GD.OPTimeStamp" +
  2646. " FROM TP_PM_GroutingDaily GD" +
  2647. // 成型线操作权限
  2648. //" INNER JOIN (SELECT UP.PurviewID" +
  2649. //" FROM TP_MST_UserPurview UP" +
  2650. //" WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  2651. //" AND UP.UserId = :UPUserId) UP" +
  2652. //" ON UP.PurviewID = GD.GroutingLineID" +
  2653. " WHERE GD.AccountID = :AccountID" +
  2654. " AND GD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  2655. // 成型线操作权限
  2656. " AND EXISTS (SELECT UP.PurviewID" +
  2657. " FROM TP_MST_UserPurview UP" +
  2658. " WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  2659. " AND (UP.PurviewID = -1 OR UP.PurviewID = GD.GroutingLineID)" +
  2660. " AND UP.UserId = :UPUserId)" +
  2661. " AND GD.GroutingDailyID = :GroutingDailyID";
  2662. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  2663. parameters.Add(new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  2664. parameters.Add(new OracleParameter(":GroutingDailyID", OracleDbType.Int32, groutingDailyID, ParameterDirection.Input));
  2665. DataTable gdData = conn.GetSqlResultToDt(gdSql, parameters.ToArray());
  2666. if (gdData == null || gdData.Rows.Count == 0)
  2667. {
  2668. // 没有可编辑的注浆信息
  2669. sre.Status = Constant.ServiceResultStatus.Other;
  2670. sre.OtherStatus = 1;
  2671. sre.Message = "没有可编辑的注浆信息";
  2672. return sre;
  2673. }
  2674. gdData.TableName = "TP_PM_GroutingDaily";
  2675. sre.Data = new DataSet();
  2676. sre.Data.Tables.Add(gdData);
  2677. string gddSql =
  2678. "SELECT GDD.GroutingDailyID," +
  2679. " GDD.GroutingDailyDetailID," +
  2680. " GDD.GroutingLineID," +
  2681. " GDD.GroutingLineDetailID," +
  2682. " GDD.GroutingLineCode," +
  2683. " GDD.GroutingLineName," +
  2684. " GDD.GroutingDate," +
  2685. " GDD.GroutingBatchNo," +
  2686. " GDD.GroutingMouldCode," +
  2687. " GDD.UserCode," +
  2688. " GDD.GoodsCode," +
  2689. " GDD.GoodsName," +
  2690. " GMS.GMouldStatusName," +
  2691. " GDD.GroutingFlag," +
  2692. " GDD.LogoID," +
  2693. //" GDD.NoGroutingRreason," +
  2694. " DD.DictionaryValue AS NoGroutingRreason," +
  2695. " GDD.Remarks," +
  2696. " GDD.ScrapFlag," +
  2697. " GDD.DeliverFlag," +
  2698. //" GP.BarCode," +
  2699. //" GP.BarCode AS OBarCode," +
  2700. " GDD.SReasonID," +
  2701. " GDD.SReasonID ScrapReasonID," +
  2702. " SR.ScrapReason SReason," +
  2703. " GDD.BarCode," +
  2704. " GDD.BarCode AS OBarCode," +
  2705. " GDD.ScrapFlag AS OScrapFlag" +
  2706. " FROM TP_PM_GroutingDailyDetail GDD" +
  2707. " LEFT JOIN TP_MST_ScrapReason SR " +
  2708. " ON GDD.SReasonID = SR.ScrapReasonID " +
  2709. " INNER JOIN TP_SYS_GMouldStatus GMS" +
  2710. " ON GMS.GMouldStatusID = GDD.GMouldStatus" +
  2711. " LEFT JOIN TP_MST_DataDictionary DD" +
  2712. " ON DD.DictionaryID = GDD.NoGroutingRreason" +
  2713. //" LEFT JOIN TP_PM_GroutingProduct GP" +
  2714. //" ON GP.GroutingDailyDetailID = GDD.GroutingDailyDetailID" +
  2715. " WHERE GDD.AccountID = :AccountID" +
  2716. " AND GDD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  2717. " AND GDD.GroutingDailyID = :GroutingDailyID" +
  2718. " ORDER BY GDD.GroutingMouldCode";
  2719. parameters.Clear();
  2720. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  2721. parameters.Add(new OracleParameter(":GroutingDailyID", OracleDbType.Int32, groutingDailyID, ParameterDirection.Input));
  2722. DataTable gddData = conn.GetSqlResultToDt(gddSql, parameters.ToArray());
  2723. if (gddData == null || gddData.Rows.Count == 0)
  2724. {
  2725. // 没有可注浆的模具
  2726. sre.Status = Constant.ServiceResultStatus.Other;
  2727. sre.OtherStatus = 2;
  2728. sre.Message = "没有可编辑的注浆明细信息";
  2729. return sre;
  2730. }
  2731. gddData.TableName = "TP_PM_GroutingDailyDetail";
  2732. sre.Data.Tables.Add(gddData);
  2733. // 获取成型报损原因
  2734. string sqlString = "SELECT ScrapReasonID,ScrapReason,DisplayNo,ScrapType,Remarks,ValueFlag FROM TP_MST_ScrapReason "
  2735. + " WHERE AccountID = :AccountID AND ScrapType ='0' Order By DisplayNo";
  2736. parameters.Clear();
  2737. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  2738. DataTable returnTable = conn.GetSqlResultToDt(sqlString, parameters.ToArray());
  2739. if (returnTable == null || returnTable.Rows.Count == 0)
  2740. {
  2741. // 没有可注浆的模具
  2742. sre.Status = Constant.ServiceResultStatus.Other;
  2743. sre.OtherStatus = 3;
  2744. sre.Message = "没有获取到成型报损原因";
  2745. return sre;
  2746. }
  2747. // 'S_PM_023', '注浆绑码限制天数' add by chenxy 2019-05-07 begin
  2748. sre.Result = 1;
  2749. string spm023 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_023' and ss.AccountID = " + user.AccountID);
  2750. int spm023Value = 0;
  2751. if (!string.IsNullOrWhiteSpace(spm023) && int.TryParse(spm023, out spm023Value) && spm023Value > 0)
  2752. {
  2753. DateTime tDate = DateTime.Now.Date;
  2754. DateTime lastDate = tDate.AddDays(1 - spm023Value);
  2755. DateTime gData = (DateTime)gdData.Rows[0]["GroutingDate"];
  2756. if (gData < lastDate || gData > tDate)
  2757. {
  2758. sre.Result = 0;
  2759. sre.Message = string.Format("允许注浆绑码的日期范围【{0:yyyy-MM-dd}】-【{1:yyyy-MM-dd}】", lastDate, tDate);
  2760. }
  2761. }
  2762. // 'S_PM_023', '注浆绑码限制天数' add by chenxy 2019-05-07 end
  2763. returnTable.TableName = "TP_MST_ScrapReason";
  2764. sre.Data.Tables.Add(returnTable);
  2765. return sre;
  2766. }
  2767. catch (Exception ex)
  2768. {
  2769. throw ex;
  2770. }
  2771. finally
  2772. {
  2773. if (conn != null &&
  2774. conn.ConnState == ConnectionState.Open)
  2775. {
  2776. conn.Close();
  2777. }
  2778. }
  2779. }
  2780. /// <summary>
  2781. /// 保存FPM0103画面(绑定条码)的注浆数据
  2782. /// </summary>
  2783. /// <param name="user">登录用户信息</param>
  2784. /// <param name="groutingInfo">注浆数据</param>
  2785. /// <returns>保存结果
  2786. /// OtherStatus = 1: 没有以下成型线的操作权限
  2787. /// </returns>
  2788. public static ServiceResultEntity SetFPM0103Data(SUserInfo user, DataSet groutingInfo)
  2789. {
  2790. IDBTransaction tran = null;
  2791. try
  2792. {
  2793. ServiceResultEntity sre = new ServiceResultEntity();
  2794. if (groutingInfo == null ||
  2795. groutingInfo.Tables.Count < 2 ||
  2796. groutingInfo.Tables[0].Rows.Count < 1 ||
  2797. groutingInfo.Tables[1].Rows.Count < 1)
  2798. {
  2799. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2800. return sre;
  2801. }
  2802. tran = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  2803. int executeResult = 0;
  2804. // 绑定条码
  2805. #region 校验时间戳
  2806. // 校验时间戳
  2807. DataRow gdDataRow = groutingInfo.Tables[0].Rows[0];
  2808. string checkSql =
  2809. "SELECT GroutingDailyID" +
  2810. " FROM TP_PM_GroutingDaily" +
  2811. " WHERE GroutingDailyID = :GroutingDailyID" +
  2812. " AND OPTimeStamp = :OPTimeStamp" +
  2813. " AND ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'";
  2814. OracleParameter[] checkParas = new OracleParameter[]
  2815. {
  2816. new OracleParameter(":GroutingDailyID", OracleDbType.Int32, gdDataRow["GroutingDailyID"], ParameterDirection.Input),
  2817. new OracleParameter(":OPTimeStamp", OracleDbType.TimeStamp, gdDataRow["OPTimeStamp"], ParameterDirection.Input),
  2818. };
  2819. object checkResult = tran.GetSqlResultToObj(checkSql, checkParas);
  2820. if (checkResult == null)
  2821. {
  2822. sre.Status = Constant.ServiceResultStatus.DataChanged;
  2823. return sre;
  2824. }
  2825. #endregion 校验时间戳
  2826. #region 校验条码
  2827. StringBuilder barcodes = new StringBuilder(",");
  2828. foreach (DataRow row in groutingInfo.Tables[1].Rows)
  2829. {
  2830. if ((row["OBarCode"] == null || row["OBarCode"] == DBNull.Value) &&
  2831. (row["BarCode"] != null && row["BarCode"] != DBNull.Value))
  2832. {
  2833. barcodes.Append(row["BarCode"].ToString() + ",");
  2834. }
  2835. }
  2836. // todo 条码状态表
  2837. string checkBarcodeSql =
  2838. "SELECT UBC.BarCode FROM TP_PM_UsedBarCode UBC " +
  2839. " WHERE INSTR(:BarCodes, ',' || UBC.BarCode || ',') > 0";
  2840. OracleParameter[] checkBarcodeParas = new OracleParameter[]
  2841. {
  2842. new OracleParameter(":BarCodes", OracleDbType.NVarchar2, barcodes.ToString(), ParameterDirection.Input),
  2843. };
  2844. DataTable barCodeDataTable = tran.GetSqlResultToDt(checkBarcodeSql, checkBarcodeParas);
  2845. if (barCodeDataTable != null && barCodeDataTable.Rows.Count > 0)
  2846. {
  2847. barcodes.Clear();
  2848. //foreach (DataRow row in groutingInfo.Tables[1].Rows)
  2849. foreach (DataRow row in barCodeDataTable.Rows)
  2850. {
  2851. if (barcodes.Length > 0)
  2852. {
  2853. barcodes.Append(",");
  2854. }
  2855. barcodes.Append(row["BarCode"].ToString());
  2856. }
  2857. sre.Status = Constant.ServiceResultStatus.Other;
  2858. sre.OtherStatus = 1;
  2859. //sre.Message = string.Format("条码({0})已被使用", barcode);
  2860. sre.Message = "以下条码已被使用" + System.Environment.NewLine + barcodes.ToString();
  2861. return sre;
  2862. }
  2863. #endregion 校验条码
  2864. #region 更新注浆日报表
  2865. string upgdSql = "UPDATE TP_PM_GroutingDaily SET UpdateUserID = :UpdateUserID WHERE GroutingDailyID = :GroutingDailyID";
  2866. OracleParameter[] upgdParas = new OracleParameter[]
  2867. {
  2868. new OracleParameter(":GroutingDailyID", OracleDbType.Int32, gdDataRow["GroutingDailyID"], ParameterDirection.Input),
  2869. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2870. };
  2871. executeResult = tran.ExecuteNonQuery(upgdSql, upgdParas);
  2872. if (executeResult <= 0)
  2873. {
  2874. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2875. return sre;
  2876. }
  2877. #endregion 更新注浆日报表
  2878. #region 更新注浆日报明细表
  2879. #region SQL
  2880. string updateGroutingDailyDetailLogoSql =
  2881. "UPDATE TP_PM_GroutingDailyDetail" +
  2882. " SET Remarks = :Remarks," +
  2883. " UpdateUserID = :UpdateUserID, LogoID = :LogoID" +
  2884. " WHERE GroutingDailyDetailID = :GroutingDailyDetailID";
  2885. string updateGroutingDailyDetailRemarksSql =
  2886. "UPDATE TP_PM_GroutingDailyDetail" +
  2887. " SET ScrapFlag = :ScrapFlag, Remarks = :Remarks, " +
  2888. " ScrapTime = case when :ScrapFlag= '1' and ScrapFlag = '0' then sysdate when :ScrapFlag= '0' then null else ScrapTime end, " +
  2889. " ScrapUser = case when :ScrapFlag= '1' and ScrapFlag = '0' then :UpdateUserID when :ScrapFlag= '0' then null else ScrapUser end, " +
  2890. " UpdateUserID = :UpdateUserID, LogoID = :LogoID" +
  2891. " WHERE GroutingDailyDetailID = :GroutingDailyDetailID";
  2892. string updateGroutingDailyDetailScrapFlagSql =
  2893. "UPDATE TP_PM_GroutingDailyDetail" +
  2894. " SET ScrapFlag = :ScrapFlag, " +
  2895. " ScrapTime = case when :ScrapFlag= '1' and ScrapFlag = '0' then sysdate when :ScrapFlag= '0' then null else ScrapTime end, " +
  2896. " ScrapUser = case when :ScrapFlag= '1' and ScrapFlag = '0' then :UpdateUserID when :ScrapFlag= '0' then null else ScrapUser end, " +
  2897. " Remarks = :Remarks," +
  2898. " LogoID = :LogoID," +
  2899. " UpdateUserID = :UpdateUserID" +
  2900. " WHERE GroutingDailyDetailID = :GroutingDailyDetailID";
  2901. string updateGroutingDailyDetailSql =
  2902. "UPDATE TP_PM_GroutingDailyDetail" +
  2903. " SET BarCode = :BarCode, " +
  2904. " ScrapFlag = '" + (int)Constant.GroutingScrapFlag.No + "'," +
  2905. " Remarks = :Remarks," +
  2906. " LogoID = :LogoID," +
  2907. " UpdateUserID = :UpdateUserID" +
  2908. " WHERE GroutingDailyDetailID = :GroutingDailyDetailID";
  2909. #endregion SQL
  2910. foreach (DataRow detailDataRow in groutingInfo.Tables[1].Rows)
  2911. {
  2912. if (detailDataRow.RowState != DataRowState.Modified)
  2913. {
  2914. continue;
  2915. }
  2916. // 未注浆不用更新
  2917. if (((int)Constant.GroutingFlag.Yes).ToString() != detailDataRow["GroutingFlag"].ToString())
  2918. {
  2919. //OracleParameter[] updateGroutingDailyDetailLogoParas = new OracleParameter[]
  2920. //{
  2921. // new OracleParameter(":LogoID", OracleDbType.Int32, detailDataRow["LogoID"], ParameterDirection.Input),
  2922. // new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  2923. // new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  2924. // new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2925. //};
  2926. //executeResult = tran.ExecuteNonQuery(updateGroutingDailyDetailLogoSql, updateGroutingDailyDetailLogoParas);
  2927. //if (executeResult <= 0)
  2928. //{
  2929. // sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2930. // return sre;
  2931. //}
  2932. continue;
  2933. }
  2934. // 已交坯不用更新
  2935. if ("1" == detailDataRow["DeliverFlag"].ToString())
  2936. {
  2937. //OracleParameter[] updateGroutingDailyDetailLogoParas = new OracleParameter[]
  2938. //{
  2939. // new OracleParameter(":LogoID", OracleDbType.Int32, detailDataRow["LogoID"], ParameterDirection.Input),
  2940. // new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  2941. // new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  2942. // new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2943. //};
  2944. //executeResult = tran.ExecuteNonQuery(updateGroutingDailyDetailLogoSql, updateGroutingDailyDetailLogoParas);
  2945. //if (executeResult <= 0)
  2946. //{
  2947. // sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2948. // return sre;
  2949. //}
  2950. continue;
  2951. }
  2952. // 已绑定条码,不能修改条码,绑定条码后损坯
  2953. string oBarcode = detailDataRow["OBarcode"].ToString();
  2954. if (!string.IsNullOrEmpty(oBarcode))
  2955. {
  2956. OracleParameter[] updateGroutingDailyDetailRemarksParas = new OracleParameter[]
  2957. {
  2958. new OracleParameter(":LogoID", OracleDbType.Int32, detailDataRow["LogoID"], ParameterDirection.Input),
  2959. new OracleParameter(":ScrapFlag", OracleDbType.Char, detailDataRow["ScrapFlag"], ParameterDirection.Input),
  2960. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  2961. new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  2962. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2963. };
  2964. executeResult = tran.ExecuteNonQuery(updateGroutingDailyDetailRemarksSql, updateGroutingDailyDetailRemarksParas);
  2965. if (executeResult <= 0)
  2966. {
  2967. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2968. return sre;
  2969. }
  2970. //更新使用条码 2015/7/14
  2971. string sqlUpdateUsedBarCode = "update TP_PM_UsedBarCode set BarCodeStatus=:BarCodeStatus where barcode=:barcode";
  2972. OracleParameter[] UpdateUsedBarCodeParas = new OracleParameter[]
  2973. {
  2974. new OracleParameter(":BarCodeStatus", OracleDbType.Char, detailDataRow["ScrapFlag"].ToString()=="0"?"1":"2", ParameterDirection.Input),
  2975. new OracleParameter(":barcode", OracleDbType.NVarchar2, detailDataRow["BarCode"], ParameterDirection.Input),
  2976. };
  2977. executeResult = tran.ExecuteNonQuery(sqlUpdateUsedBarCode, UpdateUsedBarCodeParas);
  2978. if (executeResult <= 0)
  2979. {
  2980. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  2981. return sre;
  2982. }
  2983. //更新使用条码 2015/7/14 end
  2984. continue;
  2985. }
  2986. // 损坯
  2987. string barcode = detailDataRow["Barcode"].ToString();
  2988. if (((int)Constant.GroutingScrapFlag.Yes).ToString() == detailDataRow["ScrapFlag"].ToString() ||
  2989. string.IsNullOrWhiteSpace(barcode))
  2990. {
  2991. OracleParameter[] updateGroutingDailyDetailScrapFlagParas = new OracleParameter[]
  2992. {
  2993. new OracleParameter(":LogoID", OracleDbType.Int32, detailDataRow["LogoID"], ParameterDirection.Input),
  2994. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  2995. new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  2996. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  2997. new OracleParameter(":ScrapFlag", OracleDbType.Char, detailDataRow["ScrapFlag"], ParameterDirection.Input),
  2998. };
  2999. executeResult = tran.ExecuteNonQuery(updateGroutingDailyDetailScrapFlagSql, updateGroutingDailyDetailScrapFlagParas);
  3000. if (executeResult <= 0)
  3001. {
  3002. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  3003. return sre;
  3004. }
  3005. //更新使用条码 2015/7/14
  3006. if (!string.IsNullOrEmpty(detailDataRow["BarCode"].ToString()))
  3007. {
  3008. string sqlUpdateUsedBarCode = "update TP_PM_UsedBarCode set BarCodeStatus=:BarCodeStatus where barcode=:barcode";
  3009. OracleParameter[] UpdateUsedBarCodeParas = new OracleParameter[]
  3010. {
  3011. new OracleParameter(":BarCodeStatus", OracleDbType.Char, detailDataRow["ScrapFlag"].ToString()=="0"?"1":"2", ParameterDirection.Input),
  3012. new OracleParameter(":barcode", OracleDbType.NVarchar2, detailDataRow["BarCode"], ParameterDirection.Input),
  3013. };
  3014. executeResult = tran.ExecuteNonQuery(sqlUpdateUsedBarCode, UpdateUsedBarCodeParas);
  3015. if (executeResult <= 0)
  3016. {
  3017. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  3018. return sre;
  3019. }
  3020. }
  3021. //更新使用条码 2015/7/14 end
  3022. continue;
  3023. }
  3024. // 验证条码
  3025. // todo 条码状态表
  3026. //string checkBarcodeSql =
  3027. // "SELECT 1 FROM TP_PM_UsedBarCode WHERE BarCode = :BarCode";
  3028. //OracleParameter[] checkBarcodeParas = new OracleParameter[]
  3029. //{
  3030. // new OracleParameter(":BarCode", OracleDbType.NVarchar2, barcode, ParameterDirection.Input),
  3031. //};
  3032. //object result = tran.GetSqlResultToObj(checkBarcodeSql, checkBarcodeParas);
  3033. //if (result != null)
  3034. //{
  3035. // sre.Status = Constant.ServiceResultStatus.Other;
  3036. // sre.OtherStatus = 1;
  3037. // sre.Message = string.Format("条码({0})已被使用", barcode);
  3038. // return sre;
  3039. //}
  3040. string insertBarcodeSql =
  3041. "INSERT INTO TP_PM_UsedBarCode " +
  3042. " (BarCode, AccountID, CreateTime, CreateUserID,GroutingDailyDetailID,BarCodeStatus)" +
  3043. "VALUES " +
  3044. " (:BarCode, :AccountID, sysdate, :CreateUserID,:GroutingDailyDetailID,:BarCodeStatus)";
  3045. OracleParameter[] insertBarcodeParas = new OracleParameter[]
  3046. {
  3047. new OracleParameter(":BarCode", OracleDbType.NVarchar2, barcode, ParameterDirection.Input),
  3048. new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  3049. new OracleParameter(":CreateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  3050. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  3051. new OracleParameter(":BarCodeStatus", OracleDbType.Char, detailDataRow["ScrapFlag"].ToString()=="0"?"1":"2", ParameterDirection.Input),
  3052. };
  3053. executeResult = tran.ExecuteNonQuery(insertBarcodeSql, insertBarcodeParas);
  3054. if (executeResult <= 0)
  3055. {
  3056. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  3057. return sre;
  3058. }
  3059. // 绑定条码
  3060. OracleParameter[] updateGroutingDailyDetailParas = new OracleParameter[]
  3061. {
  3062. new OracleParameter(":LogoID", OracleDbType.Int32, detailDataRow["LogoID"], ParameterDirection.Input),
  3063. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  3064. new OracleParameter(":BarCode", OracleDbType.NVarchar2, detailDataRow["BarCode"], ParameterDirection.Input),
  3065. new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  3066. new OracleParameter(":UpdateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  3067. };
  3068. executeResult = tran.ExecuteNonQuery(updateGroutingDailyDetailSql, updateGroutingDailyDetailParas);
  3069. if (executeResult <= 0)
  3070. {
  3071. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  3072. return sre;
  3073. }
  3074. }
  3075. #endregion 更新注浆日报明细表
  3076. tran.Commit();
  3077. return sre;
  3078. }
  3079. catch (Exception ex)
  3080. {
  3081. if (tran != null &&
  3082. tran.ConnState == ConnectionState.Open)
  3083. {
  3084. tran.Rollback();
  3085. }
  3086. throw ex;
  3087. }
  3088. finally
  3089. {
  3090. if (tran != null &&
  3091. tran.ConnState == ConnectionState.Open)
  3092. {
  3093. tran.Disconnect();
  3094. }
  3095. }
  3096. }
  3097. #endregion 条码绑定
  3098. #region 取消最后注浆
  3099. /// <summary>
  3100. /// 验证成型线编码是否能取消最后注浆
  3101. /// </summary>
  3102. /// <param name="user"></param>
  3103. /// <param name="glcode"></param>
  3104. /// <returns></returns>
  3105. public static ServiceResultEntity CheckFPM0106GLCode(SUserInfo user, string glcode)
  3106. {
  3107. ServiceResultEntity sre = new ServiceResultEntity();
  3108. if (string.IsNullOrWhiteSpace(glcode))
  3109. {
  3110. sre.Status = Constant.ServiceResultStatus.Other;
  3111. sre.OtherStatus = 1;
  3112. sre.Message = $"成型线【{glcode}】不存在";
  3113. return sre;
  3114. }
  3115. IDBConnection conn = null;
  3116. try
  3117. {
  3118. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  3119. //输入成型线号,1.验证是否存在、2.最后注浆日期、批次是否存在,3.是否有报损、是否绑定条码。 返回【最后注浆日期、批次】。
  3120. string sqlString = "select GL.GroutingLineID\n" +
  3121. " ,gl.GroutingLineCode\n" +
  3122. " ,gl.GroutingLineName\n" +
  3123. " ,GL.LastGroutingDate\n" +
  3124. " ,GL.LastGroutingBatchNo\n" +
  3125. " ,gd.usercode\n" +
  3126. " ,gd.GroutingDailyID\n" +
  3127. " from TP_PC_GroutingLine gl\n" +
  3128. " left join TP_PM_GroutingDaily gd\n" +
  3129. " on gd.GroutingLineID = gl.GroutingLineID\n" +
  3130. " and gd.GroutingDate = GL.LastGroutingDate\n" +
  3131. " and gd.GroutingBatchNo = gl.LastGroutingBatchNo\n" +
  3132. " and gd.valueflag = '1'\n" +
  3133. " where gl.valueflag = '1'\n" +
  3134. " and gl.GroutingLineCode = :glcode";
  3135. OracleParameter[] ps = new OracleParameter[]
  3136. {
  3137. new OracleParameter(":glcode", glcode),
  3138. };
  3139. DataTable data = conn.GetSqlResultToDt(sqlString, ps);
  3140. if (data == null || data.Rows.Count == 0)
  3141. {
  3142. sre.Status = Constant.ServiceResultStatus.Other;
  3143. sre.OtherStatus = 1;
  3144. sre.Message = $"成型线【{glcode}】不存在";
  3145. return sre;
  3146. }
  3147. sre.Data = new DataSet();
  3148. sre.Data.Tables.Add(data);
  3149. object objgdid = data.Rows[0]["GroutingDailyID"];
  3150. if (objgdid == null || objgdid == DBNull.Value)
  3151. {
  3152. sre.Status = Constant.ServiceResultStatus.Other;
  3153. sre.OtherStatus = 2;
  3154. sre.Message = $"成型线【{glcode}】未注浆";
  3155. return sre;
  3156. }
  3157. int gdid = Convert.ToInt32(objgdid);
  3158. sqlString = "select count(gdd.GroutingDailyDetailID) dc\n" +
  3159. " from TP_PM_GroutingDailyDetail gdd\n" +
  3160. " where gdd.valueflag = '1'\n" +
  3161. " and gdd.GroutingDailyID = :gdid\n" +
  3162. " and (gdd.ScrapFlag <> '0' or gdd.barcode is not null)";
  3163. ps = new OracleParameter[]
  3164. {
  3165. new OracleParameter(":gdid", gdid),
  3166. };
  3167. int dcount = Convert.ToInt32(conn.GetSqlResultToObj(sqlString, ps));
  3168. if (dcount > 0)
  3169. {
  3170. sre.Status = Constant.ServiceResultStatus.Other;
  3171. sre.OtherStatus = 3;
  3172. sre.Message = $"成型线【{glcode}】最后注浆登记中有已报损或绑定条码的注浆明细";
  3173. return sre;
  3174. }
  3175. // 'S_PM_022', '注浆编辑限制天数' add by chenxy 2018-12-15 begin
  3176. sre.Result = 1;
  3177. string spm022 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_022' and ss.AccountID = " + user.AccountID);
  3178. int spm022Value = 0;
  3179. if (!string.IsNullOrWhiteSpace(spm022) && int.TryParse(spm022, out spm022Value) && spm022Value > 0)
  3180. {
  3181. DateTime tDate = DateTime.Now.Date;
  3182. DateTime lastDate = tDate.AddDays(1 - spm022Value);
  3183. DateTime gData = (DateTime)data.Rows[0]["LastGroutingDate"];
  3184. if (gData < lastDate || gData > tDate)
  3185. {
  3186. sre.Status = Constant.ServiceResultStatus.Other;
  3187. sre.OtherStatus = 9;
  3188. sre.Message = string.Format("允许注浆编辑的日期范围【{0:yyyy-MM-dd}】-【{1:yyyy-MM-dd}】", lastDate, tDate);
  3189. return sre;
  3190. }
  3191. }
  3192. // 'S_PM_022', '注浆编辑限制天数' add by chenxy 2018-12-15 end
  3193. return sre;
  3194. }
  3195. catch (Exception ex)
  3196. {
  3197. throw ex;
  3198. }
  3199. finally
  3200. {
  3201. if (conn != null &&
  3202. conn.ConnState == ConnectionState.Open)
  3203. {
  3204. conn.Close();
  3205. }
  3206. }
  3207. }
  3208. /// <summary>
  3209. /// 验证成型线编码是否能取消最后注浆
  3210. /// </summary>
  3211. /// <param name="user"></param>
  3212. /// <param name="glcode"></param>
  3213. /// <returns></returns>
  3214. public static ServiceResultEntity SetFPM0106GLCode(SUserInfo user, ClientRequestEntity cre)
  3215. {
  3216. string glcode = cre.Data.Tables[0].Rows[0]["GroutingLineCode"] + "";
  3217. int glID = Convert.ToInt32(cre.Data.Tables[0].Rows[0]["GroutingLineID"]);
  3218. int gdID = Convert.ToInt32(cre.Data.Tables[0].Rows[0]["GroutingDailyID"]);
  3219. ServiceResultEntity sre = new ServiceResultEntity();
  3220. if (string.IsNullOrWhiteSpace(glcode))
  3221. {
  3222. sre.Status = Constant.ServiceResultStatus.Other;
  3223. sre.OtherStatus = 1;
  3224. sre.Message = $"成型线【{glcode}】不存在";
  3225. return sre;
  3226. }
  3227. IDBTransaction conn = null;
  3228. try
  3229. {
  3230. conn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  3231. #region 绑定注浆的成型线,撤销时,同时撤销辅成型线的注浆信息 20260313
  3232. DataTable maindt = conn.GetSqlResultToDt($@" SELECT DISTINCT GROUTINGDAILYID,GROUTINGLINECODE,GROUTINGLINEID
  3233. FROM TP_PM_GROUTINGDAILYDETAIL WHERE GROUTINGDAILYID = {gdID} OR
  3234. MAINGROUTINGDAILYDETAILID IN (SELECT GROUTINGDAILYDETAILID FROM tp_pm_groutingdailydetail WHERE GROUTINGDAILYID={gdID}) ");
  3235. if (maindt!= null && maindt.Rows.Count > 0)
  3236. {
  3237. foreach (DataRow drow in maindt.Rows)
  3238. {
  3239. glcode = drow["GROUTINGLINECODE"] + "";
  3240. glID = Convert.ToInt32(drow["GROUTINGLINEID"]);
  3241. gdID = Convert.ToInt32(drow["GROUTINGDAILYID"]);
  3242. //输入成型线号,1.验证是否存在、2.最后注浆日期、批次是否存在,3.是否有报损、是否绑定条码。 返回【最后注浆日期、批次】。
  3243. string sqlString = "select GL.GroutingLineID\n" +
  3244. //" ,gl.GroutingLineCode\n" +
  3245. //" ,gl.GroutingLineName\n" +
  3246. //" ,nvl(GL.LastGroutingDate, to_date('1900-01-01','yyyy-mm-dd')) LastGroutingDate\n" +
  3247. //" ,nvl(GL.LastGroutingBatchNo,0) LastGroutingBatchNo\n" +
  3248. //" ,gd.usercode\n" +
  3249. " ,gd.GroutingDailyID\n" +
  3250. " from TP_PC_GroutingLine gl\n" +
  3251. " inner join TP_PM_GroutingDaily gd\n" +
  3252. " on gd.GroutingLineID = gl.GroutingLineID\n" +
  3253. " and gd.GroutingDate = GL.LastGroutingDate\n" +
  3254. " and gd.GroutingBatchNo = gl.LastGroutingBatchNo\n" +
  3255. " and gd.valueflag = '1'\n" +
  3256. " where gl.valueflag = '1'\n" +
  3257. " and gl.GroutingLineID = :glID\n" +
  3258. " for update";
  3259. OracleParameter[] ps = new OracleParameter[]
  3260. {
  3261. new OracleParameter(":glID", glID),
  3262. };
  3263. DataTable data = conn.GetSqlResultToDt(sqlString, ps);
  3264. if (data == null || data.Rows.Count == 0)
  3265. {
  3266. sre.Status = Constant.ServiceResultStatus.Other;
  3267. sre.OtherStatus = 1;
  3268. sre.Message = $"成型线【{glcode}】不存在";
  3269. return sre;
  3270. }
  3271. //sre.Data = new DataSet();
  3272. //sre.Data.Tables.Add(data);
  3273. //DateTime lgd = Convert.ToDateTime(data.Rows[0]["LastGroutingDate"]);
  3274. //int lgb = Convert.ToInt32(data.Rows[0]["LastGroutingBatchNo"]);
  3275. //if (lgd != Convert.ToDateTime(cre.Data.Tables[0].Rows[0]["LastGroutingDate"]) ||
  3276. // lgb != Convert.ToInt32(cre.Data.Tables[0].Rows[0]["LastGroutingBatchNo"]))
  3277. //{
  3278. // sre.Status = Constant.ServiceResultStatus.Other;
  3279. // sre.OtherStatus = 2;
  3280. // sre.Message = $"成型线【{glcode}】最后注浆日期和批次已变更";
  3281. // return sre;
  3282. //}
  3283. int lgdid = Convert.ToInt32(data.Rows[0]["GroutingDailyID"]);
  3284. if (lgdid != gdID)
  3285. {
  3286. sre.Status = Constant.ServiceResultStatus.Other;
  3287. sre.OtherStatus = 2;
  3288. sre.Message = $"成型线【{glcode}】最后注浆日期和批次已变更";
  3289. return sre;
  3290. }
  3291. sqlString = "select count(gdd.GroutingDailyDetailID) dc\n" +
  3292. " from TP_PM_GroutingDailyDetail gdd\n" +
  3293. " where gdd.valueflag = '1'\n" +
  3294. " and gdd.GroutingDailyID = :gdid\n" +
  3295. " and (gdd.ScrapFlag <> '0' or gdd.barcode is not null)";
  3296. ps = new OracleParameter[]
  3297. {
  3298. new OracleParameter(":gdid", gdID),
  3299. };
  3300. int dcount = Convert.ToInt32(conn.GetSqlResultToObj(sqlString, ps));
  3301. if (dcount > 0)
  3302. {
  3303. sre.Status = Constant.ServiceResultStatus.Other;
  3304. sre.OtherStatus = 3;
  3305. sre.Message = $"成型线【{glcode}】最后注浆登记中有已报损或绑定条码的注浆明细";
  3306. return sre;
  3307. }
  3308. // 'S_PM_022', '注浆编辑限制天数' add by chenxy 2018-12-15 begin
  3309. //sre.Result = 1;
  3310. //string spm022 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_022' and ss.AccountID = " + user.AccountID);
  3311. //int spm022Value = 0;
  3312. //if (!string.IsNullOrWhiteSpace(spm022) && int.TryParse(spm022, out spm022Value) && spm022Value > 0)
  3313. //{
  3314. // DateTime tDate = DateTime.Now.Date;
  3315. // DateTime lastDate = tDate.AddDays(1 - spm022Value);
  3316. // DateTime gData = (DateTime)data.Rows[0]["LastGroutingDate"];
  3317. // if (gData < lastDate || gData > tDate)
  3318. // {
  3319. // sre.Status = Constant.ServiceResultStatus.Other;
  3320. // sre.OtherStatus = 9;
  3321. // sre.Message = string.Format("允许注浆编辑的日期范围【{0:yyyy-MM-dd}】-【{1:yyyy-MM-dd}】", lastDate, tDate);
  3322. // return sre;
  3323. // }
  3324. //}
  3325. // 'S_PM_022', '注浆编辑限制天数' add by chenxy 2018-12-15 end
  3326. #region 撤销最后一次注浆时,取消注浆对应减去计划中实际注浆数及关联数据 20251216
  3327. //读取原注浆记录
  3328. string sqls = @" SELECT
  3329. GDD.GROUTINGDAILYDETAILID,
  3330. GDD.GROUTINGLINEDETAILID,
  3331. GDD.GOODSCODE,
  3332. GDD.LOGOID,
  3333. GDD.GROUTINGDATE,
  3334. GDD.GROUTINGFLAG
  3335. FROM
  3336. TP_PM_GROUTINGDAILYDETAIL GDD
  3337. LEFT JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  3338. WHERE
  3339. GDD.GroutingDailyID = :GroutingDailyID
  3340. and GDD.groutingflag = 1 AND G.SCRAPSUMFLAG = 1 ";
  3341. OracleParameter[] detailop = new OracleParameter[]
  3342. {
  3343. new OracleParameter(":GroutingDailyID",OracleDbType.Int32, gdID, ParameterDirection.Input),
  3344. };
  3345. DataTable dt = conn.GetSqlResultToDt(sqls, detailop);
  3346. object date = CMNModuleLogic.GetAccountDate(conn, user);
  3347. DateTime groutingDate = Convert.ToDateTime(date).Date;
  3348. for (int i = 0; i < dt.Rows.Count; i++)
  3349. {
  3350. //取消注浆
  3351. //查询对应半成品物料(根据注浆的产品及商标)
  3352. string mat20 = getmaterialcodeMat20(conn, dt.Rows[i]["GOODSCODE"].ToString(), Convert.ToInt32(dt.Rows[i]["LOGOID"]));
  3353. int proPlanID = 0;
  3354. if (!string.IsNullOrWhiteSpace(mat20))
  3355. {
  3356. //查询半成品物料当月对应的计划数量
  3357. DataTable planTabel = getPlanDetail(conn, 1, mat20, groutingDate);
  3358. if (planTabel != null && planTabel.Rows.Count > 0)
  3359. {
  3360. proPlanID = Convert.ToInt32(planTabel.Rows[0]["PRODPLANID"]);
  3361. }
  3362. }
  3363. if (proPlanID > 0)
  3364. {
  3365. string proSql = "DELETE FROM TP_SEMIFINISHED_PRODPLANBAR WHERE PRODPLANID = :PRODPLANID and GROUTINGDAILYDETAILID = :GROUTINGDAILYDETAILID";
  3366. OracleParameter[] proParas = new OracleParameter[]
  3367. {
  3368. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  3369. new OracleParameter(":GROUTINGDAILYDETAILID", OracleDbType.Int32, Convert.ToInt32( dt.Rows[i]["GROUTINGDAILYDETAILID"]), ParameterDirection.Input),
  3370. new OracleParameter(":ACCOUNTID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  3371. new OracleParameter(":CREATEUSERID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  3372. };
  3373. int executeResult = conn.ExecuteNonQuery(proSql, proParas);
  3374. //确保之前的注浆数据绑定在该月计划单上
  3375. if (executeResult > 0)
  3376. {
  3377. proSql = "UPDATE TP_SEMIFINISHED_PRODPLAN SET COMPLETEDCOUNT = COMPLETEDCOUNT - :PLANCOUNT WHERE PRODPLANID = :PRODPLANID ";
  3378. proParas = new OracleParameter[]
  3379. {
  3380. new OracleParameter(":PLANCOUNT", OracleDbType.Int32, 1, ParameterDirection.Input),
  3381. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  3382. };
  3383. executeResult = conn.ExecuteNonQuery(proSql, proParas);
  3384. }
  3385. }
  3386. }
  3387. #endregion
  3388. //2.然后取消注浆,3.并valueflag=0。4.修改成型线的最后注浆日期、批次。
  3389. int r = 0;
  3390. string sql = null;
  3391. sql =
  3392. "UPDATE TP_PM_GroutingDailyDetail" +
  3393. " SET GroutingCount = CASE" +
  3394. " WHEN GroutingFlag = '1'" +
  3395. " THEN GroutingCount - 1" +
  3396. " ELSE GroutingCount END," +
  3397. " GroutingFlag = '0'," +
  3398. " UpdateUserID = :UpdateUserID" +
  3399. " WHERE GroutingDailyID = :gdid";
  3400. ps = new OracleParameter[]
  3401. {
  3402. new OracleParameter(":UpdateUserID", user.UserID),
  3403. new OracleParameter(":gdid", gdID),
  3404. };
  3405. r = conn.ExecuteNonQuery(sql, ps);
  3406. sql = "UPDATE tp_pc_groutinglinedetail gld\n" +
  3407. " SET gld.groutingcount =\n" +
  3408. " (SELECT gdds.groutingcount\n" +
  3409. " FROM tp_pm_groutingdailydetail gdds\n" +
  3410. " WHERE gdds.groutingdailyid = :gdid\n" +
  3411. " AND gdds.groutinglinedetailid = gld.groutinglinedetailid\n" +
  3412. " AND gdds.valueflag = '1')\n" +
  3413. " ,gld.updateuserid = :UpdateUserID\n" +
  3414. " WHERE gld.groutinglinedetailid IN\n" +
  3415. " (SELECT gdd.groutinglinedetailid\n" +
  3416. " FROM tp_pm_groutingdailydetail gdd\n" +
  3417. " WHERE gdd.groutingdailyid = :gdid\n" +
  3418. " AND gdd.valueflag = '1')";
  3419. r = conn.ExecuteNonQuery(sql, ps);
  3420. sql =
  3421. "UPDATE TP_PM_GroutingDailyDetail" +
  3422. " SET valueflag = '0'," +
  3423. " UpdateUserID = :UpdateUserID" +
  3424. " WHERE GroutingDailyID = :gdid";
  3425. r = conn.ExecuteNonQuery(sql, ps);
  3426. sql = "update TP_PM_GroutingDaily gd set gd.valueflag='0', updateuserid = :UpdateUserID where gd.GroutingDailyID = :gdid";
  3427. r = conn.ExecuteNonQuery(sql, ps);
  3428. sql = "update TP_PC_GroutingLine gl\n" +
  3429. " set (gl.LastGroutingDate, gl.LastGroutingBatchNo) =\n" +
  3430. " (select gd.GroutingDate, gd.GroutingBatchNo\n" +
  3431. " from TP_PM_GroutingDaily gd\n" +
  3432. " where gd.GroutingDailyID =\n" +
  3433. " (select max(gm.GroutingDailyID)\n" +
  3434. " from TP_PM_GroutingDaily gm\n" +
  3435. " where gm.GroutingLineID = :glid\n" +
  3436. " and gm.valueflag = '1'))\n" +
  3437. " ,gl.UpdateUserID = :UpdateUserID\n" +
  3438. " where gl.GroutingLineID = :glid";
  3439. ps = new OracleParameter[]
  3440. {
  3441. new OracleParameter(":UpdateUserID", user.UserID),
  3442. new OracleParameter(":glid", glID),
  3443. };
  3444. r = conn.ExecuteNonQuery(sql, ps);
  3445. }
  3446. }
  3447. #endregion
  3448. conn.Commit();
  3449. return sre;
  3450. }
  3451. catch (Exception ex)
  3452. {
  3453. throw ex;
  3454. }
  3455. finally
  3456. {
  3457. if (conn != null &&
  3458. conn.ConnState == ConnectionState.Open)
  3459. {
  3460. conn.Disconnect();
  3461. }
  3462. }
  3463. }
  3464. #endregion
  3465. #region 取消注浆(某一天某一批次)
  3466. /// <summary>
  3467. /// 验证注浆日期成型线编码是否能取消注浆
  3468. /// </summary>
  3469. /// <param name="user"></param>
  3470. /// <param name="glcode"></param>
  3471. /// <returns></returns>
  3472. public static ServiceResultEntity CheckFPM0108GLCode(SUserInfo user, ClientRequestEntity cre)
  3473. {
  3474. ServiceResultEntity sre = new ServiceResultEntity();
  3475. string glcode= cre.Properties["glcode"] + "";
  3476. string pici = cre.Properties["pici"] + "";
  3477. DateTime gdData = Convert.ToDateTime(cre.Properties["txtGroutingDateBegin"]);
  3478. if (string.IsNullOrWhiteSpace(glcode))
  3479. {
  3480. sre.Status = Constant.ServiceResultStatus.Other;
  3481. sre.OtherStatus = 1;
  3482. sre.Message = $"成型线【{glcode}】不存在";
  3483. return sre;
  3484. }
  3485. IDBConnection conn = null;
  3486. try
  3487. {
  3488. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  3489. //输入成型线号,1.验证是否存在、2.最后注浆日期、批次是否存在,3.是否有报损、是否绑定条码。 返回【最后注浆日期、批次】。
  3490. string sqlString = "SELECT DISTINCT gl.GroutingLineID\n" +
  3491. " ,gl.GroutingLineName\n" +
  3492. " ,gl.GroutingLineCode\n" +
  3493. " ,gdd.GroutingDate\n" +
  3494. " ,gdd.GroutingBatchNo\n" +
  3495. " ,gd.usercode\n" +
  3496. " ,gd.GroutingDailyID\n" +
  3497. " FROM tp_pm_groutingdailydetail gdd\n" +
  3498. " LEFT JOIN tp_pc_groutingline gl\n" +
  3499. " ON gl.groutinglineid = gdd.groutinglineid\n" +
  3500. " LEFT JOIN tp_pm_groutingdaily gd\n" +
  3501. " ON gd.groutingdailyid = gdd.groutingdailyid\n" +
  3502. " WHERE gdd.groutinglinecode = :glcode\n" +
  3503. " AND gdd.groutingdate = :gdate\n" +
  3504. " AND gdd.valueflag = 1\n" +
  3505. " AND gdd.groutingbatchno = :pici";
  3506. OracleParameter[] ps = new OracleParameter[]
  3507. {
  3508. new OracleParameter(":glcode",OracleDbType.NVarchar2, glcode, ParameterDirection.Input),
  3509. new OracleParameter(":pici",OracleDbType.NVarchar2, pici, ParameterDirection.Input),
  3510. new OracleParameter(":gdate", OracleDbType.Date,gdData, ParameterDirection.Input),
  3511. };
  3512. DataTable data = conn.GetSqlResultToDt(sqlString, ps);
  3513. if (data == null || data.Rows.Count == 0)
  3514. {
  3515. sre.Status = Constant.ServiceResultStatus.Other;
  3516. sre.OtherStatus = 1;
  3517. sre.Message = $"成型线【{glcode}】该日期该批次不存在";
  3518. return sre;
  3519. }
  3520. sre.Data = new DataSet();
  3521. sre.Data.Tables.Add(data);
  3522. object objgdid = data.Rows[0]["GroutingDailyID"];
  3523. if (objgdid == null || objgdid == DBNull.Value)
  3524. {
  3525. sre.Status = Constant.ServiceResultStatus.Other;
  3526. sre.OtherStatus = 2;
  3527. sre.Message = $"成型线【{glcode}】未注浆";
  3528. return sre;
  3529. }
  3530. int gdid = Convert.ToInt32(objgdid);
  3531. sqlString = "select count(gdd.GroutingDailyDetailID) dc\n" +
  3532. " from TP_PM_GroutingDailyDetail gdd\n" +
  3533. " where gdd.valueflag = '1'\n" +
  3534. " and gdd.GroutingDailyID = :gdid\n" +
  3535. " and (gdd.ScrapFlag <> '0' or gdd.barcode is not null)";
  3536. ps = new OracleParameter[]
  3537. {
  3538. new OracleParameter(":gdid", gdid),
  3539. };
  3540. int dcount = Convert.ToInt32(conn.GetSqlResultToObj(sqlString, ps));
  3541. if (dcount > 0)
  3542. {
  3543. sre.Status = Constant.ServiceResultStatus.Other;
  3544. sre.OtherStatus = 3;
  3545. sre.Message = $"成型线【{glcode}】最后注浆登记中有已报损或绑定条码的注浆明细";
  3546. return sre;
  3547. }
  3548. // 'S_PM_022', '注浆编辑限制天数' add by chenxy 2018-12-15 begin
  3549. sre.Result = 1;
  3550. string spm022 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_022' and ss.AccountID = " + user.AccountID);
  3551. int spm022Value = 0;
  3552. if (!string.IsNullOrWhiteSpace(spm022) && int.TryParse(spm022, out spm022Value) && spm022Value > 0)
  3553. {
  3554. DateTime tDate = DateTime.Now.Date;
  3555. DateTime lastDate = tDate.AddDays(1 - spm022Value);
  3556. DateTime gData = (DateTime)data.Rows[0]["GroutingDate"];
  3557. if (gData < lastDate || gData > tDate)
  3558. {
  3559. sre.Status = Constant.ServiceResultStatus.Other;
  3560. sre.OtherStatus = 9;
  3561. sre.Message = string.Format("允许注浆编辑的日期范围【{0:yyyy-MM-dd}】-【{1:yyyy-MM-dd}】", lastDate, tDate);
  3562. return sre;
  3563. }
  3564. }
  3565. // 'S_PM_022', '注浆编辑限制天数' add by chenxy 2018-12-15 end
  3566. return sre;
  3567. }
  3568. catch (Exception ex)
  3569. {
  3570. throw ex;
  3571. }
  3572. finally
  3573. {
  3574. if (conn != null &&
  3575. conn.ConnState == ConnectionState.Open)
  3576. {
  3577. conn.Close();
  3578. }
  3579. }
  3580. }
  3581. /// <summary>
  3582. /// 验证成型线编码是否能取消最后注浆
  3583. /// </summary>
  3584. /// <param name="user"></param>
  3585. /// <param name="glcode"></param>
  3586. /// <returns></returns>
  3587. public static ServiceResultEntity SetFPM0108GLCode(SUserInfo user, ClientRequestEntity cre)
  3588. {
  3589. string glcode = cre.Data.Tables[0].Rows[0]["GroutingLineCode"] + "";
  3590. string gbatchno = cre.Data.Tables[0].Rows[0]["GroutingBatchNo"] + "";
  3591. int glID = Convert.ToInt32(cre.Data.Tables[0].Rows[0]["GroutingLineID"]);
  3592. int gdID = Convert.ToInt32(cre.Data.Tables[0].Rows[0]["GroutingDailyID"]);
  3593. DateTime gdData = Convert.ToDateTime(cre.Data.Tables[0].Rows[0]["GroutingDate"]);
  3594. ServiceResultEntity sre = new ServiceResultEntity();
  3595. if (string.IsNullOrWhiteSpace(glcode))
  3596. {
  3597. sre.Status = Constant.ServiceResultStatus.Other;
  3598. sre.OtherStatus = 1;
  3599. sre.Message = $"成型线【{glcode}】不存在";
  3600. return sre;
  3601. }
  3602. IDBTransaction conn = null;
  3603. try
  3604. {
  3605. conn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  3606. #region 绑定注浆的成型线,撤销时,同时撤销辅成型线的注浆信息 20260313
  3607. DataTable maindt = conn.GetSqlResultToDt($@" SELECT DISTINCT GROUTINGDAILYID,GROUTINGLINECODE,GROUTINGLINEID,GROUTINGBATCHNO,GROUTINGDATE
  3608. FROM TP_PM_GROUTINGDAILYDETAIL WHERE GROUTINGDAILYID = {gdID} OR
  3609. MAINGROUTINGDAILYDETAILID IN (SELECT GROUTINGDAILYDETAILID FROM tp_pm_groutingdailydetail WHERE GROUTINGDAILYID={gdID}) ");
  3610. if (maindt != null && maindt.Rows.Count > 0)
  3611. {
  3612. foreach (DataRow drow in maindt.Rows)
  3613. {
  3614. glcode = drow["GROUTINGLINECODE"] + "";
  3615. gbatchno = drow["GROUTINGBATCHNO"] + "";
  3616. glID = Convert.ToInt32(drow["GROUTINGLINEID"]);
  3617. gdID = Convert.ToInt32(drow["GROUTINGDAILYID"]);
  3618. gdData = Convert.ToDateTime(drow["GROUTINGDATE"]);
  3619. //输入成型线号,1.验证是否存在、2.最后注浆日期、批次是否存在,3.是否有报损、是否绑定条码。 返回【最后注浆日期、批次】。
  3620. string sqlString = "SELECT DISTINCT gl.GroutingLineID\n" +
  3621. " ,gl.GroutingLineName\n" +
  3622. " ,gl.GroutingLineCode\n" +
  3623. " ,gdd.GroutingDate\n" +
  3624. " ,gdd.GroutingBatchNo\n" +
  3625. " ,gd.usercode\n" +
  3626. " ,gd.GroutingDailyID\n" +
  3627. " FROM tp_pm_groutingdailydetail gdd\n" +
  3628. " LEFT JOIN tp_pc_groutingline gl\n" +
  3629. " ON gl.groutinglineid = gdd.groutinglineid\n" +
  3630. " LEFT JOIN tp_pm_groutingdaily gd\n" +
  3631. " ON gd.groutingdailyid = gdd.groutingdailyid\n" +
  3632. " WHERE gdd.groutinglinecode = :glcode\n" +
  3633. " AND gdd.groutingdate = :gdate\n" +
  3634. " AND gdd.groutingbatchno = :gbatchno";
  3635. OracleParameter[] ps = new OracleParameter[]
  3636. {
  3637. new OracleParameter(":glcode", glcode),
  3638. new OracleParameter(":gbatchno", gbatchno),
  3639. new OracleParameter(":gdate", OracleDbType.Date,gdData, ParameterDirection.Input),
  3640. };
  3641. DataTable data = conn.GetSqlResultToDt(sqlString, ps);
  3642. if (data == null || data.Rows.Count == 0)
  3643. {
  3644. sre.Status = Constant.ServiceResultStatus.Other;
  3645. sre.OtherStatus = 1;
  3646. sre.Message = $"成型线【{glcode}】不存在";
  3647. return sre;
  3648. }
  3649. int lgdid = Convert.ToInt32(data.Rows[0]["GroutingDailyID"]);
  3650. sqlString = "select count(gdd.GroutingDailyDetailID) dc\n" +
  3651. " from TP_PM_GroutingDailyDetail gdd\n" +
  3652. " where gdd.valueflag = '1'\n" +
  3653. " and gdd.GroutingDailyID = :gdid\n" +
  3654. " and (gdd.ScrapFlag <> '0' or gdd.barcode is not null)";
  3655. ps = new OracleParameter[]
  3656. {
  3657. new OracleParameter(":gdid", gdID),
  3658. };
  3659. int dcount = Convert.ToInt32(conn.GetSqlResultToObj(sqlString, ps));
  3660. if (dcount > 0)
  3661. {
  3662. sre.Status = Constant.ServiceResultStatus.Other;
  3663. sre.OtherStatus = 3;
  3664. sre.Message = $"成型线【{glcode}】该注浆登记中有已报损或绑定条码的注浆明细";
  3665. return sre;
  3666. }
  3667. #region 撤销注浆时,取消注浆对应减去计划中实际注浆数及关联数据 20251216
  3668. //读取原注浆记录
  3669. string sqls = @" SELECT
  3670. GDD.GROUTINGDAILYDETAILID,
  3671. GDD.GROUTINGLINEDETAILID,
  3672. GDD.GOODSCODE,
  3673. GDD.LOGOID,
  3674. GDD.GROUTINGDATE,
  3675. GDD.GROUTINGFLAG
  3676. FROM
  3677. TP_PM_GROUTINGDAILYDETAIL GDD
  3678. LEFT JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  3679. WHERE
  3680. GDD.GroutingDailyID = :GroutingDailyID
  3681. and GDD.groutingflag = 1 AND G.SCRAPSUMFLAG = 1 ";
  3682. OracleParameter[] detailop = new OracleParameter[]
  3683. {
  3684. new OracleParameter(":GroutingDailyID",OracleDbType.Int32, gdID, ParameterDirection.Input),
  3685. };
  3686. DataTable dt = conn.GetSqlResultToDt(sqls, detailop);
  3687. object date = CMNModuleLogic.GetAccountDate(conn, user);
  3688. DateTime groutingDate = Convert.ToDateTime(date).Date;
  3689. for (int i = 0; i < dt.Rows.Count; i++)
  3690. {
  3691. //取消注浆
  3692. //查询对应半成品物料(根据注浆的产品及商标)
  3693. string mat20 = getmaterialcodeMat20(conn, dt.Rows[i]["GOODSCODE"].ToString(), Convert.ToInt32(dt.Rows[i]["LOGOID"]));
  3694. int proPlanID = 0;
  3695. if (!string.IsNullOrWhiteSpace(mat20))
  3696. {
  3697. //查询半成品物料当月对应的计划数量
  3698. DataTable planTabel = getPlanDetail(conn, 1, mat20, groutingDate);
  3699. if (planTabel != null && planTabel.Rows.Count > 0)
  3700. {
  3701. proPlanID = Convert.ToInt32(planTabel.Rows[0]["PRODPLANID"]);
  3702. }
  3703. }
  3704. if (proPlanID > 0)
  3705. {
  3706. string proSql = "DELETE FROM TP_SEMIFINISHED_PRODPLANBAR WHERE PRODPLANID = :PRODPLANID and GROUTINGDAILYDETAILID = :GROUTINGDAILYDETAILID";
  3707. OracleParameter[] proParas = new OracleParameter[]
  3708. {
  3709. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  3710. new OracleParameter(":GROUTINGDAILYDETAILID", OracleDbType.Int32, Convert.ToInt32( dt.Rows[i]["GROUTINGDAILYDETAILID"]), ParameterDirection.Input),
  3711. new OracleParameter(":ACCOUNTID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  3712. new OracleParameter(":CREATEUSERID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  3713. };
  3714. int executeResult = conn.ExecuteNonQuery(proSql, proParas);
  3715. //确保之前的注浆数据绑定在该月计划单上
  3716. if (executeResult > 0)
  3717. {
  3718. proSql = "UPDATE TP_SEMIFINISHED_PRODPLAN SET COMPLETEDCOUNT = COMPLETEDCOUNT - :PLANCOUNT WHERE PRODPLANID = :PRODPLANID ";
  3719. proParas = new OracleParameter[]
  3720. {
  3721. new OracleParameter(":PLANCOUNT", OracleDbType.Int32, 1, ParameterDirection.Input),
  3722. new OracleParameter(":PRODPLANID", OracleDbType.Int32, proPlanID, ParameterDirection.Input),
  3723. };
  3724. executeResult = conn.ExecuteNonQuery(proSql, proParas);
  3725. }
  3726. }
  3727. }
  3728. #endregion
  3729. //2.然后取消注浆,3.并valueflag=0。4.修改成型线的最后注浆日期、批次。
  3730. int r = 0;
  3731. string sql = null;
  3732. //sql = "UPDATE tp_pc_groutinglinedetail gld\n" +
  3733. //" SET gld.groutingcount =\n" +
  3734. //" (SELECT gdds.groutingcount\n" +
  3735. //" FROM tp_pm_groutingdailydetail gdds\n" +
  3736. //" WHERE gdds.groutingdailyid = :gdid\n" +
  3737. //" AND gdds.groutinglinedetailid = gld.groutinglinedetailid\n" +
  3738. //" AND gdds.valueflag = '1')\n" +
  3739. //" ,gld.updateuserid = :UpdateUserID\n" +
  3740. //" WHERE gld.groutinglinedetailid IN\n" +
  3741. //" (SELECT gdd.groutinglinedetailid\n" +
  3742. //" FROM tp_pm_groutingdailydetail gdd\n" +
  3743. //" WHERE gdd.groutingdailyid = :gdid\n" +
  3744. //" AND gdd.valueflag = '1')";
  3745. sql = "UPDATE tp_pc_groutinglinedetail gld\n" +
  3746. " SET gld.groutingcount = gld.groutingcount -\n" +
  3747. " (SELECT CASE WHEN GroutingFlag = '1' then 1 else 0 end groutingcount\n" +
  3748. " FROM ( SELECT groutinglinedetailid,groutingflag FROM tp_pm_groutingdailydetail WHERE GroutingDailyID = :gdid AND valueflag = '1') g\n" +
  3749. " WHERE g.groutinglinedetailid = gld.groutinglinedetailid)\n" +
  3750. " WHERE gld.groutinglinedetailid IN ( SELECT gdd.groutinglinedetailid\n" +
  3751. " FROM tp_pm_groutingdailydetail gdd\n" +
  3752. " WHERE gdd.groutingdailyid = :gdid\n" +
  3753. " AND gdd.valueflag = '1')";
  3754. r = conn.ExecuteNonQuery(sql, ps);
  3755. sql =
  3756. "UPDATE TP_PM_GroutingDailyDetail" +
  3757. " SET GroutingCount = CASE" +
  3758. " WHEN GroutingFlag = '1'" +
  3759. " THEN GroutingCount - 1" +
  3760. " ELSE GroutingCount END," +
  3761. " GroutingFlag = '0'," +
  3762. " UpdateUserID = :UpdateUserID," +
  3763. " valueflag = '0'" +
  3764. " WHERE GroutingDailyID = :gdid";
  3765. ps = new OracleParameter[]
  3766. {
  3767. new OracleParameter(":UpdateUserID", user.UserID),
  3768. new OracleParameter(":gdid", gdID),
  3769. };
  3770. r = conn.ExecuteNonQuery(sql, ps);
  3771. sql = "update TP_PM_GroutingDaily gd set gd.valueflag='0', updateuserid = :UpdateUserID where gd.GroutingDailyID = :gdid";
  3772. r = conn.ExecuteNonQuery(sql, ps);
  3773. sql = "update TP_PC_GroutingLine gl\n" +
  3774. " set (gl.LastGroutingDate, gl.LastGroutingBatchNo) =\n" +
  3775. " (select gd.GroutingDate, gd.GroutingBatchNo\n" +
  3776. " from TP_PM_GroutingDaily gd\n" +
  3777. " where gd.GroutingDailyID =\n" +
  3778. " (select max(gm.GroutingDailyID)\n" +
  3779. " from TP_PM_GroutingDaily gm\n" +
  3780. " where gm.GroutingLineID = :glid\n" +
  3781. " and gm.valueflag = '1'))\n" +
  3782. " ,gl.UpdateUserID = :UpdateUserID\n" +
  3783. " where gl.GroutingLineID = :glid";
  3784. ps = new OracleParameter[]
  3785. {
  3786. new OracleParameter(":UpdateUserID", user.UserID),
  3787. new OracleParameter(":glid", glID),
  3788. };
  3789. r = conn.ExecuteNonQuery(sql, ps);
  3790. }
  3791. }
  3792. #endregion
  3793. conn.Commit();
  3794. return sre;
  3795. }
  3796. catch (Exception ex)
  3797. {
  3798. throw ex;
  3799. }
  3800. finally
  3801. {
  3802. if (conn != null &&
  3803. conn.ConnState == ConnectionState.Open)
  3804. {
  3805. conn.Disconnect();
  3806. }
  3807. }
  3808. }
  3809. #endregion
  3810. #endregion 注浆管理
  3811. #region 条码管理
  3812. #region 条码校验
  3813. /*
  3814. /// <summary>
  3815. /// 条码()无效
  3816. /// </summary>
  3817. private const string MSG_CHECK_BARCODE_1 = "条码({0})无效";
  3818. /// <summary>
  3819. /// 系统中不存在条码()
  3820. /// </summary>
  3821. private const string MSG_CHECK_BARCODE_2 = "系统中不存在条码({0})";
  3822. /// <summary>
  3823. /// 条码()属于其他账套
  3824. /// </summary>
  3825. private const string MSG_CHECK_BARCODE_3 = "条码({0})属于其他账套";
  3826. /// <summary>
  3827. /// 条码()未被使用
  3828. /// </summary>
  3829. private const string MSG_CHECK_BARCODE_4 = "条码({0})未被使用";
  3830. /// <summary>
  3831. /// 条码()已被使用
  3832. /// </summary>
  3833. private const string MSG_CHECK_BARCODE_5 = "条码({0})已被使用";
  3834. /// <summary>
  3835. /// 条码()已被更换为()
  3836. /// </summary>
  3837. private const string MSG_CHECK_BARCODE_6 = "条码({0})已被更换为({1})";
  3838. /// <summary>
  3839. /// 校验更换条码
  3840. /// </summary>
  3841. /// <param name="user"></param>
  3842. /// <param name="barcodes"></param>
  3843. /// <returns></returns>
  3844. private static bool CheckBarcode2(IDBTransaction tran, SUserInfo user,
  3845. string barcode, string newBarcode, out string messages)
  3846. {
  3847. messages = null;
  3848. if (string.IsNullOrWhiteSpace(barcode))
  3849. {
  3850. // 无效条码
  3851. messages = string.Format(MSG_CHECK_BARCODE_1, barcode);
  3852. return false;
  3853. }
  3854. if (string.IsNullOrWhiteSpace(newBarcode))
  3855. {
  3856. // 无效条码
  3857. messages = string.Format(MSG_CHECK_BARCODE_1, newBarcode);
  3858. return false;
  3859. }
  3860. string checkBarCodeSql =
  3861. "SELECT BC.BarCode, BC.BarCodeStatus, BC.AccountID" +
  3862. " FROM TP_PM_BarCode BC" +
  3863. " WHERE BarCode = :BarCode OR BarCode = :NewBarCode";
  3864. OracleParameter[] checkBarCodeParas = new OracleParameter[]
  3865. {
  3866. new OracleParameter(":BarCode", OracleDbType.Varchar2, barcode, ParameterDirection.Input),
  3867. new OracleParameter(":NewBarCode", OracleDbType.Varchar2, newBarcode, ParameterDirection.Input),
  3868. };
  3869. DataTable barcodeData = tran.GetSqlResultToDt(checkBarCodeSql, checkBarCodeParas);
  3870. if (barcodeData == null || barcodeData.Rows.Count == 0)
  3871. {
  3872. // 系统中不存在条码
  3873. messages = string.Format(MSG_CHECK_BARCODE_2, barcode);
  3874. return false;
  3875. }
  3876. DataRow[] drs = barcodeData.Select("BarCode = '" + barcode + "'");
  3877. if (drs == null || drs.Length == 0)
  3878. {
  3879. // 系统中不存在条码
  3880. messages = string.Format(MSG_CHECK_BARCODE_2, barcode);
  3881. return false;
  3882. }
  3883. if (user.AccountID.ToString() != drs[0]["AccountID"].ToString())
  3884. {
  3885. // 条码属于其他账套
  3886. messages = string.Format(MSG_CHECK_BARCODE_3, barcode);
  3887. return false;
  3888. }
  3889. if (((int)Constant.BarcodeStatus.Unused).ToString() == drs[0]["BarCodeStatus"].ToString())
  3890. {
  3891. // 条码未被使用
  3892. messages = string.Format(MSG_CHECK_BARCODE_4, barcode);
  3893. return false;
  3894. }
  3895. if (((int)Constant.BarcodeStatus.Replaced).ToString() == drs[0]["BarCodeStatus"].ToString())
  3896. {
  3897. string sql = "SELECT FinalBarCode FROM TP_PM_BarCodeRecord WHERE BarCode = :BarCode";
  3898. OracleParameter[] paras = new OracleParameter[]
  3899. {
  3900. new OracleParameter(":BarCode", OracleDbType.Varchar2, barcode, ParameterDirection.Input),
  3901. };
  3902. object finalBarCode = tran.GetSqlResultToObj(sql, paras);
  3903. if (finalBarCode != null)
  3904. {
  3905. // 条码已被更换
  3906. messages = string.Format(MSG_CHECK_BARCODE_6, barcode, finalBarCode);
  3907. return false;
  3908. }
  3909. }
  3910. drs = barcodeData.Select("BarCode = '" + newBarcode + "'");
  3911. if (drs == null || drs.Length == 0)
  3912. {
  3913. return true;
  3914. }
  3915. if (user.AccountID.ToString() != drs[0]["AccountID"].ToString())
  3916. {
  3917. // 条码属于其他账套
  3918. messages = string.Format(MSG_CHECK_BARCODE_3, newBarcode);
  3919. return false;
  3920. }
  3921. if (((int)Constant.BarcodeStatus.Unused).ToString() != drs[0]["BarCodeStatus"].ToString())
  3922. {
  3923. // 条码已被使用
  3924. messages = string.Format(MSG_CHECK_BARCODE_5, newBarcode);
  3925. return false;
  3926. }
  3927. return true;
  3928. }
  3929. /// <summary>
  3930. /// 校验注浆绑定条码
  3931. /// </summary>
  3932. /// <param name="user"></param>
  3933. /// <param name="barcodes"></param>
  3934. /// <returns></returns>
  3935. private static bool CheckBarcode1(IDBTransaction tran, SUserInfo user, string barcodes,
  3936. out DataTable invalid, out DataTable effective)
  3937. {
  3938. // 无效条码
  3939. invalid = null;
  3940. // 有效条码
  3941. effective = null;
  3942. if (string.IsNullOrWhiteSpace(barcodes))
  3943. {
  3944. // 无效条码
  3945. return false;
  3946. }
  3947. string checkBarCodeSql =
  3948. "SELECT BC.BarCodeStatus, BC.AccountID" +
  3949. " FROM TP_PM_BarCode BC" +
  3950. //" WHERE BarCode = :BarCode;";
  3951. " WHERE INSTR(:BarCodes, ',' || BC.BarCode || ',') > 0";
  3952. OracleParameter[] checkBarCodeParas = new OracleParameter[]
  3953. {
  3954. new OracleParameter(":BarCodes", OracleDbType.Varchar2, checkBarCodeSql, ParameterDirection.Input),
  3955. };
  3956. DataTable barcodeData = tran.GetSqlResultToDt(checkBarCodeSql, checkBarCodeParas);
  3957. if (barcodeData == null || barcodeData.Rows.Count == 0)
  3958. {
  3959. // 通过校验
  3960. return true;
  3961. }
  3962. foreach (DataRow barcode in barcodeData.Rows)
  3963. {
  3964. if (user.AccountID.ToString() != barcode["AccountID"].ToString())
  3965. {
  3966. // 不在同一个账套
  3967. }
  3968. if (((int)Constant.BarcodeStatus.Unused).ToString() != barcode["BarCodeStatus"].ToString())
  3969. {
  3970. }
  3971. }
  3972. return true;
  3973. }
  3974. */
  3975. #endregion 条码校验
  3976. #region 条码变更
  3977. /// <summary>
  3978. /// 取得FPM0202画面(条码变更用条码查询)的查询数据
  3979. /// </summary>
  3980. /// <param name="user">登录用户信息</param>
  3981. /// <param name="se">查询条件</param>
  3982. /// <returns>查询结果</returns>
  3983. public static ServiceResultEntity GetFPM0202SData(SUserInfo user, FPM0202_SE se)
  3984. {
  3985. IDBConnection conn = null;
  3986. try
  3987. {
  3988. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  3989. // 改为权限控制 modify by fubin 2020-10-12 begin
  3990. // 'S_PM_024', '未交坯可否替换条码' add by chenxy 2019-05-07 begin
  3991. //string spm024 = conn.GetSqlResultToStr("select ss.SETTINGVALUE from tp_mst_systemsetting ss where ss.SETTINGCODE = 'S_PM_024' and ss.AccountID = " + user.AccountID);
  3992. //if (spm024 != "1")
  3993. //{
  3994. // spm024 = "0";
  3995. //}
  3996. // 'S_PM_024', '未交坯可否替换条码' add by chenxy 2019-05-07 end
  3997. object isExists = conn.GetSqlResultToObj(
  3998. @"SELECT 1
  3999. FROM tp_mst_userright t
  4000. WHERE (t.functioncode = '06020201' OR t.functioncode = '[ALL]')
  4001. AND t.userid = " + user.UserID);
  4002. // 改为权限控制 modify by fubin 2020-10-12 end
  4003. List<OracleParameter> parameters = new List<OracleParameter>();
  4004. StringBuilder sql = new StringBuilder(PMModuleLogic.GetFPM0202SSQL());
  4005. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  4006. //parameters.Add(new OracleParameter(":UPUserId", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  4007. if (se != null)
  4008. {
  4009. if (isExists == null)
  4010. {
  4011. sql.Append(" AND GDD.deliverflag = '1'");
  4012. }
  4013. // 成型线编码
  4014. if (!string.IsNullOrEmpty(se.GroutingLineCode))
  4015. {
  4016. sql.Append(" AND INSTR(GD.GroutingLineCode, :GroutingLineCode) > 0");
  4017. parameters.Add(new OracleParameter(":GroutingLineCode", OracleDbType.NVarchar2, se.GroutingLineCode, ParameterDirection.Input));
  4018. }
  4019. // 成型线名称
  4020. if (!string.IsNullOrEmpty(se.GroutingLineName))
  4021. {
  4022. sql.Append(" AND INSTR(GD.GroutingLineName, :GroutingLineName) > 0");
  4023. parameters.Add(new OracleParameter(":GroutingLineName", OracleDbType.NVarchar2, se.GroutingLineName, ParameterDirection.Input));
  4024. }
  4025. // 成型线类别
  4026. if (se.GMouldTypeID.HasValue)
  4027. {
  4028. sql.Append(" AND GD.GMouldTypeID = :GMouldTypeID");
  4029. parameters.Add(new OracleParameter(":GMouldTypeID", OracleDbType.Int32, se.GMouldTypeID.Value, ParameterDirection.Input));
  4030. }
  4031. // 注浆日期-开始
  4032. if (se.GroutingDateBegin.HasValue)
  4033. {
  4034. sql.Append(" AND GD.GroutingDate >= :GroutingDateBegin");
  4035. parameters.Add(new OracleParameter(":GroutingDateBegin", OracleDbType.Date, se.GroutingDateBegin.Value, ParameterDirection.Input));
  4036. }
  4037. // 注浆日期-结束
  4038. if (se.GroutingDateEnd.HasValue)
  4039. {
  4040. sql.Append(" AND GD.GroutingDate <= :GroutingDateEnd");
  4041. parameters.Add(new OracleParameter(":GroutingDateEnd", OracleDbType.Date, se.GroutingDateEnd.Value, ParameterDirection.Input));
  4042. }
  4043. // 注浆批次
  4044. if (se.GroutingBatchNo.HasValue)
  4045. {
  4046. sql.Append(" AND GD.GroutingBatchNo = :GroutingBatchNo");
  4047. parameters.Add(new OracleParameter(":GroutingBatchNo", OracleDbType.Int32, se.GroutingBatchNo, ParameterDirection.Input));
  4048. }
  4049. //PDA 注浆日期-开始与结束
  4050. if (!string.IsNullOrEmpty(se.GroutingDateBeginPDA))
  4051. {
  4052. sql.Append(" AND GD.GroutingDate >= TO_DATE(:GroutingDateBeginPDA, 'yyyy-mm-dd hh24:mi:ss')");
  4053. parameters.Add(new OracleParameter(":GroutingDateBeginPDA", OracleDbType.Varchar2, se.GroutingDateBeginPDA, ParameterDirection.Input));
  4054. }
  4055. if (!string.IsNullOrEmpty(se.GroutingDateEndPDA))
  4056. {
  4057. sql.Append(" AND GD.GroutingDate <= TO_DATE(:GroutingDateEndPDA, 'yyyy-mm-dd hh24:mi:ss')");
  4058. parameters.Add(new OracleParameter(":GroutingDateEndPDA", OracleDbType.Varchar2, se.GroutingDateEndPDA, ParameterDirection.Input));
  4059. }
  4060. // 注浆模具编号
  4061. if (!string.IsNullOrEmpty(se.GroutingMouldCode))
  4062. {
  4063. sql.Append(" AND INSTR(GDD.GroutingMouldCode, :GroutingMouldCode) > 0");
  4064. parameters.Add(new OracleParameter(":GroutingMouldCode", OracleDbType.NVarchar2, se.GroutingMouldCode, ParameterDirection.Input));
  4065. }
  4066. // 产品编号
  4067. if (!string.IsNullOrEmpty(se.GoodsCode))
  4068. {
  4069. sql.Append(" AND INSTR(GDD.GoodsCode, :GoodsCode) > 0");
  4070. parameters.Add(new OracleParameter(":GoodsCode", OracleDbType.NVarchar2, se.GoodsCode, ParameterDirection.Input));
  4071. }
  4072. // 产品名称
  4073. if (!string.IsNullOrEmpty(se.GoodsName))
  4074. {
  4075. sql.Append(" AND INSTR(GDD.GoodsName, :GoodsName) > 0");
  4076. parameters.Add(new OracleParameter(":GoodsName", OracleDbType.NVarchar2, se.GoodsName, ParameterDirection.Input));
  4077. }
  4078. // 备注
  4079. if (!string.IsNullOrEmpty(se.Remarks))
  4080. {
  4081. sql.Append(" AND INSTR(GDD.Remarks, :Remarks) > 0");
  4082. parameters.Add(new OracleParameter(":Remarks", OracleDbType.NVarchar2, se.Remarks, ParameterDirection.Input));
  4083. }
  4084. // 成型工号
  4085. if (!string.IsNullOrEmpty(se.GroutingUserCode))
  4086. {
  4087. // 成型工号不要模糊查询
  4088. //sql.Append(" AND INSTR(GDD.UserCode, :GroutingUserCode) > 0");
  4089. sql.Append(" AND GDD.UserCode = :GroutingUserCode");
  4090. parameters.Add(new OracleParameter(":GroutingUserCode", OracleDbType.NVarchar2, se.GroutingUserCode, ParameterDirection.Input));
  4091. }
  4092. // 条码
  4093. if (!string.IsNullOrEmpty(se.BarCode))
  4094. {
  4095. sql.Append(" AND INSTR(GDD.BarCode, :BarCode) > 0");
  4096. parameters.Add(new OracleParameter(":BarCode", OracleDbType.NVarchar2, se.BarCode, ParameterDirection.Input));
  4097. }
  4098. // 交坯时间-开始
  4099. if (se.DeliverMudDateBegin.HasValue)
  4100. {
  4101. sql.Append(" AND GDD.DeliverTime >= :DMCreateTimeBegin");
  4102. parameters.Add(new OracleParameter(":DMCreateTimeBegin", OracleDbType.Date, se.DeliverMudDateBegin.Value, ParameterDirection.Input));
  4103. }
  4104. // 交坯时间-结束
  4105. if (se.DeliverMudDateEnd.HasValue)
  4106. {
  4107. sql.Append(" AND GDD.DeliverTime < :DMCreateTimeEnd");
  4108. parameters.Add(new OracleParameter(":DMCreateTimeEnd", OracleDbType.Date, se.DeliverMudDateEnd.Value.AddDays(1), ParameterDirection.Input));
  4109. }
  4110. //PDA 交坯时间-开始与结束
  4111. if (!string.IsNullOrEmpty(se.DeliverMudDateBeginPDA))
  4112. {
  4113. sql.Append(" AND GDD.DeliverTime >= TO_DATE(:DeliverMudDateBeginPDA, 'yyyy-mm-dd hh24:mi:ss')");
  4114. parameters.Add(new OracleParameter(":DeliverMudDateBeginPDA", OracleDbType.Varchar2, se.DeliverMudDateBeginPDA, ParameterDirection.Input));
  4115. }
  4116. if (!string.IsNullOrEmpty(se.DeliverMudDateEndPDA))
  4117. {
  4118. sql.Append(" AND GDD.DeliverTime < TO_DATE(:DeliverMudDateEndPDA, 'yyyy-mm-dd hh24:mi:ss')");
  4119. parameters.Add(new OracleParameter(":DeliverMudDateEndPDA", OracleDbType.Varchar2, se.DeliverMudDateEndPDA, ParameterDirection.Input));
  4120. }
  4121. }
  4122. sql.Append(" GROUP BY GDD.GroutingLineCode, GDD.GroutingLineName, GDD.GroutingDate, GDD.GroutingBatchNo,GDD.DeliverTime, GDD.UserCode, " +
  4123. " GDD.GoodsCode, GDD.GoodsName, GDD.GroutingMouldCode, GMS.GMouldStatusName, GDD.GroutingCount, mu.username," +
  4124. " GDD.Remarks, GMT.GMouldTypeName, GDD.BarCode, P.ProcedureName, IP.ProcedureTime, GDD.IsPublicBody");
  4125. sql.Append(" ) ");
  4126. // 生产工号
  4127. if (se != null && !string.IsNullOrEmpty(se.WorkUserCode))
  4128. {
  4129. //sql.Append(" AND EXISTS (SELECT 1");
  4130. //sql.Append(" FROM TP_PM_PRODUCTIONDATA PPD");
  4131. //sql.Append(" WHERE PPD.AccountID = :AccountID");
  4132. //sql.Append(" AND PPD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'");
  4133. //sql.Append(" AND PPD.BarCode = GDD.BarCode");
  4134. //sql.Append(" AND INSTR(PPD.UserCode, :WorkUserCode) > 0");
  4135. //sql.Append(" )");
  4136. //sql.Append(" AND INSTR(PDW.UserCode, :WorkUserCode) > 0");
  4137. sql.Append(" WHERE INSTR(WorkUserCodes, :WorkUserCode) > 0");
  4138. parameters.Add(new OracleParameter(":WorkUserCode", OracleDbType.NVarchar2, se.WorkUserCode, ParameterDirection.Input));
  4139. }
  4140. //sql.Append(" ORDER BY GDD.GroutingDate, GDD.GroutingLineCode, GDD.GroutingMouldCode");
  4141. sql.Append(" ORDER BY GroutingDate, GroutingLineCode, GroutingBatchNo, GroutingMouldCode");
  4142. DataTable data = conn.GetSqlResultToDt(sql.ToString(), parameters.ToArray());
  4143. ServiceResultEntity sre = new ServiceResultEntity();
  4144. if (data == null || data.Rows.Count == 0)
  4145. {
  4146. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  4147. return sre;
  4148. }
  4149. sre.Data = new DataSet();
  4150. sre.Data.Tables.Add(data);
  4151. return sre;
  4152. }
  4153. catch (Exception ex)
  4154. {
  4155. throw ex;
  4156. }
  4157. finally
  4158. {
  4159. if (conn != null &&
  4160. conn.ConnState == ConnectionState.Open)
  4161. {
  4162. conn.Close();
  4163. }
  4164. }
  4165. }
  4166. /// <summary>
  4167. /// 获取查询sql
  4168. /// </summary>
  4169. /// <returns>sql</returns>
  4170. private static string GetFPM0202SSQL()
  4171. {
  4172. string selSql =
  4173. "SELECT GroutingLineCode, GroutingLineName, GroutingDate,GroutingBatchNo, UserCode, " +
  4174. " GoodsCode, GoodsName, GroutingMouldCode, GMouldStatusName," +
  4175. " GroutingCount, Remarks, GMouldTypeName, BarCode, ProcedureName, ProcedureTime," +
  4176. " IsPublicBody," +
  4177. " DMCreateTime,MONITORName," +
  4178. " WorkUserCodes,BarCodeRecord" +
  4179. " FROM (" +
  4180. //"SELECT GDD.GroutingDailyDetailID," +
  4181. //" GDD.GroutingDailyID," +
  4182. "SELECT " +
  4183. // 成型线编码
  4184. " GDD.GroutingLineCode," +
  4185. // 成型线名称
  4186. " GDD.GroutingLineName," +
  4187. // 注浆日期
  4188. " GDD.GroutingDate," +
  4189. // 注浆批次
  4190. " GDD.GroutingBatchNo," +
  4191. // 成型工号
  4192. " GDD.UserCode," +
  4193. // 产品编码
  4194. " GDD.GoodsCode," +
  4195. // 产品名称
  4196. " GDD.GoodsName," +
  4197. // 注浆线模具编码
  4198. " GDD.GroutingMouldCode," +
  4199. // 模具状态
  4200. " GMS.GMouldStatusName," +
  4201. // 注浆次数
  4202. " GDD.GroutingCount," +
  4203. // 备注
  4204. " GDD.Remarks," +
  4205. // 成型线类型
  4206. " GMT.GMouldTypeName," +
  4207. // 成型班长
  4208. " mu.username as MONITORName," +
  4209. // 绑定条码
  4210. " GDD.BarCode," +
  4211. // 当前工序名称
  4212. " P.ProcedureName," +
  4213. // 当前工序完成时间
  4214. " IP.ProcedureTime," +
  4215. // 公坯标识
  4216. " GDD.IsPublicBody," +
  4217. // 交坯时间
  4218. " GDD.DeliverTime AS DMCreateTime," +
  4219. //" GDD.deliverflag," +
  4220. // 生产工号
  4221. //" WMSYS.WM_CONCAT(DISTINCT TO_CHAR(PDW.UserCode)) AS WorkUserCodes," +
  4222. //" WMSYS.WM_CONCAT(DISTINCT TO_CHAR(BCR.BarCode)) AS BarCodeRecord" +
  4223. " listagg(to_char(PDW.UserCode), ',') within GROUP(ORDER BY PDW.ProductionDataID) AS WorkUserCodes," +
  4224. " listagg(to_char(BCR.BarCode), ',') within GROUP(ORDER BY BCR.CREATETIME) AS BarCodeRecord" +
  4225. // 注浆日报
  4226. " FROM TP_PM_GroutingDaily GD" +
  4227. // 注浆日报明细表
  4228. " INNER JOIN TP_PM_GroutingDailyDetail GDD" +
  4229. " ON GD.GroutingDailyID = GDD.GroutingDailyID" +
  4230. // 成型线类型
  4231. " INNER JOIN TP_MST_GMouldType GMT" +
  4232. " ON GD.GMouldTypeID = GMT.GMouldTypeID" +
  4233. // 模具状态
  4234. " INNER JOIN TP_SYS_GMouldStatus GMS" +
  4235. " ON GMS.GMouldStatusID = GDD.GMouldStatus" +
  4236. // 成型线
  4237. " LEFT JOIN tp_pc_groutingline gl" +
  4238. " ON gl.groutinglineid = GDD.GroutingLineID" +
  4239. // 成型班长
  4240. " LEFT JOIN tp_mst_user mu" +
  4241. " ON mu.userid = gl.MONITORID" +
  4242. // 历史条码
  4243. " LEFT JOIN TP_PM_BarCodeRecord BCR" +
  4244. " ON BCR.FinalBarCode = GDD.BarCode" +
  4245. // 当前工序
  4246. " LEFT JOIN TP_PM_InProduction IP" +
  4247. " ON IP.BarCode = GDD.BarCode" +
  4248. // 当前工序名
  4249. " LEFT JOIN TP_PC_Procedure P" +
  4250. " ON P.ProcedureID = IP.ProcedureID" +
  4251. // 生产工号
  4252. " LEFT JOIN TP_PM_ProductionData PDW" +
  4253. " ON PDW.BarCode = GDD.BarCode" +
  4254. " AND PDW.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  4255. // 账套
  4256. " WHERE GD.AccountID = :AccountID" +
  4257. " AND GD.ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'" +
  4258. " AND LENGTH(GDD.BarCode) > 0";
  4259. //// 成型线操作权限
  4260. //" AND EXISTS (SELECT UP.PurviewID" +
  4261. //" FROM TP_MST_UserPurview UP" +
  4262. //" WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateGroutingLine + "'" +
  4263. //" AND (UP.PurviewID = -1 OR UP.PurviewID = GD.GroutingLineID)" +
  4264. //" AND UP.UserId = :UPUserId)";
  4265. return selSql;
  4266. }
  4267. /// <summary>
  4268. /// 更换条码
  4269. /// </summary>
  4270. /// <param name="user">登录用户信息</param>
  4271. /// <param name="barcode">原条码</param>
  4272. /// <param name="newBarcode">新条码</param>
  4273. /// <param name="remarks">备注</param>
  4274. /// <returns>操作结果</returns>
  4275. public static ServiceResultEntity SetFPM0201Data(SUserInfo user, string barcode, string newBarcode, string remarks, string groutingUserCode, string goodsCode)
  4276. {
  4277. IDBTransaction tran = null;
  4278. try
  4279. {
  4280. ServiceResultEntity sre = new ServiceResultEntity();
  4281. if (string.IsNullOrWhiteSpace(barcode) ||
  4282. string.IsNullOrWhiteSpace(newBarcode) ||
  4283. barcode == newBarcode)
  4284. {
  4285. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  4286. return sre;
  4287. }
  4288. tran = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  4289. #region 校验条码
  4290. /*
  4291. //string message = null;
  4292. //bool check = PMModuleLogic.CheckBarcode2(tran, user, barcode, newBarcode, out message);
  4293. //if (!check)
  4294. //{
  4295. // sre.Status = Constant.ServiceResultStatus.Other;
  4296. // sre.Message = message;
  4297. // return sre;
  4298. //}
  4299. // todo 条码状态表
  4300. string checkBarcodeSql =
  4301. "SELECT UBC.BarCode FROM TP_PM_UsedBarCode UBC " +
  4302. " WHERE UBC.BarCode = :BarCode";
  4303. OracleParameter[] checkBarcodeParas = new OracleParameter[]
  4304. {
  4305. new OracleParameter(":BarCode", OracleDbType.NVarchar2, barcode, ParameterDirection.Input),
  4306. };
  4307. object objBarCode = tran.GetSqlResultToObj(checkBarcodeSql, checkBarcodeParas);
  4308. if (objBarCode == null || objBarCode.ToString().Length == 0)
  4309. {
  4310. sre.Status = Constant.ServiceResultStatus.Other;
  4311. sre.OtherStatus = 1;
  4312. sre.Message = string.Format("原条码({0})不存在", barcode);
  4313. return sre;
  4314. }
  4315. OracleParameter[] checkBarcodeParas1 = new OracleParameter[]
  4316. {
  4317. new OracleParameter(":BarCode", OracleDbType.NVarchar2, newBarcode, ParameterDirection.Input),
  4318. };
  4319. objBarCode = tran.GetSqlResultToObj(checkBarcodeSql, checkBarcodeParas1);
  4320. if (objBarCode != null && objBarCode.ToString().Length > 0)
  4321. {
  4322. sre.Status = Constant.ServiceResultStatus.Other;
  4323. sre.OtherStatus = 2;
  4324. sre.Message = string.Format("新条码({0})已被使用", newBarcode);
  4325. return sre;
  4326. }
  4327. */
  4328. #endregion 校验条码
  4329. OracleParameter[] paras = new OracleParameter[]
  4330. {
  4331. new OracleParameter("in_BarCode", OracleDbType.NVarchar2, barcode, ParameterDirection.Input),
  4332. new OracleParameter("in_NewBarCode", OracleDbType.NVarchar2, newBarcode, ParameterDirection.Input),
  4333. new OracleParameter("in_Remarks", OracleDbType.NVarchar2, remarks, ParameterDirection.Input),
  4334. new OracleParameter("in_AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input),
  4335. new OracleParameter("in_CreateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input),
  4336. new OracleParameter("out_Result", OracleDbType.Varchar2, 10, null, ParameterDirection.Output),
  4337. new OracleParameter("out_Barcode", OracleDbType.NVarchar2, 50, null, ParameterDirection.Output),
  4338. new OracleParameter("in_GroutingUserCode", OracleDbType.Varchar2, groutingUserCode, ParameterDirection.Input),
  4339. new OracleParameter("in_GoodsCode", OracleDbType.Varchar2, goodsCode, ParameterDirection.Input),
  4340. };
  4341. DataSet ds = tran.ExecStoredProcedure("PRO_PM_ReplacedBarCode", paras);
  4342. //-- 1.1 原条码不存在
  4343. //-- 1.2 原条码属于其他账套
  4344. //-- 1.3 原条码已被替换
  4345. //-- 1.4 产品已登窑
  4346. //-- 1.5 产品已包装
  4347. //-- 1.6 产品已成型报损
  4348. //-- 1.7 未交坯不可替换
  4349. //-- 2.1 新条码属于其他账套
  4350. //-- 2.2 新条码已被使用
  4351. //-- 2.3 新条码已被替换
  4352. //-- 3.1 条码对应成型工号不正确
  4353. //-- 3.2 替换工号没有操作成型线权限
  4354. //-- 3.3 无注浆信息
  4355. //-- 3.4 产品编码与条码不一致
  4356. //-- 3.5 产品不是在产产品
  4357. string out_Result = paras[5].Value.ToString();
  4358. if (out_Result != "0")
  4359. {
  4360. sre.Status = Constant.ServiceResultStatus.Other;
  4361. switch (out_Result)
  4362. {
  4363. case "1.1":
  4364. sre.OtherStatus = 1;
  4365. sre.Message = "原产品条码不存在";
  4366. break;
  4367. case "1.2":
  4368. sre.OtherStatus = 2;
  4369. sre.Message = "原产品条码属于其他账套";
  4370. break;
  4371. case "1.3":
  4372. sre.OtherStatus = 3;
  4373. sre.Message = "原产品条码已被替换为(" + paras[6].Value.ToString() + ")";
  4374. break;
  4375. case "1.4":
  4376. sre.OtherStatus = 7;
  4377. sre.Message = "产品已经过工序(" + paras[6].Value.ToString() + ")";
  4378. break;
  4379. case "1.5":
  4380. sre.OtherStatus = 13;
  4381. sre.Message = "产品已完成生产流程,不能替换";
  4382. break;
  4383. case "1.6":
  4384. sre.OtherStatus = 14;
  4385. sre.Message = "产品已成型报损,不能替换";
  4386. break;
  4387. case "1.7":
  4388. sre.OtherStatus = 15;
  4389. sre.Message = "产品未交坯,不能替换";
  4390. break;
  4391. case "2.1":
  4392. sre.OtherStatus = 4;
  4393. sre.Message = "新产品条码属于其他账套";
  4394. break;
  4395. case "2.2":
  4396. sre.OtherStatus = 5;
  4397. sre.Message = "新产品条码已被使用";
  4398. break;
  4399. case "2.3":
  4400. sre.OtherStatus = 6;
  4401. sre.Message = "新产品条码已被替换为(" + paras[6].Value.ToString() + ")";
  4402. break;
  4403. case "3.1":
  4404. sre.OtherStatus = 8;
  4405. sre.Message = "条码对应成型工号不正确";
  4406. break;
  4407. case "3.2":
  4408. sre.OtherStatus = 9;
  4409. sre.Message = "替换工号没有操作成型线权限";
  4410. break;
  4411. case "3.3":
  4412. sre.OtherStatus = 10;
  4413. sre.Message = "无注浆信息";
  4414. break;
  4415. case "3.4":
  4416. sre.OtherStatus = 11;
  4417. sre.Message = "产品编码与条码不一致";
  4418. break;
  4419. case "3.5":
  4420. sre.OtherStatus = 12;
  4421. sre.Message = "产品不是在产产品";
  4422. break;
  4423. default:
  4424. break;
  4425. }
  4426. }
  4427. tran.Commit();
  4428. return sre;
  4429. }
  4430. catch (Exception ex)
  4431. {
  4432. if (tran != null &&
  4433. tran.ConnState == ConnectionState.Open)
  4434. {
  4435. tran.Rollback();
  4436. }
  4437. throw ex;
  4438. }
  4439. finally
  4440. {
  4441. if (tran != null &&
  4442. tran.ConnState == ConnectionState.Open)
  4443. {
  4444. tran.Disconnect();
  4445. }
  4446. }
  4447. }
  4448. /// <summary>
  4449. /// 取得FPM0203画面(条码变更)的查询数据
  4450. /// </summary>
  4451. /// <param name="user">登录用户信息</param>
  4452. /// <param name="se">查询条件</param>
  4453. /// <returns>查询结果</returns>
  4454. public static ServiceResultEntity GetFPM0203SData(SUserInfo user, FPM0203_SE se)
  4455. {
  4456. IDBConnection conn = null;
  4457. try
  4458. {
  4459. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  4460. List<OracleParameter> parameters = new List<OracleParameter>();
  4461. StringBuilder sql = new StringBuilder(PMModuleLogic.GetFPM0203SSQL());
  4462. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  4463. parameters.Add(new OracleParameter(":CreateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  4464. if (se != null)
  4465. {
  4466. // 变更日期-开始
  4467. if (se.DateBegin.HasValue)
  4468. {
  4469. sql.Append(" AND BCR.CreateTime >= :DateBegin");
  4470. parameters.Add(new OracleParameter(":DateBegin", OracleDbType.Date, se.DateBegin.Value, ParameterDirection.Input));
  4471. }
  4472. // 变更日期-结束
  4473. if (se.DateEnd.HasValue)
  4474. {
  4475. sql.Append(" AND BCR.CreateTime <= :DateEnd");
  4476. parameters.Add(new OracleParameter(":DateEnd", OracleDbType.Date, se.DateEnd.Value.AddDays(1), ParameterDirection.Input));
  4477. }
  4478. // 成型线编码
  4479. if (!string.IsNullOrEmpty(se.GroutingLineCode))
  4480. {
  4481. sql.Append(" AND INSTR(GD.GroutingLineCode, :GroutingLineCode) > 0");
  4482. parameters.Add(new OracleParameter(":GroutingLineCode", OracleDbType.NVarchar2, se.GroutingLineCode, ParameterDirection.Input));
  4483. }
  4484. // 成型线名称
  4485. if (!string.IsNullOrEmpty(se.GroutingLineName))
  4486. {
  4487. sql.Append(" AND INSTR(GD.GroutingLineName, :GroutingLineName) > 0");
  4488. parameters.Add(new OracleParameter(":GroutingLineName", OracleDbType.NVarchar2, se.GroutingLineName, ParameterDirection.Input));
  4489. }
  4490. // 成型线类别
  4491. if (se.GMouldTypeID.HasValue)
  4492. {
  4493. sql.Append(" AND GD.GMouldTypeID = :GMouldTypeID");
  4494. parameters.Add(new OracleParameter(":GMouldTypeID", OracleDbType.Int32, se.GMouldTypeID.Value, ParameterDirection.Input));
  4495. }
  4496. // 注浆日期-开始
  4497. if (se.GroutingDateBegin.HasValue)
  4498. {
  4499. sql.Append(" AND GD.GroutingDate >= :GroutingDateBegin");
  4500. parameters.Add(new OracleParameter(":GroutingDateBegin", OracleDbType.Date, se.GroutingDateBegin.Value, ParameterDirection.Input));
  4501. }
  4502. // 注浆日期-结束
  4503. if (se.GroutingDateEnd.HasValue)
  4504. {
  4505. sql.Append(" AND GD.GroutingDate <= :GroutingDateEnd");
  4506. parameters.Add(new OracleParameter(":GroutingDateEnd", OracleDbType.Date, se.GroutingDateEnd.Value, ParameterDirection.Input));
  4507. }
  4508. // 注浆批次
  4509. if (se.GroutingBatchNo.HasValue)
  4510. {
  4511. sql.Append(" AND GD.GroutingBatchNo = :GroutingBatchNo");
  4512. parameters.Add(new OracleParameter(":GroutingBatchNo", OracleDbType.Int32, se.GroutingBatchNo, ParameterDirection.Input));
  4513. }
  4514. // 注浆模具编号
  4515. if (!string.IsNullOrEmpty(se.GroutingMouldCode))
  4516. {
  4517. sql.Append(" AND INSTR(GDD.GroutingMouldCode, :GroutingMouldCode) > 0");
  4518. parameters.Add(new OracleParameter(":GroutingMouldCode", OracleDbType.NVarchar2, se.GroutingMouldCode, ParameterDirection.Input));
  4519. }
  4520. // 产品编号
  4521. if (!string.IsNullOrEmpty(se.GoodsCode))
  4522. {
  4523. sql.Append(" AND INSTR(GDD.GoodsCode, :GoodsCode) > 0");
  4524. parameters.Add(new OracleParameter(":GoodsCode", OracleDbType.NVarchar2, se.GoodsCode, ParameterDirection.Input));
  4525. }
  4526. // 产品名称
  4527. if (!string.IsNullOrEmpty(se.GoodsName))
  4528. {
  4529. sql.Append(" AND INSTR(GDD.GoodsName, :GoodsName) > 0");
  4530. parameters.Add(new OracleParameter(":GoodsName", OracleDbType.NVarchar2, se.GoodsName, ParameterDirection.Input));
  4531. }
  4532. // 备注
  4533. if (!string.IsNullOrEmpty(se.Remarks))
  4534. {
  4535. sql.Append(" AND INSTR(BCR.Remarks, :Remarks) > 0");
  4536. parameters.Add(new OracleParameter(":Remarks", OracleDbType.NVarchar2, se.Remarks, ParameterDirection.Input));
  4537. }
  4538. // 成型工号
  4539. if (!string.IsNullOrEmpty(se.GroutingUserCode))
  4540. {
  4541. // 成型工号不要模糊查询
  4542. sql.Append(" AND INSTR(GDD.UserCode, :GroutingUserCode) > 0");
  4543. parameters.Add(new OracleParameter(":GroutingUserCode", OracleDbType.NVarchar2, se.GroutingUserCode, ParameterDirection.Input));
  4544. }
  4545. }
  4546. sql.Append(" ORDER BY BCR.CreateTime, BCR.BarCode");
  4547. DataTable data = conn.GetSqlResultToDt(sql.ToString(), parameters.ToArray());
  4548. ServiceResultEntity sre = new ServiceResultEntity();
  4549. if (data == null || data.Rows.Count == 0)
  4550. {
  4551. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  4552. return sre;
  4553. }
  4554. sre.Data = new DataSet();
  4555. sre.Data.Tables.Add(data);
  4556. return sre;
  4557. }
  4558. catch (Exception ex)
  4559. {
  4560. throw ex;
  4561. }
  4562. finally
  4563. {
  4564. if (conn != null &&
  4565. conn.ConnState == ConnectionState.Open)
  4566. {
  4567. conn.Close();
  4568. }
  4569. }
  4570. }
  4571. /// <summary>
  4572. /// 取得FPM0203画面(条码变更)的查询数据
  4573. /// </summary>
  4574. /// <param name="user">登录用户信息</param>
  4575. /// <param name="barcode">条码</param>
  4576. /// <returns>查询结果</returns>
  4577. public static ServiceResultEntity GetFPM0203SData(SUserInfo user, string barcode)
  4578. {
  4579. IDBConnection conn = null;
  4580. try
  4581. {
  4582. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  4583. List<OracleParameter> parameters = new List<OracleParameter>();
  4584. StringBuilder sql = new StringBuilder(PMModuleLogic.GetFPM0203SSQL());
  4585. parameters.Add(new OracleParameter(":AccountID", OracleDbType.Int32, user.AccountID, ParameterDirection.Input));
  4586. parameters.Add(new OracleParameter(":CreateUserID", OracleDbType.Int32, user.UserID, ParameterDirection.Input));
  4587. //if (!string.IsNullOrWhiteSpace(barcode))
  4588. {
  4589. sql.Append(" AND BCR.BarCode = :BarCode");
  4590. parameters.Add(new OracleParameter(":BarCode", OracleDbType.Varchar2, barcode, ParameterDirection.Input));
  4591. }
  4592. sql.Append(" ORDER BY BCR.CreateTime, BCR.BarCode");
  4593. DataTable data = conn.GetSqlResultToDt(sql.ToString(), parameters.ToArray());
  4594. ServiceResultEntity sre = new ServiceResultEntity();
  4595. if (data == null || data.Rows.Count == 0)
  4596. {
  4597. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  4598. return sre;
  4599. }
  4600. sre.Data = new DataSet();
  4601. sre.Data.Tables.Add(data);
  4602. return sre;
  4603. }
  4604. catch (Exception ex)
  4605. {
  4606. throw ex;
  4607. }
  4608. finally
  4609. {
  4610. if (conn != null &&
  4611. conn.ConnState == ConnectionState.Open)
  4612. {
  4613. conn.Close();
  4614. }
  4615. }
  4616. }
  4617. /// <summary>
  4618. /// 获取查询sql
  4619. /// </summary>
  4620. /// <returns>sql</returns>
  4621. private static string GetFPM0203SSQL()
  4622. {
  4623. string selSql =
  4624. "SELECT BCR.BarCode," +
  4625. " BCR.NewBarCode," +
  4626. // 创建时间
  4627. " BCR.CreateTime," +
  4628. // 创建工号
  4629. " U.UserName AS CreateUser," +
  4630. // 备注
  4631. " BCR.Remarks," +
  4632. // 工序
  4633. " P.ProcedureCode," +
  4634. " P.ProcedureName," +
  4635. // 成型线编码
  4636. " GDD.GroutingLineCode," +
  4637. // 成型线名称
  4638. " GDD.GroutingLineName," +
  4639. // 注浆日期
  4640. " GDD.GroutingDate," +
  4641. // 注浆批次
  4642. " GDD.GroutingBatchNo," +
  4643. // 成型工号
  4644. " GDD.UserCode," +
  4645. // 产品编码
  4646. " GDD.GoodsCode," +
  4647. // 产品名称
  4648. " GDD.GoodsName," +
  4649. // 注浆线模具编码
  4650. " GDD.GroutingMouldCode," +
  4651. // 模具状态
  4652. " GMS.GMouldStatusName," +
  4653. // 注浆次数
  4654. " GDD.GroutingCount," +
  4655. // 成型班长
  4656. " mu.username as MONITORName," +
  4657. // 成型线类型
  4658. " GMT.GMouldTypeName " +
  4659. " FROM TP_PM_BarCodeRecord BCR" +
  4660. " INNER JOIN TP_PM_GroutingDailyDetail GDD" +
  4661. " ON GDD.BarCode = BCR.FinalBarCode" +
  4662. " INNER JOIN TP_PM_GroutingDaily GD" +
  4663. " ON GD.GroutingDailyID = GDD.GroutingDailyID" +
  4664. " INNER JOIN TP_MST_User U" +
  4665. " ON U.UserID = BCR.CreateUserID" +
  4666. // 成型线类型
  4667. " INNER JOIN TP_MST_GMouldType GMT" +
  4668. " ON GD.GMouldTypeID = GMT.GMouldTypeID" +
  4669. // 模具状态
  4670. " INNER JOIN TP_SYS_GMouldStatus GMS" +
  4671. " ON GMS.GMouldStatusID = GDD.GMouldStatus" +
  4672. // 成型线
  4673. " LEFT JOIN tp_pc_groutingline gl" +
  4674. " ON gl.groutinglineid = GDD.GroutingLineID" +
  4675. // 成型班长
  4676. " LEFT JOIN tp_mst_user mu" +
  4677. " ON mu.userid = gl.MONITORID" +
  4678. // 工序
  4679. " LEFT JOIN TP_PC_Procedure P" +
  4680. " ON P.ProcedureID = BCR.ProcedureID" +
  4681. // 账套
  4682. " WHERE BCR.AccountID = :AccountID" +
  4683. " AND (BCR.CreateUserID = :CreateUserID OR " +
  4684. " EXISTS (SELECT UP.PurviewID" +
  4685. " FROM TP_MST_UserPurview UP" +
  4686. " WHERE UP.PurviewType = '" + (int)Constant.PurviewType.OperateUser + "'" +
  4687. " AND (UP.PurviewID = -1 OR UP.PurviewID = BCR.CreateUserID)" +
  4688. " AND UP.UserId = :CreateUserID))";
  4689. return selSql;
  4690. }
  4691. #endregion 条码变更
  4692. #region 开模报损
  4693. /// <summary>
  4694. /// 保存开模报损信息
  4695. /// </summary>
  4696. /// <param name="user"></param>
  4697. /// <param name="groutingInfo"></param>
  4698. /// <returns></returns>
  4699. public static ServiceResultEntity SaveScrapKm(ClientRequestEntity cre, SUserInfo userInfo)
  4700. {
  4701. IDBTransaction tran = null;
  4702. string sqlString = string.Empty;
  4703. DataSet groutingInfo = cre.Data;
  4704. try
  4705. {
  4706. ServiceResultEntity sre = new ServiceResultEntity();
  4707. if (groutingInfo == null ||
  4708. groutingInfo.Tables.Count < 2 ||
  4709. groutingInfo.Tables[0].Rows.Count < 1 ||
  4710. groutingInfo.Tables[1].Rows.Count < 1)
  4711. {
  4712. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  4713. return sre;
  4714. }
  4715. tran = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  4716. int executeResult = 0;
  4717. #region 校验时间戳
  4718. // 校验时间戳
  4719. DataRow gdDataRow = groutingInfo.Tables[0].Rows[0];
  4720. sqlString =
  4721. "SELECT GroutingDailyID" +
  4722. " FROM TP_PM_GroutingDaily" +
  4723. " WHERE GroutingDailyID = :GroutingDailyID" +
  4724. " AND OPTimeStamp = :OPTimeStamp" +
  4725. " AND ValueFlag = '" + (int)Constant.ValueFlag.Effective + "'";
  4726. OracleParameter[] checkParas = new OracleParameter[]
  4727. {
  4728. new OracleParameter(":GroutingDailyID", OracleDbType.Int32, gdDataRow["GroutingDailyID"], ParameterDirection.Input),
  4729. new OracleParameter(":OPTimeStamp", OracleDbType.TimeStamp, gdDataRow["OPTimeStamp"], ParameterDirection.Input),
  4730. };
  4731. object checkResult = tran.GetSqlResultToObj(sqlString, checkParas);
  4732. if (checkResult == null)
  4733. {
  4734. sre.Status = Constant.ServiceResultStatus.DataChanged;
  4735. return sre;
  4736. }
  4737. #endregion 校验时间戳
  4738. #region 更新注浆日报明细表
  4739. string errorMsg = string.Empty;
  4740. foreach (DataRow detailDataRow in groutingInfo.Tables[1].Rows)
  4741. {
  4742. if (detailDataRow.RowState != DataRowState.Modified)
  4743. {
  4744. continue;
  4745. }
  4746. #region 1、判断是否符合报损条件(未注浆,交坯之后不允许报损,是否进行过了报损)
  4747. sqlString = "SELECT GroutingFlag,DeliverFlag,ScrapFlag,GroutingMouldCode\n" +
  4748. " FROM TP_PM_GroutingDailyDetail \n" +
  4749. " WHERE AccountID = :AccountID\n" +
  4750. " AND GroutingDailyDetailID = :GroutingDailyDetailID\n";
  4751. OracleParameter[] paras = new OracleParameter[] {
  4752. new OracleParameter(":AccountID",OracleDbType.Int32, userInfo.AccountID, ParameterDirection.Input),
  4753. new OracleParameter(":GroutingDailyDetailID",OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  4754. };
  4755. DataTable returnTable = tran.GetSqlResultToDt(sqlString, paras);
  4756. // 编码不存在
  4757. if (returnTable.Rows.Count == 0)
  4758. {
  4759. sre.Status = Constant.ServiceResultStatus.Other;
  4760. sre.Result = -99;
  4761. return sre;
  4762. }
  4763. // 未注浆
  4764. if ("0".Equals(returnTable.Rows[0]["GroutingFlag"]))
  4765. {
  4766. sre.Result = -100;
  4767. errorMsg += "模具:" + returnTable.Rows[0]["GroutingMouldCode"] + "未注浆";
  4768. continue;
  4769. }
  4770. // 已经交坯
  4771. if ("1".Equals(returnTable.Rows[0]["DeliverFlag"]))
  4772. {
  4773. sre.Result = -101;
  4774. errorMsg += "模具:" + returnTable.Rows[0]["GroutingMouldCode"] + "已经交坯";
  4775. continue;
  4776. }
  4777. #endregion
  4778. sqlString = "UPDATE TP_PM_GroutingDailyDetail" +
  4779. " SET ScrapFlag = :ScrapFlag, " +
  4780. " ScrapTime = case when :ScrapFlag= '1' and ScrapFlag = '0' then sysdate when :ScrapFlag= '0' then null else ScrapTime end, " +
  4781. " ScrapUser = case when :ScrapFlag= '1' and ScrapFlag = '0' then :UpdateUserID when :ScrapFlag= '0' then null else ScrapUser end, " +
  4782. " ScrapType = :ScrapType, " +
  4783. " SReasonID = :SReasonID, " +
  4784. " Remarks = :Remarks," +
  4785. " UpdateUserID = :UpdateUserID" +
  4786. " WHERE GroutingDailyDetailID = :GroutingDailyDetailID";
  4787. OracleParameter[] oracleParameters = new OracleParameter[]
  4788. {
  4789. new OracleParameter(":ScrapFlag", OracleDbType.Char, detailDataRow["ScrapFlag"], ParameterDirection.Input),
  4790. new OracleParameter(":ScrapType", OracleDbType.Char, "0", ParameterDirection.Input), // 开模报损
  4791. new OracleParameter(":SReasonID", OracleDbType.Int32, detailDataRow["SReasonID"], ParameterDirection.Input),
  4792. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32, detailDataRow["GroutingDailyDetailID"], ParameterDirection.Input),
  4793. new OracleParameter(":Remarks", OracleDbType.NVarchar2, detailDataRow["Remarks"], ParameterDirection.Input),
  4794. new OracleParameter(":UpdateUserID", OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  4795. };
  4796. executeResult = tran.ExecuteNonQuery(sqlString, oracleParameters);
  4797. if (executeResult <= 0)
  4798. {
  4799. sre.Status = Constant.ServiceResultStatus.NoModifyData;
  4800. return sre;
  4801. }
  4802. }
  4803. #endregion 更新注浆日报明细表
  4804. if (!string.IsNullOrWhiteSpace(errorMsg))
  4805. {
  4806. sre.Message = errorMsg;
  4807. }
  4808. tran.Commit();
  4809. return sre;
  4810. }
  4811. catch (Exception ex)
  4812. {
  4813. if (tran != null &&
  4814. tran.ConnState == ConnectionState.Open)
  4815. {
  4816. tran.Rollback();
  4817. }
  4818. throw ex;
  4819. }
  4820. finally
  4821. {
  4822. if (tran != null &&
  4823. tran.ConnState == ConnectionState.Open)
  4824. {
  4825. tran.Disconnect();
  4826. }
  4827. }
  4828. }
  4829. #endregion
  4830. #endregion 条码管理
  4831. #region 生产数据查询
  4832. #region 生产数据查询(干补)
  4833. /// <summary>
  4834. /// 取得FPM0202画面(条码变更用条码查询)的查询数据
  4835. /// </summary>
  4836. /// <param name="user">登录用户信息</param>
  4837. /// <param name="se">查询条件</param>
  4838. /// <returns>查询结果</returns>
  4839. public static ServiceResultEntity GetProductionData8(SUserInfo user, ClientRequestEntity cre)
  4840. {
  4841. IDBConnection conn = null;
  4842. try
  4843. {
  4844. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  4845. conn.Open();
  4846. //SearchProductionDataEntity searchEntity = cre.Request as SearchProductionDataEntity;
  4847. //if (searchEntity == null)
  4848. //{
  4849. // return null;
  4850. //}
  4851. string sqlString = "SELECT pd.CreateTime\n" +
  4852. " ,pd.UpdateTime\n" +
  4853. " ,pd.ProductionDataID\n" +
  4854. " ,pd.ProductionLineCode\n" +
  4855. " ,pd.BarCode\n" +
  4856. " ,pd.GoodsCode\n" +
  4857. " ,pd.GoodsName\n" +
  4858. " ,pd.UserCode\n" +
  4859. " ,pd.IsPublicBody\n" +
  4860. " ,decode(pd.ProcedureModel, '1', '计数模型', '检验模型') AS ProcedureModel\n" +
  4861. " ,pmt.ProcedureModelTypeName\n" +
  4862. //" ,decode(pd.PieceType, '1', '不计件', '同工种策略') AS PieceType\n" +
  4863. //" ,pd.IsReworked\n" +
  4864. //" ,gl.GoodsLevelName AS GoodsGrade\n" +
  4865. " ,org.OrganizationName\n" +
  4866. //" ,pd.Remarks\n" +
  4867. //" ,pd.KilnID\n" +
  4868. //" ,pd.KilnCode\n" +
  4869. //" ,pd.KilnName\n" +
  4870. //" ,pd.KilnCarID\n" +
  4871. //" ,pd.KilnCarCode\n" +
  4872. //" ,pd.KilnCarName\n" +
  4873. //" ,pd.KilnCarPosition\n" +
  4874. //" ,dd.DictionaryValue KilnCarPositionName\n" +
  4875. " ,gt.GoodsTypeName\n" +
  4876. " ,u.usercode AS barusercode\n" +
  4877. " ,pd.GroutingUserCode\n" +
  4878. " ,pd.GroutingMouldCode\n" +
  4879. " ,pd.GroutingDate\n" +
  4880. " ,pd.GroutingNum\n" +
  4881. " ,u.username AS barusername\n" +
  4882. //" ,decode(pd.Goodsleveltypeid,\n" +
  4883. //" '4',\n" +
  4884. //" '正品',\n" +
  4885. //" '5',\n" +
  4886. //" '副品',\n" +
  4887. //" '6',\n" +
  4888. //" '重烧',\n" +
  4889. //" '7',\n" +
  4890. //" '次品',\n" +
  4891. //" '') AS Goodsleveltype\n" +
  4892. " ,REPLACE((l.Logoname || '[' || l.Logocode || ']'), '[]', '') AS LogoCodeName\n" +
  4893. " ,pd.SpecialRepairFlag\n" +
  4894. " ,pcp.procedurename inprocedurename\n" +
  4895. " ,(SELECT pp.procedurename\n" +
  4896. " FROM tp_pc_procedure pp\n" +
  4897. " WHERE pp.procedureid =\n" +
  4898. " fun_rpt_getprevprocedureidall(pd.productiondataid, pd.barcode)) procedurename\n" +
  4899. " FROM TP_PM_ProductionData pd\n" +
  4900. " LEFT JOIN tp_pm_inproduction inp\n" +
  4901. " ON inp.barcode = pd.barcode\n" +
  4902. " LEFT JOIN tp_pc_procedure pcp\n" +
  4903. " ON pcp.procedureid = inp.procedureid\n" +
  4904. " LEFT JOIN TP_SYS_ProcedureModelType pmt\n" +
  4905. " ON pd.ModelType = pmt.PROCEDUREMODELTYPEID\n" +
  4906. " LEFT JOIN TP_MST_ORGANIZATION org\n" +
  4907. " ON pd.OrganizationID = org.OrganizationID\n" +
  4908. //" LEFT JOIN TP_MST_DataDictionary dd\n" +
  4909. //" ON pd.KilnCarPosition = dd.DictionaryID\n" +
  4910. //" LEFT JOIN TP_MST_GoodsLevel gl\n" +
  4911. //" ON pd.Goodslevelid = gl.Goodslevelid\n" +
  4912. " LEFT JOIN TP_MST_Goods g\n" +
  4913. " ON pd.GoodsID = g.GoodsID\n" +
  4914. " LEFT JOIN TP_MST_GoodsType gt\n" +
  4915. " ON g.GoodsTypeID = gt.GoodsTypeID\n" +
  4916. " LEFT JOIN TP_MST_USER u\n" +
  4917. " ON pd.Createuserid = u.userid\n" +
  4918. " LEFT JOIN TP_MST_Logo l\n" +
  4919. " ON pd.logoid = l.logoid\n" +
  4920. " WHERE pd.accountID = :accountID and pd.ValueFlag = '1'\n" +
  4921. " AND pd.ProcedureID = :procedureID\n" +
  4922. " AND (:barCode IS NULL OR :barCode IS NULL OR\n" +
  4923. " instr(pd.BarCode, :barCode) > 0)\n" +
  4924. " AND (:goodsCode IS NULL OR :goodsCode IS NULL OR\n" +
  4925. " instr(pd.goodsCode, :goodsCode) > 0)\n" +
  4926. " AND (:goodsName IS NULL OR :goodsName IS NULL OR\n" +
  4927. " instr(pd.goodsName, :goodsName) > 0)\n" +
  4928. " AND (:userCode IS NULL OR :userCode IS NULL OR\n" +
  4929. " instr(pd.userCode, :userCode) > 0)\n" +
  4930. " AND (:organizationID = 0 OR :organizationID IS NULL OR\n" +
  4931. " pd.organizationID = :organizationID)\n" +
  4932. " AND (pd.CreateTime >= :begindate AND pd.CreateTime < :enddate)\n" +
  4933. //" AND (:isReworked IS NULL OR :isReworked IS NULL OR\n" +
  4934. //" (instr(:isReworked, pd.isReworked) > 0))\n" +
  4935. //" AND (:pKilnCode IS NULL OR :pKilnCode IS NULL OR\n" +
  4936. //" pd.KilnCode = :pKilnCode)\n" +
  4937. //" AND (:pKilnCarCode IS NULL OR :pKilnCarCode IS NULL OR\n" +
  4938. //" instr(pd.KilnCarCode, :KilnCarCode) > 0)\n" +
  4939. //" AND (:pKilnCarPosition IS NULL OR :pKilnCarPosition IS NULL OR\n" +
  4940. //" pd.KilnCarPosition = :pKilnCarPosition)\n" +
  4941. " AND (pd.CreateUserID = :currentUserID OR EXISTS\n" +
  4942. " (SELECT 1\n" +
  4943. " FROM TP_MST_UserPurview up\n" +
  4944. " WHERE up.PurviewType = 4\n" +
  4945. " AND (up.PurviewID = -1 OR up.PurviewID = pd.CreateUserID)\n" +
  4946. " AND up.UserId = :currentUserID))\n" +
  4947. //" AND (:remarks IS NULL OR :remarks IS NULL OR\n" +
  4948. //" instr(pd.remarks, :remarks) > 0)\n" +
  4949. " AND (:goodstypecode IS NULL OR :goodstypecode IS NULL OR\n" +
  4950. " instr(gt.goodstypecode, :goodstypecode) > 0)";
  4951. //IDataParameter[] paras = new OracleParameter[]
  4952. //{
  4953. // new OracleParameter(":procedureID",OracleDbType.Int32, searchEntity.ProcedureID, ParameterDirection.Input),
  4954. // new OracleParameter(":barCode", OracleDbType.Varchar2,searchEntity.BarCode, ParameterDirection.Input),
  4955. // new OracleParameter(":goodsCode", OracleDbType.Varchar2,searchEntity.GoodsCode, ParameterDirection.Input),
  4956. // new OracleParameter(":goodsName", OracleDbType.Varchar2,searchEntity.GoodsName, ParameterDirection.Input),
  4957. // new OracleParameter(":userCode", OracleDbType.Varchar2,searchEntity.UserCode, ParameterDirection.Input),
  4958. // new OracleParameter(":organizationID", OracleDbType.Int32,searchEntity.OrganizationID, ParameterDirection.Input),
  4959. // new OracleParameter(":remarks", OracleDbType.Varchar2,searchEntity.Remarks, ParameterDirection.Input),
  4960. // new OracleParameter(":isReworked", OracleDbType.Varchar2,searchEntity.IsRework, ParameterDirection.Input),
  4961. // new OracleParameter(":begindate", OracleDbType.Date,searchEntity.BeginDate, ParameterDirection.Input),
  4962. // new OracleParameter(":enddate", OracleDbType.Date,searchEntity.EndDate, ParameterDirection.Input),
  4963. // new OracleParameter(":accountID", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  4964. // new OracleParameter(":userID", OracleDbType.Int32,user.UserID, ParameterDirection.Input),
  4965. // new OracleParameter(":kilnCode", OracleDbType.Varchar2,searchEntity.KilnCode, ParameterDirection.Input),
  4966. // new OracleParameter(":kilnCarCode", OracleDbType.Varchar2,searchEntity.KilnCarCode, ParameterDirection.Input),
  4967. // new OracleParameter(":kilnCarPosition", OracleDbType.Int32,searchEntity.KilnCarPosition, ParameterDirection.Input),
  4968. // new OracleParameter(":currentUserID", OracleDbType.Int32,user.UserID, ParameterDirection.Input),
  4969. // new OracleParameter(":goodsTypeCode", OracleDbType.Varchar2,searchEntity.GoodsTypeCode, ParameterDirection.Input),
  4970. //};
  4971. IDataParameter[] paras = new OracleParameter[]
  4972. {
  4973. new OracleParameter(":procedureID",OracleDbType.Int32, cre.Properties["ProcedureID"], ParameterDirection.Input),
  4974. new OracleParameter(":barCode", OracleDbType.Varchar2,cre.Properties["BarCode"], ParameterDirection.Input),
  4975. new OracleParameter(":goodsCode", OracleDbType.Varchar2,cre.Properties["GoodsCode"], ParameterDirection.Input),
  4976. new OracleParameter(":goodsName", OracleDbType.Varchar2,cre.Properties["GoodsName"], ParameterDirection.Input),
  4977. new OracleParameter(":userCode", OracleDbType.Varchar2,cre.Properties["UserCode"], ParameterDirection.Input),
  4978. new OracleParameter(":organizationID", OracleDbType.Int32,cre.Properties["OrganizationID"], ParameterDirection.Input),
  4979. //new OracleParameter(":remarks", OracleDbType.Varchar2,searchEntity.Remarks, ParameterDirection.Input),
  4980. //new OracleParameter(":isReworked", OracleDbType.Varchar2,searchEntity.IsRework, ParameterDirection.Input),
  4981. new OracleParameter(":begindate", OracleDbType.Date,cre.Properties["BeginDate"], ParameterDirection.Input),
  4982. new OracleParameter(":enddate", OracleDbType.Date,cre.Properties["EndDate"], ParameterDirection.Input),
  4983. new OracleParameter(":accountID", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  4984. //new OracleParameter(":userID", OracleDbType.Int32,user.UserID, ParameterDirection.Input),
  4985. //new OracleParameter(":kilnCode", OracleDbType.Varchar2,searchEntity.KilnCode, ParameterDirection.Input),
  4986. //new OracleParameter(":kilnCarCode", OracleDbType.Varchar2,searchEntity.KilnCarCode, ParameterDirection.Input),
  4987. //new OracleParameter(":kilnCarPosition", OracleDbType.Int32,searchEntity.KilnCarPosition, ParameterDirection.Input),
  4988. new OracleParameter(":currentUserID", OracleDbType.Int32,user.UserID, ParameterDirection.Input),
  4989. new OracleParameter(":goodstypecode", OracleDbType.Varchar2,cre.Properties["GoodsTypeCode"], ParameterDirection.Input),
  4990. };
  4991. DataTable data = conn.GetSqlResultToDt(sqlString, paras);
  4992. ServiceResultEntity sre = new ServiceResultEntity();
  4993. sre.Data = new DataSet();
  4994. sre.Data.Tables.Add(data);
  4995. if (data == null || data.Rows.Count == 0)
  4996. {
  4997. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  4998. return sre;
  4999. }
  5000. return sre;
  5001. }
  5002. catch (Exception ex)
  5003. {
  5004. throw ex;
  5005. }
  5006. finally
  5007. {
  5008. if (conn != null &&
  5009. conn.ConnState == ConnectionState.Open)
  5010. {
  5011. conn.Close();
  5012. }
  5013. }
  5014. }
  5015. #endregion
  5016. #endregion
  5017. #region 注浆盘点
  5018. /// <summary>
  5019. /// 获取盘点单列表(searchbox用)
  5020. /// </summary>
  5021. /// <param name="sUserInfo"></param>
  5022. /// <returns></returns>
  5023. public static ServiceResultEntity GetGBCheckedList(SUserInfo sUserInfo, ClientRequestEntity cre)
  5024. {
  5025. ServiceResultEntity sre = new ServiceResultEntity();
  5026. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5027. try
  5028. {
  5029. con.Open();
  5030. string sqlString = @"select GBCheckedID inCheckedID,GBCheckedNo inCheckedNo,AccountDate,Remarks from TP_PM_GroutingChecked where accountid=:accountid and ValueFlag=1 order by GBCheckedID desc";
  5031. List<OracleParameter> parameters = new List<OracleParameter>();
  5032. parameters.Add(new OracleParameter(":accountid", OracleDbType.Int32, sUserInfo.AccountID, ParameterDirection.Input));
  5033. sre.Data = con.GetSqlResultToDs(sqlString, parameters.ToArray());
  5034. return sre;
  5035. }
  5036. catch (Exception ex)
  5037. {
  5038. throw ex;
  5039. }
  5040. finally
  5041. {
  5042. if (con.ConnState == ConnectionState.Open)
  5043. {
  5044. con.Close();
  5045. }
  5046. }
  5047. }
  5048. /// <summary>
  5049. /// 获取盘点单列表(一览用)
  5050. /// </summary>
  5051. /// <param name="sUserInfo"></param>
  5052. /// <returns></returns>
  5053. public static ServiceResultEntity GetAllGBCheckList(SUserInfo sUserInfo, ClientRequestEntity cre)
  5054. {
  5055. ServiceResultEntity sre = new ServiceResultEntity();
  5056. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5057. try
  5058. {
  5059. con.Open();
  5060. string sqlString = "SELECT gbc.gbcheckedid\n" +
  5061. " ,gbc.gbcheckedno\n" +
  5062. " ,gbc.gbcheckname\n" +
  5063. " ,gbc.remarks\n" +
  5064. " ,gbc.createtime\n" +
  5065. " ,u.usercode CreateUserCode\n" +
  5066. " ,u.username CreateUserName\n" +
  5067. " FROM TP_PM_GroutingChecked gbc\n" +
  5068. " LEFT JOIN tp_mst_user u\n" +
  5069. " ON u.userid = gbc.createuserid\n" +
  5070. " WHERE gbc.valueflag = '1'\n" +
  5071. " AND gbc.accountid = :accountid\n" +
  5072. " AND (:datebegin IS NULL OR gbc.createtime >= :datebegin)\n" +
  5073. " AND (:dateend IS NULL OR gbc.createtime <= :dateend)\n" +
  5074. " AND (:gbcheckedno IS NULL OR instr(gbc.gbcheckedno, :gbcheckedno) > 0)\n" +
  5075. " AND (:gbcheckname IS NULL OR instr(gbc.gbcheckname, :gbcheckname) > 0)\n" +
  5076. " AND (:remarks IS NULL OR instr(gbc.remarks, :remarks) > 0)" +
  5077. " ORDER BY gbcheckedid desc";
  5078. OracleParameter[] parameters = new OracleParameter[] {
  5079. new OracleParameter(":accountid", OracleDbType.Int32, sUserInfo.AccountID, ParameterDirection.Input),
  5080. new OracleParameter(":datebegin", OracleDbType.Date, cre.Properties["datebegin"], ParameterDirection.Input),
  5081. new OracleParameter(":dateend", OracleDbType.Date, cre.Properties["dateend"], ParameterDirection.Input),
  5082. new OracleParameter(":gbcheckedno", OracleDbType.NVarchar2, cre.Properties["gbcheckedno"], ParameterDirection.Input),
  5083. new OracleParameter(":gbcheckname", OracleDbType.NVarchar2, cre.Properties["gbcheckname"], ParameterDirection.Input),
  5084. new OracleParameter(":remarks", OracleDbType.NVarchar2, cre.Properties["remarks"], ParameterDirection.Input),
  5085. };
  5086. sre.Data = con.GetSqlResultToDs(sqlString, parameters);
  5087. return sre;
  5088. }
  5089. catch (Exception ex)
  5090. {
  5091. throw ex;
  5092. }
  5093. finally
  5094. {
  5095. if (con.ConnState == ConnectionState.Open)
  5096. {
  5097. con.Close();
  5098. }
  5099. }
  5100. }
  5101. /// <summary>
  5102. /// 获取盘点单明细(一览用)
  5103. /// </summary>
  5104. /// <param name="sUserInfo"></param>
  5105. /// <returns></returns>
  5106. public static ServiceResultEntity GetAllGBCheckDetail(SUserInfo sUserInfo, ClientRequestEntity cre)
  5107. {
  5108. ServiceResultEntity sre = new ServiceResultEntity();
  5109. int checkedID = Convert.ToInt32(cre.Properties["CheckedID"]);
  5110. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5111. try
  5112. {
  5113. sre.Data = new DataSet();
  5114. con.Open();
  5115. string sqlString = "SELECT gbu.gbcheckedid, u.userid, u.usercode, u.username\n" +
  5116. " FROM Tp_Pm_Gbcheckeduser gbu\n" +
  5117. " LEFT JOIN tp_mst_user u\n" +
  5118. " ON u.userid = gbu.userid\n" +
  5119. " WHERE gbu.gbcheckedid = :gbcheckedid";
  5120. OracleParameter[] parameters = new OracleParameter[] {
  5121. new OracleParameter(":gbcheckedid", OracleDbType.Int32, checkedID, ParameterDirection.Input),
  5122. };
  5123. DataTable userTable = con.GetSqlResultToDt(sqlString, parameters);
  5124. userTable.TableName = "UserTable";
  5125. sre.Data.Tables.Add(userTable);
  5126. sqlString = "SELECT 0 sel\n" +
  5127. " ,gbcd.GBCheckedID -- 盘点单ID\n" +
  5128. " ,gbcd.BarCode -- 产品条码\n" +
  5129. " ,gbcd.GBCheckedNo -- 盘点单号\n" +
  5130. " ,gbcd.GroutingLineCode -- 成型生产线编码\n" +
  5131. " ,gbcd.GroutingLineName -- 成型生产线名称\n" +
  5132. " ,gbcd.GroutingDate -- 注浆日期\n" +
  5133. " ,gbcd.GroutingMouldCode -- 注浆模具编号\n" +
  5134. " ,gbcd.GroutingBatchNo -- 注浆批次\n" +
  5135. " ,gbcd.UserCode -- 注浆工号编码\n" +
  5136. " ,gbcd.GoodsCode -- 产品编码\n" +
  5137. " ,gbcd.GoodsName -- 产品名称\n" +
  5138. " ,gbcd.GroutingCount -- 注浆次数\n" +
  5139. " ,gbcd.ScrapFlag -- 损坯标识\n" +
  5140. " ,gbcd.ScrapTime -- 损坯时间\n" +
  5141. " ,SUser.usercode ScrapUsercode -- 损坯工号\n" +
  5142. " ,gbcd.IsPublicBody -- 公坯标识\n" +
  5143. " ,gbcd.DeliverFlag -- 交坯标识\n" +
  5144. " ,gbcd.DeliverTime -- 交坯时间\n" +
  5145. " ,gbcd.DeliverUserCode -- 交坯工号\n" +
  5146. " ,gbcd.Remarks -- 备注\n" +
  5147. " ,gbcd.GBCheckedFlag -- 盘点标识\n" +
  5148. " ,gbcd.CheckedDate -- 盘点时间\n" +
  5149. " ,CUser.usercode CheckedUserCode -- 盘点工号\n" +
  5150. " ,case when gdd.scrapflag = '1' then '成型损坯'" +
  5151. " when inp.barcode is not null then to_char(p.procedurename) " +
  5152. " when sp.barcode is not null then to_char(glt.goodsleveltypename) " +
  5153. " when fp.barcode is not null then '生产完成' else '' end procedurename -- 当前工序\n" +
  5154. " ,case when gdd.scrapflag = '1' then gdd.scraptime " +
  5155. " when inp.barcode is not null then inp.PROCEDURETIME " +
  5156. " when sp.barcode is not null then sp.auditdate " +
  5157. " when fp.barcode is not null then fp.createtime else null end PROCEDURETIME -- 当前工序时间\n" +
  5158. " ,gspuser.usercode gspusercode -- 成型损坯人\n" +
  5159. " ,gsp.auditdate -- 成型损坯时间\n" +
  5160. //" ,p.procedurename procedurename -- 当前工序\n" +
  5161. //" ,inp.PROCEDURETIME PROCEDURETIME -- 当前工序时间\n" +
  5162. " FROM tp_pm_gbcheckeddetail gbcd\n" +
  5163. // 当前注浆信息
  5164. " INNER JOIN tp_pm_groutingdailydetail gdd\n" +
  5165. " ON gdd.groutingdailydetailid = gbcd.groutingdailydetailid\n" +
  5166. " LEFT JOIN tp_mst_user SUser\n" +
  5167. " ON SUser.userid = gbcd.ScrapUser\n" +
  5168. " LEFT JOIN tp_mst_user CUser\n" +
  5169. " ON CUser.userid = gbcd.CheckedUserID\n" +
  5170. // 在产工序
  5171. " LEFT JOIN tp_pm_inproduction inp \n" +
  5172. " ON inp.barcode = gdd.barcode\n" +
  5173. // 完成
  5174. " LEFT JOIN tp_pm_finishedproduct fp \n" +
  5175. " ON inp.barcode is null and fp.barcode = gdd.barcode\n" +
  5176. // 损坯
  5177. " LEFT JOIN tp_pm_scrapproduct sp \n" +
  5178. " ON inp.barcode is null and fp.barcode is null and sp.barcode = gdd.barcode\n" +
  5179. " AND sp.valueflag = '1'\n" +
  5180. " AND sp.auditstatus = 1\n" +
  5181. " AND sp.goodsleveltypeid <> 9\n" +
  5182. " AND sp.RECYCLINGFLAG = '0'\n" +
  5183. " LEFT JOIN tp_sys_goodsleveltype glt \n" +
  5184. " ON glt.goodsleveltypeid = sp.goodsleveltypeid\n" +
  5185. " LEFT JOIN tp_pc_procedure p \n" +
  5186. " ON p.procedureid = inp.procedureid\n" +
  5187. " LEFT JOIN TP_PM_GroutingScrapProduct gsp \n" +
  5188. " ON gsp.groutingdailydetailid = gbcd.groutingdailydetailid\n" +
  5189. " LEFT JOIN tp_mst_user gspuser\n" +
  5190. " ON gspuser.userid = gsp.Auditor\n" +
  5191. " WHERE gbcd.gbcheckedid = :gbcheckedid\n" +
  5192. " AND gbcd.gbcheckedflag = :gbcheckedflag";
  5193. OracleParameter[] paras = new OracleParameter[]{
  5194. new OracleParameter(":gbcheckedflag",OracleDbType.Int32,(int)Constant.InCheckedFlag.InCheckedNo,ParameterDirection.Input),
  5195. new OracleParameter(":gbcheckedid",OracleDbType.Int32,checkedID,ParameterDirection.Input),
  5196. };
  5197. sre.Data.Tables.Add(con.GetSqlResultToDt(sqlString, paras));
  5198. paras[0].Value = (int)Constant.InCheckedFlag.InCheckeded;
  5199. sre.Data.Tables.Add(con.GetSqlResultToDt(sqlString, paras));
  5200. paras[0].Value = (int)Constant.InCheckedFlag.InCheckedWin;
  5201. sre.Data.Tables.Add(con.GetSqlResultToDt(sqlString, paras));
  5202. paras[0].Value = (int)Constant.InCheckedFlag.Loss;
  5203. sre.Data.Tables.Add(con.GetSqlResultToDt(sqlString, paras));
  5204. return sre;
  5205. }
  5206. catch (Exception ex)
  5207. {
  5208. throw ex;
  5209. }
  5210. finally
  5211. {
  5212. if (con.ConnState == ConnectionState.Open)
  5213. {
  5214. con.Close();
  5215. }
  5216. }
  5217. }
  5218. /// <summary>
  5219. /// 获取盘点单信息(编辑用)
  5220. /// </summary>
  5221. /// <param name="sUserInfo"></param>
  5222. /// <returns></returns>
  5223. public static ServiceResultEntity GetGBCheckedInfoForUpdate(SUserInfo sUserInfo, ClientRequestEntity cre)
  5224. {
  5225. ServiceResultEntity sre = new ServiceResultEntity();
  5226. int checkedID = Convert.ToInt32(cre.Properties["CheckedID"]);
  5227. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5228. try
  5229. {
  5230. con.Open();
  5231. string sqlString =
  5232. "SELECT gbc.gbcheckedid, gbc.gbcheckedno, gbc.gbcheckname, gbc.remarks\n" +
  5233. " FROM TP_PM_GroutingChecked gbc\n" +
  5234. " WHERE gbc.gbcheckedid = :gbcheckedid";
  5235. OracleParameter[] parameters = new OracleParameter[] {
  5236. new OracleParameter(":gbcheckedid", OracleDbType.Int32, checkedID, ParameterDirection.Input)
  5237. };
  5238. sre.Data = con.GetSqlResultToDs(sqlString, parameters);
  5239. sqlString =
  5240. "SELECT u.userid, u.usercode, u.username\n" +
  5241. " FROM Tp_Pm_Gbcheckeduser gbu\n" +
  5242. " INNER JOIN tp_mst_user u\n" +
  5243. " ON u.userid = gbu.userid\n" +
  5244. " WHERE gbu.gbcheckedid = :gbcheckedid" +
  5245. " ORDER BY u.usercode";
  5246. sre.Data.Tables.Add(con.GetSqlResultToDt(sqlString, parameters));
  5247. return sre;
  5248. }
  5249. catch (Exception ex)
  5250. {
  5251. throw ex;
  5252. }
  5253. finally
  5254. {
  5255. if (con.ConnState == ConnectionState.Open)
  5256. {
  5257. con.Close();
  5258. }
  5259. }
  5260. }
  5261. /// <summary>
  5262. /// 保存盘点单
  5263. /// </summary>
  5264. /// <param name="sUserInfo">用户基本信息</param>
  5265. /// <returns></returns>
  5266. public static ServiceResultEntity SaveGBChecked(SUserInfo sUserInfo, ClientRequestEntity cre)
  5267. {
  5268. ServiceResultEntity sre = new ServiceResultEntity();
  5269. int checkedID = Convert.ToInt32(cre.Properties["CheckedID"]);
  5270. string checkedName = cre.Properties["CheckedName"].ToString();
  5271. string remarks = cre.Properties["Remarks"].ToString();
  5272. int returnRows = 0;
  5273. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5274. try
  5275. {
  5276. string sql = null;
  5277. OracleParameter[] paras = null;
  5278. if (checkedID > 0)
  5279. {
  5280. // 编辑
  5281. sql = "UPDATE TP_PM_GroutingChecked gbc\n" +
  5282. " SET gbc.gbcheckname = :gbcheckname\n" +
  5283. " ,gbc.remarks = :remarks\n" +
  5284. " ,gbc.updateuserid = :updateuserid\n" +
  5285. " WHERE gbc.gbcheckedid = :gbcheckedid";
  5286. paras = new OracleParameter[] {
  5287. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  5288. checkedID,ParameterDirection.Input),
  5289. new OracleParameter(":gbcheckname",OracleDbType.NVarchar2,
  5290. checkedName,ParameterDirection.Input),
  5291. new OracleParameter(":remarks",OracleDbType.NVarchar2,
  5292. remarks,ParameterDirection.Input),
  5293. new OracleParameter(":updateuserid",OracleDbType.Int32,
  5294. sUserInfo.UserID,ParameterDirection.Input)
  5295. };
  5296. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5297. sql = "DELETE FROM Tp_Pm_Gbcheckeduser gbu\n" +
  5298. " WHERE gbu.gbcheckedid = :gbcheckedid";
  5299. paras = new OracleParameter[] {
  5300. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  5301. checkedID,ParameterDirection.Input),
  5302. };
  5303. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5304. if (cre.Data != null && cre.Data.Tables.Count > 0)
  5305. {
  5306. sql = "INSERT INTO Tp_Pm_Gbcheckeduser gbu\n" +
  5307. " (gbcheckedid, userid, usercode)\n" +
  5308. "VALUES\n" +
  5309. " (:gbcheckedid, :userid, :usercode)";
  5310. foreach (DataRow item in cre.Data.Tables[0].Rows)
  5311. {
  5312. if (item["UserID"] == DBNull.Value)
  5313. {
  5314. continue;
  5315. }
  5316. paras = new OracleParameter[] {
  5317. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  5318. checkedID,ParameterDirection.Input),
  5319. new OracleParameter(":userid",OracleDbType.Int32,
  5320. item["UserID"],ParameterDirection.Input),
  5321. new OracleParameter(":usercode",OracleDbType.NVarchar2,
  5322. item["UserCode"],ParameterDirection.Input),
  5323. };
  5324. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5325. }
  5326. }
  5327. }
  5328. else
  5329. {
  5330. // 新建
  5331. //盘点单号
  5332. string checkedNo = string.Format("GBC{0}", DateTime.Now.ToString("yyyyMMddHHmmss"));
  5333. //获得账务日期
  5334. DateTime accountDate = CommonModuleLogic.CommonModuleLogic.GetAccountDate(oracleTrConn, sUserInfo);
  5335. //盘点单ID
  5336. sql = "select SEQ_PM_GBChecked_ID.nextval from dual";
  5337. checkedID = Convert.ToInt32(oracleTrConn.GetSqlResultToStr(sql));
  5338. //2022年2月18日10:32:49 add by feiy
  5339. //因为新建成型盘点单缓慢,设置断点后快,所以暂时在此处停顿1秒
  5340. Thread.Sleep(1000);
  5341. #region 插入盘点单主表信息
  5342. sql = @"insert into TP_PM_GroutingChecked
  5343. (
  5344. GBCheckedID,
  5345. GBCheckedNo,
  5346. AccountDate,
  5347. Remarks,
  5348. AccountID,
  5349. CreateUserID,
  5350. UpdateUserID,
  5351. GBCHECKNAME
  5352. ) values
  5353. ( :GBCheckedID,
  5354. :GBCheckedNo,
  5355. :AccountDate,
  5356. :Remarks,
  5357. :AccountID,
  5358. :CreateUserID,
  5359. :CreateUserID,
  5360. :GBCHECKNAME
  5361. )";
  5362. OracleParameter[] Paras = new OracleParameter[] {
  5363. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  5364. checkedID,ParameterDirection.Input),
  5365. new OracleParameter(":GBCheckedNo",OracleDbType.NVarchar2,
  5366. checkedNo,ParameterDirection.Input),
  5367. new OracleParameter(":AccountDate",OracleDbType.Date,
  5368. accountDate,ParameterDirection.Input),
  5369. new OracleParameter(":Remarks",OracleDbType.NVarchar2,
  5370. remarks,ParameterDirection.Input),
  5371. new OracleParameter(":AccountID",OracleDbType.Int32,
  5372. sUserInfo.AccountID,ParameterDirection.Input),
  5373. new OracleParameter(":CreateUserID",OracleDbType.Int32,
  5374. sUserInfo.UserID,ParameterDirection.Input),
  5375. new OracleParameter(":GBCHECKNAME",OracleDbType.NVarchar2,
  5376. checkedName,ParameterDirection.Input),
  5377. };
  5378. returnRows += oracleTrConn.ExecuteNonQuery(sql, Paras);
  5379. #endregion
  5380. #region 盘点工号
  5381. if (cre.Data != null && cre.Data.Tables.Count > 0)
  5382. {
  5383. sql = "INSERT INTO Tp_Pm_Gbcheckeduser gbu\n" +
  5384. " (gbcheckedid, userid, usercode)\n" +
  5385. "VALUES\n" +
  5386. " (:gbcheckedid, :userid, :usercode)";
  5387. foreach (DataRow item in cre.Data.Tables[0].Rows)
  5388. {
  5389. if (item["UserID"] == DBNull.Value)
  5390. {
  5391. continue;
  5392. }
  5393. paras = new OracleParameter[] {
  5394. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  5395. checkedID,ParameterDirection.Input),
  5396. new OracleParameter(":userid",OracleDbType.Int32,
  5397. item["UserID"],ParameterDirection.Input),
  5398. new OracleParameter(":usercode",OracleDbType.NVarchar2,
  5399. item["UserCode"],ParameterDirection.Input),
  5400. };
  5401. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5402. }
  5403. }
  5404. #endregion
  5405. #region 盘点信息
  5406. string lineWhere = null;
  5407. if (cre.Properties["BUILDINGNO"] + "" != "")
  5408. {
  5409. lineWhere = " instr('," + cre.Properties["BUILDINGNO"] + ",', ',' || gl.buildingno || ',') > 0\n";
  5410. }
  5411. if (cre.Properties["FLOORNO"] + "" != "")
  5412. {
  5413. if (lineWhere != null)
  5414. {
  5415. lineWhere += " AND";
  5416. }
  5417. lineWhere += " to_number(gl.floorno) IN (" + cre.Properties["FLOORNO"] + ")\n";
  5418. }
  5419. if (lineWhere != null)
  5420. {
  5421. lineWhere = "INNER JOIN (SELECT gl.groutinglineid\n" +
  5422. " FROM tp_pc_groutingline gl\n" +
  5423. " WHERE " + lineWhere + ") gll\n" +
  5424. " ON gll.groutinglineid = gdd.groutinglineid\n";
  5425. }
  5426. sql =
  5427. "INSERT INTO TP_PM_GBCHECKEDDETAIL\n" +
  5428. " (GBCHECKEDID\n" +
  5429. " ,BARCODE\n" +
  5430. " ,GBCHECKEDNO\n" +
  5431. " ,GROUTINGDAILYDETAILID\n" +
  5432. " ,GROUTINGDAILYID\n" +
  5433. " ,GROUTINGLINEID\n" +
  5434. " ,GROUTINGLINECODE\n" +
  5435. " ,GROUTINGLINENAME\n" +
  5436. " ,GROUTINGLINEDETAILID\n" +
  5437. " ,GROUTINGDATE\n" +
  5438. " ,GROUTINGMOULDCODE\n" +
  5439. " ,MOULDCODE\n" +
  5440. " ,GMOULDTYPEID\n" +
  5441. " ,CANMANYTIMES\n" +
  5442. " ,GROUTINGBATCHNO\n" +
  5443. " ,USERID\n" +
  5444. " ,USERCODE\n" +
  5445. " ,CLASSESSETTINGID\n" +
  5446. " ,GOODSID\n" +
  5447. " ,GOODSCODE\n" +
  5448. " ,GOODSNAME\n" +
  5449. " ,GMOULDSTATUS\n" +
  5450. " ,GROUTINGCOUNT\n" +
  5451. " ,GROUTINGFLAG\n" +
  5452. " ,ONLYCODE\n" +
  5453. " ,NOGROUTINGRREASON\n" +
  5454. " ,SPECIALREPAIRFLAG\n" +
  5455. " ,SCRAPFLAG\n" +
  5456. " ,SCRAPTIME\n" +
  5457. " ,SCRAPUSER\n" +
  5458. " ,ISPUBLICBODY\n" +
  5459. " ,DELIVERFLAG\n" +
  5460. " ,DELIVERTIME\n" +
  5461. " ,DELIVERUSERID\n" +
  5462. " ,DELIVERUSERCODE\n" +
  5463. " ,LOGOID\n" +
  5464. " ,REMARKS\n" +
  5465. " ,ACCOUNTID\n" +
  5466. " ,VALUEFLAG\n" +
  5467. " ,CREATEUSERID\n" +
  5468. " ,UPDATEUSERID)\n" +
  5469. " SELECT :GBCHECKEDID\n" +
  5470. " ,gdd.BARCODE\n" +
  5471. " ,:GBCHECKEDNO\n" +
  5472. " ,gdd.GROUTINGDAILYDETAILID\n" +
  5473. " ,gdd.GROUTINGDAILYID\n" +
  5474. " ,gdd.GROUTINGLINEID\n" +
  5475. " ,gdd.GROUTINGLINECODE\n" +
  5476. " ,gdd.GROUTINGLINENAME\n" +
  5477. " ,gdd.GROUTINGLINEDETAILID\n" +
  5478. " ,gdd.GROUTINGDATE\n" +
  5479. " ,gdd.GROUTINGMOULDCODE\n" +
  5480. " ,gdd.MOULDCODE\n" +
  5481. " ,gdd.GMOULDTYPEID\n" +
  5482. " ,gdd.CANMANYTIMES\n" +
  5483. " ,gdd.GROUTINGBATCHNO\n" +
  5484. " ,gdd.USERID\n" +
  5485. " ,gdd.USERCODE\n" +
  5486. " ,gdd.CLASSESSETTINGID\n" +
  5487. " ,gdd.GOODSID\n" +
  5488. " ,gdd.GOODSCODE\n" +
  5489. " ,gdd.GOODSNAME\n" +
  5490. " ,gdd.GMOULDSTATUS\n" +
  5491. " ,gdd.GROUTINGCOUNT\n" +
  5492. " ,gdd.GROUTINGFLAG\n" +
  5493. " ,gdd.ONLYCODE\n" +
  5494. " ,gdd.NOGROUTINGRREASON\n" +
  5495. " ,gdd.SPECIALREPAIRFLAG\n" +
  5496. " ,gdd.SCRAPFLAG\n" +
  5497. " ,gdd.SCRAPTIME\n" +
  5498. " ,gdd.SCRAPUSER\n" +
  5499. " ,gdd.ISPUBLICBODY\n" +
  5500. " ,gdd.DELIVERFLAG\n" +
  5501. " ,gdd.DELIVERTIME\n" +
  5502. " ,gdd.DELIVERUSERID\n" +
  5503. " ,gdd.DELIVERUSERCODE\n" +
  5504. " ,gdd.LOGOID\n" +
  5505. " ,gdd.REMARKS\n" +
  5506. " ,gdd.ACCOUNTID\n" +
  5507. " ,'1'\n" +
  5508. " ,:CHECKEDUSERID\n" +
  5509. " ,:CHECKEDUSERID\n" +
  5510. " FROM tp_pm_groutingdailydetail gdd\n" +
  5511. " LEFT JOIN tp_mst_goods g\n" +
  5512. " ON g.goodsid = gdd.goodsid\n" +
  5513. " LEFT JOIN tp_mst_goodsType gt\n" +
  5514. " ON gt.goodstypeid = g.goodstypeid\n" + lineWhere +
  5515. "WHERE gdd.valueflag = '1'\n" +
  5516. " AND gdd.accountid = :accountid\n" +
  5517. " AND gdd.barcode IS NOT NULL\n" +
  5518. //2021-05-15 xuwei add
  5519. " AND gdd.BEGINNINGFLAG = '0' \n" +
  5520. " AND gdd.deliverflag = '0'\n" +
  5521. " AND gdd.scrapflag = '0'\n" +
  5522. " AND (:DateBegin IS NULL OR gdd.groutingdate >= :DateBegin)\n" +
  5523. " AND (:DateEnd IS NULL OR gdd.groutingdate <= :DateEnd)\n" +
  5524. " AND (:GoodsIDS IS NULL OR\n" +
  5525. " instr(',' || :GoodsIDS || ',', ',' || gdd.GoodsID || ',') > 0)\n" +
  5526. " AND (:GoodsTypeCode IS NULL OR\n" +
  5527. " instr(gt.goodstypecode, :GoodsTypeCode) = 1)";
  5528. paras = new OracleParameter[] {
  5529. new OracleParameter(":accountid",OracleDbType.Int32,
  5530. sUserInfo.AccountID,ParameterDirection.Input),
  5531. new OracleParameter(":GBCHECKEDID",OracleDbType.Int32,
  5532. checkedID,ParameterDirection.Input),
  5533. new OracleParameter(":GBCHECKEDNO",OracleDbType.NVarchar2,
  5534. checkedNo,ParameterDirection.Input),
  5535. new OracleParameter(":CHECKEDUSERID",OracleDbType.Int32,
  5536. sUserInfo.UserID,ParameterDirection.Input),
  5537. new OracleParameter(":DateBegin",OracleDbType.Date,
  5538. cre.Properties["DateBegin"],ParameterDirection.Input),
  5539. new OracleParameter(":DateEnd",OracleDbType.Date,
  5540. cre.Properties["DateEnd"],ParameterDirection.Input),
  5541. new OracleParameter(":GoodsIDS",OracleDbType.NVarchar2,
  5542. cre.Properties["GoodsCodeList"],ParameterDirection.Input),
  5543. new OracleParameter(":GoodsTypeCode",OracleDbType.NVarchar2,
  5544. cre.Properties["GoodsTypeCode"],ParameterDirection.Input),
  5545. };
  5546. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5547. #endregion
  5548. }
  5549. oracleTrConn.Commit();
  5550. }
  5551. catch (Exception ex)
  5552. {
  5553. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  5554. {
  5555. oracleTrConn.Rollback();
  5556. oracleTrConn.Disconnect();
  5557. }
  5558. throw ex;
  5559. }
  5560. finally
  5561. {
  5562. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  5563. {
  5564. oracleTrConn.Disconnect();
  5565. }
  5566. }
  5567. return sre;
  5568. }
  5569. /// <summary>
  5570. /// 停用盘点单
  5571. /// </summary>
  5572. /// <param name="sUserInfo">用户基本信息</param>
  5573. /// <returns></returns>
  5574. public static ServiceResultEntity DisableGBChecked(SUserInfo sUserInfo, ClientRequestEntity cre)
  5575. {
  5576. ServiceResultEntity sre = new ServiceResultEntity();
  5577. int checkedID = Convert.ToInt32(cre.Properties["CheckedID"]);
  5578. int returnRows = 0;
  5579. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5580. try
  5581. {
  5582. string sql = "update TP_PM_GroutingChecked set valueflag='0', updateuserid=:updateuserid where GBCheckedID=:GBCheckedID and valueflag='1'";
  5583. OracleParameter[] Paras = new OracleParameter[] {
  5584. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  5585. checkedID,ParameterDirection.Input),
  5586. new OracleParameter(":updateuserid",OracleDbType.Int32,
  5587. sUserInfo.UserID,ParameterDirection.Input)
  5588. };
  5589. returnRows = oracleTrConn.ExecuteNonQuery(sql, Paras);
  5590. if (returnRows > 0)
  5591. {
  5592. sre.Status = Constant.ServiceResultStatus.Success;
  5593. }
  5594. else
  5595. {
  5596. sre.Status = Constant.ServiceResultStatus.Other;
  5597. }
  5598. oracleTrConn.Commit();
  5599. oracleTrConn.Disconnect();
  5600. }
  5601. catch (Exception ex)
  5602. {
  5603. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  5604. {
  5605. oracleTrConn.Rollback();
  5606. oracleTrConn.Disconnect();
  5607. }
  5608. throw ex;
  5609. }
  5610. finally
  5611. {
  5612. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  5613. {
  5614. oracleTrConn.Disconnect();
  5615. }
  5616. }
  5617. return sre;
  5618. }
  5619. /// <summary>
  5620. /// 更新盘点单(条码盘点)
  5621. /// </summary>
  5622. /// <param name="InCheckedID">盘点单号</param>
  5623. /// <param name="BarCode">产品条码</param>
  5624. /// <param name="sUserInfo">用户基本信息</param>
  5625. /// <returns></returns>
  5626. public static ServiceResultEntity UpdateGBChecked(SUserInfo sUserInfo, ClientRequestEntity cre)
  5627. {
  5628. ServiceResultEntity sre = new ServiceResultEntity();
  5629. int checkedID = Convert.ToInt32(cre.Properties["CheckedID"]);
  5630. string barcode = cre.Properties["Barcode"].ToString();
  5631. int returnRows = 0;
  5632. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5633. try
  5634. {
  5635. string sql = null;
  5636. OracleParameter[] paras = null;
  5637. DataSet ds = null;
  5638. sql = @"select GBCheckedFlag,CHECKEDUSERID from TP_PM_GBCheckedDetail where GBCheckedID=:GBCheckedID and BarCode=:BarCode and Valueflag=1";
  5639. paras = new OracleParameter[] {
  5640. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  5641. checkedID,ParameterDirection.Input),
  5642. new OracleParameter(":BarCode",OracleDbType.NVarchar2,
  5643. barcode,ParameterDirection.Input)
  5644. };
  5645. ds = oracleTrConn.GetSqlResultToDs(sql, paras);
  5646. // 不在盘点单中
  5647. if (ds != null && ds.Tables[0].Rows.Count == 0)
  5648. {
  5649. sql = @"select GBCheckedNo from tp_pm_groutingchecked where GBCheckedID=:GBCheckedID";
  5650. paras = new OracleParameter[] {
  5651. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  5652. checkedID,ParameterDirection.Input),
  5653. };
  5654. ds = oracleTrConn.GetSqlResultToDs(sql, paras);
  5655. if (ds == null || ds.Tables.Count == 0 || ds.Tables[0].Rows.Count == 0)
  5656. {
  5657. sre.Status = Constant.ServiceResultStatus.Other;
  5658. sre.OtherStatus = -1;
  5659. sre.Message = "盘点单不存在";
  5660. return sre;
  5661. }
  5662. string checkedNo = ds.Tables[0].Rows[0]["GBCheckedNo"].ToString();
  5663. // 条码是否在注浆日报中
  5664. sql = "SELECT gdd.groutingdailydetailid\n" +
  5665. " FROM tp_pm_groutingdailydetail gdd\n" +
  5666. " WHERE gdd.barcode = :BarCode";
  5667. paras = new OracleParameter[] {
  5668. new OracleParameter(":BarCode",OracleDbType.NVarchar2,
  5669. barcode,ParameterDirection.Input)
  5670. };
  5671. DataTable dt = oracleTrConn.GetSqlResultToDt(sql, paras);
  5672. if (dt == null || dt.Rows.Count == 0)
  5673. {
  5674. // 无效条码
  5675. sre.Status = Constant.ServiceResultStatus.Other;
  5676. sre.OtherStatus = -1;
  5677. sre.Message = "条码【" + barcode + "】为无效条码";
  5678. return sre;
  5679. }
  5680. sql =
  5681. "INSERT INTO TP_PM_GBCHECKEDDETAIL\n" +
  5682. " (GBCHECKEDID\n" +
  5683. " ,BARCODE\n" +
  5684. " ,GBCHECKEDNO\n" +
  5685. " ,GROUTINGDAILYDETAILID\n" +
  5686. " ,GROUTINGDAILYID\n" +
  5687. " ,GROUTINGLINEID\n" +
  5688. " ,GROUTINGLINECODE\n" +
  5689. " ,GROUTINGLINENAME\n" +
  5690. " ,GROUTINGLINEDETAILID\n" +
  5691. " ,GROUTINGDATE\n" +
  5692. " ,GROUTINGMOULDCODE\n" +
  5693. " ,MOULDCODE\n" +
  5694. " ,GMOULDTYPEID\n" +
  5695. " ,CANMANYTIMES\n" +
  5696. " ,GROUTINGBATCHNO\n" +
  5697. " ,USERID\n" +
  5698. " ,USERCODE\n" +
  5699. " ,CLASSESSETTINGID\n" +
  5700. " ,GOODSID\n" +
  5701. " ,GOODSCODE\n" +
  5702. " ,GOODSNAME\n" +
  5703. " ,GMOULDSTATUS\n" +
  5704. " ,GROUTINGCOUNT\n" +
  5705. " ,GROUTINGFLAG\n" +
  5706. " ,ONLYCODE\n" +
  5707. " ,NOGROUTINGRREASON\n" +
  5708. " ,SPECIALREPAIRFLAG\n" +
  5709. " ,SCRAPFLAG\n" +
  5710. " ,SCRAPTIME\n" +
  5711. " ,SCRAPUSER\n" +
  5712. " ,ISPUBLICBODY\n" +
  5713. " ,DELIVERFLAG\n" +
  5714. " ,DELIVERTIME\n" +
  5715. " ,DELIVERUSERID\n" +
  5716. " ,DELIVERUSERCODE\n" +
  5717. " ,LOGOID\n" +
  5718. " ,REMARKS\n" +
  5719. " ,GBCHECKEDFLAG\n" +
  5720. " ,CHECKEDDATE\n" +
  5721. " ,CHECKEDUSERID\n" +
  5722. " ,ACCOUNTID\n" +
  5723. " ,VALUEFLAG\n" +
  5724. " ,CREATEUSERID\n" +
  5725. " ,UPDATEUSERID)\n" +
  5726. " SELECT :GBCHECKEDID\n" +
  5727. " ,BARCODE\n" +
  5728. " ,:GBCHECKEDNO\n" +
  5729. " ,GROUTINGDAILYDETAILID\n" +
  5730. " ,GROUTINGDAILYID\n" +
  5731. " ,GROUTINGLINEID\n" +
  5732. " ,GROUTINGLINECODE\n" +
  5733. " ,GROUTINGLINENAME\n" +
  5734. " ,GROUTINGLINEDETAILID\n" +
  5735. " ,GROUTINGDATE\n" +
  5736. " ,GROUTINGMOULDCODE\n" +
  5737. " ,MOULDCODE\n" +
  5738. " ,GMOULDTYPEID\n" +
  5739. " ,CANMANYTIMES\n" +
  5740. " ,GROUTINGBATCHNO\n" +
  5741. " ,USERID\n" +
  5742. " ,USERCODE\n" +
  5743. " ,CLASSESSETTINGID\n" +
  5744. " ,GOODSID\n" +
  5745. " ,GOODSCODE\n" +
  5746. " ,GOODSNAME\n" +
  5747. " ,GMOULDSTATUS\n" +
  5748. " ,GROUTINGCOUNT\n" +
  5749. " ,GROUTINGFLAG\n" +
  5750. " ,ONLYCODE\n" +
  5751. " ,NOGROUTINGRREASON\n" +
  5752. " ,SPECIALREPAIRFLAG\n" +
  5753. " ,SCRAPFLAG\n" +
  5754. " ,SCRAPTIME\n" +
  5755. " ,SCRAPUSER\n" +
  5756. " ,ISPUBLICBODY\n" +
  5757. " ,DELIVERFLAG\n" +
  5758. " ,DELIVERTIME\n" +
  5759. " ,DELIVERUSERID\n" +
  5760. " ,DELIVERUSERCODE\n" +
  5761. " ,LOGOID\n" +
  5762. " ,REMARKS\n" +
  5763. " ,'2'\n" +
  5764. " ,SYSDATE\n" +
  5765. " ,:CHECKEDUSERID\n" +
  5766. " ,ACCOUNTID\n" +
  5767. " ,'1'\n" +
  5768. " ,:CHECKEDUSERID\n" +
  5769. " ,:CHECKEDUSERID\n" +
  5770. " FROM tp_pm_groutingdailydetail\n" +
  5771. " WHERE GROUTINGDAILYDETAILID = :GROUTINGDAILYDETAILID";
  5772. paras = new OracleParameter[] {
  5773. new OracleParameter(":GBCHECKEDID",OracleDbType.Int32,
  5774. checkedID,ParameterDirection.Input),
  5775. new OracleParameter(":GBCHECKEDNO",OracleDbType.NVarchar2,
  5776. checkedNo,ParameterDirection.Input),
  5777. new OracleParameter(":CHECKEDUSERID",OracleDbType.Int32,
  5778. sUserInfo.UserID,ParameterDirection.Input),
  5779. new OracleParameter(":GROUTINGDAILYDETAILID",OracleDbType.Int32,
  5780. dt.Rows[0]["GROUTINGDAILYDETAILID"],ParameterDirection.Input),
  5781. };
  5782. returnRows = oracleTrConn.ExecuteNonQuery(sql, paras);
  5783. //returnRows = 10;
  5784. }
  5785. else
  5786. {
  5787. string checkedFlag = ds.Tables[0].Rows[0]["GBCheckedFlag"].ToString();
  5788. if (checkedFlag == "1")
  5789. {
  5790. //if (Convert.ToInt32(ds.Tables[0].Rows[0]["CHECKEDUSERID"]) != sUserInfo.UserID)
  5791. //{
  5792. // returnRows = -22;//己被其他工号盘点
  5793. //}
  5794. //else
  5795. //{
  5796. // returnRows = -24;//己被自己工号盘点
  5797. //}
  5798. //return returnRows;
  5799. sre.Status = Constant.ServiceResultStatus.Other;
  5800. sre.OtherStatus = -1;
  5801. sre.Message = "条码【" + barcode + "】已被盘点";
  5802. return sre;
  5803. }
  5804. else if (checkedFlag == "2")
  5805. {
  5806. //if (Convert.ToInt32(ds.Tables[0].Rows[0]["CHECKEDUSERID"]) != sUserInfo.UserID)
  5807. //{
  5808. // returnRows = -23;//己被其他工号盘盈
  5809. //}
  5810. //else
  5811. //{
  5812. // returnRows = -25;//己被自己工号盘盈
  5813. //}
  5814. //return returnRows;
  5815. sre.Status = Constant.ServiceResultStatus.Other;
  5816. sre.OtherStatus = -1;
  5817. sre.Message = "条码【" + barcode + "】已被盘盈";
  5818. return sre;
  5819. }
  5820. sql = "update TP_PM_GBCheckedDetail set GBCheckedFlag=:GBCheckedFlag,CheckedDate=sysdate,CheckedUserID=:CheckedUserID,UpdateUserID=:UpdateUserID where GBCheckedID=:CheckedID and BarCode=:BarCode and GBCheckedFlag=:whereGBCheckedFlag";
  5821. paras = new OracleParameter[] {
  5822. new OracleParameter(":CheckedUserID",OracleDbType.Int32,
  5823. sUserInfo.UserID,ParameterDirection.Input),
  5824. new OracleParameter(":GBCheckedFlag",OracleDbType.Int32,
  5825. (int)Constant.InCheckedFlag.InCheckeded,ParameterDirection.Input),
  5826. new OracleParameter(":CheckedID",OracleDbType.Int32,
  5827. checkedID,ParameterDirection.Input),
  5828. new OracleParameter(":BarCode",OracleDbType.NVarchar2,
  5829. barcode,ParameterDirection.Input),
  5830. new OracleParameter(":whereGBCheckedFlag",OracleDbType.Int32,
  5831. (int)Constant.InCheckedFlag.InCheckedNo,ParameterDirection.Input),
  5832. new OracleParameter(":UpdateUserID",OracleDbType.Int32,
  5833. sUserInfo.UserID,ParameterDirection.Input),
  5834. };
  5835. returnRows = oracleTrConn.ExecuteNonQuery(sql, paras);
  5836. //returnRows = 1;
  5837. }
  5838. if (returnRows == 0)
  5839. {
  5840. oracleTrConn.Rollback();
  5841. oracleTrConn.Disconnect();
  5842. }
  5843. else
  5844. {
  5845. oracleTrConn.Commit();
  5846. oracleTrConn.Disconnect();
  5847. }
  5848. }
  5849. catch (Exception ex)
  5850. {
  5851. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  5852. {
  5853. oracleTrConn.Rollback();
  5854. oracleTrConn.Disconnect();
  5855. }
  5856. throw ex;
  5857. }
  5858. finally
  5859. {
  5860. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  5861. {
  5862. oracleTrConn.Disconnect();
  5863. }
  5864. }
  5865. return sre;
  5866. }
  5867. /// <summary>
  5868. /// 报损未盘点
  5869. /// </summary>
  5870. /// <param name="sUserInfo">用户基本信息</param>
  5871. /// <returns></returns>
  5872. public static ServiceResultEntity SaveClearGBChecked(SUserInfo sUserInfo, ClientRequestEntity cre)
  5873. {
  5874. ServiceResultEntity sre = new ServiceResultEntity();
  5875. int checkedID = Convert.ToInt32(cre.Properties["CheckedID"]);
  5876. string barcodes = null;
  5877. if (cre.Properties["Barcodes"] != null)
  5878. {
  5879. barcodes = cre.Properties["Barcodes"].ToString();
  5880. }
  5881. int returnRows = 0;
  5882. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5883. string sql = null;
  5884. OracleParameter[] paras = null;
  5885. try
  5886. {
  5887. if (barcodes == null)
  5888. {
  5889. sql =
  5890. "UPDATE tp_pm_groutingdailydetail gdd\n" +
  5891. " SET gdd.scrapflag = '1'\n" +
  5892. " ,gdd.scraptime = SYSDATE\n" +
  5893. " ,gdd.scrapuser = :UserID\n" +
  5894. " ,gdd.scrapreasonid = -2\n" +
  5895. " ,gdd.scrapreason = '盘亏报损'\n" +
  5896. " ,gdd.ScrapType = 2\n" +
  5897. " WHERE gdd.scrapflag = '0'\n" +
  5898. " AND gdd.deliverflag = '0'\n" +
  5899. //" AND instr(:barcodes, gdd.barcode) > 0";
  5900. " AND exists (select 1 from tp_pm_gbcheckeddetail gbcd where gbcd.GBCheckedID = :CheckedID and gbcd.gbcheckedflag = '0' and gbcd.barcode = gdd.barcode)";
  5901. paras = new OracleParameter[] {
  5902. new OracleParameter(":CheckedID",OracleDbType.Int32,
  5903. checkedID,ParameterDirection.Input),
  5904. new OracleParameter(":UserID",OracleDbType.Int32,
  5905. sUserInfo.UserID,ParameterDirection.Input),
  5906. };
  5907. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5908. sql = "UPDATE tp_pm_gbcheckeddetail gdd\n" +
  5909. " SET gdd.gbcheckedflag = '3'\n" +
  5910. " ,gdd.CheckedDate = SYSDATE\n" +
  5911. " ,gdd.CheckedUserID = :UserID\n" +
  5912. " ,gdd.UpdateUserID = :UserID\n" +
  5913. " WHERE gdd.gbcheckedflag = '0'\n" +
  5914. " AND gdd.GBCheckedID = :CheckedID";
  5915. paras = new OracleParameter[] {
  5916. new OracleParameter(":UserID",OracleDbType.Int32,
  5917. sUserInfo.UserID,ParameterDirection.Input),
  5918. new OracleParameter(":CheckedID",OracleDbType.Int32,
  5919. checkedID,ParameterDirection.Input),
  5920. };
  5921. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5922. }
  5923. else
  5924. {
  5925. string[] barcodelist = barcodes.Split(',');
  5926. foreach (string barcode in barcodelist)
  5927. {
  5928. sql =
  5929. "UPDATE tp_pm_groutingdailydetail gdd\n" +
  5930. " SET gdd.scrapflag = '1'\n" +
  5931. " ,gdd.scraptime = SYSDATE\n" +
  5932. " ,gdd.scrapuser = :UserID\n" +
  5933. " ,gdd.scrapreasonid = -2\n" +
  5934. " ,gdd.scrapreason = '盘亏报损'\n" +
  5935. " ,gdd.ScrapType = 2\n" +
  5936. " WHERE gdd.scrapflag = '0'\n" +
  5937. " AND gdd.deliverflag = '0'\n" +
  5938. //" AND instr(:barcodes, gdd.barcode) > 0";
  5939. " AND gdd.barcode = :barcode";
  5940. paras = new OracleParameter[] {
  5941. //new OracleParameter(":barcodes",OracleDbType.NVarchar2,
  5942. // barcodes,ParameterDirection.Input),
  5943. new OracleParameter(":barcode",OracleDbType.NVarchar2,
  5944. barcode,ParameterDirection.Input),
  5945. new OracleParameter(":UserID",OracleDbType.Int32,
  5946. sUserInfo.UserID,ParameterDirection.Input),
  5947. };
  5948. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5949. sql = "UPDATE tp_pm_gbcheckeddetail gdd\n" +
  5950. " SET gdd.gbcheckedflag = '3'\n" +
  5951. " ,gdd.CheckedDate = SYSDATE\n" +
  5952. " ,gdd.CheckedUserID = :UserID\n" +
  5953. " ,gdd.UpdateUserID = :UserID\n" +
  5954. " WHERE gdd.gbcheckedflag = '0'\n" +
  5955. " AND gdd.GBCheckedID = :CheckedID" +
  5956. //" AND instr(:barcodes, gdd.barcode) > 0";
  5957. " AND gdd.barcode = :barcode";
  5958. paras = new OracleParameter[] {
  5959. //new OracleParameter(":barcodes",OracleDbType.NVarchar2,
  5960. // barcodes,ParameterDirection.Input),
  5961. new OracleParameter(":barcode",OracleDbType.NVarchar2,
  5962. barcode,ParameterDirection.Input),
  5963. new OracleParameter(":UserID",OracleDbType.Int32,
  5964. sUserInfo.UserID,ParameterDirection.Input),
  5965. new OracleParameter(":CheckedID",OracleDbType.Int32,
  5966. checkedID,ParameterDirection.Input),
  5967. };
  5968. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  5969. }
  5970. }
  5971. oracleTrConn.Commit();
  5972. }
  5973. catch (Exception ex)
  5974. {
  5975. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  5976. {
  5977. oracleTrConn.Rollback();
  5978. oracleTrConn.Disconnect();
  5979. }
  5980. throw ex;
  5981. }
  5982. finally
  5983. {
  5984. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  5985. {
  5986. oracleTrConn.Disconnect();
  5987. }
  5988. }
  5989. return sre;
  5990. }
  5991. /// <summary>
  5992. /// 获取盘点单明细
  5993. /// </summary>
  5994. /// <param name="procedureID">工序ID</param>
  5995. /// <returns>DataSet</returns>
  5996. public static DataSet GetUpdateGBCheckedInfo(int checkedID, SUserInfo sUserInfo)
  5997. {
  5998. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  5999. try
  6000. {
  6001. con.Open();
  6002. string sqlString = @"SELECT to_char(checked.UserCheckedCount) || '/' ||
  6003. to_char(checked.CheckedCount) CheckedCount
  6004. ,to_char(checked.UserOverageCount) || '/' ||
  6005. to_char(checked.OverageCount) OverageCount
  6006. ,to_char(checked.UserCheckedCount + checked.UserOverageCount) || '/' ||
  6007. to_char(checked.CheckedCount + checked.OverageCount) || '/' ||
  6008. to_char(TCount) TCount
  6009. FROM (SELECT icd.GBcheckedid
  6010. , SUM(CASE
  6011. WHEN icd.checkeduserid = :userid AND icd.GBCheckedFlag = '1' THEN
  6012. 1
  6013. ELSE
  6014. 0
  6015. END) UserCheckedCount
  6016. , SUM(CASE
  6017. WHEN icd.checkeduserid = :userid AND icd.GBCheckedFlag = '2' THEN
  6018. 1
  6019. ELSE
  6020. 0
  6021. END) UserOverageCount
  6022. , SUM(CASE
  6023. WHEN icd.GBCheckedFlag = '1' THEN
  6024. 1
  6025. ELSE
  6026. 0
  6027. END) CheckedCount
  6028. , SUM(CASE
  6029. WHEN icd.GBCheckedFlag = '2' THEN
  6030. 1
  6031. ELSE
  6032. 0
  6033. END) OverageCount
  6034. ,COUNT(icd.GBcheckedid) TCount
  6035. FROM tp_pm_GBcheckeddetail icd
  6036. WHERE icd.GBcheckedid = :GBcheckedid
  6037. AND icd.valueflag = '1' group by icd.GBcheckedid) checked";
  6038. OracleParameter[] paras = new OracleParameter[]{
  6039. new OracleParameter(":GBcheckedid",OracleDbType.Int32, checkedID, ParameterDirection.Input),
  6040. new OracleParameter(":userid",OracleDbType.Int32, sUserInfo.UserID,ParameterDirection.Input),
  6041. };
  6042. DataSet ds = con.GetSqlResultToDs(sqlString, paras);
  6043. ds.Tables[0].TableName = "Table1";
  6044. sqlString = @"SELECT icd.goodscode, COUNT(icd.goodscode) goodscount
  6045. FROM tp_pm_GBcheckeddetail icd
  6046. WHERE icd.GBcheckedid = :GBcheckedid
  6047. AND icd.checkeduserid = :userid
  6048. AND icd.GBCheckedFlag = '1'
  6049. AND icd.valueflag = '1'
  6050. GROUP BY icd.goodscode";
  6051. DataTable dt = con.GetSqlResultToDt(sqlString, paras);
  6052. dt.TableName = "Table2";
  6053. ds.Tables.Add(dt);
  6054. return ds;
  6055. }
  6056. catch (Exception ex)
  6057. {
  6058. throw ex;
  6059. }
  6060. finally
  6061. {
  6062. if (con.ConnState == ConnectionState.Open)
  6063. {
  6064. con.Close();
  6065. }
  6066. }
  6067. }
  6068. /// <summary>
  6069. /// 成型盘点-盘点选择条码
  6070. /// </summary>
  6071. /// <param name="sUserInfo">用户基本信息</param>
  6072. /// <returns></returns>
  6073. public static ServiceResultEntity GBCheckBarcodes(SUserInfo sUserInfo, ClientRequestEntity cre)
  6074. {
  6075. ServiceResultEntity sre = new ServiceResultEntity();
  6076. int checkedID = Convert.ToInt32(cre.Properties["CheckedID"]);
  6077. string barcodes = null;
  6078. if (cre.Properties["Barcodes"] != null)
  6079. {
  6080. barcodes = cre.Properties["Barcodes"].ToString();
  6081. }
  6082. int returnRows = 0;
  6083. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  6084. try
  6085. {
  6086. string sql = null;
  6087. OracleParameter[] paras = null;
  6088. if (barcodes == null)
  6089. {
  6090. sql = "update TP_PM_GBCheckedDetail set GBCheckedFlag=:GBCheckedFlag,CheckedDate=sysdate,CheckedUserID=:CheckedUserID,UpdateUserID=:UpdateUserID where GBCheckedID=:GBCheckedID and GBCheckedFlag=:whereGBCheckedFlag";
  6091. paras = new OracleParameter[] {
  6092. new OracleParameter(":CheckedUserID",OracleDbType.Int32,
  6093. sUserInfo.UserID,ParameterDirection.Input),
  6094. new OracleParameter(":GBCheckedFlag",OracleDbType.Int32,
  6095. Constant.InCheckedFlag.InCheckeded,ParameterDirection.Input),
  6096. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  6097. checkedID,ParameterDirection.Input),
  6098. new OracleParameter(":whereGBCheckedFlag",OracleDbType.Int32,
  6099. Constant.InCheckedFlag.InCheckedNo,ParameterDirection.Input),
  6100. new OracleParameter(":UpdateUserID",OracleDbType.Int32,
  6101. sUserInfo.UserID,ParameterDirection.Input),
  6102. };
  6103. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  6104. }
  6105. else
  6106. {
  6107. string[] barcode = barcodes.Split(',');
  6108. foreach (string item in barcode)
  6109. {
  6110. sql = "update TP_PM_GBCheckedDetail set GBCheckedFlag=:GBCheckedFlag,CheckedDate=sysdate,CheckedUserID=:CheckedUserID,UpdateUserID=:UpdateUserID where GBCheckedID=:GBCheckedID and BarCode=:BarCode and GBCheckedFlag=:whereGBCheckedFlag";
  6111. paras = new OracleParameter[] {
  6112. new OracleParameter(":CheckedUserID",OracleDbType.Int32,
  6113. sUserInfo.UserID,ParameterDirection.Input),
  6114. new OracleParameter(":GBCheckedFlag",OracleDbType.Int32,
  6115. Constant.InCheckedFlag.InCheckeded,ParameterDirection.Input),
  6116. new OracleParameter(":GBCheckedID",OracleDbType.Int32,
  6117. checkedID,ParameterDirection.Input),
  6118. new OracleParameter(":BarCode",OracleDbType.NVarchar2,
  6119. item,ParameterDirection.Input),
  6120. new OracleParameter(":whereGBCheckedFlag",OracleDbType.Int32,
  6121. Constant.InCheckedFlag.InCheckedNo,ParameterDirection.Input),
  6122. new OracleParameter(":UpdateUserID",OracleDbType.Int32,
  6123. sUserInfo.UserID,ParameterDirection.Input),
  6124. };
  6125. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  6126. }
  6127. }
  6128. oracleTrConn.Commit();
  6129. }
  6130. catch (Exception ex)
  6131. {
  6132. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  6133. {
  6134. oracleTrConn.Rollback();
  6135. oracleTrConn.Disconnect();
  6136. }
  6137. throw ex;
  6138. }
  6139. finally
  6140. {
  6141. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  6142. {
  6143. oracleTrConn.Disconnect();
  6144. }
  6145. }
  6146. return sre;
  6147. }
  6148. /// <summary>
  6149. /// 在产盘点-盘点选择条码
  6150. /// </summary>
  6151. /// <param name="sUserInfo">用户基本信息</param>
  6152. /// <returns></returns>
  6153. public static ServiceResultEntity CheckBarcodes(SUserInfo sUserInfo, ClientRequestEntity cre)
  6154. {
  6155. ServiceResultEntity sre = new ServiceResultEntity();
  6156. int checkedID = Convert.ToInt32(cre.Properties["CheckedID"]);
  6157. string barcodes = null;
  6158. if (cre.Properties["Barcodes"] != null)
  6159. {
  6160. barcodes = cre.Properties["Barcodes"].ToString();
  6161. }
  6162. int returnRows = 0;
  6163. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  6164. try
  6165. {
  6166. string sql = null;
  6167. OracleParameter[] paras = null;
  6168. if (barcodes == null)
  6169. {
  6170. sql = "update TP_PM_InCheckedDetail set InCheckedFlag=:InCheckedFlag,CheckedDate=sysdate,CheckedUserID=:CheckedUserID,UpdateUserID=:UpdateUserID where InCheckedID=:InCheckedID and InCheckedFlag=:whereInCheckedFlag";
  6171. paras = new OracleParameter[] {
  6172. new OracleParameter(":CheckedUserID",OracleDbType.Int32,
  6173. sUserInfo.UserID,ParameterDirection.Input),
  6174. new OracleParameter(":InCheckedFlag",OracleDbType.Int32,
  6175. Constant.InCheckedFlag.InCheckeded,ParameterDirection.Input),
  6176. new OracleParameter(":InCheckedID",OracleDbType.Int32,
  6177. checkedID,ParameterDirection.Input),
  6178. new OracleParameter(":whereInCheckedFlag",OracleDbType.Int32,
  6179. Constant.InCheckedFlag.InCheckedNo,ParameterDirection.Input),
  6180. new OracleParameter(":UpdateUserID",OracleDbType.Int32,
  6181. sUserInfo.UserID,ParameterDirection.Input),
  6182. };
  6183. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  6184. }
  6185. else
  6186. {
  6187. string[] barcode = barcodes.Split(',');
  6188. foreach (string item in barcode)
  6189. {
  6190. sql = "update TP_PM_InCheckedDetail set InCheckedFlag=:InCheckedFlag,CheckedDate=sysdate,CheckedUserID=:CheckedUserID,UpdateUserID=:UpdateUserID where InCheckedID=:InCheckedID and BarCode=:BarCode and InCheckedFlag=:whereInCheckedFlag";
  6191. paras = new OracleParameter[] {
  6192. new OracleParameter(":CheckedUserID",OracleDbType.Int32,
  6193. sUserInfo.UserID,ParameterDirection.Input),
  6194. new OracleParameter(":InCheckedFlag",OracleDbType.Int32,
  6195. Constant.InCheckedFlag.InCheckeded,ParameterDirection.Input),
  6196. new OracleParameter(":InCheckedID",OracleDbType.Int32,
  6197. checkedID,ParameterDirection.Input),
  6198. new OracleParameter(":BarCode",OracleDbType.NVarchar2,
  6199. item,ParameterDirection.Input),
  6200. new OracleParameter(":whereInCheckedFlag",OracleDbType.Int32,
  6201. Constant.InCheckedFlag.InCheckedNo,ParameterDirection.Input),
  6202. new OracleParameter(":UpdateUserID",OracleDbType.Int32,
  6203. sUserInfo.UserID,ParameterDirection.Input),
  6204. };
  6205. returnRows += oracleTrConn.ExecuteNonQuery(sql, paras);
  6206. }
  6207. }
  6208. oracleTrConn.Commit();
  6209. }
  6210. catch (Exception ex)
  6211. {
  6212. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  6213. {
  6214. oracleTrConn.Rollback();
  6215. oracleTrConn.Disconnect();
  6216. }
  6217. throw ex;
  6218. }
  6219. finally
  6220. {
  6221. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  6222. {
  6223. oracleTrConn.Disconnect();
  6224. }
  6225. }
  6226. return sre;
  6227. }
  6228. #endregion
  6229. #region 集中采集的结束工序(包装装板)验证参数(商标、型号、数量)
  6230. /// <summary>
  6231. /// 集中采集的结束工序(包装装板)验证参数(商标、型号、数量)
  6232. /// </summary>
  6233. /// <param name="user">登录用户信息</param>
  6234. /// <param name="se">查询条件</param>
  6235. /// <returns>查询结果</returns>
  6236. public static ServiceResultEntity GetFinishedLoadingCarSetting(SUserInfo user, ClientRequestEntity cre)
  6237. {
  6238. IDBConnection conn = null;
  6239. try
  6240. {
  6241. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  6242. conn.Open();
  6243. //// 列表中产品数量
  6244. //int listCount = (int)cre.Properties["ListCount"];
  6245. //// 第一产品时,获取系统参数
  6246. //if (listCount == 0)
  6247. //{
  6248. string sqlString = "SELECT sss.settingcode, sss.settingvalue\n" +
  6249. " FROM tp_mst_systemsetting sss\n" +
  6250. " WHERE sss.accountid = " + user.AccountID + "\n" +
  6251. " AND sss.settingcode IN ('S_PM_011', 'S_PM_012', 'S_PM_013')";
  6252. IDataParameter[] paras = new OracleParameter[]
  6253. {
  6254. new OracleParameter(":accountID", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  6255. };
  6256. DataTable data = conn.GetSqlResultToDt(sqlString, paras);
  6257. //foreach (DataRow item in data.Rows)
  6258. //{
  6259. // if (item["settingcode"].ToString() == "S_PM_011")
  6260. // {
  6261. // cre.Properties["S_PM_011"] = item["settingvalue"];
  6262. // }
  6263. // else if (item["settingcode"].ToString() == "S_PM_012")
  6264. // {
  6265. // cre.Properties["S_PM_012"] = item["settingvalue"];
  6266. // }
  6267. // else if (item["settingcode"].ToString() == "S_PM_013")
  6268. // {
  6269. // cre.Properties["S_PM_013"] = item["settingvalue"];
  6270. // }
  6271. //}
  6272. //xuwei modify 2021-11-23 装板数量按商标和产品取值
  6273. //===============================================================
  6274. //sqlString = "SELECT G.PLATELIMITNUM FROM TP_MST_GOODS G WHERE G.GOODSID = " + cre.Properties["GoodsID"];
  6275. if(string.IsNullOrEmpty(cre.Properties["logoID"] + ""))
  6276. {
  6277. //兼容原方法,只从产品档案取值
  6278. sqlString = "SELECT G.PLATELIMITNUM,G.PLATELIMITNUMNEW FROM TP_MST_GOODS G WHERE G.GOODSID = " + cre.Properties["GoodsID"];
  6279. }
  6280. else
  6281. {
  6282. //新方法,从产品档案和SAP配置表取值
  6283. sqlString = @"
  6284. SELECT
  6285. PLATELIMITNUM,
  6286. PLATELIMITNUMNEW
  6287. FROM
  6288. (
  6289. SELECT
  6290. 1 id,
  6291. SAP.GOODSID,
  6292. SAP.LOGOID,
  6293. SAP.GOODSCODE,
  6294. SAP.MATERIALCODE,
  6295. SAP.PLATELIMITNUM,
  6296. SAP.PLATELIMITNUMNEW
  6297. FROM
  6298. TP_MST_GOODSLOGOSAP SAP
  6299. WHERE
  6300. GOODSID = {GOODSID}
  6301. AND LOGOID = {LOGOID}
  6302. UNION
  6303. SELECT
  6304. 2 id,
  6305. G.GOODSID,
  6306. G.LOGOID,
  6307. G.GOODSCODE,
  6308. G.MATERIALCODE,
  6309. G.PLATELIMITNUM,
  6310. G.PLATELIMITNUMNEW
  6311. FROM
  6312. TP_MST_GOODS G
  6313. WHERE
  6314. GOODSID = {GOODSID}
  6315. AND LOGOID = {LOGOID}
  6316. ORDER BY
  6317. GOODSCODE,
  6318. LOGOID DESC
  6319. )
  6320. WHERE
  6321. ROWNUM < 2
  6322. ORDER BY id DESC
  6323. "
  6324. .Replace("{GOODSID}", cre.Properties["GoodsID"].ToString())
  6325. .Replace("{LOGOID}", cre.Properties["logoID"].ToString());
  6326. }
  6327. //==========================================================
  6328. //cre.Properties["PLATELIMITNUM"] = conn.GetSqlResultToObj(sqlString);
  6329. //}
  6330. ServiceResultEntity sre = new ServiceResultEntity();
  6331. sre.Data = new DataSet();
  6332. sre.Data.Tables.Add(data);
  6333. //sre.Result = cre.Properties["PLATELIMITNUM"];
  6334. sre.Result = conn.GetSqlResultToDt(sqlString);
  6335. return sre;
  6336. }
  6337. catch (Exception ex)
  6338. {
  6339. throw ex;
  6340. }
  6341. finally
  6342. {
  6343. if (conn != null &&
  6344. conn.ConnState == ConnectionState.Open)
  6345. {
  6346. conn.Close();
  6347. }
  6348. }
  6349. }
  6350. #endregion
  6351. #region 成型报损
  6352. /// <summary>
  6353. /// 根据页面条件获取成型报损一览
  6354. /// </summary>
  6355. /// <param name="selectProEntity">成型报损</param>
  6356. /// <param name="userInfo">用户基本信息</param>
  6357. /// <returns>DataSet</returns>
  6358. public static ServiceResultEntity GetGroutingScrapProduct(ClientRequestEntity cre, SUserInfo userInfo)
  6359. {
  6360. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  6361. try
  6362. {
  6363. ServiceResultEntity result = new ServiceResultEntity();
  6364. con.Open();
  6365. string sqlString = "SELECT sp.BarCode\n" +
  6366. " ,sp.ScrapProductID\n" +
  6367. " ,sp.GoodsID\n" +
  6368. " ,sp.Goodscode\n" +
  6369. " ,sp.Goodsname\n" +
  6370. " ,sp.GroutingDailyID\n" +
  6371. " ,sp.Groutingdailydetailid\n" +
  6372. " ,sp.GroutingDate\n" +
  6373. " ,sp.GroutingLineID\n" +
  6374. " ,sp.Groutinglinecode\n" +
  6375. " ,sp.Groutinglinename\n" +
  6376. " ,sp.GMouldTypeID\n" +
  6377. " ,sp.Groutingmouldcode\n" +
  6378. " ,sp.Mouldcode\n" +
  6379. " ,sp.Groutinguserid\n" +
  6380. " ,sp.Groutingusercode\n" +
  6381. " ,sp.Groutingnum\n" +
  6382. " ,sp.Scraptype\n" +
  6383. " , CASE\n" +
  6384. " WHEN sp.ScrapType = '0' THEN\n" +
  6385. " '开模报损'\n" +
  6386. " WHEN sp.ScrapType = '1' THEN\n" +
  6387. " '普通报损'\n" +
  6388. " WHEN sp.ScrapType = '2' THEN\n" +
  6389. " '盘点报损'\n" +
  6390. " ELSE\n" +
  6391. " '自动报损'\n" +
  6392. " END ScrapTypeName\n" +
  6393. " ,sp.ResponType\n" +
  6394. " ,sp.ScrapDate\n" +
  6395. " ,sp.ScrapRreasonID\n" +
  6396. " ,msr.ScrapReason\n" +
  6397. " ,userInfo.UserName AS UName\n" +
  6398. " ,userInfo.UserCode AS UCode\n" +
  6399. " ,status.AuditStatusName\n" +
  6400. " ,createuser.usercode AS createuser\n" +
  6401. " ,responUser.UserName AS ResponUserName\n" +
  6402. " ,sp.ResponUserCode\n" +
  6403. " ,sp.ResponUserID\n" +
  6404. " ,sp.BackOutFlag\n" +
  6405. " ,sp.BackOutTime\n" +
  6406. " ,sp.BackOutUserID\n" +
  6407. " ,sp.BackOutUserCode\n" +
  6408. " ,backOutUser.UserName AS BackOutUserName\n" +
  6409. " ,sp.Remarks\n" +
  6410. " ,sp.AuditStatus\n" +
  6411. " ,sp.AuditDate\n" +
  6412. " ,sp.Auditopinion\n" +
  6413. " ,sp.Accountdate\n" +
  6414. " ,sp.OPTimeStamp\n" +
  6415. " FROM TP_PM_GroutingScrapProduct sp\n" +
  6416. " INNER JOIN TP_SYS_AuditStatus status\n" +
  6417. " ON sp.AuditStatus = status.AuditStatusID\n" +
  6418. " LEFT JOIN TP_MST_USER userInfo\n" +
  6419. " ON sp.Auditor = userInfo.UserId\n" +
  6420. " LEFT JOIN TP_MST_USER createuser\n" +
  6421. " ON sp.createuserid = createuser.UserId\n" +
  6422. " LEFT JOIN TP_MST_USER responUser\n" +
  6423. " ON sp.ResponUserID = responUser.UserId\n" +
  6424. " LEFT JOIN TP_MST_ScrapReason msr\n" +
  6425. " ON sp.ScrapRreasonID = msr.ScrapReasonID\n" +
  6426. " LEFT JOIN TP_MST_USER backOutUser\n" +
  6427. " ON sp.BackOutUserID = backOutUser.UserId\n" +
  6428. " WHERE sp.ValueFlag = 1\n" +
  6429. " AND sp.AccountID = :in_AccountID";
  6430. List<OracleParameter> paraList = new List<OracleParameter>();
  6431. paraList.Add(new OracleParameter(":in_AccountID", OracleDbType.Int32, userInfo.AccountID, ParameterDirection.Input));
  6432. // 成型报损ID
  6433. if (!string.IsNullOrWhiteSpace(cre.Properties["ScrapProductID"] + ""))
  6434. {
  6435. sqlString += " AND sp.ScrapProductID = :in_ScrapProductID";
  6436. paraList.Add(new OracleParameter(":in_ScrapProductID", OracleDbType.Int32, cre.Properties["ScrapProductID"], ParameterDirection.Input));
  6437. }
  6438. // 产品编码
  6439. if (!string.IsNullOrWhiteSpace(cre.Properties["GoodsCode"] + ""))
  6440. {
  6441. sqlString += " AND INSTR(sp.GoodsCode, :in_GoodsCode) > 0";
  6442. paraList.Add(new OracleParameter(":in_GoodsCode", OracleDbType.NVarchar2, cre.Properties["GoodsCode"] + "", ParameterDirection.Input));
  6443. }
  6444. // 产品名称
  6445. if (!string.IsNullOrWhiteSpace(cre.Properties["GoodsName"] + ""))
  6446. {
  6447. sqlString += " AND INSTR(sp.GoodsName, :in_GoodsName) > 0";
  6448. paraList.Add(new OracleParameter(":in_GoodsName", OracleDbType.NVarchar2, cre.Properties["GoodsName"] + "", ParameterDirection.Input));
  6449. }
  6450. // 产品条码
  6451. if (!string.IsNullOrWhiteSpace(cre.Properties["BarCode"] + ""))
  6452. {
  6453. sqlString += " AND INSTR(sp.BarCode, :in_BarCode) > 0";
  6454. paraList.Add(new OracleParameter(":in_BarCode", OracleDbType.NVarchar2, cre.Properties["BarCode"] + "", ParameterDirection.Input));
  6455. }
  6456. // 成型工号
  6457. if (!string.IsNullOrWhiteSpace(cre.Properties["GroutingUserCode"] + ""))
  6458. {
  6459. sqlString += " AND INSTR(sp.GroutingUserCode, :in_GroutingUserCode) > 0";
  6460. paraList.Add(new OracleParameter(":in_GroutingUserCode", OracleDbType.NVarchar2, cre.Properties["GroutingUserCode"] + "", ParameterDirection.Input));
  6461. }
  6462. // 责任工号
  6463. if (!string.IsNullOrWhiteSpace(cre.Properties["ResponUserCode"] + ""))
  6464. {
  6465. sqlString += " AND INSTR(sp.ResponUserCode, :in_ResponUserCode) > 0";
  6466. paraList.Add(new OracleParameter(":in_ResponUserCode", OracleDbType.NVarchar2, cre.Properties["ResponUserCode"] + "", ParameterDirection.Input));
  6467. }
  6468. // 损坯原因
  6469. if (!string.IsNullOrWhiteSpace(cre.Properties["Rreason"] + ""))
  6470. {
  6471. sqlString += " AND INSTR(msr.ScrapReason, :in_ScrapRreason) > 0";
  6472. paraList.Add(new OracleParameter(":in_ScrapRreason", OracleDbType.NVarchar2, cre.Properties["Rreason"] + "", ParameterDirection.Input));
  6473. }
  6474. // 备注
  6475. if (!string.IsNullOrWhiteSpace(cre.Properties["Remarks"] + ""))
  6476. {
  6477. sqlString += " AND INSTR(sp.Remarks, :in_Remarks) > 0";
  6478. paraList.Add(new OracleParameter(":in_Remarks", OracleDbType.NVarchar2, cre.Properties["Remarks"] + "", ParameterDirection.Input));
  6479. }
  6480. // 审核状态
  6481. if (!string.IsNullOrWhiteSpace(cre.Properties["AuditStatus"] + ""))
  6482. {
  6483. sqlString += " AND sp.AuditStatus = :in_AuditStatus";
  6484. paraList.Add(new OracleParameter(":in_AuditStatus", OracleDbType.Int32, cre.Properties["AuditStatus"], ParameterDirection.Input));
  6485. }
  6486. // 报损开始日期
  6487. if (!string.IsNullOrWhiteSpace(cre.Properties["ScrapDateStart"] + ""))
  6488. {
  6489. sqlString += " AND sp.ScrapDate >= :in_ScrapDateStart";
  6490. paraList.Add(new OracleParameter(":in_ScrapDateStart", OracleDbType.Date, Convert.ToDateTime(cre.Properties["ScrapDateStart"]), ParameterDirection.Input));
  6491. }
  6492. // 报损结束日期
  6493. if (!string.IsNullOrWhiteSpace(cre.Properties["ScrapDateEnd"] + ""))
  6494. {
  6495. sqlString += " AND sp.ScrapDate <= :in_ScrapDateEnd";
  6496. paraList.Add(new OracleParameter(":in_ScrapDateEnd", OracleDbType.Date, Convert.ToDateTime(cre.Properties["ScrapDateEnd"]), ParameterDirection.Input));
  6497. }
  6498. sqlString += " ORDER BY sp.BarCode ";
  6499. DataSet dsReturn = con.GetSqlResultToDs(sqlString, paraList.ToArray());
  6500. // 是否查责任员工
  6501. if (!string.IsNullOrWhiteSpace(cre.Properties["IsSearchStaff"] + ""))
  6502. {
  6503. string detailString = "SELECT Mu.userid\n" +
  6504. " ,Staff.Staffid\n" +
  6505. " ,Staff.Staffname\n" +
  6506. " ,Staff.Organizationid\n" +
  6507. " ,Staff.Jobs\n" +
  6508. " ,Staff.Staffstatus\n" +
  6509. " ,Staff.Staffcode\n" +
  6510. " ,Jobs.Jobsname\n" +
  6511. " ,Mu.UserCode\n" +
  6512. " ,TUserJobs.Jobsname AS UJobsName\n" +
  6513. " ,TUserJobs.JobsId AS UJobsId\n" +
  6514. " , CASE\n" +
  6515. " WHEN PPG.ResponsibleID IS NULL THEN\n" +
  6516. " 0\n" +
  6517. " ELSE\n" +
  6518. " 1\n" +
  6519. " END UserSelected\n" +
  6520. " FROM TP_PM_GroutingScrapProduct PGS\n" +
  6521. " INNER JOIN TP_MST_User Mu\n" +
  6522. " ON PGS.ResponUserID = Mu.Userid\n" +
  6523. " INNER JOIN TP_MST_UserStaff Mus\n" +
  6524. " ON Mu.Userid = Mus.Userid\n" +
  6525. " INNER JOIN TP_HR_Staff Staff\n" +
  6526. " ON Mus.StaffID = Staff.Staffid\n" +
  6527. " LEFT JOIN TP_MST_Jobs Jobs\n" +
  6528. " ON Staff.Jobs = Jobs.Jobsid\n" +
  6529. " LEFT JOIN TP_MST_Jobs TUserJobs\n" +
  6530. " ON TUserJobs.Jobsid = Mus.Ujobsid\n" +
  6531. " LEFT JOIN TP_PM_GroutingScrapResponsible PPG\n" +
  6532. " ON Staff.Staffid = PPG.Staffid\n" +
  6533. " AND PPG.ScrapProductID = :in_ScrapProductID\n" +
  6534. " WHERE PGS.ScrapProductID = :in_ScrapProductID";
  6535. OracleParameter[] dparas = new OracleParameter[] {
  6536. new OracleParameter(":in_ScrapProductID",OracleDbType.Int32,
  6537. cre.Properties["ScrapProductID"],ParameterDirection.Input),
  6538. };
  6539. DataTable returnTable = con.GetSqlResultToDt(detailString, dparas);
  6540. if (dsReturn != null)
  6541. {
  6542. dsReturn.Tables.Add(returnTable);
  6543. }
  6544. }
  6545. result.Data = dsReturn;
  6546. return result;
  6547. }
  6548. catch (Exception ex)
  6549. {
  6550. throw ex;
  6551. }
  6552. finally
  6553. {
  6554. if (con.ConnState == ConnectionState.Open)
  6555. {
  6556. con.Close();
  6557. }
  6558. }
  6559. }
  6560. /// <summary>
  6561. /// 获取成型报损信息 用于撤销使用 支持 浆日报直接报损
  6562. /// </summary>
  6563. /// <param name="cre"></param>
  6564. /// <param name="userInfo"></param>
  6565. /// <returns></returns>
  6566. public static ServiceResultEntity GetGroutingScrap(ClientRequestEntity cre, SUserInfo userInfo)
  6567. {
  6568. IDBConnection conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  6569. try
  6570. {
  6571. ServiceResultEntity result = new ServiceResultEntity();
  6572. conn.Open();
  6573. //先从成型报损查询
  6574. string sqlString = @"
  6575. SELECT
  6576. S.BARCODE,
  6577. U.USERCODE,
  6578. S.GOODSCODE,
  6579. S.GROUTINGMOULDCODE,
  6580. S.GROUTINGDATE
  6581. FROM
  6582. TP_PM_GROUTINGSCRAPPRODUCT S
  6583. LEFT JOIN TP_MST_USER U ON S.AUDITOR = U.USERID
  6584. WHERE
  6585. S.VALUEFLAG = '1'
  6586. AND S.BARCODE = :in_BarCode
  6587. ";
  6588. List<OracleParameter> paraList = new List<OracleParameter>();
  6589. paraList.Add(new OracleParameter(":in_BarCode", OracleDbType.Varchar2, cre.Properties["BarCode"], ParameterDirection.Input));
  6590. DataSet dtScrap = conn.GetSqlResultToDs(sqlString, paraList.ToArray());
  6591. //如果没有再从注浆日报损坯标记查询
  6592. if(dtScrap.Tables[0].Rows.Count==0)
  6593. {
  6594. sqlString = @"
  6595. SELECT
  6596. S.BARCODE,
  6597. S.USERCODE,
  6598. S.GOODSCODE,
  6599. S.GROUTINGMOULDCODE,
  6600. S.GROUTINGDATE
  6601. FROM
  6602. TP_PM_GROUTINGDAILYDETAIL S
  6603. WHERE
  6604. S.VALUEFLAG = '1'
  6605. AND S.SCRAPFLAG = '1'
  6606. AND S.BARCODE = :in_BarCode
  6607. ";
  6608. dtScrap = conn.GetSqlResultToDs(sqlString, paraList.ToArray());
  6609. if (dtScrap.Tables[0].Rows.Count == 0)
  6610. {
  6611. result.Message = "没查询到报损数据!";
  6612. result.Status = Constant.ServiceResultStatus.NoSearchResults;
  6613. }
  6614. else
  6615. {
  6616. result.Message = "这是注浆日报报损数据!";
  6617. result.Status = Constant.ServiceResultStatus.Success;
  6618. }
  6619. }
  6620. else
  6621. {
  6622. result.Message = "这是成型报损数据!";
  6623. result.Status = Constant.ServiceResultStatus.Success;
  6624. }
  6625. result.Data = dtScrap;
  6626. return result;
  6627. }
  6628. catch (Exception ex)
  6629. {
  6630. throw ex;
  6631. }
  6632. finally
  6633. {
  6634. if (conn.ConnState == ConnectionState.Open)
  6635. {
  6636. conn.Close();
  6637. }
  6638. }
  6639. }
  6640. /// <summary>
  6641. /// 保存成型报损数据
  6642. /// </summary>
  6643. /// <param name="cre"></param>
  6644. /// <param name="userInfo"></param>
  6645. /// <returns></returns>
  6646. public static ServiceResultEntity SaveGroutingScrapProduct(ClientRequestEntity cre, SUserInfo userInfo)
  6647. {
  6648. ServiceResultEntity result = new ServiceResultEntity();
  6649. result.Status = Constant.ServiceResultStatus.Success;
  6650. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  6651. string sqlString = string.Empty;
  6652. int returnRow = Constant.INT_IS_ZERO;
  6653. try
  6654. {
  6655. oracleTrConn.Connect();
  6656. int scrapProductID = Convert.ToInt32(cre.Properties["ScrapProductID"]);
  6657. #region 1、判断是否符合报损条件(未注浆,交坯之后不允许报损,是否进行过了报损)
  6658. sqlString = "SELECT GroutingFlag,DeliverFlag,ScrapFlag,beginningflag\n" +
  6659. " FROM TP_PM_GroutingDailyDetail \n" +
  6660. " WHERE AccountID = :AccountID\n" +
  6661. " AND BarCode = :BarCode\n";
  6662. OracleParameter[] paras = new OracleParameter[] {
  6663. new OracleParameter(":AccountID",OracleDbType.Int32, userInfo.AccountID, ParameterDirection.Input),
  6664. new OracleParameter(":Barcode",OracleDbType.NVarchar2, cre.Properties["BarCode"], ParameterDirection.Input),
  6665. };
  6666. DataTable returnTable = oracleTrConn.GetSqlResultToDt(sqlString, paras);
  6667. // 编码不存在
  6668. if (returnTable.Rows.Count == 0)
  6669. {
  6670. result.Result = -99;
  6671. result.Status = Constant.ServiceResultStatus.SystemError;
  6672. result.Message = "未查询到该产品信息,请确认该产品是否已经进行注浆";
  6673. return result;
  6674. }
  6675. // 未注浆
  6676. if ("0".Equals(returnTable.Rows[0]["GroutingFlag"]))
  6677. {
  6678. result.Result = -100;
  6679. result.Status = Constant.ServiceResultStatus.SystemError;
  6680. result.Message = "该产品还未进行注浆";
  6681. return result;
  6682. }
  6683. // 已经交坯
  6684. if ("1".Equals(returnTable.Rows[0]["DeliverFlag"]))
  6685. {
  6686. result.Result = -101;
  6687. result.Status = Constant.ServiceResultStatus.SystemError;
  6688. result.Message = "该产品已经交坯";
  6689. return result;
  6690. }
  6691. // 已经报损(新建才行进行判断)
  6692. if ("1".Equals(returnTable.Rows[0]["ScrapFlag"]) && scrapProductID == 0)
  6693. {
  6694. result.Result = -102;
  6695. result.Status = Constant.ServiceResultStatus.SystemError;
  6696. result.Message = "该产品已经报损";
  6697. return result;
  6698. }
  6699. // 该产品已进入生产工序
  6700. if ("1".Equals(returnTable.Rows[0]["beginningflag"]))
  6701. {
  6702. result.Result = -102;
  6703. result.Status = Constant.ServiceResultStatus.SystemError;
  6704. result.Message = "该产品已进入生产工序";
  6705. return result;
  6706. }
  6707. #endregion
  6708. #region 2、保存报损信息
  6709. int? auditor = null;
  6710. DateTime? auditDate = null;
  6711. if (!Constant.AuditStatus.Pending.GetHashCode().Equals(cre.Properties["AuditStatus"]))
  6712. {
  6713. auditor = userInfo.UserID;
  6714. auditDate = DateTime.Now;
  6715. }
  6716. #region 新建
  6717. if (scrapProductID == 0)
  6718. {
  6719. #region 报损总表
  6720. sqlString = "SELECT SEQ_PM_GroutingScrapProduct_ID.nextval FROM DUAL";
  6721. scrapProductID = Convert.ToInt32(oracleTrConn.GetSqlResultToStr(sqlString));
  6722. sqlString = "INSERT INTO TP_PM_GroutingScrapProduct\n" +
  6723. " (ScrapProductID\n" +
  6724. " ,BarCode\n" +
  6725. " ,GoodsID\n" +
  6726. " ,GoodsCode\n" +
  6727. " ,GoodsName\n" +
  6728. " ,GroutingDailyID\n" +
  6729. " ,GroutingDailyDetailID\n" +
  6730. " ,GroutingDate\n" +
  6731. " ,GroutingLineID\n" +
  6732. " ,GroutingLineCode\n" +
  6733. " ,GroutingLineName\n" +
  6734. " ,GMouldTypeID\n" +
  6735. " ,GroutingLineDetailID\n" +
  6736. " ,GroutingMouldCode\n" +
  6737. " ,MouldCode\n" +
  6738. " ,GroutingUserID\n" +
  6739. " ,GroutingUserCode\n" +
  6740. " ,GroutingNum\n" +
  6741. " ,ScrapType\n" +
  6742. " ,ResponType\n" +
  6743. " ,ScrapDate\n" +
  6744. " ,ScrapRreasonID\n" +
  6745. " ,ResponUserID\n" +
  6746. " ,ResponUserCode\n" +
  6747. " ,Remarks\n" +
  6748. " ,AuditStatus\n" +
  6749. " ,Auditor\n" +
  6750. " ,AuditDate\n" +
  6751. " ,AccountDate\n" +
  6752. " ,AccountID\n" +
  6753. " ,CreateUserID\n" +
  6754. " ,UpdateUserID)\n" +
  6755. "VALUES\n" +
  6756. " (:ScrapProductID\n" +
  6757. " ,:BarCode\n" +
  6758. " ,:GoodsID\n" +
  6759. " ,:GoodsCode\n" +
  6760. " ,:GoodsName\n" +
  6761. " ,:GroutingDailyID\n" +
  6762. " ,:GroutingDailyDetailID\n" +
  6763. " ,:GroutingDate\n" +
  6764. " ,:GroutingLineID\n" +
  6765. " ,:GroutingLineCode\n" +
  6766. " ,:GroutingLineName\n" +
  6767. " ,:GMouldTypeID\n" +
  6768. " ,:GroutingLineDetailID\n" +
  6769. " ,:GroutingMouldCode\n" +
  6770. " ,:MouldCode\n" +
  6771. " ,:GroutingUserID\n" +
  6772. " ,:GroutingUserCode\n" +
  6773. " ,:GroutingNum\n" +
  6774. " ,:ScrapType\n" +
  6775. " ,:ResponType\n" +
  6776. " ,:ScrapDate\n" +
  6777. " ,:ScrapRreasonID\n" +
  6778. " ,:ResponUserID\n" +
  6779. " ,:ResponUserCode\n" +
  6780. " ,:Remarks\n" +
  6781. " ,:AuditStatus\n" +
  6782. " ,:Auditor\n" +
  6783. " ,:AuditDate\n" +
  6784. " ,sysdate\n" +
  6785. " ,:AccountID\n" +
  6786. " ,:CreateUserID\n" +
  6787. " ,:UpdateUserID)";
  6788. paras = new OracleParameter[] {
  6789. new OracleParameter(":ScrapProductID",OracleDbType.Int32, scrapProductID, ParameterDirection.Input),
  6790. new OracleParameter(":Barcode",OracleDbType.NVarchar2, cre.Properties["BarCode"], ParameterDirection.Input),
  6791. new OracleParameter(":GoodsID",OracleDbType.Int32, cre.Properties["GoodsID"], ParameterDirection.Input),
  6792. new OracleParameter(":GoodsCode",OracleDbType.NVarchar2, cre.Properties["GoodsCode"], ParameterDirection.Input),
  6793. new OracleParameter(":GoodsName",OracleDbType.NVarchar2, cre.Properties["GoodsName"], ParameterDirection.Input),
  6794. new OracleParameter(":GroutingDailyID",OracleDbType.Int32, cre.Properties["GroutingDailyID"], ParameterDirection.Input),
  6795. new OracleParameter(":GroutingDailyDetailID",OracleDbType.Int32,
  6796. cre.Properties["GroutingDailyDetailID"], ParameterDirection.Input),
  6797. new OracleParameter(":GroutingDate",OracleDbType.Date,
  6798. Convert.ToDateTime(cre.Properties["GroutingDate"]), ParameterDirection.Input),
  6799. new OracleParameter(":GroutingLineID",OracleDbType.Int32, cre.Properties["GroutingLineID"], ParameterDirection.Input),
  6800. new OracleParameter(":GroutingLineCode",OracleDbType.NVarchar2, cre.Properties["GroutingLineCode"], ParameterDirection.Input),
  6801. new OracleParameter(":GroutingLineName",OracleDbType.NVarchar2, cre.Properties["GroutingLineName"], ParameterDirection.Input),
  6802. new OracleParameter(":GMouldTypeID",OracleDbType.Int32, cre.Properties["GMouldTypeID"], ParameterDirection.Input),
  6803. new OracleParameter(":GroutingLineDetailID",OracleDbType.Int32, cre.Properties["GroutingLineDetailID"], ParameterDirection.Input),
  6804. new OracleParameter(":GroutingMouldCode",OracleDbType.NVarchar2, cre.Properties["GroutingMouldCode"], ParameterDirection.Input),
  6805. new OracleParameter(":MouldCode",OracleDbType.NVarchar2, cre.Properties["MouldCode"], ParameterDirection.Input),
  6806. new OracleParameter(":GroutingUserID",OracleDbType.Int32, cre.Properties["GroutingUserID"], ParameterDirection.Input),
  6807. new OracleParameter(":GroutingUserCode",OracleDbType.NVarchar2, cre.Properties["GroutingUserCode"], ParameterDirection.Input),
  6808. new OracleParameter(":GroutingNum",OracleDbType.Decimal, cre.Properties["GroutingNum"], ParameterDirection.Input),
  6809. new OracleParameter(":ScrapType",OracleDbType.Char, cre.Properties["ScrapType"], ParameterDirection.Input),
  6810. new OracleParameter(":ResponType",OracleDbType.Char, Constant.ScrapResponType.Person.GetHashCode(),
  6811. ParameterDirection.Input),
  6812. new OracleParameter(":ScrapDate",OracleDbType.Date,
  6813. Convert.ToDateTime(cre.Properties["ScrapDate"]), ParameterDirection.Input),
  6814. new OracleParameter(":ScrapRreasonID",OracleDbType.Int32, cre.Properties["ScrapRreasonID"], ParameterDirection.Input),
  6815. new OracleParameter(":ResponUserID",OracleDbType.Int32, cre.Properties["ResponUserID"], ParameterDirection.Input),
  6816. new OracleParameter(":ResponUserCode",OracleDbType.NVarchar2, cre.Properties["ResponUserCode"], ParameterDirection.Input),
  6817. new OracleParameter(":Remarks",OracleDbType.NVarchar2, cre.Properties["Remarks"], ParameterDirection.Input),
  6818. new OracleParameter(":AuditStatus",OracleDbType.Int32, cre.Properties["AuditStatus"], ParameterDirection.Input),
  6819. new OracleParameter(":Auditor",OracleDbType.Int32, auditor, ParameterDirection.Input),
  6820. new OracleParameter(":AuditDate",OracleDbType.Date, auditDate, ParameterDirection.Input),
  6821. new OracleParameter(":AccountID",OracleDbType.Int32, userInfo.AccountID, ParameterDirection.Input),
  6822. new OracleParameter(":CreateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  6823. new OracleParameter(":UpdateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  6824. };
  6825. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  6826. #endregion
  6827. #region 报损责任者
  6828. if (cre.Data != null && cre.Data.Tables.Count > 0
  6829. && cre.Data.Tables[0].Rows.Count > 0)
  6830. {
  6831. foreach (DataRow row in cre.Data.Tables[0].Rows)
  6832. {
  6833. sqlString = "INSERT INTO TP_PM_GroutingScrapResponsible\n" +
  6834. " (\n" +
  6835. " ScrapProductID\n" +
  6836. " ,BarCode\n" +
  6837. " ,StaffID\n" +
  6838. " ,StaffStatus\n" +
  6839. " ,UserID\n" +
  6840. " ,UserCode\n" +
  6841. " ,UJobsID\n" +
  6842. " ,SJobsID\n" +
  6843. " ,AccountID\n" +
  6844. " ,CreateUserID\n" +
  6845. " ,UpdateUserID)\n" +
  6846. "VALUES\n" +
  6847. " (\n" +
  6848. " :ScrapProductID\n" +
  6849. " ,:BarCode\n" +
  6850. " ,:StaffID\n" +
  6851. " ,:StaffStatus\n" +
  6852. " ,:UserID\n" +
  6853. " ,:UserCode\n" +
  6854. " ,:UJobsID\n" +
  6855. " ,:SJobsID\n" +
  6856. " ,:AccountID\n" +
  6857. " ,:CreateUserID\n" +
  6858. " ,:UpdateUserID)";
  6859. paras = new OracleParameter[] {
  6860. new OracleParameter(":ScrapProductID",OracleDbType.Int32, scrapProductID, ParameterDirection.Input),
  6861. new OracleParameter(":Barcode",OracleDbType.NVarchar2, cre.Properties["BarCode"], ParameterDirection.Input),
  6862. new OracleParameter(":StaffID",OracleDbType.Int32, row["StaffID"], ParameterDirection.Input),
  6863. new OracleParameter(":StaffStatus",OracleDbType.Int32, row["StaffStatus"], ParameterDirection.Input),
  6864. new OracleParameter(":UserID",OracleDbType.Int32, row["UserID"], ParameterDirection.Input),
  6865. new OracleParameter(":UserCode",OracleDbType.NVarchar2, row["UserCode"], ParameterDirection.Input),
  6866. new OracleParameter(":UJobsID",OracleDbType.Int32, row["UJobsId"], ParameterDirection.Input),
  6867. new OracleParameter(":SJobsID",OracleDbType.Int32, row["Jobs"], ParameterDirection.Input),
  6868. new OracleParameter(":AccountID",OracleDbType.Int32, userInfo.AccountID, ParameterDirection.Input),
  6869. new OracleParameter(":CreateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  6870. new OracleParameter(":UpdateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  6871. };
  6872. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  6873. }
  6874. }
  6875. #endregion
  6876. #region 更新注浆日报明细表
  6877. sqlString = "UPDATE TP_PM_GroutingDailyDetail\n" +
  6878. " SET ScrapFlag = :ScrapFlag\n" +
  6879. " ,SReasonID = :SReasonID\n" +
  6880. " ,ScrapType = :ScrapType\n" +
  6881. " ,ScrapTime = sysdate\n" +
  6882. " ,ScrapUser = :ScrapUser\n" +
  6883. " ,UpdateUserID = :UpdateUserID\n" +
  6884. " WHERE GroutingDailyDetailID = :GroutingDailyDetailID";
  6885. paras = new OracleParameter[] {
  6886. new OracleParameter(":ScrapFlag",OracleDbType.Char, 1, ParameterDirection.Input),
  6887. new OracleParameter(":SReasonID",OracleDbType.NVarchar2, cre.Properties["ScrapRreasonID"], ParameterDirection.Input),
  6888. new OracleParameter(":ScrapType",OracleDbType.Char, cre.Properties["ScrapType"], ParameterDirection.Input),
  6889. //new OracleParameter(":ScrapTime",OracleDbType.Date,
  6890. // Convert.ToDateTime(cre.Properties["ScrapDate"]), ParameterDirection.Input),
  6891. new OracleParameter(":ScrapUser",OracleDbType.Int32, cre.Properties["ResponUserID"], ParameterDirection.Input),
  6892. new OracleParameter(":UpdateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  6893. new OracleParameter(":GroutingDailyDetailID",OracleDbType.Int32,
  6894. cre.Properties["GroutingDailyDetailID"], ParameterDirection.Input),
  6895. };
  6896. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  6897. #endregion
  6898. }
  6899. #endregion
  6900. #region 编辑
  6901. else
  6902. {
  6903. #region 报损总表
  6904. sqlString = "UPDATE TP_PM_GroutingScrapProduct\n" +
  6905. " SET ScrapType = :in_ScrapType\n" +
  6906. " ,ResponType = :in_ResponType\n" +
  6907. " ,ScrapDate = :in_ScrapDate\n" +
  6908. " ,ScrapRreasonID = :in_ScrapRreasonID\n" +
  6909. " ,ResponUserID = :in_ResponUserID\n" +
  6910. " ,ResponUserCode = :in_ResponUserCode\n" +
  6911. " ,Remarks = :in_Remarks\n" +
  6912. " ,AuditStatus = :in_AuditStatus\n" +
  6913. " ,Auditor = :in_Auditor\n" +
  6914. " ,AuditDate = :in_AuditDate\n" +
  6915. " ,UpdateUserID = :in_UpdateUserID\n" +
  6916. " WHERE ScrapProductID = :in_ScrapProductID";
  6917. paras = new OracleParameter[] {
  6918. new OracleParameter(":in_ScrapProductID",OracleDbType.Int32, scrapProductID, ParameterDirection.Input),
  6919. new OracleParameter(":in_ScrapType",OracleDbType.Char, cre.Properties["ScrapType"], ParameterDirection.Input),
  6920. new OracleParameter(":in_ResponType",OracleDbType.Char, Constant.ScrapResponType.Person.GetHashCode(),
  6921. ParameterDirection.Input),
  6922. new OracleParameter(":in_ScrapDate",OracleDbType.Date,
  6923. Convert.ToDateTime(cre.Properties["ScrapDate"]), ParameterDirection.Input),
  6924. new OracleParameter(":in_ScrapRreasonID",OracleDbType.Int32, cre.Properties["ScrapRreasonID"], ParameterDirection.Input),
  6925. new OracleParameter(":in_ResponUserID",OracleDbType.Int32, cre.Properties["ResponUserID"], ParameterDirection.Input),
  6926. new OracleParameter(":in_ResponUserCode",OracleDbType.NVarchar2, cre.Properties["ResponUserCode"], ParameterDirection.Input),
  6927. new OracleParameter(":in_Remarks",OracleDbType.NVarchar2, cre.Properties["Remarks"], ParameterDirection.Input),
  6928. new OracleParameter(":in_AuditStatus",OracleDbType.Int32, cre.Properties["AuditStatus"], ParameterDirection.Input),
  6929. new OracleParameter(":in_Auditor",OracleDbType.Int32, auditor, ParameterDirection.Input),
  6930. new OracleParameter(":in_AuditDate",OracleDbType.Date, auditDate, ParameterDirection.Input),
  6931. new OracleParameter(":in_UpdateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  6932. };
  6933. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  6934. #endregion
  6935. #region 报损责任者
  6936. if (cre.Data != null && cre.Data.Tables.Count > 0
  6937. && cre.Data.Tables[0].Rows.Count > 0)
  6938. {
  6939. // 先删除 后插入
  6940. sqlString = "DELETE TP_PM_GroutingScrapResponsible\n" +
  6941. " WHERE ScrapProductID = :in_ScrapProductID";
  6942. paras = new OracleParameter[] {
  6943. new OracleParameter(":in_ScrapProductID",OracleDbType.Int32, scrapProductID, ParameterDirection.Input),
  6944. };
  6945. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  6946. foreach (DataRow row in cre.Data.Tables[0].Rows)
  6947. {
  6948. sqlString = "INSERT INTO TP_PM_GroutingScrapResponsible\n" +
  6949. " (\n" +
  6950. " ScrapProductID\n" +
  6951. " ,BarCode\n" +
  6952. " ,StaffID\n" +
  6953. " ,StaffStatus\n" +
  6954. " ,UserID\n" +
  6955. " ,UserCode\n" +
  6956. " ,UJobsID\n" +
  6957. " ,SJobsID\n" +
  6958. " ,AccountID\n" +
  6959. " ,CreateUserID\n" +
  6960. " ,UpdateUserID)\n" +
  6961. "VALUES\n" +
  6962. " (\n" +
  6963. " :ScrapProductID\n" +
  6964. " ,:BarCode\n" +
  6965. " ,:StaffID\n" +
  6966. " ,:StaffStatus\n" +
  6967. " ,:UserID\n" +
  6968. " ,:UserCode\n" +
  6969. " ,:UJobsID\n" +
  6970. " ,:SJobsID\n" +
  6971. " ,:AccountID\n" +
  6972. " ,:CreateUserID\n" +
  6973. " ,:UpdateUserID)";
  6974. paras = new OracleParameter[] {
  6975. new OracleParameter(":ScrapProductID",OracleDbType.Int32, scrapProductID, ParameterDirection.Input),
  6976. new OracleParameter(":Barcode",OracleDbType.NVarchar2, cre.Properties["BarCode"], ParameterDirection.Input),
  6977. new OracleParameter(":StaffID",OracleDbType.Int32, row["StaffID"], ParameterDirection.Input),
  6978. new OracleParameter(":StaffStatus",OracleDbType.Int32, row["StaffStatus"], ParameterDirection.Input),
  6979. new OracleParameter(":UserID",OracleDbType.Int32, row["UserID"], ParameterDirection.Input),
  6980. new OracleParameter(":UserCode",OracleDbType.NVarchar2, row["UserCode"], ParameterDirection.Input),
  6981. new OracleParameter(":UJobsID",OracleDbType.Int32, row["UJobsId"], ParameterDirection.Input),
  6982. new OracleParameter(":SJobsID",OracleDbType.Int32, row["Jobs"], ParameterDirection.Input),
  6983. new OracleParameter(":AccountID",OracleDbType.Int32, userInfo.AccountID, ParameterDirection.Input),
  6984. new OracleParameter(":CreateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  6985. new OracleParameter(":UpdateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  6986. };
  6987. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  6988. }
  6989. }
  6990. #endregion
  6991. #region 更新注浆日报明细表
  6992. sqlString = "UPDATE TP_PM_GroutingDailyDetail\n" +
  6993. " SET SReasonID = :SReasonID\n" +
  6994. " ,ScrapType = :ScrapType\n" +
  6995. " ,ScrapTime = sysdate\n" +
  6996. " ,ScrapUser = :ScrapUser\n" +
  6997. " ,UpdateUserID = :UpdateUserID\n" +
  6998. " WHERE GroutingDailyDetailID = :GroutingDailyDetailID";
  6999. paras = new OracleParameter[] {
  7000. new OracleParameter(":SReasonID",OracleDbType.Int32, cre.Properties["ScrapRreasonID"], ParameterDirection.Input),
  7001. new OracleParameter(":ScrapType",OracleDbType.Char, cre.Properties["ScrapType"], ParameterDirection.Input),
  7002. //new OracleParameter(":ScrapTime",OracleDbType.Date,
  7003. // Convert.ToDateTime(cre.Properties["ScrapDate"]), ParameterDirection.Input),
  7004. new OracleParameter(":ScrapUser",OracleDbType.Int32, cre.Properties["ResponUserID"], ParameterDirection.Input),
  7005. new OracleParameter(":UpdateUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  7006. new OracleParameter(":GroutingDailyDetailID",OracleDbType.Int32,
  7007. cre.Properties["GroutingDailyDetailID"], ParameterDirection.Input),
  7008. };
  7009. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  7010. #endregion
  7011. }
  7012. #endregion
  7013. #endregion
  7014. oracleTrConn.Commit();
  7015. }
  7016. catch (Exception ex)
  7017. {
  7018. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  7019. {
  7020. oracleTrConn.Rollback();
  7021. oracleTrConn.Disconnect();
  7022. }
  7023. result.Result = -999;
  7024. result.Status = Constant.ServiceResultStatus.SystemError;
  7025. result.Message = "成型报损保存失败";
  7026. throw ex;
  7027. }
  7028. finally
  7029. {
  7030. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  7031. {
  7032. oracleTrConn.Disconnect();
  7033. }
  7034. }
  7035. result.Result = returnRow;
  7036. return result;
  7037. }
  7038. /// <summary>
  7039. /// 审核成型报损
  7040. /// </summary>
  7041. /// <param name="cre"></param>
  7042. /// <param name="userInfo"></param>
  7043. /// <returns></returns>
  7044. public static ServiceResultEntity AuditGroutingScrapProduct(ClientRequestEntity cre, SUserInfo userInfo)
  7045. {
  7046. ServiceResultEntity result = new ServiceResultEntity();
  7047. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7048. string sqlString = string.Empty;
  7049. int returnRow = Constant.INT_IS_ZERO;
  7050. try
  7051. {
  7052. oracleTrConn.Connect();
  7053. #region 1、校验该成型报损是否是待审状态
  7054. sqlString = "SELECT 1\n" +
  7055. " FROM TP_PM_GroutingScrapProduct \n" +
  7056. " WHERE ScrapProductID = :in_ScrapProductID\n" +
  7057. " AND AuditStatus = 0";
  7058. OracleParameter[] paras = new OracleParameter[] {
  7059. new OracleParameter(":in_ScrapProductID",OracleDbType.Int32, cre.Properties["ScrapProductID"], ParameterDirection.Input),
  7060. };
  7061. DataTable returnTable = oracleTrConn.GetSqlResultToDt(sqlString, paras);
  7062. // 审核状态不是待审
  7063. if (returnTable.Rows.Count == 0)
  7064. {
  7065. result.Result = -99;
  7066. return result;
  7067. }
  7068. #endregion
  7069. #region 2、审核
  7070. sqlString = "UPDATE TP_PM_GroutingScrapProduct\n" +
  7071. " SET AuditStatus = :in_AuditStatus\n" +
  7072. " ,Auditor = :in_Auditor\n" +
  7073. " ,AuditDate = :in_AuditDate\n" +
  7074. " ,AuditOpinion = :in_AuditOpinion\n" +
  7075. " WHERE ScrapProductID = :in_ScrapProductID";
  7076. paras = new OracleParameter[] {
  7077. new OracleParameter(":in_ScrapProductID",OracleDbType.Int32, cre.Properties["ScrapProductID"], ParameterDirection.Input),
  7078. new OracleParameter(":in_AuditStatus",OracleDbType.Int32, cre.Properties["AuditStatus"], ParameterDirection.Input),
  7079. new OracleParameter(":in_Auditor",OracleDbType.Int32, cre.Properties["Auditor"], ParameterDirection.Input),
  7080. new OracleParameter(":in_AuditDate",OracleDbType.Date, DateTime.Now, ParameterDirection.Input),
  7081. new OracleParameter(":in_AuditOpinion",OracleDbType.NVarchar2, cre.Properties["AuditOpinion"], ParameterDirection.Input),
  7082. };
  7083. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  7084. #endregion
  7085. oracleTrConn.Commit();
  7086. }
  7087. catch (Exception ex)
  7088. {
  7089. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  7090. {
  7091. oracleTrConn.Rollback();
  7092. oracleTrConn.Disconnect();
  7093. }
  7094. throw ex;
  7095. }
  7096. finally
  7097. {
  7098. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  7099. {
  7100. oracleTrConn.Disconnect();
  7101. }
  7102. }
  7103. result.Result = returnRow;
  7104. return result;
  7105. }
  7106. /// <summary>
  7107. /// 撤销成型报损
  7108. /// </summary>
  7109. /// <param name="cre"></param>
  7110. /// <param name="userInfo"></param>
  7111. /// <returns></returns>
  7112. public static ServiceResultEntity ReverseGroutingScrapProduct(ClientRequestEntity cre, SUserInfo userInfo)
  7113. {
  7114. ServiceResultEntity result = new ServiceResultEntity();
  7115. result.Status = Constant.ServiceResultStatus.Success;
  7116. IDBTransaction oracleTrConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7117. string sqlString = string.Empty;
  7118. int returnRow = Constant.INT_IS_ZERO;
  7119. try
  7120. {
  7121. oracleTrConn.Connect();
  7122. #region 1、校验该成型报损是否是待审状态
  7123. sqlString = "SELECT SCRAPPRODUCTID\n" +
  7124. " FROM TP_PM_GroutingScrapProduct \n" +
  7125. " WHERE BackOutFlag = '0'\n" +
  7126. " AND BarCode = :in_BarCode\n";
  7127. OracleParameter[] paras = new OracleParameter[] {
  7128. new OracleParameter(":in_BarCode",OracleDbType.NVarchar2, cre.Properties["BarCode"], ParameterDirection.Input),
  7129. };
  7130. DataTable returnTable = oracleTrConn.GetSqlResultToDt(sqlString, paras);
  7131. DataTable groutingTable = null;
  7132. // 该产品没有做成型报损
  7133. if (returnTable.Rows.Count == 0)
  7134. {
  7135. //xuwei add 2020-03-23 再次从注浆表查询报损状态
  7136. sqlString = @"
  7137. SELECT
  7138. GROUTINGDAILYDETAILID
  7139. FROM
  7140. TP_PM_GROUTINGDAILYDETAIL
  7141. WHERE
  7142. SCRAPFLAG = '1'
  7143. AND VALUEFLAG = '1'
  7144. AND BARCODE = :in_BarCode
  7145. ";
  7146. groutingTable = oracleTrConn.GetSqlResultToDt(sqlString, paras);
  7147. if(groutingTable.Rows.Count==0)
  7148. {
  7149. result.Result = -99;
  7150. result.Status = Constant.ServiceResultStatus.SystemError;
  7151. result.Message = "此产品没有损坯或已被撤销,不能撤销";
  7152. return result;
  7153. }
  7154. }
  7155. //// 该产品已经做了撤销了
  7156. //if ("1".Equals(returnTable.Rows[0]["BackOutFlag"]))
  7157. //{
  7158. // result.Result = -100;
  7159. // result.Status = Constant.ServiceResultStatus.SystemError;
  7160. // result.Message = "此产品已经撤销";
  7161. // return result;
  7162. //}
  7163. #endregion
  7164. #region 2、撤销
  7165. //xuwei fix 2020-03-23 如果成型报损才更新
  7166. if(returnTable.Rows.Count>0)
  7167. {
  7168. sqlString = "UPDATE TP_PM_GroutingScrapProduct\n" +
  7169. " SET BackOutFlag = :in_BackOutFlag\n" +
  7170. " ,BackOutTime = :in_BackOutTime\n" +
  7171. " ,BackOutUserID = :in_BackOutUserID\n" +
  7172. " ,BackOutUserCode = :in_BackOutUserCode\n" +
  7173. " WHERE SCRAPPRODUCTID = :in_ScrapProductID";
  7174. paras = new OracleParameter[] {
  7175. new OracleParameter(":in_ScrapProductID",OracleDbType.NVarchar2, returnTable.Rows[0]["SCRAPPRODUCTID"].ToString(), ParameterDirection.Input),
  7176. new OracleParameter(":in_BackOutFlag",OracleDbType.Int32, Constant.INT_IS_ONE, ParameterDirection.Input),
  7177. new OracleParameter(":in_BackOutTime",OracleDbType.Date, DateTime.Now, ParameterDirection.Input),
  7178. new OracleParameter(":in_BackOutUserID",OracleDbType.Int32, userInfo.UserID, ParameterDirection.Input),
  7179. new OracleParameter(":in_BackOutUserCode",OracleDbType.NVarchar2, userInfo.UserCode , ParameterDirection.Input),
  7180. };
  7181. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  7182. }
  7183. sqlString = "UPDATE TP_PM_GroutingDailyDetail\n" +
  7184. " SET ScrapFlag = :in_ScrapFlag\n" +
  7185. " ,SReasonID = NULL\n" +
  7186. " ,ScrapType = NULL\n" +
  7187. " ,ScrapTime = NULL\n" +
  7188. " ,ScrapUser = NULL\n" +
  7189. " WHERE BarCode = :in_BarCode";
  7190. paras = new OracleParameter[] {
  7191. new OracleParameter(":in_BarCode",OracleDbType.NVarchar2, cre.Properties["BarCode"], ParameterDirection.Input),
  7192. new OracleParameter(":in_ScrapFlag",OracleDbType.Char, "0" , ParameterDirection.Input),
  7193. };
  7194. returnRow += oracleTrConn.ExecuteNonQuery(sqlString, paras);
  7195. #endregion
  7196. oracleTrConn.Commit();
  7197. }
  7198. catch (Exception ex)
  7199. {
  7200. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  7201. {
  7202. oracleTrConn.Rollback();
  7203. oracleTrConn.Disconnect();
  7204. }
  7205. result.Status = Constant.ServiceResultStatus.SystemError;
  7206. result.Message = "撤销成型报损失败";
  7207. throw ex;
  7208. }
  7209. finally
  7210. {
  7211. if (oracleTrConn.ConnState == System.Data.ConnectionState.Open)
  7212. {
  7213. oracleTrConn.Disconnect();
  7214. }
  7215. }
  7216. result.Result = returnRow;
  7217. return result;
  7218. }
  7219. /// <summary>
  7220. /// 获取注浆日报明细表
  7221. /// </summary>
  7222. /// <param name="cre"></param>
  7223. /// <param name="userInfo"></param>
  7224. /// <returns></returns>
  7225. public static ServiceResultEntity GetGroutingDailyDetail(ClientRequestEntity cre, SUserInfo userInfo)
  7226. {
  7227. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7228. try
  7229. {
  7230. ServiceResultEntity result = new ServiceResultEntity();
  7231. con.Open();
  7232. string sqlString = "SELECT PGD.GroutingDailyDetailID\n" +
  7233. " ,PGD.GroutingDailyID\n" +
  7234. " ,PGD.GroutingLineID\n" +
  7235. " ,PGD.GroutingLineCode\n" +
  7236. " ,PGD.GroutingLineName\n" +
  7237. " ,PGD.GroutingLineDetailID\n" +
  7238. " ,PGD.GroutingDate\n" +
  7239. " ,PGD.GroutingMouldCode\n" +
  7240. " ,PGD.MouldCode\n" +
  7241. " ,PGD.GMouldTypeID\n" +
  7242. " ,PGD.CanManyTimes\n" +
  7243. " ,PGD.GroutingBatchNo\n" +
  7244. " ,PGD.UserID GroutingUserID\n" +
  7245. " ,PGD.UserCode GroutingUserCode\n" +
  7246. " ,PGD.ClassesSettingID\n" +
  7247. " ,PGD.GoodsID\n" +
  7248. " ,PGD.GoodsCode\n" +
  7249. " ,PGD.GoodsName\n" +
  7250. " ,PGD.GMouldStatus\n" +
  7251. " ,PGD.GroutingCount GroutingNum\n" +
  7252. " ,PGD.GroutingFlag\n" +
  7253. " ,PGD.BarCode\n" +
  7254. " ,PGD.OnlyCode\n" +
  7255. //" ,PGD.PrintTime\n" +
  7256. " ,PGD.NoGroutingRreason\n" +
  7257. " ,PGD.SpecialRepairFlag\n" +
  7258. " ,PGD.ScrapFlag\n" +
  7259. " ,PGD.SReasonID\n" +
  7260. " ,PGD.ScrapType\n" +
  7261. " ,PGD.ScrapTime\n" +
  7262. " ,PGD.ScrapUser\n" +
  7263. " ,PGD.IsPublicBody\n" +
  7264. " ,PGD.DeliverFlag\n" +
  7265. " ,PGD.beginningflag\n" +
  7266. " FROM TP_PM_GroutingDailyDetail PGD\n" +
  7267. " WHERE PGD.AccountID = :in_AccountID";
  7268. List<OracleParameter> paraList = new List<OracleParameter>();
  7269. paraList.Add(new OracleParameter(":in_AccountID", OracleDbType.Int32, userInfo.AccountID, ParameterDirection.Input));
  7270. // 产品条码
  7271. if (!string.IsNullOrWhiteSpace(cre.Properties["BarCode"] + ""))
  7272. {
  7273. sqlString += " AND PGD.BarCode = :in_BarCode ";
  7274. paraList.Add(new OracleParameter(":in_BarCode", OracleDbType.NVarchar2, cre.Properties["BarCode"] + "", ParameterDirection.Input));
  7275. }
  7276. DataSet dsReturn = con.GetSqlResultToDs(sqlString, paraList.ToArray());
  7277. result.Data = dsReturn;
  7278. return result;
  7279. }
  7280. catch (Exception ex)
  7281. {
  7282. throw ex;
  7283. }
  7284. finally
  7285. {
  7286. if (con.ConnState == ConnectionState.Open)
  7287. {
  7288. con.Close();
  7289. }
  7290. }
  7291. }
  7292. #endregion
  7293. #region 产品挂起
  7294. /// <summary>
  7295. /// 获取可以挂起的工序(干补、装车、入窑、出窑)工序不能挂起
  7296. /// </summary>
  7297. /// <param name="user">登录用户信息</param>
  7298. /// <param name="se">查询条件</param>
  7299. /// <returns>查询结果</returns>
  7300. public static ServiceResultEntity GetSuspendProcedure(SUserInfo user)
  7301. {
  7302. IDBConnection conn = null;
  7303. try
  7304. {
  7305. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7306. conn.Open();
  7307. string sqlString = "SELECT p.procedureid, p.procedurename\n" +
  7308. " FROM tp_pc_procedure p\n" +
  7309. " INNER JOIN tp_pc_productionline line\n" +
  7310. " ON line.productionlineid = p.productionlineid\n" +
  7311. " WHERE line.valueflag = '1'\n" +
  7312. " AND p.valueflag = '1'\n" +
  7313. " AND p.NODETYPE <> '3'\n" +
  7314. //" AND p.modeltype IN (-1, 0, 4, 5, 9)\n" +
  7315. " AND p.modeltype IN (0, 4, 5, 9)\n" +
  7316. " AND p.PROCEDUREMODEL = '1'\n" +
  7317. " AND p.accountid = :accountid\n" +
  7318. " AND line.accountid = :accountid\n" +
  7319. " ORDER BY line.productionlineid, p.displayno";
  7320. IDataParameter[] paras = new OracleParameter[]
  7321. {
  7322. new OracleParameter(":accountID", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  7323. };
  7324. DataSet data = conn.GetSqlResultToDs(sqlString, paras);
  7325. ServiceResultEntity sre = new ServiceResultEntity();
  7326. sre.Data = data;
  7327. return sre;
  7328. }
  7329. catch (Exception ex)
  7330. {
  7331. throw ex;
  7332. }
  7333. finally
  7334. {
  7335. if (conn != null &&
  7336. conn.ConnState == ConnectionState.Open)
  7337. {
  7338. conn.Close();
  7339. }
  7340. }
  7341. }
  7342. /// <summary>
  7343. /// 验证挂起条码
  7344. /// </summary>
  7345. /// <param name="user">登录用户信息</param>
  7346. /// <param name="se">查询条件</param>
  7347. /// <returns>查询结果</returns>
  7348. public static ServiceResultEntity CheckSuspendBarcode(SUserInfo user, string barcode)
  7349. {
  7350. IDBConnection conn = null;
  7351. try
  7352. {
  7353. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7354. conn.Open();
  7355. string sqlString = "SELECT 1 AS SEL, gdd.groutingdailydetailid\n" +
  7356. " ,gdd.barcode\n" +
  7357. " ,gdd.groutingmouldcode\n" +
  7358. " ,gdd.groutingdate\n" +
  7359. " ,gdd.goodscode\n" +
  7360. " ,gdd.usercode\n" +
  7361. " ,gdd.scrapflag\n" +
  7362. " ,gdd.deliverflag\n" +
  7363. " ,inp.procedureid\n" +
  7364. " ,p.procedurename\n" +
  7365. " FROM tp_pm_groutingdailydetail gdd\n" +
  7366. " LEFT JOIN tp_pm_inproduction inp\n" +
  7367. " ON inp.barcode = gdd.barcode\n" +
  7368. " LEFT JOIN tp_pc_procedure p\n" +
  7369. " ON p.procedureid = inp.procedureid\n" +
  7370. " WHERE gdd.accountid = :accountid\n" +
  7371. " AND gdd.barcode = :barcode";
  7372. IDataParameter[] paras = new OracleParameter[]
  7373. {
  7374. new OracleParameter(":accountID", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  7375. new OracleParameter(":barcode", OracleDbType.NVarchar2,barcode, ParameterDirection.Input),
  7376. };
  7377. DataSet data = conn.GetSqlResultToDs(sqlString, paras);
  7378. ServiceResultEntity sre = new ServiceResultEntity();
  7379. if (data == null || data.Tables.Count == 0 || data.Tables[0].Rows.Count == 0)
  7380. {
  7381. sre.Status = Constant.ServiceResultStatus.Other;
  7382. sre.Message = "无效条码";
  7383. return sre;
  7384. }
  7385. DataRow row = data.Tables[0].Rows[0];
  7386. if (row["scrapflag"] + "" == "1" || (row["deliverflag"] + "" == "1" && row["procedureid"] + "" == ""))
  7387. {
  7388. sre.Status = Constant.ServiceResultStatus.Other;
  7389. sre.Message = "此条码不是在产产品";
  7390. return sre;
  7391. }
  7392. sre.Data = data;
  7393. return sre;
  7394. }
  7395. catch (Exception ex)
  7396. {
  7397. throw ex;
  7398. }
  7399. finally
  7400. {
  7401. if (conn != null &&
  7402. conn.ConnState == ConnectionState.Open)
  7403. {
  7404. conn.Close();
  7405. }
  7406. }
  7407. }
  7408. /// <summary>
  7409. /// 保存条码挂起
  7410. /// </summary>
  7411. /// <param name="user">登录用户信息</param>
  7412. /// <param name="se">查询条件</param>
  7413. /// <returns>查询结果</returns>
  7414. public static ServiceResultEntity SaveSuspendProduct(SUserInfo user, int[] procedureids, int[] groutingdailydetailids, string remarks)
  7415. {
  7416. IDBTransaction conn = null;
  7417. try
  7418. {
  7419. conn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7420. string suspendBatchNo = Guid.NewGuid().ToString().ToUpper();
  7421. string sqlDelete = "DELETE FROM TP_PM_ProductSuspend ps\n" +
  7422. " WHERE ps.groutingdailydetailid = :groutingdailydetailid\n" +
  7423. " AND ps.suspendprocedureid = :suspendprocedureid";
  7424. string sqlUpdateRecord = "update TP_PM_ProductSuspendRecord r set RevokeTime=sysdate, RevokeUserID=" + user.UserID +
  7425. " WHERE RevokeUserID is null and r.groutingdailydetailid = :groutingdailydetailid\n" +
  7426. " AND r.suspendprocedureid = :suspendprocedureid";
  7427. string sqlInsert = "INSERT INTO TP_PM_PRODUCTSUSPEND\n" +
  7428. " (GROUTINGDAILYDETAILID\n" +
  7429. " ,SUSPENDPROCEDUREID\n" +
  7430. " ,REMARKS\n" +
  7431. " ,SUSPENDBATCHNO\n" +
  7432. " ,ACCOUNTID\n" +
  7433. " ,CREATEUSERID)\n" +
  7434. "VALUES\n" +
  7435. " (:GROUTINGDAILYDETAILID\n" +
  7436. " ,:SUSPENDPROCEDUREID\n" +
  7437. " ,:REMARKS\n" +
  7438. " ,:SUSPENDBATCHNO\n" +
  7439. " ,:ACCOUNTID\n" +
  7440. " ,:CREATEUSERID)";
  7441. string sqlInsertRecord = "INSERT INTO TP_PM_PRODUCTSUSPENDRecord\n" +
  7442. " (GROUTINGDAILYDETAILID\n" +
  7443. " ,SUSPENDPROCEDUREID\n" +
  7444. " ,REMARKS\n" +
  7445. " ,SUSPENDBATCHNO\n" +
  7446. " ,ACCOUNTID\n" +
  7447. " ,CREATEUSERID)\n" +
  7448. "VALUES\n" +
  7449. " (:GROUTINGDAILYDETAILID\n" +
  7450. " ,:SUSPENDPROCEDUREID\n" +
  7451. " ,:REMARKS\n" +
  7452. " ,:SUSPENDBATCHNO\n" +
  7453. " ,:ACCOUNTID\n" +
  7454. " ,:CREATEUSERID)";
  7455. foreach (int procedureid in procedureids)
  7456. {
  7457. foreach (int groutingdailydetailid in groutingdailydetailids)
  7458. {
  7459. IDataParameter[] deleteParas = new OracleParameter[]
  7460. {
  7461. new OracleParameter(":groutingdailydetailid", OracleDbType.Int32,groutingdailydetailid, ParameterDirection.Input),
  7462. new OracleParameter(":suspendprocedureid", OracleDbType.Int32,procedureid, ParameterDirection.Input),
  7463. };
  7464. conn.ExecuteNonQuery(sqlDelete, deleteParas);
  7465. conn.ExecuteNonQuery(sqlUpdateRecord, deleteParas);
  7466. IDataParameter[] insertParas = new OracleParameter[]
  7467. {
  7468. new OracleParameter(":GROUTINGDAILYDETAILID", OracleDbType.Int32,groutingdailydetailid, ParameterDirection.Input),
  7469. new OracleParameter(":SUSPENDPROCEDUREID", OracleDbType.Int32,procedureid, ParameterDirection.Input),
  7470. new OracleParameter(":REMARKS", OracleDbType.NVarchar2,remarks, ParameterDirection.Input),
  7471. new OracleParameter(":SUSPENDBATCHNO", OracleDbType.Varchar2,suspendBatchNo, ParameterDirection.Input),
  7472. new OracleParameter(":ACCOUNTID", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  7473. new OracleParameter(":CREATEUSERID", OracleDbType.Int32,user.UserID, ParameterDirection.Input),
  7474. };
  7475. conn.ExecuteNonQuery(sqlInsert, insertParas);
  7476. conn.ExecuteNonQuery(sqlInsertRecord, insertParas);
  7477. }
  7478. }
  7479. conn.Commit();
  7480. conn.Disconnect();
  7481. return new ServiceResultEntity();
  7482. }
  7483. catch (Exception ex)
  7484. {
  7485. throw ex;
  7486. }
  7487. finally
  7488. {
  7489. if (conn != null &&
  7490. conn.ConnState == ConnectionState.Open)
  7491. {
  7492. conn.Disconnect();
  7493. }
  7494. }
  7495. }
  7496. /// <summary>
  7497. /// 查询挂起条码
  7498. /// </summary>
  7499. /// <param name="user">登录用户信息</param>
  7500. /// <param name="se">查询条件</param>
  7501. /// <returns>查询结果</returns>
  7502. public static ServiceResultEntity GetSuspendProduct(SUserInfo user, string barcode)
  7503. {
  7504. IDBConnection conn = null;
  7505. try
  7506. {
  7507. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7508. conn.Open();
  7509. string sqlString = "SELECT 0 AS SEL, gdd.barcode\n" +
  7510. " ,gdd.groutingmouldcode\n" +
  7511. " ,gdd.groutingdate\n" +
  7512. " ,gdd.goodscode\n" +
  7513. " ,gdd.usercode\n" +
  7514. " ,ps.groutingdailydetailid\n" +
  7515. " ,ps.suspendprocedureid\n" +
  7516. " ,sp.procedurename suspendprocedurename\n" +
  7517. " ,ps.remarks\n" +
  7518. " ,ps.Createtime\n" +
  7519. " ,u.usercode CREATEUSERCode\n" +
  7520. " ,case when gdd.scrapflag = '1' then '成型损坯'" +
  7521. " when gdd.deliverflag = '0' then '注浆' " +
  7522. " when inp.barcode is not null then to_char(p.procedurename) " +
  7523. " when spp.barcode is not null then to_char(glt.goodsleveltypename) " +
  7524. " when fp.barcode is not null then '生产完成' else '' end procedurename -- 当前工序\n" +
  7525. " FROM TP_PM_ProductSuspend ps\n" +
  7526. " INNER JOIN tp_pm_groutingdailydetail gdd\n" +
  7527. " ON gdd.groutingdailydetailid = ps.groutingdailydetailid\n" +
  7528. " INNER JOIN tp_pc_procedure sp\n" +
  7529. " ON ps.suspendprocedureid = sp.procedureid\n" +
  7530. " INNER JOIN tp_mst_user u\n" +
  7531. " ON u.userid = ps.CREATEUSERID\n" +
  7532. // 在产工序
  7533. " LEFT JOIN tp_pm_inproduction inp \n" +
  7534. " ON gdd.deliverflag = '1' and inp.barcode = gdd.barcode\n" +
  7535. " LEFT JOIN tp_pc_procedure p \n" +
  7536. " ON p.procedureid = inp.procedureid\n" +
  7537. // 完成
  7538. " LEFT JOIN tp_pm_finishedproduct fp \n" +
  7539. " ON gdd.deliverflag = '1' and inp.barcode is null and fp.barcode = gdd.barcode\n" +
  7540. // 损坯
  7541. " LEFT JOIN tp_pm_scrapproduct spp \n" +
  7542. " ON gdd.deliverflag = '1' and inp.barcode is null and fp.barcode is null and spp.barcode = gdd.barcode\n" +
  7543. " AND spp.valueflag = '1'\n" +
  7544. " AND spp.auditstatus = 1\n" +
  7545. " AND spp.goodsleveltypeid <> 9\n" +
  7546. " AND spp.RECYCLINGFLAG = '0'\n" +
  7547. " LEFT JOIN tp_sys_goodsleveltype glt \n" +
  7548. " ON glt.goodsleveltypeid = spp.goodsleveltypeid\n" +
  7549. " WHERE gdd.barcode = :barcode\n" +
  7550. " ORDER BY sp.displayno";
  7551. IDataParameter[] paras = new OracleParameter[]
  7552. {
  7553. new OracleParameter(":barcode", OracleDbType.NVarchar2,barcode, ParameterDirection.Input),
  7554. };
  7555. DataSet data = conn.GetSqlResultToDs(sqlString, paras);
  7556. ServiceResultEntity sre = new ServiceResultEntity();
  7557. sre.Data = data;
  7558. if (data == null || data.Tables.Count == 0 || data.Tables[0].Rows.Count == 0)
  7559. {
  7560. sre.Message = "此条码没有可撤销的挂起信息";
  7561. return sre;
  7562. }
  7563. return sre;
  7564. }
  7565. catch (Exception ex)
  7566. {
  7567. throw ex;
  7568. }
  7569. finally
  7570. {
  7571. if (conn != null &&
  7572. conn.ConnState == ConnectionState.Open)
  7573. {
  7574. conn.Close();
  7575. }
  7576. }
  7577. }
  7578. /// <summary>
  7579. /// 撤销条码挂起
  7580. /// </summary>
  7581. /// <param name="user">登录用户信息</param>
  7582. /// <param name="se">查询条件</param>
  7583. /// <returns>查询结果</returns>
  7584. public static ServiceResultEntity DeleteSuspendProduct(SUserInfo user, int[] procedureids, int[] groutingdailydetailids)
  7585. {
  7586. IDBTransaction conn = null;
  7587. try
  7588. {
  7589. conn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7590. string suspendBatchNo = Guid.NewGuid().ToString().ToUpper();
  7591. string sqlDelete = "DELETE FROM TP_PM_ProductSuspend ps\n" +
  7592. " WHERE ps.groutingdailydetailid = :groutingdailydetailid\n" +
  7593. " AND ps.suspendprocedureid = :suspendprocedureid";
  7594. string sqlUpdateRecord = "update TP_PM_ProductSuspendRecord r set RevokeTime=sysdate, RevokeUserID=" + user.UserID +
  7595. " WHERE RevokeUserID is null and r.groutingdailydetailid = :groutingdailydetailid\n" +
  7596. " AND r.suspendprocedureid = :suspendprocedureid";
  7597. for (int i = 0; i < procedureids.Length; i++)
  7598. {
  7599. IDataParameter[] deleteParas = new OracleParameter[]
  7600. {
  7601. new OracleParameter(":groutingdailydetailid", OracleDbType.Int32,groutingdailydetailids[i], ParameterDirection.Input),
  7602. new OracleParameter(":suspendprocedureid", OracleDbType.Int32,procedureids[i], ParameterDirection.Input),
  7603. };
  7604. conn.ExecuteNonQuery(sqlDelete, deleteParas);
  7605. conn.ExecuteNonQuery(sqlUpdateRecord, deleteParas);
  7606. }
  7607. conn.Commit();
  7608. conn.Disconnect();
  7609. return new ServiceResultEntity();
  7610. }
  7611. catch (Exception ex)
  7612. {
  7613. throw ex;
  7614. }
  7615. finally
  7616. {
  7617. if (conn != null &&
  7618. conn.ConnState == ConnectionState.Open)
  7619. {
  7620. conn.Disconnect();
  7621. }
  7622. }
  7623. }
  7624. /// <summary>
  7625. /// 查询挂起条码
  7626. /// </summary>
  7627. /// <param name="user">登录用户信息</param>
  7628. /// <param name="se">查询条件</param>
  7629. /// <returns>查询结果</returns>
  7630. public static ServiceResultEntity GetAllSuspendProduct(SUserInfo user, ClientRequestEntity cre)
  7631. {
  7632. IDBConnection conn = null;
  7633. try
  7634. {
  7635. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7636. conn.Open();
  7637. //string sqlString = "SELECT gdd.barcode\n" +
  7638. //" ,gdd.groutingmouldcode\n" +
  7639. //" ,gdd.groutingdate\n" +
  7640. //" ,gdd.goodscode\n" +
  7641. //" ,gdd.usercode GroutingUserCode\n" +
  7642. //" ,ps.groutingdailydetailid\n" +
  7643. //" ,ps.suspendprocedureid\n" +
  7644. //" ,sp.procedurename suspendprocedurename\n" +
  7645. //" ,ps.remarks\n" +
  7646. //" ,ps.Createtime\n" +
  7647. //" ,u.usercode CREATEUSERCode\n" +
  7648. //" ,case when gdd.scrapflag = '1' then '成型损坯'" +
  7649. //" when gdd.deliverflag = '0' then '注浆' " +
  7650. //" when inp.barcode is not null then to_char(p.procedurename) " +
  7651. //" when spp.barcode is not null then to_char(glt.goodsleveltypename) " +
  7652. //" when fp.barcode is not null then '生产完成' else '' end procedurename\n" + // 当前工序
  7653. //" FROM TP_PM_ProductSuspend ps\n" +
  7654. //" INNER JOIN tp_pc_procedure sp\n" +
  7655. //" ON ps.suspendprocedureid = sp.procedureid\n" +
  7656. //" INNER JOIN tp_mst_user u\n" +
  7657. //" ON u.userid = ps.CREATEUSERID\n" +
  7658. //" INNER JOIN tp_pm_groutingdailydetail gdd\n" +
  7659. //" ON gdd.groutingdailydetailid = ps.groutingdailydetailid\n" +
  7660. //// 在产工序
  7661. //" LEFT JOIN tp_pm_inproduction inp \n" +
  7662. //" ON gdd.deliverflag = '1' and inp.barcode = gdd.barcode\n" +
  7663. //" LEFT JOIN tp_pc_procedure p \n" +
  7664. //" ON p.procedureid = inp.procedureid\n" +
  7665. // // 完成
  7666. //" LEFT JOIN tp_pm_finishedproduct fp \n" +
  7667. //" ON gdd.deliverflag = '1' and inp.barcode is null and fp.barcode = gdd.barcode\n" +
  7668. // // 损坯
  7669. //" LEFT JOIN tp_pm_scrapproduct spp \n" +
  7670. //" ON gdd.deliverflag = '1' and inp.barcode is null and fp.barcode is null and spp.barcode = gdd.barcode\n" +
  7671. //" AND spp.valueflag = '1'\n" +
  7672. //" AND spp.auditstatus = 1\n" +
  7673. //" AND spp.goodsleveltypeid <> 9\n" +
  7674. //" AND spp.RECYCLINGFLAG = '0'\n" +
  7675. //" LEFT JOIN tp_sys_goodsleveltype glt \n" +
  7676. //" ON glt.goodsleveltypeid = spp.goodsleveltypeid\n" +
  7677. //" WHERE (:barcode is null or instr(gdd.barcode, :barcode) > 0)\n" +
  7678. //" AND (:remarks is null or instr(ps.remarks, :remarks) > 0)\n" +
  7679. //" AND (:datefrom is null or ps.createtime >= :datefrom)\n" +
  7680. //" AND (:dateend is null or ps.createtime <= :dateend)\n" +
  7681. //" ORDER BY gdd.barcode, sp.displayno ";
  7682. string sqlString = "SELECT GDD.BARCODE,\n" +
  7683. " GDD.GROUTINGMOULDCODE,\n" +
  7684. " GDD.GROUTINGDATE,\n" +
  7685. " GDD.GOODSCODE,\n" +
  7686. " GDD.USERCODE GROUTINGUSERCODE,\n" +
  7687. " PSR.GROUTINGDAILYDETAILID,\n" +
  7688. " PSR.SUSPENDPROCEDUREID,\n" +
  7689. " SP.PROCEDURENAME SUSPENDPROCEDURENAME,\n" +
  7690. " PSR.REMARKS,\n" +
  7691. " PSR.CREATETIME,\n" +
  7692. " U.USERCODE CREATEUSERCODE,\n" +
  7693. " CASE\n" +
  7694. " WHEN GDD.SCRAPFLAG = '1' THEN\n" +
  7695. " '成型损坯'\n" +
  7696. " WHEN GDD.DELIVERFLAG = '0' THEN\n" +
  7697. " '注浆'\n" +
  7698. " WHEN INP.BARCODE IS NOT NULL THEN\n" +
  7699. " TO_CHAR(P.PROCEDURENAME)\n" +
  7700. " WHEN SPP.BARCODE IS NOT NULL THEN\n" +
  7701. " TO_CHAR(GLT.GOODSLEVELTYPENAME)\n" +
  7702. " WHEN FP.BARCODE IS NOT NULL THEN\n" +
  7703. " '生产完成'\n" +
  7704. " ELSE\n" +
  7705. " ''\n" +
  7706. " END PROCEDURENAME,\n" +
  7707. " TO_CHAR(PSR.REVOKETIME, 'yyyy-mm-dd hh24:mi:ss') AS REVOKETIME,\n" +
  7708. " REVOKEUSER.USERCODE REVOKEUSERCODE\n" +
  7709. " FROM TP_PM_PRODUCTSUSPENDRECORD PSR\n" +
  7710. " INNER JOIN TP_PC_PROCEDURE SP\n" +
  7711. " ON PSR.SUSPENDPROCEDUREID = SP.PROCEDUREID\n" +
  7712. " INNER JOIN TP_MST_USER U\n" +
  7713. " ON U.USERID = PSR.CREATEUSERID\n" +
  7714. " INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD\n" +
  7715. " ON GDD.GROUTINGDAILYDETAILID = PSR.GROUTINGDAILYDETAILID\n" +
  7716. " LEFT JOIN TP_PM_INPRODUCTION INP\n" +
  7717. " ON GDD.DELIVERFLAG = '1'\n" +
  7718. " AND INP.BARCODE = GDD.BARCODE\n" +
  7719. " LEFT JOIN TP_PC_PROCEDURE P\n" +
  7720. " ON P.PROCEDUREID = INP.PROCEDUREID\n" +
  7721. " LEFT JOIN TP_PM_FINISHEDPRODUCT FP\n" +
  7722. " ON GDD.DELIVERFLAG = '1'\n" +
  7723. " AND INP.BARCODE IS NULL\n" +
  7724. " AND FP.BARCODE = GDD.BARCODE\n" +
  7725. " LEFT JOIN TP_PM_SCRAPPRODUCT SPP\n" +
  7726. " ON GDD.DELIVERFLAG = '1'\n" +
  7727. " AND INP.BARCODE IS NULL\n" +
  7728. " AND FP.BARCODE IS NULL\n" +
  7729. " AND SPP.BARCODE = GDD.BARCODE\n" +
  7730. " AND SPP.VALUEFLAG = '1'\n" +
  7731. " AND SPP.AUDITSTATUS = 1\n" +
  7732. " AND SPP.GOODSLEVELTYPEID <> 9\n" +
  7733. " AND SPP.RECYCLINGFLAG = '0'\n" +
  7734. " LEFT JOIN TP_SYS_GOODSLEVELTYPE GLT\n" +
  7735. " ON GLT.GOODSLEVELTYPEID = SPP.GOODSLEVELTYPEID\n" +
  7736. " LEFT JOIN TP_MST_USER REVOKEUSER\n" +
  7737. " ON PSR.REVOKEUSERID = REVOKEUSER.USERID\n" +
  7738. " WHERE (:barcode IS NULL OR INSTR(GDD.BARCODE, :barcode) > 0)\n" +
  7739. " AND (:remarks IS NULL OR INSTR(PSR.REMARKS, :remarks) > 0)\n" +
  7740. " AND (:datefrom IS NULL OR PSR.CREATETIME >= :datefrom)\n" +
  7741. " AND (:dateend is null or psr.createtime <= :dateend)\n" +
  7742. " ORDER BY GDD.BARCODE, SP.DISPLAYNO";
  7743. IDataParameter[] paras = new OracleParameter[]
  7744. {
  7745. new OracleParameter(":barcode", OracleDbType.NVarchar2, cre.Properties["barcode"], ParameterDirection.Input),
  7746. new OracleParameter(":remarks", OracleDbType.NVarchar2, cre.Properties["remarks"], ParameterDirection.Input),
  7747. new OracleParameter(":datefrom", OracleDbType.Date, cre.Properties["datefrom"], ParameterDirection.Input),
  7748. new OracleParameter(":dateend", OracleDbType.Date, cre.Properties["dateend"], ParameterDirection.Input),
  7749. };
  7750. DataSet data = conn.GetSqlResultToDs(sqlString, paras);
  7751. ServiceResultEntity sre = new ServiceResultEntity();
  7752. if (data == null || data.Tables.Count == 0 || data.Tables[0].Rows.Count == 0)
  7753. {
  7754. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  7755. }
  7756. sre.Data = data;
  7757. return sre;
  7758. }
  7759. catch (Exception ex)
  7760. {
  7761. throw ex;
  7762. }
  7763. finally
  7764. {
  7765. if (conn != null &&
  7766. conn.ConnState == ConnectionState.Open)
  7767. {
  7768. conn.Close();
  7769. }
  7770. }
  7771. }
  7772. #endregion
  7773. #region 品保抽查
  7774. /// <summary>
  7775. /// 验证品保抽查条码
  7776. /// </summary>
  7777. /// <param name="user">登录用户信息</param>
  7778. /// <param name="se">查询条件</param>
  7779. /// <returns>查询结果</returns>
  7780. public static ServiceResultEntity CheckQASpotCheck(SUserInfo user, string barcode)
  7781. {
  7782. IDBConnection conn = null;
  7783. try
  7784. {
  7785. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7786. conn.Open();
  7787. string sqlString = "SELECT gdd.groutingdailydetailid\n" +
  7788. " ,gdd.barcode\n" +
  7789. " ,gdd.groutingmouldcode\n" +
  7790. " ,gdd.groutingdate\n" +
  7791. " ,gdd.goodscode\n" +
  7792. " ,gdd.usercode\n" +
  7793. //" ,gdd.scrapflag\n" +
  7794. //" ,gdd.deliverflag\n" +
  7795. // -1:未交坯 -2:生产完成 -3:成品交接 >0:在产工序ID
  7796. " ,case when gdd.deliverflag='0' then -1 \n" +
  7797. " when fp.FHUserID is not null then -3 \n" +
  7798. " when fp.barcode is not null then -2 \n" +
  7799. " when inp.barcode is null then -4 \n" +
  7800. " else inp.procedureid end procedureid \n" +
  7801. " ,case when gdd.deliverflag='0' then '未交坯' \n" +
  7802. " when fp.FHUserID is not null then '成品交接' \n" +
  7803. " when fp.barcode is not null then '生产完成' \n" +
  7804. " when inp.barcode is null then '损坯' \n" +
  7805. " else to_char(p.procedurename) end procedurename \n" +
  7806. " ,sysdate CheckTime \n" +
  7807. " FROM tp_pm_groutingdailydetail gdd\n" +
  7808. " LEFT JOIN tp_pm_inproduction inp\n" +
  7809. " ON inp.barcode = gdd.barcode\n" +
  7810. " LEFT JOIN tp_pc_procedure p\n" +
  7811. " ON p.procedureid = inp.procedureid\n" +
  7812. " LEFT JOIN TP_PM_FinishedProduct fp\n" +
  7813. " ON fp.barcode = gdd.barcode\n" +
  7814. " WHERE gdd.accountid = :accountid\n" +
  7815. " AND gdd.barcode = :barcode";
  7816. IDataParameter[] paras = new OracleParameter[]
  7817. {
  7818. new OracleParameter(":accountid", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  7819. new OracleParameter(":barcode", OracleDbType.NVarchar2,barcode, ParameterDirection.Input),
  7820. };
  7821. DataSet data = conn.GetSqlResultToDs(sqlString, paras);
  7822. ServiceResultEntity sre = new ServiceResultEntity();
  7823. if (data == null || data.Tables.Count == 0 || data.Tables[0].Rows.Count == 0)
  7824. {
  7825. sre.Status = Constant.ServiceResultStatus.Other;
  7826. sre.Message = "此条码为无效条码";
  7827. return sre;
  7828. }
  7829. sre.Data = data;
  7830. return sre;
  7831. }
  7832. catch (Exception ex)
  7833. {
  7834. throw ex;
  7835. }
  7836. finally
  7837. {
  7838. if (conn != null &&
  7839. conn.ConnState == ConnectionState.Open)
  7840. {
  7841. conn.Close();
  7842. }
  7843. }
  7844. }
  7845. /// <summary>
  7846. /// 保存品保抽查
  7847. /// </summary>
  7848. /// <param name="user">登录用户信息</param>
  7849. /// <param name="se">查询条件</param>
  7850. /// <returns>查询结果</returns>
  7851. public static ServiceResultEntity SaveQASpotCheck(SUserInfo user, Dictionary<string, object> data)
  7852. {
  7853. if (data == null || data.Count == 0)
  7854. {
  7855. return new ServiceResultEntity();
  7856. }
  7857. IDBTransaction conn = null;
  7858. try
  7859. {
  7860. conn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7861. string sqlInsert = "INSERT INTO TP_PM_QASpotCheck\n" +
  7862. " (GroutingDailyDetailID\n" +
  7863. " ,Remarks\n" +
  7864. " ,ProcedureID\n" +
  7865. " ,ProcedureName\n" +
  7866. " ,CheckTime\n" +
  7867. " ,AccountID\n" +
  7868. " ,CreateUserID)\n" +
  7869. "VALUES\n" +
  7870. " (:GroutingDailyDetailID\n" +
  7871. " ,:Remarks\n" +
  7872. " ,:ProcedureID\n" +
  7873. " ,:ProcedureName\n" +
  7874. " ,:CheckTime\n" +
  7875. " ,:AccountID\n" +
  7876. " ,:CreateUserID)";
  7877. IDataParameter[] insertParas = new OracleParameter[]
  7878. {
  7879. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32,data["GroutingDailyDetailID"], ParameterDirection.Input),
  7880. new OracleParameter(":Remarks", OracleDbType.NVarchar2,data["Remarks"], ParameterDirection.Input),
  7881. new OracleParameter(":ProcedureID", OracleDbType.Int32,data["ProcedureID"], ParameterDirection.Input),
  7882. new OracleParameter(":ProcedureName", OracleDbType.NVarchar2,data["ProcedureName"], ParameterDirection.Input),
  7883. new OracleParameter(":CheckTime", OracleDbType.Date,data["CheckTime"], ParameterDirection.Input),
  7884. new OracleParameter(":AccountID", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  7885. new OracleParameter(":CreateUserID", OracleDbType.Int32,user.UserID, ParameterDirection.Input),
  7886. };
  7887. conn.ExecuteNonQuery(sqlInsert, insertParas);
  7888. conn.Commit();
  7889. return new ServiceResultEntity();
  7890. }
  7891. catch (Exception ex)
  7892. {
  7893. throw ex;
  7894. }
  7895. finally
  7896. {
  7897. if (conn != null &&
  7898. conn.ConnState == ConnectionState.Open)
  7899. {
  7900. conn.Disconnect();
  7901. }
  7902. }
  7903. }
  7904. /// <summary>
  7905. /// 自动保存品保抽查
  7906. /// </summary>
  7907. /// <param name="user"></param>
  7908. /// <param name="barcode"></param>
  7909. /// <param name="remarks"></param>
  7910. /// <returns></returns>
  7911. public static ServiceResultEntity AutoSaveQASpotCheck(SUserInfo user, string barcode, string remarks)
  7912. {
  7913. IDBTransaction conn = null;
  7914. try
  7915. {
  7916. conn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  7917. string sqlString = "SELECT gdd.groutingdailydetailid\n" +
  7918. " ,gdd.barcode\n" +
  7919. " ,gdd.groutingmouldcode\n" +
  7920. " ,gdd.groutingdate\n" +
  7921. " ,gdd.goodscode\n" +
  7922. " ,gdd.usercode\n" +
  7923. //" ,gdd.scrapflag\n" +
  7924. //" ,gdd.deliverflag\n" +
  7925. // -1:未交坯 -2:生产完成 -3:成品交接 >0:在产工序ID
  7926. " ,case when gdd.deliverflag='0' then -1 \n" +
  7927. " when fp.FHUserID is not null then -3 \n" +
  7928. " when fp.barcode is not null then -2 \n" +
  7929. " when inp.barcode is null then -4 \n" +
  7930. " else inp.procedureid end procedureid \n" +
  7931. " ,case when gdd.deliverflag='0' then '未交坯' \n" +
  7932. " when fp.FHUserID is not null then '成品交接' \n" +
  7933. " when fp.barcode is not null then '生产完成' \n" +
  7934. " when inp.barcode is null then '损坯' \n" +
  7935. " else to_char(p.procedurename) end procedurename \n" +
  7936. " ,sysdate CheckTime \n" +
  7937. " FROM tp_pm_groutingdailydetail gdd\n" +
  7938. " LEFT JOIN tp_pm_inproduction inp\n" +
  7939. " ON inp.barcode = gdd.barcode\n" +
  7940. " LEFT JOIN tp_pc_procedure p\n" +
  7941. " ON p.procedureid = inp.procedureid\n" +
  7942. " LEFT JOIN TP_PM_FinishedProduct fp\n" +
  7943. " ON fp.barcode = gdd.barcode\n" +
  7944. " WHERE gdd.accountid = :accountid\n" +
  7945. " AND gdd.barcode = :barcode";
  7946. IDataParameter[] paras = new OracleParameter[]
  7947. {
  7948. new OracleParameter(":accountid", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  7949. new OracleParameter(":barcode", OracleDbType.NVarchar2,barcode, ParameterDirection.Input),
  7950. };
  7951. DataSet data = conn.GetSqlResultToDs(sqlString, paras);
  7952. ServiceResultEntity sre = new ServiceResultEntity();
  7953. if (data == null || data.Tables.Count == 0 || data.Tables[0].Rows.Count == 0)
  7954. {
  7955. sre.Status = Constant.ServiceResultStatus.Other;
  7956. sre.Message = "此条码为无效条码";
  7957. return sre;
  7958. }
  7959. string sqlInsert = "INSERT INTO TP_PM_QASpotCheck\n" +
  7960. " (GroutingDailyDetailID\n" +
  7961. " ,Remarks\n" +
  7962. " ,ProcedureID\n" +
  7963. " ,ProcedureName\n" +
  7964. " ,CheckTime\n" +
  7965. " ,AccountID\n" +
  7966. " ,CreateUserID)\n" +
  7967. "VALUES\n" +
  7968. " (:GroutingDailyDetailID\n" +
  7969. " ,:Remarks\n" +
  7970. " ,:ProcedureID\n" +
  7971. " ,:ProcedureName\n" +
  7972. " ,:CheckTime\n" +
  7973. " ,:AccountID\n" +
  7974. " ,:CreateUserID)";
  7975. IDataParameter[] insertParas = new OracleParameter[]
  7976. {
  7977. new OracleParameter(":GroutingDailyDetailID", OracleDbType.Int32,data.Tables[0].Rows[0]["GroutingDailyDetailID"], ParameterDirection.Input),
  7978. new OracleParameter(":Remarks", OracleDbType.NVarchar2,remarks, ParameterDirection.Input),
  7979. new OracleParameter(":ProcedureID", OracleDbType.Int32,data.Tables[0].Rows[0]["ProcedureID"], ParameterDirection.Input),
  7980. new OracleParameter(":ProcedureName", OracleDbType.NVarchar2,data.Tables[0].Rows[0]["ProcedureName"], ParameterDirection.Input),
  7981. new OracleParameter(":CheckTime", OracleDbType.Date,data.Tables[0].Rows[0]["CheckTime"], ParameterDirection.Input),
  7982. new OracleParameter(":AccountID", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  7983. new OracleParameter(":CreateUserID", OracleDbType.Int32,user.UserID, ParameterDirection.Input),
  7984. };
  7985. conn.ExecuteNonQuery(sqlInsert, insertParas);
  7986. conn.Commit();
  7987. sre.Data = data;
  7988. return sre;
  7989. }
  7990. catch (Exception ex)
  7991. {
  7992. throw ex;
  7993. }
  7994. finally
  7995. {
  7996. if (conn != null &&
  7997. conn.ConnState == ConnectionState.Open)
  7998. {
  7999. conn.Disconnect();
  8000. }
  8001. }
  8002. }
  8003. /// <summary>
  8004. /// 查询品保抽查
  8005. /// </summary>
  8006. /// <param name="user">登录用户信息</param>
  8007. /// <param name="se">查询条件</param>
  8008. /// <returns>查询结果</returns>
  8009. public static ServiceResultEntity GetAllQASpotCheck(SUserInfo user, ClientRequestEntity cre)
  8010. {
  8011. IDBConnection conn = null;
  8012. try
  8013. {
  8014. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8015. conn.Open();
  8016. string sqlString = "select gdd.barcode\n" +
  8017. " ,gdd.goodscode\n" +
  8018. " ,gdd.GroutingDate\n" +
  8019. " ,gdd.usercode GroutingUserCode\n" +
  8020. " ,gdd.GroutingMouldCode\n" +
  8021. " ,u.usercode checkusercode\n" +
  8022. " ,qa.ProcedureName\n" +
  8023. " ,qa.checktime\n" +
  8024. " ,qa.remarks\n" +
  8025. " from TP_PM_QASPOTCHECK qa\n" +
  8026. " inner join tp_pm_groutingdailydetail gdd\n" +
  8027. " on qa.groutingdailydetailid = gdd.groutingdailydetailid\n" +
  8028. " inner join tp_mst_user u\n" +
  8029. " on u.userid = qa.createuserid\n" +
  8030. " where qa.valueflag = '1'\n";
  8031. List<OracleParameter> paras = new List<OracleParameter>();
  8032. if (!string.IsNullOrEmpty(cre.Properties["barcode"] + ""))
  8033. {
  8034. sqlString += " and instr(gdd.barcode, :barcode) > 0\n";
  8035. paras.Add(new OracleParameter(":barcode", OracleDbType.NVarchar2, cre.Properties["barcode"], ParameterDirection.Input));
  8036. }
  8037. if (!string.IsNullOrEmpty(cre.Properties["goodscode"] + ""))
  8038. {
  8039. sqlString += " and instr(gdd.goodscode, :goodscode) > 0\n";
  8040. paras.Add(new OracleParameter(":goodscode", OracleDbType.NVarchar2, cre.Properties["goodscode"], ParameterDirection.Input));
  8041. }
  8042. if (!string.IsNullOrEmpty(cre.Properties["usercode"] + ""))
  8043. {
  8044. sqlString += " and instr(u.usercode, :usercode) > 0\n";
  8045. paras.Add(new OracleParameter(":usercode", OracleDbType.NVarchar2, cre.Properties["usercode"], ParameterDirection.Input));
  8046. }
  8047. if (!string.IsNullOrEmpty(cre.Properties["remarks"] + ""))
  8048. {
  8049. sqlString += " and instr(qa.remarks, :remarks) > 0\n";
  8050. paras.Add(new OracleParameter(":remarks", OracleDbType.NVarchar2, cre.Properties["remarks"], ParameterDirection.Input));
  8051. }
  8052. if (cre.Properties["checktimebegin"] != null)
  8053. {
  8054. sqlString += " and qa.checktime >= :checktimebegin\n";
  8055. paras.Add(new OracleParameter(":checktimebegin", OracleDbType.Date, cre.Properties["checktimebegin"], ParameterDirection.Input));
  8056. }
  8057. if (cre.Properties["checktimeend"] != null)
  8058. {
  8059. sqlString += " and qa.checktime < :checktimeend\n";
  8060. paras.Add(new OracleParameter(":checktimeend", OracleDbType.Date, cre.Properties["checktimeend"], ParameterDirection.Input));
  8061. }
  8062. sqlString += " ORDER BY gdd.barcode, qa.checktime ";
  8063. DataSet data = conn.GetSqlResultToDs(sqlString, paras.ToArray());
  8064. ServiceResultEntity sre = new ServiceResultEntity();
  8065. if (data == null || data.Tables.Count == 0 || data.Tables[0].Rows.Count == 0)
  8066. {
  8067. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  8068. }
  8069. sre.Data = data;
  8070. return sre;
  8071. }
  8072. catch (Exception ex)
  8073. {
  8074. throw ex;
  8075. }
  8076. finally
  8077. {
  8078. if (conn != null &&
  8079. conn.ConnState == ConnectionState.Open)
  8080. {
  8081. conn.Close();
  8082. }
  8083. }
  8084. }
  8085. /// <summary>
  8086. /// 查询品保抽查
  8087. /// </summary>
  8088. /// <param name="user">登录用户信息</param>
  8089. /// <param name="se">查询条件</param>
  8090. /// <returns>查询结果</returns>
  8091. public static ServiceResultEntity GetAllQASpotCheckForPC(SUserInfo user, ClientRequestEntity cre)
  8092. {
  8093. IDBConnection conn = null;
  8094. try
  8095. {
  8096. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8097. conn.Open();
  8098. //string sqlString = "select gdd.barcode,\n" +
  8099. //" gdd.goodscode,\n" +
  8100. //" gdd.GroutingDate,\n" +
  8101. //" gdd.usercode GroutingUserCode,\n" +
  8102. //" gdd.GroutingMouldCode,\n" +
  8103. //" u.usercode checkusercode,\n" +
  8104. //" qa.ProcedureName,\n" +
  8105. //" qa.checktime,\n" +
  8106. //" qa.remarks,\n" +
  8107. //" inpp.procedurename currprocedurename,\n" +
  8108. //" listagg(decode(d.productiondefectid,\n" +
  8109. //" null,\n" +
  8110. //" null,\n" +
  8111. //" '[' || to_char(d.defectcode) || ']' ||\n" +
  8112. //" to_char(d.defectname)),\n" +
  8113. //" ',') WITHIN GROUP(ORDER BY d.productiondefectid) defectcodes,\n" +
  8114. //" (select listagg('[' || to_char(dd.defectcode) || ']' ||\n" +
  8115. //" to_char(dd.defectname),\n" +
  8116. //" ',') WITHIN GROUP(ORDER BY dd.productiondefectid)\n" +
  8117. //" from tp_pm_defect dd\n" +
  8118. //" where dd.valueflag = '1'\n" +
  8119. //" and dd.barcode = gdd.barcode) ddefectcode\n" +
  8120. //" from TP_PM_QASPOTCHECK qa\n" +
  8121. //" inner join tp_mst_user u\n" +
  8122. //" on u.userid = qa.createuserid\n" +
  8123. //" inner join tp_pm_groutingdailydetail gdd\n" +
  8124. //" on qa.groutingdailydetailid = gdd.groutingdailydetailid\n" +
  8125. //" left join tp_pm_inproduction inp\n" +
  8126. //" on inp.barcode = gdd.barcode\n" +
  8127. //" left join tp_pc_procedure inpp\n" +
  8128. //" on inp.procedureid = inpp.procedureid\n" +
  8129. //" left join tp_pm_defect d\n" +
  8130. //" on d.barcode = gdd.barcode\n" +
  8131. //" and d.valueflag = '1'\n" +
  8132. //" where qa.valueflag = '1'\n" +
  8133. //" group by gdd.barcode,\n" +
  8134. //" gdd.goodscode,\n" +
  8135. //" gdd.GroutingDate,\n" +
  8136. //" gdd.usercode,\n" +
  8137. //" gdd.GroutingMouldCode,\n" +
  8138. //" u.usercode,\n" +
  8139. //" qa.ProcedureName,\n" +
  8140. //" qa.checktime,\n" +
  8141. //" qa.remarks,\n" +
  8142. //" inpp.procedurename";
  8143. string sqlString = "select gdd.barcode\n" +
  8144. " ,gdd.goodscode\n" +
  8145. " ,gdd.GroutingDate\n" +
  8146. " ,gdd.usercode GroutingUserCode\n" +
  8147. " ,gdd.GroutingMouldCode\n" +
  8148. " ,u.usercode checkusercode\n" +
  8149. " ,qa.ProcedureName\n" +
  8150. " ,qa.checktime\n" +
  8151. " ,qa.remarks\n" +
  8152. " ,inpp.procedurename currprocedurename\n" +
  8153. " ,(select listagg('[' || to_char(dd.defectcode) || ']' ||\n" +
  8154. " to_char(dd.defectname),\n" +
  8155. " ',') WITHIN GROUP(ORDER BY dd.productiondefectid)\n" +
  8156. " from tp_pm_defect dd\n" +
  8157. " where dd.valueflag = '1'\n" +
  8158. " and dd.barcode = gdd.barcode) ddefectcode\n" +
  8159. " from TP_PM_QASPOTCHECK qa\n" +
  8160. " inner join tp_pm_groutingdailydetail gdd\n" +
  8161. " on qa.groutingdailydetailid = gdd.groutingdailydetailid\n" +
  8162. " inner join tp_mst_user u\n" +
  8163. " on u.userid = qa.createuserid\n" +
  8164. " left join tp_pm_inproduction inp\n" +
  8165. " on inp.barcode = gdd.barcode\n" +
  8166. " left join tp_pc_procedure inpp\n" +
  8167. " on inp.procedureid = inpp.procedureid\n" +
  8168. " where qa.valueflag = '1'\n";
  8169. List<OracleParameter> paras = new List<OracleParameter>();
  8170. if (!string.IsNullOrEmpty(cre.Properties["barcode"] + ""))
  8171. {
  8172. sqlString += " and instr(gdd.barcode, :barcode) > 0\n";
  8173. paras.Add(new OracleParameter(":barcode", OracleDbType.NVarchar2, cre.Properties["barcode"], ParameterDirection.Input));
  8174. }
  8175. if (!string.IsNullOrEmpty(cre.Properties["goodscode"] + ""))
  8176. {
  8177. sqlString += " and instr(gdd.goodscode, :goodscode) > 0\n";
  8178. paras.Add(new OracleParameter(":goodscode", OracleDbType.NVarchar2, cre.Properties["goodscode"], ParameterDirection.Input));
  8179. }
  8180. if (!string.IsNullOrEmpty(cre.Properties["usercode"] + ""))
  8181. {
  8182. sqlString += " and instr(u.usercode, :usercode) > 0\n";
  8183. paras.Add(new OracleParameter(":usercode", OracleDbType.NVarchar2, cre.Properties["usercode"], ParameterDirection.Input));
  8184. }
  8185. if (!string.IsNullOrEmpty(cre.Properties["remarks"] + ""))
  8186. {
  8187. sqlString += " and instr(qa.remarks, :remarks) > 0\n";
  8188. paras.Add(new OracleParameter(":remarks", OracleDbType.NVarchar2, cre.Properties["remarks"], ParameterDirection.Input));
  8189. }
  8190. if (cre.Properties["checktimebegin"] != null)
  8191. {
  8192. sqlString += " and qa.checktime >= :checktimebegin\n";
  8193. paras.Add(new OracleParameter(":checktimebegin", OracleDbType.Date, cre.Properties["checktimebegin"], ParameterDirection.Input));
  8194. }
  8195. if (cre.Properties["checktimeend"] != null)
  8196. {
  8197. sqlString += " and qa.checktime < :checktimeend\n";
  8198. paras.Add(new OracleParameter(":checktimeend", OracleDbType.Date, cre.Properties["checktimeend"], ParameterDirection.Input));
  8199. }
  8200. sqlString += " ORDER BY gdd.barcode, qa.checktime ";
  8201. DataSet data = conn.GetSqlResultToDs(sqlString, paras.ToArray());
  8202. ServiceResultEntity sre = new ServiceResultEntity();
  8203. if (data == null || data.Tables.Count == 0 || data.Tables[0].Rows.Count == 0)
  8204. {
  8205. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  8206. }
  8207. sre.Data = data;
  8208. return sre;
  8209. }
  8210. catch (Exception ex)
  8211. {
  8212. throw ex;
  8213. }
  8214. finally
  8215. {
  8216. if (conn != null &&
  8217. conn.ConnState == ConnectionState.Open)
  8218. {
  8219. conn.Close();
  8220. }
  8221. }
  8222. }
  8223. #endregion
  8224. #region 成品装车(潮州需求【废弃】)
  8225. /*
  8226. /// <summary>
  8227. /// 获取当天装车号
  8228. /// </summary>
  8229. /// <param name="user"></param>
  8230. /// <returns></returns>
  8231. public static int GetMaxLoadingNo(SUserInfo user)
  8232. {
  8233. IDBConnection conn = null;
  8234. try
  8235. {
  8236. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8237. conn.Open();
  8238. string sqlString = "select nvl(max(fl.loadingno), 0) + 1\n" +
  8239. " from TP_PM_FINISHEDLOADING fl\n" +
  8240. " where fl.loadingdate = :loadingdate\n" +
  8241. " and fl.valueflag = '1'\n" +
  8242. " and fl.accountid = :accountid";
  8243. IDataParameter[] paras = new OracleParameter[]
  8244. {
  8245. new OracleParameter(":accountid", OracleDbType.Int32,user.AccountID, ParameterDirection.Input),
  8246. new OracleParameter(":loadingdate", OracleDbType.Date, DateTime.Now.Date, ParameterDirection.Input),
  8247. };
  8248. object maxno = conn.GetSqlResultToObj(sqlString, paras);
  8249. if (maxno == null || maxno == DBNull.Value)
  8250. {
  8251. return 1;
  8252. }
  8253. else
  8254. {
  8255. return Convert.ToInt32(maxno);
  8256. }
  8257. }
  8258. catch (Exception ex)
  8259. {
  8260. throw ex;
  8261. }
  8262. finally
  8263. {
  8264. if (conn != null &&
  8265. conn.ConnState == ConnectionState.Open)
  8266. {
  8267. conn.Close();
  8268. }
  8269. }
  8270. }
  8271. /// <summary>
  8272. /// 产成品装车条码验证
  8273. /// </summary>
  8274. /// <param name="barcode"></param>
  8275. /// <param name="sUserInfo"></param>
  8276. /// <returns></returns>
  8277. public static ServiceResultEntity CheckFinishedLaodingBarcode(SUserInfo sUserInfo, string barcode)
  8278. {
  8279. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8280. try
  8281. {
  8282. oracleConn.Open();
  8283. ServiceResultEntity resultEntity = new ServiceResultEntity();
  8284. string sqlString = @"select FUN_CMN_GetBarCode(:barcode,null,:accountid) From DUAL";
  8285. OracleParameter[] paras1 = new OracleParameter[]{
  8286. new OracleParameter(":barcode",OracleDbType.Varchar2, barcode,ParameterDirection.Input),
  8287. new OracleParameter(":accountid",OracleDbType.Int32, sUserInfo.AccountID,ParameterDirection.Input),
  8288. };
  8289. string gbarcode = oracleConn.GetSqlResultToObj(sqlString, paras1) + "";
  8290. if (string.IsNullOrWhiteSpace(gbarcode))
  8291. {
  8292. resultEntity.Status = Constant.ServiceResultStatus.Other;
  8293. resultEntity.OtherStatus = -1;
  8294. resultEntity.Message = "此条码不存在";
  8295. return resultEntity;
  8296. }
  8297. // 1.判断产品是否在产成品表中
  8298. sqlString = @"select f.FINISHEDLOADBATCHNO from TP_PM_FinishedProduct f where f.BarCode=:BarCode";
  8299. OracleParameter[] paras = new OracleParameter[]{
  8300. new OracleParameter(":BarCode",OracleDbType.NVarchar2,gbarcode,ParameterDirection.Input),
  8301. };
  8302. DataTable dtResult = oracleConn.GetSqlResultToDt(sqlString, paras);
  8303. string FINISHEDLOADBATCHNO = null;
  8304. if (dtResult != null && dtResult.Rows.Count > 0)
  8305. {
  8306. FINISHEDLOADBATCHNO = dtResult.Rows[0]["FINISHEDLOADBATCHNO"].ToString();
  8307. }
  8308. else
  8309. {
  8310. resultEntity.Status = Constant.ServiceResultStatus.Other;
  8311. resultEntity.OtherStatus = -1;
  8312. resultEntity.Message = "此产品没有交接";
  8313. return resultEntity;
  8314. }
  8315. sqlString = "select 1\n" +
  8316. " from TP_PM_FPLoadingDetail fpld\n" +
  8317. " where fpld.finishedloadbatchno = :fbatchno\n" +
  8318. " and rownum = 1";
  8319. paras = new OracleParameter[]{
  8320. new OracleParameter(":fbatchno",OracleDbType.NVarchar2,FINISHEDLOADBATCHNO,ParameterDirection.Input),
  8321. };
  8322. string exists = oracleConn.GetSqlResultToObj(sqlString, paras)+"";
  8323. if (!string.IsNullOrEmpty(exists))
  8324. {
  8325. resultEntity.Status = Constant.ServiceResultStatus.Other;
  8326. resultEntity.OtherStatus = -1;
  8327. resultEntity.Message = "此产品已装车";
  8328. return resultEntity;
  8329. }
  8330. #region 查询产品相关信息
  8331. sqlString = "select ss.settingvalue\n" +
  8332. " from tp_mst_systemsetting ss\n" +
  8333. " where ss.settingcode = 'S_PM_025'\n" +
  8334. " and ss.accountid = :accountid";
  8335. paras = new OracleParameter[]{
  8336. new OracleParameter(":accountid",OracleDbType.Int32,sUserInfo.AccountID,ParameterDirection.Input),
  8337. };
  8338. exists = oracleConn.GetSqlResultToObj(sqlString, paras) + "";
  8339. if (string.IsNullOrWhiteSpace(exists))
  8340. {
  8341. exists = "0";
  8342. }
  8343. sqlString = "select "+ exists + " limitnum, :barcode barcode, :fbatchno fbatchno, to_char(sum(cc)) sumcount\n" +
  8344. " ,listagg(to_char(t.goodscode) || '[' || to_char(cc) || ']', ', ') within group(order by t.goodscode) dd\n" +
  8345. " from (select count(*) cc, fp.goodscode\n" +
  8346. " from tp_pm_finishedproduct fp\n" +
  8347. " where fp.finishedloadbatchno =:fbatchno\n" +
  8348. " group by fp.finishedloadbatchno, fp.goodscode) t";
  8349. paras = new OracleParameter[]{
  8350. new OracleParameter(":barcode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  8351. new OracleParameter(":fbatchno",OracleDbType.NVarchar2,FINISHEDLOADBATCHNO,ParameterDirection.Input),
  8352. };
  8353. dtResult = oracleConn.GetSqlResultToDt(sqlString, paras);
  8354. if (dtResult != null && dtResult.Rows.Count > 0)
  8355. {
  8356. resultEntity.Data = new DataSet("ds");
  8357. resultEntity.Data.Tables.Add(dtResult);
  8358. sqlString = "select fp.barcode, fp.groutingdailydetailid, :fbatchno fbatchno\n" +
  8359. " from tp_pm_finishedproduct fp\n" +
  8360. " where fp.finishedloadbatchno = :fbatchno";
  8361. paras = new OracleParameter[]{
  8362. new OracleParameter(":fbatchno",OracleDbType.NVarchar2,FINISHEDLOADBATCHNO,ParameterDirection.Input),
  8363. };
  8364. dtResult = oracleConn.GetSqlResultToDt(sqlString, paras);
  8365. resultEntity.Data.Tables.Add(dtResult);
  8366. }
  8367. else
  8368. {
  8369. resultEntity.Status = Constant.ServiceResultStatus.Other;
  8370. resultEntity.OtherStatus = -1;
  8371. resultEntity.Message = "此条码不存在";
  8372. return resultEntity;
  8373. }
  8374. #endregion
  8375. return resultEntity;
  8376. }
  8377. catch (Exception ex)
  8378. {
  8379. throw ex;
  8380. }
  8381. finally
  8382. {
  8383. if (oracleConn.ConnState == ConnectionState.Open)
  8384. {
  8385. oracleConn.Close();
  8386. }
  8387. }
  8388. }
  8389. /// <summary>
  8390. /// 产成品装车-保存
  8391. /// </summary>
  8392. /// <param name="barcode"></param>
  8393. /// <param name="sUserInfo"></param>
  8394. /// <returns></returns>
  8395. public static ServiceResultEntity SaveFinishedLoading(SUserInfo sUserInfo, int loadingNo,
  8396. string carLicense, int palletNum, int goodsNum, string remarks, Dictionary<string, object>[] details)
  8397. {
  8398. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8399. try
  8400. {
  8401. oracleConn.Connect();
  8402. ServiceResultEntity resultEntity = new ServiceResultEntity();
  8403. DateTime date = DateTime.Now.Date;
  8404. // 1 验证 LoadingNo
  8405. string sqlString = "select 1\n" +
  8406. " from TP_PM_FinishedLoading fl\n" +
  8407. " where fl.loadingdate = :loadingdate\n" +
  8408. " and fl.loadingno = :loadingno\n" +
  8409. " and fl.AccountID = :AccountID\n" +
  8410. " and rownum = 1";
  8411. OracleParameter[] paras = new OracleParameter[]{
  8412. new OracleParameter(":loadingdate",OracleDbType.Date, date,ParameterDirection.Input),
  8413. new OracleParameter(":loadingno",OracleDbType.Int32, loadingNo,ParameterDirection.Input),
  8414. new OracleParameter(":AccountID",OracleDbType.Int32, sUserInfo.AccountID,ParameterDirection.Input),
  8415. };
  8416. string exists = oracleConn.GetSqlResultToObj(sqlString, paras) + "";
  8417. if (!string.IsNullOrEmpty(exists))
  8418. {
  8419. resultEntity.Status = Constant.ServiceResultStatus.Other;
  8420. resultEntity.OtherStatus = -1;
  8421. resultEntity.Message = "今天此装车序号已存在";
  8422. return resultEntity;
  8423. }
  8424. // 2 保存
  8425. sqlString = @"select SEQ_PM_FinishedLoading_ID.Nextval From DUAL";
  8426. int loadingID = Convert.ToInt32(oracleConn.GetSqlResultToObj(sqlString));
  8427. sqlString = "insert into TP_PM_FinishedLoading\n" +
  8428. " (LOADINGID\n" +
  8429. " ,LOADINGDATE\n" +
  8430. " ,LOADINGNO\n" +
  8431. " ,CARLICENSE\n" +
  8432. " ,PALLETNUM\n" +
  8433. " ,GOODSNUM\n" +
  8434. " ,REMARKS\n" +
  8435. " ,ACCOUNTID\n" +
  8436. " ,CREATEUSERID)\n" +
  8437. "values\n" +
  8438. " (:LOADINGID\n" +
  8439. " ,:LOADINGDATE\n" +
  8440. " ,:LOADINGNO\n" +
  8441. " ,:CARLICENSE\n" +
  8442. " ,:PALLETNUM\n" +
  8443. " ,:GOODSNUM\n" +
  8444. " ,:REMARKS\n" +
  8445. " ,:ACCOUNTID\n" +
  8446. " ,:CREATEUSERID)";
  8447. paras = new OracleParameter[]{
  8448. new OracleParameter(":LOADINGID",OracleDbType.Int32, loadingID,ParameterDirection.Input),
  8449. new OracleParameter(":LOADINGDATE",OracleDbType.Date, date,ParameterDirection.Input),
  8450. new OracleParameter(":LOADINGNO",OracleDbType.Int32, loadingNo,ParameterDirection.Input),
  8451. new OracleParameter(":CARLICENSE",OracleDbType.Varchar2, carLicense,ParameterDirection.Input),
  8452. new OracleParameter(":PALLETNUM",OracleDbType.Int32, palletNum,ParameterDirection.Input),
  8453. new OracleParameter(":GOODSNUM",OracleDbType.Int32, goodsNum,ParameterDirection.Input),
  8454. new OracleParameter(":REMARKS",OracleDbType.NVarchar2, remarks,ParameterDirection.Input),
  8455. new OracleParameter(":ACCOUNTID",OracleDbType.Int32, sUserInfo.AccountID,ParameterDirection.Input),
  8456. new OracleParameter(":CREATEUSERID",OracleDbType.Int32, sUserInfo.UserID,ParameterDirection.Input),
  8457. };
  8458. int r = oracleConn.ExecuteNonQuery(sqlString, paras);
  8459. sqlString = "insert into TP_PM_FPLoadingDetail\n" +
  8460. " (LOADINGID, GROUTINGDAILYDETAILID, FINISHEDLOADBATCHNO)\n" +
  8461. "values\n" +
  8462. " (:LOADINGID, :GROUTINGDAILYDETAILID, :FINISHEDLOADBATCHNO)";
  8463. foreach (Dictionary<string, object> item in details)
  8464. {
  8465. paras = new OracleParameter[]{
  8466. new OracleParameter(":LOADINGID",OracleDbType.Int32, loadingID,ParameterDirection.Input),
  8467. new OracleParameter(":GROUTINGDAILYDETAILID",OracleDbType.Int32, item["groutingdailydetailid"],ParameterDirection.Input),
  8468. new OracleParameter(":FINISHEDLOADBATCHNO",OracleDbType.Varchar2, item["fbatchno"],ParameterDirection.Input),
  8469. };
  8470. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  8471. }
  8472. oracleConn.Commit();
  8473. return resultEntity;
  8474. }
  8475. catch (Exception ex)
  8476. {
  8477. throw ex;
  8478. }
  8479. finally
  8480. {
  8481. if (oracleConn.ConnState == ConnectionState.Open)
  8482. {
  8483. oracleConn.Disconnect();
  8484. }
  8485. }
  8486. }
  8487. */
  8488. #endregion
  8489. #region 半检返修登记
  8490. /// <summary>
  8491. /// 获取半检返修登记列表
  8492. /// </summary>
  8493. /// <returns></returns>
  8494. public static ServiceResultEntity GetSemiRework(ClientRequestEntity cre, SUserInfo userInfo)
  8495. {
  8496. IDBConnection conn = null;
  8497. try
  8498. {
  8499. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8500. conn.Open();
  8501. string sqlString = "select sr.SemiReworkID\n" +
  8502. " ,sr.BarCode\n" +
  8503. " ,sr.ProductionLineID\n" +
  8504. " ,sr.ProcedureID\n" +
  8505. " ,p.procedurename\n" +
  8506. " ,sr.ProcedureTime\n" +
  8507. " ,sr.GoodsID\n" +
  8508. " ,sr.GoodsCode\n" +
  8509. " ,sr.UserID --完成工号ID\n" +
  8510. " ,sr.UserCode\n" +
  8511. " ,sr.ProductionDataID\n" +
  8512. " ,sr.GroutingDailyID\n" +
  8513. " ,sr.GroutingDailyDetailID\n" +
  8514. " ,sr.GroutingLineID\n" +
  8515. " ,sr.GroutingLineCode\n" +
  8516. " ,sr.GroutingLineDetailID\n" +
  8517. " ,sr.GroutingDate\n" +
  8518. " ,sr.GroutingMouldCode\n" +
  8519. " ,sr.GroutingUserID\n" +
  8520. " ,sr.GroutingUserCode\n" +
  8521. " ,sr.SemiReworkUserID\n" +
  8522. " ,sr.SemiReworkUserCode\n" +
  8523. " ,sr.SemiReworkTime\n" +
  8524. " ,sr.ReworkProcedureID\n" +
  8525. " ,rp.procedurename ReworkProcedurename\n" +
  8526. " ,sr.BackOutFlag\n" +
  8527. " ,sr.BackOutTime\n" +
  8528. " ,sr.BackOutUserID\n" +
  8529. " ,sr.BackOutUserCode\n" +
  8530. " ,sr.Remarks\n" +
  8531. " from TP_PM_SemiRework sr\n" +
  8532. " inner join tp_pc_procedure p\n" +
  8533. " on p.procedureid = sr.procedureid\n" +
  8534. " inner join tp_pc_procedure rp\n" +
  8535. " on rp.procedureid = sr.reworkprocedureid" +
  8536. " where sr.accountID = :accountID" +
  8537. " and sr.valueflag = '1'" +
  8538. // todo 其他查询条件
  8539. " order by sr.SemiReworkID desc";
  8540. IDataParameter[] paras = new OracleParameter[]
  8541. {
  8542. new OracleParameter(":accountID", OracleDbType.Int32,userInfo.AccountID, ParameterDirection.Input),
  8543. };
  8544. ServiceResultEntity sre = new ServiceResultEntity();
  8545. DataSet data = conn.GetSqlResultToDs(sqlString, paras);
  8546. if (data == null || data.Tables.Count == 0 || data.Tables[0].Rows.Count == 0)
  8547. {
  8548. sre.Status = Constant.ServiceResultStatus.NoSearchResults;
  8549. return sre;
  8550. }
  8551. data.Tables[0].TableName = "SemiRework";
  8552. sre.Data = data;
  8553. int semiReworkID = Convert.ToInt32(data.Tables[0].Rows[0]["SemiReworkID"]);
  8554. ServiceResultEntity sre1 = GetSemiReworkDefect(semiReworkID, userInfo, conn);
  8555. if (sre1.Data == null || sre1.Data.Tables.Count == 0 || sre1.Data.Tables[0].Rows.Count == 0)
  8556. {
  8557. return sre;
  8558. }
  8559. sre1.Data.Tables[0].TableName = "SemiReworkDefect";
  8560. sre.Data.Merge(sre1.Data.Tables[0]);
  8561. return sre;
  8562. }
  8563. catch (Exception ex)
  8564. {
  8565. throw ex;
  8566. }
  8567. finally
  8568. {
  8569. if (conn != null &&
  8570. conn.ConnState == ConnectionState.Open)
  8571. {
  8572. conn.Close();
  8573. }
  8574. }
  8575. }
  8576. /// <summary>
  8577. /// 获取半检返修登记列表
  8578. /// </summary>
  8579. /// <returns></returns>
  8580. public static ServiceResultEntity GetSemiReworkDefect(int semiReworkID, SUserInfo userInfo, IDBConnection conn = null)
  8581. {
  8582. try
  8583. {
  8584. if (conn == null)
  8585. {
  8586. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8587. conn.Open();
  8588. }
  8589. string sqlString = "select srd.SemiReworkDefectID\n" +
  8590. " ,srd.SemiReworkID\n" +
  8591. " ,srd.DefectID\n" +
  8592. " ,srd.DefectCode\n" +
  8593. " ,srd.DefectName\n" +
  8594. " ,srd.DefectPositionID\n" +
  8595. " ,srd.DefectPositionCode\n" +
  8596. " ,srd.DefectPositionName\n" +
  8597. " ,srd.ScrapResponFlag\n" +
  8598. " ,srd.DefectProductionDataID\n" +
  8599. " ,srd.DefectProcedureID\n" +
  8600. " ,p.procedurename DefectProcedureName\n" +
  8601. " ,srd.DefectUserID\n" +
  8602. " ,srd.DefectUserCode\n" +
  8603. " ,srd.Remarks\n" +
  8604. " from TP_PM_SemiReworkDefect srd\n" +
  8605. " inner join tp_pc_procedure p\n" +
  8606. " on p.procedureid = srd.DefectProcedureID\n" +
  8607. " where srd.accountID = :accountID" +
  8608. " and srd.valueflag = '1'" +
  8609. " and srd.SemiReworkID = :SemiReworkID" +
  8610. " order by srd.DefectID";
  8611. IDataParameter[] paras = new OracleParameter[]
  8612. {
  8613. new OracleParameter(":accountID", OracleDbType.Int32,userInfo.AccountID, ParameterDirection.Input),
  8614. new OracleParameter(":SemiReworkID", OracleDbType.Int32,semiReworkID, ParameterDirection.Input),
  8615. };
  8616. DataSet data = conn.GetSqlResultToDs(sqlString, paras);
  8617. ServiceResultEntity sre = new ServiceResultEntity();
  8618. sre.Data = data;
  8619. return sre;
  8620. }
  8621. catch (Exception ex)
  8622. {
  8623. throw ex;
  8624. }
  8625. finally
  8626. {
  8627. if (conn != null &&
  8628. conn.ConnState == ConnectionState.Open)
  8629. {
  8630. conn.Close();
  8631. }
  8632. }
  8633. }
  8634. /// <summary>
  8635. /// 获取登陆帐户有无修改半检返修权限
  8636. /// </summary>
  8637. /// <returns></returns>
  8638. public static int GetSemiReworkEditFuntion(SUserInfo userInfo)
  8639. {
  8640. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8641. try
  8642. {
  8643. con.Open();
  8644. string strSql = "";
  8645. strSql = @"SELECT r.FunctionCode FROM TP_MST_UserRight R WHERE r.FunctionCode='06200104' AND R.UserID = " + userInfo.UserID;
  8646. DataSet ds = con.GetSqlResultToDs(strSql);
  8647. if (ds != null && ds.Tables[0].Rows.Count > 0)
  8648. {
  8649. return 1;
  8650. }
  8651. return 0;
  8652. }
  8653. catch (Exception ex)
  8654. {
  8655. throw ex;
  8656. }
  8657. finally
  8658. {
  8659. if (con.ConnState == ConnectionState.Open)
  8660. {
  8661. con.Close();
  8662. }
  8663. }
  8664. }
  8665. /// <summary>
  8666. /// 验证半检返修条码
  8667. /// </summary>
  8668. /// <param name="barcode">产品条码</param>
  8669. /// <returns></returns>
  8670. public static ServiceResultEntity CheckSemiReworkBarcode(string barcode)
  8671. {
  8672. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8673. try
  8674. {
  8675. oracleConn.Open();
  8676. ServiceResultEntity resultEntity = new ServiceResultEntity();
  8677. // 1.判断产品是否在产
  8678. string sql = @"select
  8679. InScrapFlag,
  8680. KilnCarID,
  8681. KilnCarName,
  8682. IsReworkFlag,
  8683. SemiCheckID
  8684. from TP_PM_InProduction
  8685. where BarCode=:BarCode";
  8686. OracleParameter[] paras = new OracleParameter[]{
  8687. new OracleParameter(":BarCode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  8688. };
  8689. DataSet dsResult = oracleConn.GetSqlResultToDs(sql, paras);
  8690. if (dsResult != null && dsResult.Tables[0].Rows.Count > 0)
  8691. {
  8692. if (dsResult.Tables[0].Rows[0]["InScrapFlag"].ToString() == "1")
  8693. {
  8694. resultEntity.Result = -2; //报损待审批
  8695. resultEntity.Message = "条码[" + barcode + "]已经报损待审批";
  8696. return resultEntity;
  8697. }
  8698. if (!string.IsNullOrEmpty(dsResult.Tables[0].Rows[0]["KilnCarID"].ToString()))
  8699. {
  8700. resultEntity.Result = -3; //登窑车后不允许半成品检测
  8701. resultEntity.Message = "条码[" + barcode + "]已经在窑车[" + dsResult.Tables[0].Rows[0]["KilnCarName"].ToString() + "]";
  8702. return resultEntity;
  8703. }
  8704. if (dsResult.Tables[0].Rows[0]["IsReworkFlag"].ToString() == "1")
  8705. {
  8706. resultEntity.Result = -4; //半检返工
  8707. resultEntity.Message = "条码[" + barcode + "]已半检返工";
  8708. return resultEntity;
  8709. }
  8710. if (dsResult.Tables[0].Rows[0]["IsReworkFlag"].ToString() == "2")
  8711. {
  8712. resultEntity.Result = Convert.ToInt32(dsResult.Tables[0].Rows[0]["SemiCheckID"]);//编辑状态
  8713. resultEntity.Message = "返修";
  8714. }
  8715. else
  8716. {
  8717. resultEntity.Result = "0";//新建状态
  8718. }
  8719. }
  8720. else
  8721. {
  8722. resultEntity.Result = -1;// 不在在产表中
  8723. resultEntity.Message = "条码[" + barcode + "]不在在产流程";
  8724. }
  8725. return resultEntity;
  8726. }
  8727. catch (Exception ex)
  8728. {
  8729. throw ex;
  8730. }
  8731. finally
  8732. {
  8733. if (oracleConn.ConnState == ConnectionState.Open)
  8734. {
  8735. oracleConn.Close();
  8736. }
  8737. }
  8738. }
  8739. /// <summary>
  8740. /// 根据半成品检验数据ID,显示半成品数据信息
  8741. /// </summary>
  8742. /// <param name="semiCheckID">半成品数据ID</param>
  8743. /// <returns>DataSet</returns>
  8744. public static ServiceResultEntity GetSemiReworkByID(int semiReworkID,string userCode = "")
  8745. {
  8746. IDBConnection conn = null;
  8747. try
  8748. {
  8749. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8750. conn.Open();
  8751. string sqlString = "select sr.SemiReworkID\n" +
  8752. " ,sr.BarCode\n" +
  8753. " ,sr.ProductionLineID\n" +
  8754. " ,sr.ProcedureID\n" +
  8755. " ,p.procedurename\n" +
  8756. " ,sr.ProcedureTime\n" +
  8757. " ,sr.GoodsID\n" +
  8758. " ,sr.GoodsCode\n" +
  8759. " ,sr.UserID --完成工号ID\n" +
  8760. " ,sr.UserCode\n" +
  8761. " ,sr.ProductionDataID\n" +
  8762. " ,sr.GroutingDailyID\n" +
  8763. " ,sr.GroutingDailyDetailID\n" +
  8764. " ,sr.GroutingLineID\n" +
  8765. " ,sr.GroutingLineCode\n" +
  8766. " ,sr.GroutingLineDetailID\n" +
  8767. " ,sr.GroutingDate\n" +
  8768. " ,sr.GroutingMouldCode\n" +
  8769. " ,sr.GroutingUserID\n" +
  8770. " ,sr.GroutingUserCode\n" +
  8771. " ,sr.SemiReworkUserID\n" +
  8772. " ,sr.SemiReworkUserCode\n" +
  8773. " ,sr.SemiReworkTime\n" +
  8774. " ,sr.ReworkProcedureID\n" +
  8775. " ,rp.procedurename ReworkProcedurename\n" +
  8776. " ,sr.BackOutFlag\n" +
  8777. " ,sr.BackOutTime\n" +
  8778. " ,sr.BackOutUserID\n" +
  8779. " ,sr.BackOutUserCode\n" +
  8780. " ,sr.Remarks\n" +
  8781. " from TP_PM_SemiRework sr\n" +
  8782. " inner join tp_pc_procedure p\n" +
  8783. " on p.procedureid = sr.procedureid\n" +
  8784. " left join tp_pc_procedure rp\n" +
  8785. " on rp.procedureid = sr.reworkprocedureid" +
  8786. " where sr.SemiReworkID = :SemiReworkID";
  8787. string sqlString1 = "select srd.SemiReworkDefectID\n" +
  8788. " ,srd.SemiReworkID\n" +
  8789. " ,srd.DefectID\n" +
  8790. " ,srd.DefectCode\n" +
  8791. " ,srd.DefectName\n" +
  8792. " ,srd.DefectPositionID\n" +
  8793. " ,srd.DefectPositionCode\n" +
  8794. " ,srd.DefectPositionName\n" +
  8795. " ,srd.ScrapResponFlag\n" +
  8796. " ,srd.DefectProductionDataID\n" +
  8797. " ,srd.DefectProcedureID\n" +
  8798. " ,p.procedurecode DefectProcedureCode\n" +
  8799. " ,p.procedurename DefectProcedureName\n" +
  8800. " ,srd.DefectUserID\n" +
  8801. " ,du.username DefectUserName\n" +
  8802. " ,srd.DefectUserCode\n" +
  8803. " ,srd.Remarks\n" +
  8804. " ,srd.ValueFlag\n" + //xuwei add 2019-11-14 为 1 时可编辑 为 0 时不可编辑
  8805. " from TP_PM_SemiReworkDefect srd\n" +
  8806. " left join tp_pc_procedure p\n" +
  8807. " on p.procedureid = srd.DefectProcedureID\n" +
  8808. " inner join tp_mst_user du\n" +
  8809. " on du.userid = srd.DefectUserID\n" +
  8810. " where srd.SemiReworkID = :SemiReworkID" +
  8811. " order by srd.SemiReworkDefectID";
  8812. string sqlString2 = "select t.SemiReworkDefectID\n" +
  8813. " ,t.StaffID\n" +
  8814. " ,t.SemiReworkID\n" +
  8815. " ,t.UserID\n" +
  8816. " ,t.UserCode\n" +
  8817. " ,t.UJobsID\n" +
  8818. " ,t.SJobsID\n" +
  8819. " ,s.staffcode\n" +
  8820. " ,s.staffname\n" +
  8821. " from TP_PM_SemiReworkRPS t\n" +
  8822. " inner join tp_hr_staff s\n" +
  8823. " on s.staffid = t.staffid\n" +
  8824. " where t.valueflag = '1'" +
  8825. " and t.SemiReworkID = :SemiReworkID" +
  8826. " order by t.semireworkdefectid, s.staffcode";
  8827. IDataParameter[] paras = new OracleParameter[]
  8828. {
  8829. new OracleParameter(":SemiReworkID", OracleDbType.Int32,semiReworkID, ParameterDirection.Input),
  8830. };
  8831. ServiceResultEntity sre = new ServiceResultEntity();
  8832. DataTable data = conn.GetSqlResultToDt(sqlString, paras);
  8833. data.TableName = "SemiRework";
  8834. DataTable data1 = conn.GetSqlResultToDt(sqlString1, paras);
  8835. data1.TableName = "SemiReworkDefect";
  8836. DataTable data2 = conn.GetSqlResultToDt(sqlString2, paras);
  8837. data2.TableName = "SemiReworkRPS";
  8838. //xuwei add 2019-11-14 验证并重置valueflag,确定是否可编辑
  8839. if(userCode!="")
  8840. {
  8841. for(int i=0;i<data1.Rows.Count;i++)
  8842. {
  8843. //半检工号等于当前工号 并且 有效标识为1的 将 valueflag 置 1 是可编辑记录
  8844. if (data.Rows[0]["SemiReworkUserCode"].ToString() == userCode
  8845. && data1.Rows[i]["ValueFlag"].ToString() == "1")
  8846. data1.Rows[i]["ValueFlag"] = '1';
  8847. else
  8848. data1.Rows[i]["ValueFlag"] = '0';
  8849. }
  8850. }
  8851. else
  8852. {
  8853. for (int i = 0; i < data1.Rows.Count; i++)
  8854. {
  8855. //缺省半检工号 全部将 valueflag 置 0 不可编辑
  8856. data1.Rows[i]["ValueFlag"] = '0';
  8857. }
  8858. }
  8859. //xuwei end
  8860. sre.Data = new DataSet();
  8861. sre.Data.Tables.Add(data);
  8862. sre.Data.Tables.Add(data1);
  8863. sre.Data.Tables.Add(data2);
  8864. return sre;
  8865. }
  8866. catch (Exception ex)
  8867. {
  8868. throw ex;
  8869. }
  8870. finally
  8871. {
  8872. if (conn.ConnState == ConnectionState.Open)
  8873. {
  8874. conn.Close();
  8875. }
  8876. }
  8877. }
  8878. /// <summary>
  8879. /// 可以返修的工序
  8880. /// </summary>
  8881. /// <param name="barcode"></param>
  8882. /// <param name="userInfo"></param>
  8883. /// <returns></returns>
  8884. public static ServiceResultEntity GetSemiReworkProcedure(string barcode, SUserInfo userInfo)
  8885. {
  8886. IDBConnection conn = null;
  8887. try
  8888. {
  8889. conn = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8890. conn.Open();
  8891. string sqlString = "select p.procedureid, p.procedurecode, p.procedurename\n" +
  8892. " from tp_pm_inproduction t\n" +
  8893. " inner join tp_pc_procedure p\n" +
  8894. " on p.productionlineid = t.productionlineid\n" +
  8895. " and p.ISSEMIREWORK = '1'\n" +
  8896. " where t.barcode = :barcode";
  8897. IDataParameter[] paras = new OracleParameter[]
  8898. {
  8899. new OracleParameter(":barcode", OracleDbType.NVarchar2,barcode, ParameterDirection.Input),
  8900. };
  8901. ServiceResultEntity sre = new ServiceResultEntity();
  8902. sre.Data = conn.GetSqlResultToDs(sqlString, paras);
  8903. return sre;
  8904. }
  8905. catch (Exception ex)
  8906. {
  8907. throw ex;
  8908. }
  8909. finally
  8910. {
  8911. if (conn.ConnState == ConnectionState.Open)
  8912. {
  8913. conn.Close();
  8914. }
  8915. }
  8916. }
  8917. /// <summary>
  8918. /// 根据条码获取经过的工序,用于责任工序
  8919. /// </summary>
  8920. /// <param name="barcode">产品条码</param>
  8921. /// <returns>DataSet</returns>
  8922. public static ServiceResultEntity GetSemiReworkPassProcedure(string barcode)
  8923. {
  8924. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8925. try
  8926. {
  8927. con.Open();
  8928. string sqlString = "select pin.Barcode\n" +
  8929. " ,pin.UserID\n" +
  8930. " ,pin.UserCode\n" +
  8931. " ,pin.UserName\n" +
  8932. " ,pin.ProcedureID\n" +
  8933. " ,pin.ProcedureCode\n" +
  8934. " ,pin.ProcedureName\n" +
  8935. " ,pin.ProductionDataID\n" +
  8936. " from TP_PM_ProductionDataIn pin\n" +
  8937. " where pin.valueflag = '1'\n" +
  8938. " and pin.barcode = :BarCode\n" +
  8939. " order by pin.ProductionDataID";
  8940. // 干补后 半检 不能选成型责任
  8941. OracleParameter[] paras = new OracleParameter[]{
  8942. new OracleParameter(":BarCode",OracleDbType.NVarchar2, barcode,ParameterDirection.Input),
  8943. };
  8944. ServiceResultEntity sre = new ServiceResultEntity();
  8945. sre.Data = con.GetSqlResultToDs(sqlString, paras);
  8946. return sre;
  8947. }
  8948. catch (Exception ex)
  8949. {
  8950. throw ex;
  8951. }
  8952. finally
  8953. {
  8954. if (con.ConnState == ConnectionState.Open)
  8955. {
  8956. con.Close();
  8957. }
  8958. }
  8959. }
  8960. /// <summary>
  8961. /// 根据所选生产工序(生产数据ID)查询责任员工
  8962. /// </summary>
  8963. /// <param name="productionDataID"></param>
  8964. /// <returns></returns>
  8965. public static ServiceResultEntity GetSemiReworkDefectStaffByProductionDataID(int productionDataID)
  8966. {
  8967. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  8968. try
  8969. {
  8970. con.Open();
  8971. string sqlString = "select cd.StaffID\n" +
  8972. " ,s.StaffCode\n" +
  8973. " ,s.staffname\n" +
  8974. " ,cd.staffstatus\n" +
  8975. " ,cd.UJobsID\n" +
  8976. " ,cd.SJobsID\n" +
  8977. " from tp_pm_productiondatain pd\n" +
  8978. //"--inner join tp_pc_classessetting c on c.classessettingid = pd.classessettingid\n" +
  8979. " inner join tp_pc_classesdetail cd\n" +
  8980. " on cd.classessettingid = pd.classessettingid\n" +
  8981. " inner join TP_HR_Staff s\n" +
  8982. " on s.staffid = cd.staffid\n" +
  8983. " where pd.productiondataid = :productionDataID\n" +
  8984. " order by s.StaffCode";
  8985. OracleParameter[] paras = new OracleParameter[]{
  8986. new OracleParameter(":productionDataID",OracleDbType.Int32, productionDataID,ParameterDirection.Input),
  8987. };
  8988. ServiceResultEntity se = new ServiceResultEntity();
  8989. se.Data = con.GetSqlResultToDs(sqlString, paras);
  8990. return se;
  8991. }
  8992. catch (Exception ex)
  8993. {
  8994. throw ex;
  8995. }
  8996. finally
  8997. {
  8998. if (con.ConnState == ConnectionState.Open)
  8999. {
  9000. con.Close();
  9001. }
  9002. }
  9003. }
  9004. /// <summary>
  9005. /// 根据所选工号,查出缺陷责任员工
  9006. /// </summary>
  9007. /// <param name="userid">用户ID</param>
  9008. /// <returns>DataSet</returns>
  9009. public static ServiceResultEntity GetSemiReworkDefectStaffByUserID(int userid)
  9010. {
  9011. IDBConnection con = ClsDbFactory.CreateDBConnection(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  9012. try
  9013. {
  9014. con.Open();
  9015. string sqlString = "select s.StaffID\n" +
  9016. " ,s.StaffCode\n" +
  9017. " ,s.StaffName\n" +
  9018. " ,s.StaffStatus\n" +
  9019. " ,us.UJobsID\n" +
  9020. " ,s.jobs SJobsID\n" +
  9021. " from TP_MST_UserStaff us\n" +
  9022. " inner join TP_HR_Staff s\n" +
  9023. " on us.Staffid = s.Staffid\n" +
  9024. " where us.Userid = :userid";
  9025. OracleParameter[] paras = new OracleParameter[]{
  9026. new OracleParameter(":userid",OracleDbType.Int32, userid,ParameterDirection.Input),
  9027. };
  9028. ServiceResultEntity se = new ServiceResultEntity();
  9029. se.Data = con.GetSqlResultToDs(sqlString, paras);
  9030. return se;
  9031. }
  9032. catch (Exception ex)
  9033. {
  9034. throw ex;
  9035. }
  9036. finally
  9037. {
  9038. if (con.ConnState == ConnectionState.Open)
  9039. {
  9040. con.Close();
  9041. }
  9042. }
  9043. }
  9044. /// <summary>
  9045. /// 保存半检返修
  9046. /// </summary>
  9047. /// <param name="entity">半检实体类</param>
  9048. /// <param name="sUserInfo">用户基本信息</param>
  9049. /// <returns>ServiceResultEntity</returns>
  9050. /// <remarks>
  9051. /// 王鑫 2016.06.27 新建
  9052. /// </remarks>
  9053. public static ServiceResultEntity AddSemiRework(SemiReworkEntity entityobj, SUserInfo sUserInfo)
  9054. {
  9055. IDBTransaction con = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  9056. try
  9057. {
  9058. ServiceResultEntity resultEntity = new ServiceResultEntity();
  9059. resultEntity.Result = 1;
  9060. if (entityobj == null || string.IsNullOrWhiteSpace(entityobj.BarCode) ||
  9061. entityobj.SemiReworkDefects == null || entityobj.SemiReworkDefects.Count == 0)
  9062. {
  9063. resultEntity.Result = -1;
  9064. resultEntity.Message = "数据错误";
  9065. return resultEntity;
  9066. }
  9067. con.Connect();
  9068. string barcode = entityobj.BarCode;
  9069. #region 验证条码
  9070. // 1.判断产品是否在产
  9071. string sql = @"select p.*,u.usercode from TP_PM_InProduction p inner join tp_mst_user u on u.userid=p.userid where p.BarCode=:BarCode for update";
  9072. OracleParameter[] paras = new OracleParameter[]{
  9073. new OracleParameter(":BarCode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  9074. };
  9075. DataTable dsResult = con.GetSqlResultToDt(sql, paras);
  9076. if (dsResult == null || dsResult.Rows.Count == 0)
  9077. {
  9078. resultEntity.Result = -1;// 不在在产表中
  9079. resultEntity.Message = "条码[" + barcode + "]不在在产流程";
  9080. return resultEntity;
  9081. }
  9082. DataRow dataRow = dsResult.Rows[0];
  9083. if (dataRow["InScrapFlag"].ToString() == "1")
  9084. {
  9085. resultEntity.Result = -2; //报损待审批
  9086. resultEntity.Message = "条码[" + barcode + "]已经报损待审批";
  9087. return resultEntity;
  9088. }
  9089. if (!string.IsNullOrEmpty(dataRow["KilnCarID"].ToString()))
  9090. {
  9091. resultEntity.Result = -3; //登窑车后不允许半成品检测
  9092. resultEntity.Message = "条码[" + barcode + "]已经在窑车[" + dataRow["KilnCarName"].ToString() + "]";
  9093. return resultEntity;
  9094. }
  9095. if (dataRow["IsReworkFlag"].ToString() == "1")
  9096. {
  9097. resultEntity.Result = -4; //半检返工
  9098. resultEntity.Message = "条码[" + barcode + "]已半检返工";
  9099. return resultEntity;
  9100. }
  9101. //xuwei modify 2019-11-14 允许多次半检
  9102. //if (dataRow["IsReworkFlag"].ToString() == "2")
  9103. //{
  9104. // resultEntity.Result = -5; //半检返修
  9105. // resultEntity.Message = "条码[" + barcode + "]已半检返修";
  9106. // return resultEntity;
  9107. //}
  9108. //xuwei end
  9109. #endregion
  9110. #region 保存数据
  9111. sql = "select SEQ_PM_SemiRework_ID.nextval from dual";
  9112. object srID = con.GetSqlResultToObj(sql);
  9113. // 返修
  9114. string sqlString = "insert into tp_pm_semirework\n" +
  9115. " (SEMIREWORKID\n" +
  9116. " ,BARCODE\n" +
  9117. " ,PRODUCTIONLINEID\n" +
  9118. " ,PROCEDUREID\n" +
  9119. " ,PROCEDURETIME\n" +
  9120. " ,GOODSID\n" +
  9121. " ,GOODSCODE\n" +
  9122. " ,USERID\n" +
  9123. " ,USERCODE\n" +
  9124. " ,PRODUCTIONDATAID\n" +
  9125. " ,GROUTINGDAILYID\n" +
  9126. " ,GROUTINGDAILYDETAILID\n" +
  9127. " ,GROUTINGLINEID\n" +
  9128. " ,GROUTINGLINECODE\n" +
  9129. " ,GROUTINGLINEDETAILID\n" +
  9130. " ,GROUTINGDATE\n" +
  9131. " ,GROUTINGMOULDCODE\n" +
  9132. " ,GROUTINGUSERID\n" +
  9133. " ,GROUTINGUSERCODE\n" +
  9134. " ,SEMIREWORKUSERID\n" +
  9135. " ,SEMIREWORKUSERCODE\n" +
  9136. " ,SEMIREWORKTIME\n" +
  9137. " ,REWORKPROCEDUREID\n" +
  9138. " ,REMARKS\n" +
  9139. " ,ACCOUNTID\n" +
  9140. " ,VALUEFLAG\n" +
  9141. " ,CREATEUSERID\n" +
  9142. " ,UPDATEUSERID)\n" +
  9143. "values\n" +
  9144. " (:SEMIREWORKID\n" +
  9145. " ,:BARCODE\n" +
  9146. " ,:PRODUCTIONLINEID\n" +
  9147. " ,:PROCEDUREID\n" +
  9148. " ,:PROCEDURETIME\n" +
  9149. " ,:GOODSID\n" +
  9150. " ,:GOODSCODE\n" +
  9151. " ,:USERID\n" +
  9152. " ,:USERCODE\n" +
  9153. " ,:PRODUCTIONDATAID\n" +
  9154. " ,:GROUTINGDAILYID\n" +
  9155. " ,:GROUTINGDAILYDETAILID\n" +
  9156. " ,:GROUTINGLINEID\n" +
  9157. " ,:GROUTINGLINECODE\n" +
  9158. " ,:GROUTINGLINEDETAILID\n" +
  9159. " ,:GROUTINGDATE\n" +
  9160. " ,:GROUTINGMOULDCODE\n" +
  9161. " ,:GROUTINGUSERID\n" +
  9162. " ,:GROUTINGUSERCODE\n" +
  9163. " ,:SEMIREWORKUSERID\n" +
  9164. " ,:SEMIREWORKUSERCODE\n" +
  9165. " ,sysdate\n" +
  9166. " ,:REWORKPROCEDUREID\n" +
  9167. " ,:REMARKS\n" +
  9168. " ,:ACCOUNTID\n" +
  9169. " ,'1'\n" +
  9170. " ,:CREATEUSERID\n" +
  9171. " ,:UPDATEUSERID)\n";
  9172. paras = new OracleParameter[]{
  9173. new OracleParameter(":SEMIREWORKID",OracleDbType.Int32,srID,ParameterDirection.Input),
  9174. new OracleParameter(":BarCode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  9175. new OracleParameter(":PRODUCTIONLINEID",OracleDbType.Int32,dataRow["PRODUCTIONLINEID"],ParameterDirection.Input),
  9176. new OracleParameter(":PROCEDUREID",OracleDbType.Int32,dataRow["PROCEDUREID"],ParameterDirection.Input),
  9177. new OracleParameter(":PROCEDURETIME",OracleDbType.Date,dataRow["PROCEDURETIME"],ParameterDirection.Input),
  9178. new OracleParameter(":GOODSID",OracleDbType.Int32,dataRow["GOODSID"],ParameterDirection.Input),
  9179. new OracleParameter(":GOODSCODE",OracleDbType.NVarchar2,dataRow["GOODSCODE"],ParameterDirection.Input),
  9180. new OracleParameter(":USERID",OracleDbType.Int32,dataRow["USERID"],ParameterDirection.Input),
  9181. new OracleParameter(":USERCODE",OracleDbType.NVarchar2,dataRow["USERCODE"],ParameterDirection.Input),
  9182. new OracleParameter(":PRODUCTIONDATAID",OracleDbType.Int32,dataRow["PRODUCTIONDATAID"],ParameterDirection.Input),
  9183. new OracleParameter(":GROUTINGDAILYID",OracleDbType.Int32,dataRow["GROUTINGDAILYID"],ParameterDirection.Input),
  9184. new OracleParameter(":GROUTINGDAILYDETAILID",OracleDbType.Int32,dataRow["GROUTINGDAILYDETAILID"],ParameterDirection.Input),
  9185. new OracleParameter(":GROUTINGLINEID",OracleDbType.Int32,dataRow["GROUTINGLINEID"],ParameterDirection.Input),
  9186. new OracleParameter(":GROUTINGLINECODE",OracleDbType.NVarchar2,dataRow["GROUTINGLINECODE"],ParameterDirection.Input),
  9187. new OracleParameter(":GROUTINGLINEDETAILID",OracleDbType.Int32,dataRow["GROUTINGLINEDETAILID"],ParameterDirection.Input),
  9188. new OracleParameter(":GROUTINGDATE",OracleDbType.Date,dataRow["GROUTINGDATE"],ParameterDirection.Input),
  9189. new OracleParameter(":GROUTINGMOULDCODE",OracleDbType.NVarchar2,dataRow["GROUTINGMOULDCODE"],ParameterDirection.Input),
  9190. new OracleParameter(":GROUTINGUSERID",OracleDbType.Int32,dataRow["GROUTINGUSERID"],ParameterDirection.Input),
  9191. new OracleParameter(":GROUTINGUSERCODE",OracleDbType.NVarchar2,dataRow["GROUTINGUSERCODE"],ParameterDirection.Input),
  9192. new OracleParameter(":SEMIREWORKUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9193. new OracleParameter(":SEMIREWORKUSERCODE",OracleDbType.NVarchar2,sUserInfo.UserCode,ParameterDirection.Input),
  9194. new OracleParameter(":REWORKPROCEDUREID",OracleDbType.Int32,entityobj.ReworkProcedureID,ParameterDirection.Input),
  9195. new OracleParameter(":REMARKS",OracleDbType.NVarchar2,entityobj.Remarks,ParameterDirection.Input),
  9196. new OracleParameter(":ACCOUNTID",OracleDbType.Int32,sUserInfo.AccountID,ParameterDirection.Input),
  9197. new OracleParameter(":CREATEUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9198. new OracleParameter(":UPDATEUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9199. };
  9200. con.ExecuteNonQuery(sqlString, paras);
  9201. // 缺陷
  9202. string sqlStringDefect =
  9203. "insert into TP_PM_SemiReworkDefect\n" +
  9204. " (SEMIREWORKDEFECTID\n" +
  9205. " ,SEMIREWORKID\n" +
  9206. " ,DEFECTID\n" +
  9207. " ,DEFECTCODE\n" +
  9208. " ,DEFECTNAME\n" +
  9209. " ,DEFECTPOSITIONID\n" +
  9210. " ,DEFECTPOSITIONCODE\n" +
  9211. " ,DEFECTPOSITIONNAME\n" +
  9212. " ,SCRAPRESPONFLAG\n" +
  9213. " ,DEFECTPRODUCTIONDATAID\n" +
  9214. " ,DEFECTPROCEDUREID\n" +
  9215. " ,DEFECTUSERID\n" +
  9216. " ,DEFECTUSERCODE\n" +
  9217. " ,REMARKS\n" +
  9218. " ,ACCOUNTID\n" +
  9219. " ,VALUEFLAG\n" +
  9220. " ,CREATEUSERID\n" +
  9221. " ,UPDATEUSERID)\n" +
  9222. "values\n" +
  9223. " (:SEMIREWORKDEFECTID\n" +
  9224. " ,:SEMIREWORKID\n" +
  9225. " ,:DEFECTID\n" +
  9226. " ,:DEFECTCODE\n" +
  9227. " ,:DEFECTNAME\n" +
  9228. " ,:DEFECTPOSITIONID\n" +
  9229. " ,:DEFECTPOSITIONCODE\n" +
  9230. " ,:DEFECTPOSITIONNAME\n" +
  9231. " ,:SCRAPRESPONFLAG\n" +
  9232. " ,:DEFECTPRODUCTIONDATAID\n" +
  9233. " ,:DEFECTPROCEDUREID\n" +
  9234. " ,:DEFECTUSERID\n" +
  9235. " ,:DEFECTUSERCODE\n" +
  9236. " ,:REMARKS\n" +
  9237. " ,:ACCOUNTID\n" +
  9238. " ,:VALUEFLAG\n" +
  9239. " ,:CREATEUSERID\n" +
  9240. " ,:UPDATEUSERID)";
  9241. string sqlStringRPS =
  9242. "insert into TP_PM_SemiReworkRPS\n" +
  9243. " (semireworkdefectid\n" +
  9244. " ,staffid\n" +
  9245. " ,semireworkid\n" +
  9246. " ,userid\n" +
  9247. " ,usercode\n" +
  9248. " ,ujobsid\n" +
  9249. " ,sjobsid\n" +
  9250. " ,accountid\n" +
  9251. " ,valueflag\n" +
  9252. " ,createuserid\n" +
  9253. " ,updateuserid)\n" +
  9254. "values\n" +
  9255. " (:semireworkdefectid\n" +
  9256. " ,:staffid\n" +
  9257. " ,:semireworkid\n" +
  9258. " ,:userid\n" +
  9259. " ,:usercode\n" +
  9260. " ,:ujobsid\n" +
  9261. " ,:sjobsid\n" +
  9262. " ,:accountid\n" +
  9263. " ,'1'\n" +
  9264. " ,:createuserid\n" +
  9265. " ,:updateuserid)";
  9266. foreach (SemiReworkDefectEntity defect in entityobj.SemiReworkDefects)
  9267. {
  9268. sql = "select SEQ_PM_SEMIREWORKDEFECT_ID.nextval from dual";
  9269. object srdefectID = con.GetSqlResultToObj(sql);
  9270. paras = new OracleParameter[]{
  9271. new OracleParameter(":SEMIREWORKDEFECTID",OracleDbType.Int32,srdefectID,ParameterDirection.Input),
  9272. new OracleParameter(":SEMIREWORKID",OracleDbType.Int32,srID,ParameterDirection.Input),
  9273. new OracleParameter(":DEFECTID",OracleDbType.Int32,defect.DefectID,ParameterDirection.Input),
  9274. new OracleParameter(":DEFECTCODE",OracleDbType.NVarchar2,defect.DefectCode,ParameterDirection.Input),
  9275. new OracleParameter(":DEFECTNAME",OracleDbType.NVarchar2,defect.DefectName,ParameterDirection.Input),
  9276. new OracleParameter(":DEFECTPOSITIONID",OracleDbType.Int32,defect.DefectPositionID,ParameterDirection.Input),
  9277. new OracleParameter(":DEFECTPOSITIONCODE",OracleDbType.NVarchar2,defect.DefectPositionCode,ParameterDirection.Input),
  9278. new OracleParameter(":DEFECTPOSITIONNAME",OracleDbType.NVarchar2,defect.DefectPositionName,ParameterDirection.Input),
  9279. new OracleParameter(":SCRAPRESPONFLAG",OracleDbType.NVarchar2,defect.ScrapResponFlag,ParameterDirection.Input),
  9280. new OracleParameter(":DEFECTPRODUCTIONDATAID",OracleDbType.Int32,defect.DefectProductionDataID,ParameterDirection.Input),
  9281. new OracleParameter(":DEFECTPROCEDUREID",OracleDbType.Int32,defect.DefectProcedureID,ParameterDirection.Input),
  9282. new OracleParameter(":DEFECTUSERID",OracleDbType.Int32,defect.DefectUserID,ParameterDirection.Input),
  9283. new OracleParameter(":DEFECTUSERCODE",OracleDbType.NVarchar2,defect.DefectUserCode,ParameterDirection.Input),
  9284. new OracleParameter(":REMARKS",OracleDbType.NVarchar2,defect.Remarks,ParameterDirection.Input),
  9285. new OracleParameter(":ACCOUNTID",OracleDbType.Int32,sUserInfo.AccountID,ParameterDirection.Input),
  9286. //xuwei add 2019-11-14
  9287. new OracleParameter(":VALUEFLAG",OracleDbType.Char,defect.ValueFlag,ParameterDirection.Input),
  9288. //xuwei end
  9289. new OracleParameter(":CREATEUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9290. new OracleParameter(":UPDATEUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9291. };
  9292. con.ExecuteNonQuery(sqlStringDefect, paras);
  9293. foreach (SemiReworkRPSEntity item in defect.DefectResponsibles)
  9294. {
  9295. paras = new OracleParameter[]{
  9296. new OracleParameter(":semireworkdefectid",OracleDbType.Int32,srdefectID,ParameterDirection.Input),
  9297. new OracleParameter(":staffid",OracleDbType.Int32,item.StaffID,ParameterDirection.Input),
  9298. new OracleParameter(":semireworkid",OracleDbType.Int32,srID,ParameterDirection.Input),
  9299. new OracleParameter(":userid",OracleDbType.Int32,item.UserID,ParameterDirection.Input),
  9300. new OracleParameter(":usercode",OracleDbType.NVarchar2,item.UserCode,ParameterDirection.Input),
  9301. new OracleParameter(":ujobsid",OracleDbType.Int32,item.UJobsID,ParameterDirection.Input),
  9302. new OracleParameter(":sjobsid",OracleDbType.Int32,item.SJobsID,ParameterDirection.Input),
  9303. new OracleParameter(":accountid",OracleDbType.Int32,sUserInfo.AccountID,ParameterDirection.Input),
  9304. new OracleParameter(":createuserid",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9305. new OracleParameter(":updateuserid",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9306. };
  9307. con.ExecuteNonQuery(sqlStringRPS, paras);
  9308. }
  9309. }
  9310. #endregion
  9311. #region 更新在产数据
  9312. string sqlStringInp = "update tp_pm_inproduction inp\n" +
  9313. " set inp.reworkprocedureid = :pid\n" +
  9314. " ,inp.isreworkflag = '2'\n" +
  9315. " ,inp.semicheckid = :srid\n" +
  9316. " where inp.barcode = :barcode";
  9317. paras = new OracleParameter[]{
  9318. new OracleParameter(":pid",OracleDbType.Int32,entityobj.ReworkProcedureID,ParameterDirection.Input),
  9319. new OracleParameter(":srid",OracleDbType.Int32,srID,ParameterDirection.Input),
  9320. new OracleParameter(":barcode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  9321. };
  9322. con.ExecuteNonQuery(sqlStringInp, paras);
  9323. #endregion
  9324. con.Commit();
  9325. return resultEntity;
  9326. }
  9327. catch (Exception ex)
  9328. {
  9329. throw ex;
  9330. }
  9331. finally
  9332. {
  9333. if (con.ConnState == ConnectionState.Open)
  9334. {
  9335. con.Disconnect();
  9336. }
  9337. }
  9338. }
  9339. /// <summary>
  9340. /// 编辑半检返修
  9341. /// </summary>
  9342. /// <param name="entityobj"></param>
  9343. /// <param name="sUserInfo"></param>
  9344. /// <returns></returns>
  9345. public static ServiceResultEntity EditSemiRework(SemiReworkEntity entityobj, SUserInfo sUserInfo)
  9346. {
  9347. IDBTransaction con = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  9348. try
  9349. {
  9350. ServiceResultEntity resultEntity = new ServiceResultEntity();
  9351. resultEntity.Result = 1;
  9352. if (entityobj == null || string.IsNullOrWhiteSpace(entityobj.BarCode) ||
  9353. entityobj.SemiReworkDefects == null || entityobj.SemiReworkDefects.Count == 0)
  9354. {
  9355. resultEntity.Result = -1;
  9356. resultEntity.Message = "数据错误";
  9357. return resultEntity;
  9358. }
  9359. con.Connect();
  9360. string barcode = entityobj.BarCode;
  9361. #region 验证条码
  9362. // 1.判断产品是否在产
  9363. string sql = @"select p.*,u.usercode from TP_PM_InProduction p inner join tp_mst_user u on u.userid=p.userid where p.BarCode=:BarCode for update";
  9364. OracleParameter[] paras = new OracleParameter[]{
  9365. new OracleParameter(":BarCode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  9366. };
  9367. DataTable dsResult = con.GetSqlResultToDt(sql, paras);
  9368. if (dsResult == null || dsResult.Rows.Count == 0)
  9369. {
  9370. resultEntity.Result = -1;// 不在在产表中
  9371. resultEntity.Message = "条码[" + barcode + "]不在在产流程";
  9372. return resultEntity;
  9373. }
  9374. DataRow dataRow = dsResult.Rows[0];
  9375. if (dataRow["InScrapFlag"].ToString() == "1")
  9376. {
  9377. resultEntity.Result = -2; //报损待审批
  9378. resultEntity.Message = "条码[" + barcode + "]已经报损待审批";
  9379. return resultEntity;
  9380. }
  9381. if (!string.IsNullOrEmpty(dataRow["KilnCarID"].ToString()))
  9382. {
  9383. resultEntity.Result = -3; //登窑车后不允许半成品检测
  9384. resultEntity.Message = "条码[" + barcode + "]已经在窑车[" + dataRow["KilnCarName"].ToString() + "]";
  9385. return resultEntity;
  9386. }
  9387. if (dataRow["IsReworkFlag"].ToString() == "1")
  9388. {
  9389. resultEntity.Result = -4; //半检返工
  9390. resultEntity.Message = "条码[" + barcode + "]已半检返工";
  9391. return resultEntity;
  9392. }
  9393. if (dataRow["IsReworkFlag"].ToString() != "2")
  9394. {
  9395. resultEntity.Result = -5; //半检返修
  9396. resultEntity.Message = "条码[" + barcode + "]未半检返修";
  9397. return resultEntity;
  9398. }
  9399. if (Convert.ToInt32(dataRow["SemiCheckID"]) != entityobj.SemiReworkID)
  9400. {
  9401. resultEntity.Result = -6; //半检返修
  9402. resultEntity.Message = "条码[" + barcode + "]已重新登记半检返修";
  9403. return resultEntity;
  9404. }
  9405. #endregion
  9406. #region 停用数据
  9407. //xuwei modify 2019-11-18 如果半检工号不同 跳过停用数据
  9408. //通过 SEMIREWORKUSERCODE 半检工号 与 当前操作工号 判定识别
  9409. string isSameUser = con.GetSqlResultToStr($@"
  9410. SELECT
  9411. count( SEMIREWORKID )
  9412. FROM
  9413. TP_PM_SEMIREWORK
  9414. WHERE
  9415. SEMIREWORKID = {entityobj.SemiReworkID}
  9416. AND SEMIREWORKUSERCODE = '{sUserInfo.UserCode}'
  9417. ");
  9418. //xuwei modify 2019-11-18 如果半检工号不同 跳过停用数据
  9419. if(isSameUser == "1")
  9420. {
  9421. paras = new OracleParameter[]{
  9422. new OracleParameter(":userid",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9423. new OracleParameter(":SemiReworkID",OracleDbType.Int32,entityobj.SemiReworkID,ParameterDirection.Input),
  9424. };
  9425. string sqldelete = "update TP_PM_SemiReworkRPS\n" +
  9426. " set valueflag = '0', UpdateTime = sysdate, UpdateUserID = :userid\n" +
  9427. " where SemiReworkID = :SemiReworkID";
  9428. con.ExecuteNonQuery(sqldelete, paras);
  9429. sqldelete = "update TP_PM_SemiReworkDefect\n" +
  9430. " set valueflag = '0', UpdateTime = sysdate, UpdateUserID = :userid\n" +
  9431. " where SemiReworkID = :SemiReworkID";
  9432. con.ExecuteNonQuery(sqldelete, paras);
  9433. sqldelete = " update TP_PM_SemiRework\n" +
  9434. " set valueflag = '0', UpdateTime = sysdate, UpdateUserID = :userid\n" +
  9435. " where SemiReworkID = :SemiReworkID";
  9436. con.ExecuteNonQuery(sqldelete, paras);
  9437. }
  9438. #endregion
  9439. #region 保存数据
  9440. sql = "select SEQ_PM_SemiRework_ID.nextval from dual";
  9441. object srID = con.GetSqlResultToObj(sql);
  9442. // 返修
  9443. string sqlString = "insert into tp_pm_semirework\n" +
  9444. " (SEMIREWORKID\n" +
  9445. " ,BARCODE\n" +
  9446. " ,PRODUCTIONLINEID\n" +
  9447. " ,PROCEDUREID\n" +
  9448. " ,PROCEDURETIME\n" +
  9449. " ,GOODSID\n" +
  9450. " ,GOODSCODE\n" +
  9451. " ,USERID\n" +
  9452. " ,USERCODE\n" +
  9453. " ,PRODUCTIONDATAID\n" +
  9454. " ,GROUTINGDAILYID\n" +
  9455. " ,GROUTINGDAILYDETAILID\n" +
  9456. " ,GROUTINGLINEID\n" +
  9457. " ,GROUTINGLINECODE\n" +
  9458. " ,GROUTINGLINEDETAILID\n" +
  9459. " ,GROUTINGDATE\n" +
  9460. " ,GROUTINGMOULDCODE\n" +
  9461. " ,GROUTINGUSERID\n" +
  9462. " ,GROUTINGUSERCODE\n" +
  9463. " ,SEMIREWORKUSERID\n" +
  9464. " ,SEMIREWORKUSERCODE\n" +
  9465. " ,SEMIREWORKTIME\n" +
  9466. " ,REWORKPROCEDUREID\n" +
  9467. " ,REMARKS\n" +
  9468. " ,ACCOUNTID\n" +
  9469. " ,VALUEFLAG\n" +
  9470. " ,CREATEUSERID\n" +
  9471. " ,UPDATEUSERID)\n" +
  9472. "values\n" +
  9473. " (:SEMIREWORKID\n" +
  9474. " ,:BARCODE\n" +
  9475. " ,:PRODUCTIONLINEID\n" +
  9476. " ,:PROCEDUREID\n" +
  9477. " ,:PROCEDURETIME\n" +
  9478. " ,:GOODSID\n" +
  9479. " ,:GOODSCODE\n" +
  9480. " ,:USERID\n" +
  9481. " ,:USERCODE\n" +
  9482. " ,:PRODUCTIONDATAID\n" +
  9483. " ,:GROUTINGDAILYID\n" +
  9484. " ,:GROUTINGDAILYDETAILID\n" +
  9485. " ,:GROUTINGLINEID\n" +
  9486. " ,:GROUTINGLINECODE\n" +
  9487. " ,:GROUTINGLINEDETAILID\n" +
  9488. " ,:GROUTINGDATE\n" +
  9489. " ,:GROUTINGMOULDCODE\n" +
  9490. " ,:GROUTINGUSERID\n" +
  9491. " ,:GROUTINGUSERCODE\n" +
  9492. " ,:SEMIREWORKUSERID\n" +
  9493. " ,:SEMIREWORKUSERCODE\n" +
  9494. //" ,:SEMIREWORKTIME\n" +
  9495. " ,sysdate\n" +
  9496. " ,:REWORKPROCEDUREID\n" +
  9497. " ,:REMARKS\n" +
  9498. " ,:ACCOUNTID\n" +
  9499. " ,'1'\n" +
  9500. " ,:CREATEUSERID\n" +
  9501. " ,:UPDATEUSERID)\n";
  9502. paras = new OracleParameter[]{
  9503. new OracleParameter(":SEMIREWORKID",OracleDbType.Int32,srID,ParameterDirection.Input),
  9504. new OracleParameter(":BarCode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  9505. new OracleParameter(":PRODUCTIONLINEID",OracleDbType.Int32,dataRow["PRODUCTIONLINEID"],ParameterDirection.Input),
  9506. new OracleParameter(":PROCEDUREID",OracleDbType.Int32,dataRow["PROCEDUREID"],ParameterDirection.Input),
  9507. new OracleParameter(":PROCEDURETIME",OracleDbType.Date,dataRow["PROCEDURETIME"],ParameterDirection.Input),
  9508. new OracleParameter(":GOODSID",OracleDbType.Int32,dataRow["GOODSID"],ParameterDirection.Input),
  9509. new OracleParameter(":GOODSCODE",OracleDbType.NVarchar2,dataRow["GOODSCODE"],ParameterDirection.Input),
  9510. new OracleParameter(":USERID",OracleDbType.Int32,dataRow["USERID"],ParameterDirection.Input),
  9511. new OracleParameter(":USERCODE",OracleDbType.NVarchar2,dataRow["USERCODE"],ParameterDirection.Input),
  9512. new OracleParameter(":PRODUCTIONDATAID",OracleDbType.Int32,dataRow["PRODUCTIONDATAID"],ParameterDirection.Input),
  9513. new OracleParameter(":GROUTINGDAILYID",OracleDbType.Int32,dataRow["GROUTINGDAILYID"],ParameterDirection.Input),
  9514. new OracleParameter(":GROUTINGDAILYDETAILID",OracleDbType.Int32,dataRow["GROUTINGDAILYDETAILID"],ParameterDirection.Input),
  9515. new OracleParameter(":GROUTINGLINEID",OracleDbType.Int32,dataRow["GROUTINGLINEID"],ParameterDirection.Input),
  9516. new OracleParameter(":GROUTINGLINECODE",OracleDbType.NVarchar2,dataRow["GROUTINGLINECODE"],ParameterDirection.Input),
  9517. new OracleParameter(":GROUTINGLINEDETAILID",OracleDbType.Int32,dataRow["GROUTINGLINEDETAILID"],ParameterDirection.Input),
  9518. new OracleParameter(":GROUTINGDATE",OracleDbType.Date,dataRow["GROUTINGDATE"],ParameterDirection.Input),
  9519. new OracleParameter(":GROUTINGMOULDCODE",OracleDbType.NVarchar2,dataRow["GROUTINGMOULDCODE"],ParameterDirection.Input),
  9520. new OracleParameter(":GROUTINGUSERID",OracleDbType.Int32,dataRow["GROUTINGUSERID"],ParameterDirection.Input),
  9521. new OracleParameter(":GROUTINGUSERCODE",OracleDbType.NVarchar2,dataRow["GROUTINGUSERCODE"],ParameterDirection.Input),
  9522. //new OracleParameter(":SEMIREWORKUSERID",OracleDbType.Int32,entityobj.SEMIREWORKUSERID,ParameterDirection.Input),
  9523. //new OracleParameter(":SEMIREWORKUSERCODE",OracleDbType.NVarchar2,entityobj.UserCode,ParameterDirection.Input),
  9524. //new OracleParameter(":SEMIREWORKTIME",OracleDbType.Date,sUserInfo.entityobj,ParameterDirection.Input),
  9525. new OracleParameter(":SEMIREWORKUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9526. new OracleParameter(":SEMIREWORKUSERCODE",OracleDbType.NVarchar2,sUserInfo.UserCode,ParameterDirection.Input),
  9527. new OracleParameter(":REWORKPROCEDUREID",OracleDbType.Int32,entityobj.ReworkProcedureID,ParameterDirection.Input),
  9528. new OracleParameter(":REMARKS",OracleDbType.NVarchar2,entityobj.Remarks,ParameterDirection.Input),
  9529. new OracleParameter(":ACCOUNTID",OracleDbType.Int32,sUserInfo.AccountID,ParameterDirection.Input),
  9530. new OracleParameter(":CREATEUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9531. new OracleParameter(":UPDATEUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9532. };
  9533. con.ExecuteNonQuery(sqlString, paras);
  9534. // 缺陷
  9535. string sqlStringDefect =
  9536. "insert into TP_PM_SemiReworkDefect\n" +
  9537. " (SEMIREWORKDEFECTID\n" +
  9538. " ,SEMIREWORKID\n" +
  9539. " ,DEFECTID\n" +
  9540. " ,DEFECTCODE\n" +
  9541. " ,DEFECTNAME\n" +
  9542. " ,DEFECTPOSITIONID\n" +
  9543. " ,DEFECTPOSITIONCODE\n" +
  9544. " ,DEFECTPOSITIONNAME\n" +
  9545. " ,SCRAPRESPONFLAG\n" +
  9546. " ,DEFECTPRODUCTIONDATAID\n" +
  9547. " ,DEFECTPROCEDUREID\n" +
  9548. " ,DEFECTUSERID\n" +
  9549. " ,DEFECTUSERCODE\n" +
  9550. " ,REMARKS\n" +
  9551. " ,ACCOUNTID\n" +
  9552. " ,VALUEFLAG\n" +
  9553. " ,CREATEUSERID\n" +
  9554. " ,UPDATEUSERID)\n" +
  9555. "values\n" +
  9556. " (:SEMIREWORKDEFECTID\n" +
  9557. " ,:SEMIREWORKID\n" +
  9558. " ,:DEFECTID\n" +
  9559. " ,:DEFECTCODE\n" +
  9560. " ,:DEFECTNAME\n" +
  9561. " ,:DEFECTPOSITIONID\n" +
  9562. " ,:DEFECTPOSITIONCODE\n" +
  9563. " ,:DEFECTPOSITIONNAME\n" +
  9564. " ,:SCRAPRESPONFLAG\n" +
  9565. " ,:DEFECTPRODUCTIONDATAID\n" +
  9566. " ,:DEFECTPROCEDUREID\n" +
  9567. " ,:DEFECTUSERID\n" +
  9568. " ,:DEFECTUSERCODE\n" +
  9569. " ,:REMARKS\n" +
  9570. " ,:ACCOUNTID\n" +
  9571. " ,:VALUEFLAG\n" + //xuwei add 2019-11-14
  9572. " ,:CREATEUSERID\n" +
  9573. " ,:UPDATEUSERID)";
  9574. string sqlStringRPS =
  9575. "insert into TP_PM_SemiReworkRPS\n" +
  9576. " (semireworkdefectid\n" +
  9577. " ,staffid\n" +
  9578. " ,semireworkid\n" +
  9579. " ,userid\n" +
  9580. " ,usercode\n" +
  9581. " ,ujobsid\n" +
  9582. " ,sjobsid\n" +
  9583. " ,accountid\n" +
  9584. " ,valueflag\n" +
  9585. " ,createuserid\n" +
  9586. " ,updateuserid)\n" +
  9587. "values\n" +
  9588. " (:semireworkdefectid\n" +
  9589. " ,:staffid\n" +
  9590. " ,:semireworkid\n" +
  9591. " ,:userid\n" +
  9592. " ,:usercode\n" +
  9593. " ,:ujobsid\n" +
  9594. " ,:sjobsid\n" +
  9595. " ,:accountid\n" +
  9596. " ,'1'\n" +
  9597. " ,:createuserid\n" +
  9598. " ,:updateuserid)";
  9599. foreach (SemiReworkDefectEntity defect in entityobj.SemiReworkDefects)
  9600. {
  9601. sql = "select SEQ_PM_SEMIREWORKDEFECT_ID.nextval from dual";
  9602. object srdefectID = con.GetSqlResultToObj(sql);
  9603. paras = new OracleParameter[]{
  9604. new OracleParameter(":SEMIREWORKDEFECTID",OracleDbType.Int32,srdefectID,ParameterDirection.Input),
  9605. new OracleParameter(":SEMIREWORKID",OracleDbType.Int32,srID,ParameterDirection.Input),
  9606. new OracleParameter(":DEFECTID",OracleDbType.Int32,defect.DefectID,ParameterDirection.Input),
  9607. new OracleParameter(":DEFECTCODE",OracleDbType.NVarchar2,defect.DefectCode,ParameterDirection.Input),
  9608. new OracleParameter(":DEFECTNAME",OracleDbType.NVarchar2,defect.DefectName,ParameterDirection.Input),
  9609. new OracleParameter(":DEFECTPOSITIONID",OracleDbType.Int32,defect.DefectPositionID,ParameterDirection.Input),
  9610. new OracleParameter(":DEFECTPOSITIONCODE",OracleDbType.NVarchar2,defect.DefectPositionCode,ParameterDirection.Input),
  9611. new OracleParameter(":DEFECTPOSITIONNAME",OracleDbType.NVarchar2,defect.DefectPositionName,ParameterDirection.Input),
  9612. new OracleParameter(":SCRAPRESPONFLAG",OracleDbType.NVarchar2,defect.ScrapResponFlag,ParameterDirection.Input),
  9613. new OracleParameter(":DEFECTPRODUCTIONDATAID",OracleDbType.Int32,defect.DefectProductionDataID,ParameterDirection.Input),
  9614. new OracleParameter(":DEFECTPROCEDUREID",OracleDbType.Int32,defect.DefectProcedureID,ParameterDirection.Input),
  9615. new OracleParameter(":DEFECTUSERID",OracleDbType.Int32,defect.DefectUserID,ParameterDirection.Input),
  9616. new OracleParameter(":DEFECTUSERCODE",OracleDbType.NVarchar2,defect.DefectUserCode,ParameterDirection.Input),
  9617. new OracleParameter(":REMARKS",OracleDbType.NVarchar2,defect.Remarks,ParameterDirection.Input),
  9618. new OracleParameter(":ACCOUNTID",OracleDbType.Int32,sUserInfo.AccountID,ParameterDirection.Input),
  9619. //xuwei add 2019-11-14
  9620. new OracleParameter(":VALUEFLAG",OracleDbType.Char,defect.ValueFlag,ParameterDirection.Input),
  9621. //xuwei end
  9622. new OracleParameter(":CREATEUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9623. new OracleParameter(":UPDATEUSERID",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9624. };
  9625. con.ExecuteNonQuery(sqlStringDefect, paras);
  9626. foreach (SemiReworkRPSEntity item in defect.DefectResponsibles)
  9627. {
  9628. paras = new OracleParameter[]{
  9629. new OracleParameter(":semireworkdefectid",OracleDbType.Int32,srdefectID,ParameterDirection.Input),
  9630. new OracleParameter(":staffid",OracleDbType.Int32,item.StaffID,ParameterDirection.Input),
  9631. new OracleParameter(":semireworkid",OracleDbType.Int32,srID,ParameterDirection.Input),
  9632. new OracleParameter(":userid",OracleDbType.Int32,item.UserID,ParameterDirection.Input),
  9633. new OracleParameter(":usercode",OracleDbType.NVarchar2,item.UserCode,ParameterDirection.Input),
  9634. new OracleParameter(":ujobsid",OracleDbType.Int32,item.UJobsID,ParameterDirection.Input),
  9635. new OracleParameter(":sjobsid",OracleDbType.Int32,item.SJobsID,ParameterDirection.Input),
  9636. new OracleParameter(":accountid",OracleDbType.Int32,sUserInfo.AccountID,ParameterDirection.Input),
  9637. new OracleParameter(":createuserid",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9638. new OracleParameter(":updateuserid",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9639. };
  9640. con.ExecuteNonQuery(sqlStringRPS, paras);
  9641. }
  9642. }
  9643. #endregion
  9644. #region 更新在产数据
  9645. string sqlStringInp = "update tp_pm_inproduction inp\n" +
  9646. " set inp.reworkprocedureid = :pid\n" +
  9647. " ,inp.isreworkflag = '2'\n" +
  9648. " ,inp.semicheckid = :srid\n" +
  9649. " where inp.barcode = :barcode";
  9650. paras = new OracleParameter[]{
  9651. new OracleParameter(":pid",OracleDbType.Int32,entityobj.ReworkProcedureID,ParameterDirection.Input),
  9652. new OracleParameter(":srid",OracleDbType.Int32,srID,ParameterDirection.Input),
  9653. new OracleParameter(":barcode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  9654. };
  9655. con.ExecuteNonQuery(sqlStringInp, paras);
  9656. #endregion
  9657. con.Commit();
  9658. return resultEntity;
  9659. }
  9660. catch (Exception ex)
  9661. {
  9662. throw ex;
  9663. }
  9664. finally
  9665. {
  9666. if (con.ConnState == ConnectionState.Open)
  9667. {
  9668. con.Disconnect();
  9669. }
  9670. }
  9671. }
  9672. /// <summary>
  9673. /// 撤销半检返修
  9674. /// </summary>
  9675. /// <param name="entityobj"></param>
  9676. /// <param name="sUserInfo"></param>
  9677. /// <returns></returns>
  9678. public static ServiceResultEntity CancelSemiRework(SemiReworkEntity entityobj, SUserInfo sUserInfo)
  9679. {
  9680. IDBTransaction con = ClsDbFactory.CreateDBTransaction(Basics.DataAccess.DataBaseType.ORACLE, DataManager.ConnectionString);
  9681. try
  9682. {
  9683. ServiceResultEntity resultEntity = new ServiceResultEntity();
  9684. resultEntity.Result = 1;
  9685. if (entityobj == null || string.IsNullOrWhiteSpace(entityobj.BarCode) || entityobj.SemiReworkID < 1)
  9686. {
  9687. resultEntity.Result = -1;
  9688. resultEntity.Message = "数据错误";
  9689. return resultEntity;
  9690. }
  9691. con.Connect();
  9692. string barcode = entityobj.BarCode;
  9693. #region 验证条码
  9694. // 1.判断产品是否在产
  9695. string sql = @"select * from TP_PM_InProduction where BarCode=:BarCode for update";
  9696. OracleParameter[] paras = new OracleParameter[]{
  9697. new OracleParameter(":BarCode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  9698. };
  9699. DataTable dsResult = con.GetSqlResultToDt(sql, paras);
  9700. if (dsResult == null || dsResult.Rows.Count == 0)
  9701. {
  9702. resultEntity.Result = -1;// 不在在产表中
  9703. resultEntity.Message = "条码[" + barcode + "]不在在产流程";
  9704. return resultEntity;
  9705. }
  9706. DataRow dataRow = dsResult.Rows[0];
  9707. if (dataRow["InScrapFlag"].ToString() == "1")
  9708. {
  9709. resultEntity.Result = -2; //报损待审批
  9710. resultEntity.Message = "条码[" + barcode + "]已经报损待审批";
  9711. return resultEntity;
  9712. }
  9713. if (!string.IsNullOrEmpty(dataRow["KilnCarID"].ToString()))
  9714. {
  9715. resultEntity.Result = -3; //登窑车后不允许半成品检测
  9716. resultEntity.Message = "条码[" + barcode + "]已经在窑车[" + dataRow["KilnCarName"].ToString() + "]";
  9717. return resultEntity;
  9718. }
  9719. if (dataRow["IsReworkFlag"].ToString() == "1")
  9720. {
  9721. resultEntity.Result = -4; //半检返工
  9722. resultEntity.Message = "条码[" + barcode + "]已半检返工";
  9723. return resultEntity;
  9724. }
  9725. if (dataRow["IsReworkFlag"].ToString() != "2")
  9726. {
  9727. resultEntity.Result = -5; //半检返修
  9728. resultEntity.Message = "条码[" + barcode + "]未半检返修";
  9729. return resultEntity;
  9730. }
  9731. if (Convert.ToInt32(dataRow["SemiCheckID"]) != entityobj.SemiReworkID)
  9732. {
  9733. resultEntity.Result = -6; //半检返修
  9734. resultEntity.Message = "条码[" + barcode + "]已重新登记半检返修";
  9735. return resultEntity;
  9736. }
  9737. #endregion
  9738. #region 停用数据
  9739. paras = new OracleParameter[]{
  9740. new OracleParameter(":userid",OracleDbType.Int32,sUserInfo.UserID,ParameterDirection.Input),
  9741. new OracleParameter(":usercode",OracleDbType.NVarchar2,sUserInfo.UserCode,ParameterDirection.Input),
  9742. new OracleParameter(":SemiReworkID",OracleDbType.Int32,entityobj.SemiReworkID,ParameterDirection.Input),
  9743. };
  9744. //string sqldelete = "update TP_PM_SemiReworkRPS\n" +
  9745. //" set valueflag = '0', UpdateTime = sysdate UpdateUserID = :userid\n" +
  9746. //" where SemiReworkID = :SemiReworkID";
  9747. //con.ExecuteNonQuery(sqldelete, paras);
  9748. //sqldelete = "update TP_PM_SemiReworkDefect\n" +
  9749. //" set valueflag = '0', UpdateTime = sysdate UpdateUserID = :userid\n" +
  9750. //" where SemiReworkID = :SemiReworkID";
  9751. //con.ExecuteNonQuery(sqldelete, paras);
  9752. //sqldelete = " update TP_PM_SemiRework\n" +
  9753. //" set valueflag = '0', UpdateTime = sysdate UpdateUserID = :userid\n" +
  9754. //" where SemiReworkID = :SemiReworkID";
  9755. //con.ExecuteNonQuery(sqldelete, paras);
  9756. string sqlString = "update TP_PM_SemiRework\n" +
  9757. " set BackOutFlag = '1'\n" +
  9758. " ,BackOutTime = sysdate\n" +
  9759. " ,BackOutUserID = :userid\n" +
  9760. " ,BackOutUserCode = :usercode\n" +
  9761. " ,UpdateTime = sysdate\n" +
  9762. " ,UpdateUserID = :userid\n" +
  9763. " where SemiReworkID = :SemiReworkID";
  9764. con.ExecuteNonQuery(sqlString, paras);
  9765. #endregion
  9766. #region 更新在产数据
  9767. string sqlStringInp = "update tp_pm_inproduction inp\n" +
  9768. " set inp.reworkprocedureid = null\n" +
  9769. " ,inp.isreworkflag = '0'\n" +
  9770. " ,inp.semicheckid = null\n" +
  9771. " where inp.barcode = :barcode";
  9772. paras = new OracleParameter[]{
  9773. new OracleParameter(":barcode",OracleDbType.NVarchar2,barcode,ParameterDirection.Input),
  9774. };
  9775. con.ExecuteNonQuery(sqlStringInp, paras);
  9776. #endregion
  9777. con.Commit();
  9778. return resultEntity;
  9779. }
  9780. catch (Exception ex)
  9781. {
  9782. throw ex;
  9783. }
  9784. finally
  9785. {
  9786. if (con.ConnState == ConnectionState.Open)
  9787. {
  9788. con.Disconnect();
  9789. }
  9790. }
  9791. }
  9792. public static ServiceResultEntity GetSemiReworkForPDAEdit(int semiReworkID, SUserInfo sUserInfo)
  9793. {
  9794. return null;
  9795. }
  9796. #endregion
  9797. #region 窑车漏扫补件
  9798. /// <summary>
  9799. /// 验证窑车是否存在
  9800. /// </summary>
  9801. /// <param name="cre"></param>
  9802. /// <param name="userInfo"></param>
  9803. /// <returns></returns>
  9804. public static ServiceResultEntity CheckKilnCar(ClientRequestEntity cre, SUserInfo userInfo)
  9805. {
  9806. IDataAccess dataAccess = DataAccess.Create(DataBaseType.Oracle, DataManager.ConnectionString);
  9807. try
  9808. {
  9809. string sqlString = "select kc.kilncarid,kc.kilnid\n" +
  9810. " from tp_mst_kilncar kc\n" +
  9811. " where kc.valueflag = '1'\n" +
  9812. " and kc.accountid = @accountID@\n" +
  9813. " and kc.kilncarcode = @kilncarcode@";
  9814. CDAParameter[] paras = new CDAParameter[]
  9815. {
  9816. new CDAParameter("accountID", userInfo.AccountID),
  9817. new CDAParameter("kilncarcode", cre.Properties["kilncarcode"]),
  9818. };
  9819. ServiceResultEntity sre = new ServiceResultEntity();
  9820. DataTable data = dataAccess.ExecuteDatatable(sqlString, paras);
  9821. if (data == null || data.Rows.Count == 0)
  9822. {
  9823. sre.Status = Constant.ServiceResultStatus.Other;
  9824. sre.OtherStatus = 1;
  9825. sre.Message = "此窑车不存在";
  9826. return sre;
  9827. }
  9828. sre.Result = data.Rows[0]["kilncarid"];
  9829. sqlString = "Select procedureID From tp_pc_procedureKiln t where t.KilnID = @KilnID@ and t.procedureID = @procedureID@";
  9830. paras = new CDAParameter[]
  9831. {
  9832. new CDAParameter("KilnID", data.Rows[0]["kilnid"]),
  9833. new CDAParameter("procedureID", cre.Properties["procedureID"]),
  9834. };
  9835. data = dataAccess.ExecuteDatatable(sqlString, paras);
  9836. if (data == null || data.Rows.Count == 0)
  9837. {
  9838. sre.Status = Constant.ServiceResultStatus.Other;
  9839. sre.OtherStatus = 2;
  9840. sre.Message = "此窑车不不允许经过此工序";
  9841. return sre;
  9842. }
  9843. return sre;
  9844. }
  9845. catch (Exception ex)
  9846. {
  9847. throw ex;
  9848. }
  9849. finally
  9850. {
  9851. dataAccess?.Dispose();
  9852. }
  9853. }
  9854. /// <summary>
  9855. /// 验证窑车烧成批次号是否存在 和 是否能补漏扫
  9856. /// </summary>
  9857. /// <param name="cre"></param>
  9858. /// <param name="userInfo"></param>
  9859. /// <returns></returns>
  9860. public static ServiceResultEntity CheckKilnCarBatchNo(ClientRequestEntity cre, SUserInfo userInfo)
  9861. {
  9862. IDataAccess dataAccess = DataAccess.Create(DataBaseType.Oracle, DataManager.ConnectionString);
  9863. try
  9864. {
  9865. string sqlString = "select t.kilncardataid, t.modelType, t.procedureid\n" +
  9866. " from tp_pm_kilncardata t\n" +
  9867. " where t.kilnid = @kilnid@\n" +
  9868. " and t.kilncarid = @kilncarid@\n" +
  9869. " and t.valueflag = '1'\n" +
  9870. " and t.kilncarbatchno = @kilncarbatchno@";
  9871. CDAParameter[] paras = new CDAParameter[]
  9872. {
  9873. new CDAParameter("kilnid", cre.Properties["KilnID"]),
  9874. new CDAParameter("kilncarid", cre.Properties["KilnCarID"]),
  9875. new CDAParameter("kilncarbatchno", cre.Properties["KilnCarBatchNo"]),
  9876. };
  9877. ServiceResultEntity sre = new ServiceResultEntity();
  9878. DataTable data = dataAccess.ExecuteDatatable(sqlString, paras);
  9879. if (data == null || data.Rows.Count == 0)
  9880. {
  9881. sre.Status = Constant.ServiceResultStatus.Other;
  9882. sre.OtherStatus = 1;
  9883. sre.Message = "此烧成批次号不存在";
  9884. return sre;
  9885. }
  9886. int carProcedureid = Convert.ToInt32(data.Rows[0]["procedureid"]);
  9887. string modelType = data.Rows[data.Rows.Count-1]["modelType"] + "";
  9888. if (modelType != "4")
  9889. {
  9890. sre.Status = Constant.ServiceResultStatus.Other;
  9891. sre.OtherStatus = 2;
  9892. sre.Message = "此窑车还未卸窑不能补件";
  9893. return sre;
  9894. }
  9895. if (carProcedureid != Convert.ToInt32(cre.Properties["ProcedureID"]))
  9896. {
  9897. sre.Status = Constant.ServiceResultStatus.Other;
  9898. sre.OtherStatus = 3;
  9899. sre.Message = "此窑车烧成批次不是在当前工序登窑";
  9900. return sre;
  9901. }
  9902. return sre;
  9903. }
  9904. catch (Exception ex)
  9905. {
  9906. throw ex;
  9907. }
  9908. finally
  9909. {
  9910. dataAccess?.Dispose();
  9911. }
  9912. }
  9913. /// <summary>
  9914. /// 窑车漏扫补件
  9915. /// </summary>
  9916. /// <param name="cre"></param>
  9917. /// <param name="userInfo"></param>
  9918. /// <returns></returns>
  9919. public static ServiceResultEntity SetKilnCarMissing(ClientRequestEntity cre, SUserInfo userInfo)
  9920. {
  9921. IDataAccess dataAccess = DataAccess.Create(DataBaseType.Oracle, DataManager.ConnectionString);
  9922. try
  9923. {
  9924. ServiceResultEntity sre = new ServiceResultEntity();
  9925. dataAccess.Open(true);
  9926. DataTable data = cre.Data.Tables[0];
  9927. string CENTRALIZEDBATCHNO = System.Guid.NewGuid().ToString().ToUpper();
  9928. string sqlString = "\n" +
  9929. "insert into tp_pm_productiondatain\n" +
  9930. " (BARCODE\n" +
  9931. " ,CENTRALIZEDBATCHNO\n" +
  9932. " ,PRODUCTIONLINEID\n" +
  9933. " ,PRODUCTIONLINECODE\n" +
  9934. " ,PRODUCTIONLINENAME\n" +
  9935. " ,PROCEDUREID\n" +
  9936. " ,PROCEDURECODE\n" +
  9937. " ,PROCEDURENAME\n" +
  9938. " ,PROCEDUREMODEL\n" +
  9939. " ,MODELTYPE\n" +
  9940. " ,PIECETYPE\n" +
  9941. " ,ISREWORKED\n" +
  9942. " ,NODETYPE\n" +
  9943. " ,ISPUBLICBODY\n" +
  9944. " ,ISREFIRE\n" +
  9945. " ,ORGANIZATIONID\n" +
  9946. " ,GOODSID\n" +
  9947. " ,GOODSCODE\n" +
  9948. " ,GOODSNAME\n" +
  9949. " ,USERID\n" +
  9950. " ,USERCODE\n" +
  9951. " ,USERNAME\n" +
  9952. " ,KILNID\n" +
  9953. " ,KILNCODE\n" +
  9954. " ,KILNNAME\n" +
  9955. " ,KILNCARID\n" +
  9956. " ,KILNCARCODE\n" +
  9957. " ,KILNCARNAME\n" +
  9958. " ,KILNCARBATCHNO\n" +
  9959. " ,KILNCARPOSITION\n" +
  9960. " ,REMARKS\n" +
  9961. " ,ACCOUNTDATE\n" +
  9962. " ,ACCOUNTID\n" +
  9963. " ,VALUEFLAG\n" +
  9964. " ,CREATEUSERID\n" +
  9965. " ,UPDATEUSERID\n" +
  9966. " ,GROUTINGDATE\n" +
  9967. " ,GROUTINGMOULDCODE\n" +
  9968. " ,MOULDCODE\n" +
  9969. " ,GROUTINGUSERID\n" +
  9970. " ,GROUTINGUSERCODE\n" +
  9971. " ,GROUTINGNUM\n" +
  9972. " ,GROUTINGDAILYID\n" +
  9973. " ,GROUTINGDAILYDETAILID\n" +
  9974. " ,GROUTINGLINEID\n" +
  9975. " ,GROUTINGLINECODE\n" +
  9976. " ,GROUTINGLINENAME\n" +
  9977. " ,GMOULDTYPEID\n" +
  9978. " ,CANMANYTIMES\n" +
  9979. " ,GROUTINGLINEDETAILID\n" +
  9980. " ,SPECIALREPAIRFLAG\n" +
  9981. " ,CLASSESSETTINGID\n" +
  9982. " ,LOGOID\n" +
  9983. " ,CHECKTIME)\n" +
  9984. " select inp.barcode\n" +
  9985. " ,@CENTRALIZEDBATCHNO@\n" +
  9986. " ,kd.productionlineid\n" +
  9987. " ,pline.PRODUCTIONLINECODE\n" +
  9988. " ,pline.PRODUCTIONLINENAME\n" +
  9989. " ,kd.procedureid\n" +
  9990. " ,pcp.PROCEDURECODE\n" +
  9991. " ,pcp.PROCEDURENAME\n" +
  9992. " ,pcp.proceduremodel\n" +
  9993. " ,pcp.modeltype\n" +
  9994. " ,pcp.piecetype\n" +
  9995. " ,'0'\n" +
  9996. " ,pcp.nodetype\n" +
  9997. " ,inp.ispublicbody\n" +
  9998. " ,inp.isrefire\n" +
  9999. " ,pcp.organizationid\n" +
  10000. " ,inp.goodsid\n" +
  10001. " ,inp.goodscode\n" +
  10002. " ,inp.goodsname\n" +
  10003. //" ,kd.USERID\n" +
  10004. //" ,kd.USERCODE\n" +
  10005. //" ,kd.USERNAME\n" +
  10006. " ,@USERID@\n" +
  10007. " ,@USERCODE@\n" +
  10008. " ,@USERNAME@\n" +
  10009. " ,kd.KILNID\n" +
  10010. " ,k.KILNCODE\n" +
  10011. " ,k.KILNNAME\n" +
  10012. " ,kc.KILNCARID\n" +
  10013. " ,kc.KILNCARCODE\n" +
  10014. " ,kc.KILNCARNAME\n" +
  10015. " ,kd.KILNCARBATCHNO\n" +
  10016. " ,@KILNCARPOSITION@\n" +
  10017. " ,'窑车漏扫补件'\n" +
  10018. " ,trunc(sysdate)\n" +
  10019. " ,@ACCOUNTID@\n" +
  10020. " ,'1'\n" +
  10021. " ,@CREATEUSERID@\n" +
  10022. " ,@CREATEUSERID@\n" +
  10023. " ,inp.GROUTINGDATE\n" +
  10024. " ,inp.GROUTINGMOULDCODE\n" +
  10025. " ,inp.MOULDCODE\n" +
  10026. " ,inp.GROUTINGUSERID\n" +
  10027. " ,inp.GROUTINGUSERCODE\n" +
  10028. " ,inp.GROUTINGNUM\n" +
  10029. " ,inp.GROUTINGDAILYID\n" +
  10030. " ,inp.GROUTINGDAILYDETAILID\n" +
  10031. " ,inp.GROUTINGLINEID\n" +
  10032. " ,inp.GROUTINGLINECODE\n" +
  10033. " ,inp.GROUTINGLINENAME\n" +
  10034. " ,inp.GMOULDTYPEID\n" +
  10035. " ,inp.CANMANYTIMES\n" +
  10036. " ,inp.GROUTINGLINEDETAILID\n" +
  10037. " ,inp.SPECIALREPAIRFLAG\n" +
  10038. " ,kd.CLASSESSETTINGID\n" +
  10039. " ,inp.LOGOID\n" +
  10040. " ,kd.CREATETIME\n" +
  10041. " from tp_pm_inproduction inp\n" +
  10042. " inner join tp_pm_kilncardata kd\n" +
  10043. " on kd.kilncarbatchno = @kilncarbatchno@\n" +
  10044. " and kd.valueflag = '1'\n" +
  10045. " inner join tp_pc_productionline pline\n" +
  10046. " on pline.productionlineid = kd.productionlineid\n" +
  10047. " inner join tp_pc_procedure pcp\n" +
  10048. " on pcp.procedureid = kd.procedureid\n" +
  10049. " inner join tp_mst_kiln k\n" +
  10050. " on kd.kilnid = k.kilnid\n" +
  10051. " inner join tp_mst_kilncar kc\n" +
  10052. " on kc.kilncarid = kd.kilncarid\n" +
  10053. " where inp.barcode = @barcode@\n" +
  10054. " order by kd.kilncardataid";
  10055. string sqlUpdate = "update tp_pm_inproduction t\n" +
  10056. " set (t.KILNID\n" +
  10057. " ,t.KILNCODE\n" +
  10058. " ,t.KILNNAME\n" +
  10059. " ,t.KILNCARID\n" +
  10060. " ,t.KILNCARCODE\n" +
  10061. " ,t.KILNCARNAME\n" +
  10062. " ,t.KILNCARBATCHNO\n" +
  10063. " ,t.KILNCARPOSITION\n" +
  10064. " ,t.PROCEDUREMODEL\n" +
  10065. " ,t.MODELTYPE\n" +
  10066. " ,t.FLOWPROCEDUREID\n" +
  10067. " ,t.FLOWPROCEDURETIME\n" +
  10068. " ,t.PROCEDUREID\n" +
  10069. " ,t.PROCEDURETIME\n" +
  10070. " ,t.USERID\n" +
  10071. " ,t.PRODUCTIONDATAID) =\n" +
  10072. " (select pin.KILNID\n" +
  10073. " ,pin.KILNCODE\n" +
  10074. " ,pin.KILNNAME\n" +
  10075. " ,pin.KILNCARID\n" +
  10076. " ,pin.KILNCARCODE\n" +
  10077. " ,pin.KILNCARNAME\n" +
  10078. " ,pin.KILNCARBATCHNO\n" +
  10079. " ,pin.KILNCARPOSITION\n" +
  10080. " ,pin.PROCEDUREMODEL\n" +
  10081. " ,pin.MODELTYPE\n" +
  10082. " ,pin.PROCEDUREID\n" +
  10083. " ,sysdate\n" +
  10084. " ,pin.PROCEDUREID\n" +
  10085. " ,sysdate\n" +
  10086. " ,@USERID@\n" +
  10087. " ,pin.PRODUCTIONDATAID\n" +
  10088. " from tp_pm_productiondatain pin\n" +
  10089. " where pin.productiondataid =\n" +
  10090. " (select max(productiondataid)\n" +
  10091. " from tp_pm_productiondatain ppin\n" +
  10092. " where ppin.barcode = t.barcode))\n" +
  10093. " where t.barcode = @barcode@";
  10094. foreach (DataRow item in data.Rows)
  10095. {
  10096. CDAParameter[] paras = new CDAParameter[]
  10097. {
  10098. new CDAParameter("CENTRALIZEDBATCHNO", CENTRALIZEDBATCHNO),
  10099. new CDAParameter("ACCOUNTID", userInfo.AccountID),
  10100. new CDAParameter("CREATEUSERID", userInfo.UserID),
  10101. new CDAParameter("kilncarbatchno", cre.Properties["KilnCarBatchNo"]),
  10102. new CDAParameter("barcode", item["barcode"]),
  10103. new CDAParameter("KILNCARPOSITION", item["KILNCARPOSITION"]),
  10104. new CDAParameter("USERID", userInfo.UserID),
  10105. new CDAParameter("USERCODE", userInfo.UserCode),
  10106. new CDAParameter("USERNAME", userInfo.UserName),
  10107. };
  10108. // 插入生产数据
  10109. dataAccess.ExecuteNonQuery(sqlString, paras);
  10110. // 更新在产数据
  10111. dataAccess.ExecuteNonQuery(sqlUpdate,
  10112. new CDAParameter("barcode", item["barcode"]),
  10113. new CDAParameter("USERID", userInfo.UserID));
  10114. }
  10115. dataAccess.Commit();
  10116. return sre;
  10117. }
  10118. catch (Exception ex)
  10119. {
  10120. throw ex;
  10121. }
  10122. finally
  10123. {
  10124. dataAccess?.Dispose();
  10125. }
  10126. }
  10127. #endregion
  10128. #region 梭式窑入窑计件
  10129. /// <summary>
  10130. /// 梭式窑入窑计件
  10131. /// </summary>
  10132. /// <param name="cre"></param>
  10133. /// <param name="userInfo"></param>
  10134. /// <returns></returns>
  10135. public static ServiceResultEntity SaveSKBatchNo(ClientRequestEntity cre, SUserInfo userInfo)
  10136. {
  10137. IDataAccess dataAccess = DataAccess.Create(DataBaseType.Oracle, DataManager.ConnectionString);
  10138. try
  10139. {
  10140. ServiceResultEntity sre = new ServiceResultEntity();
  10141. string sqlString = string.Empty;
  10142. dataAccess.Open(true);
  10143. #region 校验、获取数据
  10144. sqlString = "SELECT k.kilnid\n" +
  10145. " ,k.kilncode\n" +
  10146. " ,k.sk_date\n" +
  10147. " ,k.sk_batchno\n" +
  10148. " FROM tp_mst_kiln k\n" +
  10149. " WHERE k.valueflag = '1'\n" +
  10150. " AND k.accountid = @accountid@\n" +
  10151. " AND k.kilncode = @kilncode@\n" +
  10152. " FOR UPDATE";
  10153. CDAParameter[] paras = new CDAParameter[]
  10154. {
  10155. new CDAParameter("accountid", userInfo.AccountID),
  10156. new CDAParameter("kilncode", cre.Properties["KilnCode"])
  10157. };
  10158. DataTable dtKiln = dataAccess.ExecuteDatatable(sqlString, paras);
  10159. if (dtKiln == null || dtKiln.Rows.Count == 0)
  10160. {
  10161. sre.Message = "当前窑炉编号不存在";
  10162. sre.OtherStatus = Constant.INT_IS_NEGATIE_ONE;
  10163. return sre;
  10164. }
  10165. DataRow drKiln = dtKiln.Rows[0];
  10166. int sk_Date = 0;
  10167. int.TryParse(drKiln["SK_Date"] + "", out sk_Date);
  10168. int sk_DateNow = sk_Date;
  10169. int sk_BatchNo = 0;
  10170. int.TryParse(drKiln["SK_BatchNo"] + "", out sk_BatchNo);
  10171. if (sk_DateNow == 0)
  10172. {
  10173. sk_Date = DateTime.Now.Year;
  10174. }
  10175. else if (sk_DateNow + 1 < DateTime.Now.Year)
  10176. {
  10177. sk_Date = DateTime.Now.Year;
  10178. sk_BatchNo = 1;
  10179. }
  10180. //xuwei fix 2021-04-22 批次号不足3位补0
  10181. string sk_FULLBatchNo = drKiln["kilncode"] + "$" + sk_Date + "$" + sk_BatchNo.ToString().PadLeft(3, '0');
  10182. string newID = dataAccess.ExecuteScalar("SELECT seq_pm_kilndata_id.nextval FROM dual") + "";
  10183. #endregion
  10184. #region 插入窑炉生产数据
  10185. sqlString = "INSERT INTO tp_pm_kilndata\n" +
  10186. " (kilndataid\n" +
  10187. " ,sk_date\n" +
  10188. " ,sk_batchno\n" +
  10189. " ,kilnid\n" +
  10190. " ,sk_fullbatchno\n" +
  10191. " ,remarks\n" +
  10192. " ,accountid\n" +
  10193. " ,createuserid\n" +
  10194. " ,updateuserid)\n" +
  10195. "VALUES\n" +
  10196. " (@kilndataid@\n" +
  10197. " ,@sk_date@\n" +
  10198. " ,@sk_batchno@\n" +
  10199. " ,@kilnid@\n" +
  10200. " ,@sk_fullbatchno@\n" +
  10201. " ,@remarks@\n" +
  10202. " ,@accountid@\n" +
  10203. " ,@userid@\n" +
  10204. " ,@userid@)";
  10205. paras = new CDAParameter[]
  10206. {
  10207. new CDAParameter("kilndataid", newID),
  10208. new CDAParameter("sk_date", sk_Date),
  10209. new CDAParameter("sk_batchno", sk_BatchNo),
  10210. new CDAParameter("kilnid", drKiln["kilnid"]),
  10211. new CDAParameter("sk_fullbatchno", sk_FULLBatchNo),
  10212. new CDAParameter("remarks", cre.Properties["Remarks"]),
  10213. new CDAParameter("accountid", userInfo.AccountID),
  10214. new CDAParameter("userid", userInfo.UserID)
  10215. };
  10216. sre.OtherStatus += dataAccess.ExecuteNonQuery(sqlString, paras);
  10217. #endregion
  10218. #region 更新窑炉信息
  10219. sqlString = "UPDATE tp_mst_kiln k\n" +
  10220. " SET k.sk_date = @sk_date@\n" +
  10221. " ,k.sk_batchno = @sk_batchno@\n" +
  10222. " ,k.updateuserid = @userid@\n" +
  10223. " WHERE k.accountid = @accountid@\n" +
  10224. " AND k.kilnid = @kilnid@";
  10225. paras = new CDAParameter[]
  10226. {
  10227. new CDAParameter("sk_date",sk_Date),
  10228. new CDAParameter("sk_batchno",sk_BatchNo + 1),
  10229. new CDAParameter("userid", userInfo.UserID),
  10230. new CDAParameter("accountid", userInfo.AccountID),
  10231. new CDAParameter("kilnid", drKiln["kilnid"])
  10232. };
  10233. sre.OtherStatus += dataAccess.ExecuteNonQuery(sqlString, paras);
  10234. #endregion
  10235. #region 更新其他窑炉财年和窑号
  10236. // 如果未设置财年或者财年跨一年未更新,则更新其他窑炉财年和窑号
  10237. if (sk_DateNow == 0 || sk_DateNow + 1 < DateTime.Now.Year)
  10238. {
  10239. sqlString = "UPDATE tp_mst_kiln k\n" +
  10240. " SET k.sk_date = @sk_date@\n" +
  10241. " ,k.sk_batchno = 1\n" +
  10242. " ,k.updateuserid = @userid@\n" +
  10243. " WHERE k.accountid = @accountid@\n" +
  10244. " AND k.kilnid <> @kilnid@";
  10245. paras = new CDAParameter[]
  10246. {
  10247. new CDAParameter("sk_date",sk_Date),
  10248. new CDAParameter("userid", userInfo.UserID),
  10249. new CDAParameter("accountid", userInfo.AccountID),
  10250. new CDAParameter("kilnid", drKiln["kilnid"])
  10251. };
  10252. sre.OtherStatus += dataAccess.ExecuteNonQuery(sqlString, paras);
  10253. }
  10254. #endregion
  10255. dataAccess.Commit();
  10256. return sre;
  10257. }
  10258. catch (Exception ex)
  10259. {
  10260. throw ex;
  10261. }
  10262. finally
  10263. {
  10264. dataAccess?.Dispose();
  10265. }
  10266. }
  10267. #endregion
  10268. #region 重启3#高压注浆
  10269. /// <summary>
  10270. /// 查询3#高压注浆线
  10271. /// </summary>
  10272. /// <param name="cre"></param>
  10273. /// <param name="userInfo"></param>
  10274. /// <returns></returns>
  10275. public static ServiceResultEntity GetGroutingLine3(SUserInfo userInfo)
  10276. {
  10277. IDataAccess dataAccess = DataAccess.Create(DataBaseType.Oracle, DataManager.ConnectionString);
  10278. try
  10279. {
  10280. ServiceResultEntity sre = new ServiceResultEntity();
  10281. string sqlString = string.Empty;
  10282. dataAccess.Open();
  10283. sqlString = "SELECT gl.groutinglineid\n" +
  10284. " ,gl.buildingno\n" +
  10285. " ,gl.floorno\n" +
  10286. " ,gl.groutinglineno\n" +
  10287. " ,gl.groutinglinecode\n" +
  10288. " ,gl.groutinglinename\n" +
  10289. " ,gl.mouldquantity\n" +
  10290. " ,gl.gmouldtypeid\n" +
  10291. " ,gl.beginuseddate\n" +
  10292. " ,gl.enduseddate\n" +
  10293. " ,gl.remarks\n" +
  10294. " ,gl.h_linecode\n" +
  10295. " ,gl.h_batchno\n" +
  10296. " ,gs.gmouldstatusname\n" +
  10297. " ,gt.gmouldtypename\n" +
  10298. " ,gu.usercode\n" +
  10299. " ,mu.usercode AS monitorcode\n" +
  10300. " FROM tp_pc_groutingline gl\n" +
  10301. " LEFT JOIN tp_mst_gmouldtype gt\n" +
  10302. " ON gl.gmouldtypeid = gt.gmouldtypeid\n" +
  10303. " LEFT JOIN tp_sys_gmouldstatus gs\n" +
  10304. " ON gl.gmouldstatus = gs.gmouldstatusid\n" +
  10305. " LEFT JOIN tp_mst_user gu\n" +
  10306. " ON gl.userid = gu.userid\n" +
  10307. " LEFT JOIN tp_mst_user mu\n" +
  10308. " ON mu.userid = gl.monitorid\n" +
  10309. " WHERE gl.valueflag = '1'\n" +
  10310. " AND gl.h_linecode IS NOT NULL\n" +
  10311. " AND gl.h_lineindex = 1\n" +
  10312. " AND gl.accountid = @accountid@\n" +
  10313. " AND EXISTS (SELECT purviewid\n" +
  10314. " FROM tp_mst_userpurview\n" +
  10315. " WHERE purviewtype = @purviewtype@\n" +
  10316. " AND userid = @userid@\n" +
  10317. " AND (purviewid = -1 OR purviewid = gl.groutinglineid))\n" +
  10318. " ORDER BY gl.groutinglinecode";
  10319. CDAParameter[] paras = new CDAParameter[]
  10320. {
  10321. new CDAParameter("accountid", userInfo.AccountID),
  10322. new CDAParameter("purviewtype", (int)Constant.PurviewType.OperateGroutingLine),
  10323. new CDAParameter("userid", userInfo.UserID)
  10324. };
  10325. sre.Data = dataAccess.ExecuteDataset(sqlString, paras);
  10326. return sre;
  10327. }
  10328. catch (Exception ex)
  10329. {
  10330. throw ex;
  10331. }
  10332. finally
  10333. {
  10334. dataAccess?.Dispose();
  10335. }
  10336. }
  10337. /// <summary>
  10338. /// 重启3#高压注浆
  10339. /// </summary>
  10340. /// <param name="cre"></param>
  10341. /// <param name="userInfo"></param>
  10342. /// <returns></returns>
  10343. public static ServiceResultEntity SaveGroutingLine3(ClientRequestEntity cre, SUserInfo userInfo)
  10344. {
  10345. IDataAccess dataAccess = DataAccess.Create(DataBaseType.Oracle, DataManager.ConnectionString);
  10346. try
  10347. {
  10348. ServiceResultEntity sre = new ServiceResultEntity();
  10349. int h_batchnoNow = Convert.ToInt32(cre.Properties["H_BatchNo"]);
  10350. string sqlString = string.Empty;
  10351. dataAccess.Open(true);
  10352. #region 校验并发、获取数据
  10353. sqlString = "SELECT t.h_linecode\n" +
  10354. " FROM tp_pc_groutingline t\n" +
  10355. " WHERE t.groutinglineid = @groutinglineid@\n" +
  10356. " AND t.h_batchno = @h_batchno@\n" +
  10357. " FOR UPDATE";
  10358. CDAParameter[] paras = new CDAParameter[]
  10359. {
  10360. new CDAParameter("groutinglineid", cre.Properties["GroutingLineID"]),
  10361. new CDAParameter("h_batchno", h_batchnoNow)
  10362. };
  10363. string h_linecode = dataAccess.ExecuteScalar(sqlString, paras) + "";
  10364. if (string.IsNullOrEmpty(h_linecode))
  10365. {
  10366. sre.Message = "当前数据发生变化,请刷新重试";
  10367. sre.OtherStatus = Constant.INT_IS_NEGATIE_ONE;
  10368. return sre;
  10369. }
  10370. #endregion
  10371. #region 更新成型线信息
  10372. sqlString = "UPDATE tp_pc_groutingline gl\n" +
  10373. " SET gl.h_batchindex = 0\n" +
  10374. " ,gl.h_batchno = @h_batchno@\n" +
  10375. " ,gl.updateuserid = @userid@\n" +
  10376. " WHERE gl.accountid = @accountid@\n" +
  10377. " AND gl.h_linecode = @h_linecode@";
  10378. paras = new CDAParameter[]
  10379. {
  10380. new CDAParameter("h_batchno",h_batchnoNow + 1),
  10381. new CDAParameter("userid", userInfo.UserID),
  10382. new CDAParameter("accountid", userInfo.AccountID),
  10383. new CDAParameter("h_linecode",h_linecode),
  10384. };
  10385. sre.OtherStatus += dataAccess.ExecuteNonQuery(sqlString, paras);
  10386. #endregion
  10387. dataAccess.Commit();
  10388. return sre;
  10389. }
  10390. catch (Exception ex)
  10391. {
  10392. throw ex;
  10393. }
  10394. finally
  10395. {
  10396. dataAccess?.Dispose();
  10397. }
  10398. }
  10399. #endregion
  10400. #region 半成品卡控生产计划数据
  10401. /// <summary>
  10402. /// 查询系统参数是否卡控
  10403. /// </summary>
  10404. /// <returns></returns>
  10405. public static int getSystemSet(IDBTransaction tran,string systemcode, SUserInfo user)
  10406. {
  10407. try
  10408. {
  10409. string sqs = "SELECT sss.settingcode, sss.settingvalue\n" +
  10410. " FROM tp_mst_systemsetting sss\n" +
  10411. " WHERE sss.accountid = " + user.AccountID + "\n" +
  10412. " AND sss.settingcode = '"+ systemcode + "'";
  10413. DataTable data = tran.GetSqlResultToDt(sqs, null);
  10414. if (data != null && data.Rows.Count > 0)
  10415. {
  10416. int settingvalue = Convert.ToInt32(data.Rows[0]["settingvalue"]);
  10417. return settingvalue;
  10418. }
  10419. return 0;
  10420. }
  10421. catch (Exception ex)
  10422. {
  10423. throw ex;
  10424. }
  10425. }
  10426. /// <summary>
  10427. /// 获取半成品物料
  10428. /// </summary>
  10429. /// <returns></returns>
  10430. public static string getmaterialcodeMat20(IDBTransaction tran, string goodsCode, int logoid)
  10431. {
  10432. try
  10433. {
  10434. string sqs = "SELECT DISTINCT SM.MAT20\n" +
  10435. " FROM (SELECT SAP.MATERIALCODE\n" +
  10436. " FROM TP_MST_GOODSLOGOSAP SAP\n" +
  10437. " WHERE SAP.GOODSCODE = :GOODSCODE\n" +
  10438. " AND SAP.LOGOID = :LOGOID\n" +
  10439. " UNION ALL\n" +
  10440. " SELECT G.MATERIALCODE\n" +
  10441. " FROM TP_MST_GOODS G\n" +
  10442. " WHERE G.GOODSCODE = :GOODSCODE\n" +
  10443. " AND G.LOGOID = :LOGOID) T\n" +
  10444. " LEFT JOIN TP_SEMIFINISHED_MATERIALLINK SM\n" +
  10445. " ON SM.MATERIALCODE = T.MATERIALCODE";
  10446. OracleParameter[] checkPurviewParas = new OracleParameter[]
  10447. {
  10448. new OracleParameter(":GOODSCODE", OracleDbType.Varchar2, goodsCode, ParameterDirection.Input),
  10449. new OracleParameter(":LOGOID", OracleDbType.Int32, logoid, ParameterDirection.Input)
  10450. };
  10451. DataTable purviewData = tran.GetSqlResultToDt(sqs, checkPurviewParas);
  10452. string mat20 = "";
  10453. if (purviewData != null && purviewData.Rows.Count > 0)
  10454. {
  10455. mat20 = purviewData.Rows[0]["MAT20"].ToString();
  10456. }
  10457. return mat20;
  10458. }
  10459. catch (Exception ex)
  10460. {
  10461. throw ex;
  10462. }
  10463. }
  10464. /// <summary>
  10465. /// 查询某月某物料某类型(注浆/交坯)的计划数量及已完成数量
  10466. /// </summary>
  10467. /// <returns></returns>
  10468. public static DataTable getPlanDetail(IDBTransaction tran, int plantype,string materialcode,DateTime datetime)
  10469. {
  10470. try
  10471. {
  10472. string sqs = "SELECT SP.PRODPLANID,SP.PLANCOUNT ,SP.COMPLETEDCOUNT\n" +
  10473. " FROM TP_SEMIFINISHED_PRODPLAN SP\n" +
  10474. " WHERE SP.VALUEFLAG = 1 "+
  10475. " AND TRUNC(SP.PLANMONTH, 'MM') = TRUNC(:PLANMONTH, 'MM') " +
  10476. " AND SP.PLANTYPE = :PLANTYPE" +
  10477. " AND SP.MATERIALCODE = :MATERIALCODE ";
  10478. OracleParameter[] checkPurviewParas = new OracleParameter[]
  10479. {
  10480. new OracleParameter(":PLANMONTH", OracleDbType.Date, datetime, ParameterDirection.Input),
  10481. new OracleParameter(":PLANTYPE", OracleDbType.Int32, plantype, ParameterDirection.Input),
  10482. new OracleParameter(":MATERIALCODE", OracleDbType.Varchar2, materialcode, ParameterDirection.Input)
  10483. };
  10484. DataTable purviewData = tran.GetSqlResultToDt(sqs, checkPurviewParas);
  10485. return purviewData;
  10486. }
  10487. catch (Exception ex)
  10488. {
  10489. throw ex;
  10490. }
  10491. }
  10492. #endregion
  10493. }
  10494. }