SPPIJ00400_입원세부계산내역.xfdl 370 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPIJ00400" position="absolute 0 0 1250 714" titletext="입원세부계산내역" onload="SPPIJ00400_onload" oninit="SPPIJ00400_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Div id="group2" taborder="2" style="align:center top;" position="absolute 0 23 1250 90" class="div_SA" positiontype="position" anchor="left top right">
  8. <Layouts>
  9. <Layout>
  10. <Button id="btn_srch" taborder="1" text="조회" class="btn1" position="absolute 1184 10 1240 30" anchor="top right" onclick="group2_btn_srch_onclick" positiontype="position"/>
  11. <Static id="caption5" text="조회기간" class="search_name" position="absolute 8 35 82 55" anchor="left top" positiontype="position"/>
  12. <Calendar id="ipt_fromdd" taborder="2" class="input_search" position="absolute 82 35 167 55" anchor="left top" positiontype="position"/>
  13. <Static id="caption6" text="~" position="absolute 167 35 183 55" anchor="left top" style="align:center middle;" positiontype="position"/>
  14. <Calendar id="ipt_todd" taborder="3" class="input_search" position="absolute 183 35 268 55" anchor="left top" positiontype="position"/>
  15. <Static id="caption8" text="코드조회" class="search_name" position="absolute 301 36 371 56" anchor="left top" positiontype="position"/>
  16. <Edit id="ipt_cd" taborder="4" class="input_search" position="absolute 520 36 632 56" anchor="left top" updatebindingvalue="default" onkeydown="group2_ipt_cd_onkeydown" autoselect="true" imemode="alpha" inputtype="numberandenglish" positiontype="position"/>
  17. <Static id="caption2" text="등록번호" class="search_name" position="absolute 8 10 82 30" anchor="left top" positiontype="position"/>
  18. <Calendar id="ipt_indd" taborder="6" class="input_default" position="absolute 267 10 352 30" anchor="left top" enable="true" positiontype="position"/>
  19. <Static id="caption3" text="입원일자" class="search_name" position="absolute 193 10 267 30" anchor="left top" positiontype="position"/>
  20. <Static id="caption4" text="주부" class="search_name" position="absolute 382 10 472 30" anchor="left top" positiontype="position"/>
  21. <Static id="caption7" text="보험유형" class="search_name" position="absolute 489 10 579 30" anchor="left top" positiontype="position"/>
  22. <Edit id="opt_insukind" taborder="7" readonly="true" position="absolute 562 10 597 30" anchor="left top" enable="false" positiontype="position"/>
  23. <Edit id="opt_insukindnm" taborder="8" readonly="true" position="absolute 599 10 679 30" anchor="left top" enable="false" positiontype="position"/>
  24. <Static id="caption1" text="유형보조" class="search_name" position="absolute 703 10 777 30" anchor="left top" positiontype="position"/>
  25. <Edit id="opt_suppkind" taborder="9" readonly="true" position="absolute 778 10 813 30" anchor="left top" enable="false" positiontype="position"/>
  26. <Edit id="opt_suppkindnm" taborder="10" readonly="true" position="absolute 815 10 889 30" anchor="left top" enable="false" positiontype="position"/>
  27. <Edit id="opt_ownrate" taborder="11" readonly="true" position="absolute 891 10 922 30" anchor="left top" enable="false" positiontype="position"/>
  28. <Edit id="output2" taborder="12" readonly="true" position="absolute 430 10 465 30" anchor="left top" enable="false" positiontype="position"/>
  29. <Radio id="rdo_mchrgcode" taborder="13" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 374 36 529 56" anchor="left top" onitemchanged="group2_rdo_mchrgcode_onitemchanged" positiontype="position">
  30. <Dataset id="innerdataset">
  31. <ColumnInfo>
  32. <Column id="codecolumn" size="256"/>
  33. <Column id="datacolumn" size="256"/>
  34. </ColumnInfo>
  35. <Rows>
  36. <Row>
  37. <Col id="codecolumn">calcscorcd</Col>
  38. <Col id="datacolumn">수가</Col>
  39. </Row>
  40. <Row>
  41. <Col id="codecolumn">edicd</Col>
  42. <Col id="datacolumn">EDI</Col>
  43. </Row>
  44. <Row>
  45. <Col id="codecolumn">hngnm</Col>
  46. <Col id="datacolumn">명칭</Col>
  47. </Row>
  48. </Rows>
  49. </Dataset>
  50. </Radio>
  51. <Calendar id="input1" taborder="15" class="input_search" position="absolute 879 36 964 56" anchor="left top" enable="true" positiontype="position"/>
  52. <Static id="caption23" text="~" position="absolute 863 36 879 56" anchor="left top" style="align:center middle;" positiontype="position"/>
  53. <Calendar id="input2" taborder="16" class="input_search" position="absolute 778 36 863 56" anchor="left top" enable="true" positiontype="position"/>
  54. <Static id="caption24" text="유형기간" class="search_name" position="absolute 703 36 777 56" anchor="left top" positiontype="position"/>
  55. <Edit id="ipt_estmcd" taborder="19" class="input_search" position="absolute 634 36 679 56" anchor="left top" imemode="hangul" positiontype="position"/>
  56. <Edit id="ipt_pid" taborder="20" class="input_default" position="absolute 82 10 169 30" imemode="hangul" maxlength="10" enable="true" anchor="left top" positiontype="position"/>
  57. <Static id="caption00" text="%" position="absolute 922 10 938 30" style="align:center middle;" anchor="left top"/>
  58. <CheckBox id="chk_recalcyn" taborder="21" text="재계산 포함" truevalue="Y" falsevalue="N" position="absolute 1141 40 1244 60" anchor="top right" onclick="group2_chk_recalcyn_onclick" value="Y"/>
  59. </Layout>
  60. </Layouts>
  61. </Div>
  62. <Static id="caption10" text="입원세부계산내역" class="tit_2" position="absolute 0 98 133 118" positiontype="position" anchor="left top" onclick="caption10_onclick"/>
  63. <Grid id="grd_ordlist" class="datagrid2" taborder="18" useinputpanel="false" position="absolute 0 119 1250 683" binddataset="fds_grid_grd_ordlist" positiontype="position" onheadclick="grd_ordlist_onheadclick" autoenter="select" onrbuttondown="grd_ordlist_onrbuttondown" selecttype="multirow" oncelldblclick="grd_ordlist_oncelldblclick" oncellclick="grd_ordlist_oncellclick" cellsizingtype="col" onexpanddown="grd_ordlist_onexpanddown" cellmovingtype="col" onrbuttonup="grd_ordlist_onrbuttonup" anchor="all" onkeydown="grd_ordlist_onkeydown">
  64. <Formats>
  65. <Format id="default">
  66. <Columns>
  67. <Column size="21"/>
  68. <Column size="0"/>
  69. <Column size="0"/>
  70. <Column size="0"/>
  71. <Column size="16"/>
  72. <Column size="16"/>
  73. <Column size="68"/>
  74. <Column size="0"/>
  75. <Column size="103"/>
  76. <Column size="16"/>
  77. <Column size="37"/>
  78. <Column size="16"/>
  79. <Column size="68"/>
  80. <Column size="68"/>
  81. <Column size="68"/>
  82. <Column size="30"/>
  83. <Column size="35"/>
  84. <Column size="30"/>
  85. <Column size="0"/>
  86. <Column size="173"/>
  87. <Column size="30"/>
  88. <Column size="30"/>
  89. <Column size="16"/>
  90. <Column size="50"/>
  91. <Column size="34"/>
  92. <Column size="30"/>
  93. <Column size="45"/>
  94. <Column size="30"/>
  95. <Column size="66"/>
  96. <Column size="66"/>
  97. <Column size="66"/>
  98. <Column size="26"/>
  99. <Column size="68"/>
  100. <Column size="66"/>
  101. <Column size="66"/>
  102. <Column size="75"/>
  103. <Column size="71"/>
  104. <Column size="71"/>
  105. <Column size="72"/>
  106. <Column size="72"/>
  107. <Column size="71"/>
  108. <Column size="30"/>
  109. <Column size="67"/>
  110. <Column size="82"/>
  111. <Column size="120"/>
  112. <Column size="70"/>
  113. <Column size="80"/>
  114. <Column size="70"/>
  115. <Column size="62"/>
  116. <Column size="62"/>
  117. <Column size="62"/>
  118. <Column size="120"/>
  119. <Column size="115"/>
  120. <Column size="115"/>
  121. <Column size="16"/>
  122. <Column size="30"/>
  123. <Column size="30"/>
  124. <Column size="30"/>
  125. <Column size="30"/>
  126. <Column size="47"/>
  127. <Column size="36"/>
  128. <Column size="40"/>
  129. <Column size="170"/>
  130. <Column size="0"/>
  131. <Column size="0"/>
  132. <Column size="68"/>
  133. <Column size="0"/>
  134. <Column size="0"/>
  135. <Column size="0"/>
  136. <Column size="0"/>
  137. <Column size="0"/>
  138. <Column size="0"/>
  139. <Column size="0"/>
  140. <Column size="35"/>
  141. <Column size="0"/>
  142. <Column size="0"/>
  143. <Column size="68"/>
  144. <Column size="30"/>
  145. <Column size="30"/>
  146. <Column size="50"/>
  147. <Column size="50"/>
  148. <Column size="30"/>
  149. <Column size="70"/>
  150. <Column size="30"/>
  151. <Column size="30"/>
  152. <Column size="30"/>
  153. <Column size="30"/>
  154. <Column size="60"/>
  155. <Column size="68"/>
  156. <Column size="50"/>
  157. <Column size="50"/>
  158. <Column size="50"/>
  159. <Column size="50"/>
  160. <Column size="50"/>
  161. <Column size="50"/>
  162. <Column size="30"/>
  163. <Column size="62"/>
  164. <Column size="61"/>
  165. <Column size="103"/>
  166. <Column size="30"/>
  167. <Column size="30"/>
  168. <Column size="30"/>
  169. <Column size="30"/>
  170. <Column size="30"/>
  171. <Column size="30"/>
  172. <Column size="30"/>
  173. <Column size="30"/>
  174. <Column size="30"/>
  175. <Column size="30"/>
  176. <Column size="0"/>
  177. <Column size="0"/>
  178. <Column size="0"/>
  179. <Column size="0"/>
  180. <Column size="0"/>
  181. <Column size="0"/>
  182. <Column size="0"/>
  183. <Column size="0"/>
  184. <Column size="0"/>
  185. <Column size="0"/>
  186. <Column size="0"/>
  187. <Column size="0"/>
  188. <Column size="0"/>
  189. <Column size="0"/>
  190. <Column size="0"/>
  191. <Column size="35"/>
  192. <Column size="0"/>
  193. <Column size="0"/>
  194. <Column size="0"/>
  195. <Column size="0"/>
  196. <Column size="0"/>
  197. <Column size="0"/>
  198. <Column size="0"/>
  199. <Column size="0"/>
  200. <Column size="0"/>
  201. <Column size="0"/>
  202. <Column size="0"/>
  203. <Column size="90"/>
  204. <Column size="68"/>
  205. <Column size="60"/>
  206. <Column size="68"/>
  207. <Column size="0"/>
  208. <Column size="0"/>
  209. <Column size="0"/>
  210. <Column size="0"/>
  211. <Column size="0"/>
  212. <Column size="0"/>
  213. <Column size="97"/>
  214. <Column size="92"/>
  215. <Column size="86"/>
  216. <Column size="0"/>
  217. <Column size="164"/>
  218. <Column size="52"/>
  219. <Column size="40"/>
  220. <Column size="40"/>
  221. </Columns>
  222. <Rows>
  223. <Row size="44" band="head"/>
  224. <Row size="23"/>
  225. </Rows>
  226. <Band id="head">
  227. <Cell/>
  228. <Cell col="1" text="선&#13;&#10;별"/>
  229. <Cell col="2" text="문&#13;&#10;제"/>
  230. <Cell col="3" text="S"/>
  231. <Cell col="4" text="항"/>
  232. <Cell col="5" text="목"/>
  233. <Cell col="6" text="진료일자"/>
  234. <Cell col="7" text="execdd"/>
  235. <Cell col="8" text="시행일시"/>
  236. <Cell col="9" text="시&#13;&#10;행"/>
  237. <Cell col="10" text="항목"/>
  238. <Cell col="11" text="G"/>
  239. <Cell col="12" text="그룹코드"/>
  240. <Cell col="13" text="수가코드"/>
  241. <Cell col="14" text="EDI코드"/>
  242. <Cell col="15" text="산정&#13;&#10;분류"/>
  243. <Cell col="16" text="산정&#13;&#10;의미"/>
  244. <Cell col="17" text="산정&#13;&#10;코드"/>
  245. <Cell col="18" text="@"/>
  246. <Cell col="19" text="한글명"/>
  247. <Cell col="20" text="급&#13;&#10;비"/>
  248. <Cell col="21" text="재료&#13;&#10;행위"/>
  249. <Cell col="22" text="퇴"/>
  250. <Cell col="23" text="단가"/>
  251. <Cell col="24" text="1회량"/>
  252. <Cell col="25" text="횟수"/>
  253. <Cell col="26" text="1일량&#13;&#10;(일투)"/>
  254. <Cell col="27" text="일수&#13;&#10;총투"/>
  255. <Cell col="28" text="금액"/>
  256. <Cell col="29" text="약제상한&#13;&#10;차액"/>
  257. <Cell col="30" text="상한가"/>
  258. <Cell col="31" text="선&#13;&#10;택"/>
  259. <Cell col="32" text="선택의사"/>
  260. <Cell col="33" text="종별가산&#13;&#10;단가"/>
  261. <Cell col="34" text="선택가산&#13;&#10;단가"/>
  262. <Cell col="35" text="가산단가"/>
  263. <Cell col="36" text="총진료비"/>
  264. <Cell col="37" text="본인부담금"/>
  265. <Cell col="38" text="종별가산&#13;&#10;SUM"/>
  266. <Cell col="39" text="선택가산&#13;&#10;SUM"/>
  267. <Cell col="40" text="가산&#13;&#10;SUM"/>
  268. <Cell col="41" text="MIX"/>
  269. <Cell col="42" text="용법/검체"/>
  270. <Cell col="43" text="처방&#13;&#10;상태"/>
  271. <Cell col="44" text="처방일시"/>
  272. <Cell col="45" text="처방번호"/>
  273. <Cell col="46" text="처방과코드"/>
  274. <Cell col="47" text="처방과"/>
  275. <Cell col="48" text="입력자"/>
  276. <Cell col="49" text="실시자"/>
  277. <Cell col="50" text="최종수정자"/>
  278. <Cell col="51" text="최종수정일시"/>
  279. <Cell col="52" text="처방명"/>
  280. <Cell col="53" text="수정&#13;&#10;사유"/>
  281. <Cell col="54" text="치&#13;&#10;식"/>
  282. <Cell col="55" text="확인&#13;&#10;코드"/>
  283. <Cell col="56" text="CP&#13;&#10;여부"/>
  284. <Cell col="57" text="PRN"/>
  285. <Cell col="58" text="포&#13;&#10;터&#13;&#10;블"/>
  286. <Cell col="59" text="기왕증&#13;&#10;(진료)"/>
  287. <Cell col="60" text="마취&#13;&#10;시간"/>
  288. <Cell col="61" text="임상&#13;&#10;소견"/>
  289. <Cell col="62" text="수정사유명칭"/>
  290. <Cell col="63" text="edicdflag"/>
  291. <Cell col="64" text="ediunitcost"/>
  292. <Cell col="65" text="적용일자"/>
  293. <Cell col="66" text="pid"/>
  294. <Cell col="67" text="indd"/>
  295. <Cell col="68" text="cretno"/>
  296. <Cell col="69" text="calcseqno"/>
  297. <Cell col="70" text="calcscorseqno"/>
  298. <Cell col="71" text="mskind"/>
  299. <Cell col="72" text="oldmskind"/>
  300. <Cell col="73" text="그룹&#13;&#10;항목"/>
  301. <Cell col="74" text="처방계산구분"/>
  302. <Cell col="75" text="그룹싱글여부"/>
  303. <Cell col="76" text="처방일시"/>
  304. <Cell col="77" text="처방&#13;&#10;순번"/>
  305. <Cell col="78" text="실시&#13;&#10;순번"/>
  306. <Cell col="79" text="수가&#13;&#10;점수"/>
  307. <Cell col="80" text="가산&#13;&#10;금액"/>
  308. <Cell col="81" text="가산&#13;&#10;점수"/>
  309. <Cell col="82" text="퇴장&#13;&#10;방지&#13;&#10;금액"/>
  310. <Cell col="83" text="퇴장&#13;&#10;방지&#13;&#10;여부"/>
  311. <Cell col="84" text="처방&#13;&#10;수량"/>
  312. <Cell col="85" text="처방&#13;&#10;횟수"/>
  313. <Cell col="86" text="처방&#13;&#10;일수"/>
  314. <Cell col="87" text="처방구분&#13;&#10;(I,O,E)"/>
  315. <Cell col="88" text="급여&#13;&#10;총액"/>
  316. <Cell col="89" text="급여보험&#13;&#10;자부담금"/>
  317. <Cell col="90" text="급여본인&#13;&#10;부담금"/>
  318. <Cell col="91" text="급여본인&#13;&#10;부담율"/>
  319. <Cell col="92" text="점당&#13;&#10;단가"/>
  320. <Cell col="93" text="전액&#13;&#10;본인"/>
  321. <Cell col="94" text="비급여&#13;&#10;금액"/>
  322. <Cell col="95" text="NC"/>
  323. <Cell col="96" text="저함량배수&#13;&#10;사유코드"/>
  324. <Cell col="97" text="주사용법&#13;&#10;검체코드" taborder="undefined"/>
  325. <Cell col="98" text="예약일시"/>
  326. <Cell col="99" text="그룹&#13;&#10;순번"/>
  327. <Cell col="100" text="특진"/>
  328. <Cell col="101" text="보험&#13;&#10;유형"/>
  329. <Cell col="102" text="보조&#13;&#10;유형"/>
  330. <Cell col="103" text="급&#13;&#10;비"/>
  331. <Cell col="104" text="처방&#13;&#10;분류&#13;&#10;1"/>
  332. <Cell col="105" text="처방&#13;&#10;분류&#13;&#10;2"/>
  333. <Cell col="106" text="처방&#13;&#10;분류&#13;&#10;3"/>
  334. <Cell col="107" text="수정&#13;&#10;여부"/>
  335. <Cell col="108" text="after&#13;&#10;cret&#13;&#10;no"/>
  336. <Cell col="109" text="payflagyn"/>
  337. <Cell col="110" text="estmyn"/>
  338. <Cell col="111" text="spcordyn"/>
  339. <Cell col="112" text="nochargeyn"/>
  340. <Cell col="113" text="ordinptflag"/>
  341. <Cell col="114" text="ordchangeyn"/>
  342. <Cell col="115" text="probordchangeyn"/>
  343. <Cell col="116" text="chkflag"/>
  344. <Cell col="117" text="bfjudgadjtresncd"/>
  345. <Cell col="118" text="execchangeyn"/>
  346. <Cell col="119" text="opprcpyn"/>
  347. <Cell col="120" text="execdeptprcpyn"/>
  348. <Cell col="121" text="specaddflag"/>
  349. <Cell col="122" text="cretyn"/>
  350. <Cell col="123" text="ordaddinptflag"/>
  351. <Cell col="124" text="수술&#13;&#10;마취&#13;&#10;구분"/>
  352. <Cell col="125" text="nigtprcpflag"/>
  353. <Cell col="126" text="erprcpflag"/>
  354. <Cell col="127" text="opansyn"/>
  355. <Cell col="128" text="angioyn"/>
  356. <Cell col="129" text="gsorddryn"/>
  357. <Cell col="130" text="angioflagcd"/>
  358. <Cell col="131" text="gsorddr"/>
  359. <Cell col="132" text="hosinhosoutflag"/>
  360. <Cell col="133" text="sortexecdd"/>
  361. <Cell col="134" text="execprcpuniqno"/>
  362. <Cell col="135" text="proccalctype"/>
  363. <Cell col="136" text="부서"/>
  364. <Cell col="137" text="의사"/>
  365. <Cell col="138" text="면허번호"/>
  366. <Cell col="139" text="DRG/완화&#13;&#10;인정여부"/>
  367. <Cell col="140" text="DRG인정YN"/>
  368. <Cell col="141" text="약구분"/>
  369. <Cell col="142" text="퇴원약구분"/>
  370. <Cell col="143" text="덤프처방구분"/>
  371. <Cell col="144" text="변경전퇴원약구분"/>
  372. <Cell col="145" text="급비변경여부"/>
  373. <Cell col="146" text="초음파&#13;&#10;부위"/>
  374. <Cell col="147" text="초음파&#13;&#10;행위구분"/>
  375. <Cell col="148" text="초음파&#13;&#10;사유"/>
  376. <Cell col="149" text="drugmthyn"/>
  377. <Cell col="150" text="처방전달사항"/>
  378. <Cell col="151" text="외상전담&#13;&#10;전문의&#13;&#10;유무"/>
  379. <Cell col="152" text="응급&#13;&#10;수가"/>
  380. <Cell col="153" text="사후&#13;&#10;전달"/>
  381. </Band>
  382. <Band id="body">
  383. <Cell celltype="head" displaytype="normal" expandshow="hide" expandsize="15"/>
  384. <Cell col="1" displaytype="text" edittype="text" text="bind:spcljudgyn"/>
  385. <Cell col="2" displaytype="text" edittype="text" text="bind:probordyn"/>
  386. <Cell col="3" text="bind:seq"/>
  387. <Cell col="4" displaytype="text" edittype="none" style="align:center;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ediitem1"/>
  388. <Cell col="5" displaytype="text" edittype="none" style="align:center;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ediitem2"/>
  389. <Cell col="6" displaytype="date" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:orddd" calendardisplaynulltype="none"/>
  390. <Cell col="7" displaytype="date" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:execdd" mask="yyyy/MM/dd HH:mm" editdisplay="edit" calendardisplaynulltype="none"/>
  391. <Cell col="8" displaytype="date" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:newexecdd" mask="yyyy/MM/dd HH:mm" calendardisplaynulltype="none"/>
  392. <Cell col="9" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:execstat"/>
  393. <Cell col="10" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:snglcalcscorcls"/>
  394. <Cell col="11" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:grupflag"/>
  395. <Cell col="12" displaytype="normal" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:grupcalcscorcd"/>
  396. <Cell col="13" displaytype="text" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:snglcalcscorcd" editautoselect="true" editdisplay="edit"/>
  397. <Cell col="14" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:edicd"/>
  398. <Cell col="15" displaytype="text" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:estmcls"/>
  399. <Cell col="16" displaytype="text" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:estmmncd" tooltiptext="expr:&quot;[산정의미코드:&quot; + estmmncd + &quot;]&quot; + estmcdnm"/>
  400. <Cell col="17" displaytype="text" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:estmcd" tooltiptype="mouse" tooltiptext="expr:&quot;[산정의미코드:&quot;+ estmmncd+&quot;]&quot;+estmmnnm"/>
  401. <Cell col="18" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:pay100"/>
  402. <Cell col="19" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:hngnm"/>
  403. <Cell col="20" displaytype="combo" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:calcpayflag" combodataset="ds_init_payflag" combocodecol="value" combodatacol="label"/>
  404. <Cell col="21" displaytype="combo" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:matractflag" combodataset="ds_init_matractflag" combocodecol="value" combodatacol="label"/>
  405. <Cell col="22" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:dschdrugflag"/>
  406. <Cell col="23" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:appunitcost" mask="#,###0"/>
  407. <Cell col="24" displaytype="normal" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:calcqty" maskchar="_" editlimit="6" combodisplay="edit"/>
  408. <Cell col="25" displaytype="normal" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:calctims" editlimit="3"/>
  409. <Cell col="26" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:daydrugqty" editlimit="6"/>
  410. <Cell col="27" displaytype="normal" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:calcdays" editlimit="3"/>
  411. <Cell col="28" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:calcamt" mask="#,###0"/>
  412. <Cell col="29" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:limitdiffamt" mask="#,###0"/>
  413. <Cell col="30" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:druglimitamt" mask="#,###0"/>
  414. <Cell col="31" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:unitspecyn"/>
  415. <Cell col="32" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:specdrid"/>
  416. <Cell col="33" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:unithospaddamt" mask="#,###0"/>
  417. <Cell col="34" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:unitspecamt" mask="#,###0"/>
  418. <Cell col="35" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:unitaddamt" mask="#,###0"/>
  419. <Cell col="36" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:totordamt" mask="#,###0"/>
  420. <Cell col="37" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ownbamt" mask="#,###0"/>
  421. <Cell col="38" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:hospaddamt" mask="#,###0"/>
  422. <Cell col="39" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:specamt" mask="#,###0"/>
  423. <Cell col="40" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:estmamt" mask="#,###0"/>
  424. <Cell col="41" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:prcpmixno"/>
  425. <Cell col="42" displaytype="text" edittype="none" style="align:center;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:drugmthdspccd"/>
  426. <Cell col="43" displaytype="text" edittype="none" style="align:center;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:execprcpstatcd"/>
  427. <Cell col="44" displaytype="date" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:rgstdt" mask="yyyy/MM/dd HH:mm:ss" calendardisplaynulltype="none"/>
  428. <Cell col="45" displaytype="text" edittype="text" style="align:center;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:prcpno"/>
  429. <Cell col="46" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:orddeptcd"/>
  430. <Cell col="47" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:orddeptnm"/>
  431. <Cell col="48" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:fstrgstrid"/>
  432. <Cell col="49" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:execrid"/>
  433. <Cell col="50" edittype="none" style="align:center;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:lastupdtrid"/>
  434. <Cell col="51" displaytype="date" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:lastupdtdt" mask="yyyy/MM/dd HH:mm:ss" calendardisplaynulltype="none"/>
  435. <Cell col="52" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ordnm"/>
  436. <Cell col="53" edittype="none" style="align:center;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:judgadjtresncd"/>
  437. <Cell col="54" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:tootfact"/>
  438. <Cell col="55" displaytype="text" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:cnfmcd"/>
  439. <Cell col="56" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:cpflag"/>
  440. <Cell col="57" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:prnprcpflag"/>
  441. <Cell col="58" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:portprcpflag"/>
  442. <Cell col="59" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:anamneflag"/>
  443. <Cell col="60" displaytype="date" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ansttm" mask="HH:mm"/>
  444. <Cell col="61" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:clinccmtcnts"/>
  445. <Cell col="62" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:judgadjtresncdnm"/>
  446. <Cell col="63" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:edicdflag"/>
  447. <Cell col="64" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ediunitcost"/>
  448. <Cell col="65" displaytype="date" edittype="none" style="align:center;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:updtdd" calendardisplaynulltype="none"/>
  449. <Cell col="66" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:pid"/>
  450. <Cell col="67" displaytype="date" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:indd" calendardisplaynulltype="none"/>
  451. <Cell col="68" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:cretno"/>
  452. <Cell col="69" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:calcseqno"/>
  453. <Cell col="70" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:calcscorseqno"/>
  454. <Cell col="71" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:mskind"/>
  455. <Cell col="72" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:oldmskind"/>
  456. <Cell col="73" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:grupcalcscorcls"/>
  457. <Cell col="74" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ordcalcflag"/>
  458. <Cell col="75" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:grupsnglfag"/>
  459. <Cell col="76" displaytype="date" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:prcpdd" calendardisplaynulltype="none"/>
  460. <Cell col="77" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:prcphistno"/>
  461. <Cell col="78" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:execprcpno"/>
  462. <Cell col="79" edittype="none" style="align:right;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:exectm" mask="#,###0"/>
  463. <Cell col="80" edittype="none" style="align:right;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:calcscorpnt" mask="#,###0"/>
  464. <Cell col="81" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:estmpnt"/>
  465. <Cell col="82" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:exitprvntdrugamt" mask="#,###0"/>
  466. <Cell col="83" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:exitprvntdrugyn"/>
  467. <Cell col="84" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ordqty"/>
  468. <Cell col="85" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ordtims"/>
  469. <Cell col="86" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:orddays"/>
  470. <Cell col="87" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ordtype"/>
  471. <Cell col="88" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:payamt" mask="#,###0"/>
  472. <Cell col="89" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:payinsubamt" mask="#,###0"/>
  473. <Cell col="90" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:payownbamt" mask="#,###0"/>
  474. <Cell col="91" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:payownbrate" mask="#,###0"/>
  475. <Cell col="92" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:pntunitcost" mask="#,###0"/>
  476. <Cell col="93" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:allownbamt" mask="#,###0"/>
  477. <Cell col="94" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:nopyamt" mask="#,###0"/>
  478. <Cell col="95" displaytype="number" edittype="none" style="align:right middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:freeflag" mask="#,###"/>
  479. <Cell col="96" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:lowdrugresncd"/>
  480. <Cell col="97" displaytype="text" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);cursor:hand;" class="cell_nopadding" text="bind:drugmthcd" editautoselect="true" expandsize="18"/>
  481. <Cell col="98" displaytype="date" edittype="none" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:rsrvdd" mask="yyyy/MM/dd HH:mm:ss" calendardisplaynulltype="none"/>
  482. <Cell col="99" displaytype="normal" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:grupseqno" calendardisplaynulltype="none"/>
  483. <Cell col="100" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:specordyn"/>
  484. <Cell col="101" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:insukind"/>
  485. <Cell col="102" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:suppkind"/>
  486. <Cell col="103" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:pynpy"/>
  487. <Cell col="104" displaytype="text" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:earncls1"/>
  488. <Cell col="105" displaytype="text" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:earncls2"/>
  489. <Cell col="106" displaytype="text" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:earncls3"/>
  490. <Cell col="107" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:editflag"/>
  491. <Cell col="108" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:aftercretno"/>
  492. <Cell col="109" edittype="none" style="align:center middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:payflagyn"/>
  493. <Cell col="110" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:estmyn"/>
  494. <Cell col="111" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:spcordyn"/>
  495. <Cell col="112" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:nochargeyn"/>
  496. <Cell col="113" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ordinptflag"/>
  497. <Cell col="114" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ordchangeyn"/>
  498. <Cell col="115" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:probordchangeyn"/>
  499. <Cell col="116" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:chkflag" expr="expr:chkflag == 'Y' ? 'Y' : 'N'"/>
  500. <Cell col="117" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:bfjudgadjtresncd"/>
  501. <Cell col="118" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:execchangeyn"/>
  502. <Cell col="119" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:opprcpyn"/>
  503. <Cell col="120" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:execdeptprcpyn"/>
  504. <Cell col="121" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:specaddflag"/>
  505. <Cell col="122" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:cretyn"/>
  506. <Cell col="123" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:ordaddinptflag"/>
  507. <Cell col="124" displaytype="normal" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:opansflagcd"/>
  508. <Cell col="125" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:nigtprcpflag"/>
  509. <Cell col="126" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:erprcpflag"/>
  510. <Cell col="127" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:opansyn"/>
  511. <Cell col="128" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:angioyn"/>
  512. <Cell col="129" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:gsorddryn"/>
  513. <Cell col="130" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:angioflagcd"/>
  514. <Cell col="131" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:gsorddr"/>
  515. <Cell col="132" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:hosinhosoutflag"/>
  516. <Cell col="133" displaytype="date" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:sortexecdd" calendardisplaynulltype="none"/>
  517. <Cell col="134" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:execprcpuniqno"/>
  518. <Cell col="135" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:proccalctype"/>
  519. <Cell col="136" style="align:left;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:earndeptnm"/>
  520. <Cell col="137" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:earndrid"/>
  521. <Cell col="138" displaytype="text" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:licnsno"/>
  522. <Cell col="139" displaytype="combo" edittype="combo" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:drgacptflag" combodataset="ds_init_P0506" combocodecol="cdid" combodatacol="cdnm"/>
  523. <Cell col="140" text="bind:drgacptyn"/>
  524. <Cell col="141" text="bind:prcpclscd"/>
  525. <Cell col="142" text="bind:prcpkindcd"/>
  526. <Cell col="143" text="bind:cvrtbfcretno"/>
  527. <Cell col="144" text="bind:oldprcpkindcd"/>
  528. <Cell col="145" edittype="none" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:insupaychangeyn"/>
  529. <Cell col="146" displaytype="combo" style="align:left middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:rehbprcpcurepartcd" combodataset="ds_init_drugspd" combocodecol="cdid" combodatacol="cdnm"/>
  530. <Cell col="147" style="align:left middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:drugmthdspccdnm"/>
  531. <Cell col="148" style="align:left middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:exptmthdfact"/>
  532. <Cell col="149" text="bind:drugmthyn"/>
  533. <Cell col="150" displaytype="text" edittype="readonly" style="align:left middle;background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:prcpdelivefact" editautoselect="true"/>
  534. <Cell col="151" displaytype="normal" style="background:BIND(sortcolor);background2:BIND(sortcolor);" text="bind:tryn"/>
  535. <Cell col="152" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : pordarcptyn_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : pordarcptyn_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:pordarcptyn"/>
  536. <Cell col="153" text="bind:afterchk"/>
  537. </Band>
  538. </Format>
  539. </Formats>
  540. </Grid>
  541. <Div id="group8" taborder="19" class="roundrect_example" position="absolute 127 94 1107 117" positiontype="position" anchor="top right">
  542. <Layouts>
  543. <Layout width="1187" height="25">
  544. <Radio id="rdo_ordfilflag" taborder="0" columncount="15" rowcount="-1" codecolumn="value" datacolumn="label" position="absolute 2 2 772 22" anchor="top right" class="radio_search" innerdataset="@ds_init_ordfilflag" style="color:BIND(color);font:BIND(font);" onitemchanged="group8_rdo_ordfilflag_onitemchanged" onitemclick="group8_rdo_ordfilflag_onitemclick" positiontype="position"/>
  545. <Combo id="cmb_judgresn" taborder="1" innerdataset="@ds_grid_grd_judgresn0153" codecolumn="cdid" datacolumn="cdnm" position="absolute 778 2 873 22" anchor="top right"/>
  546. <CheckBox id="bool1" taborder="2" text="수기료계산포함" value="A" truevalue="A" falsevalue="P" position="absolute 877 1 980 21" anchor="top right"/>
  547. </Layout>
  548. </Layouts>
  549. </Div>
  550. <Div id="grp_probresn" taborder="17" visible="false" position="absolute 1781 181 2038 380" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  551. <Layouts>
  552. <Layout>
  553. <Shape id="line7" class="line_1" position="absolute 2 15 251 15" linetype="horizontal" anchor="default" positiontype="position"/>
  554. <Button id="button3" taborder="4" text="취소" onlbuttonup="button3_onlbuttonup" class="btn4" position="absolute 194 172 250 192" onclick="button3_onclick" anchor="default" positiontype="position"/>
  555. <Button id="button4" taborder="5" text="확인" onlbuttonup="button4_onlbuttonup" class="btn4" position="absolute 137 172 193 192" onclick="button4_onclick" anchor="default" positiontype="position"/>
  556. <Static id="caption00" text="문제처방사유" position="absolute 3 2 112 22" anchor="default" class="tit_2"/>
  557. <TextArea id="textarea1" taborder="6" imemode="hangul" position="absolute 2 19 251 169" style="align:left middle;" anchor="default"/>
  558. </Layout>
  559. </Layouts>
  560. </Div>
  561. <PopupMenu id="pMenu" innerdataset="@ds_menu" idcolumn="idx" captioncolumn="Caption" levelcolumn="lev" enablecolumn="enable" hotkeycolumn="hotkey" userdatacolumn="UserData" position="absolute 2080 213 2400 796" onmenuclick="pMenu_onmenuclick" onmouseleave="pMenu_onmouseleave"/>
  562. <Static id="Static00" class="sta_DA_box" position="absolute 59 685 896 709" anchor="left bottom"/>
  563. <Button id="btn_close" taborder="22" text="닫기" onclick="btn_close_onclick" class="btn4" position="absolute 1194 686 1250 706" hotkey="ESCAPE" visible="true" anchor="right bottom"/>
  564. <Button id="btn_exl" taborder="24" text="엑셀" onclick="btn_exl_onclick" class="btn7" position="absolute 0 686 56 706" anchor="left bottom"/>
  565. <Static id="caption13" text="범 례" onclick="caption13_onclick" class="cell_2" position="absolute 63 687 103 707" anchor="left bottom"/>
  566. <Static id="caption14" onclick="caption14_onclick" class="color_10" position="absolute 106 687 126 707" style="background:deepskyblue;" anchor="left bottom"/>
  567. <Static id="caption15" text="심사변경" onclick="caption15_onclick" position="absolute 128 687 178 707" anchor="left bottom"/>
  568. <Static id="caption16" onclick="caption16_onclick" class="color_1" position="absolute 178 687 198 707" style="background:pink;" anchor="left bottom"/>
  569. <Static id="caption17" text="문제처방" onclick="caption17_onclick" position="absolute 200 687 250 707" anchor="left bottom"/>
  570. <Static id="caption18" onclick="caption18_onclick" class="color_4" position="absolute 251 687 271 707" style="background:aquamarine;" anchor="left bottom"/>
  571. <Static id="caption19" text="수술중처방" onclick="caption19_onclick" position="absolute 273 687 343 707" anchor="left bottom"/>
  572. <Static id="caption20" onclick="caption20_onclick" class="color_5" position="absolute 336 687 356 707" style="background:lightblue;" anchor="left bottom"/>
  573. <Static id="caption21" text="시행부서처방" onclick="caption21_onclick" position="absolute 358 687 433 707" anchor="left bottom"/>
  574. <Static id="caption25" onclick="caption25_onclick" class="color_9" position="absolute 508 687 528 707" style="background:chartreuse;" anchor="left bottom"/>
  575. <Static id="caption26" text="non-CP" onclick="caption26_onclick" position="absolute 530 687 578 707" anchor="left bottom"/>
  576. <Button id="btn_EnvSetup" taborder="25" text="환경저장" onclick="btn_EnvSetup_onclick" onlbuttonup="btn_EnvSetup_onlbuttonup" class="btn2" position="absolute 903 686 985 706" visible="true" anchor="right bottom"/>
  577. <Static id="caption27" onclick="caption27_onclick" class="color_2" position="absolute 433 687 453 707" style="background:blanchedalmond;" anchor="left bottom"/>
  578. <Static id="caption28" text="선별심사" onclick="caption28_onclick" position="absolute 457 687 512 707" anchor="left bottom"/>
  579. <Static id="caption43" onclick="caption43_onclick" class="color_9" position="absolute 576 687 596 707" style="background:yellow;" anchor="left bottom"/>
  580. <Static id="caption44" text="야간,공휴가산" onclick="caption44_onclick" position="absolute 598 687 676 707" anchor="left bottom"/>
  581. <Div id="grp_execdd" taborder="9" visible="false" position="absolute 1792 42 2135 116" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  582. <Layouts>
  583. <Layout>
  584. <Static id="caption00" text="시행일자 변경" position="absolute 2 2 111 22" anchor="default" class="tit_2"/>
  585. <TextArea id="txt_isol" taborder="0" position="absolute 2 21 337 47" anchor="default"/>
  586. <Static id="caption18" text="시행일자" class="cell_1" position="absolute 3 22 67 46" anchor="default"/>
  587. <Static id="caption35" text="시" position="absolute 248 22 268 47" anchor="default"/>
  588. <Static id="caption36" text="분" position="absolute 320 22 340 47" anchor="default"/>
  589. <Button id="btn_canlexecdd" taborder="3" text="취소" onclick="btn_canlexecdd_onclick" onlbuttonup="btn_canlexecdd_onlbuttonup" class="btn4" position="absolute 281 50 337 70" anchor="default"/>
  590. <Button id="btn_chngexecdd" taborder="2" text="변경" onclick="btn_chngexecdd_onclick" onlbuttonup="btn_chngexecdd_onlbuttonup" class="btn4" position="absolute 221 50 277 70" anchor="default"/>
  591. <Calendar id="ipt_chngdd" taborder="1" class="input_search" position="absolute 70 24 185 44" anchor="default" autoskip="true" autoselect="true"/>
  592. <MaskEdit id="cmb_chnghh" taborder="4" position="absolute 214 24 246 44" mask="99" trimtype="both" autoskip="true" onsetfocus="grp_execdd_cmb_chnghh_onsetfocus" anchor="default"/>
  593. <MaskEdit id="cmb_ipt_chngmn" taborder="5" position="absolute 279 25 313 45" type="number" mask="99" autoskip="true" onsetfocus="grp_execdd_cmb_chnghh_onsetfocus" anchor="default"/>
  594. <CheckBox id="chk_afterchk" taborder="6" text="실시일시 사후심사 전달" position="absolute 66 50 214 70" falsevalue="N" truevalue="Y" visible="false" onchanged="CheckBox_onchanged"/>
  595. </Layout>
  596. </Layouts>
  597. </Div>
  598. <Div id="grp_selectspecord" taborder="10" visible="false" position="absolute 1516 472 1751 571" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  599. <Layouts>
  600. <Layout>
  601. <Button id="btn_cancel" taborder="5" text="취소" onlbuttonup="btn_cancel_onlbuttonup" class="btn4" position="absolute 172 73 228 93" onclick="btn_cancel_onclick" anchor="default" positiontype="position"/>
  602. <Button id="btn_accept" taborder="6" text="확인" onlbuttonup="btn_accept_onlbuttonup" class="btn4" position="absolute 114 73 170 93" onclick="btn_accept_onclick" anchor="default" positiontype="position"/>
  603. <Static id="caption00" text="선택의사변경" position="absolute 2 1 111 21" anchor="default" class="tit_2"/>
  604. <TextArea id="txt_isol" taborder="9" position="absolute 2 19 229 70" anchor="default"/>
  605. <Static id="caption18" text="진료과" class="cell_1" position="absolute 3 20 67 44" anchor="default"/>
  606. <Combo id="cmb_deptlist" taborder="7" class="combo_search" position="absolute 70 22 225 42" anchor="default" innerdataset="@ds_data_req_deptlist" codecolumn="deptcd" datacolumn="depthngnm" onitemchanged="grp_selectspecord_cmb_deptlist_onitemchanged" positiontype="position"/>
  607. <Static id="caption01" text="의사명" class="cell_1" position="absolute 3 45 67 69" anchor="default"/>
  608. <Combo id="cmb_drlist" taborder="8" class="combo_search" position="absolute 70 47 225 67" anchor="default" innerdataset="ds_init_cmb_orddrid" codecolumn="atdoctid" datacolumn="atdocthngnm" positiontype="position"/>
  609. </Layout>
  610. </Layouts>
  611. </Div>
  612. <Div id="grp_changeans" taborder="14" visible="false" position="absolute 1516 325 1767 456" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  613. <Layouts>
  614. <Layout>
  615. <TextArea id="txt_isol" taborder="11" position="absolute 12 46 239 97" anchor="default"/>
  616. <Static id="caption01" text="여부" class="cell_1" position="absolute 13 47 77 71" anchor="default"/>
  617. <Static id="caption18" text="마취유형" class="cell_1" position="absolute 13 72 77 96" anchor="default"/>
  618. <Button id="button7" taborder="6" text="취소" onlbuttonup="button7_onlbuttonup" class="btn4" position="absolute 184 100 240 120" onclick="button7_onclick" anchor="default" positiontype="position"/>
  619. <Button id="button8" taborder="7" text="확인" onlbuttonup="button8_onlbuttonup" class="btn4" position="absolute 124 100 180 120" onclick="button8_onclick" anchor="default" positiontype="position"/>
  620. <CheckBox id="chk_anser" taborder="9" text="응급여부" truevalue="Y" position="absolute 80 49 152 69" anchor="default" falsevalue="N" positiontype="position"/>
  621. <CheckBox id="chk_ansnigt" taborder="10" text="심야여부" truevalue="Y" position="absolute 158 49 230 69" anchor="default" falsevalue="N" positiontype="position"/>
  622. <Static id="caption00" text="마취유형변경" position="absolute 12 8 121 28" anchor="default" class="tit_2"/>
  623. <Combo id="cmb_ans" taborder="8" class="combo_search" position="absolute 80 74 235 94" anchor="default" positiontype="position"/>
  624. </Layout>
  625. </Layouts>
  626. </Div>
  627. <Div id="grp_changeop" taborder="12" visible="false" position="absolute 1539 157 1810 256" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  628. <Layouts>
  629. <Layout>
  630. <TextArea id="txt_isol" taborder="11" position="absolute 0 21 268 72" anchor="default" oneditclick="grp_changeop_txt_isol_oneditclick"/>
  631. <Button id="button1" taborder="6" text="취소" onlbuttonup="button1_onlbuttonup" class="btn4" position="absolute 212 74 268 94" onclick="button1_onclick" anchor="default" positiontype="position"/>
  632. <Button id="button2" taborder="7" text="확인" onlbuttonup="button2_onlbuttonup" class="btn4" position="absolute 153 74 209 94" onclick="button2_onclick" anchor="default" positiontype="position"/>
  633. <Static id="caption00" text="수술유형변경" position="absolute 1 2 110 22" anchor="default" class="tit_2"/>
  634. <Static id="caption18" text="수술유형" class="cell_1" position="absolute 2 47 66 71" anchor="default"/>
  635. <Static id="caption01" text="여부" class="cell_1" position="absolute 2 22 66 46" anchor="default"/>
  636. <Combo id="cmb_opflag" taborder="8" class="combo_search" position="absolute 69 49 264 69" anchor="default" positiontype="position"/>
  637. <CheckBox id="chk_oper" taborder="9" text="응급여부" truevalue="Y" position="absolute 69 24 141 44" anchor="default" falsevalue="N" positiontype="position"/>
  638. <Combo id="chk_opnigt" taborder="12" position="absolute 148 24 264 44" index="-1" innerdataset="@ds_init_M0639" codecolumn="cdid" datacolumn="cdnm" anchor="default"/>
  639. </Layout>
  640. </Layouts>
  641. </Div>
  642. <Div id="grp_changeangio" taborder="13" visible="false" position="absolute 1516 40 1751 147" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  643. <Layouts>
  644. <Layout>
  645. <Button id="button5" taborder="6" text="취소" onlbuttonup="button5_onlbuttonup" class="btn4" position="absolute 174 80 230 100" onclick="button5_onclick" anchor="default" positiontype="position"/>
  646. <Button id="button6" taborder="7" text="확인" onlbuttonup="button6_onlbuttonup" class="btn4" position="absolute 114 80 170 100" onclick="button6_onclick" anchor="default" positiontype="position"/>
  647. <Static id="caption00" text="Angio 유형변경" position="absolute 3 8 120 28" anchor="default" class="tit_2"/>
  648. <TextArea id="txt_isol" taborder="11" position="absolute 3 27 230 78" anchor="default"/>
  649. <Static id="caption18" text="Angio유형" class="cell_1" position="absolute 4 53 68 77" anchor="default"/>
  650. <Combo id="cmb_angio" taborder="8" class="combo_search" position="absolute 71 55 226 75" anchor="default" positiontype="position"/>
  651. <CheckBox id="chk_angioer" taborder="9" text="응급여부" truevalue="Y" position="absolute 71 31 143 51" anchor="default" falsevalue="N" positiontype="position"/>
  652. <CheckBox id="chk_angionigt" taborder="10" text="심야여부" truevalue="Y" position="absolute 148 31 220 51" anchor="default" falsevalue="N" positiontype="position"/>
  653. <Static id="caption01" text="여부" class="cell_1" position="absolute 4 28 68 52" anchor="default"/>
  654. </Layout>
  655. </Layouts>
  656. </Div>
  657. <Div id="grd_selectgsord" taborder="15" visible="false" position="absolute 1516 616 1751 715" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  658. <Layouts>
  659. <Layout>
  660. <Button id="button9" taborder="5" text="취소" onlbuttonup="button9_onlbuttonup" class="btn4" position="absolute 171 73 227 93" onclick="button9_onclick" anchor="default" positiontype="position"/>
  661. <Button id="button10" taborder="6" text="확인" onlbuttonup="button10_onlbuttonup" class="btn4" position="absolute 113 73 169 93" onclick="button10_onclick" anchor="default" positiontype="position"/>
  662. <Static id="caption00" text="외과가산의사변경" position="absolute 2 1 135 21" anchor="default" class="tit_2"/>
  663. <TextArea id="txt_isol" taborder="9" position="absolute 1 19 228 70" anchor="default"/>
  664. <Static id="caption01" text="진료과" class="cell_1" position="absolute 2 20 66 44" anchor="default"/>
  665. <Static id="caption18" text="의사명" class="cell_1" position="absolute 2 45 66 69" anchor="default"/>
  666. <Combo id="cmb_gsdeptcd" taborder="7" class="combo_search" position="absolute 69 22 224 42" anchor="default" oncloseup="grd_selectgsord_cmb_gsdeptcd_oncloseup" innerdataset="@ds_data_req_deptlist" codecolumn="deptcd" datacolumn="depthngnm" onitemchanged="grd_selectgsord_cmb_gsdeptcd_onitemchanged" positiontype="position"/>
  667. <Combo id="cmb_gsatdoc" taborder="8" class="combo_search" position="absolute 69 47 224 67" anchor="default" innerdataset="ds_init_cmb_orddrid" codecolumn="atdoctid" datacolumn="atdocthngnm" positiontype="position"/>
  668. </Layout>
  669. </Layouts>
  670. </Div>
  671. <Div id="grp_judgadjtresncd" taborder="16" visible="false" position="absolute 1255 301 1511 713" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  672. <Layouts>
  673. <Layout>
  674. <Grid id="datagrid2" class="datagrid2" taborder="4" useinputpanel="false" onkeydown="datagrid2_onkeydown" position="absolute 2 23 251 386" binddataset="ds_grid_datagrid2" ondbclick="datagrid2_ondbclick" anchor="default" cellsizingtype="col" positiontype="position">
  675. <Formats>
  676. <Format id="default">
  677. <Columns>
  678. <Column size="51"/>
  679. <Column size="181"/>
  680. </Columns>
  681. <Rows>
  682. <row size="24" band="head"/>
  683. <row size="24"/>
  684. </Rows>
  685. <Band id="head">
  686. <Cell text="코드"/>
  687. <Cell col="1" text="사유명칭"/>
  688. </Band>
  689. <Band id="body">
  690. <Cell text="bind:cdid"/>
  691. <Cell col="1" text="bind:cdnm"/>
  692. <Cell col="2"/>
  693. </Band>
  694. </Format>
  695. </Formats>
  696. </Grid>
  697. <Button id="button12" taborder="5" text="취소" onlbuttonup="button12_onlbuttonup" class="btn4" position="absolute 195 387 251 407" onclick="button12_onclick" anchor="default" positiontype="position"/>
  698. <Button id="button13" taborder="6" text="확인" onlbuttonup="button13_onlbuttonup" class="btn4" position="absolute 136 387 192 407" onclick="button13_onclick" anchor="default" positiontype="position"/>
  699. <Static id="caption19" text="수정사유" class="tit_2" position="absolute 2 4 198 20" anchor="default"/>
  700. </Layout>
  701. </Layouts>
  702. </Div>
  703. <Div id="grp_changeinsukind" taborder="11" visible="false" position="absolute 1778 426 2012 628" positiontype="position" style="background:#ffffffff;border:1 solid #808080ff ;">
  704. <Layouts>
  705. <Layout>
  706. <Grid id="grd_insuhistory" class="datagrid2" taborder="4" useinputpanel="false" position="absolute 2 21 228 174" binddataset="ds_grid_grd_insuhistory" anchor="all" positiontype="position">
  707. <Formats>
  708. <Format id="default">
  709. <Columns>
  710. <Column size="0"/>
  711. <Column size="55"/>
  712. <Column size="0"/>
  713. <Column size="55"/>
  714. <Column size="0"/>
  715. <Column size="35"/>
  716. <Column size="35"/>
  717. <Column size="80"/>
  718. <Column size="80"/>
  719. <Column size="0"/>
  720. <Column size="0"/>
  721. <Column size="0"/>
  722. <Column size="0"/>
  723. <Column size="0"/>
  724. <Column size="0"/>
  725. <Column size="0"/>
  726. <Column size="0"/>
  727. <Column size="0"/>
  728. <Column size="0"/>
  729. <Column size="0"/>
  730. <Column size="0"/>
  731. <Column size="0"/>
  732. <Column size="0"/>
  733. <Column size="0"/>
  734. <Column size="0"/>
  735. <Column size="0"/>
  736. <Column size="0"/>
  737. <Column size="0"/>
  738. <Column size="0"/>
  739. </Columns>
  740. <Rows>
  741. <Row size="30" band="head"/>
  742. <Row size="24"/>
  743. </Rows>
  744. <Band id="head">
  745. <Cell text="orddeptcd"/>
  746. <Cell col="1" text="유형"/>
  747. <Cell col="2" text="insukindnm"/>
  748. <Cell col="3" text="보조"/>
  749. <Cell col="4" text="suppkindnm"/>
  750. <Cell col="5" text="M"/>
  751. <Cell col="6" text="희귀&#13;&#10;난치"/>
  752. <Cell col="7" text="개시일"/>
  753. <Cell col="8" text="종료일"/>
  754. <Cell col="9" text="cmpynm"/>
  755. <Cell col="10" text="judgmdlid"/>
  756. <Cell col="11" text="judgmdlidnm"/>
  757. <Cell col="12" text="indaycnt"/>
  758. <Cell col="13" text="midclamyn"/>
  759. <Cell col="14" text="clamym"/>
  760. <Cell col="15" text="clamdg"/>
  761. <Cell col="16" text="rare"/>
  762. <Cell col="17" text="cretno"/>
  763. <Cell col="18" text="seqno"/>
  764. <Cell col="19" text="pid"/>
  765. <Cell col="20" text="indd"/>
  766. <Cell col="21" text="flag"/>
  767. <Cell col="22" text="disccd"/>
  768. <Cell col="23" text="maxynm"/>
  769. <Cell col="24" text="maxyns"/>
  770. <Cell col="25" text="indschacptstat"/>
  771. <Cell col="26" text="dschjudgprcsstat"/>
  772. <Cell col="27" text="instcd"/>
  773. <Cell col="28" text="dschnotidt"/>
  774. </Band>
  775. <Band id="body">
  776. <Cell text="bind:orddeptcd"/>
  777. <Cell col="1" text="bind:insukind"/>
  778. <Cell col="2" text="bind:insukindnm"/>
  779. <Cell col="3" text="bind:suppkind"/>
  780. <Cell col="4" text="bind:suppkindnm"/>
  781. <Cell col="5" text="bind:mskind"/>
  782. <Cell col="6" text="bind:rareobstflag"/>
  783. <Cell col="7" text="bind:fromdd"/>
  784. <Cell col="8" text="bind:todd"/>
  785. <Cell col="9" text="bind:cmpynm"/>
  786. <Cell col="10" text="bind:judgmdlid"/>
  787. <Cell col="11" text="bind:judgmdlidnm"/>
  788. <Cell col="12" text="bind:indaycnt"/>
  789. <Cell col="13" text="bind:midclamyn"/>
  790. <Cell col="14" text="bind:clamym"/>
  791. <Cell col="15" text="bind:clamdg"/>
  792. <Cell col="16" text="bind:rare"/>
  793. <Cell col="17" text="bind:cretno"/>
  794. <Cell col="18" text="bind:seqno"/>
  795. <Cell col="19" text="bind:pid"/>
  796. <Cell col="20" text="bind:indd"/>
  797. <Cell col="21" text="bind:flag"/>
  798. <Cell col="22" text="bind:disccd"/>
  799. <Cell col="23" text="bind:maxynm"/>
  800. <Cell col="24" text="bind:maxyns"/>
  801. <Cell col="25" text="bind:indschacptstat"/>
  802. <Cell col="26" text="bind:dschjudgprcsstat"/>
  803. <Cell col="27" text="bind:instcd"/>
  804. <Cell col="28" text="bind:dschnotidt"/>
  805. </Band>
  806. </Format>
  807. </Formats>
  808. </Grid>
  809. <Button id="btn_closechangeinsukindt" taborder="5" text="취소" onlbuttonup="btn_closechangeinsukindt_onlbuttonup" class="btn4" position="absolute 173 177 229 197" onclick="btn_closechangeinsukindt_onclick" anchor="right bottom" positiontype="position"/>
  810. <Button id="btn_changeinsukind" taborder="6" text="변경" onlbuttonup="btn_changeinsukind_onlbuttonup" class="btn4" position="absolute 113 177 169 197" onclick="btn_changeinsukind_onclick" anchor="right bottom" positiontype="position"/>
  811. <Static id="caption00" text="처방유형 변경(기왕증) 처리" position="absolute 2 2 207 22" anchor="default" class="tit_2"/>
  812. </Layout>
  813. </Layouts>
  814. </Div>
  815. <Button id="btn_save" taborder="4" text="저장" position="absolute 1139 686 1191 706" class="btn4" positiontype="position" onclick="btn_save_onclick" anchor="right bottom"/>
  816. <Button id="btn_rsltsrch" taborder="6" text="결과조회" class="btn2" position="absolute 1111 96 1179 116" positiontype="position" onclick="btn_rsltsrch_onclick" anchor="top right"/>
  817. <Button id="btn_judgchng" taborder="7" text="심사변경" class="btn2" position="absolute 1180 96 1248 116" positiontype="position" onclick="btn_judgchng_onclick" anchor="top right"/>
  818. <Div id="grp_changeop00" taborder="26" visible="false" position="absolute 1247 80 1570 219" style="background:#ffffffff;border:1 solid #808080ff ;">
  819. <Layouts>
  820. <Layout>
  821. <TextArea id="txt_isol" taborder="11" oneditclick="grp_changeop_txt_isol_oneditclick" position="absolute 2 21 318 108" anchor="default"/>
  822. <Button id="button1" taborder="12" text="취소" onlbuttonup="button1_onlbuttonup" class="btn4" position="absolute 262 109 318 129" anchor="default" onclick="grp_changeop00_button1_onclick"/>
  823. <Button id="button2" taborder="13" text="확인" onlbuttonup="button2_onlbuttonup" class="btn4" position="absolute 202 109 258 129" anchor="default" onclick="grp_changeop00_button2_onclick"/>
  824. <Static id="caption00" text="초음파 특정내역 변경" position="absolute 2 4 150 24" anchor="default" class="tit_2"/>
  825. <Static id="caption18" text="관련행위" class="cell_1" position="absolute 7 53 71 77" anchor="default"/>
  826. <Static id="caption01" text="부위" class="cell_1" position="absolute 7 25 71 49" anchor="default"/>
  827. <Combo id="cmb_drugmthdspccd" taborder="14" class="combo_search" position="absolute 73 54 310 74" anchor="default" innerdataset="@ds_drugmthdspccdlist" datacolumn="cdnm" codecolumn="cdid"/>
  828. <Static id="caption02" text="기타사유" class="cell_1" position="absolute 7 80 71 104" anchor="default"/>
  829. <Combo id="cmb_rehbprcpcurepartcd" taborder="15" class="combo_search" position="absolute 73 27 310 47" anchor="default" innerdataset="@ds_init_drugspd" codecolumn="cdid" datacolumn="cdnm"/>
  830. <Edit id="ipt_exptmthdfact" taborder="16" position="absolute 73 81 312 101" anchor="default"/>
  831. </Layout>
  832. </Layouts>
  833. </Div>
  834. <Static id="caption6" text="입원세부계산내역서" class="tit_1" position="absolute 0 0 183 23"/>
  835. <Static id="caption00" onclick="caption43_onclick" position="absolute 683 687 703 707" anchor="left bottom" style="background:#ff5a5aff;"/>
  836. <Static id="caption01" text="단가오류" onclick="caption44_onclick" position="absolute 705 687 783 707" anchor="left bottom"/>
  837. <Button id="btn_EnvSetup00" taborder="27" text="환경초기화" class="btn2" position="absolute 986 686 1074 706" anchor="right bottom" onclick="btn_EnvSetup00_onclick"/>
  838. <Div id="grp_exectm" taborder="28" style="background:#ffffffff;border:1 solid #808080ff ;" visible="false" position="absolute 1805 130 2148 204">
  839. <Layouts>
  840. <Layout>
  841. <Static id="caption00" text="시행시간 변경" class="tit_2" position="absolute 2 2 111 22" anchor="default"/>
  842. <TextArea id="txt_isol" taborder="0" position="absolute 2 21 337 47" anchor="default"/>
  843. <Static id="caption18" text="시행시간" class="cell_1" position="absolute 3 22 67 46" anchor="default"/>
  844. <Static id="caption35" text="시" position="absolute 248 22 268 47" anchor="default"/>
  845. <Static id="caption36" text="분" position="absolute 320 22 340 47" anchor="default"/>
  846. <Button id="btn_canlexecdd" taborder="1" text="취소" onlbuttonup="btn_canlexecdd_onlbuttonup" class="btn4" position="absolute 281 50 337 70" anchor="default" onclick="grp_exectm_btn_canlexecdd_onclick"/>
  847. <Button id="btn_chngexectm" taborder="5" text="변경" class="btn4" position="absolute 221 50 277 70" anchor="default" onclick="grp_exectm_btn_chngexectm_onclick"/>
  848. <Calendar id="ipt_chngdd" taborder="2" autoselect="true" autoskip="true" class="input_search" position="absolute 70 24 185 44" anchor="default" enable="false" visible="true"/>
  849. <MaskEdit id="cmb_chnghh" taborder="3" mask="99" trimtype="both" autoskip="true" onsetfocus="grp_execdd_cmb_chnghh_onsetfocus" position="absolute 214 24 246 44" anchor="default"/>
  850. <MaskEdit id="cmb_ipt_chngmn" taborder="4" mask="99" autoskip="true" onsetfocus="grp_execdd_cmb_chnghh_onsetfocus" position="absolute 279 25 313 45" anchor="default"/>
  851. <CheckBox id="chk_afterchk2" taborder="6" text="실시일시 사후심사 전달" position="absolute 66 50 214 70" falsevalue="N" truevalue="Y" value="N" visible="false" onchanged="CheckBox_onchanged"/>
  852. </Layout>
  853. </Layouts>
  854. </Div>
  855. <Grid id="grd_clcjlist" taborder="29" binddataset="ds_grd_clcjlist" autoenter="select" useinputpanel="false" cellsizingtype="col" cellmovingtype="col" onrbuttondown="swt_spclmemo_case_spclspec_grd_clcjlist_onrbuttondown" onkeydown="swt_spclmemo_case_spclspec_grd_clcjlist_onkeydown" oncelldblclick="swt_spclmemo_case_spclspec_grd_clcjlist_oncelldblclick" ondropdown="swt_spclmemo_case_spclspec_grd_clcjlist_ondropdown" oncloseup="swt_spclmemo_case_spclspec_grd_clcjlist_oncloseup" position="absolute 330 281 889 420" anchor="all" tooltiptype="hover" visible="false">
  856. <Formats>
  857. <Format id="default">
  858. <Columns>
  859. <Column size="23"/>
  860. <Column size="30"/>
  861. <Column size="65"/>
  862. <Column size="65"/>
  863. <Column size="140"/>
  864. <Column size="155"/>
  865. <Column size="56"/>
  866. <Column size="235"/>
  867. <Column size="0"/>
  868. <Column size="0"/>
  869. <Column size="0"/>
  870. <Column size="0"/>
  871. <Column size="0"/>
  872. <Column size="0"/>
  873. <Column size="0"/>
  874. <Column size="0"/>
  875. </Columns>
  876. <Rows>
  877. <Row size="24" band="head"/>
  878. <Row size="24"/>
  879. </Rows>
  880. <Band id="head">
  881. <Cell/>
  882. <Cell col="1" text="구분"/>
  883. <Cell col="2" text="수가코드"/>
  884. <Cell col="3" text="EDI코드"/>
  885. <Cell col="4" text="구분코드"/>
  886. <Cell col="5" text="내역"/>
  887. <Cell col="6" text="형식"/>
  888. <Cell col="7" text="상세설명"/>
  889. <Cell col="8" text="상태"/>
  890. <Cell col="9"/>
  891. <Cell col="10"/>
  892. <Cell col="11"/>
  893. <Cell col="12"/>
  894. <Cell col="13"/>
  895. <Cell col="14"/>
  896. <Cell col="15"/>
  897. </Band>
  898. <Band id="body">
  899. <Cell celltype="head"/>
  900. <Cell col="1" text="bind:unitflag"/>
  901. <Cell col="2" style="align:left middle;" text="bind:calcscorcd"/>
  902. <Cell col="3" displaytype="text" style="align:left middle;padding:0 5 0 5;" text="bind:edicd"/>
  903. <Cell col="4" style="padding:0 5 0 5;" text="bind:spclcd" id="col01"/>
  904. <Cell col="5" displaytype="text" style="align:left top;padding:0 5 0 5;" text="bind:spclspec" wordwrap="word" editimemode="hangul" editautoselect="true"/>
  905. <Cell col="6" style="padding:0 5 0 5;" text="bind:remfact"/>
  906. <Cell col="7" style="align:left top;padding:0 5 0 5;" text="bind:detldesc" wordwrap="word"/>
  907. <Cell col="8" text="bind:status"/>
  908. <Cell col="9" text="bind:pid"/>
  909. <Cell col="10" text="bind:indd"/>
  910. <Cell col="11" text="bind:cretno"/>
  911. <Cell col="12" text="bind:fromdd"/>
  912. <Cell col="13" text="bind:mskind"/>
  913. <Cell col="14" text="bind:spclmemoflag"/>
  914. <Cell col="15" text="bind:seqno"/>
  915. </Band>
  916. </Format>
  917. </Formats>
  918. </Grid>
  919. </Layout>
  920. </Layouts>
  921. <Objects>
  922. <Dataset id="ds_init_ordfilflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  923. <ColumnInfo>
  924. <Column id="label" type="STRING" size="256"/>
  925. <Column id="value" type="STRING" size="256"/>
  926. <Column id="font" type="STRING" size="256"/>
  927. <Column id="codecolumn" type="STRING" size="256"/>
  928. </ColumnInfo>
  929. <Rows>
  930. <Row>
  931. <Col id="label">전체</Col>
  932. <Col id="value">-</Col>
  933. </Row>
  934. <Row>
  935. <Col id="label">진찰</Col>
  936. <Col id="value">01</Col>
  937. </Row>
  938. <Row>
  939. <Col id="label">입원</Col>
  940. <Col id="value">02</Col>
  941. </Row>
  942. <Row>
  943. <Col id="label">식대</Col>
  944. <Col id="value">021011</Col>
  945. </Row>
  946. <Row>
  947. <Col id="label">투약</Col>
  948. <Col id="value">03</Col>
  949. </Row>
  950. <Row>
  951. <Col id="label">주사</Col>
  952. <Col id="value">04</Col>
  953. </Row>
  954. <Row>
  955. <Col id="label">마취</Col>
  956. <Col id="value">05</Col>
  957. </Row>
  958. <Row>
  959. <Col id="label">이학</Col>
  960. <Col id="value">06</Col>
  961. </Row>
  962. <Row>
  963. <Col id="label">정신</Col>
  964. <Col id="value">07</Col>
  965. </Row>
  966. <Row>
  967. <Col id="label">수술</Col>
  968. <Col id="value">08</Col>
  969. </Row>
  970. <Row>
  971. <Col id="label">검사</Col>
  972. <Col id="value">09</Col>
  973. </Row>
  974. <Row>
  975. <Col id="label">방사선</Col>
  976. <Col id="value">10</Col>
  977. </Row>
  978. <Row>
  979. <Col id="label">특수</Col>
  980. <Col id="value">SS</Col>
  981. </Row>
  982. <Row>
  983. <Col id="label">원외</Col>
  984. <Col id="value">99</Col>
  985. </Row>
  986. <Row>
  987. <Col id="label">선별</Col>
  988. <Col id="value">AA' || ediitem1=='BB</Col>
  989. </Row>
  990. </Rows>
  991. </Dataset>
  992. <Dataset id="ds_grid_grd_ordlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grid_grd_ordlist_oncolumnchanged">
  993. <ColumnInfo>
  994. <Column id="seq" type="STRING" size="256"/>
  995. <Column id="ordtype" type="STRING" size="256"/>
  996. <Column id="ediitem1" type="STRING" size="256"/>
  997. <Column id="ediitem2" type="STRING" size="256"/>
  998. <Column id="orddd" type="STRING" size="256"/>
  999. <Column id="rgstdt" type="STRING" size="256"/>
  1000. <Column id="execdd" type="STRING" size="256"/>
  1001. <Column id="newexecdd" type="STRING" size="256"/>
  1002. <Column id="exectm" type="STRING" size="256"/>
  1003. <Column id="execprcpstatcd" type="STRING" size="256"/>
  1004. <Column id="execstat" type="STRING" size="256"/>
  1005. <Column id="grupcalcscorcls" type="STRING" size="256"/>
  1006. <Column id="snglcalcscorcls" type="STRING" size="256"/>
  1007. <Column id="grupearncls" type="STRING" size="256"/>
  1008. <Column id="snglearncls" type="STRING" size="256"/>
  1009. <Column id="grupflag" type="STRING" size="256"/>
  1010. <Column id="grupcalcscorcd" type="STRING" size="256"/>
  1011. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  1012. <Column id="edicd" type="STRING" size="256"/>
  1013. <Column id="estmcls" type="STRING" size="256"/>
  1014. <Column id="estmmncd" type="STRING" size="256"/>
  1015. <Column id="estmmnnm" type="STRING" size="256"/>
  1016. <Column id="estmcd" type="STRING" size="256"/>
  1017. <Column id="hngnm" type="STRING" size="256"/>
  1018. <Column id="calcpayflag" type="STRING" size="256"/>
  1019. <Column id="freeflag" type="STRING" size="256"/>
  1020. <Column id="appunitcost" type="STRING" size="256"/>
  1021. <Column id="calcqty" type="STRING" size="256"/>
  1022. <Column id="calctims" type="STRING" size="256"/>
  1023. <Column id="calcdays" type="STRING" size="256"/>
  1024. <Column id="daydrugqty" type="STRING" size="256"/>
  1025. <Column id="calcamt" type="STRING" size="256"/>
  1026. <Column id="unithospaddamt" type="STRING" size="256"/>
  1027. <Column id="unitspecamt" type="STRING" size="256"/>
  1028. <Column id="unitaddamt" type="STRING" size="256"/>
  1029. <Column id="totordamt" type="STRING" size="256"/>
  1030. <Column id="ownbamt" type="STRING" size="256"/>
  1031. <Column id="hospaddamt" type="STRING" size="256"/>
  1032. <Column id="specamt" type="STRING" size="256"/>
  1033. <Column id="estmamt" type="STRING" size="256"/>
  1034. <Column id="orddeptcd" type="STRING" size="256"/>
  1035. <Column id="orddeptnm" type="STRING" size="256"/>
  1036. <Column id="fstrgstrid" type="STRING" size="256"/>
  1037. <Column id="lastupdtrid" type="STRING" size="256"/>
  1038. <Column id="lastupdtdt" type="STRING" size="256"/>
  1039. <Column id="ordnm" type="STRING" size="256"/>
  1040. <Column id="judgadjtresncd" type="STRING" size="256"/>
  1041. <Column id="tootfact" type="STRING" size="256"/>
  1042. <Column id="judgadjtresncdnm" type="STRING" size="256"/>
  1043. <Column id="edicdflag" type="STRING" size="256"/>
  1044. <Column id="ediunitcost" type="STRING" size="256"/>
  1045. <Column id="updtdd" type="STRING" size="256"/>
  1046. <Column id="pid" type="STRING" size="256"/>
  1047. <Column id="indd" type="STRING" size="256"/>
  1048. <Column id="cretno" type="STRING" size="256"/>
  1049. <Column id="calcseqno" type="STRING" size="256"/>
  1050. <Column id="calcscorseqno" type="STRING" size="256"/>
  1051. <Column id="cnfmcd" type="STRING" size="256"/>
  1052. <Column id="cpflag" type="STRING" size="256"/>
  1053. <Column id="portprcpflag" type="STRING" size="256"/>
  1054. <Column id="anamneflag" type="STRING" size="256"/>
  1055. <Column id="mskind" type="STRING" size="256"/>
  1056. <Column id="oldmskind" type="STRING" size="256"/>
  1057. <Column id="probordyn" type="STRING" size="256"/>
  1058. <Column id="spcljudgyn" type="STRING" size="256"/>
  1059. <Column id="unitspecyn" type="STRING" size="256"/>
  1060. <Column id="ordcalcflag" type="STRING" size="256"/>
  1061. <Column id="grupsnglflag" type="STRING" size="256"/>
  1062. <Column id="prcpdd" type="STRING" size="256"/>
  1063. <Column id="prcpno" type="STRING" size="256"/>
  1064. <Column id="prcphistno" type="STRING" size="256"/>
  1065. <Column id="execprcpno" type="STRING" size="256"/>
  1066. <Column id="calcscorpnt" type="STRING" size="256"/>
  1067. <Column id="estmpnt" type="STRING" size="256"/>
  1068. <Column id="exitprvntdrugamt" type="STRING" size="256"/>
  1069. <Column id="exitprvntdrugyn" type="STRING" size="256"/>
  1070. <Column id="ordqty" type="STRING" size="256"/>
  1071. <Column id="ordtims" type="STRING" size="256"/>
  1072. <Column id="orddays" type="STRING" size="256"/>
  1073. <Column id="payamt" type="STRING" size="256"/>
  1074. <Column id="payinsubamt" type="STRING" size="256"/>
  1075. <Column id="payownbamt" type="STRING" size="256"/>
  1076. <Column id="payownbrate" type="STRING" size="256"/>
  1077. <Column id="ansttm" type="STRING" size="256"/>
  1078. <Column id="pntunitcost" type="STRING" size="256"/>
  1079. <Column id="allownbamt" type="STRING" size="256"/>
  1080. <Column id="nopyamt" type="STRING" size="256"/>
  1081. <Column id="opflag" type="STRING" size="256"/>
  1082. <Column id="matractflag" type="STRING" size="256"/>
  1083. <Column id="grupseqno" type="STRING" size="256"/>
  1084. <Column id="dschdrugflag" type="STRING" size="256"/>
  1085. <Column id="specordyn" type="STRING" size="256"/>
  1086. <Column id="insukind" type="STRING" size="256"/>
  1087. <Column id="suppkind" type="STRING" size="256"/>
  1088. <Column id="rsrvdd" type="STRING" size="256"/>
  1089. <Column id="pynpy" type="STRING" size="256"/>
  1090. <Column id="earncls1" type="STRING" size="256"/>
  1091. <Column id="earncls2" type="STRING" size="256"/>
  1092. <Column id="earncls3" type="STRING" size="256"/>
  1093. <Column id="editflag" type="STRING" size="256"/>
  1094. <Column id="aftercretno" type="STRING" size="256"/>
  1095. <Column id="execrid" type="STRING" size="256"/>
  1096. <Column id="specdrid" type="STRING" size="256"/>
  1097. <Column id="chkflag" type="STRING" size="256"/>
  1098. <Column id="payflagyn" type="STRING" size="256"/>
  1099. <Column id="ordchangeyn" type="STRING" size="256"/>
  1100. <Column id="spcordyn" type="STRING" size="256"/>
  1101. <Column id="probordchangeyn" type="STRING" size="256"/>
  1102. <Column id="estmyn" type="STRING" size="256"/>
  1103. <Column id="nochargeyn" type="STRING" size="256"/>
  1104. <Column id="execchangeyn" type="STRING" size="256"/>
  1105. <Column id="opansyn" type="STRING" size="256"/>
  1106. <Column id="angioyn" type="STRING" size="256"/>
  1107. <Column id="gsorddryn" type="STRING" size="256"/>
  1108. <Column id="ordinptflag" type="STRING" size="256"/>
  1109. <Column id="bfjudgadjtresncd" type="STRING" size="256"/>
  1110. <Column id="pay100" type="STRING" size="256"/>
  1111. <Column id="opprcpyn" type="STRING" size="256"/>
  1112. <Column id="execdeptprcpyn" type="STRING" size="256"/>
  1113. <Column id="specaddflag" type="STRING" size="256"/>
  1114. <Column id="lowdrugresncd" type="STRING" size="256"/>
  1115. <Column id="cretyn" type="STRING" size="256"/>
  1116. <Column id="ordaddinptflag" type="STRING" size="256"/>
  1117. <Column id="opansflagcd" type="STRING" size="256"/>
  1118. <Column id="nigtprcpflag" type="STRING" size="256"/>
  1119. <Column id="erprcpflag" type="STRING" size="256"/>
  1120. <Column id="angioflagcd" type="STRING" size="256"/>
  1121. <Column id="hosinhosoutflag" type="STRING" size="256"/>
  1122. <Column id="gsorddr" type="STRING" size="256"/>
  1123. <Column id="gsestmmncd" type="STRING" size="256"/>
  1124. <Column id="calcflag" type="STRING" size="256"/>
  1125. <Column id="druglimitamt" type="STRING" size="256"/>
  1126. <Column id="limitdiffamt" type="STRING" size="256"/>
  1127. <Column id="prcpmixno" type="STRING" size="256"/>
  1128. <Column id="drugmthcd" type="STRING" size="256"/>
  1129. <Column id="sortexecdd" type="STRING" size="256"/>
  1130. <Column id="clinccmtcnts" type="STRING" size="256"/>
  1131. <Column id="drugmthdspccd" type="STRING" size="256"/>
  1132. <Column id="spccd" type="STRING" size="256"/>
  1133. <Column id="spcnm" type="STRING" size="256"/>
  1134. <Column id="incls" type="STRING" size="256"/>
  1135. <Column id="probordresn" type="STRING" size="256"/>
  1136. <Column id="execdeptnm" type="STRING" size="256"/>
  1137. <Column id="prcpcd" type="STRING" size="256"/>
  1138. <Column id="insupaychangeyn" type="STRING" size="256"/>
  1139. <Column id="prnprcpflag" type="STRING" size="256"/>
  1140. <Column id="execdeptcd" type="STRING" size="256"/>
  1141. <Column id="paydiscamt" type="STRING" size="256"/>
  1142. <Column id="estmmeancd" type="STRING" size="256"/>
  1143. <Column id="direccd" type="STRING" size="256"/>
  1144. <Column id="nopydiscamt" type="STRING" size="256"/>
  1145. <Column id="specdiscamt" type="STRING" size="256"/>
  1146. <Column id="hosoutexptresncd" type="STRING" size="256"/>
  1147. <Column id="bothaddyn" type="STRING" size="256"/>
  1148. <Column id="execprcpuniqno" type="STRING" size="256"/>
  1149. <Column id="proccalctype" type="STRING" size="256"/>
  1150. <Column id="drgacptflag" type="STRING" size="256"/>
  1151. <Column id="drgacptyn" type="STRING" size="256"/>
  1152. <Column id="prcpkindcd" type="STRING" size="256"/>
  1153. <Column id="rehbprcpcurepartcd" type="STRING" size="256"/>
  1154. <Column id="drugmthdspccdnm" type="STRING" size="256"/>
  1155. <Column id="exptmthdfact" type="STRING" size="256"/>
  1156. <Column id="drugmthyn" type="STRING" size="256"/>
  1157. <Column id="clamkeylockn" type="STRING" size="256"/>
  1158. <Column id="pordarcptyn" type="STRING" size="256"/>
  1159. </ColumnInfo>
  1160. </Dataset>
  1161. <FilteredDataset id="fds_grid_grd_ordlist" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_grid_grd_ordlist" canrowposchange="fds_grid_grd_ordlist_canrowposchange" onrowsetchanged="fds_grid_grd_ordlist_onrowsetchanged"/>
  1162. <Dataset id="ds_rslt_sppiz00600" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1163. <Dataset id="ds_cond_grd_ordlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1164. <ColumnInfo>
  1165. <Column id="status" type="STRING" size="256" sumtext="처리구분"/>
  1166. <Column id="probordyn" type="STRING" size="256" sumtext="문제처방여부"/>
  1167. <Column id="spcljudgyn" type="STRING" size="256" sumtext="선별심사여부"/>
  1168. <Column id="unitspecyn" type="STRING" size="256" sumtext="선택진료여부"/>
  1169. <Column id="seq" type="STRING" size="256" sumtext="순번"/>
  1170. <Column id="ordtype" type="STRING" size="256" sumtext="I/O구분"/>
  1171. <Column id="ediitem1" type="STRING" size="256" sumtext="보험대분류"/>
  1172. <Column id="ediitem2" type="STRING" size="256" sumtext="보험중분류"/>
  1173. <Column id="orddd" type="STRING" size="256" sumtext="처방일자"/>
  1174. <Column id="execdd" type="STRING" size="256" sumtext="실시일자"/>
  1175. <Column id="newexecdd" type="STRING" size="256" sumtext="변경후실시일자"/>
  1176. <Column id="execrid" type="STRING" size="256" sumtext="실시자"/>
  1177. <Column id="execprcpstatcd" type="STRING" size="256" sumtext="처방상태"/>
  1178. <Column id="grupcalcscorcls" type="STRING" size="256" sumtext="그룹수가분류"/>
  1179. <Column id="snglcalcscorcls" type="STRING" size="256" sumtext="싱글수가분류"/>
  1180. <Column id="grupearncls" type="STRING" size="256" sumtext="그룹수가수익분류"/>
  1181. <Column id="snglearncls" type="STRING" size="256" sumtext="싱글수가수익분류"/>
  1182. <Column id="grupcalcscorcd" type="STRING" size="256" sumtext="그룹코드"/>
  1183. <Column id="snglcalcscorcd" type="STRING" size="256" sumtext="싱글코드"/>
  1184. <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
  1185. <Column id="estmcls" type="STRING" size="256" sumtext="산정분류"/>
  1186. <Column id="estmmeancd" type="STRING" size="256" sumtext="산정의미"/>
  1187. <Column id="estmcd" type="STRING" size="256" sumtext="산정코드"/>
  1188. <Column id="hngnm" type="STRING" size="256" sumtext="한글명"/>
  1189. <Column id="calcpayflag" type="STRING" size="256" sumtext="계산급여구분"/>
  1190. <Column id="matractflag" type="STRING" size="256" sumtext="재료행위구분"/>
  1191. <Column id="freeflag" type="STRING" size="256" sumtext="Freeflag"/>
  1192. <Column id="ansttm" type="STRING" size="256" sumtext="마취시간"/>
  1193. <Column id="direccd" type="STRING" size="256" sumtext="용법"/>
  1194. <Column id="appunitcost" type="BIGDECIMAL" size="256" sumtext="단가"/>
  1195. <Column id="calcqty" type="BIGDECIMAL" size="256" sumtext="수량"/>
  1196. <Column id="calctims" type="BIGDECIMAL" size="256" sumtext="횟수"/>
  1197. <Column id="calcdays" type="INT" size="256" sumtext="일수"/>
  1198. <Column id="calcamt" type="BIGDECIMAL" size="256" sumtext="금액"/>
  1199. <Column id="unithospaddamt" type="BIGDECIMAL" size="256" sumtext="병원가산단가"/>
  1200. <Column id="specordyn" type="STRING" size="256" sumtext="선택진료여부"/>
  1201. <Column id="unitspecamt" type="BIGDECIMAL" size="256" sumtext="선택진료(특진)단가"/>
  1202. <Column id="unitaddamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  1203. <Column id="totordamt" type="BIGDECIMAL" size="256" sumtext="총진료비"/>
  1204. <Column id="ownbamt" type="BIGDECIMAL" size="256" sumtext="본인부담금"/>
  1205. <Column id="hospaddamt" type="BIGDECIMAL" size="256" sumtext="병원가산단가"/>
  1206. <Column id="specamt" type="BIGDECIMAL" size="256" sumtext="선택진료(특진)단가"/>
  1207. <Column id="addamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  1208. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  1209. <Column id="fstrgstrid" type="STRING" size="256" sumtext="입력자"/>
  1210. <Column id="lastupdtrid" type="STRING" size="256" sumtext="취소자자"/>
  1211. <Column id="lastupdtdt" type="STRING" size="256" sumtext="취소일시"/>
  1212. <Column id="ordnm" type="STRING" size="256" sumtext="처방명"/>
  1213. <Column id="judgadjtresncd" type="STRING" size="256" sumtext="수정사유코드"/>
  1214. <Column id="tootfact" type="STRING" size="256" sumtext="양측구분"/>
  1215. <Column id="judgadjtresncdnm" type="STRING" size="256" sumtext="수정사유명"/>
  1216. <Column id="edicdflag" type="STRING" size="256" sumtext="edicdflag"/>
  1217. <Column id="ediunitcost" type="BIGDECIMAL" size="256" sumtext="edi단가"/>
  1218. <Column id="updtdd" type="STRING" size="256" sumtext="코드적용일자"/>
  1219. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  1220. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1221. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  1222. <Column id="calcseqno" type="INT" size="256" sumtext="계산순번"/>
  1223. <Column id="calcscorseqno" type="INT" size="256" sumtext="수가별 일련번호"/>
  1224. <Column id="cnfmcd" type="STRING" size="256" sumtext="확인코드"/>
  1225. <Column id="cpflag" type="STRING" size="256" sumtext="CP처방여부"/>
  1226. <Column id="prnprcpflag" type="STRING" size="256" sumtext="PRN처방여부"/>
  1227. <Column id="portprcpflag" type="STRING" size="256" sumtext="포터블처방여부"/>
  1228. <Column id="anamneflag" type="STRING" size="256" sumtext="기왕증여부(처방)"/>
  1229. <Column id="mskind" type="STRING" size="256" sumtext="주부여부"/>
  1230. <Column id="oldmskind" type="STRING" size="256" sumtext="변경전주부여부"/>
  1231. <Column id="calcscorpnt" type="BIGDECIMAL" size="256" sumtext="수가점수"/>
  1232. <Column id="estmpnt" type="BIGDECIMAL" size="256" sumtext="가산점수"/>
  1233. <Column id="estmamt" type="BIGDECIMAL" size="256" sumtext="가산금액"/>
  1234. <Column id="exitprvntdrugyn" type="STRING" size="256" sumtext="퇴장방지여부"/>
  1235. <Column id="exitprvntdrugamt" type="BIGDECIMAL" size="256" sumtext="퇴장방지금액"/>
  1236. <Column id="ordqty" type="BIGDECIMAL" size="256" sumtext="처방수량"/>
  1237. <Column id="ordtims" type="BIGDECIMAL" size="256" sumtext="처방횟수"/>
  1238. <Column id="orddays" type="INT" size="256" sumtext="처방일수"/>
  1239. <Column id="pntunitcost" type="BIGDECIMAL" size="256" sumtext="점당단가"/>
  1240. <Column id="payamt" type="BIGDECIMAL" size="256" sumtext="급여총진료비"/>
  1241. <Column id="allownbamt" type="BIGDECIMAL" size="256" sumtext="전액본인총진료비"/>
  1242. <Column id="nopyamt" type="BIGDECIMAL" size="256" sumtext="비급여총진료비"/>
  1243. <Column id="payownbrate" type="BIGDECIMAL" size="256" sumtext="급여본인부담율"/>
  1244. <Column id="payownbamt" type="BIGDECIMAL" size="256" sumtext="급여본인부담액"/>
  1245. <Column id="payinsubamt" type="BIGDECIMAL" size="256" sumtext="급여보험자부담액"/>
  1246. <Column id="paydiscamt" type="BIGDECIMAL" size="256" sumtext="급여할인금액"/>
  1247. <Column id="nopydiscamt" type="BIGDECIMAL" size="256" sumtext="비급여할인금액"/>
  1248. <Column id="specdiscamt" type="BIGDECIMAL" size="256" sumtext="선택진료할인금액"/>
  1249. <Column id="hosoutexptresncd" type="STRING" size="256" sumtext="원내사유코드"/>
  1250. <Column id="opflag" type="STRING" size="256" sumtext="수술구분"/>
  1251. <Column id="bothaddyn" type="STRING" size="256" sumtext="양측구분"/>
  1252. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  1253. <Column id="suppkind" type="STRING" size="256" sumtext="보조유형"/>
  1254. <Column id="aftercretno" type="INT" size="256" sumtext="기왕증처리용생성번호"/>
  1255. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  1256. <Column id="prcpno" type="INT" size="256" sumtext="처방일련번호"/>
  1257. <Column id="prcphistno" type="INT" size="256" sumtext="이력번호"/>
  1258. <Column id="payflagyn" type="STRING" size="256" sumtext="처방급비변경여부"/>
  1259. <Column id="estmyn" type="STRING" size="256" sumtext="산정의미변경여부"/>
  1260. <Column id="spcordyn" type="STRING" size="256" sumtext="선택진료변경여부"/>
  1261. <Column id="nochargeyn" type="STRING" size="256" sumtext="NoCharge변경여부"/>
  1262. <Column id="ordchangeyn" type="STRING" size="256" sumtext="처방유형변경여부"/>
  1263. <Column id="probordchangeyn" type="STRING" size="256" sumtext="문제처방변경여부"/>
  1264. <Column id="execchangeyn" type="STRING" size="256" sumtext="시행일자변경여부"/>
  1265. <Column id="calcpayflag" type="STRING" size="256" sumtext="급비구분코드"/>
  1266. <Column id="opansflagcd" type="STRING" size="256" sumtext="수술마취구분"/>
  1267. <Column id="nigtprcpflag" type="STRING" size="256" sumtext="야간"/>
  1268. <Column id="erprcpflag" type="STRING" size="256" sumtext="응급"/>
  1269. <Column id="opansyn" type="STRING" size="256" sumtext="수술마취변경여부"/>
  1270. <Column id="angioyn" type="STRING" size="256" sumtext="angio변경여부"/>
  1271. <Column id="angioflagcd" type="STRING" size="256" sumtext="angio구분"/>
  1272. <Column id="bfjudgadjtresncd" type="STRING" size="256" sumtext="이전수정사유코드"/>
  1273. <Column id="gsorddryn" type="STRING" size="256" sumtext="외과가산의사여부"/>
  1274. <Column id="gsorddr" type="STRING" size="256" sumtext="외과가산최초등록"/>
  1275. <Column id="gsestmmncd" type="STRING" size="256" sumtext="외과가산처방확인"/>
  1276. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="처방일자의 일련번호"/>
  1277. <Column id="proccalctype" type="STRING" size="256" sumtext="수기료계산여부"/>
  1278. <Column id="drgacptflag" type="STRING" size="256" sumtext="DRG인정구분"/>
  1279. <Column id="drgacptyn" type="STRING" size="256" sumtext="DRG인정구분"/>
  1280. <Column id="prcpkindcd" type="STRING" size="256" sumtext="퇴원약적용"/>
  1281. <Column id="exptmthdfact" type="STRING" size="256" sumtext="초음파사유"/>
  1282. <Column id="rehbprcpcurepartcd" type="STRING" size="256" sumtext="치료부위"/>
  1283. <Column id="drugmthcd" type="STRING" size="256" sumtext="치료부위"/>
  1284. <Column id="drugmthyn" type="STRING" size="256" sumtext="초음파사유여부"/>
  1285. <Column id="estmmncd" type="STRING" size="256"/>
  1286. </ColumnInfo>
  1287. </Dataset>
  1288. <Dataset id="ds_grid_grd_insuhistory" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1289. <ColumnInfo>
  1290. <Column id="orddeptcd" type="STRING"/>
  1291. <Column id="insukind" type="STRING"/>
  1292. <Column id="insukindnm" type="STRING"/>
  1293. <Column id="suppkind" type="STRING"/>
  1294. <Column id="suppkindnm" type="STRING"/>
  1295. <Column id="mskind" type="STRING"/>
  1296. <Column id="fromdd" type="STRING"/>
  1297. <Column id="todd" type="STRING"/>
  1298. <Column id="cmpynm" type="STRING"/>
  1299. <Column id="judgmdlid" type="STRING"/>
  1300. <Column id="judgmdlidnm" type="STRING"/>
  1301. <Column id="indaycnt" type="STRING"/>
  1302. <Column id="midclamyn" type="STRING"/>
  1303. <Column id="clamym" type="STRING"/>
  1304. <Column id="clamdg" type="STRING"/>
  1305. <Column id="rare" type="STRING"/>
  1306. <Column id="cretno" type="STRING"/>
  1307. <Column id="seqno" type="STRING"/>
  1308. <Column id="pid" type="STRING"/>
  1309. <Column id="indd" type="STRING"/>
  1310. <Column id="todd" type="STRING"/>
  1311. <Column id="flag" type="STRING"/>
  1312. <Column id="disccd" type="STRING"/>
  1313. <Column id="maxynm" type="STRING"/>
  1314. <Column id="maxyns" type="STRING"/>
  1315. <Column id="indschacptstat" type="STRING"/>
  1316. <Column id="dschjudgprcsstat" type="STRING"/>
  1317. <Column id="instcd" type="STRING"/>
  1318. <Column id="dschnotidt" type="STRING"/>
  1319. </ColumnInfo>
  1320. </Dataset>
  1321. <Dataset id="ds_init_cmb_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1322. <ColumnInfo>
  1323. <Column id="userid" type="STRING" size="256"/>
  1324. <Column id="usernm" type="STRING" size="256"/>
  1325. </ColumnInfo>
  1326. </Dataset>
  1327. <Dataset id="ds_grid_datagrid2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1328. <ColumnInfo>
  1329. <Column id="cdid" type="STRING"/>
  1330. <Column id="cdnm" type="STRING"/>
  1331. </ColumnInfo>
  1332. </Dataset>
  1333. <Dataset id="ds_cond_req_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1334. <ColumnInfo>
  1335. <Column id="scrnid" type="STRING" size="256"/>
  1336. </ColumnInfo>
  1337. </Dataset>
  1338. <Dataset id="ds_data_req_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1339. <ColumnInfo>
  1340. <Column id="scrnid" type="STRING" size="256"/>
  1341. <Column id="compsnm" type="STRING" size="256"/>
  1342. <Column id="compscnts" type="STRING" size="256"/>
  1343. <Column id="compsrefcnts" type="STRING" size="256"/>
  1344. <Column id="compssizecnts" type="STRING" size="256"/>
  1345. </ColumnInfo>
  1346. </Dataset>
  1347. <Dataset id="ds_cond_req_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1348. <ColumnInfo>
  1349. <Column id="instcd" type="STRING" size="256"/>
  1350. </ColumnInfo>
  1351. </Dataset>
  1352. <Dataset id="ds_initZ_P0153" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1353. <ColumnInfo>
  1354. <Column id="cdid" type="STRING" size="256"/>
  1355. <Column id="cdnm" type="STRING" size="256"/>
  1356. </ColumnInfo>
  1357. </Dataset>
  1358. <Dataset id="ds_data_req_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1359. <ColumnInfo>
  1360. <Column id="deptcd" type="STRING" size="255"/>
  1361. <Column id="depthngnm" type="STRING" size="255"/>
  1362. <Column id="deptengabbr" type="STRING" size="255"/>
  1363. <Column id="reqfild" type="STRING" size="255"/>
  1364. <Column id="reqdeptno" type="STRING" size="255"/>
  1365. <Column id="depthardcd" type="STRING" size="255"/>
  1366. <Column id="insudispseq" type="BIGDECIMAL" size="255"/>
  1367. </ColumnInfo>
  1368. </Dataset>
  1369. <Dataset id="ds_cond_req_new" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1370. <ColumnInfo>
  1371. <Column id="pid" type="STRING" size="256"/>
  1372. <Column id="indd" type="STRING" size="256"/>
  1373. <Column id="mskind" type="STRING" size="256"/>
  1374. <Column id="ownbrate" type="STRING" size="256"/>
  1375. <Column id="insukindcd" type="STRING" size="256"/>
  1376. <Column id="insukind" type="STRING" size="256"/>
  1377. <Column id="suppkindcd" type="STRING" size="256"/>
  1378. <Column id="suppkind" type="STRING" size="256"/>
  1379. <Column id="fromdd" type="STRING" size="256"/>
  1380. <Column id="todd" type="STRING" size="256"/>
  1381. <Column id="orddeptcd" type="STRING" size="256"/>
  1382. <Column id="atdoc" type="STRING" size="256"/>
  1383. <Column id="grupsnglflag" type="STRING" size="256"/>
  1384. <Column id="calcscorcd" type="STRING" size="256"/>
  1385. <Column id="calcscorcdflag" type="STRING" size="256"/>
  1386. <Column id="past" type="STRING" size="256"/>
  1387. <Column id="cretno" type="STRING" size="256"/>
  1388. <Column id="srchflag" type="STRING" size="256"/>
  1389. <Column id="mig" type="STRING" size="256"/>
  1390. <Column id="anamne" type="STRING" size="256"/>
  1391. <Column id="instcd" type="STRING" size="256"/>
  1392. <Column id="choicdsrch" type="STRING" size="256"/>
  1393. <Column id="ordlist" type="STRING" size="256"/>
  1394. <Column id="judgresn" type="STRING" size="256"/>
  1395. <Column id="insufromdd" type="STRING" size="256"/>
  1396. <Column id="insutodd" type="STRING" size="256"/>
  1397. <Column id="specordyn" type="STRING" size="256"/>
  1398. <Column id="ordtype" type="STRING" size="256"/>
  1399. <Column id="brateflag" type="STRING" size="256"/>
  1400. <Column id="calcbasedd" type="STRING" size="256"/>
  1401. <Column id="age" type="STRING" size="256"/>
  1402. <Column id="cpyn" type="STRING" size="256"/>
  1403. <Column id="quickview" type="STRING" size="256"/>
  1404. <Column id="mainordfromdd" type="STRING" size="256"/>
  1405. <Column id="mainordtodd" type="STRING" size="256"/>
  1406. <Column id="execstat" type="STRING" size="256"/>
  1407. <Column id="orddd" type="STRING" size="256"/>
  1408. <Column id="grupcalcscorcd" type="STRING" size="256"/>
  1409. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  1410. <Column id="edicd" type="STRING" size="256"/>
  1411. <Column id="flag" type="STRING" size="256"/>
  1412. <Column id="scrnid" type="STRING" size="256"/>
  1413. <Column id="compsnm" type="STRING" size="256"/>
  1414. <Column id="compscnts" type="STRING" size="256"/>
  1415. <Column id="compsrefcnts" type="STRING" size="256"/>
  1416. <Column id="compssizecnts" type="STRING" size="256"/>
  1417. <Column id="estmcd" type="STRING" size="256"/>
  1418. </ColumnInfo>
  1419. <Rows>
  1420. <Row>
  1421. <Col id="pid">000391425</Col>
  1422. <Col id="indd">20130702</Col>
  1423. <Col id="mskind">M</Col>
  1424. <Col id="ownbrate">20</Col>
  1425. <Col id="insukindcd">11</Col>
  1426. <Col id="insukind">건강보험</Col>
  1427. <Col id="suppkindcd">00</Col>
  1428. <Col id="fromdd">20130702</Col>
  1429. <Col id="todd">20140411</Col>
  1430. <Col id="calcscorcd">AB100</Col>
  1431. <Col id="scrnid">SPPIJ00400</Col>
  1432. <Col id="estmcd">004</Col>
  1433. <Col id="suppkind">정상</Col>
  1434. <Col id="mainordfromdd">20130702</Col>
  1435. <Col id="mainordtodd">99991231</Col>
  1436. <Col id="insutodd">99991231</Col>
  1437. <Col id="insufromdd">20130702</Col>
  1438. <Col id="cretno">1</Col>
  1439. <Col id="instcd">53</Col>
  1440. <Col id="grupsnglflag">G</Col>
  1441. <Col id="mig">N</Col>
  1442. <Col id="choicdsrch">calcscorcd</Col>
  1443. <Col id="specordyn">Y</Col>
  1444. <Col id="ordtype">D</Col>
  1445. <Col id="brateflag">I</Col>
  1446. <Col id="age">4</Col>
  1447. <Col id="cpyn">N</Col>
  1448. <Col id="execstat">0</Col>
  1449. </Row>
  1450. </Rows>
  1451. </Dataset>
  1452. <Dataset id="ds_cond_req_result" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1453. <ColumnInfo>
  1454. <Column id="srchdate1" type="STRING" size="256"/>
  1455. <Column id="srchdate2" type="STRING" size="256"/>
  1456. <Column id="srchpid" type="STRING" size="256"/>
  1457. <Column id="wardcd" type="STRING" size="256"/>
  1458. <Column id="roomcd" type="STRING" size="256"/>
  1459. <Column id="listflag" type="STRING" size="256"/>
  1460. <Column id="deptcd" type="STRING" size="256"/>
  1461. <Column id="drid" type="STRING" size="256"/>
  1462. <Column id="chkcheck" type="STRING" size="256"/>
  1463. <Column id="chkcheck1" type="STRING" size="256"/>
  1464. <Column id="chkcheck2" type="STRING" size="256"/>
  1465. <Column id="chkcheck3" type="STRING" size="256"/>
  1466. <Column id="chkcheck4" type="STRING" size="256"/>
  1467. <Column id="chkcheck5" type="STRING" size="256"/>
  1468. <Column id="chkcheck6" type="STRING" size="256"/>
  1469. <Column id="chkcheck7" type="STRING" size="256"/>
  1470. <Column id="chkcheck8" type="STRING" size="256"/>
  1471. <Column id="tabflag" type="STRING" size="256"/>
  1472. <Column id="mdlcd" type="STRING" size="256"/>
  1473. <Column id="examgubun" type="STRING" size="256"/>
  1474. <Column id="srchflag" type="STRING" size="256"/>
  1475. <Column id="hlaflag" type="STRING" size="256"/>
  1476. <Column id="prntfrmflag" type="STRING" size="256"/>
  1477. </ColumnInfo>
  1478. </Dataset>
  1479. <Dataset id="ds_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1480. <ColumnInfo>
  1481. <Column id="idx" type="STRING" size="256"/>
  1482. <Column id="lev" type="STRING" size="256"/>
  1483. <Column id="UserData" type="STRING" size="256"/>
  1484. <Column id="Caption" type="STRING" size="256"/>
  1485. <Column id="enable" type="STRING" size="256"/>
  1486. <Column id="hotkey" type="STRING" size="256"/>
  1487. </ColumnInfo>
  1488. <Rows>
  1489. <Row>
  1490. <Col id="lev">0</Col>
  1491. <Col id="UserData">lf_fOrdChangePay()</Col>
  1492. <Col id="Caption">급여</Col>
  1493. <Col id="enable">1</Col>
  1494. <Col id="idx">1002</Col>
  1495. </Row>
  1496. <Row>
  1497. <Col id="UserData">lf_fOrdChangeNopy()</Col>
  1498. <Col id="Caption">전액본인</Col>
  1499. <Col id="lev">0</Col>
  1500. <Col id="enable">1</Col>
  1501. <Col id="idx">1003</Col>
  1502. </Row>
  1503. <Row>
  1504. <Col id="UserData">lf_fOrdChangeGnrl()</Col>
  1505. <Col id="Caption">비급여</Col>
  1506. <Col id="lev">0</Col>
  1507. <Col id="enable">1</Col>
  1508. <Col id="idx">1004</Col>
  1509. </Row>
  1510. <Row>
  1511. <Col id="idx">1030</Col>
  1512. <Col id="lev">0</Col>
  1513. <Col id="UserData">lf_fOrdChangeSelcPay()</Col>
  1514. <Col id="Caption">선별급여</Col>
  1515. <Col id="enable">1</Col>
  1516. </Row>
  1517. <Row>
  1518. <Col id="UserData">-</Col>
  1519. <Col id="idx">1011</Col>
  1520. <Col id="lev">0</Col>
  1521. <Col id="Caption">-</Col>
  1522. <Col id="enable">1</Col>
  1523. </Row>
  1524. <Row>
  1525. <Col id="Caption">초기복원</Col>
  1526. <Col id="UserData">lf_fOrgReStore()</Col>
  1527. <Col id="idx">1012</Col>
  1528. <Col id="lev">0</Col>
  1529. <Col id="enable">1</Col>
  1530. </Row>
  1531. <Row>
  1532. <Col id="UserData">-</Col>
  1533. <Col id="Caption">-</Col>
  1534. <Col id="lev">0</Col>
  1535. <Col id="idx">1013</Col>
  1536. <Col id="enable">1</Col>
  1537. </Row>
  1538. <Row>
  1539. <Col id="idx">1014</Col>
  1540. <Col id="lev">0</Col>
  1541. <Col id="UserData">lf_fSetSrchCalcScorCdPop()</Col>
  1542. <Col id="Caption">수가조회</Col>
  1543. <Col id="enable">1</Col>
  1544. </Row>
  1545. <Row>
  1546. <Col id="UserData">-</Col>
  1547. <Col id="Caption">-</Col>
  1548. <Col id="lev">0</Col>
  1549. <Col id="enable">1</Col>
  1550. <Col id="idx">1005</Col>
  1551. </Row>
  1552. <Row>
  1553. <Col id="UserData">lf_fOrdChangeNoCharge2()</Col>
  1554. <Col id="Caption">No-Charge 처리(본인부담,청구 0원처리) 여부 적용/해제</Col>
  1555. <Col id="lev">0</Col>
  1556. <Col id="enable">1</Col>
  1557. <Col id="idx">1006</Col>
  1558. </Row>
  1559. <Row>
  1560. <Col id="UserData">lf_fActNoCharge()</Col>
  1561. <Col id="Caption">행위 No-Charge 처리 적용/해제</Col>
  1562. <Col id="lev">0</Col>
  1563. <Col id="enable">1</Col>
  1564. <Col id="idx">1007</Col>
  1565. </Row>
  1566. <Row>
  1567. <Col id="idx">1013</Col>
  1568. <Col id="lev">0</Col>
  1569. <Col id="Caption">@전액본인주사 수기료 급여처리/해제</Col>
  1570. <Col id="UserData">lf_fOrdChangeInjectPayFlag()</Col>
  1571. <Col id="enable">1</Col>
  1572. </Row>
  1573. <Row>
  1574. <Col id="idx">1014</Col>
  1575. <Col id="lev">0</Col>
  1576. <Col id="Caption">MRI 체감(50%) 적용/해제</Col>
  1577. <Col id="UserData">lf_fOrdChangeMRI()</Col>
  1578. <Col id="enable">1</Col>
  1579. </Row>
  1580. <Row>
  1581. <Col id="idx">1015</Col>
  1582. <Col id="lev">0</Col>
  1583. <Col id="Caption">행위처방 0.5 적용/해제</Col>
  1584. <Col id="UserData">lf_fOrdChangeOphalf()</Col>
  1585. <Col id="enable">1</Col>
  1586. </Row>
  1587. <Row>
  1588. <Col id="idx">1016</Col>
  1589. <Col id="lev">0</Col>
  1590. <Col id="Caption">외래 DUMP 퇴원약 적용</Col>
  1591. <Col id="UserData">lf_fOrdMakeAL100()</Col>
  1592. <Col id="enable">1</Col>
  1593. </Row>
  1594. <Row>
  1595. <Col id="idx">1017</Col>
  1596. <Col id="lev">0</Col>
  1597. <Col id="Caption">-</Col>
  1598. <Col id="UserData">-</Col>
  1599. <Col id="enable">1</Col>
  1600. </Row>
  1601. <Row>
  1602. <Col id="Caption">처방유형변경(기왕증)</Col>
  1603. <Col id="idx">1018</Col>
  1604. <Col id="lev">0</Col>
  1605. <Col id="UserData">lf_fOrdChangeInsukind()</Col>
  1606. <Col id="enable">1</Col>
  1607. </Row>
  1608. <Row>
  1609. <Col id="Caption">선택진료산정여부 변경</Col>
  1610. <Col id="idx">1019</Col>
  1611. <Col id="lev">0</Col>
  1612. <Col id="UserData">lf_fOrdChangeSpclYn()</Col>
  1613. <Col id="enable">1</Col>
  1614. </Row>
  1615. <Row>
  1616. <Col id="Caption">문제처방등록 변경</Col>
  1617. <Col id="idx">1020</Col>
  1618. <Col id="lev">0</Col>
  1619. <Col id="UserData">lf_fOrdChangeProbOrdYn()</Col>
  1620. <Col id="enable">1</Col>
  1621. </Row>
  1622. <Row>
  1623. <Col id="Caption">시행일자 일괄변경</Col>
  1624. <Col id="idx">1021</Col>
  1625. <Col id="lev">0</Col>
  1626. <Col id="UserData">lf_fOrdChangeExecDD()</Col>
  1627. <Col id="enable">1</Col>
  1628. </Row>
  1629. <Row>
  1630. <Col id="Caption">시행일자 일괄변경(진료일자)</Col>
  1631. <Col id="idx">1042</Col>
  1632. <Col id="lev">0</Col>
  1633. <Col id="UserData">lf_fOrdChangeExecDD_CopyOrddd()</Col>
  1634. <Col id="enable">1</Col>
  1635. </Row>
  1636. <Row>
  1637. <Col id="idx">1040</Col>
  1638. <Col id="lev">0</Col>
  1639. <Col id="UserData">lf_fOrdChangeExecTM()</Col>
  1640. <Col id="Caption">시행시간 일괄변경</Col>
  1641. <Col id="enable">1</Col>
  1642. </Row>
  1643. <Row>
  1644. <Col id="Caption">수술유형 변경</Col>
  1645. <Col id="idx">1022</Col>
  1646. <Col id="lev">0</Col>
  1647. <Col id="UserData">lf_fOrdChangeOp()</Col>
  1648. <Col id="enable">1</Col>
  1649. </Row>
  1650. <Row>
  1651. <Col id="Caption">마취유형 변경</Col>
  1652. <Col id="idx">1023</Col>
  1653. <Col id="lev">0</Col>
  1654. <Col id="UserData">lf_fOrdChangeAns()</Col>
  1655. <Col id="enable">1</Col>
  1656. </Row>
  1657. <Row>
  1658. <Col id="idx">1018</Col>
  1659. <Col id="lev">0</Col>
  1660. <Col id="Caption">Angio유형 변경</Col>
  1661. <Col id="UserData">lf_fOrdChangeAngio()</Col>
  1662. <Col id="enable">1</Col>
  1663. </Row>
  1664. <Row>
  1665. <Col id="Caption">외과가산의사</Col>
  1666. <Col id="UserData">lf_fGSOrdDRYn()</Col>
  1667. <Col id="lev">0</Col>
  1668. <Col id="idx">1024</Col>
  1669. <Col id="enable">1</Col>
  1670. </Row>
  1671. <Row>
  1672. <Col id="Caption">일괄산정의미변경</Col>
  1673. <Col id="UserData">lf_fChngEstmmncd()</Col>
  1674. <Col id="lev">0</Col>
  1675. <Col id="idx">1025</Col>
  1676. <Col id="enable">1</Col>
  1677. </Row>
  1678. <Row>
  1679. <Col id="idx">1029</Col>
  1680. <Col id="lev">0</Col>
  1681. <Col id="UserData">lf_fOrdChangeRehb()</Col>
  1682. <Col id="Caption">초음파특정내역변경</Col>
  1683. <Col id="enable">1</Col>
  1684. </Row>
  1685. <Row>
  1686. <Col id="Caption">-</Col>
  1687. <Col id="UserData">-</Col>
  1688. <Col id="lev">0</Col>
  1689. <Col id="idx">1026</Col>
  1690. <Col id="enable">1</Col>
  1691. </Row>
  1692. <Row>
  1693. <Col id="idx">1027</Col>
  1694. <Col id="lev">0</Col>
  1695. <Col id="UserData">lf_fOrdChangeWhy()</Col>
  1696. <Col id="Caption">수정사유 선택</Col>
  1697. <Col id="enable">1</Col>
  1698. </Row>
  1699. <Row>
  1700. <Col id="UserData">-</Col>
  1701. <Col id="Caption">-</Col>
  1702. <Col id="lev">0</Col>
  1703. <Col id="enable">1</Col>
  1704. <Col id="idx">1008</Col>
  1705. </Row>
  1706. <Row>
  1707. <Col id="UserData">lf_fPatJudgPatMsgTrsm()</Col>
  1708. <Col id="Caption">환자기준 메세지작성</Col>
  1709. <Col id="lev">0</Col>
  1710. <Col id="enable">1</Col>
  1711. <Col id="idx">1009</Col>
  1712. </Row>
  1713. <Row>
  1714. <Col id="UserData">lf_fOrderJudgPatMsgTrsm()</Col>
  1715. <Col id="Caption">처방기준 메세지작성</Col>
  1716. <Col id="lev">0</Col>
  1717. <Col id="enable">1</Col>
  1718. <Col id="idx">1010</Col>
  1719. </Row>
  1720. <Row>
  1721. <Col id="Caption">환자 전체메세지 간편보기</Col>
  1722. <Col id="UserData">lf_fJudgPatMsgTrsmRef()</Col>
  1723. <Col id="enable">1</Col>
  1724. <Col id="idx">1028</Col>
  1725. <Col id="lev">0</Col>
  1726. </Row>
  1727. </Rows>
  1728. </Dataset>
  1729. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1730. <ColumnInfo>
  1731. <Column id="judgresn" type="STRING" size="256"/>
  1732. <Column id="prcpdd" type="STRING" size="256"/>
  1733. <Column id="prcpno" type="STRING" size="256"/>
  1734. <Column id="prcphistno" type="STRING" size="256"/>
  1735. <Column id="probresn" type="STRING" size="256"/>
  1736. </ColumnInfo>
  1737. <Rows>
  1738. <Row/>
  1739. </Rows>
  1740. </Dataset>
  1741. <Dataset id="ds_cond_smpic00100" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1742. <ColumnInfo>
  1743. <Column id="calcscorcd" type="STRING" size="256"/>
  1744. <Column id="judgflag" type="STRING" size="256"/>
  1745. </ColumnInfo>
  1746. <Rows>
  1747. <Row/>
  1748. </Rows>
  1749. </Dataset>
  1750. <Dataset id="ds_cond_sppiz01000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1751. <ColumnInfo>
  1752. <Column id="cdid" type="STRING" size="256"/>
  1753. </ColumnInfo>
  1754. <Rows>
  1755. <Row/>
  1756. </Rows>
  1757. </Dataset>
  1758. <Dataset id="ds_hidden_list2_clodsrch" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1759. <ColumnInfo>
  1760. <Column id="selectedRdoMatrAct" type="STRING" size="256"/>
  1761. <Column id="inpCalcScorCd" type="STRING" size="256"/>
  1762. <Column id="inpEDICd" type="STRING" size="256"/>
  1763. <Column id="selectedRdoPay" type="STRING" size="256"/>
  1764. <Column id="selectedRdoItem" type="STRING" size="256"/>
  1765. <Column id="cmbAdjtresncd" type="STRING" size="256"/>
  1766. <Column id="selectedRdoCp" type="STRING" size="256"/>
  1767. <Column id="selectedRdoAct" type="STRING" size="256"/>
  1768. <Column id="selectedRdoAdd" type="STRING" size="256"/>
  1769. </ColumnInfo>
  1770. <Rows>
  1771. <Row/>
  1772. </Rows>
  1773. </Dataset>
  1774. <Dataset id="ds_cond_sppiz00800" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1775. <ColumnInfo>
  1776. <Column id="insukind" type="STRING" size="256"/>
  1777. <Column id="estmcls" type="STRING" size="256"/>
  1778. <Column id="estmmncd" type="STRING" size="256"/>
  1779. <Column id="name" type="STRING" size="256"/>
  1780. <Column id="todd" type="STRING" size="256"/>
  1781. <Column id="calcscorcd" type="STRING" size="256"/>
  1782. </ColumnInfo>
  1783. <Rows>
  1784. <Row/>
  1785. </Rows>
  1786. </Dataset>
  1787. <Dataset id="ds_rslt_sppiz00800" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1788. <ColumnInfo>
  1789. <Column id="insukind" type="STRING" size="256"/>
  1790. <Column id="estmcls" type="STRING" size="256"/>
  1791. <Column id="estmmncd" type="STRING" size="256"/>
  1792. <Column id="clcd" type="STRING" size="256"/>
  1793. </ColumnInfo>
  1794. </Dataset>
  1795. <Dataset id="ds_hidden_chngexec" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1796. <ColumnInfo>
  1797. <Column id="chngdd" type="STRING" size="256"/>
  1798. <Column id="chnghh" type="STRING" size="256"/>
  1799. <Column id="chngmn" type="STRING" size="256"/>
  1800. </ColumnInfo>
  1801. <Rows>
  1802. <Row/>
  1803. </Rows>
  1804. </Dataset>
  1805. <Dataset id="ds_hidden_op" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1806. <ColumnInfo>
  1807. <Column id="erprcpflag" type="STRING" size="256"/>
  1808. <Column id="nigtprpcflag" type="STRING" size="256"/>
  1809. </ColumnInfo>
  1810. <Rows>
  1811. <Row/>
  1812. </Rows>
  1813. </Dataset>
  1814. <Dataset id="ds_msgtrsm_info" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1815. <ColumnInfo>
  1816. <Column id="instcd" type="STRING" size="256"/>
  1817. <Column id="msgwrtedd" type="STRING" size="256"/>
  1818. <Column id="msgwrteno" type="STRING" size="256"/>
  1819. <Column id="msgwrtehistno" type="STRING" size="256"/>
  1820. <Column id="histstat" type="STRING" size="256"/>
  1821. <Column id="pid" type="STRING" size="256"/>
  1822. <Column id="orddd" type="STRING" size="256"/>
  1823. <Column id="cretno" type="STRING" size="256"/>
  1824. <Column id="mskind" type="STRING" size="256"/>
  1825. <Column id="orddeptcd" type="STRING" size="256"/>
  1826. <Column id="orddrid" type="STRING" size="256"/>
  1827. <Column id="orddrnm" type="STRING" size="256"/>
  1828. <Column id="ordtype" type="STRING" size="256"/>
  1829. <Column id="kindflag" type="STRING" size="256"/>
  1830. <Column id="grupcalcscorcd" type="STRING" size="256"/>
  1831. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  1832. <Column id="ordqty" type="STRING" size="256"/>
  1833. <Column id="ordtims" type="STRING" size="256"/>
  1834. <Column id="orddays" type="STRING" size="256"/>
  1835. <Column id="prcpdd" type="STRING" size="256"/>
  1836. <Column id="prcpno" type="STRING" size="256"/>
  1837. <Column id="prcppayflag" type="STRING" size="256"/>
  1838. <Column id="rgstrid" type="STRING" size="256"/>
  1839. <Column id="rgstdd" type="STRING" size="256"/>
  1840. <Column id="rgsttm" type="STRING" size="256"/>
  1841. <Column id="sendphone" type="STRING" size="256"/>
  1842. <Column id="anybodyyn" type="STRING" size="256"/>
  1843. <Column id="sendflag" type="STRING" size="256"/>
  1844. <Column id="senddate" type="STRING" size="256"/>
  1845. <Column id="sendid" type="STRING" size="256"/>
  1846. <Column id="deliveid" type="STRING" size="256"/>
  1847. <Column id="recvdate" type="STRING" size="256"/>
  1848. <Column id="recvid" type="STRING" size="256"/>
  1849. <Column id="recvcnfmyn" type="STRING" size="256"/>
  1850. <Column id="recvcnfmid" type="STRING" size="256"/>
  1851. <Column id="sendmsg" type="STRING" size="256"/>
  1852. <Column id="recvmsg" type="STRING" size="256"/>
  1853. <Column id="fstrgstrid" type="STRING" size="256"/>
  1854. <Column id="fstrgstdt" type="STRING" size="256"/>
  1855. <Column id="lastupdtrid" type="STRING" size="256"/>
  1856. <Column id="lastupdtdt" type="STRING" size="256"/>
  1857. <Column id="refyn" type="STRING" size="256"/>
  1858. <Column id="Column0" type="STRING" size="256"/>
  1859. </ColumnInfo>
  1860. </Dataset>
  1861. <Dataset id="ds_hidden_atdoctlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1862. <ColumnInfo>
  1863. <Column id="atdoctid" type="STRING" size="256"/>
  1864. <Column id="atdocthngnm" type="STRING" size="256"/>
  1865. <Column id="specordyn" type="STRING" size="256"/>
  1866. </ColumnInfo>
  1867. <Rows>
  1868. <Row/>
  1869. </Rows>
  1870. </Dataset>
  1871. <Dataset id="ds_item5_clod" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1872. <ColumnInfo>
  1873. <Column id="estmmncd" type="STRING" size="256"/>
  1874. </ColumnInfo>
  1875. <Rows>
  1876. <Row/>
  1877. </Rows>
  1878. </Dataset>
  1879. <Dataset id="ds_cond_clamkey" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1880. <ColumnInfo>
  1881. <Column id="judgno" type="STRING" size="256"/>
  1882. <Column id="clamym" type="STRING" size="256"/>
  1883. <Column id="clamdg" type="STRING" size="256"/>
  1884. <Column id="clamdd" type="STRING" size="256"/>
  1885. </ColumnInfo>
  1886. <Rows>
  1887. <Row/>
  1888. </Rows>
  1889. </Dataset>
  1890. <Dataset id="ds_data_clamkey" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1891. <ColumnInfo>
  1892. <Column id="judgno" type="STRING" size="256"/>
  1893. <Column id="clamym" type="STRING" size="256"/>
  1894. <Column id="clamdg" type="STRING" size="256"/>
  1895. <Column id="clamdd" type="STRING" size="256"/>
  1896. </ColumnInfo>
  1897. </Dataset>
  1898. <Dataset id="ds_rslt_sppiz00800_clcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1899. <ColumnInfo>
  1900. <Column id="estmcd" type="STRING" size="256"/>
  1901. <Column id="estmmncd" type="STRING" size="256"/>
  1902. <Column id="estmcdnm" type="STRING" size="256"/>
  1903. </ColumnInfo>
  1904. </Dataset>
  1905. <Dataset id="ds_hidden_list3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1906. <ColumnInfo>
  1907. <Column id="msgspclformat" type="STRING" size="256"/>
  1908. </ColumnInfo>
  1909. </Dataset>
  1910. <Dataset id="ds_cond_sppiz00600" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1911. <Dataset id="ds_cond_sppiz00600_toothapplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1912. <ColumnInfo>
  1913. <Column id="chos" type="STRING" size="256"/>
  1914. <Column id="flag" type="STRING" size="256"/>
  1915. <Column id="cd" type="STRING" size="256"/>
  1916. <Column id="cdnm" type="STRING" size="256"/>
  1917. <Column id="rightupper" type="STRING" size="256"/>
  1918. <Column id="leftupper" type="STRING" size="256"/>
  1919. <Column id="rightlower" type="STRING" size="256"/>
  1920. <Column id="leftlower" type="STRING" size="256"/>
  1921. <Column id="orddd" type="STRING" size="256"/>
  1922. <Column id="toot" type="STRING" size="256"/>
  1923. <Column id="row" type="STRING" size="256"/>
  1924. </ColumnInfo>
  1925. </Dataset>
  1926. <Dataset id="ds_iscl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1927. <ColumnInfo>
  1928. <Column id="estmmncd" type="STRING" size="256"/>
  1929. <Column id="estmcd" type="STRING" size="256"/>
  1930. <Column id="judgadjtresncd" type="STRING" size="256"/>
  1931. <Column id="editflag" type="STRING" size="256"/>
  1932. <Column id="estmyn" type="STRING" size="256"/>
  1933. </ColumnInfo>
  1934. </Dataset>
  1935. <Dataset id="ds_cond_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1936. <ColumnInfo>
  1937. <Column id="pid" type="STRING" size="256"/>
  1938. <Column id="indd" type="STRING" size="256"/>
  1939. <Column id="mskind" type="STRING" size="256"/>
  1940. <Column id="ownbrate" type="STRING" size="256"/>
  1941. <Column id="insukindcd" type="STRING" size="256"/>
  1942. <Column id="insukind" type="STRING" size="256"/>
  1943. <Column id="suppkindcd" type="STRING" size="256"/>
  1944. <Column id="suppkindnm" type="STRING" size="256"/>
  1945. <Column id="suppkind" type="STRING" size="256"/>
  1946. <Column id="fromdd" type="STRING" size="256"/>
  1947. <Column id="todd" type="STRING" size="256"/>
  1948. <Column id="orddeptcd" type="STRING" size="256"/>
  1949. <Column id="atdoc" type="STRING" size="256"/>
  1950. <Column id="grupsnglflag" type="STRING" size="256"/>
  1951. <Column id="calcscorcd" type="STRING" size="256"/>
  1952. <Column id="calcscorcdflag" type="STRING" size="256"/>
  1953. <Column id="past" type="STRING" size="256"/>
  1954. <Column id="cretno" type="STRING" size="256"/>
  1955. <Column id="srchflag" type="STRING" size="256"/>
  1956. <Column id="mig" type="STRING" size="256"/>
  1957. <Column id="anamne" type="STRING" size="256"/>
  1958. <Column id="instcd" type="STRING" size="256"/>
  1959. <Column id="choicdsrch" type="STRING" size="256"/>
  1960. <Column id="ordlist" type="STRING" size="256"/>
  1961. <Column id="judgresn" type="STRING" size="256"/>
  1962. <Column id="insufromdd" type="STRING" size="256"/>
  1963. <Column id="insutodd" type="STRING" size="256"/>
  1964. <Column id="specordyn" type="STRING" size="256"/>
  1965. <Column id="ordtype" type="STRING" size="256"/>
  1966. <Column id="brateflag" type="STRING" size="256"/>
  1967. <Column id="calcbasedd" type="STRING" size="256"/>
  1968. <Column id="age" type="STRING" size="256"/>
  1969. <Column id="cpyn" type="STRING" size="256"/>
  1970. <Column id="quickview" type="STRING" size="256"/>
  1971. <Column id="mainordfromdd" type="STRING" size="256"/>
  1972. <Column id="mainordtodd" type="STRING" size="256"/>
  1973. <Column id="execstat" type="STRING" size="256"/>
  1974. <Column id="orddd" type="STRING" size="256"/>
  1975. <Column id="grupcalcscorcd" type="STRING" size="256"/>
  1976. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  1977. <Column id="edicd" type="STRING" size="256"/>
  1978. <Column id="flag" type="STRING" size="256"/>
  1979. <Column id="scrnid" type="STRING" size="256"/>
  1980. <Column id="compsnm" type="STRING" size="256"/>
  1981. <Column id="compscnts" type="STRING" size="256"/>
  1982. <Column id="compsrefcnts" type="STRING" size="256"/>
  1983. <Column id="compssizecnts" type="STRING" size="256"/>
  1984. <Column id="estmcd" type="STRING" size="256"/>
  1985. <Column id="ordfilflag" type="STRING" size="256"/>
  1986. <Column id="ordfromdd" type="STRING" size="256"/>
  1987. <Column id="ordtodd" type="STRING" size="256"/>
  1988. <Column id="proccalctypeap" type="STRING" size="256"/>
  1989. </ColumnInfo>
  1990. </Dataset>
  1991. <Dataset id="ds_hidden_inpt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1992. <ColumnInfo>
  1993. <Column id="dschnotidt" type="STRING" size="256"/>
  1994. </ColumnInfo>
  1995. <Rows>
  1996. <Row/>
  1997. </Rows>
  1998. </Dataset>
  1999. <Dataset id="ds_cond_req_atdoctlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2000. <ColumnInfo>
  2001. <Column id="instcd" type="STRING" size="256"/>
  2002. <Column id="orddeptcd" type="STRING" size="256"/>
  2003. </ColumnInfo>
  2004. </Dataset>
  2005. <Dataset id="ds_data_req_atdoctlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2006. <ColumnInfo>
  2007. <Column id="atdoctid" type="STRING" size="256"/>
  2008. <Column id="atdocthngnm" type="STRING" size="256"/>
  2009. <Column id="specordyn" type="STRING" size="256"/>
  2010. </ColumnInfo>
  2011. </Dataset>
  2012. <Dataset id="ds_problist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2013. <ColumnInfo>
  2014. <Column id="probresn" type="STRING" size="256"/>
  2015. <Column id="calcscorcd" type="STRING" size="256"/>
  2016. <Column id="userid" type="STRING" size="256"/>
  2017. <Column id="updtdate" type="STRING" size="256"/>
  2018. </ColumnInfo>
  2019. <Rows>
  2020. <Row/>
  2021. </Rows>
  2022. </Dataset>
  2023. <Dataset id="ds_grid_grd_judgresn0153" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  2024. <ColumnInfo>
  2025. <Column id="cdid" type="STRING"/>
  2026. <Column id="cdnm" type="STRING"/>
  2027. </ColumnInfo>
  2028. </Dataset>
  2029. <Dataset id="ds_init_matractflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2030. <ColumnInfo>
  2031. <Column id="label" type="STRING" size="256"/>
  2032. <Column id="value" type="STRING" size="256"/>
  2033. </ColumnInfo>
  2034. <Rows>
  2035. <Row>
  2036. <Col id="label">재</Col>
  2037. <Col id="value">1</Col>
  2038. </Row>
  2039. <Row>
  2040. <Col id="label">가O</Col>
  2041. <Col id="value">2</Col>
  2042. </Row>
  2043. <Row>
  2044. <Col id="label">가X</Col>
  2045. <Col id="value">3</Col>
  2046. </Row>
  2047. <Row>
  2048. <Col id="label">약</Col>
  2049. <Col id="value">4</Col>
  2050. </Row>
  2051. </Rows>
  2052. </Dataset>
  2053. <Dataset id="ds_init_payflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2054. <ColumnInfo>
  2055. <Column id="label" type="STRING" size="256"/>
  2056. <Column id="value" type="STRING" size="256"/>
  2057. </ColumnInfo>
  2058. <Rows>
  2059. <Row>
  2060. <Col id="label">급</Col>
  2061. <Col id="value">0</Col>
  2062. </Row>
  2063. <Row>
  2064. <Col id="label">100</Col>
  2065. <Col id="value">1</Col>
  2066. </Row>
  2067. <Row>
  2068. <Col id="label">비</Col>
  2069. <Col id="value">2</Col>
  2070. </Row>
  2071. <Row>
  2072. <Col id="label">선</Col>
  2073. <Col id="value">8</Col>
  2074. </Row>
  2075. <Row>
  2076. <Col id="label">선</Col>
  2077. <Col id="value">9</Col>
  2078. </Row>
  2079. </Rows>
  2080. </Dataset>
  2081. <Dataset id="ds_cond_reqporc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2082. <ColumnInfo>
  2083. <Column id="proccalctypeap" type="STRING" size="256"/>
  2084. <Column id="recalcyn" type="STRING" size="256"/>
  2085. </ColumnInfo>
  2086. <Rows>
  2087. <Row>
  2088. <Col id="proccalctypeap">A</Col>
  2089. <Col id="recalcyn">Y</Col>
  2090. </Row>
  2091. </Rows>
  2092. </Dataset>
  2093. <Dataset id="ds_init_P0506" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2094. <Dataset id="ds_init_drugspd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2095. <Dataset id="ds_drugmthdspccdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2096. <Dataset id="ds_init_M0639" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2097. <Dataset id="ds_isclediudiff" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2098. <Dataset id="ds_getfcpayflagyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2099. <Dataset id="ds_cond_sppij00500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2100. <ColumnInfo>
  2101. <Column id="pid" type="STRING" size="256"/>
  2102. <Column id="indd" type="STRING" size="256"/>
  2103. <Column id="insukind" type="STRING" size="256"/>
  2104. <Column id="ordfildcd" type="STRING" size="256"/>
  2105. <Column id="ioflag" type="STRING" size="256"/>
  2106. <Column id="edicd" type="STRING" size="256"/>
  2107. <Column id="calcscorcd" type="STRING" size="256"/>
  2108. <Column id="calcscorcdnm" type="STRING" size="256"/>
  2109. <Column id="unitflag" type="STRING" size="256"/>
  2110. <Column id="flag" type="STRING" size="256"/>
  2111. <Column id="spclcd" type="STRING" size="256"/>
  2112. <Column id="spclcdnm" type="STRING" size="256"/>
  2113. <Column id="detldesc" type="STRING" size="256"/>
  2114. <Column id="spclspec" type="STRING" size="256"/>
  2115. <Column id="remfact" type="STRING" size="256"/>
  2116. <Column id="rownum" type="STRING" size="256"/>
  2117. <Column id="oldspclcd" type="STRING" size="256"/>
  2118. <Column id="oldspclspec" type="STRING" size="256"/>
  2119. </ColumnInfo>
  2120. </Dataset>
  2121. <Dataset id="ds_cond_list_sppij00500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2122. <ColumnInfo>
  2123. <Column id="pid" type="STRING" size="256"/>
  2124. <Column id="indd" type="STRING" size="256"/>
  2125. <Column id="insukind" type="STRING" size="256"/>
  2126. <Column id="ordfildcd" type="STRING" size="256"/>
  2127. <Column id="ioflag" type="STRING" size="256"/>
  2128. <Column id="edicd" type="STRING" size="256"/>
  2129. <Column id="calcscorcd" type="STRING" size="256"/>
  2130. <Column id="calcscorcdnm" type="STRING" size="256"/>
  2131. <Column id="unitflag" type="STRING" size="256"/>
  2132. <Column id="flag" type="STRING" size="256"/>
  2133. <Column id="spclcd" type="STRING" size="256"/>
  2134. <Column id="spclcdnm" type="STRING" size="256"/>
  2135. <Column id="detldesc" type="STRING" size="256"/>
  2136. <Column id="spclspec" type="STRING" size="256"/>
  2137. <Column id="remfact" type="STRING" size="256"/>
  2138. <Column id="rownum" type="STRING" size="256"/>
  2139. <Column id="oldspclcd" type="STRING" size="256"/>
  2140. <Column id="oldspclspec" type="STRING" size="256"/>
  2141. <Column id="status" type="STRING" size="256"/>
  2142. </ColumnInfo>
  2143. </Dataset>
  2144. <Dataset id="ds_grd_clcjlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  2145. <ColumnInfo>
  2146. <Column id="unitflag" type="STRING"/>
  2147. <Column id="calcscorcd" type="STRING"/>
  2148. <Column id="edicd" type="STRING"/>
  2149. <Column id="spclcd" type="STRING"/>
  2150. <Column id="spclspec" type="STRING"/>
  2151. <Column id="remfact" type="STRING"/>
  2152. <Column id="detldesc" type="STRING"/>
  2153. <Column id="status" type="STRING"/>
  2154. <Column id="pid" type="STRING"/>
  2155. <Column id="indd" type="STRING"/>
  2156. <Column id="cretno" type="STRING"/>
  2157. <Column id="fromdd" type="STRING"/>
  2158. <Column id="mskind" type="STRING"/>
  2159. <Column id="spclmemoflag" type="STRING"/>
  2160. <Column id="seqno" type="STRING"/>
  2161. <Column id="rowstat" type="STRING" size="256"/>
  2162. <Column id="spclcdnm" type="STRING" size="256"/>
  2163. <Column id="spclformat" type="STRING" size="256"/>
  2164. <Column id="oldspclcd" type="STRING" size="256"/>
  2165. </ColumnInfo>
  2166. </Dataset>
  2167. <FilteredDataset id="fds_P0117list_M" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" filterstr="minval == 'M' &amp;&amp; cdid != 'MX999'" binddataset="@ds_P0117list"/>
  2168. <FilteredDataset id="fds_P0117list_J" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" filterstr="minval == 'J'" binddataset="@ds_P0117list"/>
  2169. <Dataset id="ds_temp_afterchk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2170. <ColumnInfo>
  2171. <Column id="afterchk" type="STRING" size="256"/>
  2172. <Column id="chkyn" type="STRING" size="256"/>
  2173. </ColumnInfo>
  2174. <Rows>
  2175. <Row>
  2176. <Col id="afterchk">N</Col>
  2177. <Col id="chkyn">N</Col>
  2178. </Row>
  2179. </Rows>
  2180. </Dataset>
  2181. </Objects>
  2182. <Bind>
  2183. <BindItem id="item22" compid="group8.bool1" propid="value" datasetid="ds_cond_reqporc" columnid="proccalctypeap"/>
  2184. <BindItem id="item0" compid="group2.ipt_pid" propid="value" datasetid="ds_cond_req" columnid="pid"/>
  2185. <BindItem id="item1" compid="group2.ipt_indd" propid="value" datasetid="ds_cond_req" columnid="indd"/>
  2186. <BindItem id="item2" compid="group2.output2" propid="value" datasetid="ds_cond_req" columnid="mskind"/>
  2187. <BindItem id="item3" compid="group2.opt_insukind" propid="value" datasetid="ds_cond_req" columnid="insukindcd"/>
  2188. <BindItem id="item4" compid="group2.opt_insukindnm" propid="value" datasetid="ds_cond_req" columnid="insukind"/>
  2189. <BindItem id="item5" compid="group2.opt_suppkind" propid="value" datasetid="ds_cond_req" columnid="suppkindcd"/>
  2190. <BindItem id="item6" compid="group2.opt_suppkindnm" propid="value" datasetid="ds_cond_req" columnid="suppkindnm"/>
  2191. <BindItem id="item7" compid="group2.opt_ownrate" propid="value" datasetid="ds_cond_req" columnid="ownbrate"/>
  2192. <BindItem id="item9" compid="group2.ipt_fromdd" propid="value" datasetid="ds_cond_req" columnid="fromdd"/>
  2193. <BindItem id="item10" compid="group2.ipt_todd" propid="value" datasetid="ds_cond_req" columnid="todd"/>
  2194. <BindItem id="item11" compid="group2.input2" propid="value" datasetid="ds_cond_req" columnid="insufromdd"/>
  2195. <BindItem id="item12" compid="group2.input1" propid="value" datasetid="ds_cond_req" columnid="insutodd"/>
  2196. <BindItem id="item13" compid="group2.ipt_cd" propid="value" datasetid="ds_cond_req" columnid="calcscorcd"/>
  2197. <BindItem id="item14" compid="group2.ipt_estmcd" propid="value" datasetid="ds_cond_req" columnid="estmcd"/>
  2198. <BindItem id="item15" compid="group2.rdo_mchrgcode" propid="value" datasetid="ds_cond_req" columnid="choicdsrch"/>
  2199. <BindItem id="item16" compid="grp_execdd.ipt_chngdd" propid="value" datasetid="ds_hidden_chngexec" columnid="chngdd"/>
  2200. <BindItem id="item19" compid="grd_selectgsord.cmb_gsatdoc" propid="innerdataset" datasetid="ds_data_req_atdoctlist" columnid=""/>
  2201. <BindItem id="item21" compid="group8.rdo_ordfilflag" propid="value" datasetid="ds_cond_req" columnid="ordfilflag"/>
  2202. <BindItem id="item20" compid="grp_probresn.textarea1" propid="value" datasetid="ds_problist" columnid="probresn"/>
  2203. <BindItem id="item23" compid="group8.cmb_judgresn" propid="value" datasetid="ds_cond_req" columnid="judgresn"/>
  2204. <BindItem id="item8" compid="grp_execdd.cmb_chnghh" propid="value" datasetid="ds_hidden_chngexec" columnid="chnghh"/>
  2205. <BindItem id="item17" compid="grp_execdd.cmb_ipt_chngmn" propid="value" datasetid="ds_hidden_chngexec" columnid="chngmn"/>
  2206. <BindItem id="item18" compid="group2.chk_recalcyn" propid="value" datasetid="ds_cond_reqporc" columnid="recalcyn"/>
  2207. <BindItem id="item25" compid="grp_changeop.chk_oper" propid="value" datasetid="ds_hidden_op" columnid="erprcpflag"/>
  2208. <BindItem id="item26" compid="grp_changeop.chk_opnigt" propid="value" datasetid="ds_hidden_op" columnid="nigtprpcflag"/>
  2209. <BindItem id="item24" compid="grp_exectm.cmb_chnghh" propid="value" datasetid="ds_hidden_chngexec" columnid="chnghh"/>
  2210. <BindItem id="item27" compid="grp_exectm.cmb_ipt_chngmn" propid="value" datasetid="ds_hidden_chngexec" columnid="chngmn"/>
  2211. <BindItem id="item28" compid="grp_exectm.ipt_chngdd" propid="value" datasetid="ds_hidden_chngexec" columnid="chngdd"/>
  2212. </Bind>
  2213. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  2214. * System Name :
  2215. * Job Name :
  2216. * Creator :
  2217. * Make Date : 2015-05-01
  2218. * Description :
  2219. *---------------------------------------------------------------------------------------
  2220. * Modify Date Modifier Modify Description
  2221. *---------------------------------------------------------------------------------------
  2222. * 2015-05-01 Live Converter TF->XP
  2223. *
  2224. *---------------------------------------------------------------------------------------
  2225. ****************************************************************************************/
  2226. include "com_commonxp::comm_main.xjs";
  2227. include "com_basiccodexp::ZBC001.xjs";
  2228. include "pam_pamcomnxp::PAM.xjs";
  2229. include "pam_insubasecdmngtxp::insubase.xjs";
  2230. include "pam_bfjudgxp::pam_grd.xjs";
  2231. include "emr_prcpmngtxp::MMO001.xjs";
  2232. function lf_initDataSet()
  2233. {
  2234. // cmb_deptlist의 INIT Dataset
  2235. this.grp_selectspecord.cmb_deptlist.innerdataset = "ds_data_req_deptlist";
  2236. this.grp_selectspecord.cmb_deptlist.codecolumn = "deptcd";
  2237. this.grp_selectspecord.cmb_deptlist.datacolumn = "depthngnm";
  2238. // cmb_opflag의 INIT Dataset
  2239. this.grp_changeop.cmb_opflag.innerdataset = "ds_initZ_M0007";
  2240. this.grp_changeop.cmb_opflag.codecolumn = "cdid";
  2241. this.grp_changeop.cmb_opflag.datacolumn = "cdnm";
  2242. // cmb_angio의 INIT Dataset
  2243. this.grp_changeangio.cmb_angio.innerdataset = "ds_initZ_M0006";
  2244. this.grp_changeangio.cmb_angio.codecolumn = "cdid";
  2245. this.grp_changeangio.cmb_angio.datacolumn = "cdnm";
  2246. // cmb_ans의 INIT Dataset
  2247. this.grp_changeans.cmb_ans.innerdataset = "ds_initZ_M0008";
  2248. this.grp_changeans.cmb_ans.codecolumn = "cdid";
  2249. this.grp_changeans.cmb_ans.datacolumn = "cdnm";
  2250. // this.grp_changeans.cmb_ans.innerdataset = "ds_grid_grd_judgresn0153";
  2251. // this.grp_changeans.cmb_ans.codecolumn = "cdid";
  2252. // this.grp_changeans.cmb_ans.datacolumn = "cdnm";
  2253. appf_showValue(ds_grid_grd_judgresn0153);
  2254. }
  2255. // 초기화
  2256. function lf_Initialize()
  2257. {
  2258. // 공통코드 조회
  2259. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  2260. // 입원재원심사 외 화면에서 오픈시 메뉴 삭제
  2261. // if(opener.frmf_getScreenID()!="SMPIJ00300") {
  2262. // var cRow = ds_menu.findRow("idx","1041");
  2263. // ds_menu.deleteRow(cRow);
  2264. // }
  2265. // 과 조회
  2266. ds_cond_req_deptlist.clearData();
  2267. var aRow = ds_cond_req_deptlist.addRow();
  2268. ds_cond_req_deptlist.setColumn(aRow, "instcd", sysf_getUserInfo("dutplceinstcd"));
  2269. var oParam = {};
  2270. oParam.id = "TRPIJ00408";
  2271. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  2272. oParam.method = "reqInitializeSubmit";
  2273. oParam.inds = "req=ds_cond_req_deptlist";
  2274. oParam.outds = "ds_data_req_deptlist=deptlist";
  2275. oParam.async = true;
  2276. oParam.progress = false;
  2277. tranf_submit(oParam);
  2278. ds_cond_req.clearData();
  2279. ds_cond_req.addRow();
  2280. // 라디오버튼
  2281. group2.rdo_mchrgcode.index = 0; // 코드조회
  2282. group8.rdo_ordfilflag.index = 0; // 입원세부계산내역
  2283. lf_fGetMainInfo(); // 호출한 화면의 정보를 가지고 세팅한 후 재원심사 입원세부계산내역 조회
  2284. }
  2285. // Opener에서 기본 정보를 받아 온다.
  2286. function lf_fGetMainInfo()
  2287. {
  2288. var chksave;
  2289. var selyn = opener.ds_cond_sppij00400.getColumn(0, "selyn");
  2290. if (selyn == "N" )
  2291. {
  2292. ds_cond_req.copyRow(0, opener.ds_init_iteminfo, 0);
  2293. var fRow = opener.ds_grd_insuhistory.findRow("suppkind", ds_cond_req.getColumn(0, "suppkindcd"));
  2294. ds_cond_req.setColumn(0, "suppkind", opener.ds_grd_insuhistory.getColumn(fRow, "suppkind"));
  2295. ds_cond_req.setColumn(0, "insufromdd", opener.ds_send.getColumn(0, "fromdd"));
  2296. ds_cond_req.setColumn(0, "insutodd", opener.ds_send.getColumn(0, "todd"));
  2297. ds_cond_req.setColumn(0, "indd", opener.ds_grd_insuhistory.getColumn(fRow, "indd"));
  2298. ds_cond_req.setColumn(0, "insukind", opener.ds_init_iteminfo.getColumn(0, "insukindnm"));
  2299. ds_cond_req.setColumn(0, "calcscorcd", opener.ds_cond_sppij00400.getColumn(0, "calcscorcd"));
  2300. ds_cond_req.setColumn(0, "grupsnglflag", opener.ds_cond_sppij00400.getColumn(0, "grupsnglflag"));
  2301. ds_cond_req.setColumn(0, "pid", opener.ds_grd_insuhistory.getColumn(fRow, "pid"));
  2302. ds_cond_req.setColumn(0, "mig", "N");
  2303. ds_cond_req.setColumn(0, "ownbrate", opener.ds_init_iteminfo.getColumn(0, "ownrate"));
  2304. ds_cond_req.setColumn(0, "execstat", opener.grp_calc.rdo_actingflag.value);
  2305. ds_cond_req.setColumn(0, "ordfromdd", opener.ds_send.getColumn(0, "fromdd"));
  2306. ds_cond_req.setColumn(0, "ordtodd", opener.ds_send.getColumn(0, "todd"));
  2307. chksave = "N";
  2308. ds_init_ordfilflag.copyData(opener.ds_init_ordfilflag);
  2309. }
  2310. else if(selyn == "Y" )
  2311. {
  2312. var pid = opener.ds_cond_sppij00400.getColumn(0, "pid");
  2313. var indd = opener.ds_cond_sppij00400.getColumn(0, "indd");
  2314. var cretno = opener.ds_cond_sppij00400.getColumn(0, "cretno");
  2315. var mskind = opener.ds_cond_sppij00400.getColumn(0, "mskind");
  2316. var insukind = opener.ds_cond_sppij00400.getColumn(0, "insukind");
  2317. var insukindnm = opener.ds_cond_sppij00400.getColumn(0, "insukindnm");
  2318. var suppkindcd = opener.ds_cond_sppij00400.getColumn(0, "suppkind");
  2319. var suppkindcdnm = opener.ds_cond_sppij00400.getColumn(0, "suppkindnm");
  2320. var ownbrate = opener.ds_cond_sppij00400.getColumn(0, "ownbrate");
  2321. var ordfromdd = opener.ds_cond_sppij00400.getColumn(0, "ordfromdd");
  2322. var ordtodd = opener.ds_cond_sppij00400.getColumn(0, "ordtodd");
  2323. var ordtype = opener.ds_cond_sppij00400.getColumn(0, "ordtype");
  2324. var brateflag = opener.ds_cond_sppij00400.getColumn(0, "brateflag");
  2325. var calcscorcd = opener.ds_cond_sppij00400.getColumn(0, "calcscorcd");
  2326. var grupsnglflag = "G";
  2327. var selectedRdoItem = "";
  2328. var mig = "N";
  2329. var insufromdd = opener.ds_cond_sppij00400.getColumn(0, "insufromdd");
  2330. var insutodd = opener.ds_cond_sppij00400.getColumn(0, "insutodd");
  2331. var chksave = "Y";
  2332. var srchflag = opener.ds_cond_sppij00400.getColumn(0, "srchflag");
  2333. var cpyn = opener.ds_cond_sppij00400.getColumn(0, "cpyn");
  2334. var ediflag = opener.ds_cond_sppij00400.getColumn(0, "ediflag");
  2335. var edicd = opener.ds_cond_sppij00400.getColumn(0, "edicd");
  2336. var age = opener.ds_cond_sppij00400.getColumn(0, "age");
  2337. ds_cond_req.setColumn(0, "ordfilflag", "-");
  2338. selectedRdoItem = "-";
  2339. ds_cond_req.setColumn(0, "pid", pid);
  2340. ds_cond_req.setColumn(0, "age", age);
  2341. ds_cond_req.setColumn(0, "indd", indd);
  2342. ds_cond_req.setColumn(0, "mskind", mskind);
  2343. ds_cond_req.setColumn(0, "cretno", cretno);
  2344. ds_cond_req.setColumn(0, "insukindcd", insukind);
  2345. ds_cond_req.setColumn(0, "insukind", insukindnm);
  2346. ds_cond_req.setColumn(0, "suppkindcd", suppkindcd);
  2347. ds_cond_req.setColumn(0, "suppkind", suppkindcd);
  2348. ds_cond_req.setColumn(0, "suppkindnm", suppkindcdnm);
  2349. ds_cond_req.setColumn(0, "ownbrate", ownbrate);
  2350. ds_cond_req.setColumn(0, "quickview", "Y");
  2351. if(ediflag == "Y")
  2352. {
  2353. ds_cond_req.setColumn(0, "choicdsrch", "edicd");
  2354. ds_cond_req.setColumn(0, "calcscorcd", edicd);
  2355. }
  2356. else if(ediflag == "N")
  2357. {
  2358. ds_cond_req.setColumn(0, "choicdsrch", "calcscorcd");
  2359. ds_cond_req.setColumn(0, "calcscorcd", calcscorcd);
  2360. }
  2361. else
  2362. {
  2363. ds_cond_req.setColumn(0, "choicdsrch", "calcscorcd");
  2364. ds_cond_req.setColumn(0, "calcscorcd", calcscorcd);
  2365. }
  2366. ds_cond_req.setColumn(0, "srchflag", srchflag);
  2367. ds_cond_req.setColumn(0, "grupsnglflag", grupsnglflag);
  2368. ds_cond_req.setColumn(0, "insufromdd", insufromdd);
  2369. ds_cond_req.setColumn(0, "insutodd", insutodd);
  2370. ds_cond_req.setColumn(0, "ordtype", ordtype);
  2371. ds_cond_req.setColumn(0, "brateflag", brateflag);
  2372. ds_cond_req.setColumn(0, "mig", mig);
  2373. ds_cond_req.setColumn(0, "cpyn", cpyn);
  2374. ds_cond_req.setColumn(0, "ordfilflag", selectedRdoItem);
  2375. if(srchflag == "ALL")
  2376. {
  2377. ds_cond_req.setColumn(0, "srchflag", "");
  2378. ds_cond_req.setColumn(0, "calcscorcd", "");
  2379. ds_cond_req.setColumn(0, "grupsnglflag", "S");
  2380. ds_cond_req.setColumn(0, "fromdd", ordfromdd);
  2381. ds_cond_req.setColumn(0, "todd", ordtodd);
  2382. }
  2383. else
  2384. {
  2385. ds_cond_req.setColumn(0, "fromdd", insufromdd);
  2386. ds_cond_req.setColumn(0, "todd", insutodd);
  2387. }
  2388. }
  2389. var dschjudgprcsstat = opener.gv_dschjudgprcsstat;
  2390. if(dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || chksave == "Y")
  2391. {
  2392. btn_save.visible = false;
  2393. }
  2394. else
  2395. {
  2396. btn_save.visible = true;
  2397. }
  2398. lf_fGetIsclList(); // 재원심사 입원세부계산내역 조회
  2399. }
  2400. // 재원심사 입원세부계산내역 조회
  2401. function lf_fGetIsclList()
  2402. {
  2403. ds_grid_grd_ordlist.clearData();
  2404. ds_cond_req.setColumn(0, "ordfilflag", group8.rdo_ordfilflag.value);
  2405. var oParam = {};
  2406. oParam.id = "TRPIJ00401";
  2407. oParam.service = "bfjudgapp.InHospJudgDetl";
  2408. oParam.method = "reqGetInHospJudgDetl";
  2409. oParam.inds = "req=ds_cond_req";
  2410. oParam.outds = "ds_grid_grd_ordlist=iscl";
  2411. oParam.async = false;
  2412. oParam.callback = "cf_TRPIJ00401";
  2413. tranf_submit(oParam);
  2414. }
  2415. function cf_TRPIJ00401(sSvcId, nErrorCode, sErrorMsg) {
  2416. if(nErrorCode < 0) return;
  2417. ds_grid_grd_ordlist.addColumn("newexecdd", "STRING", 256 ); // 쿼리에 존재하지 않음
  2418. ds_grid_grd_ordlist.addColumn("oldprcpkindcd", "STRING", 256 ); // 쿼리에 존재하지 않음
  2419. ds_grid_grd_ordlist.addColumn("oldmskind", "STRING", 256 ); //
  2420. ds_grid_grd_ordlist.updatecontrol = false;
  2421. for (var i=0; i<ds_grid_grd_ordlist.rowcount; i++) {
  2422. ds_grid_grd_ordlist.setColumn(i, "oldmskind", ds_grid_grd_ordlist.getColumn(i, "mskind"));
  2423. ds_grid_grd_ordlist.setColumn(i, "newexecdd", ds_grid_grd_ordlist.getColumn(i, "execdd"));
  2424. ds_grid_grd_ordlist.setColumn(i, "oldprcpkindcd", ds_grid_grd_ordlist.getColumn(i, "prcpkindcd"));
  2425. }
  2426. ds_grid_grd_ordlist.addColumn("chkflag", "STRING", 256 ); // 쿼리에 존재하지 않음
  2427. ds_grid_grd_ordlist.addColumn("ordinptflag", "STRING", 256 ); // 쿼리에 존재하지 않음
  2428. ds_grid_grd_ordlist.addColumn("payflagyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2429. ds_grid_grd_ordlist.addColumn("ordchangeyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2430. ds_grid_grd_ordlist.addColumn("spcordyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2431. ds_grid_grd_ordlist.addColumn("probordchangeyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2432. ds_grid_grd_ordlist.addColumn("estmyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2433. ds_grid_grd_ordlist.addColumn("nochargeyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2434. ds_grid_grd_ordlist.addColumn("execchangeyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2435. ds_grid_grd_ordlist.addColumn("opansyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2436. ds_grid_grd_ordlist.addColumn("angioyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2437. ds_grid_grd_ordlist.addColumn("gsorddryn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2438. ds_grid_grd_ordlist.addColumn("sortcolor", "STRING", 256 ); // 쿼리에 존재하지 않음
  2439. ds_grid_grd_ordlist.addColumn("drgacptyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2440. ds_grid_grd_ordlist.addColumn("drugmthyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2441. ds_grid_grd_ordlist.addColumn("proccalctype", "STRING", 256 ); //
  2442. dsf_setDefaultVal(ds_grid_grd_ordlist, "chkflag:N,payflagyn:N,ordchangeyn:N,spcordyn:N,probordchangeyn:N,estmyn:N,nochargeyn:N,execchangeyn:N,opansyn:N,angioyn:N,gsorddryn:N,drugmthyn:N");
  2443. ds_grid_grd_ordlist.updatecontrol = true;
  2444. var insukindcd = ds_cond_req.getColumn(0, "insukindcd");
  2445. if (insukindcd == "11" || insukindcd == "21" || insukindcd == "22" ) {
  2446. var oParam = {};
  2447. oParam.id = "TRPIJ00350";
  2448. oParam.service = "bfjudgapp.InHospJudg";
  2449. oParam.method = "reqGetIsclEdiuDiff";
  2450. oParam.inds = "req=ds_cond_req";
  2451. oParam.outds = "ds_isclediudiff=isclediudiff";
  2452. oParam.async = true;
  2453. oParam.progress = false;
  2454. oParam.callback = "cf_TRPIJ00350";
  2455. tranf_submit(oParam);
  2456. }
  2457. fds_grid_grd_ordlist.rowposition = -1; // 선택 해제
  2458. lf_fSetOrderColorByExecdd();
  2459. fGetSelectedOrderData(); // 처방 조회부 - 재행/급여/항목구분 Radio 선택에 따라 처방 내역을 보여준다.
  2460. if(opener.frmf_getScreenID() == "SMPIJ00300") {
  2461. lf_SetBgcolorPordarcptyn();
  2462. }
  2463. lf_fSetItemBold(); // 라디오 색상 변경
  2464. }
  2465. function lf_SetBgcolorPordarcptyn() {
  2466. ds_grid_grd_ordlist.updatecontrol = false;
  2467. ds_grid_grd_ordlist.addColumn("pordarcptyn_bgcolor", "string");
  2468. var outdate = opener.gv_eroutdt.toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm");
  2469. var in24date = opener.gv_erindt.toDate("YYYYMMDDhhmm").getAddDate(24,"h").getDateFormat("YYYYMMDDhhmm");
  2470. if (outdate < in24date ) {
  2471. basedate = outdate;
  2472. } else {
  2473. basedate = in24date;
  2474. }
  2475. for (var i = 0; i < ds_grid_grd_ordlist.rowcount; i++) { // Grid 필터링 이후 Grid 상에 표시된 처방 개수만큼 돌면서
  2476. var pordarcptyn = ds_grid_grd_ordlist.getColumn(i, "pordarcptyn");
  2477. var execddtm = ds_grid_grd_ordlist.getColumn(i, "execdd");
  2478. // 응급수가 표기 : 별표1 (2015.12.30.LEJ)
  2479. if (pordarcptyn == "1" ) {
  2480. if ( execddtm < outdate) {
  2481. ds_grid_grd_ordlist.setColumn(i,"pordarcptyn_bgcolor", "#46AAFF");
  2482. }
  2483. } else if (pordarcptyn == "2" ) {
  2484. if ( execddtm < basedate && execddtm < outdate) {
  2485. ds_grid_grd_ordlist.setColumn(i,"pordarcptyn_bgcolor", "#FFB4EB");
  2486. }
  2487. } else if (pordarcptyn == "3" ) {
  2488. if ( execddtm < basedate) {
  2489. ds_grid_grd_ordlist.setColumn(i,"pordarcptyn_bgcolor", "#5EC75E");
  2490. }
  2491. } else {
  2492. ds_grid_grd_ordlist.setColumn(i,"pordarcptyn_bgcolor", color);
  2493. }
  2494. }
  2495. ds_grid_grd_ordlist.updatecontrol = true;
  2496. }
  2497. function lf_fOrdChangePay()
  2498. {
  2499. // 선택된 row의 체크값을 'Y' 로 해주는 함수
  2500. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  2501. // 제약조건을 사전에 처리하도록 한다. (데이터가 변경되는 row도 있기 때문에)
  2502. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  2503. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  2504. // 계산내역인 경우만
  2505. var ordcalcflag = fds_grid_grd_ordlist.getColumn(i, "ordcalcflag");
  2506. // 수가마스터 셋팅의 급비에 따른 급여 전환 처리
  2507. // 1. 수가마스터 상 급비가 급여 : 급여 , 100/100, 비급여 모두 선택가능
  2508. // 2. 수가마스터 상 급비가 100/100 : 100/100, 비급여 만 선택가능
  2509. // 3. 수가마스터 상 급비가 비급여 : 비급여 만 선택가능
  2510. var pynpy = fds_grid_grd_ordlist.getColumn(i, "pynpy");
  2511. // (급비변경시 구수가코드 ordinptflag == 'x' 이면 변경할 수 없음 처리)
  2512. var ordinptflag = fds_grid_grd_ordlist.getColumn(i, "ordinptflag");
  2513. // 청구생성된 처방이 있을경우 블로킹
  2514. var cretyn = fds_grid_grd_ordlist.getColumn(i, "cretyn");
  2515. if (cretyn == "Y") {
  2516. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  2517. //선택된 row의 체크값을 'N' 로 해주는 함수
  2518. //if(msg != 6){
  2519. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2520. return;
  2521. //}
  2522. } else if (ordinptflag == "X") {
  2523. sysf_messageBox("급비변경이 불가한 코드(구수가코드)가 포함되어 변경", "E001");
  2524. // 선택된 row의 체크값을 'N' 로 해주는 함수
  2525. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  2526. return;
  2527. } else if (pynpy != "0") { // 수가 마스터상 급비의 rule에 따라 급비가 불가한 코드가 있을때 alert
  2528. sysf_messageBox("급여처리 기준에 포함되지 않는 처방이 있어 변경", "E001");
  2529. // 선택된 row의 체크값을 'N' 로 해주는 함수
  2530. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  2531. return;
  2532. }
  2533. }
  2534. }
  2535. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  2536. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  2537. // 선택된 row
  2538. var cRrow = i;
  2539. // 선택된 row 와 같은 snglcalcscorcd 를 가진 선택되지 않은 row가 있다면 모두 변경을 할 것인지 메세지로 확인하도록 처리한다.
  2540. // 동일한 급비일 경우 처리하지 않는다.
  2541. var calcpayflag = fds_grid_grd_ordlist.getColumn(i, "calcpayflag");
  2542. if (calcpayflag != "0") {
  2543. var prcpdd1 = fds_grid_grd_ordlist.getColumn(i, "prcpdd");
  2544. var prcpno1 = fds_grid_grd_ordlist.getColumn(i, "prcpno");
  2545. var prcphistno1 = fds_grid_grd_ordlist.getColumn(i, "prcphistno");
  2546. var hngnm = fds_grid_grd_ordlist.getColumn(i, "hngnm");
  2547. var messageYn = "N";
  2548. // 선택되지 않은 처방이 같은 row를 담을 배열
  2549. var samecalclist = new Array();
  2550. var index = 0;
  2551. for (var j=0; j<fds_grid_grd_ordlist.rowcount; j++) {
  2552. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  2553. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  2554. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  2555. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  2556. if (chkflag != "Y" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  2557. messageYn = "Y";
  2558. samecalclist[index++] = j;
  2559. }
  2560. }
  2561. }
  2562. // 동일한 코드나 선택되지 않은 row가 있다면
  2563. if (messageYn == "Y") {
  2564. var rtnMsg = sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001");
  2565. if ( rtnMsg == 6 ) { //Yes
  2566. ds_hidden.setColumn(0, "judgresn", "");
  2567. ds_hidden.setColumn(0, "prcpdd", "");
  2568. ds_hidden.setColumn(0, "prcpno", "");
  2569. ds_hidden.setColumn(0, "prcphistno", "");
  2570. lf_fOrdExecutePay(i);
  2571. for(var k=0; k < index; k++) {
  2572. var row = samecalclist[k];
  2573. lf_fOrdExecutePay(row);
  2574. }
  2575. } else if( rtnMsg == 7 ) { // No
  2576. ds_hidden.setColumn(0, "judgresn", "");
  2577. ds_hidden.setColumn(0, "prcpdd", "");
  2578. ds_hidden.setColumn(0, "prcpno", "");
  2579. ds_hidden.setColumn(0, "prcphistno", "");
  2580. lf_fOrdExecutePay(cRrow);
  2581. } else { // Cancel
  2582. ds_hidden.setColumn(0, "judgresn", "");
  2583. ds_hidden.setColumn(0, "prcpdd", "");
  2584. ds_hidden.setColumn(0, "prcpno", "");
  2585. ds_hidden.setColumn(0, "prcphistno", "");
  2586. }
  2587. } else {
  2588. ds_hidden.setColumn(0, "judgresn", "");
  2589. ds_hidden.setColumn(0, "prcpdd", "");
  2590. ds_hidden.setColumn(0, "prcpno", "");
  2591. ds_hidden.setColumn(0, "prcphistno", "");
  2592. lf_fOrdExecutePay(cRrow);
  2593. }
  2594. }
  2595. }
  2596. // 선택된 row의 체크값을 'N' 로 해주는 함수
  2597. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2598. }
  2599. function lf_fOrdExecutePay(cRrow)
  2600. {
  2601. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn"); // ds_cond_req = send
  2602. // 처방이 있는경우
  2603. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  2604. if ( !utlf_isNull(chk_cd) ) {
  2605. fds_grid_grd_ordlist.setColumn(cRrow, "calcpayflag", "0");
  2606. fds_grid_grd_ordlist.setColumn(cRrow, "chkflag", "Y");
  2607. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  2608. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  2609. if ( !utlf_isNull(chkjudgresn) ) { //if ( chkjudgresn ) {
  2610. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  2611. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  2612. } else {
  2613. if ( judgresn == "-" || utlf_isNull(judgresn) || editflag == "N" || chkjudgresn == "-")
  2614. {
  2615. // 동일 처방에 이미 심사사유가 달려있으면 그것을 넣어주도록 하고, 없으면 넣도록 팝업을 띄운다.
  2616. var judgresn1 = ds_hidden.getColumn(0, "judgresn");
  2617. var prcpdd1 = ds_hidden.getColumn(0, "prcpdd");
  2618. var prcpno1 = ds_hidden.getColumn(0, "prcpno");
  2619. var prcphistno1 = ds_hidden.getColumn(0, "prcphistno");
  2620. var prcpdd2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  2621. var prcpno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  2622. var prcphistno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  2623. if (prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  2624. // 기존 심사사유 넣기
  2625. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn1);
  2626. } else {
  2627. // 새로 심사사유 넣기
  2628. var cd = lf_fSetAdjtResnCd2();
  2629. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  2630. ds_hidden.setColumn(0, "judgresn", cd);
  2631. ds_hidden.setColumn(0, "prcpdd", prcpdd2);
  2632. ds_hidden.setColumn(0, "prcpno", prcpno2);
  2633. ds_hidden.setColumn(0, "prcphistno", prcphistno2);
  2634. }
  2635. }
  2636. }
  2637. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  2638. //alert("row_stat = " + row_stat);
  2639. if(row_stat != 1){ // insert
  2640. if(row_stat != 2){ // insert & new
  2641. if(row_stat != 8){ // delete
  2642. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  2643. }
  2644. }
  2645. }
  2646. }
  2647. // 처방급비변경여부를 'Y'로 세팅
  2648. ds_grid_grd_ordlist.addColumn("payflagyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2649. fds_grid_grd_ordlist.setColumn(cRrow, "payflagyn", "Y");
  2650. // 처방내역이면 계산을 돌리지 않는다.
  2651. if ( fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O" ){
  2652. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  2653. // grd_ordlist.rowstatus(cRrow) = 0; // 2 : update
  2654. return;
  2655. }
  2656. }
  2657. function lf_fOrdChangeNopy()
  2658. {
  2659. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  2660. // 제약조건을 사전에 처리하도록 한다. (데이터가 변경되는 row도 있기 때문에)
  2661. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  2662. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  2663. // 선택된 row
  2664. var cRrow = i;
  2665. // 계산내역인 경우만
  2666. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  2667. // 동일한 급일 경우 처리하지 않는다.
  2668. var calcpayflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcpayflag");
  2669. // 수가마스터 셋팅의 급비에 따른 급여 전환 처리
  2670. // 1. 수가마스터 상 급비가 급여 : 급여 , 100/100, 비급여 모두 선택가능
  2671. // 2. 수가마스터 상 급비가 100/100 : 100/100, 비급여 만 선택가능
  2672. // 3. 수가마스터 상 급비가 비급여 : 비급여 만 선택가능
  2673. var pynpy = fds_grid_grd_ordlist.getColumn(cRrow, "pynpy");
  2674. // 하단의 경우는 급여구분 100/100 으로 변환 할 수 없다.
  2675. // 처방구분 대분류 핵의학 09 + 중분류( PET CT 02, PET MRI 05)
  2676. // 처방구분 대분류 방사선 MRI 25
  2677. var earncls1 = fds_grid_grd_ordlist.getColumn(cRrow, "earncls1");
  2678. var earncls2 = fds_grid_grd_ordlist.getColumn(cRrow, "earncls2");
  2679. var newexecdd = fds_grid_grd_ordlist.getColumn(cRrow, "newexecdd");
  2680. // (급비변경시 구수가코드 ordinptflag == 'x' 이면 변경 할 수 없음 처리)
  2681. var ordinptflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordinptflag");
  2682. // 청구생성된 처방이 있을경우 블로킹
  2683. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  2684. var calcscorcd = fds_grid_grd_ordlist.getColumn(cRrow, "grupcalcscorcd");
  2685. var execdd = fds_grid_grd_ordlist.getColumn(cRrow, "sortexecdd");
  2686. var insukind = fds_grid_grd_ordlist.getColumn(cRrow, "insukind");
  2687. if (cretyn == "Y") {
  2688. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  2689. //if(msg != 6){
  2690. // 선택된 row의 체크값을 'N' 로 해주는 함수
  2691. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2692. return;
  2693. //}
  2694. } else if (ordinptflag == "X") {
  2695. sysf_messageBox("급비변경이 불가한 코드(구수가코드)가 포함되어 변경", "E001");
  2696. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2697. return;
  2698. } else if (newexecdd < "20141201" && earncls1 == "09" && ((earncls2 == "02" || earncls2 == "05"))) {
  2699. sysf_messageBox("2014년 12월 1일 이전 PET-CT 처방은 전액본인부담으로 변경", "E001");
  2700. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2701. return;
  2702. //} else if (earncls1 == "25") {
  2703. // sysf_messageBox("MRI 처방은 전액본인부담으로 변경", "E001");
  2704. // fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2705. // return;
  2706. } else if (pynpy == "2") { // 수가 마스터상 급비의 rule에 따라 급비가 불가한 코드가 있을때 alert
  2707. sysf_messageBox("급여처리 기준에 포함되지 않는 처방이 있어 변경", "E001");
  2708. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2709. return;
  2710. } else if (lf_pam_fc_get_payflag(calcscorcd, execdd, insukind, "1") == "N") {
  2711. sysf_messageBox("전액본인처리 기준에 포함되지 않는 처방이 있어 변경", "E001");
  2712. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2713. return;
  2714. }
  2715. }
  2716. }
  2717. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  2718. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  2719. // 선택된 row
  2720. var cRrow = i;
  2721. // 동일한 급일 경우 처리하지 않는다.
  2722. var calcpayflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcpayflag");
  2723. if (calcpayflag != "1" ) {
  2724. // 선택된 row 와 같은 snglcalcscorcd 를 가진 선택안된 row가 있다면 모두 변경을 할 것인지 메세지로 확인하도록 처리한다.
  2725. var prcpdd1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  2726. var prcpno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  2727. var prcphistno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  2728. var hngnm = fds_grid_grd_ordlist.getColumn(cRrow, "hngnm");
  2729. var messageYn = "N";
  2730. // 선택되지 않은 동일한 처방 row를 담을 배열
  2731. var samecalclist = new Array();
  2732. var index = 0;
  2733. for (var j=0; j<fds_grid_grd_ordlist.rowcount; j++) {
  2734. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  2735. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  2736. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  2737. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  2738. if (chkflag != "Y" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  2739. messageYn = "Y";
  2740. samecalclist[index++] = j;
  2741. }
  2742. }
  2743. // 동일한 코드나 선택되지 않은 row가 있다면
  2744. if (messageYn == "Y") {
  2745. var rtnMsg = sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001")
  2746. if ( rtnMsg == 6) { // Yes
  2747. ds_hidden.setColumn(0, "judgresn", "");
  2748. ds_hidden.setColumn(0, "prcpdd", "");
  2749. ds_hidden.setColumn(0, "prcpno", "");
  2750. ds_hidden.setColumn(0, "prcphistno", "");
  2751. lf_fOrdExecuteNopy(cRrow);
  2752. for(var k=0; k < index; k++) {
  2753. var row = samecalclist[k];
  2754. lf_fOrdExecuteNopy(row);
  2755. }
  2756. } else if( rtnMsg == 7 ) { // No
  2757. ds_hidden.setColumn(0, "judgresn", "");
  2758. ds_hidden.setColumn(0, "prcpdd", "");
  2759. ds_hidden.setColumn(0, "prcpno", "");
  2760. ds_hidden.setColumn(0, "prcphistno", "");
  2761. lf_fOrdExecuteNopy(cRrow);
  2762. } else { // Cancel
  2763. ds_hidden.setColumn(0, "judgresn", "");
  2764. ds_hidden.setColumn(0, "prcpdd", "");
  2765. ds_hidden.setColumn(0, "prcpno", "");
  2766. ds_hidden.setColumn(0, "prcphistno", "");
  2767. }
  2768. } else {
  2769. ds_hidden.setColumn(0, "judgresn", "");
  2770. ds_hidden.setColumn(0, "prcpdd", "");
  2771. ds_hidden.setColumn(0, "prcpno", "");
  2772. ds_hidden.setColumn(0, "prcphistno", "");
  2773. lf_fOrdExecuteNopy(cRrow);
  2774. }
  2775. //fds_grid_grd_ordlist.setColumn(cRrow, "calcpayflag", "1"); 수정
  2776. }
  2777. }
  2778. }
  2779. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2780. }
  2781. function lf_fOrdChangeGnrl()
  2782. {
  2783. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  2784. // 제약조건을 사전에 처리하도록 한다. (데이터가 변경되는 row도 있기 때문에)
  2785. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  2786. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  2787. // 선택된 row
  2788. var cRrow = i;
  2789. // 계산내역인 경우만
  2790. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  2791. // (급비변경시 구수가코드 ordinptflag == 'X' 이면 변경할 수 없음 처리)
  2792. var ordinptflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordinptflag");
  2793. // 청구생성된 처방이 있을경우 블로킹
  2794. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  2795. // 급비변경여부
  2796. if (cretyn == "Y") {
  2797. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  2798. //if(msg != 6){
  2799. //선택된 row의 체크값을 'N' 로 해주는 함수
  2800. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2801. return;
  2802. //}
  2803. } else if (ordinptflag == "X") {
  2804. sysf_messageBox("급비변경이 불가한 코드(구수가코드)가 포함되어 변경", "E001");
  2805. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2806. return;
  2807. }
  2808. }
  2809. }
  2810. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  2811. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  2812. var cRrow = i;
  2813. // 동일한 급일 경우 처리하지 않는다.
  2814. var calcpayflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcpayflag");
  2815. if(calcpayflag != "2"){
  2816. // 선택된 row 와 같은 snglcalcscorcd 를 가진 선택안된 row가 있다면 모두 변경을 할 것인지 메세지로 확인하도록 처리한다.
  2817. var prcpdd1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  2818. var prcpno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  2819. var prcphistno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  2820. var hngnm = fds_grid_grd_ordlist.getColumn(cRrow, "hngnm");
  2821. var messageYn = "N";
  2822. // 선택되지 않은 같은 처방의 row를 담을 배열
  2823. var samecalclist = new Array();
  2824. var index = 0;
  2825. for (var j=0; j<fds_grid_grd_ordlist.rowcount; j++) {
  2826. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  2827. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  2828. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  2829. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  2830. if (chkflag != "Y" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  2831. messageYn = "Y";
  2832. samecalclist[index++] = j;
  2833. }
  2834. }
  2835. // 동일한 코드나 선택되지 않은 row가 있다면
  2836. if (messageYn == "Y") {
  2837. var rtnMsg = sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001");
  2838. if ( rtnMsg == 6 ) { // Yes
  2839. ds_hidden.setColumn(0, "judgresn", "");
  2840. ds_hidden.setColumn(0, "prcpdd", "");
  2841. ds_hidden.setColumn(0, "prcpno", "");
  2842. ds_hidden.setColumn(0, "prcphistno", "");
  2843. lf_fOrdExecuteGnrl(cRrow);
  2844. for(var k=0; k < index; k++) {
  2845. var row = samecalclist[k];
  2846. lf_fOrdExecuteGnrl(row);
  2847. }
  2848. } else if( rtnMsg == 7 ) { // No
  2849. ds_hidden.setColumn(0, "judgresn", "");
  2850. ds_hidden.setColumn(0, "prcpdd", "");
  2851. ds_hidden.setColumn(0, "prcpno", "");
  2852. ds_hidden.setColumn(0, "prcphistno", "");
  2853. lf_fOrdExecuteGnrl(cRrow);
  2854. } else { // Cancel
  2855. ds_hidden.setColumn(0, "judgresn", "");
  2856. ds_hidden.setColumn(0, "prcpdd", "");
  2857. ds_hidden.setColumn(0, "prcpno", "");
  2858. ds_hidden.setColumn(0, "prcphistno", "");
  2859. }
  2860. } else {
  2861. ds_hidden.setColumn(0, "judgresn", "");
  2862. ds_hidden.setColumn(0, "prcpdd", "");
  2863. ds_hidden.setColumn(0, "prcpno", "");
  2864. ds_hidden.setColumn(0, "prcphistno", "");
  2865. lf_fOrdExecuteGnrl(cRrow);
  2866. }
  2867. //fds_grid_grd_ordlist.setColumn(cRrow, "calcpayflag", "2"); 수정
  2868. }
  2869. }
  2870. }
  2871. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  2872. }
  2873. function lf_fOrdExecuteNopy(cRrow)
  2874. {
  2875. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  2876. // 처방이 있는 경우
  2877. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  2878. if(!utlf_isNull(chk_cd)){
  2879. fds_grid_grd_ordlist.setColumn(cRrow, "calcpayflag", "1");
  2880. fds_grid_grd_ordlist.setColumn(cRrow, "chkflag", "Y");
  2881. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  2882. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  2883. if (!utlf_isNull(chkjudgresn) && chkjudgresn != "-") {
  2884. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  2885. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  2886. } else {
  2887. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  2888. {
  2889. // 동일 처방에 이미 심사사유가 달려있으면 그것을 넣어주도록 하고, 없으면 넣도록 팝업을 띄운다.
  2890. var judgresn1 = ds_hidden.getColumn(0, "judgresn");
  2891. var prcpdd1 = ds_hidden.getColumn(0, "prcpdd");
  2892. var prcpno1 = ds_hidden.getColumn(0, "prcpno");
  2893. var prcphistno1 = ds_hidden.getColumn(0, "prcphistno");
  2894. var prcpdd2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  2895. var prcpno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  2896. var prcphistno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  2897. if (prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  2898. // 기존 심사사유 넣기
  2899. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn1);
  2900. } else {
  2901. // 새로운 심사사유 넣기
  2902. var cd = lf_fSetAdjtResnCd2();
  2903. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  2904. ds_hidden.setColumn(0, "judgresn", cd);
  2905. ds_hidden.setColumn(0, "prcpdd", prcpdd2);
  2906. ds_hidden.setColumn(0, "prcpno", prcpno2);
  2907. ds_hidden.setColumn(0, "prcphistno", prcphistno2);
  2908. //grp_judgresn.visible = true;
  2909. }
  2910. }
  2911. }
  2912. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  2913. if(row_stat != 1){ // insert
  2914. if(row_stat != 2){ // insert & new
  2915. if(row_stat != 8){ // delete
  2916. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  2917. }
  2918. }
  2919. }
  2920. }
  2921. // 계산내역을 갖고 온다.
  2922. // 처방급비변경여부를 'Y'로 세팅
  2923. ds_grid_grd_ordlist.addColumn("payflagyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2924. fds_grid_grd_ordlist.setColumn(cRrow, "payflagyn", "Y");
  2925. // 처방내역이면 계산을 돌리지 않는다.
  2926. if( fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O" ){
  2927. // grd_ordlist.rowstatus(cRrow) = 0; // 2 : update
  2928. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  2929. return;
  2930. }
  2931. }
  2932. function lf_fOrdExecuteGnrl(cRrow)
  2933. {
  2934. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  2935. // 처방이 있는 경우
  2936. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  2937. if(!utlf_isNull(chk_cd)){
  2938. fds_grid_grd_ordlist.setColumn(cRrow, "calcpayflag", "2")
  2939. fds_grid_grd_ordlist.setColumn(cRrow, "chkflag", "Y");
  2940. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  2941. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  2942. if(chkjudgresn){
  2943. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  2944. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  2945. }else{
  2946. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  2947. {
  2948. // 동일 처방에 이미 심사사유가 달려있으면 기존사유를 넣어주고, 없으면 사유를 넣을 수 있도록 팝업을 띄운다.
  2949. var judgresn1 = ds_hidden.getColumn(0, "judgresn");
  2950. var prcpdd1 = ds_hidden.getColumn(0, "prcpdd");
  2951. var prcpno1 = ds_hidden.getColumn(0, "prcpno");
  2952. var prcphistno1 = ds_hidden.getColumn(0, "prcphistno");
  2953. var prcpdd2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  2954. var prcpno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  2955. var prcphistno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  2956. if (prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  2957. // 기존 심사사유 넣기
  2958. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn1);
  2959. } else {
  2960. // 새로운 심사사유 넣기
  2961. var cd = lf_fSetAdjtResnCd2();
  2962. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  2963. ds_hidden.setColumn(0, "judgresn", cd);
  2964. ds_hidden.setColumn(0, "prcpdd", prcpdd2);
  2965. ds_hidden.setColumn(0, "prcpno", prcpno2);
  2966. ds_hidden.setColumn(0, "prcphistno", prcphistno2);
  2967. //grp_judgresn.visible = true;
  2968. }
  2969. }
  2970. }
  2971. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  2972. if(row_stat != 1){ // insert
  2973. if(row_stat != 2){ // insert & new
  2974. if(row_stat != 8){ // delete
  2975. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  2976. }
  2977. }
  2978. }
  2979. }
  2980. //계산내역을 갖고 온다.
  2981. //처방급비변경여부를 'Y'로 세팅
  2982. ds_grid_grd_ordlist.addColumn("payflagyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  2983. fds_grid_grd_ordlist.setColumn(cRrow, "payflagyn", "Y");
  2984. //처방내역이면 계산을 돌리지 않는다.
  2985. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  2986. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  2987. return;
  2988. }
  2989. }
  2990. function lf_fOrgReStore()
  2991. {
  2992. // 1. 선택된 row 'Y' 처리
  2993. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  2994. // 2. 제약조건을 사전에 처리하도록 한다. (데이터가 변경되는 row도 있기 때문에)
  2995. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  2996. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  2997. // 선택된row
  2998. var cRrow = i;
  2999. // 계산내역인 경우만
  3000. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3001. // 급비변경시 구수가코드 ordinptflag == 'X' 이면 변경할 수 없음 처리
  3002. var ordinptflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordinptflag");
  3003. // 청구생성된 처방이 있을경우 블로킹
  3004. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3005. if (cretyn == "Y") {
  3006. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3007. if (msg != 6) {// 선택된 row의 체크값을 'N' 로 해주는 함수
  3008. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3009. return;
  3010. }
  3011. } else if (ordinptflag == "X") {
  3012. sysf_messageBox("급비변경이 불가한 코드(구수가코드)가 포함되어 변경", "E001");
  3013. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3014. return;
  3015. } else if (ordcalcflag == "O") {
  3016. sysf_messageBox("미시행 처방이 포함되어 변경", "E001");
  3017. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3018. return;
  3019. }
  3020. }
  3021. }
  3022. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3023. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3024. // 선택된 row
  3025. var cRrow = i;
  3026. // 동일한 급일 경우 처리하지 않는다.
  3027. var calcpayflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcpayflag");
  3028. if(calcpayflag != "2"){
  3029. // 선택된 row 와 같은 snglcalcscorcd 를 가진 선택안된 row가 있다면 모두 변경을 할 것인지 메세지로 확인하도록 처리한다.
  3030. var prcpdd1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  3031. var prcpno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  3032. var prcphistno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  3033. var hngnm = fds_grid_grd_ordlist.getColumn(cRrow, "hngnm");
  3034. var messageYn = "N";
  3035. // 선택되지 않은 동일한 처방의 row를 담을 배열
  3036. var samecalclist = new Array();
  3037. var index = 0;
  3038. for (var j=0; j<fds_grid_grd_ordlist.rowcount; j++) {
  3039. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  3040. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  3041. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  3042. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  3043. if (chkflag != "Y" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  3044. messageYn = "Y";
  3045. samecalclist[index++] = j;
  3046. }
  3047. }
  3048. // 동일한 코드나 선택되지 않은 row가 있다면
  3049. if (messageYn == "Y") {
  3050. if (sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001") == 6) {
  3051. ds_hidden.setColumn(0, "judgresn", "");
  3052. ds_hidden.setColumn(0, "prcpdd", "");
  3053. ds_hidden.setColumn(0, "prcpno", "");
  3054. ds_hidden.setColumn(0, "prcphistno", "");
  3055. lf_fOrdExecuteOrgReStore(cRrow);
  3056. for(var k=0; k < index; k++) {
  3057. var row = samecalclist[k];
  3058. lf_fOrdExecuteOrgReStore(row);
  3059. }
  3060. }
  3061. } else {
  3062. ds_hidden.setColumn(0, "judgresn", "");
  3063. ds_hidden.setColumn(0, "prcpdd", "");
  3064. ds_hidden.setColumn(0, "prcpno", "");
  3065. ds_hidden.setColumn(0, "prcphistno", "");
  3066. lf_fOrdExecuteOrgReStore(cRrow);
  3067. }
  3068. }
  3069. }
  3070. }
  3071. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3072. }
  3073. function lf_fOrdExecuteOrgReStore(cRrow)
  3074. {
  3075. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3076. //처방이 있는경우
  3077. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  3078. if(!utlf_isNull(chk_cd)){
  3079. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  3080. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  3081. if(chkjudgresn){
  3082. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  3083. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  3084. }else{
  3085. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3086. {
  3087. // 동일 처방에 이미 심사사유가 달려있으면 그것을 넣어주도록 하고, 없으면 넣도록 팝업을 띄운다.
  3088. var judgresn1 = ds_hidden.getColumn(0, "judgresn");
  3089. var prcpdd1 = ds_hidden.getColumn(0, "prcpdd");
  3090. var prcpno1 = ds_hidden.getColumn(0, "prcpno");
  3091. var prcphistno1 = ds_hidden.getColumn(0, "prcphistno");
  3092. var prcpdd2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  3093. var prcpno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  3094. var prcphistno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  3095. if (prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  3096. // 기존 심사사유 넣기
  3097. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn1);
  3098. } else {
  3099. // 새로 심사사유 넣기
  3100. var cd = lf_fSetAdjtResnCd2();
  3101. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  3102. ds_hidden.setColumn(0, "judgresn", cd);
  3103. ds_hidden.setColumn(0, "prcpdd", prcpdd2);
  3104. ds_hidden.setColumn(0, "prcpno", prcpno2);
  3105. ds_hidden.setColumn(0, "prcphistno", prcphistno2);
  3106. //grp_judgresn.visible = true;
  3107. }
  3108. }
  3109. }
  3110. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3111. if(row_stat != 1){ // insert
  3112. if(row_stat != 2){ // insert & new
  3113. if(row_stat != 8){ // delete
  3114. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3115. }
  3116. }
  3117. }
  3118. }
  3119. // 계산내역을 갖고 온다.
  3120. // 처방급비변경여부를 'RS'로 세팅(restord 복원으로 ....) 하여 복원이라는걸로 판단한다.
  3121. ds_grid_grd_ordlist.addColumn("payflagyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  3122. fds_grid_grd_ordlist.setColumn(cRrow, "payflagyn", "RS");
  3123. // 처방내역이면 계산을 돌리지 않는다.
  3124. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  3125. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  3126. return;
  3127. }
  3128. }
  3129. function lf_fOrdChangeNoCharge1()
  3130. {
  3131. var instcd = ds_cond_req.getColumn(0, "instcd");
  3132. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3133. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3134. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3135. // 선택된row
  3136. var cRrow = i;
  3137. // 처방이 있는경우
  3138. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  3139. // 계산내역인 경우만
  3140. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3141. // 청구생성된 처방이 있을경우 블로킹
  3142. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3143. if (cretyn == "Y") {
  3144. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3145. //if(msg != 6){//선택된 row의 체크값을 'N' 로 해주는 함수
  3146. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3147. return;
  3148. //}
  3149. }
  3150. if(ordcalcflag == "C"){
  3151. if(!utlf_isNull(chk_cd)){
  3152. var ownbamt = fds_grid_grd_ordlist.getColumn(cRrow, "ownbamt");
  3153. if(ownbamt != "0") {
  3154. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "J");
  3155. } else if(ownbamt == "0") {
  3156. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "Y");
  3157. }
  3158. fds_grid_grd_ordlist.setColumn(cRrow, "nochargeyn", "-");
  3159. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  3160. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  3161. if(chkjudgresn){
  3162. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  3163. }else{
  3164. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3165. {
  3166. lf_fSetAdjtResnCd();
  3167. //grp_judgresn.visible = true;
  3168. }
  3169. }
  3170. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3171. if(row_stat != 1){ // insert
  3172. if(row_stat != 2){ // insert & new
  3173. if(row_stat != 8){ // delete
  3174. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3175. }
  3176. }
  3177. }
  3178. }
  3179. // 계산내역을 갖고 온다.
  3180. // 처방내역이면 계산을 돌리지 않는다.
  3181. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  3182. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  3183. return;
  3184. }
  3185. }
  3186. }
  3187. }
  3188. }
  3189. function lf_fOrdChangeNoCharge2()
  3190. {
  3191. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3192. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3193. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3194. // 선택된 row
  3195. var cRrow = i;
  3196. // 처방이 있는경우
  3197. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  3198. // 계산내역인 경우만
  3199. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3200. // 청구생성된 처방이 있을경우 블로킹
  3201. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3202. if (cretyn == "Y") {
  3203. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3204. //if(msg != 6){//선택된 row의 체크값을 'N' 로 해주는 함수
  3205. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3206. return;
  3207. //}
  3208. }
  3209. if(ordcalcflag == "C"){
  3210. if(!utlf_isNull(chk_cd)){
  3211. trace(chk_cd);
  3212. var totordamt = fds_grid_grd_ordlist.getColumn(cRrow, "totordamt");
  3213. if(totordamt != "0") {
  3214. trace(totordamt);
  3215. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "D");
  3216. } else if(totordamt == "0") {
  3217. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "Y");
  3218. }
  3219. fds_grid_grd_ordlist.setColumn(cRrow, "nochargeyn", "Y");
  3220. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  3221. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  3222. if(chkjudgresn){
  3223. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  3224. }else{
  3225. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3226. {
  3227. lf_fSetAdjtResnCd();
  3228. //grp_judgresn.visible = true;
  3229. }
  3230. }
  3231. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3232. if(row_stat != 1){ // insert
  3233. if(row_stat != 2){ // insert & new
  3234. if(row_stat != 8){ // delete
  3235. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3236. }
  3237. }
  3238. }
  3239. }
  3240. //계산내역을 갖고 온다.
  3241. //처방내역이면 계산을 돌리지 않는다.
  3242. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  3243. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  3244. return;
  3245. }
  3246. }
  3247. }
  3248. }
  3249. }
  3250. function lf_fOrdChangeInjectPayFlag()
  3251. {
  3252. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3253. var chkok = 0;
  3254. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3255. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3256. // 선택된 row
  3257. var cRrow = i;
  3258. // 처방이 있는경우
  3259. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  3260. // 계산내역인 경우만
  3261. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3262. // 급비
  3263. var calcpayflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcpayflag");
  3264. var pay100 = fds_grid_grd_ordlist.getColumn(cRrow, "pay100");
  3265. // 청구생성된 처방이 있을경우 블로킹
  3266. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3267. // 청구항목
  3268. var ediitem1 = fds_grid_grd_ordlist.getColumn(cRrow, "ediitem1");
  3269. if (cretyn == "Y") {
  3270. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3271. if(msg != 6) {//선택된 row의 체크값을 'N' 로 해주는 함수
  3272. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3273. return;
  3274. }
  3275. }
  3276. if (calcpayflag != "1" || pay100 != "@") {
  3277. alert("100/100에만 적용할 수 있는 메뉴입니다.");
  3278. return;
  3279. }
  3280. if (ediitem1 != "04") {
  3281. alert("주사에만 적용할 수 있는 메뉴입니다.");
  3282. return;
  3283. }
  3284. var calcflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcflag");
  3285. if (calcflag != "K" ) {
  3286. // 선택된 row 와 같은 snglcalcscorcd 를 가진 선택안된 row가 있다면 모두 변경을 할 것인지 메세지로 확인하도록 처리한다.
  3287. var prcpdd1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  3288. var prcpno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  3289. var prcphistno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  3290. var hngnm = fds_grid_grd_ordlist.getColumn(cRrow, "hngnm");
  3291. var messageYn = "N";
  3292. // 선택안된 같은 처방 row를 담을 배열
  3293. var samecalclist = new Array();
  3294. var index = 0;
  3295. for (var j=0; j<fds_grid_grd_ordlist.rowcount; j++) {
  3296. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  3297. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  3298. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  3299. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  3300. if (chkflag == "N" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  3301. messageYn = "Y";
  3302. samecalclist[index++] = j;
  3303. }
  3304. }
  3305. // 동일한 코드나 선택되지 않은 row가 있다면
  3306. if (messageYn == "Y") {
  3307. trace(chkok);
  3308. if (chkok == 0){
  3309. chkok = sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001");
  3310. if (chkok == 6) {
  3311. ds_hidden.setColumn(0, "judgresn", "");
  3312. ds_hidden.setColumn(0, "prcpdd", "");
  3313. ds_hidden.setColumn(0, "prcpno", "");
  3314. ds_hidden.setColumn(0, "prcphistno", "");
  3315. for(var k=0; k < samecalclist.length; k++) {
  3316. var row = samecalclist[k];
  3317. lf_fOrdExecuteInjectPayFlag(row);
  3318. }
  3319. }
  3320. } else if (chkok == 6) {
  3321. ds_hidden.setColumn(0, "judgresn", "");
  3322. ds_hidden.setColumn(0, "prcpdd", "");
  3323. ds_hidden.setColumn(0, "prcpno", "");
  3324. ds_hidden.setColumn(0, "prcphistno", "");
  3325. for(var k=0; k < samecalclist.length; k++) {
  3326. var row = samecalclist[k];
  3327. lf_fOrdExecuteInjectPayFlag(row);
  3328. }
  3329. }
  3330. } else {
  3331. ds_hidden.setColumn(0, "judgresn", "");
  3332. ds_hidden.setColumn(0, "prcpdd", "");
  3333. ds_hidden.setColumn(0, "prcpno", "");
  3334. ds_hidden.setColumn(0, "prcphistno", "");
  3335. lf_fOrdExecuteInjectPayFlag(cRrow);
  3336. }
  3337. } else {
  3338. var prcpdd1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  3339. var prcpno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  3340. var prcphistno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  3341. var hngnm = fds_grid_grd_ordlist.getColumn(cRrow, "hngnm");
  3342. var messageYn = "N";
  3343. // 선택안된 같은 처방 row를 담을 배열
  3344. var samecalclist = new Array();
  3345. var index = 0;
  3346. for (var j=0; j<fds_grid_grd_ordlist.rowcount; j++) {
  3347. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  3348. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  3349. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  3350. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  3351. if (chkflag == "N" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  3352. messageYn = "Y";
  3353. samecalclist[index++] = j;
  3354. }
  3355. }
  3356. // 동일한 코드나 선택되지 않은 row가 있다면
  3357. if (messageYn == "Y") {
  3358. if (sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001") == 6) {
  3359. ds_hidden.setColumn(0, "judgresn", "");
  3360. ds_hidden.setColumn(0, "prcpdd", "");
  3361. ds_hidden.setColumn(0, "prcpno", "");
  3362. ds_hidden.setColumn(0, "prcphistno", "");
  3363. for(var k=0; k < samecalclist.length; k++) {
  3364. var row = samecalclist[k];
  3365. lf_fOrdExecuteInjectPayFlag(row);
  3366. }
  3367. }
  3368. } else {
  3369. ds_hidden.setColumn(0, "judgresn", "");
  3370. ds_hidden.setColumn(0, "prcpdd", "");
  3371. ds_hidden.setColumn(0, "prcpno", "");
  3372. ds_hidden.setColumn(0, "prcphistno", "");
  3373. lf_fOrdExecuteInjectPayFlag(cRrow);
  3374. }
  3375. }
  3376. }
  3377. }
  3378. }
  3379. function lf_fOrdExecuteInjectPayFlag(cRrow)
  3380. {
  3381. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3382. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  3383. var calcflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcflag");
  3384. // 계산내역인 경우만
  3385. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3386. // 급비
  3387. var calcpayflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcpayflag");
  3388. var pay100 = fds_grid_grd_ordlist.getColumn(cRrow, "pay100");
  3389. // 청구생성된 처방이 있을경우 블로킹
  3390. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3391. // 청구항목
  3392. var ediitem1 = fds_grid_grd_ordlist.getColumn(cRrow, "ediitem1");
  3393. if (fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "C") {
  3394. if(!utlf_isNull(chk_cd)){
  3395. if(calcflag != "K") {
  3396. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "K");
  3397. } else if(calcflag == "K") {
  3398. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "Y");
  3399. }
  3400. fds_grid_grd_ordlist.setColumn(cRrow, "nochargeyn", "Y");
  3401. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  3402. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  3403. if(chkjudgresn){
  3404. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  3405. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  3406. }else{
  3407. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3408. {
  3409. // 동일 처방에 이미 심사사유가 달려있으면 그것을 넣어주도록 하고, 없으면 넣도록 팝업을 띄운다.
  3410. var judgresn1 = ds_hidden.getColumn(0, "judgresn");
  3411. var prcpdd1 = ds_hidden.getColumn(0, "prcpdd");
  3412. var prcpno1 = ds_hidden.getColumn(0, "prcpno");
  3413. var prcphistno1 = ds_hidden.getColumn(0, "prcphistno");
  3414. var prcpdd2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  3415. var prcpno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  3416. var prcphistno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  3417. if (prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  3418. // 기존 심사사유 넣기
  3419. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn1);
  3420. } else {
  3421. // 새로 심사사유 넣기
  3422. var cd = lf_fSetAdjtResnCd2();
  3423. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  3424. ds_hidden.setColumn(0, "judgresn", cd);
  3425. ds_hidden.setColumn(0, "prcpdd", prcpdd2);
  3426. ds_hidden.setColumn(0, "prcpno", prcpno2);
  3427. ds_hidden.setColumn(0, "prcphistno", prcphistno2);
  3428. }
  3429. }
  3430. }
  3431. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3432. if(row_stat != 1){ // insert
  3433. if(row_stat != 2){ // insert & new
  3434. if(row_stat != 8){ // delete
  3435. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3436. }
  3437. }
  3438. }
  3439. }
  3440. //계산내역을 갖고 온다.
  3441. //처방내역이면 계산을 돌리지 않는다.
  3442. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  3443. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  3444. return;
  3445. }
  3446. }
  3447. }
  3448. function lf_fOrdChangeMRI()
  3449. {
  3450. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3451. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3452. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3453. // 선택된 row
  3454. var cRrow = i;
  3455. // 처방이 있는경우
  3456. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  3457. // 계산내역인 경우만
  3458. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3459. // MRI인 경우만 수정이 되어야 한다
  3460. var earncls1 = fds_grid_grd_ordlist.getColumn(cRrow, "earncls1");
  3461. var earncls2 = fds_grid_grd_ordlist.getColumn(cRrow, "earncls2");
  3462. if (earncls1 != "25" ) {
  3463. sysf_messageBox("MRI 처방이 아닌 경우 50% 체감으로 변경", "E001");
  3464. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3465. return;
  3466. }
  3467. // 청구생성된 처방이 있을경우 블로킹 - 20081017 박창원
  3468. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3469. if (cretyn == "Y") {
  3470. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3471. //if(msg != 6){
  3472. //선택된 row의 체크값을 'N' 로 해주는 함수
  3473. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3474. return;
  3475. //}
  3476. }
  3477. if (ordcalcflag == "C") {
  3478. if(!utlf_isNull(chk_cd)){
  3479. var totordamt = fds_grid_grd_ordlist.getColumn(cRrow, "totordamt");
  3480. var calcqty = fds_grid_grd_ordlist.getColumn(cRrow, "calcqty");
  3481. if(calcqty != "0.5") {
  3482. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "M");
  3483. } else {
  3484. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "Y");
  3485. }
  3486. fds_grid_grd_ordlist.setColumn(cRrow, "nochargeyn", "Y");
  3487. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  3488. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  3489. if(!utlf_isNull(chkjudgresn) && chkjudgresn != "-"){
  3490. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  3491. }else{
  3492. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N" || chkjudgresn == "-")
  3493. {
  3494. lf_fSetAdjtResnCd();
  3495. //grp_judgresn.visible = true;
  3496. }
  3497. }
  3498. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3499. if(row_stat != 1){ // insert
  3500. if(row_stat != 2){ // insert & new
  3501. if(row_stat != 8){ // delete
  3502. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3503. }
  3504. }
  3505. }
  3506. }
  3507. //계산내역을 갖고 온다.
  3508. //처방내역이면 계산을 돌리지 않는다.
  3509. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  3510. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  3511. return;
  3512. }
  3513. }
  3514. }
  3515. }
  3516. }
  3517. function lf_fOrdChangeInsukind()
  3518. {
  3519. grp_changeinsukind.position = "absolute 427 270 677 504";
  3520. grp_changeinsukind.visible = true;
  3521. ds_grid_grd_insuhistory.copyData(opener.ds_grd_insuhistory);
  3522. }
  3523. function lf_fOrdChangeSpclYn()
  3524. {
  3525. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  3526. // 제약조건을 사전에 처리하도록 한다. (데이터가 변경되는 row도 있기 때문에)
  3527. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3528. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3529. // 선택된row
  3530. var cRrow = i;
  3531. // 선택진료 비적용 코드에 대해서는 block
  3532. var specaddflag = fds_grid_grd_ordlist.getColumn(cRrow, "specaddflag");
  3533. // 청구생성된 처방이 있을경우 블로킹
  3534. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3535. if (cretyn == "Y") {
  3536. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3537. //if(msg != 6){
  3538. //선택된 row의 체크값을 'N' 로 해주는 함수
  3539. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3540. return;
  3541. //}
  3542. }
  3543. if (specaddflag == "-") {
  3544. sysf_messageBox("선택진료 변경 미대상 처방이 포함되어 변경", "E001");
  3545. //선택된 row의 체크값을 'N' 로 해주는 함수
  3546. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3547. return;
  3548. }
  3549. }
  3550. }
  3551. grp_selectspecord.position = "absolute 480 286 731 417";
  3552. grp_selectspecord.visible = true; // 선택의사변경
  3553. }
  3554. function lf_fGSOrdDRYn()
  3555. {
  3556. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  3557. grd_selectgsord.position = "absolute 467 269 718 400";
  3558. grd_selectgsord.visible = true;
  3559. }
  3560. function lf_fGSOrdDRYn1()
  3561. {
  3562. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  3563. var atdocid = grd_selectgsord.cmb_gsatdoc.value;
  3564. var deptcd = grd_selectgsord.cmb_gsdeptcd.value;
  3565. var deptcd2 = ds_cond_req.getColumn(0, "orddeptcd");
  3566. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3567. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3568. //선택된row
  3569. var cRrow = i;
  3570. // 산정특례코드 확인 substr(estmmncd,4,1) in ('A','B','C')
  3571. var gsestmmncd = fds_grid_grd_ordlist.getColumn(cRrow, "gsestmmncd");
  3572. var Ngsestmmncd = gsestmmncd.substr(3,1);
  3573. if (Ngsestmmncd == "A" || Ngsestmmncd == "B" || Ngsestmmncd == "C") {
  3574. // 일단 외과, 흉부외과 : 서울성모는 진료과체크
  3575. // 진료과조건제외요청
  3576. //if(deptcd == "2040000000" ||deptcd == "2070000000"){
  3577. fds_grid_grd_ordlist.setColumn(cRrow, "gsorddr", atdocid);
  3578. fds_grid_grd_ordlist.setColumn(cRrow, "gsorddryn", "Y");
  3579. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3580. // if(row_stat != 1){
  3581. // if(row_stat != 3){
  3582. // if(row_stat != 4){
  3583. // grd_ordlist.rowStatus(cRrow) = 2;
  3584. // }
  3585. // }
  3586. // }
  3587. if(row_stat != 1){ // insert
  3588. if(row_stat != 2){ // insert & new
  3589. if(row_stat != 8){ // delete
  3590. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3591. }
  3592. }
  3593. }
  3594. } else {
  3595. sysf_messageBox("외과가산관련 처방이 아닙니다. 확인 후", "C003");
  3596. //선택된 row의 체크값을 'N' 로 해주는 함수
  3597. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3598. return;
  3599. }
  3600. }
  3601. }
  3602. grd_selectgsord.visible= false;
  3603. }
  3604. function lf_fOrdChangeExecDD()
  3605. {
  3606. grp_execdd.position = "absolute 421 294 780 400";
  3607. grp_execdd.visible = true;
  3608. if(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "H2"
  3609. || fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "H4"
  3610. || fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "I2")
  3611. {
  3612. grp_execdd.chk_afterchk.visible = true;
  3613. if(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "afterchk") == "Y") {
  3614. //ds_temp_afterchk.setColumn(0, "afterchk", "Y");
  3615. grp_exectm.chk_afterchk.value = "Y";
  3616. }
  3617. }
  3618. var selectedRows = grdf_getSelectedRows(grd_ordlist);
  3619. ds_hidden_chngexec.setColumn(0, "chngdd", fds_grid_grd_ordlist.getColumn(selectedRows[0], "execdd").substr(0,8)); // 일
  3620. ds_hidden_chngexec.setColumn(0, "chnghh", fds_grid_grd_ordlist.getColumn(selectedRows[0], "execdd").substr(8,2)); // 시
  3621. ds_hidden_chngexec.setColumn(0, "chngmn", fds_grid_grd_ordlist.getColumn(selectedRows[0], "execdd").substr(10,2)); // 분
  3622. }
  3623. function lf_fOrdChangeExecDD_CopyOrddd()
  3624. {
  3625. var selectedRows = grdf_getSelectedRows(grd_ordlist);
  3626. for(var i = 0 ; i < selectedRows.length ; i++) {
  3627. var newdate = fds_grid_grd_ordlist.getColumn(selectedRows[i], "orddd") + fds_grid_grd_ordlist.getColumn(selectedRows[i], "newexecdd").substr(8,4);
  3628. fds_grid_grd_ordlist.setColumn(selectedRows[i], "newexecdd", newdate);
  3629. fds_grid_grd_ordlist.setColumn(selectedRows[i], "execchangeyn", "Y");
  3630. }
  3631. // if(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "H2"
  3632. // || fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "H4"
  3633. // || fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "I2")
  3634. // {
  3635. // ds_temp_afterchk.setColumn(0, "chkyn", "Y");
  3636. // if(sysf_messageBox("사후심사에 변경내역을", "Q014") == 6) {
  3637. // ds_temp_afterchk.setColumn(0, "afterchk", "Y");
  3638. // } else {
  3639. // ds_temp_afterchk.setColumn(0, "afterchk", "N");
  3640. // }
  3641. // }
  3642. }
  3643. function lf_fOrdChangeSpclYn1()
  3644. {
  3645. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3646. var atdocid = grp_selectspecord.cmb_drlist.value;
  3647. var specyn = ds_init_cmb_orddrid.lookupExpr("atdoctid=="+atdocid, "specordyn");
  3648. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3649. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3650. // 선택된 row
  3651. var cRrow = i;
  3652. // 처방이 있는경우
  3653. //var unitspecyn = fds_grid_grd_ordlist.getColumn(cRrow, "unitspecyn");
  3654. // 계산내역인 경우만
  3655. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3656. // 청구생성된 처방이 있을경우 블로킹
  3657. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3658. if (cretyn == "Y") {
  3659. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3660. if(msg != 6) {
  3661. //선택된 row의 체크값을 'N' 로 해주는 함수
  3662. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3663. return;
  3664. }
  3665. }
  3666. if (ordcalcflag == "C") {
  3667. fds_grid_grd_ordlist.setColumn(cRrow, "execrid", atdocid);
  3668. fds_grid_grd_ordlist.setColumn(cRrow, "spcordyn", "Y");
  3669. if (specyn == "Y") {
  3670. fds_grid_grd_ordlist.setColumn(cRrow, "unitspecyn", "Y");
  3671. } else {
  3672. fds_grid_grd_ordlist.setColumn(cRrow, "unitspecyn", "N");
  3673. }
  3674. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  3675. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  3676. if(chkjudgresn){
  3677. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  3678. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  3679. } else {
  3680. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3681. {
  3682. lf_fSetAdjtResnCd();
  3683. }
  3684. }
  3685. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3686. if(row_stat != 1){ // insert
  3687. if(row_stat != 2){ // insert & new
  3688. if(row_stat != 8){ // delete
  3689. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3690. }
  3691. }
  3692. }
  3693. // 처방내역이면 계산을 돌리지 않는다.
  3694. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  3695. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  3696. return;
  3697. }
  3698. }
  3699. }
  3700. }
  3701. grp_selectspecord.visible= false;
  3702. }
  3703. function lf_fOrdChangeOphalf()
  3704. {
  3705. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3706. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3707. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3708. // 선택된 row
  3709. var cRrow = i;
  3710. // 처방이 있는경우
  3711. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  3712. // 계산내역인 경우만
  3713. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3714. // 행위인경우 가능하도록
  3715. var matractflag = fds_grid_grd_ordlist.getColumn(cRrow, "matractflag");
  3716. if (matractflag != "2" && matractflag != "3"){
  3717. sysf_messageBox("행위 처방이 아닌 경우 50% 적용", "E001");
  3718. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3719. return;
  3720. }
  3721. // 청구생성된 처방이 있을경우 블로킹 - 20081017 박창원
  3722. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3723. if (cretyn == "Y") {
  3724. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3725. //if(msg != 6){
  3726. //선택된 row의 체크값을 'N' 로 해주는 함수
  3727. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3728. return;
  3729. //}
  3730. }
  3731. if (ordcalcflag == "C") {
  3732. if(!utlf_isNull(chk_cd)){
  3733. var totordamt = fds_grid_grd_ordlist.getColumn(cRrow, "totordamt");
  3734. var calcqty = fds_grid_grd_ordlist.getColumn(cRrow, "calcqty");
  3735. if(calcqty != "0.5") {
  3736. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "O");
  3737. } else {
  3738. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "Y");
  3739. }
  3740. fds_grid_grd_ordlist.setColumn(cRrow, "nochargeyn", "Y");
  3741. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  3742. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  3743. if(chkjudgresn){
  3744. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  3745. }else{
  3746. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3747. {
  3748. lf_fSetAdjtResnCd();
  3749. //grp_judgresn.visible = true;
  3750. }
  3751. }
  3752. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3753. if(row_stat != 1){ // insert
  3754. if(row_stat != 2){ // insert & new
  3755. if(row_stat != 8){ // delete
  3756. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3757. }
  3758. }
  3759. }
  3760. }
  3761. //계산내역을 갖고 온다.
  3762. //처방내역이면 계산을 돌리지 않는다.
  3763. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  3764. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  3765. return;
  3766. }
  3767. }
  3768. }
  3769. }
  3770. }
  3771. function lf_fOrdMakeAL100()
  3772. {
  3773. // No-Charge 처리(본인부담 0원처리) 여부 적용/해제 ( fOrdChangeNoCharge1 ) 와 동일하게 구현하는데 exip의 calcstat를 'P'로 update, 창원샘 요청, JHP, 20090414
  3774. var instcd = ds_cond_req.getColumn(0, "instcd");
  3775. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3776. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3777. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3778. // 선택된row
  3779. var cRrow = i;
  3780. // 처방이 있는경우
  3781. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  3782. // 계산내역인 경우만
  3783. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  3784. // 청구생성된 처방이 있을경우 블로킹
  3785. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  3786. var dschdrugflag = fds_grid_grd_ordlist.getColumn(cRrow, "dschdrugflag"); //퇴원약 구분
  3787. var cvrtbfcretno = fds_grid_grd_ordlist.getColumn(cRrow, "cvrtbfcretno"); //외래덤프구분
  3788. var prcpclscd = fds_grid_grd_ordlist.getColumn(cRrow, "prcpclscd"); //.경구약외용약
  3789. if (cretyn == "Y") {
  3790. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3791. //if(msg != 6){
  3792. //선택된 row의 체크값을 'N' 로 해주는 함수
  3793. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3794. return;
  3795. //}
  3796. }
  3797. //경구약 외용약이어야한다.
  3798. if (!(prcpclscd == "A2" || prcpclscd == "A4")) {
  3799. sysf_messageBox("경구약,외용약이 아니면 변경 할 수 없습니다.", "E");
  3800. //선택된 row의 체크값을 'N' 로 해주는 함수
  3801. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3802. return;
  3803. }
  3804. //덤프건이여야하고
  3805. if (cvrtbfcretno == "0") {
  3806. sysf_messageBox("경구약,외용약이 아니면 변경 할 수 없습니다.", "E");
  3807. //선택된 row의 체크값을 'N' 로 해주는 함수
  3808. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  3809. return;
  3810. }
  3811. if(ordcalcflag == "C"){
  3812. if(!utlf_isNull(chk_cd)){
  3813. var prcpkindcd = fds_grid_grd_ordlist.getColumn(cRrow, "prcpkindcd");
  3814. var oldprcpkindcd = fds_grid_grd_ordlist.getColumn(cRrow, "oldprcpkindcd");
  3815. if(oldprcpkindcd != "60" && prcpkindcd == oldprcpkindcd) {
  3816. fds_grid_grd_ordlist.setColumn(cRrow, "payflagyn", "");
  3817. fds_grid_grd_ordlist.setColumn(cRrow, "prcpkindcd", "60");
  3818. } else if (prcpkindcd == "60" && prcpkindcd == oldprcpkindcd) {
  3819. fds_grid_grd_ordlist.setColumn(cRrow, "payflagyn", "");
  3820. fds_grid_grd_ordlist.setColumn(cRrow, "prcpkindcd", "20");
  3821. }
  3822. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  3823. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  3824. if(chkjudgresn){
  3825. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  3826. }else{
  3827. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3828. {
  3829. lf_fSetAdjtResnCd();
  3830. //grp_judgresn.visible = true;
  3831. }
  3832. }
  3833. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  3834. if(row_stat != 1){ // insert
  3835. if(row_stat != 2){ // insert & new
  3836. if(row_stat != 8){ // delete
  3837. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  3838. }
  3839. }
  3840. }
  3841. }
  3842. // 계산내역을 갖고 온다.
  3843. // 처방내역이면 계산을 돌리지 않는다.
  3844. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  3845. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  3846. return;
  3847. }
  3848. }
  3849. }
  3850. }
  3851. }
  3852. function lf_fOrdChangeProbOrdYn()
  3853. {
  3854. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  3855. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  3856. //처방이 있는경우
  3857. var probordyn = fds_grid_grd_ordlist.getColumn(i, "probordyn");
  3858. //계산내역인 경우만
  3859. var ordcalcflag = fds_grid_grd_ordlist.getColumn(i, "ordcalcflag");
  3860. if(ordcalcflag == "C"){
  3861. if(probordyn == "Y"){
  3862. fds_grid_grd_ordlist.setColumn(i, "probordyn", "N");
  3863. } else if(probordyn == "N"){
  3864. fds_grid_grd_ordlist.setColumn(i, "probordyn", "Y");
  3865. // grp_probresn.position = "absolute 411 248 684 479";
  3866. // grp_probresn.visible = true;
  3867. }
  3868. fds_grid_grd_ordlist.setColumn(i, "probordchangeyn", "Y");
  3869. var row_stat = fds_grid_grd_ordlist.getRowType(i);
  3870. if(row_stat != 1){ // insert
  3871. if(row_stat != 2){ // insert & new
  3872. if(row_stat != 8){ // delete
  3873. fds_grid_grd_ordlist.setRowType(i, 4); // update
  3874. }
  3875. }
  3876. }
  3877. }
  3878. }
  3879. }
  3880. lf_fSetColorSpclJudgOrder();
  3881. }
  3882. function lf_fOrdChangeWhy()
  3883. {
  3884. lf_fSetAdjtResnCd();
  3885. // 위 함수에 사유 입력 화면이 따로 존재
  3886. // grp_judgadjtresncd.position = "absolute 469 237 742 680";
  3887. // grp_judgadjtresncd.visible = true;
  3888. }
  3889. function lf_fOrdChangeOp()
  3890. {
  3891. var row = fds_grid_grd_ordlist.rowposition;
  3892. var ordaddinptflag = fds_grid_grd_ordlist.getColumn(row, "ordaddinptflag");
  3893. var ordcalcflag = fds_grid_grd_ordlist.getColumn(row, "ordcalcflag");
  3894. if (ordcalcflag != "C") {
  3895. return;
  3896. }
  3897. if (ordaddinptflag != "3") { // 수술처방이 아닌경우 Block - 20090613 박창원
  3898. sysf_messageBox("수술 처방이 아닌 경우 변경", "E001");
  3899. return;
  3900. }
  3901. // 청구생성된 처방이 있을경우 블로킹
  3902. var cretyn = fds_grid_grd_ordlist.getColumn(row, "cretyn");
  3903. if (cretyn == "Y") {
  3904. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3905. //if(msg != 6){
  3906. return;
  3907. //}
  3908. }
  3909. var erprcpflag = fds_grid_grd_ordlist.getColumn(row, "erprcpflag");
  3910. var nigtprcpflag = fds_grid_grd_ordlist.getColumn(row, "nigtprcpflag");
  3911. ds_hidden_op.setColumn(0, "erprcpflag", erprcpflag);
  3912. ds_hidden_op.setColumn(0, "nigtprpcflag", nigtprcpflag);
  3913. grp_changeop.position.x = "396";
  3914. grp_changeop.position.y = "316";
  3915. grp_changeop.visible = true;
  3916. }
  3917. function lf_fOrdChangeOp1()
  3918. {
  3919. var row = fds_grid_grd_ordlist.rowposition;
  3920. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3921. var opansflag = grp_changeop.cmb_opflag.value;
  3922. var judgresn = fds_grid_grd_ordlist.getColumn(row, "judgadjtresncd");
  3923. var editflag = fds_grid_grd_ordlist.getColumn(row, "editflag");
  3924. grp_changeop.visible = false;
  3925. if(!utlf_isNull(chkjudgresn) && chkjudgresn != "-" ){
  3926. fds_grid_grd_ordlist.setColumn(row, "judgadjtresncd", chkjudgresn);
  3927. }else{
  3928. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3929. {
  3930. lf_fSetAdjtResnCd();
  3931. }
  3932. }
  3933. // if (grp_changeop.chk_oper.value != "N" && grp_changeop.chk_oper.value != "Y") {
  3934. // grp_changeop.chk_oper.value = "N";
  3935. // } else {
  3936. // grp_changeop.chk_oper.value = "Y";
  3937. // }
  3938. //
  3939. // if (grp_changeop.chk_opnigt.value != "N" && grp_changeop.chk_opnigt.value != "Y") {
  3940. // grp_changeop.chk_opnigt.value = "N";
  3941. // }
  3942. // else {
  3943. // grp_changeop.chk_opnigt.value = "Y";
  3944. // }
  3945. fds_grid_grd_ordlist.setColumn(row, "opansyn", "Y");
  3946. fds_grid_grd_ordlist.setColumn(row, "opansflagcd", opansflag);
  3947. fds_grid_grd_ordlist.setColumn(row, "erprcpflag", grp_changeop.chk_oper.value);
  3948. fds_grid_grd_ordlist.setColumn(row, "nigtprcpflag", grp_changeop.chk_opnigt.value);
  3949. }
  3950. function lf_fOrdChangeAns()
  3951. {
  3952. var row = fds_grid_grd_ordlist.rowposition;
  3953. var ordaddinptflag = fds_grid_grd_ordlist.getColumn(row, "ordaddinptflag");
  3954. var ordcalcflag = fds_grid_grd_ordlist.getColumn(row, "ordcalcflag");
  3955. if (ordcalcflag != "C") {
  3956. return;
  3957. }
  3958. if (ordaddinptflag != "1") { // 마취처방이 아닌경우 Block - 20090613 박창원
  3959. sysf_messageBox("마취 처방이 아닌 경우 변경", "E001");
  3960. return;
  3961. }
  3962. // 청구생성된 처방이 있을경우 블로킹
  3963. var cretyn = fds_grid_grd_ordlist.getColumn(row, "cretyn");
  3964. if (cretyn == "Y") {
  3965. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  3966. //if(msg != 6){
  3967. return;
  3968. //}
  3969. }
  3970. var erprcpflag = fds_grid_grd_ordlist.getColumn(row, "erprcpflag");
  3971. var nigtprcpflag = fds_grid_grd_ordlist.getColumn(row, "nigtprcpflag");
  3972. ds_hidden_op.setColumn(0, "erprcpflag", erprcpflag);
  3973. ds_hidden_op.setColumn(0, "nigtprpcflag", nigtprcpflag);
  3974. grp_changeans.position = "absolute 477 272 728 403";
  3975. grp_changeans.visible = true;
  3976. }
  3977. function lf_fOrdChangeAns1()
  3978. {
  3979. var row = fds_grid_grd_ordlist.rowposition;
  3980. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  3981. var opansflag = grp_changeop.cmb_opflag.value;
  3982. var judgresn = fds_grid_grd_ordlist.getColumn(row, "judgadjtresncd");
  3983. var editflag = fds_grid_grd_ordlist.getColumn(row, "editflag");
  3984. grp_changeans.visible= false;
  3985. if(chkjudgresn){
  3986. fds_grid_grd_ordlist.setColumn(row, "judgadjtresncd", chkjudgresn);
  3987. }else{
  3988. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  3989. {
  3990. lf_fSetAdjtResnCd();
  3991. }
  3992. }
  3993. if (grp_changeans.chk_anser.value != "N Y" && grp_changeans.chk_anser.value != "Y") {
  3994. grp_changeans.chk_anser.value = "N";
  3995. } else {
  3996. grp_changeans.chk_anser.value = "Y";
  3997. }
  3998. if (grp_changeans.chk_ansnigt.value != "N Y" && grp_changeans.chk_ansnigt.value != "Y") {
  3999. grp_changeans.chk_ansnigt.value = "N";
  4000. }
  4001. else {
  4002. grp_changeans.chk_ansnigt.value = "Y";
  4003. }
  4004. fds_grid_grd_ordlist.setColumn(row, "opansyn", "Y");
  4005. fds_grid_grd_ordlist.setColumn(row, "opansflagcd", opansflag);
  4006. fds_grid_grd_ordlist.setColumn(row, "erprcpflag", grp_changeans.chk_anser.value);
  4007. fds_grid_grd_ordlist.setColumn(row, "nigtprcpflag", grp_changeans.chk_ansnigt.value);
  4008. }
  4009. function lf_fOrdChangeAngio()
  4010. {
  4011. var row = fds_grid_grd_ordlist.rowposition;
  4012. var ordaddinptflag = fds_grid_grd_ordlist.getColumn(row, "ordaddinptflag");
  4013. var ordcalcflag = fds_grid_grd_ordlist.getColumn(row, "ordcalcflag");
  4014. if (ordcalcflag != "C") {
  4015. return;
  4016. }
  4017. if (ordaddinptflag != "4") { // Angio처방이 아닌경우 Block - 20090613 박창원
  4018. sysf_messageBox("Angio 처방이 아닌 경우 변경", "E001");
  4019. return;
  4020. }
  4021. // 청구생성된 처방이 있을경우 블로킹
  4022. var cretyn = fds_grid_grd_ordlist.getColumn(row, "cretyn");
  4023. if (cretyn == "Y") {
  4024. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  4025. //if(msg != 6){
  4026. return;
  4027. //}
  4028. }
  4029. var erprcpflag = fds_grid_grd_ordlist.getColumn(row, "erprcpflag");
  4030. var nigtprcpflag = fds_grid_grd_ordlist.getColumn(row, "nigtprcpflag");
  4031. ds_hidden_op.setColumn(0, "erprcpflag", erprcpflag);
  4032. ds_hidden_op.setColumn(0, "nigtprpcflag", nigtprcpflag);
  4033. grp_changeangio.position = "absolute 428 280 679 411";
  4034. grp_changeangio.visible = true;
  4035. }
  4036. function lf_fOrdChangeAngio1()
  4037. {
  4038. var row = fds_grid_grd_ordlist.rowposition;
  4039. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  4040. var angioflag = grp_changeangio.cmb_angio.value;
  4041. var judgresn = fds_grid_grd_ordlist.getColumn(row, "judgadjtresncd");
  4042. var editflag = fds_grid_grd_ordlist.getColumn(row, "editflag");
  4043. grp_changeangio.visible= false;
  4044. if ( chkjudgresn ) {
  4045. fds_grid_grd_ordlist.setColumn(row, "judgadjtresncd", chkjudgresn);
  4046. } else {
  4047. if ( judgresn == "-" || utlf_isNull(judgresn) || editflag == "N" )
  4048. {
  4049. lf_fSetAdjtResnCd();
  4050. }
  4051. }
  4052. if (grp_changeangio.chk_angioer.value != "N Y" && grp_changeangio.chk_angioer.value != "Y") {
  4053. grp_changeangio.chk_angioer.value = "N";
  4054. } else {
  4055. grp_changeans.chk_angioer.value = "Y";
  4056. }
  4057. if (grp_changeangio.chk_angionigt.value != "N Y" && grp_changeangio.chk_angionigt.value != "Y") {
  4058. grp_changeangio.chk_angionigt.value = "N";
  4059. }
  4060. else {
  4061. grp_changeans.chk_angionigt.value = "Y";
  4062. }
  4063. fds_grid_grd_ordlist.setColumn(row, "angioyn", "Y");
  4064. fds_grid_grd_ordlist.setColumn(row, "angioflagcd", angioflag);
  4065. fds_grid_grd_ordlist.setColumn(row, "erprcpflag", grp_changeangio.chk_angioer.value);
  4066. fds_grid_grd_ordlist.setColumn(row, "nigtprcpflag", grp_changeangio.grp_changeangio.value);
  4067. }
  4068. function lf_fSendMsgPat()
  4069. {
  4070. // // open("SPZMI00101" ,"", "10", "10", "SPZMI00101", "", "", "", "");
  4071. // model.makeValue("/root/temp/opentab", "receivemsg");
  4072. // zmifOpenMessagePopup("/root/temp"); // root/temp/opentab 에 receivemsg (받은메세지함) 값을 주고 오픈한다.
  4073. }
  4074. function lf_fSendMsgOrder()
  4075. {
  4076. // // open("SPZMI00101" ,"", "10", "10", "SPZMI00101", "", "", "", "");
  4077. // model.makeValue("/root/temp/opentab", "pmsg");
  4078. // zmifOpenMessagePopup("/root/temp"); // root/temp/opentab 에 pmsg (환자메세지작성창) 값을 주고 오픈한다.
  4079. }
  4080. function lf_fSrchEstmCd()
  4081. {
  4082. ds_rslt_sppiz00800.clearData();
  4083. ds_cond_sppiz00800.clearData();
  4084. ds_cond_sppiz00800.addRow();
  4085. var row = fds_grid_grd_ordlist.rowposition;
  4086. var insukindcd = ds_cond_req.getColumn(0, "insukindcd");
  4087. var estmcls = fds_grid_grd_ordlist.getColumn(row, "estmcls");
  4088. var estmmncd = fds_grid_grd_ordlist.getColumn(row, "estmmncd");
  4089. if (utlf_isNull(estmmncd)) {
  4090. // 산정의미코드를 삭제한 경우
  4091. // fSetCalc();
  4092. } else if (isNaN(estmmncd) == true) { // 숫자만 있으면 false , 문자 포함이면 true
  4093. fds_grid_grd_ordlist.setColumn(row, "estmmncd", ds_item5_clod.getColumn(0, "estmmncd"));
  4094. if ( ds_item5_clod.getColumn(0, "rowstatus") == 0 ) {
  4095. fds_grid_grd_ordlist.setRowType(row, 1);
  4096. } else if ( ds_item5_clod.getColumn(0, "rowstatus") == 1 ) {
  4097. fds_grid_grd_ordlist.setRowType(row, 2);
  4098. } else if ( ds_item5_clod.getColumn(0, "rowstatus") == 2 ) {
  4099. fds_grid_grd_ordlist.setRowType(row, 4);
  4100. } else if ( ds_item5_clod.getColumn(0, "rowstatus") == 3 ) {
  4101. fds_grid_grd_ordlist.setRowType(row, 2);
  4102. } else if ( ds_item5_clod.getColumn(0, "rowstatus") == 4 ) {
  4103. fds_grid_grd_ordlist.setRowType(row, 8);
  4104. }
  4105. sysf_messageBox("산정의미코드는 숫자만", "C001"); ///산정의미코드는 숫자만 입력하십시오.
  4106. return false;
  4107. } else {
  4108. ds_cond_sppiz00800.setColumn(0, "insukind", insukindcd);
  4109. ds_cond_sppiz00800.setColumn(0, "estmcls", estmcls);
  4110. ds_cond_sppiz00800.setColumn(0, "estmmncd", estmmncd);
  4111. var tmp = fds_grid_grd_ordlist.getColumn(row, "execdd");
  4112. var execdd = tmp.substr(0,4) + tmp.substr(4,2) + tmp.substr(6,2);
  4113. ds_cond_sppiz00800.setColumn(0, "todd", execdd);
  4114. if (insukindcd == "11") {
  4115. ds_cond_sppiz00800.setColumn(0, "repcd", "insu");
  4116. } else if (insukindcd == "21" || insukindcd == "22") {
  4117. ds_cond_sppiz00800.setColumn(0, "repcd", "proc");
  4118. } else if (insukindcd == "31") {
  4119. ds_cond_sppiz00800.setColumn(0, "repcd", "autmb");
  4120. } else if (insukindcd == "41") {
  4121. ds_cond_sppiz00800.setColumn(0, "repcd", "inducs");
  4122. } else if (insukindcd == "51") {
  4123. ds_cond_sppiz00800.setColumn(0, "repcd", "gnrl");
  4124. } else if (insukindcd == "61") {
  4125. ds_cond_sppiz00800.setColumn(0, "repcd", "forgn");
  4126. } else if (insukindcd == "71") {
  4127. ds_cond_sppiz00800.setColumn(0, "repcd", "mou");
  4128. } else {
  4129. ds_cond_sppiz00800.setColumn(0, "repcd", "insu");
  4130. }
  4131. // 조회
  4132. tranf_submit({
  4133. id : "TRPID20307"
  4134. , service : "aftjudgapp.InAftJudg"
  4135. , method : "reqGetNextJudgNo"
  4136. , inds : "req=ds_cond_clamkey"
  4137. , outds : "ds_data_clamkey=nextclbs"
  4138. , async : false
  4139. });
  4140. var clcd = ds_rslt_sppiz00800.getColumn(0, "clcd");
  4141. if (clcd.length == 1) {
  4142. // 수가코드의 estmcls(산정분류)에 따라 선택가능한 5자리의 estmmncd(산정의미), 이에 해당하는 3자리의 estmcd(산정코드)를 조회하고 금액을 재계산한다.
  4143. // fSetCalc();
  4144. } else {
  4145. ds_cond_sppiz00800.clearData();
  4146. ds_rslt_sppiz00800.clearData();
  4147. // var objArg = new Object();
  4148. //
  4149. // objArg.sName = this.name;
  4150. // objArg.sVal01 = ds_cond_req.getColumn(0, "drgcd");
  4151. ds_cond_sppiz00800.setColumn(0, "name" , this.name);
  4152. ds_cond_sppiz00800.setColumn(0, "calcscorcd", fds_grid_grd_ordlist.getColumn(row, "snglcalcscorcd"));
  4153. ds_cond_sppiz00800.setColumn(0, "insukind" , group2.opt_insukind.value);
  4154. ds_cond_sppiz00800.setColumn(0, "estmcls" , fds_grid_grd_ordlist.getColumn(row, "estmcls"));
  4155. ds_cond_sppiz00800.setColumn(0, "estmmncd" , fds_grid_grd_ordlist.getColumn(row, "estmcd"));
  4156. ds_cond_sppiz00800.setColumn(0, "todd", execdd);
  4157. var rtn = frmf_modal("SPPIZ00800", "SPPIZ00800", {objDs:ds_cond_sppiz00800}, "", "", "", "", "", "", "", "", "", "M");// SPPIZ00800_산정코드조회.xrw
  4158. if (ds_rslt_sppiz00800.getColumn(0, "estmcd")) {
  4159. fds_grid_grd_ordlist.setColumn(row, "estmmncd", ds_rslt_sppiz00800.getColumn(0, "estmmncd"));
  4160. fds_grid_grd_ordlist.setColumn(row, "estmcd", ds_rslt_sppiz00800.getColumn(0, "estmcd"));
  4161. fds_grid_grd_ordlist.setColumn(row, "estmcdnm", ds_rslt_sppiz00800.getColumn(0, "estmcdnm"));
  4162. // fSetCalc();
  4163. } else {
  4164. fds_grid_grd_ordlist.setColumn(row, "estmmncd", ds_item5_clod.getColumn(0, "estmmncd"));
  4165. fds_grid_grd_ordlist.setRowType(row, ds_item5_clod.getColumn(0, "rowstatus"));
  4166. }
  4167. }
  4168. }
  4169. var msg = "산정코드 [" + estmcls + "] ";
  4170. if (estmmncd) {
  4171. msg += "산정의미코드: " + estmmncd;
  4172. } else {
  4173. return true;
  4174. }
  4175. var estmcd = ds_rslt_sppiz00800_clcd.getColumn(0, "estmcd");
  4176. var estmcdnm = ds_rslt_sppiz00800_clcd.getColumn(0, "estmcdnm");
  4177. if (estmcd) {
  4178. msg += " / 산정코드: " + estmcd;
  4179. }
  4180. if (estmcdnm) {
  4181. msg += " / 명칭: " + estmcdnm;
  4182. }
  4183. var addmthd = ds_rslt_sppiz00800_clcd.getColumn(0, "addmthd");
  4184. if (addmthd) {
  4185. msg += " // 계산방법: [" + addmthd + "] ";
  4186. msg += ds_rslt_sppiz00800_clcd.getColumn(0, "pnt");
  4187. msg += " / " + ds_rslt_sppiz00800_clcd.getColumn(0, "amt");
  4188. msg += " / " + ds_rslt_sppiz00800_clcd.getColumn(0, "rate");
  4189. } else {
  4190. msg += " // 조회된 산정코드가 없습니다.";
  4191. }
  4192. ds_hidden_list3.setColumn(0, "msgspclformat", msg);
  4193. return true;
  4194. }
  4195. function lf_fChngEstmmncd()
  4196. {
  4197. ds_rslt_sppiz00800.clearData();
  4198. ds_cond_sppiz00800.clearData();
  4199. ds_cond_sppiz00800.addRow();
  4200. var chkp = 0;
  4201. var chkb = 0;
  4202. var insukindcd = ds_cond_req.getColumn(0, "insukindcd");
  4203. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  4204. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  4205. // 선택된row
  4206. var cRrow = i;
  4207. // 처방이 있는경우
  4208. var matractflag = fds_grid_grd_ordlist.getColumn(cRrow, "matractflag");
  4209. var ediitem1 = fds_grid_grd_ordlist.getColumn(cRrow, "ediitem1");
  4210. var ediitem2 = fds_grid_grd_ordlist.getColumn(cRrow, "ediitem2");
  4211. var ediitem = ediitem1 + ediitem2;
  4212. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  4213. var estmcls = fds_grid_grd_ordlist.getColumn(cRrow, "estmcls");
  4214. var estmmncd = fds_grid_grd_ordlist.getColumn(cRrow, "estmmncd");
  4215. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  4216. if (cretyn == "Y") {
  4217. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  4218. //if(msg != 6){
  4219. return;
  4220. //}
  4221. }
  4222. if ( matractflag == "2" || matractflag == "3") {
  4223. ds_cond_sppiz00800.setColumn(0, "estmmncd","");
  4224. var execdd = fds_grid_grd_ordlist.getColumn(cRrow, "execdd").substr(0,8);
  4225. ds_cond_sppiz00800.setColumn(0, "name" , this.name);
  4226. ds_cond_sppiz00800.setColumn(0, "calcscorcd", fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd"));
  4227. ds_cond_sppiz00800.setColumn(0, "insukind" , group2.opt_insukind.value);
  4228. ds_cond_sppiz00800.setColumn(0, "estmcls" , fds_grid_grd_ordlist.getColumn(cRrow, "estmcls"));
  4229. ds_cond_sppiz00800.setColumn(0, "estmmncd" , fds_grid_grd_ordlist.getColumn(cRrow, "estmcd"));
  4230. ds_cond_sppiz00800.setColumn(0, "todd", execdd);
  4231. if (chkp==0) { //한번만 콜하자.
  4232. var rtn = frmf_modal("SPPIZ00800", "SPPIZ00800", {objDs:ds_cond_sppiz00800}, "", "", "", "", "", "", "", "", "", "M");
  4233. chkp++;
  4234. }
  4235. if (!utlf_isNull(rtn)) {
  4236. trace("rtn = " + rtn.toString);
  4237. }
  4238. var rslt_estmmncd = ds_rslt_sppiz00800.getColumn(0, "estmmncd");
  4239. var rslt_estmcd = ds_rslt_sppiz00800.getColumn(0, "estmcd");
  4240. var rslt_estmcdnm = ds_rslt_sppiz00800.getColumn(0, "estmcdnm");
  4241. if ( rslt_estmmncd && rslt_estmcd ) {
  4242. if ( !utlf_isNull(chk_cd) ) {
  4243. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  4244. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  4245. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  4246. if ( chkjudgresn ) {
  4247. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  4248. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  4249. }else{
  4250. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  4251. {
  4252. lf_fSetAdjtResnCd(); // 사유
  4253. }
  4254. }
  4255. }
  4256. if (fds_grid_grd_ordlist.getRowType(cRrow) != 2) {
  4257. fds_grid_grd_ordlist.setRowType(cRrow, 4);
  4258. }
  4259. fds_grid_grd_ordlist.setColumn(cRrow, "estmmncd", rslt_estmmncd);
  4260. fds_grid_grd_ordlist.setColumn(cRrow, "estmcd", rslt_estmcd);
  4261. fds_grid_grd_ordlist.setColumn(cRrow, "estmyn", "Y");
  4262. }
  4263. // 보험대분류항이 0101, 0102, 0103, 0201, 0202, 0203, 0204, 0299 인 경우
  4264. } else if (ediitem=="0101" || ediitem=="0102" || ediitem=="0103" || ediitem=="0201"
  4265. || ediitem=="0202" || ediitem=="0203" || ediitem=="0204" || ediitem=="0299" ) {
  4266. ds_cond_sppiz00800.setColumn(0, "estmmncd","");
  4267. var execdd = fds_grid_grd_ordlist.getColumn(cRrow, "execdd").substr(0,8);
  4268. ds_cond_sppiz00800.setColumn(0, "todd", execdd);
  4269. ds_cond_sppiz00800.setColumn(0, "name" , this.name);
  4270. ds_cond_sppiz00800.setColumn(0, "calcscorcd", fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd"));
  4271. ds_cond_sppiz00800.setColumn(0, "insukind" , group2.opt_insukind.value);
  4272. ds_cond_sppiz00800.setColumn(0, "estmcls" , fds_grid_grd_ordlist.getColumn(cRrow, "estmcls"));
  4273. ds_cond_sppiz00800.setColumn(0, "estmmncd" , fds_grid_grd_ordlist.getColumn(cRrow, "estmcd"));
  4274. if (chkp==0) { //한번만 콜하자.
  4275. var rtn = frmf_modal("SPPIZ00800", "SPPIZ00800", {objDs:ds_cond_sppiz00800}, "", "", "", "", "", "", "", "", "", "M");
  4276. chkp++;
  4277. }
  4278. if (!utlf_isNull(rtn)) {
  4279. trace("rtn = " + rtn.toString);
  4280. }
  4281. var rslt_estmmncd = ds_rslt_sppiz00800.getColumn(0, "estmmncd");
  4282. var rslt_estmcd = ds_rslt_sppiz00800.getColumn(0, "estmcd");
  4283. var rslt_estmcdnm = ds_rslt_sppiz00800.getColumn(0, "estmcdnm");
  4284. if ( rslt_estmmncd && rslt_estmcd ) {
  4285. if ( !utlf_isNull(chk_cd) ) {
  4286. var judgresn = fds_grid_grd_ordlist.getColumn(row, "judgadjtresncd");
  4287. var editflag = fds_grid_grd_ordlist.getColumn(row, "editflag");
  4288. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  4289. if ( chkjudgresn ) {
  4290. fds_grid_grd_ordlist.setColumn(row, "judgadjtresncd", chkjudgresn);
  4291. fds_grid_grd_ordlist.setColumn(row, "editflag", "Y");
  4292. fds_grid_grd_ordlist.setColumn(row, "estmyn", "Y");
  4293. } else {
  4294. if ( judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  4295. {
  4296. lf_fSetAdjtResnCd(); // 사유
  4297. }
  4298. }
  4299. }
  4300. if (fds_grid_grd_ordlist.getRowType(row) != 2) {
  4301. fds_grid_grd_ordlist.setRowType(row, 4);
  4302. }
  4303. fds_grid_grd_ordlist.setColumn(row, "estmmncd", rslt_estmmncd);
  4304. fds_grid_grd_ordlist.setColumn(row, "estmcd", rslt_estmcd);
  4305. }
  4306. }
  4307. }
  4308. }
  4309. }
  4310. function lf_fSetSrchCalcScorCdPop()
  4311. {
  4312. var grupcalcscorcd = fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "grupcalcscorcd");
  4313. frmf_setParameter("calcscorcd", grupcalcscorcd);
  4314. frmf_setParameter("judgflag", "Y" );
  4315. var trgtManWindow = frmf_getChildWindow("SMPIC00100");
  4316. if (utlf_isNull(trgtManWindow))
  4317. {
  4318. frmf_open("SMPIC00100", "SMPIC00100", "", "", "", "", "", "", "", "", "", "", "M");
  4319. } else {
  4320. trgtManWindow.fPopupMode();
  4321. }
  4322. }
  4323. function fGetSelectedOrderData() {
  4324. var snglcalcscorcls = ds_cond_req.getColumn(0,"ordfilflag");
  4325. if (utlf_isNull(snglcalcscorcls) || snglcalcscorcls == '-'){
  4326. fds_grid_grd_ordlist.filter("");
  4327. } else {
  4328. fds_grid_grd_ordlist.filter("ediitem1=='" + snglcalcscorcls+"'");
  4329. }
  4330. fds_grid_grd_ordlist.rowposition = 0; // 그리드의 첫줄부터 표시되도록 포커스를 0으로 설정한다.
  4331. }
  4332. function lf_fGetSelectedOrderData_org()
  4333. {
  4334. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  4335. var judgadjtresncd = fds_grid_grd_ordlist.getColumn(i, "judgadjtresncd"); // 심사변경
  4336. var probordyn = fds_grid_grd_ordlist.getColumn(i, "probordyn"); // 문제처방
  4337. var opprcp = fds_grid_grd_ordlist.getColumn(i, "opprcpyn"); // 수술중처방
  4338. var execdeptprcpyn = fds_grid_grd_ordlist.getColumn(i, "execdeptprcpyn"); // 시행부서처방
  4339. var spcljudgyn = fds_grid_grd_ordlist.getColumn(i, "spcljudgyn"); // 선별심사 체크
  4340. // var cpyn = fds_grid_grd_ordlist.getColumn(i, "cpyn"); // non-CP처방
  4341. var estmmncd = fds_grid_grd_ordlist.getColumn(i, "estmmncd");
  4342. if ( !utlf_isNull(estmmncd) ) {
  4343. var addestmcd = estmmncd.substr(1, 1); // 야간,공휴가산
  4344. }
  4345. var prcpkind = "0"; // 색상 설정
  4346. // if(cpyn == "Y") { // CP여부판단
  4347. // var noncp = fds_grid_grd_ordlist.getColumn(i, "cpflag");
  4348. // if (noncp == "N") {
  4349. // prcpkind = "1";
  4350. // }
  4351. // }
  4352. if (spcljudgyn == "Y") { // 선별심사여부판단
  4353. prcpkind = "2";
  4354. }
  4355. if(execdeptprcpyn == "Y"){ // 시행부서처방여부판단
  4356. prcpkind = "3";
  4357. }
  4358. if(opprcp == "Y"){ // 수술중처방여부판단
  4359. prcpkind = "4";
  4360. }
  4361. if(probordyn == "Y" ){ // 문제처방여부판단
  4362. prcpkind = "5";
  4363. }
  4364. if(judgadjtresncd == "A" || judgadjtresncd == "B" || judgadjtresncd == "C" || judgadjtresncd == "D" || judgadjtresncd == "E" || judgadjtresncd == "F" || judgadjtresncd == "G" ){ // 심사변경여부 판단
  4365. prcpkind = "6";
  4366. }
  4367. // 색상
  4368. var bgcolor = "";
  4369. if (prcpkind == "1") {
  4370. bgcolor = "'yellowgreen'";//"'#c8e67bff'";
  4371. } else if (prcpkind == "2") {
  4372. bgcolor = "'moccasin'";//"'#ffe79dff'";
  4373. } else if (prcpkind == "3") {
  4374. bgcolor = "'paleturquoise'";//"'#b9e5fbff'";
  4375. } else if (prcpkind == "4") {
  4376. bgcolor = "'mediumaquamarine'";//"'#7BE6B7ff'";
  4377. } else if (prcpkind == "5") {
  4378. bgcolor = "'lightpink'";//"'#fcd2c1ff'";
  4379. } else if (prcpkind == "6") {
  4380. bgcolor = "'darkturquoise'";//"'#43c8f5ff'";
  4381. }
  4382. // 야간가산(산정의미 두번째 "1'), 공휴가산(산정의미 두번째자리 "5") : 김상진
  4383. if (addestmcd == "1" || addestmcd == "5") {
  4384. bgcolor = "'yellow'";//"'#ffff00ff'";
  4385. }
  4386. var iCol1 = grd_ordlist.getBindCellIndex("body", "earncls1");
  4387. var iCol2 = grd_ordlist.getBindCellIndex("body", "earncls2");
  4388. var iCol3 = grd_ordlist.getBindCellIndex("body", "earncls3");
  4389. var sExpr = "EXPR( currow == "+i+" ? "+bgcolor+" : 'default' )";
  4390. grd_ordlist.setCellProperty('Body', iCol1, "background", sExpr);
  4391. grd_ordlist.setCellProperty('Body', iCol1, "background2", sExpr);
  4392. grd_ordlist.setCellProperty('Body', iCol2, "background", sExpr);
  4393. grd_ordlist.setCellProperty('Body', iCol2, "background2", sExpr);
  4394. grd_ordlist.setCellProperty('Body', iCol3, "background", sExpr);
  4395. grd_ordlist.setCellProperty('Body', iCol3, "background2", sExpr);
  4396. // trace("background = " + grd_ordlist.getCellProperty("Body", grd_ordlist.getBindCellIndex("body", "earncls1"), "background") + " / i = " + i);
  4397. }
  4398. }
  4399. function lf_fSetColorSpclJudgOrder()
  4400. {
  4401. for (var i=0; i < fds_grid_grd_ordlist.rowcount; i++) { // Grid 필터링 이후 Grid 상에 표시된 처방 개수만큼 돌면서
  4402. // Color 표시 범례
  4403. // 1. 심사변경
  4404. // 2. 문제처방
  4405. // 3. 수술중처방
  4406. // 4. 시행부서처방
  4407. // 5. 선별심사
  4408. // 6. non-CP처방
  4409. var judgadjtresncd = fds_grid_grd_ordlist.getColumn(i, "judgadjtresncd"); // 심사변경
  4410. var probordyn = fds_grid_grd_ordlist.getColumn(i, "probordyn"); // 문제처방
  4411. var opprcp = fds_grid_grd_ordlist.getColumn(i, "opprcpyn"); // 수술중처방
  4412. var execdeptprcpyn = fds_grid_grd_ordlist.getColumn(i, "execdeptprcpyn"); // 시행부서처방
  4413. var spcljudgyn = fds_grid_grd_ordlist.getColumn(i, "spcljudgyn"); // 선별심사 체크
  4414. var cpyn = ds_cond_req.getColumn(0, "cpyn"); // non-CP처방
  4415. var prcpkind = "0"; // 어떤 색깔을 설정할것인지...
  4416. var addestmcd = "";
  4417. var bgcolor = "";
  4418. if ( fds_grid_grd_ordlist.getColumn(i, "estmmncd").length > 0 ) {
  4419. addestmcd = fds_grid_grd_ordlist.getColumn(i, "estmmncd").substr(1, 1); // 야간,공휴가산
  4420. }
  4421. // 색깔체크는 역순으로 한다.
  4422. if(cpyn == "Y") { // CP여부판단
  4423. var noncp = fds_grid_grd_ordlist.getColumn(i, "cpflag");
  4424. if (noncp == "N") {
  4425. prcpkind = "1";
  4426. }
  4427. }
  4428. if (spcljudgyn == "Y") { // 선별심사여부판단
  4429. prcpkind = "2";
  4430. }
  4431. if(execdeptprcpyn == "Y"){ // 시행부서처방여부판단
  4432. prcpkind = "3";
  4433. }
  4434. if(opprcp == "Y"){ // 수술중처방여부판단
  4435. prcpkind = "4";
  4436. }
  4437. if(probordyn == "Y" ){ // 문제처방여부판단
  4438. prcpkind = "5";
  4439. }
  4440. if(judgadjtresncd == "A" || judgadjtresncd == "B" || judgadjtresncd == "C" || judgadjtresncd == "D" || judgadjtresncd == "E" || judgadjtresncd == "F" || judgadjtresncd == "G" ){ // 심사변경여부 판단
  4441. prcpkind = "6";
  4442. }
  4443. // 색깔처리
  4444. if (prcpkind == "1") {
  4445. bgcolor = "'yellowgreen'";//"'#c8e67bff'";
  4446. } else if (prcpkind == "2") {
  4447. bgcolor = "'moccasin'";//"'#ffe79dff'";
  4448. } else if (prcpkind == "3") {
  4449. bgcolor = "'paleturquoise'";//"'#b9e5fbff'";
  4450. } else if (prcpkind == "4") {
  4451. bgcolor = "'mediumaquamarine'";//"'#7BE6B7ff'";
  4452. } else if (prcpkind == "5") {
  4453. bgcolor = "'lightpink'";//"'#fcd2c1ff'";
  4454. } else if (prcpkind == "6") {
  4455. bgcolor = "'darkturquoise'";//"'#43c8f5ff'";
  4456. }
  4457. // 야간가산(산정의미 두번째 "1'), 공휴가산(산정의미 두번째자리 "5") : 김상진
  4458. if (addestmcd == "1" || addestmcd == "5") {
  4459. bgcolor = "'yellow'";//"'#ffff00ff'";
  4460. }
  4461. var iCol1 = grd_ordlist.getBindCellIndex("body", "earncls1");
  4462. var iCol2 = grd_ordlist.getBindCellIndex("body", "earncls2");
  4463. var iCol3 = grd_ordlist.getBindCellIndex("body", "earncls3");
  4464. var sExpr = "EXPR( currow == "+i+" ? '"+bgcolor+"' : 'default' )";
  4465. grd_ordlist.setCellProperty('Body', iCol1, "background", sExpr);
  4466. grd_ordlist.setCellProperty('Body', iCol1, "background2", sExpr);
  4467. grd_ordlist.setCellProperty('Body', iCol2, "background", sExpr);
  4468. grd_ordlist.setCellProperty('Body', iCol2, "background2", sExpr);
  4469. grd_ordlist.setCellProperty('Body', iCol3, "background", sExpr);
  4470. grd_ordlist.setCellProperty('Body', iCol3, "background2", sExpr);
  4471. }
  4472. }
  4473. function lf_fSetOrderColorByExecdd()
  4474. {
  4475. ds_grid_grd_ordlist.updatecontrol = false;
  4476. var sortexecdd2 = "";
  4477. var color = "powderblue"; //"#d6eafdff";
  4478. for (var i=0; i<fds_grid_grd_ordlist.getRowCount(); i++ ) {
  4479. var status = grd_ordlist.getRealRowSize(i);
  4480. if (status != 0) {
  4481. var sortexecdd1 = fds_grid_grd_ordlist.getColumn(i, "sortexecdd");
  4482. var iCol1 = grd_ordlist.getBindCellIndex("body", "newexecdd");
  4483. var iCol2 = grd_ordlist.getBindCellIndex("body", "orddd");
  4484. if (sortexecdd1 == sortexecdd2) {
  4485. fds_grid_grd_ordlist.setColumn(i,"sortcolor", color);
  4486. } else {
  4487. sortexecdd2 = sortexecdd1;
  4488. if (color == "white") {
  4489. color = "powderblue";
  4490. fds_grid_grd_ordlist.setColumn(i,"sortcolor", color);
  4491. } else {
  4492. color = "white";
  4493. fds_grid_grd_ordlist.setColumn(i,"sortcolor", color);
  4494. }
  4495. }
  4496. }
  4497. }
  4498. ds_grid_grd_ordlist.updatecontrol = true;
  4499. }
  4500. function lf_fSetToothPop(row)
  4501. {
  4502. ds_cond_sppiz00600.clearData();
  4503. var cd = "";
  4504. var cdnm = "";
  4505. var orddd = "";
  4506. var toot = "";
  4507. var rowcnt = 0;
  4508. // 상병
  4509. var cntdiag = opener.ds_grid_grd_diaglist.rowcount;
  4510. for (i=0; i<cntdiag; i++) {
  4511. cd = opener.ds_grid_grd_diaglist.getColumn(i, "diagcd");
  4512. cdnm = opener.ds_grid_grd_diaglist.getColumn(i, "diagnm");
  4513. orddd = opener.ds_grid_grd_diaglist.getColumn(i, "ordfromdd");
  4514. toot = opener.ds_grid_grd_diaglist.getColumn(i, "toot");
  4515. if (cd != "") {
  4516. if (toot != "-" ) {
  4517. var milktoothstr = "ABCDE000";
  4518. var subTootStr = "";
  4519. for (var inx=0; inx<32; inx++) {
  4520. var tootnum = toot.substr(inx,1);
  4521. if (tootnum == "*") { // 선택된 영구치의 경우 1~8 사이 숫자로 표시한다.
  4522. if (inx < 8) {
  4523. subTootStr += (8 - inx);
  4524. }
  4525. else if (inx > 7 && inx < 16) {
  4526. subTootStr += (inx - 7);
  4527. }
  4528. else if (inx > 15 && inx < 24) {
  4529. subTootStr += (24 - inx);
  4530. } else {
  4531. subTootStr += (inx - 23);
  4532. }
  4533. } else if (tootnum == "#") { // 선택된 유치의 경우 A~E 사이 알파벳으로 표시한다.
  4534. if (inx < 8) {
  4535. subTootStr += milktoothstr.charAt(7 - inx);
  4536. }
  4537. else if (inx > 7 && inx < 16) {
  4538. subTootStr += milktoothstr.charAt(inx - 8);
  4539. }
  4540. else if (inx > 15 && inx < 24) {
  4541. subTootStr += milktoothstr.charAt(23 - inx);
  4542. } else {
  4543. subTootStr += milktoothstr.charAt(inx - 24);
  4544. }
  4545. } else { // if (tootnum == "0") 선택되지 않은 경우 공백으로 처리한다.
  4546. subTootStr += " ";
  4547. }
  4548. }
  4549. //치식 표기를 설정한다.
  4550. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "false");
  4551. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "상병");
  4552. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
  4553. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
  4554. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", subTootStr.substr(0, 8));
  4555. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", subTootStr.substr(8, 8));
  4556. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", subTootStr.substr(16, 8));
  4557. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", subTootStr.substr(24, 8));
  4558. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
  4559. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", toot);
  4560. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
  4561. rowcnt = rowcnt+1;
  4562. }
  4563. }
  4564. }
  4565. // 처방
  4566. for (i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  4567. cd = fds_grid_grd_ordlist.getColumn(i, "snglcalcscorcd");
  4568. cdnm = fds_grid_grd_ordlist.getColumn(i, "hngnm");
  4569. orddd = fds_grid_grd_ordlist.getColumn(i, "orddd");
  4570. toot = fds_grid_grd_ordlist.getColumn(i, "tootfact");
  4571. if (cd != "") {
  4572. if (toot != "-") {
  4573. var milktoothstr = "ABCDE000";
  4574. var subTootStr = "";
  4575. for (var inx=0; inx<32; inx++) {
  4576. var tootnum = toot.substr(inx,1);
  4577. if (tootnum == "*") { // 선택된 영구치의 경우 1~8 사이 숫자로 표시한다.
  4578. if (inx < 8) {
  4579. subTootStr += (8 - inx);
  4580. }
  4581. else if (inx > 7 && inx < 16) {
  4582. subTootStr += (inx - 7);
  4583. }
  4584. else if (inx > 15 && inx < 24) {
  4585. subTootStr += (24 - inx);
  4586. } else {
  4587. subTootStr += (inx - 23);
  4588. }
  4589. } else if (tootnum == "#") { // 선택된 유치의 경우 A~E 사이 알파벳으로 표시한다.
  4590. if (inx < 8) {
  4591. subTootStr += milktoothstr.charAt(7 - inx);
  4592. }
  4593. else if (inx > 7 && inx < 16) {
  4594. subTootStr += milktoothstr.charAt(inx - 8);
  4595. }
  4596. else if (inx > 15 && inx < 24) {
  4597. subTootStr += milktoothstr.charAt(23 - inx);
  4598. } else {
  4599. subTootStr += milktoothstr.charAt(inx - 24);
  4600. }
  4601. } else { // if (tootnum == "0") 선택되지 않은 경우 공백으로 처리한다.
  4602. subTootStr += " ";
  4603. }
  4604. }
  4605. //치식 표기를 설정한다.
  4606. if (row == i ) {
  4607. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
  4608. } else {
  4609. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "false");
  4610. }
  4611. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "처방");
  4612. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
  4613. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
  4614. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", subTootStr.substr(0, 8));
  4615. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", subTootStr.substr(8, 8));
  4616. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", subTootStr.substr(16, 8));
  4617. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", subTootStr.substr(24, 8));
  4618. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
  4619. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", toot);
  4620. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
  4621. rowcnt = rowcnt+1;
  4622. } else {
  4623. if (row == i ) {
  4624. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
  4625. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "처방");
  4626. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
  4627. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
  4628. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", "");
  4629. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", "");
  4630. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", "");
  4631. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", "");
  4632. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
  4633. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", "");
  4634. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
  4635. rowcnt = rowcnt+1;
  4636. }
  4637. }
  4638. } // if cd != ""
  4639. } // for end
  4640. }
  4641. function lf_fGetToothPop()
  4642. {
  4643. var tootSelectcnt = ds_rslt_sppiz00600.rowcount;
  4644. var row = "";
  4645. var toot = "";
  4646. for (var i=0; i<tootSelectcnt; i++) {
  4647. flag = ds_rslt_sppiz00600.getColumn(i, "flag");
  4648. row = ds_rslt_sppiz00600.getColumn(i, "row");
  4649. if (flag == "1") {
  4650. toot = opener.ds_grid_grd_ordlist.getColumn(row, "toot");
  4651. opener.ds_grid_grd_ordlist.setColumn(row, "toot", ds_rslt_sppiz00600.getColumn(i, "toot"));
  4652. if (ds_hidden.getColumn(0, "toot") != toot) { // 치식번호가 변경된 경우
  4653. //var diagstatus = grd_diaglist.rowstatus(row);
  4654. //if (diagstatus == 0 || diagstatus == 2) { // 0 : new, 2 : update
  4655. // grd_diaglist.rowstatus(row) = 2; // 2 : update
  4656. //}
  4657. }
  4658. } else if (flag == "2") {
  4659. toot = fds_grid_grd_ordlist.getColumn(row, "tootfact");
  4660. fds_grid_grd_ordlist.setColumn(row, "tootfact", ds_rslt_sppiz00600.getColumn(i, "toot"));
  4661. if (ds_rslt_sppiz00600.getColumn(i, "toot") != toot) { // 치식번호가 변경된 경우
  4662. var ordstatus = fds_grid_grd_ordlist.getRowType(row);
  4663. if (ordstatus == 2 || ordstatus == 4) { // 0 : new, 2 : update
  4664. fds_grid_grd_ordlist.setRowType(row, 4); // 2 : update
  4665. }
  4666. }
  4667. }
  4668. }
  4669. }
  4670. function lf_fChkUpdateData()
  4671. {
  4672. var flag = true;
  4673. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  4674. var status = fds_grid_grd_ordlist.getRowType(i);
  4675. if (status > 1) {
  4676. flag = false;
  4677. }
  4678. }
  4679. return flag;
  4680. }
  4681. function lf_fSetAdjtResnCd()
  4682. {
  4683. var oldcd = fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "judgadjtresncd");
  4684. ds_cond_sppiz01000.clearData();
  4685. var aRow = ds_cond_sppiz01000.addRow();
  4686. ds_cond_sppiz01000.setColumn(aRow, "cdid", oldcd);
  4687. // SPPIZ01000_심사수정사유관리
  4688. //var rtn = frmf_modal("SPPIZ01000", "SPPIZ01000", ds_cond_sppiz01000); // // SPPIZ01000_심사수정사유관리
  4689. var objArg = new Object();
  4690. objArg.sCdCls = "";
  4691. objArg.sCdid = oldcd;
  4692. objArg.sAdjtresndesc = "";
  4693. var rtn = frmf_modal("SPPIZ01000", "SPPIZ01000", objArg, "", "", "", "", "", "", "", "", "", "M");// // SPPIZ01000_심사수정사유관리
  4694. if (!utlf_isNull(rtn)) {
  4695. var newcd = rtn.sCdid;
  4696. if (newcd) {
  4697. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  4698. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  4699. fds_grid_grd_ordlist.setColumn(i, "judgadjtresncd", newcd);
  4700. fds_grid_grd_ordlist.setColumn(i, "editflag", "Y");
  4701. if ( fds_grid_grd_ordlist.getRowType(i) == 1 ) {
  4702. fds_grid_grd_ordlist.setRowType(i, 4);
  4703. }
  4704. }
  4705. }
  4706. }
  4707. }
  4708. return newcd;
  4709. }
  4710. function lf_fSetAdjtResnCd2()
  4711. {
  4712. var oldcd = fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "judgadjtresncd");
  4713. ds_cond_sppiz01000.clearData();
  4714. var aRow = ds_cond_sppiz01000.addRow();
  4715. ds_cond_sppiz01000.setColumn(aRow, "cdid", oldcd);
  4716. // var objArg = new Object();
  4717. //
  4718. // objArg.sName = this.name;
  4719. // objArg.sVal01 = ds_cond_sppiz01000.getColumn(0, "cdid");
  4720. var objArg = new Object();
  4721. objArg.sCdCls = "";
  4722. objArg.sCdid = oldcd;
  4723. objArg.sAdjtresndesc = "";
  4724. var rtn = frmf_modal("SPPIZ01000", "SPPIZ01000", objArg, "", "", "", "", "", "", "", "", "", "M"); // // SPPIZ01000_심사수정사유관리
  4725. var newcd = rtn.sCdid;
  4726. return newcd;
  4727. }
  4728. function setOrderInfoOfCol(grdid, refdata, sizedata)
  4729. {
  4730. /*
  4731. var grdobj = document.controls.item(grdid);
  4732. var refarr = refdata.split("^");
  4733. var sizearr = sizedata.split("^");
  4734. for(var i = 0; i < refarr.length; i++){
  4735. var colcnt = grdobj.colref("" + refarr[i] + "");
  4736. grdobj.colMove(i, colcnt, "before",false);
  4737. var size = sizearr[i];
  4738. grdobj.colWidth(i) = eval(size);
  4739. }
  4740. grdobj.refresh();
  4741. */
  4742. }
  4743. /****************************************************************************************
  4744. * Argument : 01.obj : fActPay
  4745. * : 02.e :
  4746. * Description : 행위급여
  4747. ****************************************************************************************/
  4748. function fActPay()
  4749. {
  4750. }
  4751. /****************************************************************************************
  4752. * Argument : 01.obj : lf_fActAllOwnBurden
  4753. * : 02.e :
  4754. * Description : 행위 전액본인부담
  4755. ****************************************************************************************/
  4756. function lf_fActAllOwnBurden()
  4757. {
  4758. }
  4759. /****************************************************************************************
  4760. * Argument : 01.obj : lf_fActlGnrl
  4761. * : 02.e :
  4762. * Description : 행위 비급여
  4763. ****************************************************************************************/
  4764. function lf_fActlGnrl()
  4765. {
  4766. }
  4767. /****************************************************************************************
  4768. * Argument : 01.obj : lf_fActNoCharge
  4769. * : 02.e :
  4770. * Description : 행위 No-Charge처리
  4771. ****************************************************************************************/
  4772. function lf_fActNoCharge()
  4773. {
  4774. // No-Charge 처리(본인부담 0원처리) 여부 적용/해제 ( fOrdChangeNoCharge1 ) 와 동일하게 구현하는데 exip의 calcstat를 'P'로 update, 창원샘 요청, JHP, 20090414
  4775. var instcd = ds_cond_req.getColumn(0, "instcd");
  4776. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  4777. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  4778. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  4779. // 선택된row
  4780. var cRrow = i;
  4781. // 처방이 있는경우
  4782. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  4783. // 계산내역인 경우만
  4784. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  4785. // 청구생성된 처방이 있을경우 블로킹
  4786. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  4787. if (cretyn == "Y") {
  4788. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  4789. //if(msg != 6){
  4790. //선택된 row의 체크값을 'N' 로 해주는 함수
  4791. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  4792. return;
  4793. //}
  4794. }
  4795. if(ordcalcflag == "C"){
  4796. if(!utlf_isNull(chk_cd)){
  4797. //var ownbamt = fds_grid_grd_ordlist.getColumn(cRrow, "ownbamt");
  4798. var calcflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcflag");
  4799. //if(ownbamt != "0") {
  4800. if(calcflag != "P") {
  4801. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "P");
  4802. // } else if(ownbamt == "0") {
  4803. } else if(calcflag == "P") {
  4804. fds_grid_grd_ordlist.setColumn(cRrow, "freeflag", "Y");
  4805. }
  4806. fds_grid_grd_ordlist.setColumn(cRrow, "nochargeyn", "Y");
  4807. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  4808. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  4809. if(chkjudgresn){
  4810. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  4811. }else{
  4812. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  4813. {
  4814. lf_fSetAdjtResnCd();
  4815. //grp_judgresn.visible = true;
  4816. }
  4817. }
  4818. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  4819. // if(row_stat != 1){
  4820. // if(row_stat != 3){
  4821. // if(row_stat != 4){
  4822. // grd_ordlist.rowStatus(cRrow) = 2;
  4823. // }
  4824. // }
  4825. // }
  4826. if(row_stat != 1){ // insert
  4827. if(row_stat != 2){ // insert & new
  4828. if(row_stat != 8){ // delete
  4829. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  4830. }
  4831. }
  4832. }
  4833. }
  4834. // 계산내역을 갖고 온다.
  4835. // 처방내역이면 계산을 돌리지 않는다.
  4836. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  4837. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  4838. // grd_ordlist.rowstatus(cRrow) = 0; // 2 : update
  4839. return;
  4840. }
  4841. }
  4842. }
  4843. }
  4844. }
  4845. /****************************************************************************************
  4846. * Argument : 01.obj : lf_fJudgAdjtResncdChk
  4847. * : 02.e :
  4848. * Description : 수정이 안이루어진 row의 수정사유변경은 막는다.
  4849. 수정사유 변경은 각 조건들이 모두 N이어야 하며 bfjudgadjtresncd가 '-'이어야 한다.
  4850. ****************************************************************************************/
  4851. function lf_fJudgAdjtResncdChk(){
  4852. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  4853. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  4854. //선택된row
  4855. var cRrow = i;
  4856. var payflagyn = fds_grid_grd_ordlist.getColumn(cRrow, "payflagyn");
  4857. var spcordyn = fds_grid_grd_ordlist.getColumn(cRrow, "spcordyn");
  4858. var probordchangeyn = fds_grid_grd_ordlist.getColumn(cRrow, "probordchangeyn");
  4859. var estmyn = fds_grid_grd_ordlist.getColumn(cRrow, "estmyn");
  4860. var nochargeyn = fds_grid_grd_ordlist.getColumn(cRrow, "nochargeyn");
  4861. var ordchangeyn = fds_grid_grd_ordlist.getColumn(cRrow, "ordchangeyn");
  4862. var execchangeyn = fds_grid_grd_ordlist.getColumn(cRrow, "execchangeyn");
  4863. var judgadjtresncd = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  4864. var bfjudgadjtresncd = fds_grid_grd_ordlist.getColumn(cRrow, "bfjudgadjtresncd");
  4865. var opansyn = fds_grid_grd_ordlist.getColumn(cRrow, "opansyn");
  4866. var angioyn = fds_grid_grd_ordlist.getColumn(cRrow, "angioyn");
  4867. var drugmthyn = fds_grid_grd_ordlist.getColumn(cRrow, "drugmthyn");
  4868. var clamkeylockn = fds_grid_grd_ordlist.getColumn(cRrow, "clamkeylockn");
  4869. if (payflagyn == "N" && spcordyn == "N" && probordchangeyn == "N" && estmyn == "N" && nochargeyn == "N" && ordchangeyn == "N" && execchangeyn == "N" && opansyn == "N" && angioyn == "N" && drugmthyn=="N" && clamkeylockn == "") {
  4870. if( judgadjtresncd != bfjudgadjtresncd ){
  4871. if ( bfjudgadjtresncd != "-" ){
  4872. return;
  4873. }else{
  4874. sysf_messageBox("수정된적이 없는 DATA에 대한 수정사유변경은 ","E001");
  4875. }
  4876. }
  4877. }
  4878. }
  4879. }
  4880. }
  4881. /****************************************************************************************
  4882. * Argument : 01.obj : lf_fPatJudgPatMsgTrsm
  4883. * : 02.e :
  4884. * Description : 환자기준 전송메세지작성
  4885. ****************************************************************************************/
  4886. function lf_fPatJudgPatMsgTrsm()
  4887. {
  4888. if ( !utlf_isNull(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "pid")) ) {
  4889. // 값셋팅
  4890. // 세션값 받기
  4891. // gds_userInfo
  4892. // var sUserInfosS = getUserInfos();
  4893. // sUserInfosS = sUserInfosS + "|";
  4894. //
  4895. // var UserInfosS_Array = sUserInfosS.split("|");
  4896. var userid = gds_userInfo.getColumn(0, "userid"); // 사용자번호
  4897. var usernm = gds_userInfo.getColumn(0, "usernm"); // 사용자이름
  4898. var posinstcd = gds_userInfo.getColumn(0, "posinstcd"); // 근무지기관코드
  4899. var posinstnm = gds_userInfo.getColumn(0, "posinstnm"); // 근무지기관명
  4900. var posdeptcd = gds_userInfo.getColumn(0, "posdeptcd"); // 소속부서코드
  4901. var posdeptnm = gds_userInfo.getColumn(0, "posdeptnm"); // 소속부서명
  4902. if (utlf_isNull(userid) || userid == " " || userid == "-") {
  4903. userid = "pam";
  4904. }
  4905. ds_msgtrsm_info.clearData();
  4906. ds_msgtrsm_info.addRow();
  4907. ds_msgtrsm_info.setColumn(0, "instcd", ""); // chk
  4908. ds_msgtrsm_info.setColumn(0, "msgwrtedd", utlf_getCurrentDate()); // chk
  4909. ds_msgtrsm_info.setColumn(0, "msgwrteno", ""); // chk
  4910. ds_msgtrsm_info.setColumn(0, "msgwrtehistno", ""); // chk
  4911. ds_msgtrsm_info.setColumn(0, "histstat", "Y"); // chk
  4912. ds_msgtrsm_info.setColumn(0, "pid", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "pid")); // chk
  4913. var indd = fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "indd");
  4914. //indd = indd.substr(0,4) + indd.substr(5,2) + indd.substr(8,2);
  4915. ds_msgtrsm_info.setColumn(0, "orddd", indd); // chk
  4916. ds_msgtrsm_info.setColumn(0, "cretno", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "cretno")); // chk
  4917. ds_msgtrsm_info.setColumn(0, "mskind", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "mskind")); // chk
  4918. ds_msgtrsm_info.setColumn(0, "orddeptcd", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "orddeptcd")); // chk
  4919. ds_msgtrsm_info.setColumn(0, "orddrid", opener.ds_init_iteminfo.getColumn(opener.ds_init_iteminfo.rowposition,"medispclid")); // chk, TABLE에 적용안함.(값만확인)
  4920. ds_msgtrsm_info.setColumn(0, "orddrnm", opener.ds_init_iteminfo.getColumn(opener.ds_init_iteminfo.rowposition,"medispclnm")); // chk, TABLE에 적용안함.(값만확인)
  4921. ds_msgtrsm_info.setColumn(0, "ordtype", "I"); // 입원기본 'I', chk
  4922. ds_msgtrsm_info.setColumn(0, "kindflag", "P"); // 환자기준 'P', chk
  4923. ds_msgtrsm_info.setColumn(0, "grupcalcscorcd", "-");
  4924. ds_msgtrsm_info.setColumn(0, "snglcalcscorcd", "-");
  4925. ds_msgtrsm_info.setColumn(0, "ordqty", 0);
  4926. ds_msgtrsm_info.setColumn(0, "ordtims", 0);
  4927. ds_msgtrsm_info.setColumn(0, "orddays", 0);
  4928. ds_msgtrsm_info.setColumn(0, "prcpdd", "-");
  4929. ds_msgtrsm_info.setColumn(0, "prcpno", 0);
  4930. ds_msgtrsm_info.setColumn(0, "prcppayflag", "-");
  4931. ds_msgtrsm_info.setColumn(0, "rgstrid", "-"); // 서버단에서 조회하여 가져와야함. chk
  4932. ds_msgtrsm_info.setColumn(0, "rgstdd", "-"); // 서버단에서 조회하여 가져와야함. chk
  4933. ds_msgtrsm_info.setColumn(0, "rgsttm", "-"); // 서버단에서 조회하여 가져와야함. chk
  4934. ds_msgtrsm_info.setColumn(0, "sendphone", ""); // 서버단에서 조회하여 가져와야함. chk
  4935. ds_msgtrsm_info.setColumn(0, "anybodyyn", "N"); // 누구나 기본 'N', chk
  4936. ds_msgtrsm_info.setColumn(0, "sendflag", "O"); // 진료기본 'O', chk
  4937. ds_msgtrsm_info.setColumn(0, "senddate", ""); // 쿼리에서 timestamp chk
  4938. ds_msgtrsm_info.setColumn(0, "sendid", userid); // chk
  4939. ds_msgtrsm_info.setColumn(0, "deliveid", "-"); // 화면에서선택. chk
  4940. ds_msgtrsm_info.setColumn(0, "recvdate", ""); // chk
  4941. ds_msgtrsm_info.setColumn(0, "recvid", ""); // chk
  4942. ds_msgtrsm_info.setColumn(0, "recvcnfmyn", "N"); // 기본 비연속 'N', chk
  4943. ds_msgtrsm_info.setColumn(0, "recvcnfmid", userid); // chk
  4944. ds_msgtrsm_info.setColumn(0, "sendmsg", ""); // sendmsgvalue); // 기본 처방코드, 처방명값가지고 시작. chk
  4945. ds_msgtrsm_info.setColumn(0, "recvmsg", ""); // chk
  4946. ds_msgtrsm_info.setColumn(0, "fstrgstrid", ""); // chk
  4947. ds_msgtrsm_info.setColumn(0, "fstrgstdt", ""); // chk
  4948. ds_msgtrsm_info.setColumn(0, "lastupdtrid", ""); // chk
  4949. ds_msgtrsm_info.setColumn(0, "lastupdtdt", ""); // chk
  4950. } else {
  4951. sysf_messageBox("기본정보가 ", "I004");
  4952. }
  4953. var rtn = frmf_modal("SPPIZ01900", "SPPIZ01900", ds_msgtrsm_info, "", "", "", "", "", "", "", "", "", "M");// SPPIZ01900_심사환자메세지작성
  4954. if (!utlf_isNull(rtn)) {
  4955. trace("rtn = " + rtn.toString);
  4956. // ds_cond_req.setColumn(0, "drgcd", rtn.drgcd);
  4957. }
  4958. }
  4959. /****************************************************************************************
  4960. * Argument : 01.obj : lf_fOrderJudgPatMsgTrsm
  4961. * : 02.e :
  4962. * Description : 처방기준 전송메세지작성
  4963. ****************************************************************************************/
  4964. function lf_fOrderJudgPatMsgTrsm()
  4965. {
  4966. if ( !utlf_isNull(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "pid")) ) {
  4967. // 값셋팅
  4968. // 처방이므로 처방row선택여부 확인
  4969. if(fds_grid_grd_ordlist.rowposition == -1){
  4970. return;
  4971. }
  4972. // 세션값 받기
  4973. var userid = gds_userInfo.getColumn(0, "userid"); // 사용자번호
  4974. var usernm = gds_userInfo.getColumn(0, "usernm"); // 사용자이름
  4975. var posinstcd = gds_userInfo.getColumn(0, "posinstcd"); // 근무지기관코드
  4976. var posinstnm = gds_userInfo.getColumn(0, "posinstnm"); // 근무지기관명
  4977. var posdeptcd = gds_userInfo.getColumn(0, "posdeptcd"); // 소속부서코드
  4978. var posdeptnm = gds_userInfo.getColumn(0, "posdeptnm"); // 소속부서명
  4979. if (utlf_isNull(userid) || userid == " " || userid == "-") {
  4980. userid = "pam";
  4981. }
  4982. ds_msgtrsm_info.clearData();
  4983. ds_msgtrsm_info.addRow();
  4984. ds_msgtrsm_info.setColumn(0, "instcd", ""); // chk
  4985. ds_msgtrsm_info.setColumn(0, "msgwrtedd", utlf_getCurrentDate()); // chk
  4986. ds_msgtrsm_info.setColumn(0, "msgwrteno", ""); // chk
  4987. ds_msgtrsm_info.setColumn(0, "msgwrtehistno", ""); // chk
  4988. ds_msgtrsm_info.setColumn(0, "histstat", "Y"); // chk
  4989. ds_msgtrsm_info.setColumn(0, "pid", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "pid")); // chk
  4990. var indd = fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "indd");
  4991. //indd = indd.substr(0,4) + indd.substr(5,2) + indd.substr(8,2);
  4992. ds_msgtrsm_info.setColumn(0, "orddd", indd); // chk
  4993. ds_msgtrsm_info.setColumn(0, "cretno", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "cretno")); // chk
  4994. ds_msgtrsm_info.setColumn(0, "mskind", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "mskind")); // chk
  4995. ds_msgtrsm_info.setColumn(0, "orddeptcd", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "orddeptcd")); // chk
  4996. ds_msgtrsm_info.setColumn(0, "orddrid", opener.ds_init_iteminfo.getColumn(opener.ds_init_iteminfo.rowposition,"medispclid")); // chk, TABLE에 적용안함.(값만확인)
  4997. ds_msgtrsm_info.setColumn(0, "orddrnm", opener.ds_init_iteminfo.getColumn(opener.ds_init_iteminfo.rowposition,"medispclnm")); // chk, TABLE에 적용안함.(값만확인)
  4998. ds_msgtrsm_info.setColumn(0, "ordtype", "I"); // 입원기본 'I', chk
  4999. ds_msgtrsm_info.setColumn(0, "kindflag", "O"); // 처방기준 'O', chk
  5000. ds_msgtrsm_info.setColumn(0, "grupcalcscorcd", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "grupcalcscorcd")); // chk
  5001. ds_msgtrsm_info.setColumn(0, "snglcalcscorcd", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "snglcalcscorcd")); // chk
  5002. ds_msgtrsm_info.setColumn(0, "ordqty", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "ordqty")); // 화면에서입원재원상세넣어줌. chk(입원만)
  5003. ds_msgtrsm_info.setColumn(0, "ordtims", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "ordtims")); // 화면에서입원재원상세넣어줌. chk(입원만)
  5004. ds_msgtrsm_info.setColumn(0, "orddays", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "orddays")); // 화면에서입원재원상세넣어줌. chk(입원만)
  5005. ds_msgtrsm_info.setColumn(0, "prcpdd", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpdd")); // 화면에서입원재원상세넣어줌. chk(입원만)
  5006. ds_msgtrsm_info.setColumn(0, "prcpno", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpno")); // 화면에서입원재원상세넣어줌. chk(입원만)
  5007. ds_msgtrsm_info.setColumn(0, "prcppayflag", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "calcpayflag")); // 화면에서입원재원상세넣어줌. chk (입원만)
  5008. ds_msgtrsm_info.setColumn(0, "rgstrid", "-"); // 서버단에서 조회하여 가져와야함. chk
  5009. ds_msgtrsm_info.setColumn(0, "rgstdd", "-"); // 서버단에서 조회하여 가져와야함. chk
  5010. ds_msgtrsm_info.setColumn(0, "rgsttm", "-"); // 서버단에서 조회하여 가져와야함. chk
  5011. ds_msgtrsm_info.setColumn(0, "sendphone", ""); // 서버단에서 조회하여 가져와야함. chk
  5012. ds_msgtrsm_info.setColumn(0, "anybodyyn", "N"); // 누구나 기본 'N', chk
  5013. ds_msgtrsm_info.setColumn(0, "sendflag", "O"); // 진료기본 'O', chk
  5014. ds_msgtrsm_info.setColumn(0, "senddate", ""); // 쿼리에서 timestamp chk
  5015. ds_msgtrsm_info.setColumn(0, "sendid", userid); // chk
  5016. ds_msgtrsm_info.setColumn(0, "deliveid", "-"); // 화면에서선택. chk
  5017. ds_msgtrsm_info.setColumn(0, "recvdate", ""); // chk
  5018. ds_msgtrsm_info.setColumn(0, "recvid", ""); // chk
  5019. ds_msgtrsm_info.setColumn(0, "recvcnfmyn", "N"); // 기본 비연속 'N', chk
  5020. ds_msgtrsm_info.setColumn(0, "recvcnfmid", userid); // chk
  5021. ds_msgtrsm_info.setColumn(0, "sendmsg", ""); // 기본 처방코드, 처방명값가지고 시작. chk -> 변경 화면에서 그룹코드 명 조회하여 넣어줌. chk
  5022. ds_msgtrsm_info.setColumn(0, "recvmsg", ""); // chk
  5023. ds_msgtrsm_info.setColumn(0, "fstrgstrid", ""); // chk
  5024. ds_msgtrsm_info.setColumn(0, "fstrgstdt", ""); // chk
  5025. ds_msgtrsm_info.setColumn(0, "lastupdtrid", ""); // chk
  5026. ds_msgtrsm_info.setColumn(0, "lastupdtdt", ""); // chk
  5027. } else {
  5028. sysf_messageBox("기본정보가 ", "I004");
  5029. }
  5030. var rtn = frmf_modal("SPPIZ01900", "SPPIZ01900", ds_msgtrsm_info, "", "", "", "", "", "", "", "", "", "M");// SPPIZ01900_심사환자메세지작성
  5031. if (!utlf_isNull(rtn)) {
  5032. trace("rtn = " + rtn.toString);
  5033. // ds_cond_req.setColumn(0, "drgcd", rtn.drgcd);
  5034. }
  5035. }
  5036. /****************************************************************************************
  5037. * Argument : 01.obj : lf_fJudgPatMsgTrsmRef
  5038. * : 02.e :
  5039. * Description : 환자 전체 메세지 내용 조회하여 하나씩 보기.
  5040. ****************************************************************************************/
  5041. function lf_fJudgPatMsgTrsmRef()
  5042. {
  5043. ds_msgtrsm_info.clearData()
  5044. ds_msgtrsm_info.addRow();
  5045. ds_msgtrsm_info.setColumn(0, "refyn","Y");
  5046. ds_msgtrsm_info.setColumn(0, "pid", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "pid")); // chk
  5047. var indd =fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "indd")
  5048. //indd = indd.substr(0,4) + indd.substr(5,2) + indd.substr(8,2);
  5049. ds_msgtrsm_info.setColumn(0, "orddd", indd); // chk
  5050. ds_msgtrsm_info.setColumn(0, "cretno", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "cretno")); // chk
  5051. ds_msgtrsm_info.setColumn(0, "mskind", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "mskind")); // chk
  5052. ds_msgtrsm_info.setColumn(0, "orddeptcd", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "orddeptcd")); // chk
  5053. ds_msgtrsm_info.setColumn(0, "orddrid", opener.ds_init_iteminfo.getColumn(opener.ds_init_iteminfo.rowposition,"medispclid")); // chk, TABLE에 적용안함.(값만확인)
  5054. ds_msgtrsm_info.setColumn(0, "ordtype", "I"); // 외래기본 'O', chk
  5055. // var objArg = new Object();
  5056. // objArg.sName = this.name;
  5057. // objArg.sVal01 = ds_cond_req.getColumn(0, "drgcd");
  5058. var rtn = frmf_modal("SPPIZ01900", "SPPIZ01900", ds_msgtrsm_info, "", "", "", "", "", "", "", "", "", "M");// SPPIZ01900_심사환자메세지작성
  5059. if (!utlf_isNull(rtn)) {
  5060. trace("rtn = " + rtn.toString);
  5061. // ds_cond_req.setColumn(0, "drgcd", rtn.drgcd);
  5062. }
  5063. }
  5064. /****************************************************************************************
  5065. * Argument : 01.obj : lf_fColorFilter
  5066. * : 02.e :
  5067. * Description : 범례 선택에 따른 필터기능
  5068. ****************************************************************************************/
  5069. function lf_fColorFilter(filterchk)
  5070. {
  5071. for (var i=0; i<ds_grid_grd_ordlist.rowcount; i++ ) {
  5072. // 전체
  5073. if(filterchk == "all"){
  5074. fds_grid_grd_ordlist.filterstr = "";
  5075. // 선별심사 필터
  5076. } else if(filterchk == "judgadjtresncd"){
  5077. if ( ds_grid_grd_ordlist.getColumn(i, "judgadjtresncd") == "-" ) {
  5078. fds_grid_grd_ordlist.filterstr = "judgadjtresncd != '-'";
  5079. }
  5080. // 문제처방 필터
  5081. } else if(filterchk == "probordyn"){
  5082. if ( ds_grid_grd_ordlist.getColumn(i, "probordyn") != "Y" ) {
  5083. fds_grid_grd_ordlist.filterstr = "probordyn == 'Y'";
  5084. }
  5085. // 수술중처방
  5086. } else if(filterchk == "opprcp"){
  5087. if ( ds_grid_grd_ordlist.getColumn(i, "opprcpyn") != "Y" ) {
  5088. fds_grid_grd_ordlist.filterstr = "opprcpyn == 'Y'";
  5089. }
  5090. // 시행부서처방
  5091. } else if(filterchk == "execdeptprcpyn"){
  5092. if ( ds_grid_grd_ordlist.getColumn(i, "execdeptprcpyn") != "Y" ) {
  5093. fds_grid_grd_ordlist.filterstr = "execdeptprcpyn == 'Y'";
  5094. }
  5095. // 선별심사 체크
  5096. } else if(filterchk == "spcljudgyn"){
  5097. if ( ds_grid_grd_ordlist.getColumn(i, "spcljudgyn") == "-" ) {
  5098. fds_grid_grd_ordlist.filterstr = "spcljudgyn != '-'";
  5099. }
  5100. // non-cp처방
  5101. } else if(filterchk == "cpyn"){
  5102. if ( ds_grid_grd_ordlist.getColumn(i, "cpflag") != "Y" ) {
  5103. fds_grid_grd_ordlist.filterstr = "cpflag == 'Y'";
  5104. }
  5105. } else {
  5106. trace("fColorFilter : filterchk = " + filterchk);
  5107. }
  5108. var judgadjtresncd = ds_grid_grd_ordlist.getColumn(i, "judgadjtresncd"); // 심사변경
  5109. var probordyn = ds_grid_grd_ordlist.getColumn(i, "probordyn"); // 문제처방
  5110. var opprcp = ds_grid_grd_ordlist.getColumn(i, "opprcpyn"); // 수술중처방
  5111. var execdeptprcpyn = ds_grid_grd_ordlist.getColumn(i, "execdeptprcpyn"); // 시행부서처방
  5112. var spcljudgyn = ds_grid_grd_ordlist.getColumn(i, "spcljudgyn"); // 선별심사 체크
  5113. var cpyn = ds_cond_req.getColumn(0, "cpyn"); // non-CP처방
  5114. var prcpkind = "0";
  5115. // 색깔체크는 역순으로 한다.
  5116. if(cpyn == "Y") { // CP여부판단
  5117. var noncp = fds_grid_grd_ordlist.getColumn(i, "cpflag");
  5118. if (noncp == "N") {
  5119. prcpkind = "1";
  5120. }
  5121. }
  5122. if (spcljudgyn == "Y") { // 선별심사여부판단
  5123. prcpkind = "2";
  5124. }
  5125. if(execdeptprcpyn == "Y"){ // 시행부서처방여부판단
  5126. prcpkind = "3";
  5127. }
  5128. if(opprcp == "Y"){ // 수술중처방여부판단
  5129. prcpkind = "4";
  5130. }
  5131. if(probordyn == "Y"){ // 문제처방여부판단
  5132. prcpkind = "5";
  5133. }
  5134. if(judgadjtresncd == "A" || judgadjtresncd == "B" || judgadjtresncd == "C" || judgadjtresncd == "D" || judgadjtresncd == "E" || judgadjtresncd == "F" || judgadjtresncd == "G" ){ // 심사변경여부 판단
  5135. prcpkind = "6";
  5136. }
  5137. // 색깔처리
  5138. var bgcolor = "";
  5139. if (prcpkind == "1") {
  5140. bgcolor = "'yellowgreen'"; //"'#c8e67bff'";
  5141. } else if (prcpkind == "2") {
  5142. bgcolor = "'moccasin'"; //"'#ffe79dff'";
  5143. } else if (prcpkind == "3") {
  5144. bgcolor = "'paleturquoise'"; //"'#b9e5fbff'";
  5145. } else if (prcpkind == "4") {
  5146. bgcolor = "'mediumaquamarine'"; //"'#7BE6B7ff'";
  5147. } else if (prcpkind == "5") {
  5148. bgcolor = "'lightpink'"; //"'#fcd2c1ff'";
  5149. } else if (prcpkind == "6") {
  5150. bgcolor = "'darkturquoise'"; //"'#43c8f5ff'";
  5151. }
  5152. var sExpr = "EXPR( currow == "+i+" ? "+bgcolor+" : 'default' )";
  5153. grd_ordlist.setCellProperty('Body', i, "background", sExpr);
  5154. grd_ordlist.setCellProperty('Body', i, "background2", sExpr);
  5155. }
  5156. }
  5157. /****************************************************************************************
  5158. * Argument : 01.obj : lf_fSetItemBold
  5159. * : 02.e :
  5160. * Description : 글자 변경
  5161. ****************************************************************************************/
  5162. function lf_fSetItemBold()
  5163. {
  5164. for (var i=0; i < ds_init_ordfilflag.rowcount; i++) {
  5165. var findstr = ds_init_ordfilflag.getColumn(i,"value");
  5166. if (!utlf_isNull(fds_grid_grd_ordlist.lookupExpr("ediitem1=='" + findstr + "'","ediitem1"))) {
  5167. ds_init_ordfilflag.setColumn(i, "font", "Dotum,9, bold");
  5168. } else {
  5169. ds_init_ordfilflag.setColumn(i, "font", "");
  5170. }
  5171. }
  5172. }
  5173. //=======================================================================================
  5174. // Event
  5175. //---------------------------------------------------------------------------------------
  5176. /****************************************************************************************
  5177. * Components :
  5178. * Components ID : SPPIJ00400
  5179. * Event : onload
  5180. * Argument : 01.obj : Object Event has occurred
  5181. * : 02.e : Event Object
  5182. * Description : onload
  5183. ****************************************************************************************/
  5184. function SPPIJ00400_onload(obj:Form, e:LoadEventInfo)
  5185. {
  5186. group2.ipt_cd.inputmode = "upper";
  5187. group2.ipt_cd.imemode = "alpha";
  5188. grdf_setRowTypeIcon(grd_clcjlist,0);
  5189. lf_Initialize(); // 초기화
  5190. lf_initDataSet(); // 데이터셋 바인드
  5191. }
  5192. /****************************************************************************************
  5193. * Components :
  5194. * Components ID : grd_ordlist
  5195. * Event : oncellclick
  5196. * Argument : 01.obj : Object Event has occurred
  5197. * : 02.e : Event Object
  5198. * Description : 그리드 클릭
  5199. ****************************************************************************************/
  5200. function grd_ordlist_oncellclick(obj:Grid, e:GridClickEventInfo)
  5201. {
  5202. grd_ordlist.showEditor(true);
  5203. }
  5204. /****************************************************************************************
  5205. * Components :
  5206. * Components ID : grd_ordlist
  5207. * Event : oncelldblclick
  5208. * Argument : 01.obj : Object Event has occurred
  5209. * : 02.e : Event Object
  5210. * Description : 그리드 더블클릭
  5211. ****************************************************************************************/
  5212. function grd_ordlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  5213. {
  5214. //if(grd_ordlist.isCell(e.target) && grd_ordlist.row >= grd_ordlist.fixedRows) {
  5215. var col = e.col;
  5216. var row = e.row;
  5217. var insukindcd = ds_cond_req.getColumn(0, "insukindcd");
  5218. var estmcls = fds_grid_grd_ordlist.getColumn(row, "estmcls");
  5219. var estmmncd = fds_grid_grd_ordlist.getColumn(row, "estmmncd");
  5220. // 수술,마취,Angio는 산정변경이 되지 않게 한다.
  5221. // var ordaddinptflag = fds_grid_grd_ordlist.getColumn(row, "ordaddinptflag");
  5222. //
  5223. // if (ordaddinptflag == "1" ||ordaddinptflag == "3" ||ordaddinptflag == "4") {
  5224. // sysf_messageBox("수술,마취,Angio는 산정을 변경할 수 없습니다. 유형변경으로 ","C003");
  5225. // fds_grid_grd_ordlist.setRowType(row, 1);
  5226. // return;
  5227. // }
  5228. // 처방이 있는경우
  5229. var chk_cd = fds_grid_grd_ordlist.getColumn(row, "snglcalcscorcd");
  5230. // 처방내역이면 계산을 돌리지 않는다. - 미시행처방
  5231. if(fds_grid_grd_ordlist.getColumn(row, "ordcalcflag") == "O"){
  5232. sysf_messageBox("선택하신 처방은 미시행 처방","E008");
  5233. fds_grid_grd_ordlist.setRowType(row, 1);
  5234. return;
  5235. }
  5236. ds_cond_sppiz00800.clearData();
  5237. ds_cond_sppiz00800.addRow();
  5238. ds_rslt_sppiz00800.clearData();
  5239. ds_cond_sppiz00800.setColumn(0, "insukind", insukindcd);
  5240. ds_cond_sppiz00800.setColumn(0, "estmcls", estmcls);
  5241. if ( col == grd_ordlist.getBindCellIndex("body", "estmmncd") ) {
  5242. lf_fChngEstmmncd();
  5243. } else if ( col == grd_ordlist.getBindCellIndex("body", "tootfact") ) {
  5244. ds_cond_sppiz00600.setColumn(0, "pid", ds_cond_req.getColumn(0, "pid"));
  5245. ds_cond_sppiz00600.setColumn(0, "indd", ds_cond_req.getColumn(0, "indd"));
  5246. ds_cond_sppiz00600.setColumn(0, "cretno", ds_cond_req.getColumn(0, "cretno"));
  5247. ds_cond_sppiz00600.setColumn(0, "toot", fds_grid_grd_ordlist.getColumn(row, "tootfact"));
  5248. // 사전- 재원-상병 : AID, 사전- 재원-상병 : AIC
  5249. ds_cond_sppiz00600.setColumn(0, "flag", "AIC");
  5250. fSetToothPop(row);
  5251. // SPPIZ00600_상병및처방별치식
  5252. var objArg = new Object();
  5253. objArg.sName = this.name;
  5254. objArg.sVal01 = ds_cond_sppiz00600;
  5255. var rtn = frmf_modal("SPPIZ00600", "SPPIZ00600", objArg, "", "", "", "", "", "", "", "", "", "M");
  5256. if (!utlf_isNull(rtn)) {
  5257. trace("rtn = " + rtn.toString);
  5258. }
  5259. fGetToothPop();
  5260. }
  5261. //}
  5262. }
  5263. /****************************************************************************************
  5264. * Components :
  5265. * Components ID : btn_srch
  5266. * Event : onclick
  5267. * Argument : 01.obj : Object Event has occurred
  5268. * : 02.e : Event Object
  5269. * Description : 조회
  5270. ****************************************************************************************/
  5271. function group2_btn_srch_onclick(obj:Button, e:ClickEventInfo)
  5272. {
  5273. var cond = ds_cond_req.getColumn(0, "choicdsrch");
  5274. var calcscorcd = ds_cond_req.getColumn(0, "calcscorcd");
  5275. //if (group2.ipt_cd.value.length < 1){
  5276. if( utlf_isNull ( group2.ipt_cd.value ) ) {
  5277. group2.ipt_estmcd.value = "";
  5278. }
  5279. if (!utlf_isNull(calcscorcd)) {
  5280. switch(cond){
  5281. trace("group2.ipt_cd.value = " + group2.ipt_cd.value);
  5282. case 'calcscorcd':
  5283. // 수가코드 체크
  5284. if(group2.ipt_cd.value.length < 2 && group2.ipt_cd.value.length > 0){
  5285. sysf_messageBox("수가코드는 2자리 이상", "C001");
  5286. return;
  5287. }
  5288. break;
  5289. case 'edicd':
  5290. // 수가코드 체크
  5291. if(group2.ipt_cd.value.length < 2 && group2.ipt_cd.value.length > 0){
  5292. sysf_messageBox("EDI코드는 2자리 이상", "C001");
  5293. return ;
  5294. }
  5295. break;
  5296. case 'hngnm':
  5297. // 환자등록번호 체크
  5298. if(group2.ipt_cd.value.length < 2 && group2.ipt_cd.value.length > 0){
  5299. sysf_messageBox("수가명칭은 2자리 이상", "C001");
  5300. return ;
  5301. }
  5302. break;
  5303. default :
  5304. return;
  5305. break;
  5306. }
  5307. }
  5308. lf_fGetIsclList(); // 조회
  5309. btn_save.enable = true;
  5310. //btn_save.disabled = false;
  5311. }
  5312. /****************************************************************************************
  5313. * Components :
  5314. * Components ID : btn_judgchng
  5315. * Event : onclick
  5316. * Argument : 01.obj : Object Event has occurred
  5317. * : 02.e : Event Object
  5318. * Description : 수정내역
  5319. ****************************************************************************************/
  5320. function btn_judgchng_onclick(obj:Button, e:ClickEventInfo)
  5321. {
  5322. var objArg = new Object();
  5323. objArg.sName = this.name;
  5324. objArg.sTabflag = "2";
  5325. objArg.sPid = ds_cond_req.getColumn(ds_cond_req.rowposition, "pid");
  5326. objArg.sIndd = ds_cond_req.getColumn(ds_cond_req.rowposition, "indd");
  5327. objArg.sCretno = ds_cond_req.getColumn(ds_cond_req.rowposition, "cretno");
  5328. objArg.sMskind = ds_cond_req.getColumn(ds_cond_req.rowposition, "mskind");
  5329. objArg.sInsukind = ds_cond_req.getColumn(ds_cond_req.rowposition, "insukindcd");
  5330. objArg.sSuppkind = ds_cond_req.getColumn(ds_cond_req.rowposition, "suppkindcd");
  5331. objArg.sFromdd = ds_cond_req.getColumn(ds_cond_req.rowposition, "fromdd");
  5332. objArg.sTodd = ds_cond_req.getColumn(ds_cond_req.rowposition, "todd");
  5333. frmf_modal("SPPIJ02400", "SPPIJ02400", objArg, "", "", "", "", "", "", "", "", "", "M");
  5334. }
  5335. /****************************************************************************************
  5336. * Components :
  5337. * Components ID : btn_chngexecdd
  5338. * Event : onclick
  5339. * Argument : 01.obj : Object Event has occurred
  5340. * : 02.e : Event Object
  5341. * Description : grp_execdd - 시행일자 변경
  5342. ****************************************************************************************/
  5343. function btn_chngexecdd_onclick(obj:Button, e:ClickEventInfo)
  5344. {
  5345. var chngdd = ds_hidden_chngexec.getColumn(0, "chngdd");
  5346. var chnghh = ds_hidden_chngexec.getColumn(0, "chnghh");
  5347. var chngmn = ds_hidden_chngexec.getColumn(0, "chngmn");
  5348. if (chnghh.length == 1) chnghh = "0" + chnghh;
  5349. if (chngmn.length == 1) chngmn = "0" + chngmn;
  5350. var newexecdd = chngdd + chnghh + chngmn;
  5351. tranf_submit({
  5352. id : "TRPIJ00410"
  5353. , service : "bfjudgapp.InHospJudgDetl"
  5354. , method : "reqGetDschnotidt"
  5355. , inds : "req=ds_cond_req"
  5356. , outds : "ds_hidden_inpt=inpt"
  5357. , async : false
  5358. });
  5359. var dschnotidt = ds_hidden_inpt.getColumn(0, "dschnotidt");
  5360. if (!utlf_isNull(dschnotidt) && newexecdd >= dschnotidt) {
  5361. sysf_messageBox("변경하는 시행일이 퇴원확정 시간보다 큽니다. 퇴원확정시간 이전으로 변경하세요!!!. 시간까지 ","I007");
  5362. return;
  5363. }
  5364. // 수정사유선택시 수정사유팝업안뜨게 수정
  5365. var judgresn = ds_cond_req.getColumn(0, "judgresn");
  5366. var cur_row = fds_grid_grd_ordlist.rowposition;
  5367. if(utlf_isNull(judgresn) || judgresn == " "){
  5368. var cd = lf_fSetAdjtResnCd2();
  5369. }
  5370. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  5371. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  5372. // 선택된 row
  5373. var cRrow = i;
  5374. var oldexecdd = fds_grid_grd_ordlist.getColumn(cRrow, "newexecdd");
  5375. var execstat = fds_grid_grd_ordlist.getColumn(cRrow, "execstat");
  5376. // 청구생성된 처방이 있을경우 블로킹
  5377. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  5378. if (cretyn == "Y") {
  5379. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  5380. //if(msg != 6){
  5381. // 선택된 row의 체크값을 'N' 로 해주는 함수
  5382. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  5383. grp_execdd.visible = false;
  5384. return;
  5385. //}
  5386. }
  5387. if (oldexecdd != newexecdd && execstat == "Y") {
  5388. fds_grid_grd_ordlist.setColumn(cRrow, "newexecdd", newexecdd);
  5389. fds_grid_grd_ordlist.setColumn(cRrow, "execchangeyn", "Y");
  5390. if(utlf_isNull(judgresn) || judgresn == " "){
  5391. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  5392. }else{
  5393. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn);
  5394. }
  5395. fds_grid_grd_ordlist.setRowType(cRrow, 4);
  5396. }
  5397. }
  5398. }
  5399. grp_execdd.visible = false;
  5400. }
  5401. /****************************************************************************************
  5402. * Components :
  5403. * Components ID : btn_canlexecdd
  5404. * Event : onclick
  5405. * Argument : 01.obj : Object Event has occurred
  5406. * : 02.e : Event Object
  5407. * Description : 시행일자 변경 - 취소
  5408. ****************************************************************************************/
  5409. function btn_canlexecdd_onclick(obj:Button, e:ClickEventInfo)
  5410. {
  5411. grp_execdd.visible = false;
  5412. }
  5413. /****************************************************************************************
  5414. * Components :
  5415. * Components ID : btn_cancel
  5416. * Event : onclick
  5417. * Argument : 01.obj : Object Event has occurred
  5418. * : 02.e : Event Object
  5419. * Description : 선택의사변경 - 취소
  5420. ****************************************************************************************/
  5421. function btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  5422. {
  5423. grp_selectspecord.visible = false;
  5424. }
  5425. /****************************************************************************************
  5426. * Components :
  5427. * Components ID : btn_accept
  5428. * Event : onclick
  5429. * Argument : 01.obj : Object Event has occurred
  5430. * : 02.e : Event Object
  5431. * Description : 선택의사변경 - 확인
  5432. ****************************************************************************************/
  5433. function btn_accept_onclick(obj:Button, e:ClickEventInfo)
  5434. {
  5435. lf_fOrdChangeSpclYn1();
  5436. }
  5437. /****************************************************************************************
  5438. * Components :
  5439. * Components ID : btn_closechangeinsukindt
  5440. * Event : onclick
  5441. * Argument : 01.obj : Object Event has occurred
  5442. * : 02.e : Event Object
  5443. * Description : 처방유형 변경(기왕증) 처리 - 취소
  5444. ****************************************************************************************/
  5445. function btn_closechangeinsukindt_onclick(obj:Button, e:ClickEventInfo)
  5446. {
  5447. grp_changeinsukind.visible = false;
  5448. }
  5449. /****************************************************************************************
  5450. * Components :
  5451. * Components ID : btn_changeinsukind
  5452. * Event : onclick
  5453. * Argument : 01.obj : Object Event has occurred
  5454. * : 02.e : Event Object
  5455. * Description : 처방유형 변경(기왕증) 처리 - 변경
  5456. ****************************************************************************************/
  5457. function btn_changeinsukind_onclick(obj:Button, e:ClickEventInfo)
  5458. {
  5459. //선택된 row의 체크값을 'Y' 로 해주는 함수
  5460. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  5461. var mskind = ds_grid_grd_insuhistory.getColumn(ds_grid_grd_insuhistory.rowposition, "mskind");
  5462. ds_cond_req.setColumn(0, "anamne", "Y");
  5463. var cretno = 0;
  5464. cretno = ds_grid_grd_insuhistory.getColumn(ds_grid_grd_insuhistory.rowposition, "cretno");
  5465. for (var i = 0; i < fds_grid_grd_ordlist.rowcount; i++)
  5466. {
  5467. if ( fds_grid_grd_ordlist.getSelect(i) == true )
  5468. {
  5469. var cRrow = i;
  5470. var ordinptflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordinptflag");
  5471. if (ordinptflag == "X")
  5472. {
  5473. sysf_messageBox("처방유형변경이 불가한 코드", "E008");
  5474. }
  5475. else
  5476. {
  5477. var prcpdd1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  5478. var prcpno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  5479. var prcphistno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  5480. var hngnm = fds_grid_grd_ordlist.getColumn(cRrow, "hngnm");
  5481. var messageYn = "N";
  5482. // 선택안된 같은 처방 row를 담을 배열
  5483. var samecalclist = new Array();
  5484. var index = 0;
  5485. for (var j = 0; j < fds_grid_grd_ordlist.rowcount; j++)
  5486. {
  5487. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  5488. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  5489. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  5490. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  5491. if (chkflag != "Y" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2)
  5492. {
  5493. messageYn = "Y";
  5494. samecalclist[index++] = j;
  5495. }
  5496. }
  5497. // 동일한 코드나 선택되지 않은 row가 있다면
  5498. if (messageYn == "Y")
  5499. {
  5500. if (sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001") == 6)
  5501. {
  5502. fds_grid_grd_ordlist.setColumn(cRrow, "aftercretno", cretno);
  5503. fds_grid_grd_ordlist.setColumn(cRrow, "mskind", mskind);
  5504. fds_grid_grd_ordlist.setColumn(cRrow, "ordchangeyn", "Y");
  5505. fds_grid_grd_ordlist.setColumn(cRrow, "proccalctype", "S");
  5506. fds_grid_grd_ordlist.setRowType(cRrow, 4);
  5507. for(var k = 0; k < index; k++)
  5508. {
  5509. var row = samecalclist[k];
  5510. fds_grid_grd_ordlist.setColumn(row, "aftercretno", cretno);
  5511. fds_grid_grd_ordlist.setColumn(row, "mskind", mskind);
  5512. fds_grid_grd_ordlist.setColumn(row, "ordchangeyn", "Y");
  5513. fds_grid_grd_ordlist.setColumn(row, "chkflag", "Y");
  5514. fds_grid_grd_ordlist.setColumn(row, "proccalctype", "S");
  5515. fds_grid_grd_ordlist.setRowType(row, 4);
  5516. }
  5517. }
  5518. }
  5519. else
  5520. {
  5521. fds_grid_grd_ordlist.setColumn(cRrow, "aftercretno",cretno);
  5522. fds_grid_grd_ordlist.setColumn(cRrow, "mskind",mskind);
  5523. fds_grid_grd_ordlist.setColumn(cRrow, "ordchangeyn","Y");
  5524. fds_grid_grd_ordlist.setColumn(cRrow, "proccalctype", "S");
  5525. fds_grid_grd_ordlist.setRowType(cRrow, 4);
  5526. }
  5527. }
  5528. }
  5529. }
  5530. grp_changeinsukind.visible = false;
  5531. // row의 체크값을 'N' 로 해주는 함수
  5532. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  5533. }
  5534. /****************************************************************************************
  5535. * Components :
  5536. * Components ID : btn_rsltsrch
  5537. * Event : onclick
  5538. * Argument : 01.obj : Object Event has occurred
  5539. * : 02.e : Event Object
  5540. * Description : 결과조회
  5541. ****************************************************************************************/
  5542. function btn_rsltsrch_onclick(obj:Button, e:ClickEventInfo)
  5543. {
  5544. var pid = ds_cond_req.getColumn(ds_cond_req.rowposition, "pid");
  5545. if ( !utlf_isNull(pid) ) {
  5546. // ds_cond_req_result.clearData();
  5547. // var aRow = ds_cond_req_result.addRow();
  5548. // ds_cond_req_result.setColumn(aRow, "srchdate1", ds_cond_req.getColumn(0, "indd"));
  5549. // ds_cond_req_result.setColumn(aRow, "srchdate2", utlf_getCurrentDate());
  5550. // ds_cond_req_result.setColumn(aRow, "srchpid", ds_cond_req.getColumn(0, "pid"));
  5551. // ds_cond_req_result.setColumn(aRow, "wardcd", "");
  5552. // ds_cond_req_result.setColumn(aRow, "roomcd", "");
  5553. // ds_cond_req_result.setColumn(aRow, "listflag", "P");
  5554. // ds_cond_req_result.setColumn(aRow, "deptcd", "");
  5555. // ds_cond_req_result.setColumn(aRow, "drid", "");
  5556. // ds_cond_req_result.setColumn(aRow, "chkcheck", "");
  5557. // ds_cond_req_result.setColumn(aRow, "chkcheck1", "A");
  5558. // ds_cond_req_result.setColumn(aRow, "chkcheck2", "B");
  5559. // ds_cond_req_result.setColumn(aRow, "chkcheck3", "C");
  5560. // ds_cond_req_result.setColumn(aRow, "chkcheck4", "D");
  5561. // ds_cond_req_result.setColumn(aRow, "chkcheck5", "E");
  5562. // ds_cond_req_result.setColumn(aRow, "chkcheck6", "F");
  5563. // ds_cond_req_result.setColumn(aRow, "chkcheck7", "G");
  5564. // ds_cond_req_result.setColumn(aRow, "chkcheck8", "");
  5565. // ds_cond_req_result.setColumn(aRow, "tabflag", "");
  5566. // ds_cond_req_result.setColumn(aRow, "mdlcd", "");
  5567. // ds_cond_req_result.setColumn(aRow, "examgubun", "");
  5568. // ds_cond_req_result.setColumn(aRow, "srchflag", "B");
  5569. // ds_cond_req_result.setColumn(aRow, "hlaflag", "N");
  5570. // ds_cond_req_result.setColumn(aRow, "prntfrmflag", "");
  5571. //
  5572. // var objArg = new Object();
  5573. //
  5574. // objArg.sName = this.name;
  5575. // //objArg.sVal01 = ""; //ds_grid_grd_drgelist.getColumn(e.row, "calcscorcd");
  5576. // objArg.sPid = ds_cond_req.getColumn(0, "pid");
  5577. //
  5578. // frmf_modal("SMMMI00100","SMMMI00100", ds_cond_req_result, "", "", "", "", "", "", "", "", "", "M"); // SMMMI00100_통합결과조회 로 변경되었다고 함(기존:SMAER00800)
  5579. var smmmi00100 = new Object();
  5580. smmmi00100.plgv_SMMMI00100_pid = ds_cond_req.getColumn(0, "pid");
  5581. frmf_modal("SMMMI00100", "SMMMI00100", smmmi00100, "", "", "", "", "", "", "", "", "", "M");
  5582. }
  5583. }
  5584. /****************************************************************************************
  5585. * Components :
  5586. * Components ID : button1
  5587. * Event : onclick
  5588. * Argument : 01.obj : Object Event has occurred
  5589. * : 02.e : Event Object
  5590. * Description : 수술유형변경 - 취소
  5591. ****************************************************************************************/
  5592. function button1_onclick(obj:Button, e:ClickEventInfo)
  5593. {
  5594. grp_changeop.visible= false;
  5595. }
  5596. /****************************************************************************************
  5597. * Components :
  5598. * Components ID : button2
  5599. * Event : onclick
  5600. * Argument : 01.obj : Object Event has occurred
  5601. * : 02.e : Event Object
  5602. * Description : 수술유형변경 - 확인
  5603. ****************************************************************************************/
  5604. function button2_onclick(obj:Button, e:ClickEventInfo)
  5605. {
  5606. lf_fOrdChangeOp1();
  5607. }
  5608. /****************************************************************************************
  5609. * Components :
  5610. * Components ID : button5
  5611. * Event : onclick
  5612. * Argument : 01.obj : Object Event has occurred
  5613. * : 02.e : Event Object
  5614. * Description : Angio 유형변경 - 취소
  5615. ****************************************************************************************/
  5616. function button5_onclick(obj:Button, e:ClickEventInfo)
  5617. {
  5618. grp_changeangio.visible= false;
  5619. }
  5620. /****************************************************************************************
  5621. * Components :
  5622. * Components ID : button6
  5623. * Event : onclick
  5624. * Argument : 01.obj : Object Event has occurred
  5625. * : 02.e : Event Object
  5626. * Description : Angio 유형변경 - 확인
  5627. ****************************************************************************************/
  5628. function button6_onclick(obj:Button, e:ClickEventInfo)
  5629. {
  5630. lf_fOrdChangeAngio1();
  5631. }
  5632. /****************************************************************************************
  5633. * Components :
  5634. * Components ID : button7
  5635. * Event : onclick
  5636. * Argument : 01.obj : Object Event has occurred
  5637. * : 02.e : Event Object
  5638. * Description : 마취유형변경 - 취소
  5639. ****************************************************************************************/
  5640. function button7_onclick(obj:Button, e:ClickEventInfo)
  5641. {
  5642. grp_changeans.visible= false;
  5643. }
  5644. /****************************************************************************************
  5645. * Components :
  5646. * Components ID : button8
  5647. * Event : onclick
  5648. * Argument : 01.obj : Object Event has occurred
  5649. * : 02.e : Event Object
  5650. * Description : 마취유형변경 - 확인
  5651. ****************************************************************************************/
  5652. function button8_onclick(obj:Button, e:ClickEventInfo)
  5653. {
  5654. lf_fOrdChangeAns1();
  5655. }
  5656. /****************************************************************************************
  5657. * Components :
  5658. * Components ID : button9
  5659. * Event : onclick
  5660. * Argument : 01.obj : Object Event has occurred
  5661. * : 02.e : Event Object
  5662. * Description : 외과가산의사변경 - 취소
  5663. ****************************************************************************************/
  5664. function button9_onclick(obj:Button, e:ClickEventInfo)
  5665. {
  5666. grd_selectgsord.visible = false;
  5667. }
  5668. /****************************************************************************************
  5669. * Components :
  5670. * Components ID : button10
  5671. * Event : onclick
  5672. * Argument : 01.obj : Object Event has occurred
  5673. * : 02.e : Event Object
  5674. * Description : 외과가산의사변경 - 확인
  5675. ****************************************************************************************/
  5676. function button10_onclick(obj:Button, e:ClickEventInfo)
  5677. {
  5678. lf_fGSOrdDRYn1();
  5679. }
  5680. /****************************************************************************************
  5681. * Components :
  5682. * Components ID : btn_save
  5683. * Event : onclick
  5684. * Argument : 01.obj : Object Event has occurred
  5685. * : 02.e : Event Object
  5686. * Description : 저장
  5687. ****************************************************************************************/
  5688. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  5689. {
  5690. lf_fJudgAdjtResncdChk();
  5691. if (dsf_datasetUpdateChk(fds_grid_grd_ordlist))
  5692. {
  5693. lf_save_grd_ds(fds_grid_grd_ordlist, ds_cond_grd_ordlist);
  5694. }
  5695. else {
  5696. sysf_messageBox("변경된 데이터가","I004");
  5697. return;
  5698. }
  5699. var rowcnt = fds_grid_grd_ordlist.rowcount;
  5700. var updrowcnt = 0;
  5701. var calcbasedd = new Array();
  5702. var endcalcbasedd = new Array();
  5703. ds_problist.clearData();
  5704. ds_grid_grd_ordlist.addColumn("probordresn", "STRING"); //쿼리에 없음
  5705. for (var i = 0; i < rowcnt; i++)
  5706. {
  5707. var rowstatus = fds_grid_grd_ordlist.getRowType(i);
  5708. var probordresn = fds_grid_grd_ordlist.getColumn(i, "probordresn");
  5709. var calcscorcd = fds_grid_grd_ordlist.getColumn(i, "snglcalcscorcd");
  5710. if (rowstatus == 4)
  5711. {
  5712. calcbasedd[updrowcnt+1] = fds_grid_grd_ordlist.getColumn(i, "execdd").substr(0,8);
  5713. updrowcnt = updrowcnt + 1;
  5714. }
  5715. else
  5716. {
  5717. var row = ds_cond_grd_ordlist.rowposition;
  5718. ds_cond_grd_ordlist.enableevent = false;
  5719. ds_cond_grd_ordlist.setRowType(row, "u"); // update
  5720. ds_cond_grd_ordlist.enableevent = true;
  5721. }
  5722. if (utlf_isNull(probordresn)){ // 문제처방사유가 입력된 건
  5723. } else {
  5724. var num = ds_problist.addRow();
  5725. ds_problist.setColumn(num, "probresn", probordresn);
  5726. ds_problist.setColumn(num, "calcscorcd", calcscorcd);
  5727. ds_problist.setColumn(num, "userid", sysf_getUserInfo("userid"));
  5728. ds_problist.setColumn(num, "updtdate", probordresn);
  5729. }
  5730. }
  5731. for(var i = 0 ; i < ds_cond_grd_ordlist.rowcount; i++) {
  5732. ds_cond_grd_ordlist.setColumn(i, "estmmeancd", ds_cond_grd_ordlist.getColumn(i, "estmmncd"));
  5733. if( utlf_isNull(ds_cond_grd_ordlist.getColumn(i, "payflagyn" )) ) { ds_cond_grd_ordlist.setColumn(i, "payflagyn" , "N"); }
  5734. if( utlf_isNull(ds_cond_grd_ordlist.getColumn(i, "spcordyn" )) ) { ds_cond_grd_ordlist.setColumn(i, "spcordyn" , "N"); }
  5735. if( utlf_isNull(ds_cond_grd_ordlist.getColumn(i, "probordchangeyn" )) ) { ds_cond_grd_ordlist.setColumn(i, "probordchangeyn" , "N"); }
  5736. if( utlf_isNull(ds_cond_grd_ordlist.getColumn(i, "estmyn" )) ) { ds_cond_grd_ordlist.setColumn(i, "estmyn" , "N"); }
  5737. if( utlf_isNull(ds_cond_grd_ordlist.getColumn(i, "nochargeyn" )) ) { ds_cond_grd_ordlist.setColumn(i, "nochargeyn" , "N"); }
  5738. if( utlf_isNull(ds_cond_grd_ordlist.getColumn(i, "ordchangeyn" )) ) { ds_cond_grd_ordlist.setColumn(i, "ordchangeyn" , "N"); }
  5739. if( utlf_isNull(ds_cond_grd_ordlist.getColumn(i, "execchangeyn" )) ) { ds_cond_grd_ordlist.setColumn(i, "execchangeyn" , "N"); }
  5740. if( utlf_isNull(ds_cond_grd_ordlist.getColumn(i, "prcpno" )) ) { ds_cond_grd_ordlist.setColumn(i, "prcpno" , "0"); }
  5741. }
  5742. dsf_setDefaultVal(ds_cond_grd_ordlist, "probordyn:N,spcljudgyn:N,unitspecyn:N,ordtype:I,freeflag:-,ansttm:0000,appunitcost:0,calcamt:0,unithospaddamt:0,unitspecamt:0,unitaddamt:0,totordamt:0,ownbamt:0,hospaddamt:0,specamt:0,addamt:0,tootfact:-,exitprvntdrugyn:N,exitprvntdrugamt:0,pntunitcost:0,payamt:0,allownbamt:0,nopyamt:0,payownbrate:0,payownbamt:0,payinsubamt:0,paydiscamt:0,nopydiscamt:0,specdiscamt:0,hosoutexptresncd:00,opflag:-,bothaddyn:N,proccalctype:A,drugmthyn:N");
  5743. var oParam = {};
  5744. oParam.id = "TXPIJ00401";
  5745. oParam.service = "bfjudgapp.InHospJudgDetl";
  5746. oParam.method = "reqExeSaveIscl";
  5747. oParam.inds = "reqporc=ds_cond_reqporc req=ds_cond_grd_ordlist reqafterchk=ds_temp_afterchk";
  5748. oParam.async = false;
  5749. oParam.callback = "cbf_TXPIJ00401";
  5750. tranf_submit(oParam);
  5751. }
  5752. // 저장 콜백
  5753. function cbf_TXPIJ00401(strSvcID, nErrorCode, strErrorMsg)
  5754. {
  5755. if ( nErrorCode == 0 ) {
  5756. // 저장이 성공하면 ds_cond_req_new 의 데이타를 오프너에 보낸다
  5757. var fromdd = ds_cond_req_new.getColumn(0, "fromdd");
  5758. var todd = ds_cond_req_new.getColumn(0, "todd");
  5759. var mainordfromdd = ds_cond_req_new.getColumn(0, "mainordfromdd");
  5760. var mainordtodd = ds_cond_req_new.getColumn(0, "mainordtodd");
  5761. var calcscorcd = ds_cond_req_new.getColumn(0, "calcscorcd");
  5762. // 코드단위 조회였을경우에는 메인 처방 조회기간대로 함
  5763. if (!utlf_isNull(calcscorcd)) {
  5764. frmf_setParameter("mainordfromdd", mainordfromdd);
  5765. frmf_setParameter("mainordtodd", mainordtodd);
  5766. } else {
  5767. // 조회기간과 동일하게 메인화면에 처 방조회기간을 맞춤
  5768. frmf_setParameter("fromdd", fromdd);
  5769. frmf_setParameter("todd", todd);
  5770. }
  5771. opener.fGetIsclList("IPHS","Y");
  5772. opener.fGetCalc("Y");
  5773. opener.fCheckSpclSpecData();
  5774. // (처방 색깔 항 구분에 따라 흰색-회색 구분되도록 처리)
  5775. // 특정내역이 있는 처방에 'T'필드에 *표를 해준다.
  5776. // 문제처방등록시 문제처방사유를 재원심사메모에 추가한다.
  5777. var probnode = ds_problist.rowcount;
  5778. if ( probnode > 0 ) {
  5779. ds_problist.copyData(opener.ds_cond_sppij00400);
  5780. //opener.lf_fSetProbResn();
  5781. }
  5782. var code = ds_cond_req_new.getColumn(0, "calcscorcd");
  5783. if ( utlf_isNull(code)) {
  5784. lf_fGetIsclList(); // 재원심사 입원세부계산내역 조회
  5785. // 2015.11.05 급비변경후 refresh해도 수익분류별로 유지되도록 추가함
  5786. //opener.lf_fSetIsclColor();
  5787. //opener.fGetSelectedOrderData(); // 처방 조회부 - 재행/급여/항목구분 Radio 선택에 따라 처방 내역을 보여준다.
  5788. // 로딩창 닫기
  5789. // removeLoadingWindow();
  5790. sysf_messageBox("변경 및 재계산이","I002");
  5791. } else {
  5792. // 로딩창 닫기
  5793. // removeLoadingWindow();
  5794. if(sysf_messageBox("변경 및 재계산이 완료되었습니다.\n창을 닫으시겠습니까?","Q") == 6) {
  5795. this.close();
  5796. } else {
  5797. lf_fGetIsclList();
  5798. }
  5799. }
  5800. ds_temp_afterchk.setColumn(0, "afterchk", "N");
  5801. ds_temp_afterchk.setColumn(0, "chkyn", "N");
  5802. } else {
  5803. }
  5804. //lf_fGetIsclList(); // 조회
  5805. }
  5806. /****************************************************************************************
  5807. * Components :
  5808. * Components ID : button3
  5809. * Event : onclick
  5810. * Argument : 01.obj : Object Event has occurred
  5811. * : 02.e : Event Object
  5812. * Description : 문제처방사유 - 취소
  5813. ****************************************************************************************/
  5814. function button3_onclick(obj:Button, e:ClickEventInfo)
  5815. {
  5816. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  5817. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  5818. fds_grid_grd_ordlist.setColumn(i, "probordyn", "N");
  5819. fds_grid_grd_ordlist.setColumn(i, "probordresn", "");
  5820. }
  5821. }
  5822. grp_probresn.visible = false;
  5823. }
  5824. /****************************************************************************************
  5825. * Components :
  5826. * Components ID : button4
  5827. * Event : onclick
  5828. * Argument : 01.obj : Object Event has occurred
  5829. * : 02.e : Event Object
  5830. * Description : 문제처방사유 - 확인
  5831. ****************************************************************************************/
  5832. function button4_onclick(obj:Button, e:ClickEventInfo)
  5833. {
  5834. var probresn = ds_problist.getColumn(0, "probresn");
  5835. if(utlf_isNull(probresn)){
  5836. sysf_messageBox("문제처방 사유를","C001");
  5837. return;
  5838. } else {
  5839. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  5840. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  5841. //선택된row
  5842. var cRrow = i;
  5843. fds_grid_grd_ordlist.setColumn(cRrow, "probordresn", probresn);
  5844. }
  5845. }
  5846. grp_probresn.visible = false;
  5847. }
  5848. }
  5849. /****************************************************************************************
  5850. * Components :
  5851. * Components ID : btn_close
  5852. * Event : onclick
  5853. * Argument : 01.obj : Object Event has occurred
  5854. * : 02.e : Event Object
  5855. * Description : 닫기
  5856. ****************************************************************************************/
  5857. function btn_close_onclick(obj:Button, e:ClickEventInfo)
  5858. {
  5859. this.close();
  5860. // window.close(); // F5 실행시 IE를 종료시킨다.
  5861. }
  5862. /****************************************************************************************
  5863. * Components :
  5864. * Components ID : btn_exl
  5865. * Event : onclick
  5866. * Argument : 01.obj : Object Event has occurred
  5867. * : 02.e : Event Object
  5868. * Description : 엑셀
  5869. ****************************************************************************************/
  5870. function btn_exl_onclick(obj:Button, e:ClickEventInfo)
  5871. {
  5872. grdf_exportExcel(grd_ordlist, "입원재원심사 상세 계산내역", "입원재원심사 상세 계산내역");
  5873. }
  5874. /****************************************************************************************
  5875. * Components :
  5876. * Components ID : caption13
  5877. * Event : onclick
  5878. * Argument : 01.obj : Object Event has occurred
  5879. * : 02.e : Event Object
  5880. * Description : 범례(전체) 선택시
  5881. ****************************************************************************************/
  5882. function caption13_onclick(obj:Static, e:ClickEventInfo)
  5883. {
  5884. // 범례 선택시 필터기능 적용요청(전체)
  5885. lf_fColorFilter("all");
  5886. }
  5887. /****************************************************************************************
  5888. * Components :
  5889. * Components ID : caption14
  5890. * Event : onclick
  5891. * Argument : 01.obj : Object Event has occurred
  5892. * : 02.e : Event Object
  5893. * Description :
  5894. ****************************************************************************************/
  5895. function caption14_onclick(obj:Static, e:ClickEventInfo)
  5896. {
  5897. // 범례 선택시 필터기능 적용요청
  5898. lf_fColorFilter("judgadjtresncd");
  5899. }
  5900. /****************************************************************************************
  5901. * Components :
  5902. * Components ID : caption15
  5903. * Event : onclick
  5904. * Argument : 01.obj : Object Event has occurred
  5905. * : 02.e : Event Object
  5906. * Description :
  5907. ****************************************************************************************/
  5908. function caption15_onclick(obj:Static, e:ClickEventInfo)
  5909. {
  5910. // 범례 선택시 필터기능 적용요청
  5911. lf_fColorFilter("judgadjtresncd");
  5912. }
  5913. /****************************************************************************************
  5914. * Components :
  5915. * Components ID : caption16
  5916. * Event : onclick
  5917. * Argument : 01.obj : Object Event has occurred
  5918. * : 02.e : Event Object
  5919. * Description :
  5920. ****************************************************************************************/
  5921. function caption16_onclick(obj:Static, e:ClickEventInfo)
  5922. {
  5923. // 범례 선택시 필터기능 적용요청
  5924. lf_fColorFilter("probordyn");
  5925. }
  5926. /****************************************************************************************
  5927. * Components :
  5928. * Components ID : caption17
  5929. * Event : onclick
  5930. * Argument : 01.obj : Object Event has occurred
  5931. * : 02.e : Event Object
  5932. * Description :
  5933. ****************************************************************************************/
  5934. function caption17_onclick(obj:Static, e:ClickEventInfo)
  5935. {
  5936. // 범례 선택시 필터기능 적용요청
  5937. lf_fColorFilter("probordyn");
  5938. }
  5939. /****************************************************************************************
  5940. * Components :
  5941. * Components ID : caption18
  5942. * Event : onclick
  5943. * Argument : 01.obj : Object Event has occurred
  5944. * : 02.e : Event Object
  5945. * Description :
  5946. ****************************************************************************************/
  5947. function caption18_onclick(obj:Static, e:ClickEventInfo)
  5948. {
  5949. // 범례 선택시 필터기능 적용요청
  5950. lf_fColorFilter("opprcp");
  5951. }
  5952. /****************************************************************************************
  5953. * Components :
  5954. * Components ID : caption19
  5955. * Event : onclick
  5956. * Argument : 01.obj : Object Event has occurred
  5957. * : 02.e : Event Object
  5958. * Description :
  5959. ****************************************************************************************/
  5960. function caption19_onclick(obj:Static, e:ClickEventInfo)
  5961. {
  5962. // 범례 선택시 필터기능 적용요청
  5963. lf_fColorFilter("opprcp");
  5964. }
  5965. /****************************************************************************************
  5966. * Components :
  5967. * Components ID : caption20
  5968. * Event : onclick
  5969. * Argument : 01.obj : Object Event has occurred
  5970. * : 02.e : Event Object
  5971. * Description :
  5972. ****************************************************************************************/
  5973. function caption20_onclick(obj:Static, e:ClickEventInfo)
  5974. {
  5975. // 범례 선택시 필터기능 적용요청
  5976. lf_fColorFilter("execdeptprcpyn");
  5977. }
  5978. /****************************************************************************************
  5979. * Components :
  5980. * Components ID : caption21
  5981. * Event : onclick
  5982. * Argument : 01.obj : Object Event has occurred
  5983. * : 02.e : Event Object
  5984. * Description :
  5985. ****************************************************************************************/
  5986. function caption21_onclick(obj:Static, e:ClickEventInfo)
  5987. {
  5988. // 범례 선택시 필터기능 적용요청
  5989. lf_fColorFilter("execdeptprcpyn");
  5990. }
  5991. /****************************************************************************************
  5992. * Components :
  5993. * Components ID : caption25
  5994. * Event : onclick
  5995. * Argument : 01.obj : Object Event has occurred
  5996. * : 02.e : Event Object
  5997. * Description :
  5998. ****************************************************************************************/
  5999. function caption25_onclick(obj:Static, e:ClickEventInfo)
  6000. {
  6001. // 범례 선택시 필터기능 적용요청
  6002. lf_fColorFilter("cpyn");
  6003. }
  6004. /****************************************************************************************
  6005. * Components :
  6006. * Components ID : caption26
  6007. * Event : onclick
  6008. * Argument : 01.obj : Object Event has occurred
  6009. * : 02.e : Event Object
  6010. * Description :
  6011. ****************************************************************************************/
  6012. function caption26_onclick(obj:Static, e:ClickEventInfo)
  6013. {
  6014. // 범례 선택시 필터기능 적용요청
  6015. lf_fColorFilter("cpyn");
  6016. }
  6017. /****************************************************************************************
  6018. * Components :
  6019. * Components ID : caption27
  6020. * Event : onclick
  6021. * Argument : 01.obj : Object Event has occurred
  6022. * : 02.e : Event Object
  6023. * Description :
  6024. ****************************************************************************************/
  6025. function caption27_onclick(obj:Static, e:ClickEventInfo)
  6026. {
  6027. // 범례 선택시 필터기능 적용요청
  6028. lf_fColorFilter("spcljudgyn");
  6029. }
  6030. /****************************************************************************************
  6031. * Components :
  6032. * Components ID : caption28
  6033. * Event : onclick
  6034. * Argument : 01.obj : Object Event has occurred
  6035. * : 02.e : Event Object
  6036. * Description :
  6037. ****************************************************************************************/
  6038. function caption28_onclick(obj:Static, e:ClickEventInfo)
  6039. {
  6040. // 범례 선택시 필터기능 적용요청
  6041. lf_fColorFilter("spcljudgyn");
  6042. }
  6043. /****************************************************************************************
  6044. * Components :
  6045. * Components ID : caption43
  6046. * Event : onclick
  6047. * Argument : 01.obj : Object Event has occurred
  6048. * : 02.e : Event Object
  6049. * Description :
  6050. ****************************************************************************************/
  6051. function caption43_onclick(obj:Static, e:ClickEventInfo)
  6052. {
  6053. // 범례 선택시 필터기능 적용요청
  6054. lf_fColorFilter("cpyn");
  6055. }
  6056. /****************************************************************************************
  6057. * Components :
  6058. * Components ID : caption44
  6059. * Event : onclick
  6060. * Argument : 01.obj : Object Event has occurred
  6061. * : 02.e : Event Object
  6062. * Description :
  6063. ****************************************************************************************/
  6064. function caption44_onclick(obj:Static, e:ClickEventInfo)
  6065. {
  6066. // 범례 선택시 필터기능 적용요청
  6067. lf_fColorFilter("cpyn");
  6068. }
  6069. /****************************************************************************************
  6070. * Components :
  6071. * Components ID : Button00_
  6072. * Event : onclick
  6073. * Argument : 01.obj : Object Event has occurred
  6074. * : 02.e : Event Object
  6075. * Description : 상단 닫기
  6076. ****************************************************************************************/
  6077. function Button00_onclick(obj:Button, e:ClickEventInfo)
  6078. {
  6079. close();
  6080. }
  6081. /****************************************************************************************
  6082. * Components :
  6083. * Components ID : grd_ordlist_
  6084. * Event : onrbuttondown
  6085. * Argument : 01.obj : Object Event has occurred
  6086. * : 02.e : Event Object
  6087. * Description : 마우스 우클릭 - 팝업 메뉴
  6088. ****************************************************************************************/
  6089. function grd_ordlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  6090. {
  6091. grdf_setSelectedCell(obj, e);
  6092. var prcpdd = fds_grid_grd_ordlist.getColumn(e.row, "prcpdd");
  6093. var sess_instcd = sysf_getUserInfo("dutplceinstcd");
  6094. if( sess_instcd == "053" && prcpdd < "20150404" ){ // 부천병원
  6095. sysf_messageBox("처방일시가 오픈일 이전은 수정", "E001");
  6096. return;
  6097. } else if ( sess_instcd == "052" && prcpdd < "20151101" ) { // 서울병원
  6098. sysf_messageBox("처방일시가 오픈일 이전은 수정", "E001");
  6099. return;
  6100. } else {
  6101. //grd_ordlist_oncelldblclick();
  6102. if ( fds_grid_grd_ordlist.rowposition > -1 ) {
  6103. var nX = system.clientToScreenX(obj, e.clientX)-20; // 마우스 위아래 약간의 여유를 둠
  6104. var nY = system.clientToScreenY(obj, e.clientY)-13;
  6105. pMenu.trackPopup(nX, nY);
  6106. } else {
  6107. trace("row 선택이 안됨 : 마우스 우클릭 grd_ordlist_onrbuttondown ");
  6108. }
  6109. }
  6110. }
  6111. /****************************************************************************************
  6112. * Components :
  6113. * Components ID : pMenu_
  6114. * Event : onmenuclick
  6115. * Argument : 01.obj : Object Event has occurred
  6116. * : 02.e : Event Object
  6117. * Description : 팝업 메뉴 - 클릭 선택시
  6118. ****************************************************************************************/
  6119. function pMenu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
  6120. {
  6121. var fRow = ds_menu.findRow("idx", e.id); // ds_menu 의 UserData 컬럼에 펑션 세팅된것 찾기
  6122. if ( fRow > -1 ) {
  6123. trace("idx="+ds_menu.getColumn(fRow, "idx")+" / Caption="+ds_menu.getColumn(fRow, "Caption")+" / 함수="+ds_menu.getColumn(fRow, "UserData"))
  6124. eval(e.userdata); // 선택된 메뉴에 따라서 자동 펑션 실행되게함
  6125. }
  6126. }
  6127. /****************************************************************************************
  6128. * Components :
  6129. * Components ID : pMenu_
  6130. * Event : onmouseleave
  6131. * Argument : 01.obj : Object Event has occurred
  6132. * : 02.e : Event Object
  6133. * Description : 팝업 메뉴를 지나치면 없어지게
  6134. ****************************************************************************************/
  6135. function pMenu_onmouseleave(obj:PopupMenu, e:MenuMouseEventInfo)
  6136. {
  6137. // if ( (e.screenX > grd_ordlist.position.x) && (e.screenY > grd_ordlist.position.y) ) {
  6138. // // trace("e.screenX = " + e.screenX + " / e.screenY = " + e.screenY);
  6139. // if ( pMenu.isPopup() ) {
  6140. // pMenu.closePopup();
  6141. // }
  6142. // }
  6143. }
  6144. /****************************************************************************************
  6145. * Components :
  6146. * Components ID : grp_selectspecord_cmb_deptlist_
  6147. * Event : oncloseup
  6148. * Argument : 01.obj : Object Event has occurred
  6149. * : 02.e : Event Object
  6150. * Description : 선택의사변경 - 진료과 변경시 해당과 의사 조회
  6151. ****************************************************************************************/
  6152. function grp_selectspecord_cmb_deptlist_oncloseup(obj:Combo, e:ComboCloseUpEventInfo)
  6153. {
  6154. // 의사 조회
  6155. ds_cond_req_atdoctlist.clearData();
  6156. var aRow = ds_cond_req_atdoctlist.addRow();
  6157. ds_cond_req_atdoctlist.setColumn(aRow, "instcd", "1");
  6158. ds_cond_req_atdoctlist.setColumn(aRow, "orddeptcd", grp_selectspecord.cmb_deptlist.value);
  6159. tranf_submit({
  6160. id : "TRPIJ00409"
  6161. , service : "bfjudgapp.InHospJudgTrgtMan"
  6162. , method : "reqGetdoctList"
  6163. , inds : "req=ds_cond_req_atdoctlist"
  6164. , outds : "ds_data_req_atdoctlist=atdoctlist"
  6165. , async : false
  6166. }); // AND b.prfshipflagcd IN ('11','21','41') <-- TODO : 조건 때문에 조회 안됨 - 전환쪽에 결정되야함
  6167. // trace(ds_data_req_atdoctlist.saveXML());
  6168. }
  6169. // /****************************************************************************************
  6170. // * Components :
  6171. // * Components ID : grd_selectgsord_cmb_gsdeptcd_
  6172. // * Event : oncloseup
  6173. // * Argument : 01.obj : Object Event has occurred
  6174. // * : 02.e : Event Object
  6175. // * Description : 외과가산의사변경 - 진료과 변경시 해당과 의사 조회
  6176. // ****************************************************************************************/
  6177. // function grd_selectgsord_cmb_gsdeptcd_oncloseup(obj:Combo, e:ComboCloseUpEventInfo)
  6178. // {
  6179. // // 의사 조회
  6180. // ds_cond_req_atdoctlist.clearData();
  6181. // //var aRow = ds_cond_req_atdoctlist.addRow();
  6182. // ds_cond_req_atdoctlist.setColumn(0, "instcd", "1");
  6183. // ds_cond_req_atdoctlist.setColumn(0, "orddeptcd", grd_selectgsord.cmb_gsdeptcd.value);
  6184. //
  6185. // tranf_submit({
  6186. // id : "TRPIJ00409"
  6187. // , service : "bfjudgapp.InHospJudgTrgtMan"
  6188. // , method : "reqGetdoctList"
  6189. // , inds : "req=ds_cond_req_atdoctlist"
  6190. // , outds : "ds_data_req_atdoctlist=atdoctlist"
  6191. // , async : false
  6192. // }); // AND b.prfshipflagcd IN ('11','21','41') <-- 조건 때문에 조회 안됨
  6193. // // trace(ds_data_req_atdoctlist.saveXML());
  6194. // }
  6195. /****************************************************************************************
  6196. * Components :
  6197. * Components ID : grd_ordlist_
  6198. * Event : onkeydown
  6199. * Argument : 01.obj : Object Event has occurred
  6200. * : 02.e : Event Object
  6201. * Description : 그리드 - esc키 누르면 화면 닫기
  6202. ****************************************************************************************/
  6203. function grd_ordlist_onkeydown(obj:Grid, e:KeyEventInfo)
  6204. {
  6205. if ( e.keycode == 27 ) { // esc
  6206. btn_close_onclick(); // 닫기
  6207. }
  6208. if (e.ctrlKey && e.keycode == 67 ) {
  6209. // if (obj.currentcol == obj.getBindCellIndex("body","grupcalcscorcd") || obj.currentcol == obj.getBindCellIndex("body","snglcalcscorcd") || obj.currentcol == obj.getBindCellIndex("body","edicd") || obj.currentcol == obj.getBindCellIndex("body","hngnm") ) {
  6210. system.setClipboard("CF_TEXT", obj.getCellText(obj.currentrow, obj.currentcol));
  6211. // } else {
  6212. // grdf_clipboardCopy(obj, "PAM")
  6213. // }
  6214. }
  6215. }
  6216. /****************************************************************************************
  6217. * Components :
  6218. * Components ID : group2_ipt_cd_
  6219. * Event : onkeydown
  6220. * Argument : 01.obj : Object Event has occurred
  6221. * : 02.e : Event Object
  6222. * Description : 수가코드 엔터
  6223. ****************************************************************************************/
  6224. function group2_ipt_cd_onkeydown(obj:Edit, e:KeyEventInfo)
  6225. {
  6226. if ( e.keycode == 13 ) { // enter
  6227. if (group2.ipt_cd.value.length < 1){
  6228. group2.ipt_estmcd.value = "";
  6229. }
  6230. grd_ordlist.updateToDataset();
  6231. group2.btn_srch.setFocus();
  6232. group2_btn_srch_onclick();
  6233. }
  6234. }
  6235. /****************************************************************************************
  6236. * Components :
  6237. * Components ID : rdo_ordfilflag_
  6238. * Event : onitemchanged
  6239. * Argument : 01.obj : Object Event has occurred
  6240. * : 02.e : Event Object
  6241. * Description : 라디오 선택시 재조회
  6242. ****************************************************************************************/
  6243. function group8_rdo_ordfilflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  6244. {
  6245. if (!utlf_isNull(group2.ipt_cd.value)){
  6246. group2.ipt_estmcd.value = "";
  6247. group2.ipt_cd.value = "";
  6248. }
  6249. if (dsf_datasetUpdateChk(fds_grid_grd_ordlist)){
  6250. sysf_messageBox("변경된 데이타 있는 경우 먼저 변경된 데이타를 저장 후 적용하십시요. ", "E100");
  6251. return;
  6252. } else {
  6253. }
  6254. fGetSelectedOrderData(); // 처방 조회부 - 재행/급여/항목구분 Radio 선택에 따라 처방 내역을 보여준다.
  6255. lf_fSetOrderColorByExecdd();
  6256. }
  6257. /****************************************************************************************
  6258. * Components :
  6259. * Components ID : cmb_deptlist
  6260. * Event : onitemchanged
  6261. * Argument : 01.obj : Object Event has occurred
  6262. * : 02.e : Event Object
  6263. * Description :
  6264. ****************************************************************************************/
  6265. function grp_selectspecord_cmb_deptlist_canitemchange(obj:Combo, e:ItemChangeEventInfo)
  6266. {
  6267. // 진료의사
  6268. var sInDsName = dsf_createDsRow("ds_cond"
  6269. , [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  6270. , {col: "orddeptcd", val:obj.value}]);
  6271. var oParam = {};
  6272. oParam.id = "TRPIJ00409";
  6273. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  6274. oParam.method = "reqGetdoctList";
  6275. oParam.inds = "req=" + sInDsName;
  6276. oParam.outds = "ds_init_cmb_orddrid=atdoctlist";
  6277. oParam.async = false;
  6278. tranf_submit(oParam);
  6279. // ds_init_cmb_orddrid.filterstr = "orddeptcd=='"+userid+"' || userid=='-'";
  6280. }
  6281. /****************************************************************************************
  6282. * Components :
  6283. * Components ID : cmb_gsdeptcd
  6284. * Event : onitemchanged
  6285. * Argument : 01.obj : Object Event has occurred
  6286. * : 02.e : Event Object
  6287. * Description :
  6288. ****************************************************************************************/
  6289. function grd_selectgsord_cmb_gsdeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  6290. {
  6291. // 진료의사
  6292. var sInDsName = dsf_createDsRow("ds_cond"
  6293. , [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  6294. , {col: "orddeptcd", val:obj.value}]);
  6295. var oParam = {};
  6296. oParam.id = "TRPIJ00409";
  6297. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  6298. oParam.method = "reqGetdoctList";
  6299. oParam.inds = "req=" + sInDsName;
  6300. oParam.outds = "ds_init_cmb_orddrid=atdoctlist";
  6301. oParam.async = false;
  6302. tranf_submit(oParam);
  6303. }
  6304. /****************************************************************************************
  6305. * Components :
  6306. * Components ID : grd_ordlist
  6307. * Event : onheadclick
  6308. * Argument : Object Event has occurred
  6309. * : Event Object
  6310. * Description : 정렬
  6311. ****************************************************************************************/
  6312. function grd_ordlist_onheadclick(obj:Grid, e:GridClickEventInfo)
  6313. {
  6314. //grdf_gridSort(grd_ordlist, e); // 그리드 정렬
  6315. }
  6316. function group2_rdo_mchrgcode_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  6317. {
  6318. switch(obj.value) {
  6319. case "hngnm": //명칭
  6320. group2.ipt_cd.inputtype = "normal";
  6321. group2.ipt_cd.imemode = "hangul";
  6322. break;
  6323. default: // 수가, EDI
  6324. group2.ipt_cd.inputtype = "numberandenglish";
  6325. group2.ipt_cd.imemode = "alpha";
  6326. break;
  6327. }
  6328. }
  6329. // 입원세부계산내역 엑셀저장
  6330. function btn_excel_onclick(obj:Button, e:ClickEventInfo)
  6331. {
  6332. }
  6333. /****************************************************************************************
  6334. * Argument : 01.obj : lf_fNigtPrcpYn2()
  6335. * : 02.e :
  6336. * Description : 야간휴일가산적용
  6337. ****************************************************************************************/
  6338. function lf_fNigtPrcpYn2()
  6339. {
  6340. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  6341. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  6342. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  6343. // 선택된 row
  6344. var cRrow = i;
  6345. // 처방이 있는경우
  6346. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  6347. // 계산내역인 경우만
  6348. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  6349. // 청구생성된 처방이 있을경우 블로킹
  6350. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  6351. if (cretyn == "Y") {
  6352. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  6353. //if(msg != 6){
  6354. //선택된 row의 체크값을 'N' 로 해주는 함수
  6355. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  6356. return;
  6357. //}
  6358. }
  6359. if(ordcalcflag == "C"){
  6360. if(!utlf_isNull(chk_cd)){
  6361. // 야간휴일가산적용
  6362. fds_grid_grd_ordlist.setColumn(cRrow, "nigtprcpflag", "Y");
  6363. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  6364. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  6365. if(chkjudgresn){
  6366. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  6367. }else{
  6368. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  6369. {
  6370. lf_fSetAdjtResnCd();
  6371. //grp_judgresn.visible = true;
  6372. }
  6373. }
  6374. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  6375. if(row_stat != 1){ // insert
  6376. if(row_stat != 2){ // insert & new
  6377. if(row_stat != 8){ // delete
  6378. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  6379. }
  6380. }
  6381. }
  6382. }
  6383. //계산내역을 갖고 온다.
  6384. //처방내역이면 계산을 돌리지 않는다.
  6385. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  6386. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  6387. return;
  6388. }
  6389. }
  6390. }
  6391. }
  6392. }
  6393. /****************************************************************************************
  6394. * Argument : 01.obj : lf_fNigtPrcpYn2()
  6395. * : 02.e :
  6396. * Description : 야간휴일가산적용
  6397. ****************************************************************************************/
  6398. function lf_fNigtPrcpYn1()
  6399. {
  6400. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  6401. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  6402. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  6403. // 선택된 row
  6404. var cRrow = i;
  6405. // 처방이 있는경우
  6406. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  6407. // 계산내역인 경우만
  6408. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  6409. // 청구생성된 처방이 있을경우 블로킹
  6410. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  6411. if (cretyn == "Y") {
  6412. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  6413. //if(msg != 6){
  6414. //선택된 row의 체크값을 'N' 로 해주는 함수
  6415. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  6416. return;
  6417. //}
  6418. }
  6419. if(ordcalcflag == "C"){
  6420. if(!utlf_isNull(chk_cd)){
  6421. // 야간휴일가산적용
  6422. fds_grid_grd_ordlist.setColumn(cRrow, "nigtprcpflag", "N");
  6423. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  6424. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  6425. if(chkjudgresn){
  6426. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  6427. }else{
  6428. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  6429. {
  6430. lf_fSetAdjtResnCd();
  6431. //grp_judgresn.visible = true;
  6432. }
  6433. }
  6434. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  6435. if(row_stat != 1){ // insert
  6436. if(row_stat != 2){ // insert & new
  6437. if(row_stat != 8){ // delete
  6438. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  6439. }
  6440. }
  6441. }
  6442. }
  6443. //계산내역을 갖고 온다.
  6444. //처방내역이면 계산을 돌리지 않는다.
  6445. if(fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O"){
  6446. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  6447. return;
  6448. }
  6449. }
  6450. }
  6451. }
  6452. }
  6453. /****************************************************************************************
  6454. * Components :
  6455. * Components ID : grd_ordlist
  6456. * Event : onexpanddown
  6457. * Argument : 01.obj : Object Event has occurred
  6458. * : 02.e : Event Object
  6459. * Description : 기본용법(돋보기)
  6460. ****************************************************************************************/
  6461. function grd_ordlist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
  6462. {
  6463. // alert(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "drugmthdspccd"));
  6464. if ( utlf_isNull(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "drugmthdspccd")) ) {
  6465. sysf_messageBox("약품정보가 없습니다. 약품을", "C002");
  6466. return;
  6467. }
  6468. frmf_setParameter("SPADB61200_prcpclscd", fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "drugmthdspccd"));
  6469. var rtnArg = frmf_modal("SPADB61200", "SPADB61200", "", "", "", "", "", "", "", "", "", "", "M");
  6470. if(!utlf_isNull(rtnArg)){
  6471. ds_data_druginfo.setColumn(0,"basemthdcd",rtnArg.plgv_sMthdcd);
  6472. ds_data_druginfo.setColumn(0,"basemthdnm",rtnArg.plgv_sMthdnm);
  6473. }
  6474. }
  6475. function group8_rdo_ordfilflag_onitemclick(obj:Radio, e:RadioMouseEventInfo)
  6476. {
  6477. }
  6478. function group8_caption45_onclick(obj:Static, e:ClickEventInfo)
  6479. {
  6480. }
  6481. function btn_EnvSetup_onclick(obj:Button, e:ClickEventInfo)
  6482. {
  6483. grdf_SaveOrderInfoOfCol(grd_ordlist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  6484. cnrlf_SaveOrderInfoOfCnrl(group8.cmb_judgresn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  6485. cnrlf_SaveOrderInfoOfCnrl(group8.bool1, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  6486. cnrlf_SaveOrderInfoOfCnrl(group2.chk_recalcyn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  6487. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  6488. }
  6489. function cf_Uuee_SPPIJ00400(sSvcId, nErrorCode, sErrorMsg) {
  6490. if(nErrorCode < 0) return;
  6491. var grd_name = ds_hidden_listval_uuee.lookupExpr("compsnm == 'grd_ordlist'","compsnm");
  6492. var refdata = ds_hidden_listval_uuee.lookupExpr("compsnm == 'grd_ordlist'","compscnts");
  6493. var sizedata = ds_hidden_listval_uuee.lookupExpr("compsnm == 'grd_ordlist'","compssizecnts");
  6494. if (!utlf_isNull(grd_name)) {
  6495. grdf_SetOrderInfoOfCol_format(grd_ordlist, refdata, sizedata);
  6496. }
  6497. grdf_initGrid(grd_ordlist);
  6498. grdf_setRowTypeIcon(grd_ordlist, 0); // 그리드 데이타 상태 아이콘
  6499. grdf_setToolTipBind(grd_ordlist); // 그리드 툴팁
  6500. lf_grid_band_left(grd_ordlist, 15); // 틀고정
  6501. cnrlf_setOrderInfoOfCtrl(group8.cmb_judgresn, ds_hidden_listval_uuee, "");
  6502. cnrlf_setOrderInfoOfCtrl(group8.bool1, ds_hidden_listval_uuee, "A");
  6503. cnrlf_setOrderInfoOfCtrl(group2.chk_recalcyn, ds_hidden_listval_uuee, "Y");
  6504. }
  6505. function cf_Cnfm_SPPIJ00400(){
  6506. }
  6507. function grp_selectspecord_cmb_deptlist_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  6508. {
  6509. // 진료의사
  6510. var sInDsName = dsf_createDsRow("ds_cond"
  6511. , [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  6512. , {col: "orddeptcd", val:obj.value}]);
  6513. var oParam = {};
  6514. oParam.id = "TRPIJ00409";
  6515. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  6516. oParam.method = "reqGetdoctList";
  6517. oParam.inds = "req=" + sInDsName;
  6518. oParam.outds = "ds_init_cmb_orddrid=atdoctlist";
  6519. oParam.async = false;
  6520. tranf_submit(oParam);
  6521. }
  6522. function SPPIJ00400_oninit(obj:Form, e:InitEventInfo)
  6523. {
  6524. frmf_initForm(obj); // 화면공통
  6525. var objParam = [{cdGrpId: "P0153", dsNm: dsf_createDs("ds_initZ_P0153")}
  6526. ,{cdGrpId: "M0006", dsNm: dsf_createDs("ds_initZ_M0006")}
  6527. ,{cdGrpId: "M0007", dsNm: dsf_createDs("ds_initZ_M0007")}
  6528. ,{cdGrpId: "M0008", dsNm: dsf_createDs("ds_initZ_M0008")}
  6529. ,{cdGrpId: "P0153", dsNm: dsf_createDs("ds_grid_grd_judgresn0153")}
  6530. ,{cdGrpId: "P0506", dsNm: dsf_createDs("ds_init_P0506")}
  6531. ,{cdGrpId: "M0639", dsNm: dsf_createDs("ds_init_M0639")}
  6532. ];
  6533. appf_getCodeListSubmit(objParam, true, false);
  6534. appf_getKindCodeList([{bizId:"M0047", cdGrpId:"M0046", dsNm:"ds_init_drugspd", sortField:"dispseq", sortMehotd:"asc"}]);
  6535. appf_showValue(ds_init_drugspd);
  6536. }
  6537. function grp_execdd_cmb_chnghh_onsetfocus(obj:MaskEdit, e:SetFocusEventInfo)
  6538. {
  6539. obj.autoselect = true;
  6540. }
  6541. function group2_chk_recalcyn_onclick(obj:CheckBox, e:ClickEventInfo)
  6542. {
  6543. }
  6544. function ds_grid_grd_ordlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  6545. {
  6546. // if( e.columnid == "opansflagcd" ){
  6547. // obj.setColumn(e.row, "opansflagcd", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
  6548. // obj.setColumn(e.row, "opansyn", "Y");
  6549. // }
  6550. if( e.columnid == "drgacptflag" ){
  6551. obj.setColumn(e.row, "drgacptyn", "Y");
  6552. }
  6553. }
  6554. function lf_fOrdChangeRehb()
  6555. {
  6556. var row = fds_grid_grd_ordlist.rowposition;
  6557. var prcpclscd = fds_grid_grd_ordlist.getColumn(row, "prcpclscd");
  6558. if (prcpclscd != "C2") {// 초음파처방이 아닌경우
  6559. sysf_messageBox("초음파처방이 아닌 경우 변경", "E001");
  6560. return;
  6561. }
  6562. // 청구생성된 처방이 있을경우 블로킹
  6563. var cretyn = fds_grid_grd_ordlist.getColumn(row, "cretyn");
  6564. if (cretyn == "Y") {
  6565. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  6566. //if(msg != 6){
  6567. return;
  6568. //}
  6569. }
  6570. var grupcalcscorcd = fds_grid_grd_ordlist.getColumn(row, "grupcalcscorcd");
  6571. if (lf_ContainsHardCD("536", grupcalcscorcd)) { // 단순초음파 또는 유도초음파인경우 치료부위, 관련행위, 처방사유 입력 할수 있도록
  6572. var sInDsName = dsf_createDsRow("ds_cond_prcpcd", [{col: "prcpcd", val:grupcalcscorcd}]);
  6573. var oParam = {};
  6574. oParam.id = "TRMMO00162";
  6575. oParam.service = "prcpmngtapp.PrcpMngt";
  6576. oParam.method = "reqGetUltaSonoDrugMthdSpccdList";
  6577. oParam.inds = "req="+sInDsName;
  6578. oParam.outds = "ds_drugmthdspccdlist=drugmthdspccdlist";
  6579. oParam.async = false;
  6580. tranf_submit(oParam);
  6581. ds_drugmthdspccdlist.updateColID("trgtcd", "cdid");
  6582. ds_drugmthdspccdlist.updateColID("trgtcdnm", "cdnm");
  6583. appf_showValue(ds_drugmthdspccdlist);
  6584. }
  6585. var rehbprcpcurepartcd = fds_grid_grd_ordlist.getColumn(row, "rehbprcpcurepartcd");
  6586. var drugmthdspccd = fds_grid_grd_ordlist.getColumn(row, "drugmthcd");
  6587. var exptmthdfact = fds_grid_grd_ordlist.getColumn(row, "exptmthdfact");
  6588. grp_changeop00.cmb_rehbprcpcurepartcd.value = rehbprcpcurepartcd;
  6589. grp_changeop00.cmb_drugmthdspccd.value = drugmthdspccd;
  6590. grp_changeop00.ipt_exptmthdfact.value = exptmthdfact;
  6591. grp_changeop00.position.x = "396";
  6592. grp_changeop00.position.y = "316"
  6593. grp_changeop00.visible = true;
  6594. }
  6595. function grp_changeop00_button1_onclick(obj:Button, e:ClickEventInfo)
  6596. {
  6597. grp_changeop00.visible = false;
  6598. }
  6599. function grp_changeop00_button2_onclick(obj:Button, e:ClickEventInfo)
  6600. {
  6601. lf_fOrdChangeRehb1();
  6602. }
  6603. function lf_fOrdChangeRehb1()
  6604. {
  6605. var row = fds_grid_grd_ordlist.rowposition;
  6606. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  6607. var opansflag = grp_changeop.cmb_opflag.value;
  6608. var judgresn = fds_grid_grd_ordlist.getColumn(row, "judgadjtresncd");
  6609. var editflag = fds_grid_grd_ordlist.getColumn(row, "editflag");
  6610. grp_changeop00.visible = false;
  6611. if(chkjudgresn){
  6612. fds_grid_grd_ordlist.setColumn(row, "judgadjtresncd", chkjudgresn);
  6613. }else{
  6614. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  6615. {
  6616. lf_fSetAdjtResnCd();
  6617. }
  6618. }
  6619. fds_grid_grd_ordlist.setColumn(row, "drugmthyn", "Y");
  6620. fds_grid_grd_ordlist.setColumn(row, "rehbprcpcurepartcd", grp_changeop00.cmb_rehbprcpcurepartcd.value);
  6621. fds_grid_grd_ordlist.setColumn(row, "drugmthcd", grp_changeop00.cmb_drugmthdspccd.value);
  6622. fds_grid_grd_ordlist.setColumn(row, "exptmthdfact", grp_changeop00.ipt_exptmthdfact.value);
  6623. }
  6624. function cf_TRPIJ00350(sSvcId, nErrorCode, sErrorMsg) {
  6625. if(nErrorCode < 0) {alert("에러cf_TRPIJ00350"); return;}
  6626. ds_grid_grd_ordlist.updatecontrol = false;
  6627. var frow = -1;
  6628. for (var i=0; i < ds_isclediudiff.rowcount; i++) {
  6629. frow = ds_grid_grd_ordlist.findRowExpr("grupcalcscorcd=='" + ds_isclediudiff.getColumn(i,"grupcalcscorcd") + "' " +
  6630. " && snglcalcscorcd=='" + ds_isclediudiff.getColumn(i,"snglcalcscorcd") + "'" +
  6631. " && edicd=='" + ds_isclediudiff.getColumn(i,"edicd") + "'" +
  6632. //" && estmcd=='" + ds_isclediudiff.getColumn(i,"estmcd") + "'" +
  6633. " && sortexecdd=='" + ds_isclediudiff.getColumn(i,"execdd") + "'" +
  6634. " && calcpayflag=='" + ds_isclediudiff.getColumn(i,"calcpayflag") + "'" +
  6635. " && edicdflag=='" + ds_isclediudiff.getColumn(i,"edicdflag") + "'" +
  6636. " && matractflag=='" + ds_isclediudiff.getColumn(i,"matractflag") + "'");
  6637. if (frow > -1) {
  6638. ds_grid_grd_ordlist.setColumn(frow,"sortcolor", "#FF5A5A");
  6639. }
  6640. }
  6641. ds_grid_grd_ordlist.updatecontrol = true;
  6642. }
  6643. function btn_EnvSetup00_onclick(obj:Button, e:ClickEventInfo)
  6644. {
  6645. var msg = sysf_messageBox("환경저장 데이터가 모두 삭제 됩니다.","Q003");
  6646. if (msg == 6) { // 6세미만 요율을 적용한다.
  6647. grdf_DelUuee(grd_ordlist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  6648. grd_ordlist.formatid = "default";
  6649. grdf_DelUuee(group8.cmb_judgresn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  6650. grdf_DelUuee(group8.bool1, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  6651. grdf_DelUuee(group2.chk_recalcyn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  6652. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  6653. }
  6654. }
  6655. function lf_fclamkeySetLockN(){
  6656. // 선택된 row의 체크값을 'Y' 로 해주는 함수
  6657. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  6658. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  6659. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  6660. // 선택된 row
  6661. var cRrow = i;
  6662. // 선택된 row 와 같은 snglcalcscorcd 를 가진 선택되지 않은 row가 있다면 모두 변경을 할 것인지 메세지로 확인하도록 처리한다.
  6663. // 동일한 급비일 경우 처리하지 않는다.
  6664. var cretyn= fds_grid_grd_ordlist.getColumn(i, "cretyn");
  6665. if (cretyn != "N") {
  6666. var prcpdd1 = fds_grid_grd_ordlist.getColumn(i, "prcpdd");
  6667. var prcpno1 = fds_grid_grd_ordlist.getColumn(i, "prcpno");
  6668. var prcphistno1 = fds_grid_grd_ordlist.getColumn(i, "prcphistno");
  6669. var hngnm = fds_grid_grd_ordlist.getColumn(i, "hngnm");
  6670. var messageYn = "N";
  6671. // 선택되지 않은 처방이 같은 row를 담을 배열
  6672. var samecalclist = new Array();
  6673. var index = 0;
  6674. for (var j=0; j<fds_grid_grd_ordlist.rowcount; j++) {
  6675. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  6676. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  6677. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  6678. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  6679. if (chkflag != "Y" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  6680. messageYn = "Y";
  6681. samecalclist[index++] = j;
  6682. }
  6683. }
  6684. }
  6685. // 동일한 코드나 선택되지 않은 row가 있다면
  6686. if (messageYn == "Y") {
  6687. var rtnMsg = sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001");
  6688. if ( rtnMsg == 6 ) { //Yes
  6689. ds_hidden.setColumn(0, "judgresn", "");
  6690. ds_hidden.setColumn(0, "prcpdd", "");
  6691. ds_hidden.setColumn(0, "prcpno", "");
  6692. ds_hidden.setColumn(0, "prcphistno", "");
  6693. lf_fExecuteClamkeyLockN(i);
  6694. for(var k=0; k < index; k++) {
  6695. var row = samecalclist[k];
  6696. lf_fExecuteClamkeyLockN(row);
  6697. }
  6698. } else if( rtnMsg == 7 ) { // No
  6699. ds_hidden.setColumn(0, "judgresn", "");
  6700. ds_hidden.setColumn(0, "prcpdd", "");
  6701. ds_hidden.setColumn(0, "prcpno", "");
  6702. ds_hidden.setColumn(0, "prcphistno", "");
  6703. lf_fExecuteClamkeyLockN(cRrow);
  6704. } else { // Cancel
  6705. ds_hidden.setColumn(0, "judgresn", "");
  6706. ds_hidden.setColumn(0, "prcpdd", "");
  6707. ds_hidden.setColumn(0, "prcpno", "");
  6708. ds_hidden.setColumn(0, "prcphistno", "");
  6709. }
  6710. } else {
  6711. ds_hidden.setColumn(0, "judgresn", "");
  6712. ds_hidden.setColumn(0, "prcpdd", "");
  6713. ds_hidden.setColumn(0, "prcpno", "");
  6714. ds_hidden.setColumn(0, "prcphistno", "");
  6715. lf_fExecuteClamkeyLockN(cRrow);
  6716. }
  6717. }
  6718. }
  6719. // 선택된 row의 체크값을 'N' 로 해주는 함수
  6720. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  6721. }
  6722. function lf_fExecuteClamkeyLockN(cRrow)
  6723. {
  6724. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn"); // ds_cond_req = send
  6725. // 처방이 있는경우
  6726. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  6727. if ( !utlf_isNull(chk_cd) ) {
  6728. fds_grid_grd_ordlist.setColumn(cRrow, "cretyn", "N");
  6729. fds_grid_grd_ordlist.setColumn(cRrow, "chkflag", "Y");
  6730. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  6731. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  6732. if ( !utlf_isNull(chkjudgresn) ) { //if ( chkjudgresn ) {
  6733. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  6734. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  6735. } else {
  6736. if ( judgresn == "-" || utlf_isNull(judgresn) || editflag == "N" || chkjudgresn == "-")
  6737. {
  6738. // 동일 처방에 이미 심사사유가 달려있으면 그것을 넣어주도록 하고, 없으면 넣도록 팝업을 띄운다.
  6739. var judgresn1 = ds_hidden.getColumn(0, "judgresn");
  6740. var prcpdd1 = ds_hidden.getColumn(0, "prcpdd");
  6741. var prcpno1 = ds_hidden.getColumn(0, "prcpno");
  6742. var prcphistno1 = ds_hidden.getColumn(0, "prcphistno");
  6743. var prcpdd2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  6744. var prcpno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  6745. var prcphistno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  6746. if (prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  6747. // 기존 심사사유 넣기
  6748. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn1);
  6749. } else {
  6750. // 새로 심사사유 넣기
  6751. var cd = lf_fSetAdjtResnCd2();
  6752. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  6753. ds_hidden.setColumn(0, "judgresn", cd);
  6754. ds_hidden.setColumn(0, "prcpdd", prcpdd2);
  6755. ds_hidden.setColumn(0, "prcpno", prcpno2);
  6756. ds_hidden.setColumn(0, "prcphistno", prcphistno2);
  6757. }
  6758. }
  6759. }
  6760. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  6761. //alert("row_stat = " + row_stat);
  6762. if(row_stat != 1){ // insert
  6763. if(row_stat != 2){ // insert & new
  6764. if(row_stat != 8){ // delete
  6765. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  6766. }
  6767. }
  6768. }
  6769. }
  6770. // 처방급비변경여부를 'Y'로 세팅
  6771. ds_grid_grd_ordlist.addColumn("clamkeylockn", "STRING", 256 ); // 쿼리에 존재하지 않음
  6772. fds_grid_grd_ordlist.setColumn(cRrow, "clamkeylockn", "Y");
  6773. // 처방내역이면 계산을 돌리지 않는다.
  6774. if ( fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O" ){
  6775. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  6776. // grd_ordlist.rowstatus(cRrow) = 0; // 2 : update
  6777. return;
  6778. }
  6779. }
  6780. function lf_fOrdChangeExecTM()
  6781. {
  6782. grp_exectm.position = "absolute 421 294 780 400";
  6783. grp_exectm.visible = true;
  6784. if(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "H2"
  6785. || fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "H4"
  6786. || fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "prcpclscd") == "I2")
  6787. {
  6788. grp_exectm.chk_afterchk2.visible = true;
  6789. if(fds_grid_grd_ordlist.getColumn(fds_grid_grd_ordlist.rowposition, "afterchk") == "Y") {
  6790. //ds_temp_afterchk.setColumn(0, "afterchk", "Y");
  6791. grp_exectm.chk_afterchk2.value = "Y";
  6792. }
  6793. }
  6794. //trace(ds_temp_afterchk.getColumn(0, "afterchk"));
  6795. var selectedRows = grdf_getSelectedRows(grd_ordlist);
  6796. ds_hidden_chngexec.setColumn(0, "chngdd", fds_grid_grd_ordlist.getColumn(selectedRows[selectedRows.length-1], "execdd").substr(0,8)); // 일
  6797. ds_hidden_chngexec.setColumn(0, "chnghh", fds_grid_grd_ordlist.getColumn(selectedRows[selectedRows.length-1], "execdd").substr(8,2)); // 시
  6798. ds_hidden_chngexec.setColumn(0, "chngmn", fds_grid_grd_ordlist.getColumn(selectedRows[selectedRows.length-1], "execdd").substr(10,2)); // 분
  6799. }
  6800. function grp_exectm_btn_canlexecdd_onclick(obj:Button, e:ClickEventInfo)
  6801. {
  6802. grp_exectm.visible = false;
  6803. }
  6804. function grp_exectm_btn_chngexectm_onclick(obj:Button, e:ClickEventInfo)
  6805. {
  6806. var chngdd = ds_hidden_chngexec.getColumn(0, "chngdd");
  6807. var chnghh = ds_hidden_chngexec.getColumn(0, "chnghh");
  6808. var chngmn = ds_hidden_chngexec.getColumn(0, "chngmn");
  6809. if (chnghh.length == 1) chnghh = "0" + chnghh;
  6810. if (chngmn.length == 1) chngmn = "0" + chngmn;
  6811. var newexecdd = chngdd + chnghh + chngmn;
  6812. tranf_submit({
  6813. id : "TRPIJ00410"
  6814. , service : "bfjudgapp.InHospJudgDetl"
  6815. , method : "reqGetDschnotidt"
  6816. , inds : "req=ds_cond_req"
  6817. , outds : "ds_hidden_inpt=inpt"
  6818. , async : false
  6819. });
  6820. var dschnotidt = ds_hidden_inpt.getColumn(0, "dschnotidt");
  6821. if (!utlf_isNull(dschnotidt) && newexecdd >= dschnotidt) {
  6822. sysf_messageBox("변경하는 시행일이 퇴원확정 시간보다 큽니다. 퇴원확정시간 이전으로 변경하세요!!!. 시간까지 ","I007");
  6823. return;
  6824. }
  6825. // 수정사유선택시 수정사유팝업안뜨게 수정
  6826. var judgresn = ds_cond_req.getColumn(0, "judgresn");
  6827. var cur_row = fds_grid_grd_ordlist.rowposition;
  6828. if(utlf_isNull(judgresn) || judgresn == " "){
  6829. var cd = lf_fSetAdjtResnCd2();
  6830. }
  6831. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  6832. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  6833. // 선택된 row
  6834. var cRrow = i;
  6835. var oldexecddtm = fds_grid_grd_ordlist.getColumn(cRrow, "execdd");
  6836. var oldexecdd = String(fds_grid_grd_ordlist.getColumn(cRrow, "execdd")).substr(0,8);
  6837. var execstat = fds_grid_grd_ordlist.getColumn(cRrow, "execstat");
  6838. // 청구생성된 처방이 있을경우 블로킹
  6839. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  6840. if (cretyn == "Y") {
  6841. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  6842. //if(msg != 6){
  6843. // 선택된 row의 체크값을 'N' 로 해주는 함수
  6844. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  6845. grp_exectm.visible = false;
  6846. return;
  6847. //}
  6848. }
  6849. if (oldexecddtm != newexecdd && execstat == "Y") {
  6850. fds_grid_grd_ordlist.setColumn(cRrow, "newexecdd", oldexecdd + chnghh + chngmn);
  6851. fds_grid_grd_ordlist.setColumn(cRrow, "execchangeyn", "Y");
  6852. if(utlf_isNull(judgresn) || judgresn == " "){
  6853. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  6854. }else{
  6855. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn);
  6856. }
  6857. fds_grid_grd_ordlist.setRowType(cRrow, 4);
  6858. }
  6859. }
  6860. }
  6861. grp_exectm.visible = false;
  6862. }
  6863. function lf_fOrdChangeSelcPay()
  6864. {
  6865. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "Y");
  6866. // 제약조건을 사전에 처리하도록 한다. (데이터가 변경되는 row도 있기 때문에)
  6867. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  6868. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  6869. // 선택된 row
  6870. var cRrow = i;
  6871. // 계산내역인 경우만
  6872. var ordcalcflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag");
  6873. // 동일한 급일 경우 처리하지 않는다.
  6874. var calcpayflag = fds_grid_grd_ordlist.getColumn(cRrow, "calcpayflag");
  6875. // 수가마스터 셋팅의 급비에 따른 급여 전환 처리
  6876. // 1. 수가마스터 상 급비가 급여 : 급여 , 100/100, 비급여 모두 선택가능
  6877. // 2. 수가마스터 상 급비가 100/100 : 100/100, 비급여 만 선택가능
  6878. // 3. 수가마스터 상 급비가 비급여 : 비급여 만 선택가능
  6879. var pynpy = fds_grid_grd_ordlist.getColumn(cRrow, "pynpy");
  6880. // 하단의 경우는 급여구분 100/100 으로 변환 할 수 없다.
  6881. // 처방구분 대분류 핵의학 09 + 중분류( PET CT 02, PET MRI 05)
  6882. // 처방구분 대분류 방사선 MRI 25
  6883. var earncls1 = fds_grid_grd_ordlist.getColumn(cRrow, "earncls1");
  6884. var earncls2 = fds_grid_grd_ordlist.getColumn(cRrow, "earncls2");
  6885. var newexecdd = fds_grid_grd_ordlist.getColumn(cRrow, "newexecdd");
  6886. // (급비변경시 구수가코드 ordinptflag == 'x' 이면 변경 할 수 없음 처리)
  6887. var ordinptflag = fds_grid_grd_ordlist.getColumn(cRrow, "ordinptflag");
  6888. // 청구생성된 처방이 있을경우 블로킹
  6889. var cretyn = fds_grid_grd_ordlist.getColumn(cRrow, "cretyn");
  6890. var calcscorcd = fds_grid_grd_ordlist.getColumn(cRrow, "grupcalcscorcd");
  6891. var execdd = fds_grid_grd_ordlist.getColumn(cRrow, "sortexecdd");
  6892. var insukind = fds_grid_grd_ordlist.getColumn(cRrow, "insukind");
  6893. if (cretyn == "Y") {
  6894. var msg = sysf_messageBox("청구생성된 처방이 포함되어 변경 할 수 없습니다. 생성삭제 후", "C003");
  6895. //if(msg != 6){
  6896. // 선택된 row의 체크값을 'N' 로 해주는 함수
  6897. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  6898. return;
  6899. //}
  6900. } else if (ordinptflag == "X") {
  6901. sysf_messageBox("급비변경이 불가한 코드(구수가코드)가 포함되어 변경", "E001");
  6902. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  6903. return;
  6904. } else if (lf_pam_fc_get_payflag(calcscorcd, execdd, insukind, "3") == "N") {
  6905. sysf_messageBox("선별급여처리 기준에 포함되지 않는 처방이 있어 변경", "E001");
  6906. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  6907. return;
  6908. }
  6909. }
  6910. }
  6911. for (var i=0; i<fds_grid_grd_ordlist.rowcount; i++) {
  6912. if ( fds_grid_grd_ordlist.getSelect(i) == true ) {
  6913. // 선택된 row
  6914. var cRrow = i;
  6915. // 동일한 급일 경우 처리하지 않는다.
  6916. var prcppayflag = fds_grid_grd_ordlist.getColumn(cRrow, "prcppayflag");
  6917. if (prcppayflag != "3" ) {
  6918. // 선택된 row 와 같은 snglcalcscorcd 를 가진 선택안된 row가 있다면 모두 변경을 할 것인지 메세지로 확인하도록 처리한다.
  6919. var prcpdd1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  6920. var prcpno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  6921. var prcphistno1 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  6922. var hngnm = fds_grid_grd_ordlist.getColumn(cRrow, "hngnm");
  6923. var messageYn = "N";
  6924. // 선택되지 않은 동일한 처방 row를 담을 배열
  6925. var samecalclist = new Array();
  6926. var index = 0;
  6927. for (var j=0; j<fds_grid_grd_ordlist.rowcount; j++) {
  6928. var chkflag = fds_grid_grd_ordlist.getColumn(j, "chkflag");
  6929. var prcpdd2 = fds_grid_grd_ordlist.getColumn(j, "prcpdd");
  6930. var prcpno2 = fds_grid_grd_ordlist.getColumn(j, "prcpno");
  6931. var prcphistno2 = fds_grid_grd_ordlist.getColumn(j, "prcphistno");
  6932. if (chkflag != "Y" && prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  6933. messageYn = "Y";
  6934. samecalclist[index++] = j;
  6935. }
  6936. }
  6937. // 동일한 코드나 선택되지 않은 row가 있다면
  6938. if (messageYn == "Y") {
  6939. var rtnMsg = sysf_messageBox("선택되지 않은 동일한 처방이 있습니다. 모두 변경", "S001")
  6940. if ( rtnMsg == 6) { // Yes
  6941. ds_hidden.setColumn(0, "judgresn", "");
  6942. ds_hidden.setColumn(0, "prcpdd", "");
  6943. ds_hidden.setColumn(0, "prcpno", "");
  6944. ds_hidden.setColumn(0, "prcphistno", "");
  6945. lf_fOrdExecuteNopy(cRrow);
  6946. for(var k=0; k < index; k++) {
  6947. var row = samecalclist[k];
  6948. lf_fOrdExecuteSelcPay(row);
  6949. }
  6950. } else if( rtnMsg == 7 ) { // No
  6951. ds_hidden.setColumn(0, "judgresn", "");
  6952. ds_hidden.setColumn(0, "prcpdd", "");
  6953. ds_hidden.setColumn(0, "prcpno", "");
  6954. ds_hidden.setColumn(0, "prcphistno", "");
  6955. lf_fOrdExecuteSelcPay(cRrow);
  6956. } else { // Cancel
  6957. ds_hidden.setColumn(0, "judgresn", "");
  6958. ds_hidden.setColumn(0, "prcpdd", "");
  6959. ds_hidden.setColumn(0, "prcpno", "");
  6960. ds_hidden.setColumn(0, "prcphistno", "");
  6961. }
  6962. } else {
  6963. ds_hidden.setColumn(0, "judgresn", "");
  6964. ds_hidden.setColumn(0, "prcpdd", "");
  6965. ds_hidden.setColumn(0, "prcpno", "");
  6966. ds_hidden.setColumn(0, "prcphistno", "");
  6967. lf_fOrdExecuteSelcPay(cRrow);
  6968. }
  6969. }
  6970. }
  6971. }
  6972. fCheckYNSelectedRows(fds_grid_grd_ordlist, "chkflag", "N");
  6973. }
  6974. function lf_fOrdExecuteSelcPay(cRrow)
  6975. {
  6976. var chkjudgresn = ds_cond_req.getColumn(0, "judgresn");
  6977. // 처방이 있는 경우
  6978. var chk_cd = fds_grid_grd_ordlist.getColumn(cRrow, "snglcalcscorcd");
  6979. if(!utlf_isNull(chk_cd)){
  6980. fds_grid_grd_ordlist.setColumn(cRrow, "calcpayflag", "3");
  6981. fds_grid_grd_ordlist.setColumn(cRrow, "chkflag", "Y");
  6982. var judgresn = fds_grid_grd_ordlist.getColumn(cRrow, "judgadjtresncd");
  6983. var editflag = fds_grid_grd_ordlist.getColumn(cRrow, "editflag");
  6984. if (!utlf_isNull(chkjudgresn) && chkjudgresn != "-") {
  6985. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", chkjudgresn);
  6986. fds_grid_grd_ordlist.setColumn(cRrow, "editflag", "Y");
  6987. } else {
  6988. if(judgresn == "-" || utlf_isNull(judgresn) || editflag == "N")
  6989. {
  6990. // 동일 처방에 이미 심사사유가 달려있으면 그것을 넣어주도록 하고, 없으면 넣도록 팝업을 띄운다.
  6991. var judgresn1 = ds_hidden.getColumn(0, "judgresn");
  6992. var prcpdd1 = ds_hidden.getColumn(0, "prcpdd");
  6993. var prcpno1 = ds_hidden.getColumn(0, "prcpno");
  6994. var prcphistno1 = ds_hidden.getColumn(0, "prcphistno");
  6995. var prcpdd2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpdd");
  6996. var prcpno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcpno");
  6997. var prcphistno2 = fds_grid_grd_ordlist.getColumn(cRrow, "prcphistno");
  6998. if (prcpdd1 == prcpdd2 && prcpno1 == prcpno2 && prcphistno1 == prcphistno2) {
  6999. // 기존 심사사유 넣기
  7000. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", judgresn1);
  7001. } else {
  7002. // 새로운 심사사유 넣기
  7003. var cd = lf_fSetAdjtResnCd2();
  7004. fds_grid_grd_ordlist.setColumn(cRrow, "judgadjtresncd", cd);
  7005. ds_hidden.setColumn(0, "judgresn", cd);
  7006. ds_hidden.setColumn(0, "prcpdd", prcpdd2);
  7007. ds_hidden.setColumn(0, "prcpno", prcpno2);
  7008. ds_hidden.setColumn(0, "prcphistno", prcphistno2);
  7009. //grp_judgresn.visible = true;
  7010. }
  7011. }
  7012. }
  7013. var row_stat = fds_grid_grd_ordlist.getRowType(cRrow);
  7014. if(row_stat != 1){ // insert
  7015. if(row_stat != 2){ // insert & new
  7016. if(row_stat != 8){ // delete
  7017. fds_grid_grd_ordlist.setRowType(cRrow, 4); // update
  7018. }
  7019. }
  7020. }
  7021. }
  7022. // 계산내역을 갖고 온다.
  7023. // 처방급비변경여부를 'Y'로 세팅
  7024. ds_grid_grd_ordlist.addColumn("payflagyn", "STRING", 256 ); // 쿼리에 존재하지 않음
  7025. fds_grid_grd_ordlist.setColumn(cRrow, "payflagyn", "Y");
  7026. // 처방내역이면 계산을 돌리지 않는다.
  7027. if( fds_grid_grd_ordlist.getColumn(cRrow, "ordcalcflag") == "O" ){
  7028. // grd_ordlist.rowstatus(cRrow) = 0; // 2 : update
  7029. fds_grid_grd_ordlist.setRowType(cRrow, 1);
  7030. return;
  7031. }
  7032. }
  7033. function lf_pam_fc_get_payflag(calcscorcd, execdd, insukind, payflagcd) {
  7034. ds_getfcpayflagyn.clearData();
  7035. var sInDsName = dsf_createDsRow("ds_cond_check"
  7036. , [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  7037. , {col: "calcscorcd", val:calcscorcd}
  7038. , {col: "execdd", val:execdd}
  7039. , {col: "insukind", val:insukind}
  7040. , {col: "payflagcd", val:payflagcd}]);
  7041. var oParam = {};
  7042. oParam.id = "TRPIJ00350";
  7043. oParam.service = "bfjudgapp.InHospJudg";
  7044. oParam.method = "reqGetFcPayflagYn";
  7045. oParam.inds = "req=ds_cond_check";
  7046. oParam.outds = "ds_getfcpayflagyn=rsltInfo";
  7047. oParam.async = false;
  7048. //oParam.callback = "cf_TRPIJ00350";
  7049. tranf_submit(oParam);
  7050. return utlf_transNull(ds_getfcpayflagyn.getColumn(0,"payflagyn"), "N");
  7051. }
  7052. // 20191218 주석입력 기능 추가
  7053. function fOrderGridInsertCmt()
  7054. {
  7055. ds_grd_clcjlist.copyData(opener.ds_grd_clcjlist);
  7056. var rdounitflag = opener.ds_send.getColumn(0, "unitflag");
  7057. var rows = ds_grd_clcjlist.rowcount;
  7058. if (rdounitflag == "M")
  7059. {
  7060. //opener.group6.grp_spcl.swt_spclmemo.case_spclspec.rdo_unitflag.value = "J";
  7061. //ds_send.setColumn(0, "unitflag", "J");
  7062. ds_grd_clcjlist.filterstr = "unitflag == 'J'";
  7063. // 단위에 따라 해당 행있는 특정코드 콤보 재설정
  7064. var rowcnt = ds_grd_clcjlist.rowcount;
  7065. for (var i=1; i<rowcnt; i++) {
  7066. var unitflag = ds_grd_clcjlist.getColumn(ds_grd_clcjlist.rowposition, "unitflag");
  7067. var status = ds_grd_clcjlist.getColumn(ds_grd_clcjlist.rowposition, "status");
  7068. if (!utlf_isNull(status)) {
  7069. var arrPostion = new Array();
  7070. arrPostion[0] = i;
  7071. grdf_setStatus( grd_clcjlist, status, arrPostion);
  7072. }
  7073. }
  7074. }
  7075. ds_cond_sppij00500.clearData();
  7076. ds_cond_sppij00500.addRow();
  7077. ds_cond_list_sppij00500.clearData();
  7078. var SelectedRows = grdf_getSelectedRows(grd_ordlist);
  7079. var rowcount = SelectedRows.length;
  7080. for (var k=0; k < rowcount; k++ ) {
  7081. var row = SelectedRows[k];
  7082. var edicd = fds_grid_grd_ordlist.getColumn(row,"edicd");
  7083. var calcscorcd = fds_grid_grd_ordlist.getColumn(row,"snglcalcscorcd");
  7084. if (!utlf_isNull(edicd)) {
  7085. } else {
  7086. sysf_messageBox("EDI코드가 없는 경우 해당 줄단위 특정내역이", "I004"); ///EDI코드가 없는 경우 해당 줄단위 특정내역이 없습니다.
  7087. return;
  7088. }
  7089. }
  7090. var rowcnt = 1;
  7091. var setrow = 0;
  7092. var objds = fds_grid_grd_ordlist;
  7093. rowcount = SelectedRows.length;
  7094. for (var k=0; k < rowcount; k++ ) {
  7095. var row = SelectedRows[k];
  7096. var edicd = objds.getColumn(row,"edicd");
  7097. var calcscorcd = objds.getColumn(row, "snglcalcscorcd");
  7098. if (rows == 0) {
  7099. ds_cond_sppij00500.setColumn(0, "pid" , opener.gv_pid);
  7100. ds_cond_sppij00500.setColumn(0, "indd" , opener.gv_indd1);
  7101. ds_cond_sppij00500.setColumn(0, "edicd" , edicd);
  7102. ds_cond_sppij00500.setColumn(0, "unitflag" , "J");
  7103. ds_cond_sppij00500.setColumn(0, "flag" , "I");
  7104. ds_cond_sppij00500.setColumn(0, "spclcd" , "JX999");
  7105. ds_cond_sppij00500.setColumn(0, "spclcdnm" , "");
  7106. ds_cond_sppij00500.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
  7107. ds_cond_sppij00500.setColumn(0, "spclspec" , "");
  7108. ds_cond_sppij00500.setColumn(0, "remfact" , "X(700)");
  7109. ds_cond_sppij00500.setColumn(0, "rownum" , "");
  7110. ds_cond_sppij00500.setColumn(0, "calcscorcd" , calcscorcd);
  7111. }
  7112. else if (ds_grd_clcjlist.findRowExpr("calcscorcd=='"+calcscorcd+"'") == -1) {
  7113. ds_cond_sppij00500.setColumn(0, "pid" , opener.gv_pid);
  7114. ds_cond_sppij00500.setColumn(0, "indd" , opener.gv_indd1);
  7115. ds_cond_sppij00500.setColumn(0, "edicd" , edicd);
  7116. ds_cond_sppij00500.setColumn(0, "unitflag" , "J");
  7117. ds_cond_sppij00500.setColumn(0, "flag" , "I");
  7118. ds_cond_sppij00500.setColumn(0, "spclcd" , "JX999");
  7119. ds_cond_sppij00500.setColumn(0, "spclcdnm" , "");
  7120. ds_cond_sppij00500.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
  7121. ds_cond_sppij00500.setColumn(0, "spclspec" , "");
  7122. ds_cond_sppij00500.setColumn(0, "remfact" , "X(700)");
  7123. ds_cond_sppij00500.setColumn(0, "rownum" , "");
  7124. ds_cond_sppij00500.setColumn(0, "calcscorcd" , calcscorcd);
  7125. if (SelectedRows.length > 1) {
  7126. var addrow = ds_cond_list_sppij00500.addRow();
  7127. ds_cond_list_sppij00500.setColumn(addrow, "calcscorcd" , calcscorcd);
  7128. ds_cond_list_sppij00500.setColumn(addrow, "pid" , opener.gv_pid);
  7129. ds_cond_list_sppij00500.setColumn(addrow, "indd" , opener.gv_indd1);
  7130. ds_cond_list_sppij00500.setColumn(addrow, "edicd" , edicd);
  7131. ds_cond_list_sppij00500.setColumn(addrow, "unitflag" , "J");
  7132. ds_cond_list_sppij00500.setColumn(addrow, "flag" , "I");
  7133. ds_cond_list_sppij00500.setColumn(addrow, "spclcd" , "JX999");
  7134. ds_cond_list_sppij00500.setColumn(addrow, "spclcdnm" , "");
  7135. ds_cond_list_sppij00500.setColumn(addrow, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
  7136. ds_cond_list_sppij00500.setColumn(addrow, "spclspec" , "");
  7137. ds_cond_list_sppij00500.setColumn(addrow, "remfact" , "X(700)");
  7138. ds_cond_list_sppij00500.setColumn(addrow, "rownum" , "");
  7139. ds_cond_list_sppij00500.setColumn(addrow, "calcscorcd" , calcscorcd);
  7140. }
  7141. } else {
  7142. for (var i=0; i< rows; i++) {
  7143. var clcjedicd = ds_grd_clcjlist.getColumn(i, "edicd");
  7144. var spclcd = ds_grd_clcjlist.getColumn(i, "spclcd");
  7145. if ( edicd == clcjedicd) {
  7146. ds_cond_sppij00500.setColumn(0, "pid" , opener.gv_pid);
  7147. ds_cond_sppij00500.setColumn(0, "indd" , opener.gv_indd1);
  7148. var addrow = ds_cond_list_sppij00500.addRow();
  7149. ds_cond_list_sppij00500.setColumn(addrow, "flag" , "U");
  7150. ds_cond_list_sppij00500.setColumn(addrow, "edicd" , ds_grd_clcjlist.getColumn(i, "edicd"));
  7151. ds_cond_list_sppij00500.setColumn(addrow, "detldesc" , ds_grd_clcjlist.getColumn(i, "detldesc"));
  7152. ds_cond_list_sppij00500.setColumn(addrow, "spclcd" , ds_grd_clcjlist.getColumn(i, "spclcd"));
  7153. ds_cond_list_sppij00500.setColumn(addrow, "spclcdnm" , "");
  7154. ds_cond_list_sppij00500.setColumn(addrow, "spclspec" , ds_grd_clcjlist.getColumn(i, "spclspec"));
  7155. ds_cond_list_sppij00500.setColumn(addrow, "remfact" , ds_grd_clcjlist.getColumn(i, "remfact"));
  7156. ds_cond_list_sppij00500.setColumn(addrow, "rownum" , i);
  7157. ds_cond_list_sppij00500.setColumn(addrow, "unitflag" , "J");
  7158. ds_cond_list_sppij00500.setColumn(addrow, "oldspclcd" , ds_grd_clcjlist.getColumn(i, "spclcd"));
  7159. ds_cond_list_sppij00500.setColumn(addrow, "oldspclspec" , ds_grd_clcjlist.getColumn(i, "spclspec"));
  7160. ds_cond_list_sppij00500.setColumn(addrow, "calcscorcd" , ds_grd_clcjlist.getColumn(i, "calcscorcd"));
  7161. // 특정내역 상세 화면에 보여줄 특정내역 선택
  7162. setrow = i;
  7163. }
  7164. ds_cond_sppij00500.setColumn(0, "edicd" , edicd);
  7165. ds_cond_sppij00500.setColumn(0, "unitflag" , "J");
  7166. if ( ds_grd_clcjlist.getColumn(setrow, "spclcd") == "JX999" ) {
  7167. ds_cond_sppij00500.setColumn(0, "pid" , opener.gv_pid);
  7168. ds_cond_sppij00500.setColumn(0, "indd" , opener.gv_indd1);
  7169. ds_cond_sppij00500.setColumn(0, "flag" , "U");
  7170. ds_cond_sppij00500.setColumn(0, "spclcd" , ds_grd_clcjlist.getColumn(setrow, "spclcd"));
  7171. ds_cond_sppij00500.setColumn(0, "spclcdnm" , "");
  7172. ds_cond_sppij00500.setColumn(0, "detldesc" , ds_grd_clcjlist.getColumn(setrow, "detldesc"));
  7173. ds_cond_sppij00500.setColumn(0, "spclspec" , ds_grd_clcjlist.getColumn(setrow, "spclspec"));
  7174. ds_cond_sppij00500.setColumn(0, "remfact" , ds_grd_clcjlist.getColumn(setrow, "remfact"));
  7175. ds_cond_sppij00500.setColumn(0, "rownum" , setrow);
  7176. ds_cond_sppij00500.setColumn(0, "calcscorcd" , ds_grd_clcjlist.getColumn(setrow, "calcscorcd"));
  7177. } else {
  7178. ds_cond_sppij00500.setColumn(0, "pid" , opener.gv_pid);
  7179. ds_cond_sppij00500.setColumn(0, "indd" , opener.gv_indd1);
  7180. ds_cond_sppij00500.setColumn(0, "flag" , "I");
  7181. ds_cond_sppij00500.setColumn(0, "spclcd" , "JX999");
  7182. ds_cond_sppij00500.setColumn(0, "spclcdnm" , "");
  7183. ds_cond_sppij00500.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
  7184. ds_cond_sppij00500.setColumn(0, "spclspec" , ds_grd_clcjlist.getColumn(setrow, "spclspec"));
  7185. ds_cond_sppij00500.setColumn(0, "remfact" , "X(700)");
  7186. ds_cond_sppij00500.setColumn(0, "rownum" , "");
  7187. ds_cond_sppij00500.setColumn(0, "calcscorcd" , calcscorcd);
  7188. }
  7189. }
  7190. }
  7191. }
  7192. fOpen_SPPIJ00500();
  7193. }
  7194. function fOpen_SPPIJ00500() {
  7195. var rtn = frmf_modal("SPPIJ00500","SPPIJ00500",{objDs:ds_cond_sppij00500, objDslist:ds_cond_list_sppij00500},"","","","","","","","","","M");// SPPIJ00500_특정내역상세관리
  7196. var rtnrowcnt = rtn.rowcount;
  7197. if (rtnrowcnt > 0) {
  7198. for(var i = rtnrowcnt-1; i>=0; i--) {
  7199. var flag = rtn.getColumn(i, "flag");
  7200. var edicd = rtn.getColumn(i, "edicd");
  7201. var newspclcd = rtn.getColumn(i, "spclcd");
  7202. var newspclcdnm = rtn.getColumn(i, "spclcdnm");
  7203. var newspclspec = rtn.getColumn(i, "spclspec");
  7204. var newremfact = rtn.getColumn(i, "remfact");
  7205. var newdetldesc = rtn.getColumn(i, "detldesc");
  7206. var newdcalcscorcd = rtn.getColumn(i, "calcscorcd");
  7207. var oldspclcd = rtn.getColumn(i, "oldspclcd");
  7208. var oldspclspec = rtn.getColumn(i, "oldspclspec");
  7209. var rownum = ds_grd_clcjlist.findRowExpr("edicd =='"+edicd+"' && calcscorcd=='"+newdcalcscorcd+"' && spclcd=='"+newspclcd+"'");
  7210. if (flag == "I") {
  7211. var clcjrow = ds_grd_clcjlist.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
  7212. ds_grd_clcjlist.setColumn(clcjrow, "pid", opener.gv_pid);
  7213. ds_grd_clcjlist.setColumn(clcjrow, "indd", opener.gv_indd1);
  7214. ds_grd_clcjlist.setColumn(clcjrow, "cretno", opener.gv_cretno);
  7215. ds_grd_clcjlist.setColumn(clcjrow, "fromdd", opener.gv_fromdd);
  7216. ds_grd_clcjlist.setColumn(clcjrow, "mskind", opener.gv_mskind);
  7217. ds_grd_clcjlist.setColumn(clcjrow, "unitflag", "J");
  7218. ds_grd_clcjlist.setColumn(clcjrow, "edicd", edicd);
  7219. ds_grd_clcjlist.setColumn(clcjrow, "spclcd", newspclcd);
  7220. ds_grd_clcjlist.setColumn(clcjrow, "spclspec", newspclspec);
  7221. ds_grd_clcjlist.setColumn(clcjrow, "remfact", newremfact);
  7222. ds_grd_clcjlist.setColumn(clcjrow, "detldesc", newdetldesc);
  7223. ds_grd_clcjlist.setColumn(clcjrow, "calcscorcd", newdcalcscorcd);
  7224. ds_grd_clcjlist.setColumn(clcjrow, "spclmemoflag", "E");
  7225. ds_grd_clcjlist.rowposition = clcjrow;
  7226. //grd_clcjlist.vscrollbar.pos = clcjrow;
  7227. // 특정코드 변경인 경우
  7228. } else if (flag == "U") {
  7229. var frow = 0;
  7230. var rowcnt = ds_grd_clcjlist.getCaseCount("edicd =='"+edicd+"' && calcscorcd=='"+newdcalcscorcd+"' && spclcd=='"+newspclcd+"'");
  7231. for (var k=0; k < rowcnt; k++) {
  7232. rownum = ds_grd_clcjlist.findRowExpr("edicd =='"+edicd+"' && calcscorcd=='"+newdcalcscorcd+"' && spclcd=='"+newspclcd+"'", frow++);
  7233. ds_grd_clcjlist.setColumn(rownum, "spclcd", newspclcd);
  7234. ds_grd_clcjlist.setColumn(rownum, "spclspec", newspclspec);
  7235. ds_grd_clcjlist.setColumn(rownum, "remfact", newremfact);
  7236. ds_grd_clcjlist.setColumn(rownum, "detldesc", newdetldesc);
  7237. ds_grd_clcjlist.setColumn(rownum, "calcscorcd", newdcalcscorcd);
  7238. ds_grd_clcjlist.rowposition = rownum;
  7239. //grd_clcjlist.vscrollbar.pos = rownum;
  7240. if ( ds_grd_clcjlist.getRowType(rownum) != 2) {
  7241. var arrPostion = new Array();
  7242. arrPostion[0] = rownum;
  7243. grdf_setStatus( grd_clcjlist, "", arrPostion);
  7244. }
  7245. // 특정코드, 특정내역이 변경되었거나 삭제된 특정코드를 조회하여 "확인"을 선택한 경우
  7246. if (oldspclcd != newspclcd || oldspclspec != newspclspec || ds_grd_clcjlist.getRowType(rownum) == 8) {
  7247. var rowstatus = ds_grd_clcjlist.getRowType(rownum)
  7248. if (rowstatus == 2) { // 1 : insert, 3 : insert & new
  7249. } else {
  7250. var arrPostion = new Array();
  7251. arrPostion[0] = rownum;
  7252. grdf_setStatus( grd_clcjlist, "U", arrPostion);
  7253. }
  7254. }
  7255. frow = rownum + 1;
  7256. }
  7257. // 특정코드 삭제인 경우
  7258. } else if (flag == "D" && !utlf_isNull(rownum)) {
  7259. var cnt = 0;
  7260. var rowcnt = ds_grd_clcjlist.rowcount;
  7261. for (var j = 0; j < rowcnt; j++) {
  7262. var clcjedicd = ds_grd_clcjlist.getColumn(j, "edicd");
  7263. if (edicd == clcjedicd) {
  7264. if (ds_grd_clcjlist.getRowType(j) != 8) {
  7265. cnt++;
  7266. }
  7267. }
  7268. }
  7269. // 특정내역 Grid에서 삭제
  7270. var rowstatus = ds_grd_clcjlist.getRowType(rownum);
  7271. if (rowstatus == 2 ) {
  7272. ds_grd_clcjlist.deleteRow(rownum);// 해당 라인을 Grid에서 삭제한다.
  7273. } else { // 0 : new, 2 : update
  7274. var arrPostion = new Array();
  7275. arrPostion[0] = rownum;
  7276. grdf_setStatus( grd_clcjlist, "D", arrPostion); // 4 : delete 상태로 stat를 변경한다.
  7277. }
  7278. ds_grd_clcjlist.rowposition = rownum;
  7279. //grd_clcjlist.vscrollbar.pos = rownum;
  7280. } // 특정 코드 상태 따른 if end
  7281. }
  7282. var oParam = {};
  7283. oParam.id = "TXPIJ00309";
  7284. oParam.service = "bfjudgapp.InHospJudg";
  7285. oParam.method = "reqExeSaveClcj";
  7286. oParam.inds = "req=ds_grd_clcjlist:U";
  7287. //oParam.outds = "ds_vcode=vcode ds_rareessc=rareessc ds_chkesscedi=chkesscedi ds_getdschcalccheck=getdschcalccheck";
  7288. oParam.async = false;
  7289. //oParam.callback = "cf_TXPIJ00309";
  7290. tranf_submit(oParam);
  7291. }
  7292. }
  7293. function CheckBox_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  7294. {
  7295. ds_temp_afterchk.setColumn(0, "chkyn", "Y");
  7296. ds_temp_afterchk.setColumn(0, "afterchk", e.postvalue);
  7297. }
  7298. ]]></Script>
  7299. </Form>
  7300. </FDL>