123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547115481154911550115511155211553115541155511556115571155811559115601156111562115631156411565115661156711568115691157011571115721157311574115751157611577115781157911580115811158211583115841158511586115871158811589115901159111592115931159411595115961159711598115991160011601116021160311604116051160611607116081160911610116111161211613116141161511616116171161811619116201162111622116231162411625116261162711628116291163011631116321163311634116351163611637116381163911640116411164211643116441164511646116471164811649116501165111652116531165411655116561165711658116591166011661116621166311664116651166611667116681166911670116711167211673116741167511676116771167811679116801168111682116831168411685116861168711688116891169011691116921169311694116951169611697116981169911700117011170211703117041170511706117071170811709117101171111712117131171411715117161171711718117191172011721117221172311724117251172611727117281172911730117311173211733117341173511736117371173811739117401174111742117431174411745117461174711748117491175011751117521175311754117551175611757117581175911760117611176211763117641176511766117671176811769117701177111772117731177411775117761177711778117791178011781117821178311784117851178611787117881178911790117911179211793117941179511796117971179811799118001180111802118031180411805118061180711808118091181011811118121181311814118151181611817118181181911820118211182211823118241182511826118271182811829118301183111832118331183411835118361183711838118391184011841118421184311844118451184611847118481184911850118511185211853118541185511856118571185811859118601186111862118631186411865118661186711868118691187011871118721187311874118751187611877118781187911880118811188211883118841188511886118871188811889118901189111892118931189411895118961189711898118991190011901119021190311904119051190611907119081190911910119111191211913119141191511916119171191811919119201192111922119231192411925119261192711928119291193011931119321193311934119351193611937119381193911940119411194211943119441194511946119471194811949119501195111952119531195411955119561195711958119591196011961119621196311964119651196611967119681196911970119711197211973119741197511976119771197811979119801198111982119831198411985119861198711988119891199011991119921199311994119951199611997119981199912000120011200212003120041200512006120071200812009120101201112012120131201412015120161201712018120191202012021120221202312024120251202612027120281202912030120311203212033120341203512036120371203812039120401204112042120431204412045120461204712048120491205012051120521205312054120551205612057120581205912060120611206212063120641206512066120671206812069120701207112072120731207412075120761207712078120791208012081120821208312084120851208612087120881208912090120911209212093120941209512096120971209812099121001210112102121031210412105121061210712108121091211012111121121211312114121151211612117121181211912120121211212212123121241212512126121271212812129121301213112132121331213412135121361213712138121391214012141121421214312144121451214612147121481214912150121511215212153121541215512156121571215812159121601216112162121631216412165121661216712168121691217012171121721217312174121751217612177121781217912180121811218212183121841218512186121871218812189121901219112192121931219412195121961219712198121991220012201122021220312204122051220612207122081220912210122111221212213122141221512216122171221812219122201222112222122231222412225122261222712228122291223012231122321223312234122351223612237122381223912240122411224212243122441224512246122471224812249122501225112252122531225412255122561225712258122591226012261122621226312264122651226612267122681226912270122711227212273122741227512276122771227812279122801228112282122831228412285122861228712288122891229012291122921229312294122951229612297122981229912300123011230212303123041230512306123071230812309123101231112312123131231412315123161231712318123191232012321123221232312324123251232612327123281232912330123311233212333123341233512336123371233812339123401234112342123431234412345123461234712348123491235012351123521235312354123551235612357123581235912360123611236212363123641236512366123671236812369123701237112372123731237412375123761237712378123791238012381123821238312384123851238612387123881238912390123911239212393123941239512396123971239812399124001240112402124031240412405124061240712408124091241012411124121241312414124151241612417124181241912420124211242212423124241242512426124271242812429124301243112432124331243412435124361243712438124391244012441124421244312444124451244612447124481244912450124511245212453124541245512456124571245812459124601246112462124631246412465124661246712468124691247012471124721247312474124751247612477124781247912480124811248212483124841248512486124871248812489124901249112492124931249412495124961249712498124991250012501125021250312504125051250612507125081250912510125111251212513125141251512516125171251812519125201252112522125231252412525125261252712528125291253012531125321253312534125351253612537125381253912540125411254212543125441254512546125471254812549125501255112552125531255412555125561255712558125591256012561125621256312564125651256612567125681256912570125711257212573125741257512576125771257812579125801258112582125831258412585125861258712588125891259012591125921259312594125951259612597125981259912600126011260212603126041260512606126071260812609126101261112612126131261412615126161261712618126191262012621126221262312624126251262612627126281262912630126311263212633126341263512636126371263812639126401264112642126431264412645126461264712648126491265012651126521265312654126551265612657126581265912660126611266212663126641266512666126671266812669126701267112672126731267412675126761267712678126791268012681126821268312684126851268612687126881268912690126911269212693126941269512696126971269812699127001270112702127031270412705127061270712708127091271012711127121271312714127151271612717127181271912720127211272212723127241272512726127271272812729127301273112732127331273412735127361273712738127391274012741127421274312744127451274612747127481274912750127511275212753127541275512756127571275812759127601276112762127631276412765127661276712768127691277012771127721277312774127751277612777127781277912780127811278212783127841278512786127871278812789127901279112792127931279412795127961279712798127991280012801128021280312804128051280612807128081280912810128111281212813128141281512816128171281812819128201282112822128231282412825128261282712828128291283012831128321283312834128351283612837128381283912840128411284212843128441284512846128471284812849128501285112852128531285412855128561285712858128591286012861128621286312864128651286612867128681286912870128711287212873128741287512876128771287812879128801288112882128831288412885128861288712888128891289012891128921289312894128951289612897128981289912900129011290212903129041290512906129071290812909129101291112912129131291412915129161291712918129191292012921129221292312924129251292612927129281292912930129311293212933129341293512936129371293812939129401294112942129431294412945129461294712948129491295012951129521295312954129551295612957129581295912960129611296212963129641296512966129671296812969129701297112972129731297412975129761297712978129791298012981129821298312984129851298612987129881298912990129911299212993129941299512996129971299812999130001300113002130031300413005130061300713008130091301013011130121301313014130151301613017130181301913020130211302213023130241302513026130271302813029130301303113032130331303413035130361303713038130391304013041130421304313044130451304613047130481304913050130511305213053130541305513056130571305813059130601306113062130631306413065130661306713068130691307013071130721307313074130751307613077130781307913080130811308213083130841308513086130871308813089130901309113092130931309413095130961309713098130991310013101131021310313104131051310613107131081310913110131111311213113131141311513116131171311813119131201312113122131231312413125131261312713128131291313013131131321313313134131351313613137131381313913140131411314213143131441314513146131471314813149131501315113152131531315413155131561315713158131591316013161131621316313164131651316613167131681316913170131711317213173131741317513176131771317813179131801318113182131831318413185131861318713188131891319013191131921319313194131951319613197131981319913200132011320213203132041320513206132071320813209132101321113212132131321413215132161321713218132191322013221132221322313224132251322613227132281322913230132311323213233132341323513236132371323813239132401324113242132431324413245132461324713248132491325013251132521325313254132551325613257132581325913260132611326213263132641326513266132671326813269132701327113272132731327413275132761327713278132791328013281132821328313284132851328613287132881328913290132911329213293132941329513296132971329813299133001330113302133031330413305133061330713308133091331013311133121331313314133151331613317133181331913320133211332213323133241332513326133271332813329133301333113332133331333413335133361333713338133391334013341133421334313344133451334613347133481334913350133511335213353133541335513356133571335813359133601336113362133631336413365133661336713368133691337013371133721337313374133751337613377133781337913380133811338213383133841338513386133871338813389133901339113392133931339413395133961339713398133991340013401134021340313404134051340613407134081340913410134111341213413134141341513416134171341813419134201342113422134231342413425134261342713428134291343013431134321343313434134351343613437134381343913440134411344213443134441344513446134471344813449134501345113452134531345413455134561345713458134591346013461134621346313464134651346613467134681346913470134711347213473134741347513476134771347813479134801348113482134831348413485134861348713488134891349013491134921349313494134951349613497134981349913500135011350213503135041350513506135071350813509135101351113512135131351413515135161351713518135191352013521135221352313524135251352613527135281352913530135311353213533135341353513536135371353813539135401354113542135431354413545135461354713548135491355013551135521355313554135551355613557135581355913560135611356213563135641356513566135671356813569135701357113572135731357413575135761357713578135791358013581135821358313584135851358613587135881358913590135911359213593135941359513596135971359813599136001360113602136031360413605136061360713608136091361013611136121361313614136151361613617136181361913620136211362213623136241362513626136271362813629136301363113632136331363413635136361363713638136391364013641136421364313644136451364613647136481364913650136511365213653136541365513656136571365813659136601366113662136631366413665136661366713668136691367013671136721367313674136751367613677136781367913680136811368213683136841368513686136871368813689136901369113692136931369413695136961369713698136991370013701137021370313704137051370613707137081370913710137111371213713137141371513716137171371813719137201372113722137231372413725137261372713728137291373013731137321373313734137351373613737137381373913740137411374213743137441374513746137471374813749137501375113752137531375413755137561375713758137591376013761137621376313764137651376613767137681376913770137711377213773137741377513776137771377813779137801378113782137831378413785137861378713788137891379013791137921379313794137951379613797137981379913800138011380213803138041380513806138071380813809138101381113812138131381413815138161381713818138191382013821138221382313824138251382613827138281382913830138311383213833138341383513836138371383813839138401384113842138431384413845138461384713848138491385013851138521385313854138551385613857138581385913860138611386213863138641386513866138671386813869138701387113872138731387413875138761387713878138791388013881138821388313884138851388613887138881388913890138911389213893138941389513896138971389813899139001390113902139031390413905139061390713908139091391013911139121391313914139151391613917139181391913920139211392213923139241392513926139271392813929139301393113932139331393413935139361393713938139391394013941139421394313944139451394613947139481394913950139511395213953139541395513956139571395813959139601396113962139631396413965139661396713968139691397013971139721397313974139751397613977139781397913980139811398213983139841398513986139871398813989139901399113992139931399413995139961399713998139991400014001140021400314004140051400614007140081400914010140111401214013140141401514016140171401814019140201402114022140231402414025140261402714028140291403014031140321403314034140351403614037140381403914040140411404214043140441404514046140471404814049140501405114052140531405414055140561405714058140591406014061140621406314064140651406614067140681406914070140711407214073140741407514076140771407814079140801408114082140831408414085140861408714088140891409014091140921409314094140951409614097140981409914100141011410214103141041410514106141071410814109141101411114112141131411414115141161411714118141191412014121141221412314124141251412614127141281412914130141311413214133141341413514136141371413814139141401414114142141431414414145141461414714148141491415014151141521415314154141551415614157141581415914160141611416214163141641416514166141671416814169141701417114172141731417414175141761417714178141791418014181141821418314184141851418614187141881418914190141911419214193141941419514196141971419814199142001420114202142031420414205142061420714208142091421014211142121421314214142151421614217142181421914220142211422214223142241422514226142271422814229142301423114232142331423414235142361423714238142391424014241142421424314244142451424614247142481424914250142511425214253142541425514256142571425814259142601426114262142631426414265142661426714268142691427014271142721427314274142751427614277142781427914280142811428214283142841428514286142871428814289142901429114292142931429414295142961429714298142991430014301143021430314304143051430614307143081430914310143111431214313143141431514316143171431814319143201432114322143231432414325143261432714328143291433014331143321433314334143351433614337143381433914340143411434214343143441434514346143471434814349143501435114352143531435414355143561435714358143591436014361143621436314364143651436614367143681436914370143711437214373143741437514376143771437814379143801438114382143831438414385143861438714388143891439014391143921439314394143951439614397143981439914400144011440214403144041440514406144071440814409144101441114412144131441414415144161441714418144191442014421144221442314424144251442614427144281442914430144311443214433144341443514436144371443814439144401444114442144431444414445144461444714448144491445014451144521445314454144551445614457144581445914460144611446214463144641446514466144671446814469144701447114472144731447414475144761447714478144791448014481144821448314484144851448614487144881448914490144911449214493144941449514496144971449814499145001450114502145031450414505145061450714508145091451014511145121451314514145151451614517145181451914520145211452214523145241452514526145271452814529145301453114532145331453414535145361453714538145391454014541145421454314544145451454614547145481454914550145511455214553145541455514556145571455814559145601456114562145631456414565145661456714568145691457014571145721457314574145751457614577145781457914580145811458214583145841458514586145871458814589145901459114592145931459414595145961459714598145991460014601146021460314604146051460614607146081460914610146111461214613146141461514616146171461814619146201462114622146231462414625146261462714628146291463014631146321463314634146351463614637146381463914640146411464214643146441464514646146471464814649146501465114652146531465414655146561465714658146591466014661146621466314664146651466614667146681466914670146711467214673146741467514676146771467814679146801468114682146831468414685146861468714688146891469014691146921469314694146951469614697146981469914700147011470214703147041470514706147071470814709147101471114712147131471414715147161471714718147191472014721147221472314724147251472614727147281472914730147311473214733147341473514736147371473814739147401474114742147431474414745147461474714748147491475014751147521475314754147551475614757147581475914760147611476214763147641476514766147671476814769147701477114772147731477414775147761477714778147791478014781147821478314784147851478614787147881478914790147911479214793147941479514796147971479814799148001480114802148031480414805148061480714808148091481014811148121481314814148151481614817148181481914820148211482214823148241482514826148271482814829148301483114832148331483414835148361483714838148391484014841148421484314844148451484614847148481484914850148511485214853148541485514856148571485814859148601486114862148631486414865148661486714868148691487014871148721487314874148751487614877148781487914880148811488214883148841488514886148871488814889148901489114892148931489414895148961489714898148991490014901149021490314904149051490614907149081490914910149111491214913149141491514916149171491814919149201492114922149231492414925149261492714928149291493014931149321493314934149351493614937149381493914940149411494214943149441494514946149471494814949149501495114952149531495414955149561495714958149591496014961149621496314964149651496614967149681496914970149711497214973149741497514976149771497814979149801498114982149831498414985149861498714988149891499014991149921499314994149951499614997149981499915000150011500215003150041500515006150071500815009150101501115012150131501415015150161501715018150191502015021150221502315024150251502615027150281502915030150311503215033150341503515036150371503815039150401504115042150431504415045150461504715048150491505015051150521505315054150551505615057150581505915060150611506215063150641506515066150671506815069150701507115072150731507415075150761507715078150791508015081150821508315084150851508615087150881508915090150911509215093150941509515096150971509815099151001510115102151031510415105151061510715108151091511015111151121511315114151151511615117151181511915120151211512215123151241512515126151271512815129151301513115132151331513415135151361513715138151391514015141151421514315144151451514615147151481514915150151511515215153151541515515156151571515815159151601516115162151631516415165151661516715168151691517015171151721517315174151751517615177151781517915180151811518215183151841518515186151871518815189151901519115192151931519415195151961519715198151991520015201152021520315204152051520615207152081520915210152111521215213152141521515216152171521815219152201522115222152231522415225152261522715228152291523015231152321523315234152351523615237152381523915240152411524215243152441524515246152471524815249152501525115252152531525415255152561525715258152591526015261152621526315264152651526615267152681526915270152711527215273152741527515276152771527815279152801528115282152831528415285152861528715288152891529015291152921529315294152951529615297152981529915300153011530215303153041530515306153071530815309153101531115312153131531415315153161531715318153191532015321153221532315324153251532615327153281532915330153311533215333153341533515336153371533815339153401534115342153431534415345153461534715348153491535015351153521535315354153551535615357153581535915360153611536215363153641536515366153671536815369153701537115372153731537415375153761537715378153791538015381153821538315384153851538615387153881538915390153911539215393153941539515396153971539815399154001540115402154031540415405154061540715408154091541015411154121541315414154151541615417154181541915420154211542215423154241542515426154271542815429154301543115432154331543415435154361543715438154391544015441154421544315444154451544615447154481544915450154511545215453154541545515456154571545815459154601546115462154631546415465154661546715468154691547015471154721547315474154751547615477154781547915480154811548215483154841548515486154871548815489154901549115492154931549415495154961549715498154991550015501155021550315504155051550615507155081550915510155111551215513155141551515516155171551815519155201552115522155231552415525155261552715528155291553015531155321553315534155351553615537155381553915540155411554215543155441554515546155471554815549155501555115552155531555415555155561555715558155591556015561155621556315564155651556615567155681556915570155711557215573155741557515576155771557815579155801558115582155831558415585155861558715588155891559015591155921559315594155951559615597155981559915600156011560215603156041560515606156071560815609156101561115612156131561415615156161561715618156191562015621156221562315624156251562615627156281562915630156311563215633156341563515636156371563815639156401564115642156431564415645156461564715648156491565015651156521565315654156551565615657156581565915660156611566215663156641566515666156671566815669156701567115672156731567415675156761567715678156791568015681156821568315684156851568615687156881568915690156911569215693156941569515696156971569815699157001570115702157031570415705157061570715708157091571015711157121571315714157151571615717157181571915720157211572215723157241572515726157271572815729157301573115732157331573415735157361573715738157391574015741157421574315744157451574615747157481574915750157511575215753157541575515756157571575815759157601576115762157631576415765157661576715768157691577015771157721577315774157751577615777157781577915780157811578215783157841578515786157871578815789157901579115792157931579415795157961579715798157991580015801158021580315804158051580615807158081580915810158111581215813158141581515816158171581815819158201582115822158231582415825158261582715828158291583015831158321583315834158351583615837158381583915840158411584215843158441584515846158471584815849158501585115852158531585415855158561585715858158591586015861158621586315864158651586615867158681586915870158711587215873158741587515876158771587815879158801588115882158831588415885158861588715888158891589015891158921589315894158951589615897158981589915900159011590215903159041590515906159071590815909159101591115912159131591415915159161591715918159191592015921159221592315924159251592615927159281592915930159311593215933159341593515936159371593815939159401594115942159431594415945159461594715948159491595015951159521595315954159551595615957159581595915960159611596215963159641596515966159671596815969159701597115972159731597415975159761597715978159791598015981159821598315984159851598615987159881598915990159911599215993159941599515996159971599815999160001600116002 |
- <?xml version="1.0" encoding="utf-8"?>
- <Script type="xscript4.0"><![CDATA[function pidfCalMonth(idc, av_ym)
- {
- var lv_date = av_ym.toDate("YYYYMM" + "01");
- lv_date = lv_date.getAddDate(idc, "M");
-
- return lv_date.getDateFormat("YYYYMM");
- }
- /****************************************************************************************
- * Argument : 상병 그리드
- * Description : 그리드 마우스 우클릭
- ****************************************************************************************/
- function grp_biz_grd_cldihist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
- {
- if(!grdf_setSelectedCell(obj, e)) return;
- lf_gridcldi_item.trackPopup(e.screenX,e.screenY);
- }
- /****************************************************************************************
- * Argument : 상병 그리드
- * Description : 그리드 마우스 우클릭 메뉴 이벤트 함수
- ****************************************************************************************/
- function lf_grd_cldihist_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
- {
- if(e.id == "lf_fDiagSeqUp")
- {
- lf_fDiagSeqUp(); // 상병순서 위로
- }
- else if (e.id == "lf_fDiagSeqDown")
- {
- lf_fDiagSeqDown(); // 상병순서 아래로
- }
- else if (e.id == "lf_fDiagGridInsertRow")
- {
- lf_fDiagGridInsertRow(); // 행 삽입
- }
- else if (e.id == "lf_fDiagGridInsertRowMulti")
- {
- lf_fDiagGridInsertRowMulti(); // 행 추가(5줄)
- }
- else if (e.id == "lf_fDiagGridDeleteRow")
- {
- lf_fDiagGridDeleteRow(); //행 삭제
- }
- }
- /****************************************************************************************
- * Argument : 상병 그리드
- * Description : 그리드 마우스 우클릭 메뉴 이벤트 함수
- ****************************************************************************************/
- function lf_gridcldi_item_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
- {
- if(e.id == "lf_fDiagSeqUp")
- {
- lf_fDiagSeqUp(); // 상병순서 위로
- }
- else if (e.id == "lf_fDiagSeqDown")
- {
- lf_fDiagSeqDown(); // 상병순서 아래로
- }
- else if (e.id == "lf_fDiagGridInsertRow")
- {
- lf_fDiagGridInsertRow(); // 행 삽입
- }
- else if (e.id == "lf_fDiagGridAddRow")
- {
- lf_fDiagGridAddRow(); // 행 추가
- }
- else if (e.id == "lf_fDiagGridInsertRowMulti")
- {
- lf_fDiagGridInsertRowMulti(); // 행 추가(5줄)
- }
- else if (e.id == "lf_fDiagGridDeleteRow")
- {
- lf_fDiagGridDeleteRow(); //행 삭제
- }
- }
- /****************************************************************************************
- * Argument : 원외 처방 그리드
- * Description : 그리드 마우스 우클릭 메뉴 이벤트 함수
- ****************************************************************************************/
- function lf_gridclop_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
- {
- if(e.id == "lf_fOutOrderGridCopyRow")
- {
- lf_fOutOrderGridCopyRow();
- }
- else if(e.id == "lf_fCallClsoSpclSpec")
- {
- lf_fCallClsoSpclSpec();
- }
- else if(e.id == "lf_fCallClsoSpclAllSpec")
- {
- lf_fCallClsoSpclAllSpec();
- }
- else if (e.id == "lf_fClopGridAllDeleteRow")
- {
- lf_fClopGridAllDeleteRow();
- }
- else if (e.id == "lf_fOrderCalcScorSrch_clop")
- {
- lf_fOrderCalcScorSrch_clop();
- }
- else if (e.id == "lf_fOrderDrugHBook_clop")
- {
- lf_fOrderDrugHBook_clop();
- }
- else if (e.id == "lf_fOutOrderGridInsertRow")
- {
- lf_fOutOrderGridInsertRow(); //행 추가
- }
- else if (e.id == "lf_fClopGridDeleteRow")
- {
- lf_fClopGridDeleteRow();
- }
- }
- /****************************************************************************************
- * Argument : 처방 그리드
- * Description : 그리드 마우스 우클릭 메뉴 이벤트 함수
- ****************************************************************************************/
- function grp_biz_grd_clodhist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
- {
- if(!grdf_setSelectedCell(obj, e)) return;
- if (ds_main_item1_clbs.getColumn(0, "clamym"))
- {
- if (ds_list2_clod.rowcount <= 0)
- {
- lf_inititem.trackPopup(e.screenX,e.screenY);
- }
- else
- {
- lf_grd_clodhist.trackPopup(e.screenX,e.screenY);
- }
- }
- }
- /****************************************************************************************
- * Argument : 원외 처방 그리드
- * Description : 데이터 없는 경우
- ****************************************************************************************/
- function lf_clopinititem_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
- {
- if(e.id == "lf_fOutOrderGridInsertRow")
- {
- lf_fOutOrderGridInsertRow(); // 원외처방 추가
- }
- }
- /****************************************************************************************
- * Argument : 원외 처방 그리드
- * Description : 데이터 없는 경우
- ****************************************************************************************/
- function lf_inititem_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
- {
- if(e.id == "lf_fOrderGridInsertRow")
- {
- lf_fOrderGridInsertRow(); // 처방 추가
- }
- }
- /****************************************************************************************
- * Argument : 원외 처방 그리드
- * Description : 행복사
- ****************************************************************************************/
- function lf_fOutOrderGridCopyRow()
- {
- var cloprow = ds_list7_clop.rowposition;
- var adjtresncd = ds_list7_clop.getColumn(cloprow, "adjtresncd");
-
- if (utlf_isNull(adjtresncd)|| adjtresncd == "-")
- {
- var cmbAdjtresncd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
-
- if (utlf_isNull(cmbAdjtresncd) || cmbAdjtresncd == "-" )
- {
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftout";
- sppiz01000.sCdid = adjtresncd;
- sppiz01000.sAdjtresndesc = "";
-
- var objArg = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
- adjtresncd = objArg.sCdid;
- }
- else
- {
- adjtresncd = cmbAdjtresncd;
- }
- }
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- return;
- }
-
- var iRow = ds_list7_clop.insertRow(++cloprow);
- ds_list7_clop.copyRow(iRow, ds_list7_clop, iRow-1);
- ds_list7_clop.setColumn(iRow, "spclspecyn", "");
- ds_list7_clop.setColumn(iRow, "clopseqno", "");
- ds_list7_clop.setColumn(iRow, "adjtresncd", adjtresncd);
- var cur_seqno = ds_rslt_clopmaxseqno.getColumn(0, "seqno");
- ds_list7_clop.setColumn(iRow, "seqno", cur_seqno);
- ds_rslt_clopmaxseqno.setColumn(0, "seqno", parseInt(cur_seqno) + 1);
- ds_list7_clop.setColumn(iRow, "edilnno", "0");
- }
- /****************************************************************************************
- * Argument : 마우스 우 클릭
- * Description : 상병순서 위로
- ****************************************************************************************/
- function lf_fDiagSeqUp()
- {
- var rowstatus = ds_list1_cldi.getRowType(ds_list1_cldi.rowposition);
- if (rowstatus == 8)
- {
- return;
- }
-
- var diagseq = parseInt(ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "diagseq"));
-
- if (diagseq > 1)
- {
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "diagseq", --diagseq);
-
- if (rowstatus == 1 || rowstatus == 4)
- {
- var arrRow = new Array();
- arrRow[0] = ds_list1_cldi.rowposition;
- grdf_setStatus(grp_biz.grd_cldihist, "U", arrRow);
- }
-
- var nextrow = ds_list1_cldi.rowposition - 1;
- var nextdiagseq = ds_list1_cldi.getColumn(nextrow, "diagseq");
-
- if (diagseq == nextdiagseq)
- {
- ds_list1_cldi.setColumn(nextrow, "diagseq", ++diagseq);
- rowstatus = ds_list1_cldi.getRowType(nextrow);
-
- if (rowstatus == 1 || rowstatus == 4)
- {
- var arrRow = new Array();
- arrRow[0] = nextrow;
- grdf_setStatus(grp_biz.grd_cldihist, "U", arrRow);
- }
- }
-
- lf_fSortDiagNo(false);
-
- if (ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "diagseq") == "1" && !utlf_isNull(ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "vcode")))
- {
- lf_fSetDiagMT002(ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "vcode"));
- }
- }
- }
- /****************************************************************************************
- * Argument : 마우스 우 클릭
- * Description : 상병순서 아래로
- ****************************************************************************************/
- function lf_fDiagSeqDown()
- {
- var rowstatus = ds_list1_cldi.getRowType(ds_list1_cldi.rowposition);
-
- if (rowstatus == 8)
- {
- return;
- }
-
- var lastRow = ds_list1_cldi.rowcount;
-
- for ( var i = 0; i < ds_list1_cldi.rowcount; i++ )
- {
- if (ds_list1_cldi.getRowType(i) == 8)
- {
- lastRow = i - 1;
- i = ds_list1_cldi.rowcount;
- }
- }
-
- var diagseq = parseInt(ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "diagseq"));
-
- if (diagseq < lastRow)
- {
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "diagseq", ++diagseq);
-
- if (rowstatus == 1 || rowstatus == 4)
- {
- var arrRow = new Array();
- arrRow[0] = ds_list1_cldi.rowposition;
- grdf_setStatus(grp_biz.grd_cldihist, "U", arrRow);
- }
-
- var nextrow = ds_list1_cldi.rowposition + 1;
- var nextdiagseq = ds_list1_cldi.getColumn(nextrow, "diagseq");
-
- if (diagseq == nextdiagseq)
- {
- ds_list1_cldi.setColumn(nextrow, "diagseq", --diagseq);
- rowstatus = ds_list1_cldi.getRowType(nextrow);
- if (rowstatus == 1 || rowstatus == 4)
- {
- var arrRow = new Array();
- arrRow[0] = nextrow;
- grdf_setStatus(grp_biz.grd_cldihist, "U", arrRow);
- }
- }
- if (ds_list1_cldi.getColumn(nextrow, "diagseq") == "1" && !utlf_isNull(ds_list1_cldi.getColumn(nextrow, "vcode")))
- {
- lf_fSetDiagMT002(ds_list1_cldi.getColumn(nextrow, "vcode"));
- }
- lf_fSortDiagNo(false);
- }
- }
- /****************************************************************************************
- * Argument : 마우스 우 클릭
- * Description : 행삽입
- ****************************************************************************************/
- function lf_fDiagGridInsertRow(addyn, selectyn, fstrow)
- {
- var iInsertRow = 0;
-
- if (ds_list1_cldi.rowcount == 1 || addyn == "Y")
- {
- iInsertRow = ds_list1_cldi.addRow();
- }
- else
- {
- iInsertRow = ds_list1_cldi.insertRow(ds_list1_cldi.rowposition+1);
- }
- var nowRow = 0;
- nowRow = ds_list1_cldi.rowposition;
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "diagkindcd", "C");
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "diagseq", ds_list1_cldi.rowposition+1);
-
- var clamdeptcd = ds_list1_cldi.getColumn(0, "clamdeptcd");
-
- if (utlf_isNull(clamdeptcd))
- {
- clamdeptcd = ds_main_item1_clbs.getColumn(0, "clamdeptcd");
- }
-
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "clamdeptcd", clamdeptcd);
- var ordfromdd = ds_list1_cldi.getColumn(0, "ordfromdd");
-
- if (ordfromdd)
- {
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "ordfromdd", ordfromdd);
- }
- else
- {
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "ordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
- }
-
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "toot", "-");
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "vcode", "");
- if (selectyn != "Y")
- {
- lf_fSortDiagNo(true);
- }
- if (addyn != "Y")
- {
- grp_biz.grd_cldihist.setCellProperty("Body", grp_biz.grd_cldihist.getBindCellIndex("body", "diagcd"), "edittype", "normal");
- }
-
- if (utlf_isNull(fstrow)){
- ds_list1_cldi.clearSelect();
- ds_list1_cldi.rowposition = nowRow;
- ds_list1_cldi.selectRow(nowRow);
- }
- grp_biz.grd_cldihist.setCellPos(grp_biz.grd_cldihist.getBindCellIndex("body", "diagcd"));
- grp_biz.grd_cldihist.showEditor(true);
-
- return iInsertRow;
- }
- /****************************************************************************************
- * Argument : 마우스 우 클릭
- * Description : 상병순서 행추가 5줄
- ****************************************************************************************/
- function lf_fDiagGridInsertRowMulti()
- {
- for ( var i = 0; i < 5; i++)
- {
- var iRow = ds_list1_cldi.insertRow(ds_list1_cldi.rowcount + 1);
-
- ds_list1_cldi.setColumn(iRow, "diagkindcd", "C");
- ds_list1_cldi.setColumn(iRow, "diagseq", iRow);
-
- var clamdeptcd = ds_list1_cldi.getColumn(0, "clamdeptcd");
-
- if (utlf_isNull(clamdeptcd))
- {
- clamdeptcd = ds_main_item1_clbs.getColumn(0, "clamdeptcd");
- }
-
- ds_list1_cldi.setColumn(iRow, "clamdeptcd", clamdeptcd);
-
- var ordfromdd = ds_list1_cldi.getColumn(0, "ordfromdd");
-
- if (ordfromdd)
- {
- ds_list1_cldi.setColumn(iRow, "ordfromdd", ordfromdd);
- }
- else
- {
- ds_list1_cldi.setColumn(iRow, "ordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
- }
-
- ds_list1_cldi.setColumn(iRow, "toot", "-");
- ds_list1_cldi.setColumn(iRow, "vcode", "");
- }
- lf_fSortDiagNo(true);
- }
- /****************************************************************************************
- * Argument : 마우스 우 클릭
- * Description : 행삭제
- ****************************************************************************************/
- function lf_fDiagGridDeleteRow()
- {
- var SelectedRows = grdf_getSelectedRows(grp_biz.grd_cldihist)
- for(var i = SelectedRows.length-1; i >= 0; i--)
- {
- var rowstatus = ds_list1_cldi.getRowType(SelectedRows[i]);
-
- var diagcd = ds_list1_cldi.getColumn(SelectedRows[i],"diagcd");
- var frow = ds_lglydisinfo.findRowExpr("fromdiag<='" + diagcd + "' && todiag>='" + diagcd + "'");
- if (frow > -1){
- lf_setAlramMessage("상병코드: " + diagcd + " 법정전염병 상병입니다. 확인하십시오.");
- }
-
- if (rowstatus == 8)
- {
- }
- else if ( rowstatus == 2 )
- {
- ds_list1_cldi.deleteRow(SelectedRows[i]);
- }
- else
- {
- var dRow = "D"+ds_list1_cldi.getColumn(SelectedRows[i], "diagseq");
- ds_list1_cldi.setColumn(SelectedRows[i], "diagseq", dRow);
- grdf_setStatus(grp_biz.grd_cldihist, "D", SelectedRows[i]);
- ds_list1_cldi.deleteRow(SelectedRows[i]);
- }
- }
- lf_fSortDiagNo(true);
- }
- /****************************************************************************************
- * Argument : 마우스 우 클릭
- * Description : 정렬
- ****************************************************************************************/
- function lf_fSortDiagNo(isNumbering)
- {
- var objds = ds_list1_cldi;
- var objgrd = grp_biz.grd_cldihist;
- var seqnm = "diagseq";
- var delcnt = 0;
- if (isNumbering == false)
- {
- var maxRow = objds.rowcount - 1; // rows는 타이틀부분 부터 개수를 센다
- objds.keystring = "";
- objds.keystring = "S:+diagseq";
- objgrd.updateToDataset();
- return;
- }
- var cldino = 1;
- for ( var i = 0; i < objds.rowcount; i++)
- {
- if (objds.getRowType(i) != 8)
- {
- var diagseq = objds.getColumn(i, seqnm);
-
- if (objds.getRowType(i) == 1 && diagseq != cldino)
- {
- objds.enableevent = false;
- objds.setRowType(i, 'u'); //update
- objds.enableevent = true;
- }
- objds.setColumn(i, seqnm, cldino++);
- } else {
- delcnt++;
- }
- }
-
- objds.keystring = "";
- objds.keystring = "S:+"+seqnm;
-
- if (delcnt > 0)
- {
- objds.keystring = "";
- objds.keystring = "S:+"+seqnm;
- }
- // Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.
- objgrd.updateToDataset();
- }
- /****************************************************************************************
- * Argument :
- * Description : 원외처방 행 추가
- ****************************************************************************************/
- function lf_fOutOrderGridInsertRow()
- {
- var iRow = ds_list7_clop.addRow();
- var ordfromdd = utlf_transNullToEmpty(ds_main_item1_clbs.getColumn(0, "ordfromdd"));
- var clopno = utlf_transNullToEmpty(ds_list7_clop.getColumn(0, "clopno"));
- ds_list7_clop.rowposition = iRow;
- // 기본값 입력
- ds_list7_clop.setColumn(iRow, "clopdd" , ordfromdd);
- ds_list7_clop.setColumn(iRow, "clopno" , clopno);
- ds_list7_clop.setColumn(iRow, "oldclopdd" , ordfromdd);
- ds_list7_clop.setColumn(iRow, "oldclopno" , clopno);
- ds_list7_clop.setColumn(iRow, "mpsno" , ordfromdd+clopno);
- ds_list7_clop.setColumn(iRow, "newmpsno" , ordfromdd+clopno);
- ds_list7_clop.setColumn(iRow, "edilnno" , "0");
- ds_list7_clop.setColumn(iRow, "payflag" , "0");
- ds_list7_clop.setColumn(iRow, "drugqty" , "1");
- ds_list7_clop.setColumn(iRow, "edidrugqty" , "1");
- ds_list7_clop.setColumn(iRow, "drugtims" , "1");
- ds_list7_clop.setColumn(iRow, "drugdayno" , "1");
- ds_list7_clop.setColumn(iRow, "edidrugdayno" , "1");
- ds_list7_clop.setColumn(iRow, "edidrugdaynomax" , "1");
- ds_list7_clop.setColumn(iRow, "workflag" , "12");
- ds_list7_clop.setColumn(iRow, "spclspecyn" , "");
-
- var adjtresncd = ds_list7_clop.getColumn(iRow, "adjtresncd");
-
- if (utlf_isNull(adjtresncd)|| adjtresncd == "-")
- {
- var cmbAdjtresncd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
-
- if (utlf_isNull(cmbAdjtresncd) || cmbAdjtresncd == "-" )
- {
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftout";
- sppiz01000.sCdid = adjtresncd;
- sppiz01000.sAdjtresndesc = "";
-
- var objArg = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
-
- adjtresncd = objArg.sCdid;
- }
- else
- {
- adjtresncd = cmbAdjtresncd;
- }
- }
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- ds_list7_clop.deleteRow(iRow);
- }
- else
- {
- ds_list7_clop.setColumn(iRow, "adjtresncd", adjtresncd);
- }
- }
- /****************************************************************************************
- * Argument : enter
- * Description : 청구년월 enter 키 이벤트
- ****************************************************************************************/
- function grp_biz_grp_sea00_ipt_clamym_onkeydown(obj:cp_monthCal, e:KeyEventInfo)
- {
- if(e.keycode == 13)
- {
- fn_Cal();
- }
- }
- /****************************************************************************************
- * Argument : combo
- * Description : 진료과 콤보 변경 시 이벤트
- ****************************************************************************************/
- function grp_biz_grp_sea00_cmb_ordfildcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
- {
- var ordfildcd = ds_main_item1_clbs.getColumn(0, "ordfildcd");
- var clamtypecd = ds_main_item1_clbs.getColumn(0, "clamtypecd");
-
- if (clamtypecd == "8")
- {
- if (ordfildcd == "6")
- {
- ds_main_item1_clbs.setColumn(0,"sumtypecd", "6")// 집계형태 : 치과분야
- }
- else if (ordfildcd == "8")
- {
- ds_main_item1_clbs.setColumn(0,"sumtypecd", "8")// 집계형태 : 한방분야
- }
- else
- {
- ds_main_item1_clbs.setColumn(0,"sumtypecd", "0")// 집계형태 : 의과분야
- }
- }
- }
- /****************************************************************************************
- * Argument : combo
- * Description : 진료과 콤보 선택 시 의사 filter
- ****************************************************************************************/
- function grp_biz_grp_sea00_cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
- {
- var orddeptcd = obj.value;
-
- if (orddeptcd == "-")
- {
- ds_init_orddrid2.filterstr = "";
- }
- else
- {
- ds_init_orddrid2.filterstr = "dp == '"+ obj.value +"' || dp == '-'";
- }
-
- ds_main_item1_clbs.setColumn(0,"clamdeptcd", ds_init_orddeptcd2.lookupExpr("cd=='"+ obj.value +"'","reqdeptno"));
- }
- /****************************************************************************************
- * Argument : column
- * Description : 컬럼 검사
- ****************************************************************************************/
- function lf_fEdiCheck()
- {
- var sEdiCheck = "";
- sEdiCheck = ds_hidden.getColumn(0, "edicheck");
- // edi 관련 컬럼 조회기준으로 변경 (재원비교로 변경)
- if ( sEdiCheck == "Y" )
- {
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "edicd"), "size", 70); // EDI코드
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "unitcost"), "size", 45); // 단가
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "drugqty"), "size", 45); // 1회량
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "dayno"), "size", 45); // 일수
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "amt"), "size", 45); // 금액
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "druglimitamt"), "size", 45); // 약제상한가
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "limitdiffamt"), "size", 45); // 약제상한차액
-
- if(ds_main_item1_clbs.getColumn(0, "ioflag") == "O")
- {
- grp_biz.grd_oprcphist.setFormatColProperty(grp_biz.grd_oprcphist.getBindCellIndex("body", "drugqty"), "size", 45); // 원외 1회량
- grp_biz.grd_oprcphist.setFormatColProperty(grp_biz.grd_oprcphist.getBindCellIndex("body", "drugdayno"), "size", 45); // 원외 일수
- }
- }
- else
- {
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "edicd"), "size", 0); // EDI코드
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "unitcost"), "size", 0); // 단가
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "drugqty"), "size", 0); // 1회량
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "dayno"), "size", 0); // 일수
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "amt"), "size", 0); // 금액
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "druglimitamt"), "size", 0); // 약제상한가
- grp_biz.grd_clodhist.setFormatColProperty(grp_biz.grd_clodhist.getBindCellIndex("body", "limitdiffamt"), "size", 0); // 약제상한차액
-
- if(ds_main_item1_clbs.getColumn(0, "ioflag") == "O")
- {
- grp_biz.grd_oprcphist.setFormatColProperty(grp_biz.grd_oprcphist.getBindCellIndex("body", "drugqty"), "size", 0); // 원외 1회량
- grp_biz.grd_oprcphist.setFormatColProperty(grp_biz.grd_oprcphist.getBindCellIndex("body", "drugdayno"), "size", 0); // 원외 일수
- }
- }
- }
- /****************************************************************************************
- * Argument : row
- * Description : 그리드 row 추가
- ****************************************************************************************/
- function lf_fOrderGridAddRow()
- {
- var clodrow = ds_list2_clod.rowposition;
- var preediitem1 = ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoItem");
- var prematractflag = ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoMatrAct");
- var prepayflag = ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoPay");
- var clodrow = ds_list2_clod.addRow();
-
- ds_list2_clod.setColumn(clodrow, "ediitem1" , preediitem1);
- ds_list2_clod.setColumn(clodrow, "matractflag" , prematractflag);
- ds_list2_clod.setColumn(clodrow, "payflag" , prepayflag);
- ds_list2_clod.setColumn(clodrow, "snglcalcscorcd", ds_hidden_list2_clodsrch.getColumn(0, "inpCalcScorCd"));
- ds_list2_clod.setColumn(clodrow, "basecd", ds_hidden_list2_clodsrch.getColumn(0, "inpEDICd"));
-
- var indd = ds_main_item1_clbs.getColumn(0, "indd");
-
- ds_list2_clod.setColumn(clodrow, "ordfromdd", indd);
-
- ds_list2_clod.clearSelect();
- ds_list2_clod.rowposition = clodrow;
- ds_list2_clod.selectRow(clodrow);
-
- var newcd = ds_hidden_list2_clodsrch.getColumn(0, "cmbAdjtresncd");
-
- if (newcd)
- {
- ds_list2_clod.setColumn(iRow, "adjtresncd", newcd);
-
- lf_fOrderBkColorNew();
- }
- else
- {
- newcd = lf_fSetAdjtResnCd();
-
- if (utlf_isNull(newcd) || newcd == "-")
- {
- ds_list2_clod.deleteRow(clodrow); // 처방 Grid에서 해당 라인을 삭제한다.
- }
- }
- }
- /****************************************************************************************
- * Argument : 처방 Grid
- * Description : 그리드에서 추가/수정된 row 배경색 설정
- ****************************************************************************************/
- function lf_fOrderBkColorNew(clodrow)
- {
- // 신규처방 노란배경 // ffff9c=연한노랑
- // bgcExpr = "EXPR(curcol == grp_biz.grd_clodhist.getBindCellIndex('body','rowstat') && (getRowType("+clodrow+") == 2 || getRowType("+clodrow+") == 4) ? '#ffff9c' : 'default')";
- // grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body','rowstat'), "background", bgcExpr); // rowstat
- // grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body','rowstat'), "background2", bgcExpr); // rowstat
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 심사수정사유관리 화면 modal 호출
- ****************************************************************************************/
- function lf_fSetAdjtResnCd()
- {
- var oldcd = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "adjtresncd");
- var olddesc = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "adjtresndesc");
-
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftin";
- sppiz01000.sCdid = oldcd;
- sppiz01000.sAdjtresndesc = olddesc;
-
- var objArg = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(objArg))
- {
- var newcd = objArg.sCdid;
- var newdesc = objArg.sAdjtresndesc;
-
- if (!utlf_isNull(newcd))
- {
- for ( var i = 0; i < ds_list2_clod.rowcount; i++)
- {
- var sRow = ds_list2_clod.getSelect(i);
-
- if ( sRow == true )
- {
- if (newcd != oldcd && oldcd != "G")
- {
- ds_list2_clod.setColumn(i, "adjtresncd", newcd);
- ds_list2_clod.setColumn(i, "adjtresndesc", newdesc);
- if ( ds_list2_clod.getRowType(i) == 1 )
- {
- var arrRow = new Array();
- arrRow[0] = i;
-
- grdf_setStatus(grp_biz.grd_clodhist, "U", arrRow);
- }
- lf_fOrderBkColorNew(i);
- }
- }
- }
- }
- return newcd;
- }
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 결과조회화면 modal 호출
- ****************************************************************************************/
- function lf_fOrderRsltSrch()
- {
- trace("tf랑 다름")
- if (grp_dropdownmenu.visible == true)
- {
- grp_dropdownmenu.visible = false;
- }
-
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
-
- if (!utlf_isNull(clamym))
- {
- var smmmi00100 = new Object();
- smmmi00100.plgv_SMMMI00100_pid = ds_main_item1_clbs.getColumn(0, "pid");
- frmf_modal("SMMMI00100", "SMMMI00100", smmmi00100, "", "", "", "", "", "", "", "", "", "M");
- }
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 상세계산내역화면 modal 호출
- ****************************************************************************************/
- function lf_fGetOsclClamData(chkAll, grid)
- {
- var clamkey = ds_main_item1_clbs.getColumn(0, "clamkey");
- var ctrlObj;
- var row;
- var col;
- var seqno;
- var hngnm;
- var grupcd;
- var calcscorcd;
- var edicd;
- var clopyn;
-
- if (chkAll != "ALL" && chkAll != "N")
- {
- chkAll = "N";
- }
-
- if (grid != "grd_clodhist" && grid != "grd_oprcphist")
- {
- grid = "grd_clodhist";
- }
-
- if (clamkey)
- {
- var objArg = new Object();
-
- objArg.sPid = ds_main_item1_clbs.getColumn(0, "pid");
- objArg.sPatnm = ds_main_item1_clbs.getColumn(0, "patnm");
- objArg.sGender = ds_main_item1_clbs.getColumn(0, "gender");
- objArg.sScrhdate = "execdd";
- objArg.sFromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
- objArg.sTodd = ds_main_item1_clbs.getColumn(0, "ordtodd");
- objArg.sClamkey = ds_main_item1_clbs.getColumn(0, "clamkey");
- objArg.sIoflag = ds_main_item1_clbs.getColumn(0, "ioflag");
- objArg.sStsioflag = ds_main_item1_clbs.getColumn(0, "stsioflag");
- objArg.sInstcd = ds_main_item1_clbs.getColumn(0, "instcd");
- if (grid == "grd_clodhist")
- {
- ctrlObj = grp_biz.grd_clodhist;
- col = grp_biz.grd_clodhist.currentcol;
- seqno = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "seqno");
- hngnm = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "hngnm");
- grupcd = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "grupcalcscorcd");
- calcscorcd = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd");
- edicd = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "edicd");
- clopyn = "N"; //원외처방여부
- }
- else if (grid == "grd_oprcphist")
- {
- ctrlObj = grp_biz.grd_oprcphist;
- col = grp_biz.grd_oprcphist.currentcol;
- seqno = ds_list7_clop.getColumn(ds_list7_clop.rowposition, "clopseqno");
- hngnm = ds_list7_clop.getColumn(ds_list7_clop.rowposition, "hngnm");
- grupcd = "";
- calcscorcd = ds_list7_clop.getColumn(ds_list7_clop.rowposition, "snglcalcscorcd");
- edicd = ds_list7_clop.getColumn(ds_list7_clop.rowposition, "edicd");
- clopyn = "Y"; //원외처방여부
- }
-
- objArg.sClopyn = clopyn;
-
- if (chkAll == "ALL")
- {
- objArg.sClamcretdd = "0";
- objArg.sHhngnm = "";
- objArg.sChoicdsrch = "calcscorcd";
- objArg.sCalcscorcd = "";
- }
- else
- {
- objArg.sClamcretdd = seqno;
- objArg.sHhngnm = hngnm;
-
- if (col == ctrlObj.getBindCellIndex("body", "grupcalcscorcd"))
- {
- objArg.sChoicdsrch = "grupcd";
- objArg.sCalcscorcd = grupcd;
- }
- else if (col == ctrlObj.getBindCellIndex("body", "snglcalcscorcd"))
- {
- objArg.sChoicdsrch = "calcscorcd";
- objArg.sCalcscorcd = calcscorcd;
- }
- else if (col == ctrlObj.getBindCellIndex("body", "basecd") || col == ctrlObj.getBindCellIndex("body", "edicd"))
- {
- objArg.sChoicdsrch = "edicd";
- objArg.sCalcscorcd = edicd;
- }
- else
- {
- objArg.sChoicdsrch = "calcscorcd";
- objArg.sCalcscorcd = calcscorcd;
- }
- }
- frmf_modal("SPPID22100", "SPPID22100", objArg, "", "", "", "", "", "", "", "", "", "M");
- }
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 환자 전체메세지 간편보기화면 modal 호출
- ****************************************************************************************/
- function lf_fOrderInsuRcogBase(isAll, grdFlag)
- {
- var calcscorcd = "";
- var hngnm = "";
-
- if(grdFlag == "clod")
- {
- calcscorcd = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd");
- hngnm = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "hngnm");
- }
- else if(grdFlag == "clop")
- {
- calcscorcd = ds_list7_clop.getColumn(ds_list7_clop.rowposition, "snglcalcscorcd");
- hngnm = ds_list7_clop.getColumn(ds_list7_clop.rowposition, "hngnm");
- }
-
-
- var objArg = new Object();
- objArg.sBhviewyn = "Y";
- objArg.sCalcscorcd = calcscorcd;
- objArg.sCalcscorcdnm = hngnm;
- objArg.sPreveiwyn = "Y";
- objArg.sLimtcd = "";
- objArg.sAppdd = "";
-
- frmf_open("SPPIZ01600", "SPPIZ01600", "", "", "", "", "", "", "", "", "", "", "M");
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 중복 처방 사유 조회 화면 modal 호출
- ****************************************************************************************/
- function lf_fPrcpResnRef()
- {
- var sUserInfosS = sysf_getUserInfo();
- sUserInfosS = sUserInfosS + "|";
- var UserInfosS_Array = sUserInfosS.split("|");
-
- var userid = UserInfosS_Array[0]; // 사용자번호
- var usernm = UserInfosS_Array[1]; // 사용자이름
- var posinstcd = UserInfosS_Array[6]; // 근무지기관코드
- var posinstnm = UserInfosS_Array[7]; // 근무지기관명
- var posdeptcd = UserInfosS_Array[4]; // 소속부서코드
- var posdeptnm = UserInfosS_Array[5]; // 소속부서명
-
- ds_tmp_prcpresnref.setColumn(0, "pid" , ds_main_item1_clbs.getColumn(0, "pid"));
- ds_tmp_prcpresnref.setColumn(0, "fromdd" , ds_main_item1_clbs.getColumn(0, "indd"));
- ds_tmp_prcpresnref.setColumn(0, "todd" , ds_main_item1_clbs.getColumn(0, "dschdd"));
- ds_tmp_prcpresnref.setColumn(0, "orddeptcd" , "-");
- ds_tmp_prcpresnref.setColumn(0, "orddrid" , "-");
- ds_tmp_prcpresnref.setColumn(0, "mainjudgid" , "-");
- ds_tmp_prcpresnref.setColumn(0, "prcpcd" , ds_list2_clod.getColumn(ds_list2_clod.rowposition, "grupcalcscorcd"));
- ds_tmp_prcpresnref.setColumn(0, "insukind" , ds_main_item1_clbs.getColumn(0, "insukindcd"));
- ds_tmp_prcpresnref.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_tmp_prcpresnref.setColumn(0, "resncd" , "FF");
- ds_tmp_prcpresnref.setColumn(0, "popup" , "judg");
-
- var objArg = new Object();
- objArg.prv_ds = ds_tmp_prcpresnref;
-
- frmf_open("SPMMO19000", "SPMMO19000", objArg, "", "", "", "", "", "", "", "", "", "M");
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 급비변경관리 화면 modal 호출
- ****************************************************************************************/
- function lf_fSetPayflag()
- {
- var oldpayflag = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "payflag");
-
- var objArg = new Object();
- objArg.sCdid = oldpayflag;
- objArg.sCdCls = "";
-
- var objRtnVal = frmf_modal("SPPID23100", "SPPID23100", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(objRtnVal))
- {
- var newpayflag = objRtnVal.sCdid;
-
- if ( newpayflag != oldpayflag )
- {
- var adjtresncd = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "adjtresncd");
-
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- var newcd = lf_fSetAdjtResnCd();
- if (utlf_isNull(newcd) || newcd == "-")
- {
- return;
- }
- }
-
- ds_list2_clod.setColumn(ds_list2_clod.rowposition, "payflag", newpayflag);
-
- if ( newpayflag == "0" || newpayflag == "9" )
- {
- ds_list2_clod.setColumn(ds_list2_clod.rowposition, "calcappyn", "Y");
- }
- else
- {
- ds_list2_clod.setColumn(ds_list2_clod.rowposition, "calcappyn", "N");
- }
- var matractflag = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "matractflag");
-
- if ( newpayflag == "9" && matractflag == "2" )
- {
- ds_list2_clod.setColumn(ds_list2_clod.rowposition, "matractflag", "3");
- }
- if (ds_list2_clod.getRowType(ds_list2_clod.rowposition) == 1)
- {
- var arrRow = new Array();
- arrRow[0] = ds_list2_clod.rowposition;
- grdf_setStatus(grp_biz.grd_clodhist, "U", arrRow);
- }
-
- lf_fOrderBkColorNew(ds_list2_clod.rowposition);
-
- var insukind = ds_main_item1_clbs.getColumn(0, "insukind");
-
- if (newpayflag == "8" && (insukind == "31" || insukind == "41"))
- {
- ds_list2_clod.setColumn(ds_list2_clod.rowposition, "payflag" , "9");
- ds_list2_clod.setColumn(ds_list2_clod.rowposition, "item" , "YY01");
- ds_list2_clod.setColumn(ds_list2_clod.rowposition, "calcappyn", "Y");
- }
-
- lf_fSetTotDrugQtyAmt();
- }
- }
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 확인코드 조회 화면 modal 호출
- ****************************************************************************************/
- function lf_fOrderGridInsertCnfmCd()
- {
- var row = ds_list2_clod.rowposition;
- var seqno = ds_list2_clod.getColumn(row, "seqno");
-
- if (seqno != "0")
- {
- ds_rslt_sppiz01100.clearData();
- ds_rslt_sppiz01100.addRow();
-
- var sppiz01100 = new Object();
- sppiz01100.sCode = ds_list2_clod.getColumn(row, "cnfmcd");
- var rtnObj = frmf_modal("SPPIZ01100", "SPPIZ01100", sppiz01100, "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(rtnObj))
- {
- var cnfmcd = rtnObj.sCode;
- ds_list2_clod.setColumn(row, "cnfmcd", cnfmcd);
- ds_list3_clsp.filter("");
-
- if (!utlf_isNull(cnfmcd))
- {
- var isFind = false;
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- var spcClodseqno = ds_list3_clsp.getColumn(j, "clodseqno");
- var spcClsoyn = ds_list3_clsp.getColumn(j, "clsoyn"); //원외특정여부
-
- if (spcClodseqno == seqno && spcClsoyn == "N")
- {
- var spclcd = ds_list3_clsp.getColumn(j, "spclcd");
-
- if (spclcd == "JT001")
- {
- ds_list3_clsp.setColumn(j, "snglcalcscorcd" , ds_list2_clod.getColumn(row, "snglcalcscorcd"));
- ds_list3_clsp.setColumn(j, "edilnno" , ds_list2_clod.getColumn(row, "edilnno"));
- ds_list3_clsp.setColumn(j, "edicd" , ds_list2_clod.getColumn(row, "edicd"));
- ds_list3_clsp.setColumn(j, "edicdflag" , ds_list2_clod.getColumn(row, "edicdflag"));
- ds_list3_clsp.setColumn(j, "spclcd" , "JT001");
- ds_list3_clsp.setColumn(j, "cdnm" , "확인코드");
- ds_list3_clsp.setColumn(j, "spclspec" , cnfmcd);
- ds_list3_clsp.setColumn(j, "spclformat" , "X(5)");
- ds_list3_clsp.setColumn(j, "detldesc" , "진료행위에 대한 추가기술 사항을 구분하는 코드로서 확인코드가 여러개 발생할 경우 '/'로 구분하여 기재");
-
- var rowstatus = ds_list3_clsp.getRowType(j);
-
- if ( rowstatus == 2 )
- { // 2 : insert
- }
- else
- {
- var arrRow = new Array();
- arrRow[0] = j;
- grdf_setStatus(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, "U", arrRow);
- }
- isFind = true;
- }
- }
- }
-
- if (isFind == false)
- {
- var clsprow = ds_list3_clsp.addRow();
-
- ds_list3_clsp.setColumn(clsprow, "unitflag" , "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno" , ds_list2_clod.getColumn(row, "edilnno"));
- ds_list3_clsp.setColumn(clsprow, "clodseqno" , seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd" , ds_list2_clod.getColumn(row, "snglcalcscorcd"));
- ds_list3_clsp.setColumn(clsprow, "edicd" , ds_list2_clod.getColumn(row, "edicd"));
- ds_list3_clsp.setColumn(clsprow, "edicdflag" , ds_list2_clod.getColumn(row, "edicdflag"));
- ds_list3_clsp.setColumn(clsprow, "spclcd" , "JT001");
- ds_list3_clsp.setColumn(clsprow, "cdnm" , "확인코드");
- ds_list3_clsp.setColumn(clsprow, "spclspec" , cnfmcd);
- ds_list3_clsp.setColumn(clsprow, "spclformat" , "X(5)");
- ds_list3_clsp.setColumn(clsprow, "detldesc" , "진료행위에 대한 추가기술 사항을 구분하는 코드로서 확인코드가 여러개 발생할 경우 '/'로 구분하여 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno" , "0");
- ds_list3_clsp.setColumn(clsprow, "clsoyn" , "N");
-
- ds_list3_clsp.rowposition = clsprow;
- }
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "확인코드 - JT001 / 입력코드내역 : "+ cnfmcd +" / 기재형식 : X(5)");
- } else {
- var frow = ds_list3_clsp.findRowExpr("spclcd == 'JT001' && clsoyn == 'N' && clodseqno=='"+seqno+"'");
- var rowstatus = ds_list3_clsp.getRowType(frow);
- if (rowstatus == 2)
- {
- ds_list3_clsp.setColumn(frow, "spclcd", "");
- ds_list3_clsp.setColumn(frow, "spclspec", "");
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(frow, "d");
- ds_list3_clsp.updatecontrol = true;
- }
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 확인코드 내역이 없습니다.");
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 보험인정기준 조회 화면 modal 호출
- ****************************************************************************************/
- function lf_fOrderInsuRcogBase(isAll)
- {
- var calcscorcd = ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd");
-
- dsf_createDsRow("ds_cond_sppiz01600", [{col:"calcscorcd", type:"STRING", size:256 , val : calcscorcd}]);
- var objArg = new Object();
- objArg.arg_ds_send_item3 = ds_cond_sppiz01600;
-
- frmf_modal("SPPIZ01600", "SPPIZ01600", objArg, "", "", "", "", "", "", "", "", "", "M");
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 약품편람 조회 화면 modal 호출
- ****************************************************************************************/
- function lf_fOrderDrugHBook()
- {
- dsf_createDsRow("ds_cond_smadb01900", [{col:"calcscorcd", type:"STRING", size:256 , val : ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd")}]);
-
- var objArg = new Object();
- objArg.arg_ds_hidden_receivedata = ds_cond_smadb01900;
-
- frmf_modal("SMADB01900", "SMADB01900", objArg, "", "", "", "", "", "", "", "", "", "M");
- }
- /****************************************************************************************
- * Argument : grid
- * Description : 그리드 행추가
- ****************************************************************************************/
- function lf_fOrderGridInsertRow()
- {
- var clodrow = ds_list2_clod.rowposition;
-
- var preediitem1 = ds_list2_clod.getColumn(clodrow, "ediitem1");
- var prematractflag = ds_list2_clod.getColumn(clodrow, "matractflag");
- var prepayflag = ds_list2_clod.getColumn(clodrow, "payflag");
- var ordfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
-
- var clodrow = ds_list2_clod.insertRow(clodrow == -1 ? 0 : clodrow+1);
- ds_list2_clod.enableevent = false;
- ds_list2_clod.setColumn(clodrow, "ediitem1" , preediitem1);
- ds_list2_clod.setColumn(clodrow, "matractflag" , prematractflag);
- ds_list2_clod.setColumn(clodrow, "payflag" , prepayflag);
- ds_list2_clod.setColumn(clodrow, "orddd" , ordfromdd);
- ds_list2_clod.setColumn(clodrow, "ordfromdd" , ordfromdd);
- ds_list2_clod.setColumn(clodrow, "ordtodd" , ordfromdd);
- ds_list2_clod.setColumn(clodrow, "dayno" , "1");
- ds_list2_clod.setColumn(clodrow, "orddd", ordfromdd);
- ds_list2_clod.setColumn(clodrow, "ordfromdd", ordfromdd);
- ds_list2_clod.setColumn(clodrow, "ordtodd", ordfromdd);
- ds_list2_clod.setColumn(clodrow, "dayno", "1");
- ds_list2_clod.enableevent = true;
-
- ds_list2_clod.clearSelect();
- ds_list2_clod.rowposition = clodrow;
- ds_list2_clod.selectRow(clodrow);
-
- var newcd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
- if (newcd)
- {
- ds_list2_clod.setColumn(clodrow, "adjtresncd", newcd);
- lf_fOrderBkColorNew(clodrow);
- }
- else
- {
- newcd = lf_fSetAdjtResnCd();
-
- if (utlf_isNull(newcd) || newcd == "-")
- {
- ds_list2_clod.deleteRow(clodrow);
- }
- }
-
- }
- /****************************************************************************************
- * Argument : grid
- * Description : 그리드행삭제
- ****************************************************************************************/
- function lf_fOrderGridDeleteRow()
- {
- var newcd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
- var newdesc = "";
- var selectgrupcd = "";
-
- if (utlf_isNull(newcd))
- {
- var oldcd = ds_list2_clod.getColumn(i, "adjtresncd");
-
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftout";
- sppiz01000.sCdid = oldcd;
- sppiz01000.sAdjtresndesc = "";
-
- var objArg = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
- newcd = objArg.sCdid;
- newdesc = objArg.sAdjtresndesc;
-
- if (utlf_isNull(newcd) || newcd == "-")
- {
- return;
- }
- }
-
- var SelectedRows = grdf_getSelectedRows(grp_biz.grd_clodhist)
- for(var i = SelectedRows.length-1; i >= 0; i--)
- {
- if ( ds_list2_clod.getRowType(SelectedRows[i]) == 2 )
- {
- ds_list2_clod.deleteRow(SelectedRows[i]);
- }
- else
- {
- var selectgrupcd = ds_list2_clod.getColumn(SelectedRows[i], "grupcalcscorcd");
- var seqno = ds_list2_clod.getColumn(SelectedRows[i], "seqno");
- var selectgrupflag = ds_list2_clod.getColumn(SelectedRows[i], "grupsnglflag");
-
- if ( newcd != ds_list2_clod.getColumn(SelectedRows[i], "adjtresncd"))
- {
- if ( ds_list2_clod.getRowType(SelectedRows[i]) == 1 )
- {
- grdf_setStatus(grp_biz.grd_clodhist, "U", SelectedRows[i]);
- }
- }
-
- ds_list2_clod.setColumn(SelectedRows[i], "adjtresncd" , newcd);
- ds_list2_clod.setColumn(SelectedRows[i], "adjtresndesc", newdesc);
- ds_list2_clod.deleteRow(SelectedRows[i]);
-
- // 해당 특정내역을 삭제한다.
- var cur_filter = ds_list3_clsp.filterstr.current;
- ds_list3_clsp.filter("");
- var frow = ds_list3_clsp.findRowExpr("clodseqno=='"+seqno+"'");
- while(frow > -1){
- ds_list3_clsp.setColumn(frow, "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(frow, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(frow);
-
- frow = ds_list3_clsp.findRowExpr("clodseqno=='"+seqno+"'");
- }
- ds_list3_clsp.filter(cur_filter);
- }
- }
- }
- /****************************************************************************************
- * Argument :
- * Description :
- ****************************************************************************************/
- function lf_fSetPatPamInfo(objDs)
- {
- var pid = objDs.getColumn(0,"pid");
- var indd = objDs.getColumn(0,"indd");
- var cretno = objDs.getColumn(0,"cretno");
- var instcd = objDs.getColumn(0,"instcd");
- var stsioflag = objDs.getColumn(0,"stsioflag");
- var ordtodd = objDs.getColumn(0,"ordtodd");
- var ioflag = objDs.getColumn(0,"ioflag");
-
- // 20100201 응급실 주과구분(C) 추가
- if (stsioflag == "E" || stsioflag == "C" )
- {
- ioflag = "E";
- srchdd = indd;
- }
- else
- {
- srchdd = ordtodd;
- }
-
- if (!utlf_isNull(cretno))
- {
- var param = ioflag + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + srchdd; ;
- frmf_setParameter("condparam", param);
- frmf_setParameter("errflag", "Y");
- var useyn = appf_initPatientInfo(param);
- if(useyn == true)
- {
- frmf_setParameter("SPMMO08900_rtn_useyn", "");
- }
- else
- {
- appf_delPatientInfos();
- }
- }
- else
- {
- appf_delPatientInfos();
- }
- }
- /****************************************************************************************
- * Argument :
- * Description :
- ****************************************************************************************/
- function lf_getCheckMsg()
- {
- // "저장" Btn 클릭시에 인적사항이 변경되었는지 여부를 알기 위해 조회한 항목을 임시로 저장해두고 추후에 비교한다.
- ds_hidden_item1_initclbs.copyData(ds_main_item1_clbs);
- ds_hidden_item1_initmemo.copyData(ds_main_item1_memo);
- ds_hidden_list2_clod.copyData(ds_list2_clod);
-
- var realrgstno = ds_main_item1_clbs.getColumn(0, "realrgstno");
-
- if(!utlf_isNull(realrgstno))
- {
- realrgstno = realrgstno.length;
- }
- else
- {
- realrgstno = 0;
- }
-
- if ( ds_main_item1_clbs.getColumn(0, "lockyn") != "Y"&& realrgstno == 13 && ds_main_item1_clbs.getColumn(0, "realrgstno") != ds_main_item1_clbs.getColumn(0, "patrrgstno")
- && ds_main_item1_clbs.getColumn(0, "preresncd").substr(0, 2) == "91")
- {
- var ans = sysf_messageBox("명세서상의 주민번호와 온라인 상의 주민번호가 상이합니다. "+ "\n\n"
- + "온라인 상의 주민번호는 ( "+ ds_main_item1_clbs.getColumn(0, "realrgstno").substr(0,6)
- + "-"+ ds_main_item1_clbs.getColumn(0, "realrgstno").substr(6,7) + " ) 입니다." + "\n\n" + "주민번호를 변경 ", "S001");
-
- if ( ans == 6 )
- {
- ds_main_item1_clbs.setColumn(0, "patrrgstno", ds_main_item1_clbs.getColumn(0, "realrgstno"));
- }
- }
- }
- /****************************************************************************************
- * Argument :
- * Description : 심사완료여부 상태따라 버튼권한 설정(현재환자 심사중 설정)
- ****************************************************************************************/
- function lf_fSetJudgStatBtnAuth()
- {
- var xAuth = frmf_checkAuth("X");
-
- if(ds_tmp_clbs.rowcount > 0)
- {
- xAuth = false;
- }
- // if ( xAuth == true )
- // {
- var clamendyn = ds_main_item1_clbs.getColumn(0, "clamendyn");
- var lockyn = ds_main_item1_clbs.getColumn(0, "lockyn");
-
- if (lockyn == "N")
- {
- var userid = sysf_getUserId();
-
- if (utlf_isNull(userid))
- {
- userid = "12345678";
- }
- var judgendyn = ds_main_item1_clbs.getColumn(0, "judgendyn");
- if ( judgendyn == "B" )
- {
- if ( ds_hidden.getColumn(0, "reselect") == "N" )
- {
- var lastupdtrid = ds_main_item1_clbs.getColumn(0, "lastupdtrid");
-
- if (lastupdtrid == userid)
- {
- grp_biz.btn_save.enable = true; //저장버튼
- grp_biz.btn_save.class = "btn5";
- grp_biz.btn_save.style.font = "dotum,9,bold";
-
- grp_biz.btn_end.enable = true; //완료버튼
- grp_biz.btn_end.class = "btn5";
- grp_biz.btn_end.style.font = "dotum,9,bold";
- grp_biz.btn_end.style.color = "#cc3333";
-
- grp_biz.btn_unjudg.enable = true; //미심버튼
- grp_biz.btn_unjudg.class = "btn5";
- grp_biz.btn_unjudg.style.font = "dotum,9,bold";
- grp_biz.btn_unjudg.style.color = "#cc3333";
-
- grp_biz.btn_rete.enable = true; //보류버튼
- grp_biz.btn_rete.class = "btn5";
- grp_biz.btn_rete.style.font = "dotum,9,bold";
- grp_biz.btn_rete.style.color = "#cc3333";
-
- grp_biz.btn_del.enable = true; //삭제버튼
- grp_biz.btn_del.class = "btn5";
- grp_biz.btn_del.style.font = "dotum,9,bold";
- grp_biz.btn_del.style.color = "#cc3333";
-
- //lf_setAlramMessage("기존에 심사중이었던 환자입니다.");
- trace("기존에 심사중이었던 환자입니다.")
- }
- else
- {
- grp_biz.btn_save.enable = false; //저장버튼
- grp_biz.btn_save.class = "btn2";
- grp_biz.btn_save.style.font = "dotum,9";
- grp_biz.btn_end.enable = false; //완료버튼
- grp_biz.btn_end.class = "btn2";
- grp_biz.btn_end.style.color = "";
- grp_biz.btn_end.style.font = "dotum,9";
-
- grp_biz.btn_unjudg.enable = false; //미심버튼
- grp_biz.btn_unjudg.class = "btn2";
- grp_biz.btn_unjudg.style.color = "";
- grp_biz.btn_unjudg.style.font = "dotum,9";
-
- grp_biz.btn_rete.enable = false; //보류버튼
- grp_biz.btn_rete.class = "btn2";
- grp_biz.btn_rete.style.color = "";
- grp_biz.btn_rete.style.font = "dotum,9";
-
- grp_biz.btn_del.enable = false; //삭제버튼
- grp_biz.btn_del.class = "btn2";
- grp_biz.btn_del.style.color = "";
- grp_biz.btn_del.style.font = "dotum,9";
-
- lf_setAlramMessage("다른 심사자가 심사중인 환자입니다.");
- }
- }
- else
- {
- grp_biz.btn_save.enable = true; //저장버튼
- grp_biz.btn_save.class = "btn5";
- grp_biz.btn_save.style.font = "dotum,9,bold";
-
- grp_biz.btn_end.enable = true; //완료버튼
- grp_biz.btn_end.class = "btn5";
- grp_biz.btn_end.style.font = "dotum,9,bold";
- grp_biz.btn_end.style.color = "#cc3333";
-
- grp_biz.btn_unjudg.enable = true; //미심버튼
- grp_biz.btn_unjudg.class = "btn5";
- grp_biz.btn_unjudg.style.font = "dotum,9,bold";
- grp_biz.btn_unjudg.style.color = "#cc3333";
-
- grp_biz.btn_rete.enable = true; //보류버튼
- grp_biz.btn_rete.class = "btn5";
- grp_biz.btn_rete.style.font = "dotum,9,bold";
- grp_biz.btn_rete.style.color = "#cc3333";
-
- grp_biz.btn_del.enable = true; //삭제버튼
- grp_biz.btn_del.class = "btn5";
- grp_biz.btn_del.style.font = "dotum,9,bold";
- grp_biz.btn_del.style.color = "#cc3333";
-
- ds_hidden.setColumn(0, "reselect", "N");
- }
- }
- else if (judgendyn != "B")
- {
- if ( ds_init_item3.getColumn(0, "judgidyn") == "Y" && judgendyn == "A")
- {
- var judgendyn = ds_main_item1_clbs.getColumn(0, "judgendyn");
- ds_send_item4_endclbs.clearData();
- ds_send_item4_endclbs.addRow();
- ds_send_item4_endclbs.setColumn(0, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_send_item4_endclbs.setColumn(0, "clamdg", ds_main_item1_clbs.getColumn(0, "clamdg"));
- ds_send_item4_endclbs.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
- ds_send_item4_endclbs.setColumn(0, "pidsn", ds_main_item1_clbs.getColumn(0, "pidsn"));
- ds_send_item4_endclbs.setColumn(0, "judgendyn", "B");
-
- var oParam = {};
- oParam.id = "TXPID20302";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqSetPidmclbsJudgEndYNAll";
- oParam.inds = "endclbs=ds_send_item4_endclbs";
- oParam.outds = "";
- oParam.async = false;
- //oParam.callback = "cf_TXPID20302";
- tranf_submit(oParam);
-
- ds_main_item1_clbs.setColumn(0, "judgendyn", "B");
- ds_main_item1_clbs.setColumn(0, "lastupdtrid", userid);
-
- lf_fSetJudgSaveState("B");
- }
-
- ds_hidden.setColumn(0, "orgjudgendyn", judgendyn);
-
- if (judgendyn == "D")
- {
- grp_biz.btn_save.enable = false; //저장버튼
- //2012.5.23 이경민 심사완료일자가 15일 이후면 완료버튼 비활성화 추가.
- var judgenddd = ds_main_item1_clbs.getColumn(0, "judgenddd");
- judgenddd = judgenddd.toDate();
- var bfday15 = utlf_getCurrentDate().toDate().getAddDate(-15,'D');
-
- if (judgenddd < bfday15)
- {
- grp_biz.btn_del.enable = false; //삭제버튼
- grp_biz.btn_del.class = "btn2";
- grp_biz.btn_del.style.color = "";
- grp_biz.btn_del.style.font = "dotum,9";
- }
- else
- {
- grp_biz.btn_end.enable = true; //완료버튼
- grp_biz.btn_end.class = "btn5";
- grp_biz.btn_end.style.font = "dotum,9,bold";
- grp_biz.btn_end.style.color = "#cc3333";
- }
-
- grp_biz.btn_unjudg.enable = true; //미심버튼
- grp_biz.btn_unjudg.class = "btn5";
- grp_biz.btn_unjudg.style.font = "dotum,9,bold";
- grp_biz.btn_unjudg.style.color = "#cc3333";
-
- grp_biz.btn_rete.enable = true; //보류버튼
- grp_biz.btn_rete.class = "btn5";
- grp_biz.btn_rete.style.font = "dotum,9,bold";
- grp_biz.btn_rete.style.color = "#cc3333";
-
- grp_biz.btn_unjudg.enable = true; //미심버튼
- grp_biz.btn_rete.enable = true; //보류버튼
-
- grp_biz.btn_del.enable = false; //삭제버튼
- grp_biz.btn_del.class = "btn2";
- grp_biz.btn_del.style.color = "";
- grp_biz.btn_del.style.font = "dotum,9";
-
- }
- else if (judgendyn == "C" || judgendyn == "E" || judgendyn == "Z")
- {
- grp_biz.btn_save.enable = true; //저장버튼
- grp_biz.btn_save.class = "btn5";
- grp_biz.btn_save.style.font = "dotum,9,bold";
-
- grp_biz.btn_end.enable = true; //완료버튼
- grp_biz.btn_end.class = "btn5";
- grp_biz.btn_end.style.font = "dotum,9,bold";
- grp_biz.btn_end.style.color = "#cc3333";
-
- grp_biz.btn_unjudg.enable = true; //미심버튼
- grp_biz.btn_unjudg.class = "btn5";
- grp_biz.btn_unjudg.style.font = "dotum,9,bold";
- grp_biz.btn_unjudg.style.color = "#cc3333";
-
- grp_biz.btn_rete.enable = true; //보류버튼
- grp_biz.btn_rete.class = "btn5";
- grp_biz.btn_rete.style.font = "dotum,9,bold";
- grp_biz.btn_rete.style.color = "#cc3333";
-
- grp_biz.btn_del.enable = true; //삭제버튼
- grp_biz.btn_del.class = "btn5";
- grp_biz.btn_del.style.font = "dotum,9,bold";
- grp_biz.btn_del.style.color = "#cc3333";
- }
- else if (judgendyn == "A")
- {
- grp_biz.btn_save.enable = true; //저장버튼
- grp_biz.btn_save.class = "btn5";
- grp_biz.btn_save.style.font = "dotum,9,bold";
-
- grp_biz.btn_end.enable = true; //완료버튼
- grp_biz.btn_end.class = "btn5";
- grp_biz.btn_end.style.font = "dotum,9,bold";
- grp_biz.btn_end.style.color = "#cc3333";
-
- grp_biz.btn_rete.enable = true; //보류버튼
- grp_biz.btn_rete.class = "btn5";
- grp_biz.btn_rete.style.font = "dotum,9,bold";
- grp_biz.btn_rete.style.color = "#cc3333";
-
- grp_biz.btn_del.enable = true; //삭제버튼
- grp_biz.btn_del.class = "btn5";
- grp_biz.btn_del.style.font = "dotum,9,bold";
- grp_biz.btn_del.style.color = "#cc3333";
-
- grp_biz.btn_unjudg.enable = false;
- grp_biz.btn_unjudg.class = "btn2";
- grp_biz.btn_unjudg.style.color = "";
- grp_biz.btn_unjudg.style.font = "dotum,9";
-
- }
- else if (judgendyn == "N")
- {
- grp_biz.btn_save.enable = true; //저장버튼
- grp_biz.btn_save.class = "btn5";
- grp_biz.btn_save.style.font = "dotum,9,bold";
-
- grp_biz.btn_end.enable = true; //완료버튼
- grp_biz.btn_end.class = "btn5";
- grp_biz.btn_end.style.font = "dotum,9,bold";
- grp_biz.btn_end.style.color = "#cc3333";
-
- grp_biz.btn_unjudg.enable = true; //미심버튼
- grp_biz.btn_unjudg.class = "btn5";
- grp_biz.btn_unjudg.style.font = "dotum,9,bold";
- grp_biz.btn_unjudg.style.color = "#cc3333";
-
- grp_biz.btn_del.enable = true; //삭제버튼
- grp_biz.btn_del.class = "btn5";
- grp_biz.btn_del.style.font = "dotum,9,bold";
- grp_biz.btn_del.style.color = "#cc3333";
-
- grp_biz.btn_rete.enable = false;
- grp_biz.btn_rete.class = "btn2";
- grp_biz.btn_rete.style.color = "";
- grp_biz.btn_rete.style.font = "dotum,9";
-
- }
- else
- {
- grp_biz.btn_save.enable = true; //저장버튼
- grp_biz.btn_save.class = "btn5";
- grp_biz.btn_save.style.font = "dotum,9,bold";
-
- grp_biz.btn_end.enable = true; //완료버튼
- grp_biz.btn_end.class = "btn5";
- grp_biz.btn_end.style.font = "dotum,9,bold";
- grp_biz.btn_end.style.color = "#cc3333";
-
- grp_biz.btn_unjudg.enable = true; //미심버튼
- grp_biz.btn_unjudg.class = "btn5";
- grp_biz.btn_unjudg.style.font = "dotum,9,bold";
- grp_biz.btn_unjudg.style.color = "#cc3333";
-
- grp_biz.btn_rete.enable = true; //보류버튼
- grp_biz.btn_rete.class = "btn5";
- grp_biz.btn_rete.style.font = "dotum,9,bold";
- grp_biz.btn_rete.style.color = "#cc3333";
-
- grp_biz.btn_del.enable = true; //삭제버튼
- grp_biz.btn_del.class = "btn5";
- grp_biz.btn_del.style.font = "dotum,9,bold";
- grp_biz.btn_del.style.color = "#cc3333";
- }
- }
- }
- else
- {
- grp_biz.btn_save.enable = false; //저장버튼
- grp_biz.btn_save.class = "btn2";
- grp_biz.btn_save.style.font = "dotum,9";
- grp_biz.btn_end.enable = false; //완료버튼
- grp_biz.btn_end.class = "btn2";
- grp_biz.btn_end.style.color = "";
- grp_biz.btn_end.style.font = "dotum,9";
-
- grp_biz.btn_unjudg.enable = false; //미심버튼
- grp_biz.btn_unjudg.class = "btn2";
- grp_biz.btn_unjudg.style.color = "";
- grp_biz.btn_unjudg.style.font = "dotum,9";
-
- grp_biz.btn_rete.enable = false; //보류버튼
- grp_biz.btn_rete.class = "btn2";
- grp_biz.btn_rete.style.color = "";
- grp_biz.btn_rete.style.font = "dotum,9";
-
- grp_biz.btn_del.enable = false; //삭제버튼
- grp_biz.btn_del.class = "btn2";
- grp_biz.btn_del.style.color = "";
- grp_biz.btn_del.style.font = "dotum,9";
- }
- // }
- var suppkindcd = ds_main_item1_clbs.getColumn(0, "suppkindcd");
-
- if (!utlf_isNull(suppkindcd) && suppkindcd != "00")
- {
- grp_sea00.opt_suppkind.style.backgroundColor = "#f7a08b"; // class="color_6" 다홍색"#cece9c";
- grp_sea00.opt_payownbrate.style.backgroundColor = "#f7a08b"; // class="color_6" 다홍색"#cece9c";
- }
- else
- {
- grp_sea00.opt_suppkind.style.backgroundColor = "#f2f2f2"; // output_fix클래스의background-color
- grp_sea00.opt_payownbrate.style.backgroundColor = "#f2f2f2"; // output_fix클래스의background-color
- }
-
- if (ds_main_item1_clbs.getColumn(0,"ioflag") == "I" || frmf_getScreenID() == "SMPID20300")
- {
- if(ds_main_item1_clbs.getColumn(0, "opyn") == "Y")
- {
- grp_biz.btn_opyn.visible = true;
- grp_biz.btn_opyn.class = "btn5";
- grp_biz.btn_opyn.style.color = "#ff0066";
- }
- else
- {
- grp_biz.btn_opyn.visible = false;
- grp_biz.btn_opyn.class = "btn2";
- grp_biz.btn_opyn.style.color = "";
- }
-
- lf_fCheckSpclSpecData();
- var clbs_licnsno = ds_main_item1_clbs.getColumn(0, "licnsno");
- var cldi_licnsno = ds_main_item1_clbs.lookup("diagseq", "1", "licnsno");
- var clod_snglcalcscorcd = ds_list8_clod2.lookupExpr("item == '0101' || item == '0102'", "snglcalcscorcd");
-
- if (ds_main_item1_clbs.getColumn(0, "patmsgyn") == "Y")
- {
- img_msg.visible = true;
- }
- else
- {
- img_msg.visible = false;
- }
-
- var fixrateyn = ds_main_item1_clbs.getColumn(0, "fixrateyn");
- if (fixrateyn == "7" || fixrateyn == "8")
- {
- grp_biz.pm_flag.visible = true;
- }
- }
- else
- {
-
- if (ds_main_item1_clbs.getColumn(0, "opyn") == "Y")
- {
- grp_biz.btn_opyn.visible = true;
- grp_biz.btn_opyn.class = "btn5";
- grp_biz.btn_opyn.style.color = "#cc3333"; // 해당 정보가 있는 경우 버튼 색 변경 // cc3333=붉은색
- // 중증질환 Btn
- grp_biz.btn_esscdiag.position.left = "215";
- }
- else
- {
- grp_biz.btn_opyn.visible = false;
- grp_biz.btn_opyn.class = "btn2";
- grp_biz.btn_opyn.style.color = "";
- }
- }
-
- var dispclsp = ds_main_item1_clbs.getColumn(0, "dispclsp");
-
- if(dispclsp == "S")
- {
- grp_biz.swt_spclmemo.tabindex = 0;
- }
- else if(dispclsp == "E")
- {
- grp_biz.swt_spclmemo.tabindex = 2;
- }
- else if(dispclsp == "U")
- {
- grp_biz.swt_spclmemo.tabindex = 1;
- }
-
- if ( lgv_ds_rslt.getColumn(0, "judgendyn") == "A" // 대상자조회창
- && ( ds_main_item1_clbs.getColumn(0, "judgendyn") == "C" // 심사화면 심사완료
- || ds_main_item1_clbs.getColumn(0, "judgendyn") == "Z" // 심사화면 일괄완료
- )
- ) {
- lf_setAlramMessage("심사 완료되어 있는 명세서 입니다.", "I005"); //심사 완료되어 있는 명세서입니다.
- }
- else if ( lgv_ds_rslt.getColumn(0, "judgendyn") == "A" // 대상자조회창
- && ds_main_item1_clbs.getColumn(0, "judgendyn") == "N" // 심사화면 보류
- ) {
- lf_setAlramMessage("심사 보류되어 있는 명세서 입니다.", "I005"); //심사 보류되어 있는 명세서입니다.
- }
-
- if ( ds_main_item1_clbs.getColumn(0, "insukindcd") == "31" )
- {
- grp_sea00.cap_insdnm.text = "사고일자";
- grp_sea00.cap_certno.text = "접수번호";
- }
- else if (ds_main_item1_clbs.getColumn(0, "insukindcd") == "41")
- {
- grp_sea00.cap_insdnm.text = "사고일자";
- grp_sea00.cap_certno.text = "관리번호";
- }
- else
- {
- grp_sea00.cap_insdnm.text = "가입자";
- grp_sea00.cap_certno.text = "증번호";
- }
-
- if ( ds_main_item1_clbs.getColumn(0, "patmsgyn") == "Y")
- {
- img_msg.visible = true;
- }
- else
- {
- img_msg.visible = false;
- }
-
- if ( ds_main_item1_clbs.getColumn(0, "sumtypecd") == "T")
- {
- if (lgv_ioflag == "O") {
- grp_biz.opt_etcordflag.visible = true;
- } else {
- grp_sea00.opt_etcordflag.visible = true;
- }
- }
- else
- {
- if (lgv_ioflag == "O") {
- grp_biz.opt_etcordflag.visible = false;
- } else {
- grp_sea00.opt_etcordflag.visible = false;
- }
- }
-
-
- var supprate = ds_main_item1_clbs.getColumn(0, "suppkindcd")+"/"+ds_main_item1_clbs.getColumn(0, "payownbrate"); // 보조유형ID과 요율%로 combo 의 value
- ds_main_item1_clbs.addColumn("patsupprate", "STRING");
- ds_main_item1_clbs.setColumn(0, "patsupprate", supprate);
-
- if (ds_main_item1_clbs.getColumn(0, "insukindcd") == "41")
- {
- // cmb_ordrsltcd의 INIT Dataset - 진료결과
- grp_sea00.cmb_ordrsltcd.innerdataset = "ds_init_P0297";
- }
- else
- {
- grp_sea00.cmb_ordrsltcd.innerdataset = "ds_init_P0110";
- }
- }
- /****************************************************************************************
- * Argument :
- * Description :
- ****************************************************************************************/
- function lf_fSetJudgSaveState(judgendyn)
- {
- var userid = sysf_getUserId(); // (common.js) 현재 로그인한 사용자 번호(ID)
- if (userid) {
- } else {
- userid = "12345678";
- }
-
- var trgtManWindow = frmf_getChildWindow(lgv_trgtManWindow); //SMPID20400,SMPID20200
- if (!utlf_isNull(trgtManWindow))
- {
- var selectedRow = trgtManWindow.ds_grid_grd_clbsmast.rowposition;
-
- if (selectedRow > -1)
- {
- var trgtmanlist = lgv_ds_rslt.rowcount;
-
- if (trgtmanlist < 0)
- {
- }
- else
- {
- var userid = sysf_getUserInfo();
-
- if (utlf_isNull(userid))
- {
- userid = "12345678";
- }
-
- var clamkey = ds_main_item1_clbs.getColumn(0, "clamkey");
- var srchmode = trgtManWindow.ds_hidden_clbs.getColumn(0, "srchmode");
- if (srchmode == "specclbs")
- {
- var fclamkey = trgtManWindow.ds_grid_grd_clbsmast.findRow("clamkey", clamkey);
- var fjudgendyn = trgtManWindow.ds_grid_grd_clbsmast.getColumn(fclamkey, "judgendyn")
-
- if (fclamkey > -1 && fjudgendyn != "Z")
- {
- trgtManWindow.ds_grid_grd_clbsmast.setColumn(fclamkey, "judgendyn", judgendyn);
- trgtManWindow.ds_grid_grd_clbsmast.setColumn(fclamkey, "lastupdtrid", userid);
- trgtManWindow.ds_grid_grd_clbsmast.setColumn(fclamkey, "prepdata", (grp_biz.btn_attData.class == "btn5" ? "Y" : ""));
- }
- }
- else
- {
- var fclamkey = trgtManWindow.ds_grid_grd_clbsmast.findRow("clamkey", clamkey);
- var fjudgendyn = trgtManWindow.ds_grid_grd_clbsmast.getColumn(fclamkey, "judgendyn")
-
- if (fclamkey > -1)
- {
- trgtManWindow.ds_grid_grd_clbsmast.setColumn(fclamkey, "judgendyn", judgendyn);
- trgtManWindow.ds_grid_grd_clbsmast.setColumn(fclamkey, "lastupdtrid", userid);
- trgtManWindow.ds_grid_grd_clbsmast.setColumn(fclamkey, "prepdata", (grp_biz.btn_attData.class == "btn5" ? "Y" : ""));
-
- }
- }
- trgtManWindow.lf_fSetWorkStatCnt();
- }
- }
- }
- }
- /****************************************************************************************
- * Argument :
- * Description : TRPID20308 submit callback
- ****************************************************************************************/
- function cf_TRPID20308(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- alert("["+sSvcId+"]"+sErrorMsg);
- return;
- }
- if (ds_rslt_aftjudgbtn.getColumn(0,"patspcfyn") == "Y")
- {
- btn_patspcfyn.style.backgroundImage = "URL('theme://images/icon_btn_s.gif')";
- }
- else
- {
- btn_patspcfyn.style.backgroundImage = "URL('theme://images/icon_btn.png')"; // 파란색
- }
-
- // 이전명세서 버튼 설정
- if (ds_rslt_aftjudgbtn.getColumn(0, "predocuyn") == "Y")
- {
- grp_biz.btn_predocu.class = "btn5";
- grp_biz.btn_predocu.style.color = "#cc3333";
-
- }
- else
- {
- grp_biz.btn_predocu.class = "btn2";
- grp_biz.btn_predocu.style.color = "";
- }
-
- if ( ds_rslt_aftjudgbtn.getColumn(0, "cutprcpyn") == "Y" )
- {
- if (ds_send_item1_clbs.getColumn(0, "cutprcpyn") == "2"){
- lf_pidfOpenSMPIS00600(ds_main_item1_clbs.getColumn(0, "ioflag"), "D", "O");
- } else {
- btn_redu.class = "btn5";
- btn_redu.style.color = "#cc3333";
- }
- }
- else
- {
- btn_redu.class = "btn2";
- btn_redu.style.color = "";
- }
-
- // 상병이력 버튼 설정
- if ( ds_rslt_aftjudgbtn.getColumn(0, "diaghist") == "Y")
- {
- grp_biz.btn_diagHist.class = "btn5";
- grp_biz.btn_diagHist.style.color = "#cc3333"; // 해당 정보가 있는 경우 버튼 색 변경 cc3333=붉은색
- }
- else
- {
- grp_biz.btn_diagHist.class = "btn2"; // 표준에서 정한 기본 버튼으로 설정
- }
-
- if (ds_main_item1_clbs.getColumn(0,"ioflag") == "O")
- {
- // 미시행처방 버튼 설정
- if ( ds_rslt_aftjudgbtn.getColumn(0, "unexecord") == "Y")
- {
- grp_biz.btn_unexecord.class = "btn5";
- grp_biz.btn_unexecord.style.color = "#cc3333";
- }
- else
- {
- grp_biz.btn_unexecord.class = "btn2";
- }
- }
- else
- {
- if ( ds_rslt_aftjudgbtn.getColumn(0, "bornbaby") == "Y")
- {
- grp_biz.btn_babymom.visible = true;
- grp_biz.btn_babymom.style.color = "#cc3333"; // "#ff0066"; 해당 정보가 있는 경우 버튼 색 변경 cc3333=붉은색
- }
- else
- {
- grp_biz.btn_babymom.visible = false;
- grp_biz.btn_babymom.class = "btn2"; // 표준에서 정한 기본 버튼으로 설정
- grp_biz.btn_babymom.style.color = "";
- }
- if ( ds_rslt_aftjudgbtn.getColumn(0, "oprcp") == "Y")
- {
- grp_biz.btn_oprcp.class = "btn5";
- grp_biz.btn_oprcp.style.color = "#cc3333"; // "#ff0066"; 해당 정보가 있는 경우 버튼 색 변경 cc3333=붉은색
- }
- else
- {
- grp_biz.btn_oprcp.class = "btn2"; // 표준에서 정한 기본 버튼으로 설정
- grp_biz.btn_oprcp.style.color = "";
- }
-
- if (ds_rslt_aftjudgbtn.getColumn(0, "diaghist") == "Y")
- {
- grp_biz.btn_diagHist.class = "btn5";
- grp_biz.btn_diagHist.style.color = "#cc3333";
- }
- else
- {
- grp_biz.btn_diagHist.class = "btn2";
- grp_biz.btn_diagHist.style.color = "";
- }
- }
-
- if ( ds_rslt_aftjudgbtn.getColumn(0, "samedocuyn") == "Y")
- {
- lf_setAlramMessage("동일진료일자 동일진료과 명세서가 존재합니다. 확인하십시오 !");
- }
-
- if ( ds_rslt_aftjudgbtn.getColumn(0, "samedocuioyn") == "Y")
- {
- lf_setAlramMessage("동일진료일자 동일진료과 입원 명세서가 존재합니다. 확인하십시오 !");
- }
- }
- /****************************************************************************************
- * Argument :
- * Description : TRPID20321 submit callback
- ****************************************************************************************/
- function cf_TRPID20321(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- alert("["+sSvcId+"]"+sErrorMsg);
- return;
- }
-
- ds_hidden_item1_initmemo.copyData(ds_main_item1_memo);
-
- //메모여부에 따른 색깔분류 - 박창원 20091102
- var edimemo = ds_main_item1_memo.getColumn(0,"edimemo");
- var usermemo = ds_main_item1_memo.getColumn(0,"judgmemo");
-
- var edilength = edimemo.length;
- var userlength = usermemo.length;
-
- if (userlength > 0)
- {
- grp_biz.swt_spclmemo.case_judgrmemo.text = "심사자메모●";
- }
- else
- {
- grp_biz.swt_spclmemo.case_judgrmemo.text = "심사자메모";
- }
-
- if (edilength > 0)
- {
- grp_biz.swt_spclmemo.case_ediclammemo.text = "EDI 메모●";
- }
- else
- {
- grp_biz.swt_spclmemo.case_ediclammemo.text = "EDI 메모";
- }
- }
- /****************************************************************************************
- * Argument : TRPIJ00340
- * Description : TRPIJ00340 submit callback
- ****************************************************************************************/
- function cf_TRPIJ00340(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- sysf_messageBox("데이터 가","I004");
- return;
- }
- var serdiagfromdd = ds_init_cmb_rarecancermsg.getCaseMax("rgstkindcd == '00'","rareobstfromdd");
- var serdiagtodd = ds_init_cmb_rarecancermsg.getCaseMax("rgstkindcd == '00'","rareobsttodd");
- var itemmsg = ds_init_cmb_rarecancermsg.lookupExpr("rgstkindcd=='00' && rareobsttodd=='"+serdiagtodd+"'","msg");
- var rareobstfromdd = ds_init_cmb_rarecancermsg.getCaseMax("rgstkindcd != '00'","rareobstfromdd");
- var rareobsttodd = ds_init_cmb_rarecancermsg.getCaseMax("rgstkindcd != '00'","rareobsttodd");
- var raremsg = ds_init_cmb_rarecancermsg.lookupExpr("rgstkindcd!='00' && rareobsttodd=='"+serdiagtodd+"'","msg");
-
- cmb_rarecancermsg.index = 0;
-
- //lf_fGetPersonalData();
- }
- /****************************************************************************************
- * Argument :
- * Description : TRPID20324 submit callback
- ****************************************************************************************/
- function cf_TRPID20324(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- alert("["+sSvcId+"]"+sErrorMsg);
- return;
- }
-
- for (var i = 0; i < ds_list1_cldi.rowcount; i++)
- {
- var srchnm = utlf_transNullToEmpty(ds_list1_cldi.getColumn(i, "diagcd")).substr(0, 2);
- var t_vcode = ds_list1_cldi.getColumn(i, "vcode");
- var rowno, rn = 0;
-
- rowno = ds_list1_cldi.findRowAs("diagcd",srchnm);
-
- if (t_vcode != "V252" && t_vcode != "V193")
- {
- while( rowno > -1)
- {
- var s_vcode = ds_list1_cldi.getColumn(rowno, "vcode");
- var t_diagcd = utlf_transNullToEmpty(ds_list1_cldi.getColumn(rowno, "diagcd")).substr(0, 2);
-
- if (rowno != i && !utlf_isNull(t_diagcd) && !utlf_isNull(t_vcode) && srchnm == t_diagcd && t_vcode == s_vcode )
- {
- ds_list1_cldi.updatecontrol = false;
- ds_list1_cldi.setColumn(rowno, "bgcolor", "#ffff9c"); //#ffff9c=연한노랑
- ds_list1_cldi.updatecontrol = true;
- }
-
- rowno = ds_list1_cldi.findRowAs("diagcd",srchnm, rowno + 1);
- }
- }
-
- var srchnm2 = utlf_transNullToEmpty(ds_list1_cldi.getColumn(i, "diagcd")).substr(0, 3);
-
- rn = ds_list1_cldi.findRowAs("diagcd",srchnm2);
-
- while( rn > -1)
- {
- var t_diagcd = utlf_transNullToEmpty(ds_list1_cldi.getColumn(rn, "diagcd")).substr(0, 3);
-
- if (rn != i && srchnm2 == t_diagcd && !utlf_isNull(t_diagcd))
- {
- ds_list1_cldi.updatecontrol = false;
- ds_list1_cldi.setColumn(rn, "bgcolor", "#ffff9c"); //#ffff9c=연한노랑
- ds_list1_cldi.updatecontrol = true;
- }
-
- rn = ds_list1_cldi.findRowAs("diagcd",srchnm2, rn + 1);
- }
- }
-
- rn = ds_list1_cldi.findRow("kcd6chk","Y");
-
- while( rn > -1)
- {
- ds_list1_cldi.updatecontrol = false;
- ds_list1_cldi.setColumn(rn, "bgcolor", "#6699ff");
- ds_list1_cldi.updatecontrol = true;
- rn = ds_list1_cldi.findRow("kcd6chk","Y", rn + 1);
- }
-
- rn = ds_list1_cldi.findRow("endyn","Y");
-
- while( rn > -1)
- {
- ds_list1_cldi.updatecontrol = false;
- ds_list1_cldi.setColumn(rn, "bgcolor", "#ff0000");
- ds_list1_cldi.setRowType(rn, 8);
- ds_list1_cldi.setColumn(rn, "diagseq", ds_list1_cldi.rowcount + 1 );
- ds_list1_cldi.updatecontrol = true;
- rn = ds_list1_cldi.findRow("endyn","Y", rn + 1);
- }
- lf_fDiagGridInsertRow("Y", "N", "1"); // 상병마지막 그리드에 한줄추가
-
- //ds_list1_cldi.rowposition = 0;
- }
- /****************************************************************************************
- * Argument :
- * Description : TRPID20326 submit callback
- ****************************************************************************************/
- function cf_TRPID20326(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- alert("["+sSvcId+"]"+sErrorMsg);
- return;
- }
-
- for ( var i = 1 ; i < grp_biz.grd_oprcphist.getCellCount('Body'); i++ )
- {
- colorExpr = "EXPR( spcljudgyn == 'Y' ? '#ff3333' : surecdyn == 'Y' ? '#0000ff' : 'default'";
- grp_biz.grd_oprcphist.setCellProperty('Body', i, "color", colorExpr);
- }
-
- // 원외처방 그리드 상태를 급여구분 기본값인 "급여"로 필터링한다.
- grp_biz_rdo_cloppayflag_onitemchanged(grp_biz.rdo_cloppayflag);
-
- }
- /****************************************************************************************
- * Argument :
- * Description : TRPID20330 submit callback
- ****************************************************************************************/
- function cf_TRPID20330(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- alert("["+sSvcId+"]"+sErrorMsg);
- return;
- }
-
- if (ds_rslt_dupid.rowcount > 0 )
- {
- if (ds_main_item1_clbs.getColumn(0,"pid") == ds_rslt_dupid.getColumn(0,"newpid"))
- {
- duppid = ds_rslt_dupid.getColumn(0,"oldpid")
- }
-
- lf_setAlramMessage("★★★ 합번정보 : 해당 환자는 "+duppid+" 챠트번호와 합번정보가 있으며, " +
- "진료개시일이 동일한 "+duppid+"의 명세서가 존재하니 반드시 청구여부 확인하시기 바랍니다. ★★★");
- }
- }
- /****************************************************************************************
- * Argument : submit
- * Description : TRPID20328 submit callback
- ****************************************************************************************/
- function cf_TRPID20328(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0) { alert("["+sSvcId+"]"+sErrorMsg); return; }
- var orddiag = "";
-
- if ((ds_rslt_mmohdiag1.rowcount > 0 && ds_rslt_mmohdiag2.rowcount == 0) || (ds_rslt_mmohdiag1.rowcount > 0 && ds_rslt_mmohdiag2.rowcount > 0))
- {
- orddiag = ds_rslt_mmohdiag1.getColumn(0,"diagcd");
- grp_biz.cbo_diag.innerdataset = "ds_rslt_mmohdiag1";
-
- }
- else if (ds_rslt_mmohdiag1.rowcount == 0 && ds_rslt_mmohdiag2.rowcount > 0)
- {
- orddiag = ds_rslt_mmohdiag2.getColumn(0,"diagcd");
- grp_biz.cbo_diag.innerdataset = "ds_rslt_mmohdiag2";
- }
-
- ds_main_item1_clbs.addColumn("orddiag", "string");
- ds_main_item1_clbs.setColumn(0, "orddiag", orddiag);
-
- lf_showDsValue(ds_rslt_mmohdiag1, "diagcd", "diaghngnm");
- lf_showDsValue(ds_rslt_mmohdiag2, "diagcd", "diaghngnm");
- }
- /****************************************************************************************
- * Argument : messagebox
- * Description : messagebox
- ****************************************************************************************/
- function lf_setAlramMessage(msg)
- {
- var nrow = ds_grd_msg.addRow();
- ds_grd_msg.setColumn(nrow,"msg", msg);
- grp_msg.position.x = 343;
- grp_msg.position.y = 241;
- grp_msg.visible = true;
- grp_msg.button25.setFocus();
- grp_msg.bringToFront();
- }
- /****************************************************************************************
- * Argument :
- * Description : 처방별환자조회(계산)_수가코드
- ****************************************************************************************/
- function lf_fOpenSMPIS00500DetailSnglCD()
- {
- lf_pidfOpenSMPIS00500(ds_main_item1_clbs.getColumn(0, "ioflag"), "D", "SnglCD");
- }
- /****************************************************************************************
- * Argument :
- * Description : 처방별환자조회(계산)_EDI코드
- ****************************************************************************************/
- function lf_fOpenSMPIS00500DetailEdicd()
- {
- lf_pidfOpenSMPIS00500(ds_main_item1_clbs.getColumn(0, "ioflag"), "D", "Edicd");
- }
- /****************************************************************************************
- * Argument :
- * Description : 처방별환자조회(청구/삭감)
- ****************************************************************************************/
- function lf_fOpenSMPIS00600Detail()
- {
- lf_pidfOpenSMPIS00600(ds_main_item1_clbs.getColumn(0, "ioflag"), "D");
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 청구삭감조회화면 호출
- ****************************************************************************************/
- function lf_pidfOpenSMPIS00600(ioflag, calltype, opentype)
- {
- ds_cond_smpis00600.clearData();
- ds_cond_smpis00600.addRow();
-
- if (calltype == "M")
- {
- if (ioflag == "I")
- {
- var irow = ds_grid_grd_clbsmast.rowposition;
- }
-
- var pid = ds_grid_grd_clbsmast.getColumn(irow, "pid");
-
- if (!utlf_isNull(pid))
- {
- ds_cond_smpis00600.setColumn(0, "patunitsrch" , ds_grid_grd_clbsmast.getColumn(irow, "pid"));
- ds_cond_smpis00600.setColumn(0, "clamym" , "");
- ds_cond_smpis00600.setColumn(0, "clamymfrom" , ds_grid_grd_clbsmast.getColumn(irow, "clamym"));
- ds_cond_smpis00600.setColumn(0, "clamymto" , ds_grid_grd_clbsmast.getColumn(irow, "clamym"));
- ds_cond_smpis00600.setColumn(0, "clamflag" , ds_grid_grd_clbsmast.getColumn(irow, "clamflagcd"));
- ds_cond_smpis00600.setColumn(0, "ioflag" , ioflag);
- ds_cond_smpis00600.setColumn(0, "insukind" , ds_grid_grd_clbsmast.getColumn(irow, "insukindcd"));
- ds_cond_smpis00600.setColumn(0, "cutonly" , "false");
- ds_cond_smpis00600.setColumn(0, "code" , "");
- ds_cond_smpis00600.setColumn(0, "codecond" , "calc");
- ds_cond_smpis00600.setColumn(0, "trustinstcd" , "N");
- ds_cond_smpis00600.setColumn(0, "clamdgfrom" , "");
- ds_cond_smpis00600.setColumn(0, "clamdgto" , "");
- ds_cond_smpis00600.setColumn(0, "orddeptcd" , "-");
- ds_cond_smpis00600.setColumn(0, "orddrid" , "-");
- }
- }
- else
- {
- var irow = ds_list2_clod.rowposition;
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
-
- if (!utlf_isNull(pid))
- {
- ds_cond_smpis00600.setColumn(0, "openflag" , ioflag);
- ds_cond_smpis00600.setColumn(0, "patunitsrch" , ds_main_item1_clbs.getColumn(0, "pid"));
- ds_cond_smpis00600.setColumn(0, "clamym" , "");
- ds_cond_smpis00600.setColumn(0, "clamymfrom" , ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_cond_smpis00600.setColumn(0, "clamymto" , ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_cond_smpis00600.setColumn(0, "clamflag" , ds_main_item1_clbs.getColumn(0, "clamflagcd"));
- ds_cond_smpis00600.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_cond_smpis00600.setColumn(0, "insukind" , ds_main_item1_clbs.getColumn(0, "insukindcd"));
- ds_cond_smpis00600.setColumn(0, "cutonly" , "false"); // 삭감처방만조회:true, 청구처방조회:false
- ds_cond_smpis00600.setColumn(0, "code" , ds_list2_clod.getColumn(irow, "snglcalcscorcd"));
- ds_cond_smpis00600.setColumn(0, "codecond" , "N");
- ds_cond_smpis00600.setColumn(0, "trustinstcd" , "");
- ds_cond_smpis00600.setColumn(0, "clamdgfrom" , "");
- ds_cond_smpis00600.setColumn(0, "clamdgto" , "");
- ds_cond_smpis00600.setColumn(0, "orddeptcd" , "-");
- ds_cond_smpis00600.setColumn(0, "orddrid" , "-");
- }
- }
- if (opentype == "O"){
- frmf_open("SMPIS00600", "SMPIS00600", {args_ds_send:ds_cond_smpis00600}, "", "", "", "", "", "", "", "", "", "M");
- } else {
- frmf_modal("SMPIS00600", "SMPIS00600", {args_ds_send:ds_cond_smpis00600}, "", "", "", "", "", "", "", "", "", "M");
- }
-
- }
- /****************************************************************************************
- * Argument : modal
- * Description : 계산처방시행조회
- ****************************************************************************************/
- function lf_pidfOpenSMPIS00500(ioflag, calltype, codetype)
- {
- ds_cond_smpis00500.clearData();
- ds_cond_smpis00500.addRow();
-
- if (calltype == "M")
- {
- if (ioflag == "I")
- {
- var irow = ds_grid_grd_clbsmast.rowposition;
- }
- else
- {
- var srchmode = ds_hidden_clbs.getColumn(0, "srchmode");
-
- if (srchmode == "specclbs")
- {
- var irow = ds_grid_grd_specclbs.rowposition;
- }
- else
- {
- var irow = ds_grid_grd_clbsmast.rowposition;
- }
- }
-
- var pid = ds_grid_grd_clbsmast.getColumn(irow, "pid");
-
- if (!utlf_isNull(pid))
- {
- ds_cond_smpis00500.setColumn(0, "patunitsrch" , ds_grid_grd_clbsmast.getColumn(irow, "pid"));
- ds_cond_smpis00500.setColumn(0, "fromdd" , ds_grid_grd_clbsmast.getColumn(irow, "ordfromdd"));
- ds_cond_smpis00500.setColumn(0, "todd" , ds_grid_grd_clbsmast.getColumn(irow, "ordtodd"));
-
- if (ioflag == "O")
- {
- ds_cond_smpis00500.setColumn(0, "ioflag", "A");
- ds_cond_smpis00500.setColumn(0, "orddrid", "");
- }
- else
- {
- ds_cond_smpis00500.setColumn(0, "ioflag", ds_send.getColumn(0, "ioflag"));
- ds_cond_smpis00500.setColumn(0, "orddrid", ds_grid_grd_clbsmast.getColumn(irow, "orddrid"));
- }
-
- ds_cond_smpis00500.setColumn(0, "orddeptcd", ds_grid_grd_clbsmast.getColumn(irow, "orddeptcd"));
- ds_cond_smpis00500.setColumn(0, "codecond", "calc"); // calc:코드별, cancer:항암제, kind:분류별
- ds_cond_smpis00500.setColumn(0, "code", ""); // 검색할 수가코드
- }
- }
- else
- {
- var irow = ds_list2_clod.rowposition;
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
-
- if (!utlf_isNull(pid))
- {
- ds_cond_smpis00500.setColumn(0, "patunitsrch", ds_main_item1_clbs.getColumn(0, "pid"));
- if (ioflag == "O")
- {
- ds_cond_smpis00500.setColumn(0, "fromdd" , ds_main_item1_clbs.getColumn(0, "indd"));
- ds_cond_smpis00500.setColumn(0, "todd" , ds_main_item1_clbs.getColumn(0, "dschdd"));
- ds_cond_smpis00500.setColumn(0, "orddrid" , "");
-
- if (ds_main_item1_clbs.getColumn(0, "stsioflag") == "-")
- {
- ds_cond_smpis00500.setColumn(0, "ioflag", "O");
- }
- else
- {
- ds_cond_smpis00500.setColumn(0, "ioflag", "I");
- }
- }
- else
- {
- ds_cond_smpis00500.setColumn(0, "fromdd" , ds_main_item1_clbs.getColumn(0, "ordfromdd"));
- ds_cond_smpis00500.setColumn(0, "todd" , ds_main_item1_clbs.getColumn(0, "ordtodd"));
- ds_cond_smpis00500.setColumn(0, "orddrid" , ds_main_item1_clbs.getColumn(0, "orddrid"));
- ds_cond_smpis00500.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- }
-
- ds_cond_smpis00500.setColumn(0, "orddeptcd" , "-");
- ds_cond_smpis00500.setColumn(0, "orddrid" , "-");
- ds_cond_smpis00500.setColumn(0, "codecond" , "calc"); // calc:코드별, cancer:항암제, kind:분류별
-
- if (codetype == "SnglCD")
- {
- ds_cond_smpis00500.setColumn(0, "code" , ds_list2_clod.getColumn(irow, "snglcalcscorcd"));
- }
- else
- {
- ds_cond_smpis00500.setColumn(0, "edicd" , ds_list2_clod.getColumn(irow, "edicd")); // 검색할 EDI코드
- }
- }
- }
-
- var objArg = new Object();
- objArg.arg_ds_send = ds_cond_smpis00500;
-
- frmf_modal("SMPIS00500", "SMPIS00500", objArg, "", "", "", "", "", "", "", "", "", "M");
- }
- /****************************************************************************************
- * Argument :
- * Description : 처방 항목 구분 및 선별심사 처방 색깔 구분
- ****************************************************************************************/
- function lf_fSetOrderData()
- {
- var colorExpr = "";
- var bgExpr1 = "";
- var bgExpr2 = "";
-
- for ( var i = 1 ; i < grp_biz.grd_clodhist.getCellCount('Body'); i++ )
- {
- // 3-1. 필수심사
- colorExpr = "EXPR( surecdyn == 'Y' ? '#0000ff' : (spcljudgyn == 'Y' ? '#ff3333' : 'default'))";
- grp_biz.grd_clodhist.setCellProperty('Body', i, "color", colorExpr);
- var backExpr = "EXPR( erroramtyn == 'Y' ? '#ffff9c' : 'default')";
- grp_biz.grd_clodhist.setCellProperty('Body', i, "background" , "");
- grp_biz.grd_clodhist.setCellProperty('Body', i, "background2" , "");
- grp_biz.grd_clodhist.setCellProperty('Body', i, "background" , backExpr);
- grp_biz.grd_clodhist.setCellProperty('Body', i, "background2", backExpr);
- }
-
- var backExpr3 = "EXPR( !utlf_isNull(adjtresncd) && adjtresncd != '-' ? '#cece9c' : (erroramtyn == 'Y' ? '#ffff9c' : 'default'))"
- grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body',"adjtresncd"), "background" , "");
- grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body',"adjtresncd"), "background2" , "");
- grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body',"adjtresncd"), "background" , backExpr3); // 사유
- grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body',"adjtresncd"), "background2", backExpr3); // 사유
-
- var backExpr4 = "EXPR( payflag == '1' ? '#00FF00' : payflag == '2' ? '#ff00ff' : 'default')"
- grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body',"payflag"), "background" , "");
- grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body',"payflag"), "background2" , "");
- grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body',"payflag"), "background" , backExpr4); // 급비
- grp_biz.grd_clodhist.setCellProperty('Body', grp_biz.grd_clodhist.getBindCellIndex('body',"payflag"), "background2", backExpr4); // 급비
- lf_fSetItemBold();
- }
- /****************************************************************************************
- * Argument :
- * Description : 항목구분 색표시
- ****************************************************************************************/
- function lf_fSetItemBold()
- {
- // 초기화
- for (var i = 0; i < ds_init_ordfilflag.rowcount; i++)
- {
- ds_init_ordfilflag.setColumn(i, "color", "");
- ds_init_ordfilflag.setColumn(i, "font", "");
- }
-
- // 전체 굵게
- ds_init_ordfilflag.setColumn(0, "color", "red");
- ds_init_ordfilflag.setColumn(0, "font", "Dotum,9,bold");
- ds_list2_clod.filter("");
-
- for (var i = 0; i < ds_list2_clod.rowcount; i++)
- {
- var curitem1 = ds_list2_clod.getColumn(i, "ediitem1");
- var fItem = "-";
- switch (curitem1)
- {
- // 진찰료
- case "01":
- fItem = "01";
- break;
- // 입원
- case "02":
- fItem = "02";
- break;
- // 투약
- case "03":
- fItem = "03";
- break;
- // 주사
- case "04":
- fItem = "04";
- break;
- // 마취
- case "05":
- fItem = "05";
- break;
- // 이학
- case "06":
- fItem = "06";
- break;
- // 정신
- case "07":
- fItem = "07";
- break;
- // 수술
- case "08":
- fItem = "08";
- break;
- // 검사
- case "09":
- fItem = "09";
- break;
- // 방사
- case "10":
- fItem = "10";
- break;
- // 특수 장비
- case "SS":
- fItem = "SS";
- break;
- // A항
- case "AA":
- fItem = "AA";
- break;
- // B항
- case "BB":
- fItem = "BB";
- break;
- // D항
- case "DD":
- fItem = "DD";
- break;
- // E항
- case "EE":
- fItem = "EE";
- break;
- // 혈액투석정액
- case "ZZ":
- fItem = "ZZ";
- break;
- }
-
- var fRow = ds_init_ordfilflag.findRow("codecolumn", fItem);
- if ( fRow > -1 )
- {
- ds_init_ordfilflag.setColumn(fRow, "color", "red");
- ds_init_ordfilflag.setColumn(fRow, "font", "Dotum,9,bold");
- }
- else
- {
- ds_init_ordfilflag.setColumn(fRow, "color", "");
- ds_init_ordfilflag.setColumn(fRow, "font", "");
- }
- }
-
- // ds_hidden_list2_clodsrch.setColumn(0, "selectedRdoPay" , "0");
- // ds_hidden_list2_clodsrch.setColumn(0, "selectedRdoItem", "-");
- }
- /****************************************************************************************
- * Argument :
- * Description : TRPID20325 submit callback
- ****************************************************************************************/
- function cf_TRPID20325(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- alert("["+sSvcId+"]"+sErrorMsg);
- return;
- }
-
- ds_hidden_initclodlist_list2.copyData(ds_list2_clod);
-
- var chk_R = ds_list2_clod.lookupExpr("snglcalcscorcd=='R4351' || snglcalcscorcd=='R3131' || snglcalcscorcd=='R3141' || snglcalcscorcd=='R4361' || snglcalcscorcd=='R4519' " , "snglcalcscorcd"); // 초산 상병체크
- var patage = parseInt(ds_main_item1_clbs.getColumn(0,"patage"));
-
- var licnscnt = ds_list2_clod.lookupExpr("(item=='0101' && tims>=2) || (item=='0102' && tims>=2)","licnsno");
- var stsioflag = ds_main_item1_clbs.getColumn(0,"stsioflag");
-
- licnscnt = utlf_transNullToEmpty(licnscnt).split('/');
-
- if (utlf_transNullToEmpty(chk_R).length > 0 && (patage >= 35 || patage < 16))
- {
- lf_setAlramMessage("어린 초임부 또는 고령초임부 입니다.");
- }
-
- var holigbn = ds_rslt_aftjudgbtn.getColumn(0,"holigbn");
- var holifromdd = ds_rslt_aftjudgbtn.getColumn(0,"holifromdd");
- var holitodd = ds_rslt_aftjudgbtn.getColumn(0,"holitodd");
- var clod_snglcalcscorcd = ds_list2_clod.lookupExpr("item=='0101' || item=='0102'","snglcalcscorcd");
-
- if(holigbn == "Y" && utlf_transNullToEmpty(clod_snglcalcscorcd).length > 0)
- {
- lf_setAlramMessage("진료의가 "+holifromdd+" ~ "+holitodd+" 기간동안 해외 출장입니다. 진료의사를 변경하세요.");
- }
-
- if (lgv_ioflag == "O" ) {
- var chk_tims = ds_list2_clod.lookupExpr("(item=='0101' && tims>=2) || (item=='0102' && tims>=2)","tims");
- if(chk_tims>=2)
- {
- if (stsioflag != "E")
- {
- // 응급실 외퇴 환자가 아닌 경우에만 진찰료 횟수 체크한다. (20160828 LEJ)
- lf_setAlramMessage("진찰료 횟수가 1회 이상 입니다.");
- }
- if (chk_tims != licnscnt.length)
- {
- lf_setAlramMessage("진찰료 횟수와 면허번호 갯수가 일치하지 않습니다.");
- }
- }
-
- lf_fSetOrderData();
- }
-
- //20191021 산재 기간 타보험유형 있는지 체크
- if ( ds_main_item1_clbs.getColumn(0, "insukind") == "41" && lgv_ioflag == "O") {
- dsf_createDs("ds_send_item1_clbs_tmp");
- dsf_createDs("ds_inacdayinsukindchk");
- ds_send_item1_clbs_tmp.copyData(ds_send_item1_clbs);
-
- var ordfromddtmp = "";
- var value = "";
-
- for(var i = 0 ; i < ds_list2_clod.rowcount ; i++) {
- if(value == ds_list2_clod.getColumn(i, "ordfromdd")) continue;
- value = ds_list2_clod.getColumn(i, "ordfromdd");
-
- if(utlf_isNull(ordfromddtmp)) ordfromddtmp = value;
- else ordfromddtmp = ordfromddtmp + "','" + value;
- }
-
- ds_send_item1_clbs_tmp.setColumn(0, "ordfromdd", ordfromddtmp);
-
- oParam = {};
- oParam.id = "TRPID20325_1";
- oParam.service = "aftjudgapp.InAftJudg";
- // oParam.method = "reqGetPamDiffInsukindList";
- oParam.method = "reqGetInacDayInsukindChk";
- oParam.inds = "req=ds_send_item1_clbs_tmp";
- oParam.outds = "ds_inacdayinsukindchk=rslt";
- oParam.async = true;
- oParam.progress = false;
- oParam.callback = "cf_TRPID20325_1";
-
- tranf_submit(oParam);
- }
-
- if (lgv_ioflag == "I" ) {
- lf_fSetItemBold();
- }
- }
- function cf_TRPID20325_1(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0) return;
- if(ds_inacdayinsukindchk.getColumn(0, "chkyn") == "Y") lf_setAlramMessage("동일진료일자에 다른 보험유형이 있습니다.확인하세요.");
- }
- /****************************************************************************************
- * Argument :
- * Description : 이력조회 버튼 이벤트
- ****************************************************************************************/
- function btn_histref_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='0'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- // grp_dropdownmenu.position = "absolute 455 47 711 460";
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 환자정보 버튼 이벤트
- ****************************************************************************************/
- function btn_patinfo_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='1'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 자격정보 버튼 이벤트
- ****************************************************************************************/
- function btn_qualinfo_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- if(sysf_getUserInfo("dutplceinstcd") == "055")
- {
- ds_popup.filterstr = "case1=='2'" + '||' + "popupid == 'SMPMC08000'" ;
- }
- else
- {
- ds_popup.filterstr = "case1=='2'" + '&&' + "popupid != 'SMPMC08000'";
- }
-
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 처방조회 버튼 이벤트
- ****************************************************************************************/
- function btn_prcpref_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='3'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 투약정보 버튼 이벤트
- ****************************************************************************************/
- function btn_mediinfo_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='4'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 결과조회 버튼 이벤트
- ****************************************************************************************/
- function btn_rsltsrch_onclick(obj:Button, e:ClickEventInfo)
- {
- var cretno = ds_main_item1_clbs.getColumn(0, "cretno");
-
- if (!utlf_isNull(cretno))
- {
- var strPid = ds_main_item1_clbs.getColumn(0, "pid");
- var wndobj = frmf_findPopup("SMMMI00100");
-
- if(utlf_isNull(wndobj) == false)
- {
- wndobj.ds_reopenpop.setColumn(0, "reopenpop", "Y");
- wndobj.ds_singdata.setColumn(0, "srchpid", pid);
-
- wndobj.fInitialize_SMMMI00100(); // 초기화함수 호출
- frmf_setFocusPop("SMMMI00100");
- }
- else
- {
- ds_cond_smaer00800.setColumn(0, "srchpid", ds_main_item1_clbs.getColumn(0, "pid"));
-
- var objArg = new Object();
- objArg.arg_ds_send_singdata = ds_cond_smaer00800;
- frmf_open("SMMMI00100", "SMMMI00100", objArg, null, null, null, null, null, null, null, null, null, "M");
- }
- }
- }
- /****************************************************************************************
- * Argument : onmouseenter
- * Description : 결과조회 버튼 이벤트
- ****************************************************************************************/
- function btn_rsltsrch_onmouseenter(obj:Button, e:MouseEventInfo)
- {
- if (grp_dropdownmenu.visible == true)
- {
- grp_dropdownmenu.visible = false;
- }
- }
- /****************************************************************************************
- * Argument : onmouseenter
- * Description : 삭감처방 버튼 마우스 over
- ****************************************************************************************/
- function grp_biz_btn_redu_onmouseenter(obj:Button, e:MouseEventInfo)
- {
- if (grp_dropdownmenu.visible == true)
- {
- grp_dropdownmenu.visible = false;
- }
- }
- /****************************************************************************************
- * Argument :
- * Description : 진료비 버튼 이벤트
- ****************************************************************************************/
- function btn_ordamt_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='5'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 각종조회 버튼 이벤트
- ****************************************************************************************/
- function btn_etcref_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='6'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : emr 버튼 이벤트
- ****************************************************************************************/
- function btn_emr_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='7'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 응급실정보 버튼 이벤트
- ****************************************************************************************/
- function btn_erroomref_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='8'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 이식정보 버튼 이벤트
- ****************************************************************************************/
- function btn_trnptinforef_onlbuttondown(obj:Button, e:MouseEventInfo)
- {
- ds_popup.filterstr = "case1=='9'";
- ds_popup.rowposition = -1;
- grp_dropdownmenu.caption00.text = obj.text;
- grp_dropdownmenu.position.left = obj.position.left;
- grp_dropdownmenu.position.top = 47;
- grp_dropdownmenu.position.bottom = 460;
- grp_dropdownmenu.position.right = obj.position.left+256;
- grp_dropdownmenu.visible = true;
- }
- /****************************************************************************************
- * Argument :
- * Description : 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_img_msg_onclick(obj:Button, e:ClickEventInfo)
- {
- if (ds_main_item1_clbs.getColumn(0, "pid") != " " && ds_main_item1_clbs.getColumn(0, "pid") != "-" &&!utlf_isNull(ds_main_item1_clbs.getColumn(0, "pid")))
- {
- lf_fJudgPatMsgTrsmRef();
- }
- }
- /****************************************************************************************
- * Argument :
- * Description : 메세지 현황 modal 호출
- ****************************************************************************************/
- function lf_fJudgPatMsgTrsmRef()
- {
- var pid = ds_main_item1_clbs.getColumn(0, "pid"); // 메세지 현황에 등록번호반환
-
- var objArg = new Object();
-
- objArg.sPid = pid;
- frmf_open("SMPIJ02600","SMPIJ02600",objArg,"","","","","","","","","","M");
- }
- /****************************************************************************************
- * Argument :
- * Description : 등록번호 조회 editbox keydown 이벤트
- ****************************************************************************************/
- function grp_biz_grp_sea00_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
- {
- if (e.keycode == 13)
- {
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym"); // 청구일자
- var clamdg = ds_main_item1_clbs.getColumn(0, "clamdg"); // 청구일자
- var oldpid = ds_main_item1_clbs.getColumn(0, "pid");
- var ioflag = ds_main_item1_clbs.getColumn(0, "ioflag");
-
- if(!utlf_isNull(obj.value) && !utlf_isNull(obj.text))
- {
- obj.updateToDataset();
- }
-
- var newpid = obj.value;
-
- if ( newpid == oldpid)
- {
- return;
- }
- else
- {
- if(ioflag == "I")
- {
- fGetInAftJudgTrgtManPidSrch();
- }
- else
- {
- lf_fGetOutAftJudgTrgtManPidSrch();
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 상병이력 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_diagHist_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_fGetDiagHistList();
- }
- /****************************************************************************************
- * Argument :
- * Description : 특정 환자에 대한 상병이력을 조회한다.
- ****************************************************************************************/
- function lf_fGetDiagHistList()
- {
- ds_hidden_smpiz00100_rslt.clearData();
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
-
- if (!utlf_isNull(clamym))
- {
- // 조회된 심사대상자가 있으면
- // 심사대상자의 등록번호를 조건으로 하여 전체 청구 상병이력을 조회한다.
- var smpiz00100 = new Object();
- smpiz00100.sPid = ds_main_item1_clbs.getColumn(0, "pid");
- smpiz00100.sIoflag = "-";
-
- var rtnDs = frmf_modal("SMPIZ00100", "SMPIZ00100", smpiz00100, "", "", "", "", "", "", "", "", "", "M");
-
- for ( var i = 0; i < ds_hidden_smpiz00100_rslt.rowcount; i++)
- {
- var diagcd = ds_hidden_smpiz00100_rslt.getColumn(i, "diagcd");
- var isSame = false;
-
- for (var j = 0; j < ds_list1_cldi.rowcount; j++)
- {
- if(diagcd == ds_list1_cldi.getColumn(j, "diagcd"))
- {
- // 동일한 상병이 존재하는 경우
- isSame = true;
- j = ds_list1_cldi.rowcount;
- }
- }
- if (isSame == false)
- {
- // 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
- var rRow = lf_fDiagGridAddRow();
- ds_list1_cldi.setColumn(rRow, "diagkindcd", ds_hidden_smpiz00100_rslt.getColumn(i, "diagkindcd"));
- ds_list1_cldi.setColumn(rRow, "diagseq" , rRow + 1);
- ds_list1_cldi.setColumn(rRow, "diagcd" , diagcd);
- ds_list1_cldi.setColumn(rRow, "diagnm" , ds_hidden_smpiz00100_rslt.getColumn(i, "diaghngnm"));
- ds_list1_cldi.setColumn(rRow, "diagengnm" , ds_hidden_smpiz00100_rslt.getColumn(i, "diagengnm"));
- // 20100308 특정내역 조회 추가
- ds_list1_cldi.setColumn(ds_list1_cldi.rowposition, "vcode", lf_fGetDiagVcode(diagcd));
- // 20100329 MT002 입력체크
- if (ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "diagseq") == "1" && !utlf_isNull(ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "vcode")))
- {
- lf_fSetDiagMT002(ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "vcode"));
- }
-
- var frow = ds_lglydisinfo.findRowExpr("fromdiag<='" + diagcd + "' && todiag>='" + diagcd + "'");
- if (frow > -1){
- lf_setAlramMessage("상병코드: " + diagcd + " 법정전염병 상병입니다. 확인하십시오.");
- }
- }
- }
- lf_fSortDiagNo(true);
- lf_fDiagGridAddRow();
- }
- }
- /****************************************************************************************
- * Argument :
- * Description : 상병row MT002 입력
- ****************************************************************************************/
- function lf_fSetDiagMT002(incode)
- {
- var gridrowstatus = "";
- var existsyn = "N";
- var vcode = "";
- if (utlf_isNull(incode))
- {
- vcode = ds_list1_cldi.lookupExpr("diagseq=='1' && !utlf_isNull(vcode) && diagkindcd != 'R'", "vcode");
- }
- else
- {
- vcode = incode;
- }
- if (!utlf_isNull(vcode))
- {
- var spclcdMT002 = ds_list3_clsp.lookupExpr("spclcd=='MT002' && spclspec=='"+vcode+"' && ds_list1_cldi.getRowType(currow) != 8", "spclcd");
- var spclcdCT002 = ds_list3_clsp.lookupExpr("spclcd=='CT002' && spclspec=='"+vcode+"' && ds_list1_cldi.getRowType(currow) != 8", "spclcd");
- if (utlf_transNullToEmpty(spclcdMT002).length > 0 || utlf_transNullToEmpty(spclcdCT002).length > 0)
- {
- existsyn = "Y";
- }
-
- if ( existsyn != "Y" )
- {
- var ans;
- var tmpspclcd;
- var snglcalcscorcdcnt = ds_list7_clop.rowcount; //원외청방수
-
- if (vcode == "V252"||vcode == "V352")
- {
- tmpspclcd = "CT002";
-
- if (snglcalcscorcdcnt > 0)
- {
- ans = sysf_messageBox( vcode + " 상병입니다.\n\n"+ tmpspclcd + "특정내역을 \n\n"+ "입력", "S001");
- }
- }
- else
- {
- tmpspclcd = "MT002";
- ans = sysf_messageBox( vcode + " 상병입니다.\n\n"+ tmpspclcd + "특정내역을 \n\n"+ "입력", "S001");
- }
-
- if ( ans == 6 )
- {
- var clsprow = lf_fSpclGridInsertRow();
-
- if (vcode == "V252"||vcode == "V352")
- {
- var clopdd = ds_list7_clop.getColumn(0, "clopdd");
- var clopno = ds_list7_clop.getColumn(0, "clopno");
- if (snglcalcscorcdcnt > 0)
- {
- ds_list3_clsp.setColumn(clsprow, "mpsno", clopdd + "" + clopno);
- }
- ds_list3_clsp.setColumn(clsprow, "unitflag", "C");
- }
- else
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag", "M");
- }
- ds_list3_clsp.setColumn(clsprow, "spclcd", tmpspclcd);
- ds_list3_clsp.setColumn(clsprow, "edilnno", 0);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", "-");
- ds_list3_clsp.setColumn(clsprow, "cdnm" , "특정기호");
- ds_list3_clsp.setColumn(clsprow, "spclspec" , vcode);
- ds_list3_clsp.setColumn(clsprow, "spclformat" , "X(4)");
- ds_list3_clsp.setColumn(clsprow, "detldesc" , "");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno" , "");
- ds_list3_clsp.setColumn(clsprow, "clodseqno" , "");
-
- lf_fSortSpclNo();
- }
- }
- }
- }
- /****************************************************************************************
- * Argument :
- * Description : 특정그리드 sort
- ****************************************************************************************/
- function lf_fSortSpclNo()
- {
- if ( ds_list3_clsp.rowcount > 0)
- {
- for(var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- var rowstatus = ds_list3_clsp.getRowType(j);
- var spclcd = ds_list3_clsp.getColumn(j, "spclcd");
- var spclspec = ds_list3_clsp.getColumn(j, "spclspec");
-
- if ( rowstatus != 8 && utlf_isNull(spclcd) && utlf_isNull(spclspec))
- {
- ds_list3_clsp.deleteRow(j);
- }
- else
- {
- for ( var i = 0 ; i < grp_biz.swt_spclmemo.case_spclspec.grd_clsphist.getCellCount("Body"); i++ )
- {
- colorExpr = "EXPR( spclcd == 'JS010' && lf_js010chk(spclspec) ? '#ff3333' : '#ff3333'";
- grp_biz.swt_spclmemo.case_spclspec.grd_clsphist.setCellProperty('Body', i, "color", colorExpr);
- }
- }
- }
- ds_list3_clsp.keystring = "S:+clsoyn-unitflag+spclcd+edilnno";
- grp_biz.swt_spclmemo.case_spclspec.grd_clsphist.updateToDataset();
-
- }
- else
- {
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 상병조회 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_diagSrch_onclick(obj:Button, e:ClickEventInfo)
- {
- // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출
- lf_fSearchSPPIZ00400();
- // [SPPIZ00400_상병코드조회.xrw 에서 호출] 상병코드조회 팝업에서 선택한 상병을 상병 그리드에 반영
- lf_fSortDiagNo(true);
- }
- /****************************************************************************************
- * Argument : function
- * Description : 상병조회 버튼 실행 함수
- ****************************************************************************************/
- function lf_fSearchSPPIZ00400()
- {
- var sppiz00400 = new Object();
- sppiz00400.sSelectedrdodiagkind = "1";
- sppiz00400.sSingleFlag = "";
- sppiz00400.sDiagcd = ds_list1_cldi.getColumn(ds_list1_cldi.rowposition, "diagcd");
- sppiz00400.sDiagnm = "";
-
- var objArg = frmf_modal("SPPIZ00400", "SPPIZ00400", sppiz00400, "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(objArg))
- {
- ds_rslt_sppiz00400.clearData();
- ds_rslt_sppiz00400.addRow();
- ds_rslt_sppiz00400.setColumn(0, "diagcd" , objArg.sDiagcd);
- ds_rslt_sppiz00400.setColumn(0, "diaghngnm" , objArg.sDiagnm);
- ds_rslt_sppiz00400.setColumn(0, "diagengnm" , objArg.sDiagengnm);
-
- lf_fSetDiagCdNm();
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 상병코드 PopUp 반영
- ****************************************************************************************/
- function lf_fSetDiagCdNm()
- {
- var row = ds_list1_cldi.rowposition;
- var diagcd = ds_rslt_sppiz00400.getColumn(0, "diagcd");
- var diaghngnm = ds_rslt_sppiz00400.getColumn(0, "diaghngnm");
- var diagengnm = ds_rslt_sppiz00400.getColumn(0, "diagengnm");
- if (row > -1)
- {
- ds_list1_cldi.setColumn(row, "diagcd" , diagcd);
- ds_list1_cldi.setColumn(row, "diagnm" , diaghngnm);
- ds_list1_cldi.setColumn(row, "diagengnm" , diagengnm);
- }
- else
- {
- var iRow = ds_list1_cldi.insertRow(0);
- ds_list1_cldi.setColumn(iRow, "diagcd" , diagcd);
- ds_list1_cldi.setColumn(iRow, "diagnm" , diaghngnm);
- ds_list1_cldi.setColumn(iRow, "diagengnm" , diagengnm);
- row = iRow;
- }
- ds_hidden_list3.setColumn(0, "msgspclformat", "상병코드 - " + diagcd + " / " + diaghngnm + " / " + diagengnm);
- ds_list1_cldi.setColumn(row, "vcode", lf_fGetDiagVcode(diagcd));
- if ( ds_list1_cldi.getColumn(row, "diagseq") == "1" && !utlf_isNull(ds_list1_cldi.getColumn(row, "vcode")))
- {
- lf_fSetDiagMT002(ds_list1_cldi.getColumn(row, "vcode"));
- }
- var addval1 = ds_list1_cldi.getColumn(row, "rowstat");
- var addval2 = ds_list1_cldi.getRowType(row);
- var rowstatus = ds_list1_cldi.getRowType(row);
- if (rowstatus != 2 )
- {
- ds_list1_cldi.updatecontrol = false;
- ds_list1_cldi.setRowType(row, 'u');
- ds_list1_cldi.updatecontrol = true;
- }
-
- var frow = ds_lglydisinfo.findRowExpr("fromdiag<='" + diagcd + "' && todiag>='" + diagcd + "'");
- if (frow > -1){
- lf_setAlramMessage("상병코드: " + diagcd + " 법정전염병 상병입니다. 확인하십시오.");
- }
-
- if (utlf_isNull(addval1) && addval2 == 2 )
- {
- lf_fDiagGridInsertRow("Y", "N");
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 상병코드로 특정기호 조회
- ****************************************************************************************/
- function lf_fGetDiagVcode(diagcd)
- {
- var vcode = "";
- var spclcd = "";
- var spclspec = "";
- var gridrowstatus = "";
- var existsyn = "N";
-
- ds_cond_getvcode.clearData();
- ds_cond_getvcode.addRow();
-
- ds_cond_getvcode.setColumn(0, "diagcd" , diagcd);
- ds_cond_getvcode.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_cond_getvcode.setColumn(0, "insukind" , ds_main_item1_clbs.getColumn(0, "insukindcd"));
- ds_cond_getvcode.setColumn(0, "suppkind" , ds_main_item1_clbs.getColumn(0, "suppkindcd"));
- ds_cond_getvcode.setColumn(0, "ordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
- var oParam = {};
- oParam.id = "TRPID20313";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetDiagcdVcode";
- oParam.inds = "req=ds_cond_getvcode";
- oParam.outds = "ds_cond_getvcode=cond ds_rslt_getvcode=rslt";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20313";
- tranf_submit(oParam);
-
- vcode = ds_rslt_getvcode.getColumn(0, "vcode");
-
- return vcode;
- }
- /****************************************************************************************
- * Argument : oncelldbclick
- * Description : 상병 grid 더블 클릭 이벤트
- ****************************************************************************************/
- function grp_biz_grd_cldihist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
- {
- var col = e.col;
-
- if ( col == obj.getBindCellIndex("body", "diagnm"))
- {
- lf_fSearchSPPIZ00400();
-
- lf_fSortDiagNo(true);
- }
- else if ( col == obj.getBindCellIndex("body", "toot1") )
- {
- lf_fDiagOrderToothInput("Diag");
- }
- }
- /****************************************************************************************
- * Argument : modal
- * Description : SPPIZ00600_상병및처방별치식 modal 호출
- ****************************************************************************************/
- function lf_fDiagOrderToothInput(flag)
- {
- if (flag == "Diag")
- {
- var row = ds_list1_cldi.rowposition;
- var diagcd = ds_list1_cldi.getColumn(row, "diagcd");
-
- if (!utlf_isNull(diagcd))
- {
- ds_cond_sppiz00600.clearData();
- ds_cond_sppiz00600.addRow();
- ds_cond_sppiz00600.setColumn(0, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_cond_sppiz00600.setColumn(0, "clamdg", ds_main_item1_clbs.getColumn(0, "clamdg"));
- ds_cond_sppiz00600.setColumn(0, "pid" , ds_main_item1_clbs.getColumn(0, "pid"));
- ds_cond_sppiz00600.setColumn(0, "pidsn" , ds_main_item1_clbs.getColumn(0, "pidsn"));
- ds_cond_sppiz00600.setColumn(0, "indd" , ds_main_item1_clbs.getColumn(0, "indd"));
- ds_cond_sppiz00600.setColumn(0, "cretno", ds_main_item1_clbs.getColumn(0, "cretno"));
- ds_cond_sppiz00600.setColumn(0, "toot" , ds_list1_cldi.getColumn(row, "toot"));
-
- ds_cond_sppiz00600_toothapplist.clearData();
- lf_fSetToothPop(row, "1");
-
- ds_rslt_sppiz00600.clearData();
- ds_rslt_sppiz00600.addRow();
-
- var rtn = frmf_modal("SPPIZ00600","SPPIZ00600", {objDs:ds_cond_sppiz00600, objDs2:ds_cond_sppiz00600_toothapplist},"", "", "", "", "", "", "", "", "", "M");
-
- lf_fGetToothPop();
- }
- }
- else if (flag == "Order")
- {
- var row = ds_list2_clod.rowposition;
- var edilnno = ds_list2_clod.getColumn(row, "edilnno");
-
- if (!utlf_isNull(edilnno))
- {
- ds_cond_sppiz00600.clearData();
- ds_cond_sppiz00600.addRow();
- ds_cond_sppiz00600.setColumn(0, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_cond_sppiz00600.setColumn(0, "clamdg", ds_main_item1_clbs.getColumn(0, "clamdg"));
- ds_cond_sppiz00600.setColumn(0, "pid" , ds_main_item1_clbs.getColumn(0, "pid"));
- ds_cond_sppiz00600.setColumn(0, "pidsn" , ds_main_item1_clbs.getColumn(0, "pidsn"));
- ds_cond_sppiz00600.setColumn(0, "indd" , ds_main_item1_clbs.getColumn(0, "indd"));
- ds_cond_sppiz00600.setColumn(0, "cretno", ds_main_item1_clbs.getColumn(0, "cretno"));
- ds_cond_sppiz00600.setColumn(0, "toot" , ds_list1_cldi.getColumn(row, "toot"));
-
- ds_cond_sppiz00600_toothapplist.clearData();
- lf_fSetToothPop(row, "2");
-
- var rtn = frmf_modal("SPPIZ00600","SPPIZ00600", {objDs:ds_cond_sppiz00600, objDs2:ds_cond_sppiz00600_toothapplist}, "", "", "", "", "", "", "", "", "", "M");
-
- lf_fGetToothPop();
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 현재 상병, 처방 Grid 상에서 입력상태의 치식을 팝업 화면에 전달하기 위해 리스트 형태로 만든다.
- ****************************************************************************************/
- function lf_fSetToothPop(row, flag)
- {
- var cntcldi = ds_list1_cldi.rowcount; //노드셋의 갯수 반환
- var cntclod = ds_list2_clod.rowcount; //노드셋의 갯수 반환
- var cd = "";
- var cdnm = "";
- var orddd = "";
- var toot = "";
- var rowcnt = 0;
-
- for ( var i = 0; i < cntcldi; i++)
- {
- cd = ds_list1_cldi.getColumn(i, "diagcd");
- cdnm = ds_list1_cldi.getColumn(i, "diagnm");
- orddd = ds_list1_cldi.getColumn(i, "ordfromdd");
- toot = ds_list1_cldi.getColumn(i, "toot");
- if (toot != "-" && !utlf_isNull(toot))
- {
- var milktoothstr = "ABCDE000";
- var subTootStr = "";
- for ( var inx = 0; inx < 32; inx++)
- {
- var tootnum = toot.substr(inx, 1);
-
- if (tootnum == "*"||tootnum == "!")
- {
- if (inx < 8)
- {
- subTootStr += (8 - inx);
- }
- else if (inx > 7 && inx < 16)
- {
- subTootStr += (inx - 7);
- }
- else if (inx > 15 && inx < 24)
- {
- subTootStr += (24 - inx);
- }
- else
- {
- subTootStr += (inx - 23);
- }
- }
- else if (tootnum == "#")
- {
- if (inx < 8)
- {
- subTootStr += milktoothstr.charAt(7 - inx);
- }
- else if (inx > 7 && inx < 16)
- {
- subTootStr += milktoothstr.charAt(inx - 8);
- }
- else if (inx > 15 && inx < 24)
- {
- subTootStr += milktoothstr.charAt(23 - inx);
- }
- else
- {
- subTootStr += milktoothstr.charAt(inx - 24);
- }
- }
- else
- {
- subTootStr += " ";
- }
- }
-
- rowcnt = ds_cond_sppiz00600_toothapplist.addRow();
-
- if (row == i && flag == "1")
- {
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
- }
- else
- {
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "false");
- }
-
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "상병");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", subTootStr.substr(0, 8));
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", subTootStr.substr(8, 8));
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", subTootStr.substr(16, 8));
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", subTootStr.substr(24, 8));
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", toot);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
- }
- else
- {
- if (row == i && flag == "1")
- {
- rowcnt = ds_cond_sppiz00600_toothapplist.addRow();
-
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "상병");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
- }
- }
- }
-
- for ( var i = 0; i < cntclod; i++)
- {
- cd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- cdnm = ds_list2_clod.getColumn(i, "hngnm");
- orddd = ds_list2_clod.getColumn(i, "orddd");
- toot = ds_list2_clod.getColumn(i, "toot");
- estmcls = ds_list2_clod.getColumn(i, "estmcls");
- if (toot != "-" && !utlf_isNull(toot)|| estmcls == "U")
- {
- var milktoothstr = "ABCDE000";
- var subTootStr = "";
- var tmpStr = "";
-
- for ( var inx = 0; inx < 32; inx++)
- {
- var tootnum = toot.substr(inx, 1);
- if (tootnum == "*"||tootnum == "!")
- {
- if (inx < 8)
- {
- subTootStr += (8 - inx);
- }
- else if (inx > 7 && inx < 16)
- {
- subTootStr += (inx - 7);
- }
- else if (inx > 15 && inx < 24)
- {
- subTootStr += (24 - inx);
- }
- else
- {
- subTootStr += (inx - 23);
- }
- }
- else if (tootnum == "#")
- {
- if (inx < 8)
- {
- subTootStr += milktoothstr.charAt(7 - inx);
- }
- else if (inx > 7 && inx < 16)
- {
- subTootStr += milktoothstr.charAt(inx - 8);
- }
- else if (inx > 15 && inx < 24)
- {
- subTootStr += milktoothstr.charAt(23 - inx);
- }
- else
- {
- subTootStr += milktoothstr.charAt(inx - 24);
- }
- }
- else
- {
- subTootStr += " ";
- }
- }
-
- rowcnt = ds_cond_sppiz00600_toothapplist.addRow();
- if (row == i && flag == "2")
- {
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
- }
- else
- {
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "false");
- }
-
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag" , "처방");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd" , cd);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm" , cdnm);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", subTootStr.substr(0, 8));
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper" , subTootStr.substr(8, 8));
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", subTootStr.substr(16, 8));
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower" , subTootStr.substr(24, 8));
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd" , orddd);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot" , toot);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row" , i);
- }
- else
- {
- if (row == i && flag == "2")
- {
- rowcnt = ds_cond_sppiz00600_toothapplist.addRow();
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos" , "true");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag" , "처방");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd" , cd);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm" , cdnm);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper" , "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper" , "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower" , "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower" , "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd" , orddd);
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot" , "");
- ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row" , i);
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : oncellclick
- * Description : 상병 grid 셀 클릭 이벤트
- ****************************************************************************************/
- function grp_biz_grd_cldihist_oncellclick(obj:Grid, e:GridClickEventInfo)
- {
- var row = e.row;
-
- if (row > -1)
- {
- var diagcd = utlf_transNullToEmpty(ds_list1_cldi.getColumn(row, "diagcd"));
- var diagnm = utlf_transNullToEmpty(ds_list1_cldi.getColumn(row, "diagnm"));
- var diagengnm = utlf_transNullToEmpty(ds_list1_cldi.getColumn(row, "diagengnm"));
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "상병코드 - "+ diagcd +" / "+ diagnm +" / "+ diagengnm);
- }
-
-
- if (obj.currentcol == obj.getBindCellIndex("body", "diagcd")) {
- obj.showEditor(true);
- }
- }
- /****************************************************************************************
- * Argument : onenterdown
- * Description : 상병 grid enter 클릭 이벤트
- ****************************************************************************************/
- function grp_biz_grd_cldihist_onenterdown(obj:Grid, e:GridEditEventInfo)
- {
- var col = obj.currentcol;
- var row = obj.currentrow;
-
- if (col == obj.getBindCellIndex("body", "ordfromdd"))
- {
- var ordfromdd = ds_list1_cldi.getColumn(row, "ordfromdd");
-
- if (!utlf_isValidDateTime(ordfromdd))
- {
- ds_list1_cldi.setColumn(row, "ordfromdd", ds_hidden_list1_cldi.getColumn(0, "oldordfromdd"));
- ds_list1_cldi.updatecontrol = false;
- ds_list1_cldi.setRowType(row, ds_hidden_list1_cldi.getColumn(0, "oldrowstat"));
- ds_list1_cldi.updatecontrol = true;
- }
- }
- else if (col == obj.getBindCellIndex("body", "diagcd"))
- {
- if (ds_hidden_list1_cldi.getColumn(0, "olddiagcd") != ds_list1_cldi.getColumn(row, "diagcd"))
- {
- ds_list1_cldi.setColumn(row, "diagnm", "");
- ds_list1_cldi.setColumn(row, "diagengnm", "");
- obj.updateToDataset();
- lf_fSearchDiageCode();
- obj.showEditor(true);
- }
- }
- else if (col == obj.getBindCellIndex("body", "diagseq"))
- {
- lf_fChangeDiagNo();
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 상병코드를 조회하여 해당 정보를 표시하거나 상병코드 조회용 Popup을 호출
- ****************************************************************************************/
- function lf_fSearchDiageCode()
- {
- var row = ds_list1_cldi.rowposition;
- var diagcd = ds_list1_cldi.getColumn(row, "diagcd");
-
- if (!utlf_isNull(diagcd))
- {
- var objArg = new Object();
-
- objArg.sSelectedrdodiagkind = "1";
- objArg.sDiagcd = diagcd;
- objArg.sDiagnm = "";
-
- ds_rslt_sppiz00400.clearData();
- ds_cond_sppiz00400.clearData();
-
- ds_cond_sppiz00400.addRow();
- ds_cond_sppiz00400.setColumn(0, "basedd", utlf_getCurrentDate());
- ds_cond_sppiz00400.setColumn(0, "diagcd", diagcd);
- ds_cond_sppiz00400.setColumn(0, "diagnm", "");
- ds_cond_sppiz00400.setColumn(0, "selectedrdodiagkind", "1");
- // 입력된 상병코드로 emr.mrtmicd10 테이블을 조회한다.
- var oParam = {};
- oParam.id = "TRPID20306";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetSickAndWounded";
- oParam.inds = "req=ds_cond_sppiz00400";
- oParam.outds = "ds_cond_sppiz00400=cond ds_rslt_sppiz00400=rslt";
- oParam.async = false;
- tranf_submit(oParam);
-
- var rsltList = ds_rslt_sppiz00400.rowcount;
-
- if ( rsltList == 1 )
- {
- // 조회된 결과가 1건이면
- lf_fSetDiagCdNm();
- // 다음칸에 자동 포커스 2008-11-26
- row++;
- ds_list1_cldi.rowposition = row;
- grp_biz.grd_cldihist.vscrollbar.pos = row;
- grp_biz.grd_cldihist.setCellPos(grp_biz.grd_cldihist.getBindCellIndex("body", "diagcd"));
- grp_biz.grd_cldihist.showEditor(true);
- }
- else
- {
- // 조회된 결과가 없거나 여러 건이면
- // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
- lf_fSearchSPPIZ00400();
- if ( utlf_isNull(ds_list1_cldi.getColumn(row, "diagnm")) && utlf_isNull(ds_list1_cldi.getColumn(row, "diagengnm")))
- {
- ds_list1_cldi.setColumn(row, "diagcd", ds_hidden_list1_cldi.getColumn(0, "olddiagcd"));
- ds_list1_cldi.setColumn(row, "diagnm", ds_hidden_list1_cldi.getColumn(0, "olddiagnm"));
- ds_list1_cldi.setColumn(row, "diagengnm", ds_hidden_list1_cldi.getColumn(0, "oldengnm"));
- ds_list1_cldi.setColumn(row, "kcd6chk", "N");
- ds_list1_cldi.setRowType(row, ds_hidden_list1_cldi.getColumn(0, "oldrowstat"));
- return;
- }
- else
- {
-
- row = ds_list1_cldi.rowposition;
- if ( utlf_isNull(ds_list1_cldi.getColumn(row, "diagcd")))
- {
- ds_list1_cldi.setColumn(row, "diagcd" , ds_hidden_list1_cldi.getColumn(0, "olddiagcd"));
- ds_list1_cldi.setColumn(row, "diagnm" , ds_hidden_list1_cldi.getColumn(0, "olddiagnm"));
- ds_list1_cldi.setColumn(row, "diagengnm" , ds_hidden_list1_cldi.getColumn(0, "oldengnm"));
- ds_list1_cldi.setColumn(row, "kcd6chk", "N");
- ds_list1_cldi.setRowType(row, ds_hidden_list1_cldi.getColumn(0, "oldrowstat"));
-
- return;
- }
- }
- }
- }
- else
- {
- // 상병 Grid에 상병코드를 입력하지 않고 Enter 친 경우
- // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
- lf_fSearchSPPIZ00400();
- row = ds_list1_cldi.rowposition;
-
- if ( utlf_isNull(ds_list1_cldi.getColumn(row, "diagcd")))
- {
- ds_list1_cldi.setColumn(row, "diagcd", ds_hidden_list1_cldi.getColumn(0, "olddiagcd"));
- ds_list1_cldi.setColumn(row, "diagnm", ds_hidden_list1_cldi.getColumn(0, "olddiagnm"));
- ds_list1_cldi.setColumn(row, "diagengnm", ds_hidden_list1_cldi.getColumn(0, "oldengnm"));
- ds_list1_cldi.setColumn(row, "kcd6chk", "N");
- ds_list1_cldi.setRowType(row, ds_hidden_list1_cldi.getColumn(0, "oldrowstat"));
- return;
- }
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 사용자가 입력한 숫자를 기준으로 상병순서 부여
- ****************************************************************************************/
-
- function lf_fChangeDiagNo() {
- var objds = ds_list1_cldi;
- var objgrd = grp_biz.grd_cldihist;
- var seqnm = "diagseq";
- var row = objds.rowposition;
- var iptseqno = objds.getColumn(row, seqnm)
- var destrow = objds.findRow(seqnm,iptseqno);
-
- if ( objds.getRowType(row) != 2 ) { // insert
- objds.updatecontrol = false;
- objds.setRowType(row, "u"); // update
- objds.updatecontrol = true;
- }
-
- var newseq = objds.getColumn(row, seqnm);
- var oldseq = ds_hidden_list1_cldi.getColumn(0, "oldseq");
-
- if (!utlf_isNull(newseq)) {
- // '09' 와 같은 형식으로 입력한 경우 -> 9로 처리
- newseq = parseInt(objds.getColumn(row, seqnm), 10);
-
- // 삭제상태가 아닌 중복된 번호가 있는지 체크한다.
- var sameRow = -1;
- for (var i = 0; i < objds.rowcount; i++) {
- var diagseq = objds.getColumn(i, seqnm);
- if (row != i && diagseq == newseq) {
- sameRow = i;
- i = objds.rowcount;
- }
- }
- if (sameRow > -1) {
- // 중복된 상병순서의 row가 있음
- if (newseq < oldseq) {
- // 이전보다 앞번호를 입력한 경우
- for (var j = sameRow; j < row; j++) {
- var rowstatus = objds.getRowType(j);
- if ( rowstatus != 8 ) {
- var curseq = parseInt(objds.getColumn(j, seqnm), 10);
- if ( rowstatus != 2 ) {
- if ( objds.getColumn(j, seqnm) != (curseq+1)) {
- objds.updatecontrol = false;
- objds.setRowType(j, "u");
- objds.updatecontrol = true;
- }
- }
- objds.setColumn(j, seqnm, curseq+1);
- }
- }
- } else {
- // 이전보다 뒷번호를 입력한 경우
- for (var j = row+1; j <= sameRow; j++) {
- var rowstatus = objds.getRowType(j);
- if (rowstatus != 8) {
- var curseq = parseInt(objds.getColumn(j, seqnm), 10);
- if (rowstatus != 2) {
- if (objds.getColumn(j, seqnm) != (curseq-1)) {
- objds.updatecontrol = false;
- objds.setRowType(j, "u");
- objds.updatecontrol = true;
- }
- }
- objds.setColumn(j, seqnm, curseq-1);
- }
- }
- }
-
- lf_fSortDiagNo(false);
-
- } else {
- // 중복된 상병순서의 row가 없는 경우
- lf_fSortDiagNo(false);
- }
- } else {
- // 순번을 삭제한 경우
- objds.setColumn(row, seqnm, oldseq);
- objds.updatecontrol = false;
- objds.setRowType(row, ds_hidden_list1_cldi.getColumn(0, "oldrowstat"));
- objds.updatecontrol = true;
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 상병 그리드 row 추가
- ****************************************************************************************/
- function lf_fDiagGridAddRow()
- {
- var frow = ds_list1_cldi.findRowExpr("ds_list1_cldi.getRowType(currow) != 8 && utlf_isNull(diagcd)")
-
- if (frow > -1){
- var irow = frow;
- }else {
- var irow = ds_list1_cldi.insertRow(ds_list1_cldi.rowcount);
- }
- ds_list1_cldi.setColumn(irow, "diagkindcd", "C");
- ds_list1_cldi.setColumn(irow, "diagseq", irow+1);
- var clamdeptcd = ds_list1_cldi.getColumn(0, "clamdeptcd");
-
- if (utlf_isNull(clamdeptcd))
- {
- clamdeptcd = ds_main_item1_clbs.getColumn(0, "clamdeptcd");
- }
- ds_list1_cldi.setColumn(irow, "clamdeptcd", clamdeptcd);
-
- var ordfromdd = ds_list1_cldi.getColumn(0, "ordfromdd");
-
- if (utlf_isNull(ordfromdd))
- {
- ds_list1_cldi.setColumn(irow, "ordfromdd", ordfromdd);
- }
- else
- {
- ds_list1_cldi.setColumn(irow, "ordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
- }
-
- ds_list1_cldi.setColumn(irow, "toot", "-");
- ds_list1_cldi.setColumn(irow, "vcode", "");
-
- ds_list1_cldi.clearSelect();
- ds_list1_cldi.rowposition = irow;
- ds_list1_cldi.selectRow(irow);
-
- grp_biz.grd_cldihist.setCellPos(grp_biz.grd_cldihist.getBindCellIndex("body", "diagcd"));
- grp_biz.grd_cldihist.showEditor(true);
-
- lf_fSortDiagNo(true);
-
- return irow;
- }
- /****************************************************************************************
- * Argument : radio box onitemchanged
- * Description : 특정내역 라디오 박스 이벤트
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_spclspec_rdo_unitflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
- {
- // 특정내역 Radio button
- lf_fSelectSpclRadio();
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 특정내역 라디오 박스 이벤트 함수
- ****************************************************************************************/
- function lf_fSelectSpclRadio()
- {
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
- if ( !utlf_isNull(clamym))
- {
- // 조회된 심사대상자가 있으면
- var visibleRow = 0;
- var rdounitflag = ds_hidden_list3.getColumn(0, "selectedUnitFlag");
- var chk_JT001 = grp_biz.swt_spclmemo.case_spclspec.chk_JT001.value;
-
- switch(rdounitflag)
- {
- case "-" : // 전체
-
- if (chk_JT001 == 'Y')
- {
- ds_list3_clsp.filter("spclcd != 'JT001' && spclcd != 'JX998'");
- }
- else
- {
- ds_list3_clsp.filter("");
- }
- break;
-
- case "M" : // 명세서
- ds_list3_clsp.filter("unitflag == 'M'");
- break;
- case "J" : // 줄
- ds_list3_clsp.filter("unitflag == 'J' && spclcd != 'JT001'");
- break;
- case "C" : // 처방
- ds_list3_clsp.filter("unitflag == 'C'");
- break;
- }
-
- visibleRow = ds_list3_clsp.getRowCount();
- }
- if (visibleRow == 0)
- {
- lf_fSpclGridInsertRow(); // 특정내역 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
- }
- else
- {
- //ds_list3_clsp.rowposition = 0;
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 특정내역 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
- ****************************************************************************************/
- function lf_fSpclGridInsertRow(spclcd)
- {
- var clsprow = ds_list3_clsp.addRow();
- ds_list3_clsp.setColumn(clsprow, "unitflag", "M");
- ds_list3_clsp.setColumn(clsprow, "edilnno", "0");
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N");
- ds_list3_clsp.clearSelect();
- ds_list3_clsp.rowposition = clsprow;
- ds_list3_clsp.selectRow(clsprow);
-
- return clsprow;
- }
- /****************************************************************************************
- * Argument : oncellclick
- * Description : 특정내역 Grid cell 클릭 이벤트
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_spclspec_grd_clsphist_oncellclick(obj:Grid, e:GridClickEventInfo)
- {
- var row = e.row;
- var rowstatus = ds_list3_clsp.getRowType(row);
-
- if (rowstatus == 1 || rowstatus == 4 || rowstatus == 8)
- {
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclcd"), "displaytype", "combo");
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclcd"), "edittype", "none");
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclspec"), "edittype", "normal");
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclspec"), "edittype", "textarea");
- }
- else
- {
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclcd"), "displaytype", "combo");
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclcd"), "edittype", "combo");
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclspec"), "edittype", "normal");
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclspec"), "edittype", "textarea");
-
- var unitflag = ds_list3_clsp.getColumn(row,"unitflag");
-
- if (unitflag == "J")
- {
- if (ds_list3_clsp.getColumn(row,"spclcd") == "JT001")
- {
- // 확인코드의 경우 전용 팝업창을 사용하므로 특정내역 Grid에서 수정하지 않는다.
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclcd"), "displaytype", "combo");
- obj.setCellProperty("body", obj.getBindCellIndex("body", "spclcd"), "edittype", "none");
- fds_init_P0117.filterstr = "cdid=='JT001'";
- }
- else
- {
- fds_init_P0117.filterstr = "minval == 'J' && cdid != 'JT001'";
- }
- }
- else
- {
- fds_init_P0117.filterstr = "minval == 'M' && cdid != 'MX999'";
- }
- }
-
-
- var row = e.row;
-
- if(row > -1)
- {
- var spclcd = ds_list3_clsp.getColumn(row, "spclcd");
-
- if (spclcd == "JT001")
- {
- var spclspec = ds_list3_clsp.getColumn(row, "spclspec");
- var spclformat = ds_list3_clsp.getColumn(row, "spclformat");
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "확인코드 - "+ spclcd +" / 입력코드내역 : "+ spclspec +" / 기재형식 : "+ spclformat);
- }
- else if (spclcd)
- {
- var cdnm = ds_list3_clsp.getColumn(row, "cdnm");
- var spclspec = ds_list3_clsp.getColumn(row, "spclspec");
- var spclformat = ds_list3_clsp.getColumn(row, "spclformat");
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "특정내역코드: "+ spclcd +" / 특정내역명칭: "+ cdnm +" / 기재내역: "+ spclspec +" / 기재형식: "+ spclformat);
- }
- }
- }
- /****************************************************************************************
- * Argument : oncellclick
- * Description : 특정내역 Grid enter down 이벤트
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_spclspec_grd_clsphist_onenterdown(obj:Grid, e:GridEditEventInfo)
- {
- var row = e.row;
- var newspclcd = ds_list3_clsp.getColumn(row, "spclcd");
- var newspclspec = ds_list3_clsp.getColumn(row, "spclspec");
-
- if (e.col == obj.getBindCellIndex("body", "spclcd"))
- {
- if( newspclcd == "CT001")
- {
- ds_list3_clsp.setColumn(row, "unitflag", "C");
- }
-
- var unitflag = ds_list3_clsp.getColumn(row, "unitflag");
-
- if (unitflag == "M" && !utlf_isNull(newspclcd))
- {
- if (newspclcd == "MT004" || newspclcd == "MT015" || newspclcd == "MT016")
- {
- // 중복된 특정코드가 있는지를 확인한다.
- for (var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var oth_spclcd = ds_list3_clsp.getColumn(i, "spclcd");
-
- if (row != i && newspclcd == oth_spclcd)
- {
- if (ds_list3_clsp.getRowType(i) != 8)
- {
- ds_list3_clsp.setColumn(row, "spclcd" , "");
- ds_list3_clsp.setColumn(row, "spclspec" , "");
- ds_list3_clsp.setColumn(row, "spclformat" , "");
- ds_list3_clsp.setColumn(row, "cdnm" , "");
- ds_list3_clsp.setColumn(row, "detldesc" , "");
- ds_hidden_list3.setColumn(0, "msgspclformat", "명세서 단위 특정코드 '"+ newspclcd +"'가 중복되었습니다.");
-
- return;
- }
- }
- }
- }
- // MT018:본인부담코드 변경시 clbs-ownbflag도 변경해줌
- if (newspclcd == "MT018" && !utlf_isNull(newspclspec))
- {
- ds_main_item1_clbs.setColumn(0, "ownbflag", newspclspec);
- }
-
- // 특정코드 MT015, MT016, MT004 정보가 입력된 환자인지를 확인한다.
- lf_fCheckSpclSpecData();
- }
- else
- { // 줄단위
- if (newspclcd == "JX999" || newspclcd == "JT001")
- {
- // 중복된 특정코드가 있는지를 확인한다.
- var spclLnNo = ds_list3_clsp.getColumn(row, "edilnno");
-
- for (var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var oth_spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var oth_spclLnNo = ds_list3_clsp.getColumn(i, "edilnno");
-
- if (spclLnNo == oth_spclLnNo && row != i && newspclcd == oth_spclcd)
- {
- if (ds_list3_clsp.getRowType(i) != 8)
- {
- ds_list3_clsp.setColumn(row, "spclcd" , "");
- ds_list3_clsp.setColumn(row, "spclspec" , "");
- ds_list3_clsp.setColumn(row, "spclformat" , "");
- ds_list3_clsp.setColumn(row, "cdnm" , "");
- ds_list3_clsp.setColumn(row, "detldesc" , "");
- ds_hidden_list3.setColumn(0, "msgspclformat", "줄번호 "+ spclLnNo +"의 줄단위 특정코드 '"+ newspclcd +"'가 중복되었습니다.");
-
- return;
- }
- }
- }
- }
-
- if (newspclcd == "JS010")
- { // JS010 야간가산
- for ( var i = 0 ; i < obj.getCellCount('Body'); i++ )
- {
- // ff3333=붉은색
- colorExpr = "EXPR( spclcd == 'JS010' && lf_js010chk(spclspec) ? '#ff3333' : ''";
- grp_biz.swt_spclmemo.case_spclspec.grd_clsphist.setCellProperty('Body', i, "color", colorExpr);
- }
- } // if (newspclcd == "JS010")
- } // if (unitflag == "M" && newspclcd != "") 가 아닌 경우
-
- if(!utlf_isNull(newspclcd))
- {
- var nRow = ds_init_P0117.findRow("cdid", newspclcd);
- var format = ds_init_P0117.getColumn(nRow, "cdval");
- var detldesc = ds_init_P0117.getColumn(nRow, "detldesc");
- ds_list3_clsp.setColumn(row, "spclspec", "");
- ds_list3_clsp.setColumn(row, "spclformat", format);
- ds_list3_clsp.setColumn(row, "detldesc", detldesc);
- }
-
- var rowstatus = ds_list3_clsp.getRowType(row);
- // 특정코드, 특정내역이 변경되었거나 삭제된 특정코드를 조회하여 "확인"을 선택한 경우
- if (rowstatus == 2)
- { // 1 : insert, 3 : insert & new
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(row, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- var cdnm = ds_list3_clsp.getColumn(row, "cdnm");
- var spclformat = ds_list3_clsp.getColumn(row, "spclformat");
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ cdnm +" / 내역: "+ newspclspec +" / 형식: "+ spclformat);
- }
- else
- {
- var unitflag = ds_list3_clsp.getColumn(row, "unitflag");
-
- if (unitflag == "J")
- {
- if (newspclcd == "JT001")
- {
- // JT001 확인코드
- var clsplnno = ds_list3_clsp.getColumn(row, "edilnno");
-
- for (var j = 0; j < ds_list2_clod.rowcount; j++)
- {
- var clodlnno = ds_list2_clod.getColumn(j, "edilnno");
- if (clsplnno == clodlnno)
- {
- ds_list2_clod.setColumn(j, "cnfmcd", newspclspec);
- }
- }
- if (utlf_isNull(newspclspec))
- { // 확인코드의 특정내역이 삭제된 경우임
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- var unitflag = ds_list3_clsp.getColumn(j, "unitflag");
-
- if (unitflag == "J")
- {
- var spclLnno = ds_list3_clsp.getColumn(j, "edilnno");
- var spclSpclcd = ds_list3_clsp.getColumn(j, "spclcd");
-
- if (spclLnno == clsplnno && spclSpclcd == "JT001")
- {
- var rowstatus = ds_list3_clsp.getRowType(j);
-
- if (rowstatus == 2)
- {
- ds_list3_clsp.setColumn(j, "spclcd", "");
- ds_list3_clsp.setColumn(j, "spclspec", "");
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(j, "d");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- }
- }
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 확인코드 내역이 없습니다.");
-
- lf_fSortSpclNo();
- return;
- } // if (newspclspec == "")
- } // if (newspclcd == "JT001")
- } // if (unitflag == "J")
- else if (unitflag == "M")
- {
- // MT018:본인부담코드 변경시 clbs-ownbflag도 변경해줌
- if (newspclcd == "MT018" && !utlf_isNull(newspclspec))
- {
- ds_main_item1_clbs.setColumn(0, "ownbflag", newspclspec);
- }
- }
-
- var rowstatus = ds_list3_clsp.getRowType(row);
- // 특정코드, 특정내역이 변경되었거나 삭제된 특정코드를 조회하여 "확인"을 선택한 경우
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(row, "u");
- ds_list3_clsp.updatecontrol = true;
- }
-
- var cdnm = ds_list3_clsp.getColumn(row, "cdnm");
- var spclformat = ds_list3_clsp.getColumn(row, "spclformat");
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ cdnm +" / 내역: "+ newspclspec +" / 형식: "+ spclformat);
-
- lf_fSortSpclNo();
- } // grd_clsphist.colRef("spclcd") 가 아닌 경우
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 특정코드 MT015, MT016, MT004 정보가 입력된 환자인지를 확인한다.
- ****************************************************************************************/
- function lf_fCheckSpclSpecData()
- {
- // 삭제된 상태가 아닌 소명자료 내역이 있는지 파악하여 "소명자료" Btn 색을 설정한다.
- // 특정코드 MT004 가 있는지를 파악하여 "MT004" Btn 색을 설정한다.
- var isAttachedDataList = false;
- var isMT004DataList = false;
-
- var fmt015 = ds_list3_clsp.findRowExpr("(spclcd=='MT015' || spclcd=='MT016') && ds_list3_clsp.getRowType(currow) != 8");
- var fmt004 = ds_list3_clsp.findRowExpr("spclcd=='MT004' && ds_list3_clsp.getRowType(currow) != 8");
- if (fmt015 > -1){isAttachedDataList = true;}
- if (fmt004 > -1){isMT004DataList = true;}
-
- // 소명자료 Btn
- if (isAttachedDataList)
- {
- grp_biz.btn_attData.class = "btn5";
- grp_biz.btn_attData.style.color = "#cc3333"; // cc3333=붉은색
- }
- else
- {
- grp_biz.btn_attData.class = "btn2";
- grp_biz.btn_attData.style.color = "";
- }
-
- // MT004 Btn
- if (isMT004DataList)
- {
- grp_biz.btn_mt0004.class = "btn5";
- grp_biz.btn_mt0004.style.color = "#cc3333"; // cc3333=붉은색
- }
- else
- {
- grp_biz.btn_mt0004.class = "btn2";
- grp_biz.btn_mt0004.style.color = "";
- }
-
- if (lgv_ioflag == "O") {
- var clopfrow = ds_list7_clop.findRowExpr("!utlf_isNull(snglcalcscorcd)");
- var clspfrow = ds_list3_clsp.findRowExpr("(spclcd=='CT002' && (spclspec=='V252' || spclspec=='V352' || spclspec=='V100'))");
- var clsp_spec = ds_list3_clsp.getColumn(clspfrow, "spclspec");
- if (clopfrow > -1 && clspfrow > -1) {
- grp_biz.stc_v252.text = clsp_spec;
- grp_biz.stc_v252.visible = true;
- } else {
- grp_biz.stc_v252.visible = false;
- }
- }
-
- if (lgv_ioflag == "O") {
- grp_biz.opt_fromddtm.value = String(ds_list3_clsp.lookupExpr("spclcd=='MS005' && ds_list3_clsp.getRowType(currow) != 8","spclspec")).split("/")[0];
- grp_biz.opt_toddtm.value = String(ds_list3_clsp.lookupExpr("spclcd=='MS005' && ds_list3_clsp.getRowType(currow) != 8","spclspec")).split("/")[1];
- } else {
- grp_sea00.opt_fromddtm.value = String(ds_list3_clsp.lookupExpr("spclcd=='MS005' && ds_list3_clsp.getRowType(currow) != 8","spclspec")).split("/")[0];
- grp_sea00.opt_toddtm.value = String(ds_list3_clsp.lookupExpr("spclcd=='MS005' && ds_list3_clsp.getRowType(currow) != 8","spclspec")).split("/")[1];
- }
- }
- /****************************************************************************************
- * Argument : onrbuttondown
- * Description : 특정내역 그리드 마우스 오른쪽 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_spclspec_grd_clsphist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
- {
- if (e.col != obj.getBindCellIndex("body","spclspec")) {
- if(!grdf_setSelectedCell(obj, e)) return;
- lf_grd_clsphist.trackPopup(e.screenX,e.screenY);
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 특정내역 그리드 마우스 오른쪽 버튼 함수 선언
- ****************************************************************************************/
- function lf_grd_clsphist_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
- {
- if (e.id == "lf_fSpclGridInsertRow")
- {
- lf_fSpclGridInsertRow(); // 행 삽입
- }
- else if (e.id == "lf_fSpclGridDeleteRow")
- {
- lf_fSpclGridDeleteRow(); //행 삭제
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 특정내역 그리드 마우스 오른쪽 버튼 행 삭제
- ****************************************************************************************/
- function lf_fSpclGridDeleteRow()
- {
- var SelectedRows = grdf_getSelectedRows(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist)
- for(var i = SelectedRows.length-1; i >= 0; i--) {
- var unitflag = ds_list3_clsp.getColumn(SelectedRows[i], "unitflag");
- var clsoyn = ds_list3_clsp.getColumn(SelectedRows[i], "clsoyn");
- var clodseqno = ds_list3_clsp.getColumn(SelectedRows[i], "clodseqno");
-
- //줄메모 삭제할 경우 처방내역의 색표시, "*" 표시도 같이 제거
- if(unitflag == "J") {
- if(clsoyn == "Y") {
- //원외
- // var cur_filter = ds_list7_clop.filterstr.current;
- // ds_list7_clop.filter("");
- // var frow = ds_list7_clop.findRowExpr("seqno=='"+clodseqno+"'");
- // while(frow > -1){
- // ds_list7_clop.setColumn(frow, "cnfmcd", "");
- // frow = ds_list7_clop.findRowExpr("seqno=='"+clodseqno+"'", frow+1);
- // }
- // ds_list7_clop.filter(cur_filter);
- } else {
- var cur_filter = ds_list2_clod.filterstr.current;
- ds_list2_clod.filter("");
- var frow = ds_list2_clod.findRowExpr("seqno=='"+clodseqno+"'");
- while(frow > -1){
- ds_list2_clod.setColumn(frow, "cnfmcd", "");
- frow = ds_list2_clod.findRowExpr("seqno=='"+clodseqno+"'", frow+1);
- }
- ds_list2_clod.filter(cur_filter);
- }
- ds_list3_clsp.setColumn(SelectedRows[i], "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(SelectedRows[i], 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(SelectedRows[i]);
-
- } else {
- //명세서메모
- ds_list3_clsp.setColumn(SelectedRows[i], "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(SelectedRows[i], 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(SelectedRows[i]);
-
- lf_fCheckSpclSpecData();
- }
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 특정내역 그리드 마우스 오른쪽 버튼 행 삭제
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_spclspec_btn_spcldetl_onclick(obj:Button, e:ClickEventInfo)
- {
- var row = ds_list3_clsp.rowposition;
- var spclcd = ds_list3_clsp.getColumn(row, "spclcd");
-
- var sppiz01400 = new Object();
- sppiz01400.sSpclcd = spclcd;
-
- ds_rslt_sppiz01400.clearData();
-
- var rtnDs = frmf_modal("SPPIZ01400", "SPPIZ01400", sppiz01400, "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(rtnDs))
- {
- ds_rslt_sppiz01400.copyData(rtnDs);
-
- // 특정내역 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
- lf_fSpclGridInsertRow();
-
- var clsprow = ds_list3_clsp.rowposition;
- ds_list3_clsp.setColumn(clsprow, "spclcd", ds_rslt_sppiz01400.getColumn(0, "spclcd"));
- ds_list3_clsp.setColumn(clsprow, "cdnm", ds_rslt_sppiz01400.getColumn(0, "cdnm"));
- ds_list3_clsp.setColumn(clsprow, "spclspec", ds_rslt_sppiz01400.getColumn(0, "spclspec"));
- ds_list3_clsp.setColumn(clsprow, "spclformat", ds_rslt_sppiz01400.getColumn(0, "spclformat"));
- ds_list3_clsp.setColumn(clsprow, "detldesc", ds_rslt_sppiz01400.getColumn(0, "detldesc"));
-
- // 특정내역 줄번호/특정코드에 따라 sorting 작업
- lf_fSortSpclNo();
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 특정내역 내역추가
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_spclspec_btn_addspec_onclick(obj:Button, e:ClickEventInfo)
- {
- var row = ds_list3_clsp.rowposition;
-
- if (row > 0)
- {
- if (ds_list3_clsp.getColumn(row, "spclcd") == "JT001")
- {
- lf_fSetCnfmCdSpclSpec();
- }
- else
- {
- lf_fSetDocRefLnSpclSpec();
- }
- }
- else
- {
- var clamkey = ds_main_item1_clbs.getColumn(0, "clamkey");
-
- if (clamkey)
- {
- var rdounitflag = ds_hidden_list3.getColumn(0, "selectedUnitFlag");
-
- if (rdounitflag == "-" || rdounitflag == "M")
- {
- lf_fSpclGridInsertRow();
- lf_fSetDocRefLnSpclSpec();
- }
- else
- {
- if(ds_list2_clod.rowposition > 0)
- {
- lf_fSetLnUnitSpclSpec(); // 'T' 필드 더블클릭시 호출한다.
- }
- else
- {
- sysf_messageBox("특정내역을 추가할 줄번호를 먼저", "C002"); ///특정내역을 추가할 줄번호를 먼저 선택하십시오.
- }
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 특정내역 더블클릭 : 확인코드 줄단위 특정내역 수정/입력 ==> SPPIZ01100_확인코드조회
- ****************************************************************************************/
- function lf_fSetCnfmCdSpclSpec()
- {
- var row = ds_list3_clsp.rowposition;
- var sppiz01100 = new Object();
- sppiz01100.sCode = ds_list3_clsp.getColumn(row, "spclspec");
- // SPPIZ01100_확인코드조회
- var rtnObj = frmf_modal("SPPIZ01100", "SPPIZ01100", sppiz01100, "", "", "", "", "", "", "", "", "", "M");
-
- //if ( !utlf_isNull(rtnObj))
- //{
- var cnfmcd = rtnObj.sCode;
- var clodseqno = ds_list3_clsp.getColumn(row, "clodseqno");
-
- for (var j = 0; j < ds_list2_clod.rowcount; j++)
- {
- var seqno = ds_list2_clod.getColumn(j, "seqno");
-
- if (seqno == clodseqno)
- {
- ds_list2_clod.setColumn(j, "cnfmcd", cnfmcd);
- j = ds_list2_clod.rowcount;
- }
- }
-
- var rowstatus = ds_list3_clsp.getRowType(row);
-
- if (!utlf_isNull(cnfmcd))
- {
- ds_list3_clsp.setColumn(row, "spclspec", cnfmcd);
- ds_hidden_list3.setColumn(0, "msgspclformat", "확인코드 - JT001 / 입력코드내역 : "+ cnfmcd +" / 기재형식 : X(5)");
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(row, 'u');
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else
- {
- if (rowstatus == 2)
- {
- ds_list3_clsp.setColumn(row, "spclcd", "");
- ds_list3_clsp.setColumn(row, "spclspec", "");
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(row, "d");
- ds_list3_clsp.updatecontrol = true;
- }
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 확인코드 내역이 없습니다.");
- }
- // 특정내역 줄번호/특정코드에 따라 sorting 작업
- lf_fSortSpclNo();
- //}
- }
- /****************************************************************************************
- * Argument : function
- * Description : 특정내역 명세서단위 특정내역을 수정/입력
- ****************************************************************************************/
- function lf_fSetDocRefLnSpclSpec()
- {
- ds_rslt_sppiz00500.clearData();
- ds_cond_sppiz00500.clearData();
- ds_cond_sppiz00500_list.clearData();
-
- var row = ds_list3_clsp.rowposition;
-
- var clodseqno = ds_list3_clsp.getColumn(row, "clodseqno");
- var edilnno = ds_list3_clsp.getColumn(row, "edilnno");
- var snglcalcscorcd = ds_list3_clsp.getColumn(row, "snglcalcscorcd");
- var unitflag = ds_list3_clsp.getColumn(row, "unitflag");
-
- if (unitflag == "J")
- {
- var rowstatus = ds_list3_clsp.getRowType(row);
-
- if (rowstatus == 8)
- {
- sysf_messageBox("삭제된 특정내역은 수정할 수", "I004"); ///삭제된 특정내역은 수정할 수 없습니다.
- return;
- }
- }
-
- var rowcnt = 0;
-
- for (var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var spcClodseqno = ds_list3_clsp.getColumn(i, "clodseqno");
- var spcClsoyn = ds_list3_clsp.getColumn(i, "clsoyn");
-
- if (spcClodseqno == clodseqno && spcClsoyn == "N")
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
-
- if (!utlf_isNull(spclcd) && spclcd != "JT001" && ds_list3_clsp.getRowType(i)!= 8)
- {
- dsf_makeValue(ds_cond_sppiz00500_list, "flag", "string", "", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "rownum", "string", i, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "snglcalcscorcd", "string", ds_list3_clsp.getColumn(i, "snglcalcscorcd"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "clodseqno", "string", ds_list3_clsp.getColumn(i, "clodseqno"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "edilnno", "string", ds_list3_clsp.getColumn(i, "edilnno"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclformat", "string", ds_list3_clsp.getColumn(i, "spclformat"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "cdnm", "string", ds_list3_clsp.getColumn(i, "cdnm"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "detldesc", "string", ds_list3_clsp.getColumn(i, "detldesc"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "oldspclcd", "string", oldspclcd, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "oldspclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "seqno", "string", ds_list3_clsp.getColumn(i, "seqno"), rowcnt);
-
- rowcnt = rowcnt+1;
- }
- }
- }
-
- dsf_makeValue(ds_cond_sppiz00500, "flag", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz00500, "clodseqno", "string", clodseqno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclcd", "string", ds_list3_clsp.getColumn(row, "spclcd"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "detldesc", "string", ds_list3_clsp.getColumn(row, "detldesc"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclspec", "string", ds_list3_clsp.getColumn(row, "spclspec"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclformat", "string", ds_list3_clsp.getColumn(row, "spclformat"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "rownum", "string", row, 0);
- dsf_makeValue(ds_cond_sppiz00500, "cdnm", "string", ds_list3_clsp.getColumn(row, "cdnm"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "unitflag", "string", unitflag, 0);
- dsf_makeValue(ds_cond_sppiz00500, "seqno", "string", ds_list3_clsp.getColumn(row, "seqno"), 0);
-
-
- var objArg = new Object();
- objArg.arg_ds_hidden_clsp = ds_cond_sppiz00500;
- objArg.arg_ds_hidden_clsp_list = ds_cond_sppiz00500_list;
-
- var rtn = frmf_modal("SPPIZ00500", "SPPIZ00500", objArg, "", "", "", "", "", "", "", "", "", "M");
- var rsltcnt = ds_rslt_sppiz00500.rowcount;
-
- if (rsltcnt > 0)
- {
- for (var i = 0; i < rsltcnt; i++)
- {
- var flag = ds_rslt_sppiz00500.getColumn(i, "flag");
- var rownum = ds_rslt_sppiz00500.getColumn(i, "rownum");
- var newspclcd = ds_rslt_sppiz00500.getColumn(i, "spclcd");
- var newcdnm = ds_rslt_sppiz00500.getColumn(i, "cdnm");
- var newspclspec = ds_rslt_sppiz00500.getColumn(i, "spclspec");
- var newspclformat = ds_rslt_sppiz00500.getColumn(i, "spclformat");
- var newdetldesc = ds_rslt_sppiz00500.getColumn(i, "detldesc");
- if (flag == "I")
- {
- var clsprow = ds_list3_clsp.addRow();
-
- if( newspclcd == "CT001")
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag", "C");
- }
- else if( newspclcd == "CT002")
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag", "C");
-
- var snglcalcscorcdcnt = ds_list7_clop.rowcount;
-
- var clopdd = ds_list7_clop.getColumn(0, "clopdd"); //model.getValue("/root/main/list7/clop[1]/clopdd");
- var clopno = ds_list7_clop.getColumn(0, "clopno"); //model.getValue("/root/main/list7/clop[1]/clopno");
-
- if (snglcalcscorcdcnt > 0)
- {
- ds_list3_clsp.setColumn(clsprow, "mpsno", clopdd + "" + clopno);
- }
- }
- else
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag", unitflag);
- }
-
- ds_list3_clsp.setColumn(clsprow, "clodseqno", clodseqno);
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", newspclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", newcdnm);
- ds_list3_clsp.setColumn(clsprow, "spclspec", newspclspec);
- ds_list3_clsp.setColumn(clsprow, "spclformat", newspclformat);
- ds_list3_clsp.setColumn(clsprow, "detldesc", newdetldesc);
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "oldspclcd", "");
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N");
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "U")
- {
- ds_list3_clsp.setColumn(rownum, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(rownum, "spclcd", newspclcd);
- ds_list3_clsp.setColumn(rownum, "cdnm", newcdnm);
- ds_list3_clsp.setColumn(rownum, "spclspec", newspclspec);
- ds_list3_clsp.setColumn(rownum, "spclformat", newspclformat);
- ds_list3_clsp.setColumn(rownum, "detldesc", newdetldesc);
-
- var oldspclcd = ds_rslt_sppiz00500.getColumn(i, "oldspclcd");
- var oldspclspec = ds_rslt_sppiz00500.getColumn(i, "oldspclspec");
-
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- var arrRow = new Array();
- arrRow[0] = rownum;
- grdf_setStatus(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, "U", arrRow);
- }
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "D" && !utlf_isNull(rownum))
- {
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if (rowstatus == 2)
- {
- ds_list3_clsp.deleteRow(rownum);
- }
- else
- {
- ds_list3_clsp.setColumn(rownum, "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rownum, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999();
- ds_list3_clsp.deleteRow(rownum);
- }
-
- ds_list3_clsp.rowposition = rownum;
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 줄단위 특정내역이 없습니다.");
- }
- }
- if (unitflag == "M")
- {
- lf_fCheckSpclSpecData();
-
- if (flag == "I" || flag == "U")
- {
- if (newspclcd == "MT018" && !utlf_isNull(newspclspec))
- {
- ds_main_item1_clbs.setColumn(0, "ownbflag", newspclspec);
- }
- }
- }
-
- lf_fSortSpclNo();
- lf_fSaveClspList();
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 특정내역 줄단위 특정내역을 수정/입력한다
- ****************************************************************************************/
- function lf_fSetLnUnitSpclSpec()
- {
- ds_cond_sppiz00500.clearData();
- ds_rslt_sppiz00500.clearData();
- ds_list_sppiz00500.clearData();
- ds_cond_sppiz00500.addRow();
-
- var row = ds_list2_clod.rowposition;
-
- // 처방 Grid에서 줄번호가 부여된 경우
- var seqno = ds_list2_clod.getColumn(row, "seqno");
- var edilnno = ds_list2_clod.getColumn(row, "edilnno");
- var snglcalcscorcd = ds_list2_clod.getColumn(row, "snglcalcscorcd");
-
- if (seqno != "0")
- {
- var lnunitspclspecyn = grp_biz.grd_clodhist.getCellText(row, grp_biz.grd_clodhist.getBindCellIndex("body", "lnunitspclspecyn"));
-
- if (utlf_isNull(lnunitspclspecyn))
- {
- ds_cond_sppiz00500.setColumn(0, "flag" , "I");
- ds_cond_sppiz00500.setColumn(0, "snglcalcscorcd" , snglcalcscorcd);
- ds_cond_sppiz00500.setColumn(0, "edilnno" , edilnno);
- ds_cond_sppiz00500.setColumn(0, "clodseqno" , seqno);
- ds_cond_sppiz00500.setColumn(0, "spclcd" , "JX999");
- ds_cond_sppiz00500.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_cond_sppiz00500.setColumn(0, "spclspec" , "");
- ds_cond_sppiz00500.setColumn(0, "spclformat" , "X(700)");
- ds_cond_sppiz00500.setColumn(0, "rownum" , "");
- ds_cond_sppiz00500.setColumn(0, "cdnm" , "기타내역");
- ds_cond_sppiz00500.setColumn(0, "unitflag" , "J");
- }
- else
- {
- //기존에 입력된 줄단위 특정내역이 있는 경우
- var rowcnt = 1;
- var setrow = 0;
-
- for ( var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var spcClodseqno = ds_list3_clsp.getColumn(i, "clodseqno");
- var spcClsoyn = ds_list3_clsp.getColumn(i, "clsoyn"); //원외특정여부
- if ( spcClodseqno == seqno && spcClsoyn == "N" )
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
-
- if (!utlf_isNull(spclcd) && spclcd != "JT001" && ds_list3_clsp.getRowType(i) != 8)
- {
- // 확인코드가 아닌 경우
- rowcnt = ds_list_sppiz00500.addRow();
- ds_list_sppiz00500.setColumn(rowcnt, "flag" , "");
- ds_list_sppiz00500.setColumn(rowcnt, "rownum" , i);
- ds_list_sppiz00500.setColumn(rowcnt, "snglcalcscorcd", ds_list3_clsp.getColumn(i, "snglcalcscorcd"));
- ds_list_sppiz00500.setColumn(rowcnt, "clodseqno" , ds_list3_clsp.getColumn(i, "clodseqno"));
- ds_list_sppiz00500.setColumn(rowcnt, "edilnno" , ds_list3_clsp.getColumn(i, "edilnno"));
- ds_list_sppiz00500.setColumn(rowcnt, "spclcd" , spclcd);
- ds_list_sppiz00500.setColumn(rowcnt, "spclspec" , ds_list3_clsp.getColumn(i, "spclspec"));
- ds_list_sppiz00500.setColumn(rowcnt, "spclformat" , ds_list3_clsp.getColumn(i, "spclformat"));
- ds_list_sppiz00500.setColumn(rowcnt, "cdnm" , ds_list3_clsp.getColumn(i, "cdnm"));
- ds_list_sppiz00500.setColumn(rowcnt, "detldesc" , ds_list3_clsp.getColumn(i, "detldesc"));
- ds_list_sppiz00500.setColumn(rowcnt, "oldspclcd" , spclcd);
- ds_list_sppiz00500.setColumn(rowcnt, "oldspclspec" , ds_list3_clsp.getColumn(i, "spclspec"));
- // 특정내역 상세 화면에 보여줄 특정내역 선택
- if ( spclcd == "JX999")
- {
- setrow = i; // 줄단위의 경우 가장 마지막 row로 설정한다.
- }
- rowcnt = rowcnt + 1;
- }
- }
- }
-
- if (setrow > 0)
- {
- ds_cond_sppiz00500.setColumn(0, "flag" , "");
- ds_cond_sppiz00500.setColumn(0, "snglcalcscorcd" , snglcalcscorcd);
- ds_cond_sppiz00500.setColumn(0, "clodseqno" , seqno);
- ds_cond_sppiz00500.setColumn(0, "edilnno" , edilnno);
- ds_cond_sppiz00500.setColumn(0, "spclcd" , ds_list3_clsp.getColumn(setrow, "spclcd"));
- ds_cond_sppiz00500.setColumn(0, "detldesc" , ds_list3_clsp.getColumn(setrow, "detldesc"));
- ds_cond_sppiz00500.setColumn(0, "spclspec" , ds_list3_clsp.getColumn(setrow, "spclspec"));
- ds_cond_sppiz00500.setColumn(0, "spclformat" , ds_list3_clsp.getColumn(setrow, "spclformat"));
- ds_cond_sppiz00500.setColumn(0, "rownum" , setrow);
- ds_cond_sppiz00500.setColumn(0, "cdnm" , ds_list3_clsp.getColumn(setrow, "cdnm"));
- ds_cond_sppiz00500.setColumn(0, "unitflag" , "J");
- }
- else
- {
- // 기존에 입력된 JX999가 없는 경우
- ds_cond_sppiz00500.setColumn(0, "flag" , "I");
- ds_cond_sppiz00500.setColumn(0, "snglcalcscorcd" , snglcalcscorcd);
- ds_cond_sppiz00500.setColumn(0, "clodseqno" , seqno);
- ds_cond_sppiz00500.setColumn(0, "edilnno" , edilnno);
- ds_cond_sppiz00500.setColumn(0, "spclcd" , "JX999");
- ds_cond_sppiz00500.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_cond_sppiz00500.setColumn(0, "spclspec" , "");
- ds_cond_sppiz00500.setColumn(0, "spclformat" , "X(700)");
- ds_cond_sppiz00500.setColumn(0, "rownum" , "");
- ds_cond_sppiz00500.setColumn(0, "cdnm" , "기타내역");
- ds_cond_sppiz00500.setColumn(0, "unitflag" , "J");
- }
- }
-
- var objArg = new Object();
- objArg.arg_ds_hidden_clsp = ds_cond_sppiz00500;
- objArg.arg_ds_hidden_clsp_list = ds_list_sppiz00500;
-
- var rtn = frmf_modal("SPPIZ00500", "SPPIZ00500", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(rtn))
- {
- ds_rslt_sppiz00500.copyData(rtn);
- }
- var rsltcnt = ds_rslt_sppiz00500.rowcount;
- // 처리 건수
- if (rsltcnt > 0)
- {
- for ( var i = rsltcnt-1; i >= 0; i--)
- {
- var flag = ds_rslt_sppiz00500.getColumn(i, "flag");
- var rownum = ds_rslt_sppiz00500.getColumn(i, "rownum");
- var newspclcd = ds_rslt_sppiz00500.getColumn(i, "spclcd");
- var newcdnm = ds_rslt_sppiz00500.getColumn(i, "cdnm");
- var newspclspec = ds_rslt_sppiz00500.getColumn(i, "spclspec");
- var newspclformat = ds_rslt_sppiz00500.getColumn(i, "spclformat");
- var newdetldesc = ds_rslt_sppiz00500.getColumn(i, "detldesc");
-
- // 특정코드 추가인 경우
- if (flag == "I")
- {
- var clsprow = ds_list3_clsp.addRow();
- ds_list3_clsp.setColumn(clsprow, "unitflag" , "J");
- ds_list3_clsp.setColumn(clsprow, "clodseqno" , seqno);
- ds_list3_clsp.setColumn(clsprow, "edilnno" , edilnno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd" , newspclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm" , newcdnm);
- ds_list3_clsp.setColumn(clsprow, "spclspec" , newspclspec);
- ds_list3_clsp.setColumn(clsprow, "spclformat" , newspclformat);
- ds_list3_clsp.setColumn(clsprow, "detldesc" , newdetldesc);
- ds_list3_clsp.setColumn(clsprow, "oldedilnno" , edilnno);
- ds_list3_clsp.setColumn(clsprow, "oldspclcd" , "");
- ds_list3_clsp.setColumn(clsprow, "clsoyn" , "N");
- ds_hidden_list3.setColumn(0, "msgspclformat" , "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "U")
- {
- ds_list3_clsp.setColumn(rownum, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(rownum, "spclcd" , newspclcd);
- ds_list3_clsp.setColumn(rownum, "cdnm" , newcdnm);
- ds_list3_clsp.setColumn(rownum, "spclspec" , newspclspec);
- ds_list3_clsp.setColumn(rownum, "spclformat" , newspclformat);
- ds_list3_clsp.setColumn(rownum, "detldesc" , newdetldesc);
-
- // 특정코드, 특정내역이 변경되었거나 삭제된 특정코드를 조회하여 "확인"을 선택한 경우
- var oldspclcd = ds_rslt_sppiz00500.getColumn(i, "oldspclcd");
- var oldspclspec = ds_rslt_sppiz00500.getColumn(i, "oldspclspec");
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rownum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- // 특정코드 삭제인 경우
- }
- else if (flag == "D" && !utlf_isNull(rownum))
- {
- // 특정내역 Grid에서 삭제
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if (rowstatus == 2)
- {
- ds_list3_clsp.deleteRow(rownum);
- }
- else
- {
- ds_list3_clsp.setColumn(rownum, "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rownum, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(rownum);
- }
- ds_list3_clsp.clearSelect();
- ds_list3_clsp.rowposition = rownum;
- ds_list3_clsp.selectRow(rownum);
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 줄단위 특정내역이 없습니다.");
- } // 특정 코드 상태 따른 if end
- } // for end
- } // 처리 건수 if end
- }
- else
- {
- sysf_messageBox("처방번호가 부여되지 않았으며 해당 줄단위 특정내역이", "I004");
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 특정내역 반송사유 버튼 이벤트
- ****************************************************************************************/
- function btn_preresncd_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_setAlramMessage( "반송_접수번호 : " + ds_main_item1_clbs.getColumn(0, "preacptno") + "\n"
- + "반송_명일련 : " + ds_main_item1_clbs.getColumn(0, "predocuno") + "\n"
- + "반송_접수일자 : " + ds_main_item1_clbs.getColumn(0, "preacptdd") + "\n"
- + "반송_사유 : " + ds_main_item1_clbs.getColumn(0, "preresncdnm") + "\n\n"
- + "수신비고 : " + ds_main_item1_clbs.getColumn(0, "preresntext") + " 입니다.");
- }
- /****************************************************************************************
- * Argument : button
- * Description : 상단 버튼 마우스 이벤트
- ****************************************************************************************/
- function btn_onmouseenter(obj:Button, e:MouseEventInfo)
- {
- if(grp_dropdownmenu.visible == true)
- {
- obj.click();
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 삭감처방 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_button3_onclick(obj:Button, e:ClickEventInfo)
- {
- if (!utlf_isNull(ds_main_item1_clbs.getColumn(0, "pid")))
- {
- ds_cond_smpis00600.setColumn(0, "openflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_cond_smpis00600.setColumn(0, "patunitsrch" , ds_main_item1_clbs.getColumn(0, "pid"));
- ds_cond_smpis00600.setColumn(0, "clamym" , "");
- ds_cond_smpis00600.setColumn(0, "clamymfrom" , ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_cond_smpis00600.setColumn(0, "clamymto" , ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_cond_smpis00600.setColumn(0, "clamflag" , ds_main_item1_clbs.getColumn(0, "clamflagcd"));
- ds_cond_smpis00600.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_cond_smpis00600.setColumn(0, "insukind" , ds_main_item1_clbs.getColumn(0, "insukindcd"));
- ds_cond_smpis00600.setColumn(0, "cutonly" , "false"); // 삭감처방만조회:true, 청구처방조회:false
- ds_cond_smpis00600.setColumn(0, "code" , "");//ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd"));
- ds_cond_smpis00600.setColumn(0, "codecond" , "N");
- ds_cond_smpis00600.setColumn(0, "trustinstcd" , "");
- ds_cond_smpis00600.setColumn(0, "clamdgfrom" , "");
- ds_cond_smpis00600.setColumn(0, "clamdgto" , "");
- ds_cond_smpis00600.setColumn(0, "orddeptcd" , "-");
- ds_cond_smpis00600.setColumn(0, "orddrid" , "-");
- }
-
- frmf_open("SMPIS00600", "SMPIS00600", {args_ds_send:ds_cond_smpis00600}, "", "", "", "", "", "", "", "", "", "M");
- }
- /****************************************************************************************
- * Argument : button
- * Description : 특정내역 MT004 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_mt0004_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_fSetSpclMT004(); // 특정내역 중 MT004 내역을 설정한다.
- }
- /****************************************************************************************
- * Argument : function
- * Description : 특정내역 중 MT004 내역을 설정한다.
- ****************************************************************************************/
- function lf_fSetSpclMT004()
- {
- var clamkey = ds_main_item1_clbs.getColumn(0, "clamkey");
- if (clamkey)
- {
- if (grp_biz.btn_mt0004.class == "btn5")
- {
- // 특정내역에 'MT004' 코드가 있는 경우 'MT004' 코드를 삭제한다.
- for ( var i = 0; i < ds_list3_clsp.rowcount; i++ )
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var gridrowstatus = ds_list3_clsp.getRowType(i);
-
- if (spclcd == "MT004" && gridrowstatus != 8)
- {
- if ( gridrowstatus == 2 )
- {
- ds_list3_clsp.setColumn(i, "spclcd", "");
- ds_list3_clsp.setColumn(i, "cdnm", "");
- ds_list3_clsp.setColumn(i, "spclspec", "");
- ds_list3_clsp.setColumn(i, "spclformat", "");
- ds_list3_clsp.setColumn(i, "detldesc", "");
- }
- else
- {
- }
- }
- }
- grp_biz.btn_mt0004.class = "btn2";
- grp_biz.btn_mt0004.style.color = "#057777ff";
- }
- else
- {
- // 특정내역에 'MT004' 코드가 없는 경우 'MT004' 코드를 추가한다.
- // 특정내역 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
- var clsprow = lf_fSpclGridInsertRow();
- ds_list3_clsp.setColumn(clsprow, "spclcd", "MT004");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "소명자료 구분");
- ds_list3_clsp.setColumn(clsprow, "spclspec", "Y");
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(1)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "소명자료를 첨부하는 경우 'Y'를 기재");
- grp_biz.btn_mt0004.class = "btn5";
- grp_biz.btn_mt0004.style.color = "#cc3333"; // cc3333=붉은색
- }
- lf_fSortSpclNo();
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 특정내역 소명자료 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_attData_onclick(obj:Button, e:ClickEventInfo)
- {
- // 특정내역 중 MT015, MT016 내역을 조회하여 "소명자료" Btn (첨부물 자료관리) Popup 화면에 표시한다.
- lf_fGetAttachedDataList();
- //lf_fSetSpclMT004();
- }
- /****************************************************************************************
- * Argument : function
- * Description : 특정내역 중 MT015, MT016 내역을 조회하여 "소명자료" Btn (첨부물 자료관리) Popup 화면에 표시한다.
- ****************************************************************************************/
- function lf_fGetAttachedDataList()
- {
- var clamkey = ds_main_item1_clbs.getColumn(0, "clamkey");
- if (!utlf_isNull(clamkey))
- {
- ds_cond_sppiz00200.clearData();
-
- for(var i=0; i < ds_list3_clsp.rowcount; i++)
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var gridrowstatus = ds_list3_clsp.getRowType(i);
-
- if (spclcd == "MT015" || spclcd == "MT016")
- {
- var index = ds_cond_sppiz00200.addRow();
- ds_cond_sppiz00200.setColumn(index, "spclcd" , ds_list3_clsp.getColumn(i, "spclcd"));
- ds_cond_sppiz00200.setColumn(index, "seqno" , ds_list3_clsp.getColumn(i, "seqno"));
- ds_cond_sppiz00200.setColumn(index, "spclspec", ds_list3_clsp.getColumn(i, "spclspec"));
- ds_cond_sppiz00200.setColumn(index, "rowstat" , gridrowstatus);
- }
- }
-
- var objArg = new Object();
- objArg.sOpenflag = "";
-
- ds_rslt_sppiz00200.clearData();
-
- var rtn = frmf_modal("SPPIZ00200", "SPPIZ00200", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(rtn))
- {
- ds_rslt_sppiz00200.copyData(rtn);
- }
- lf_fDisplayAttachedDataList();
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : "소명자료" Btn (첨부물 자료관리) Popup 화면에서 특정내역 중 MT015, MT016 정보가 입력된 환자인지를 확인한다.
- ****************************************************************************************/
- function lf_fDisplayAttachedDataList()
- {
- var isAttachedDataList = false;
- var cSrcNode = ds_rslt_sppiz00200.rowcount;
- if (cSrcNode < 0)
- {
- // 특정내역이 없는 경우임
- return;
- }
-
- var cSrcChildNodeList = ds_rslt_sppiz00200.rowcount;
- var chkstr = "";
-
- for ( var i = 0; i < cSrcChildNodeList; i++)
- {
- var spclcd = ds_rslt_sppiz00200.getColumn(i, "spclcd");
-
- if (spclcd == "MT015" || spclcd == "MT016")
- {
- var rowstat = ds_rslt_sppiz00200.getColumn(i, "rowstat");
-
- if (rowstat != "D")
- {
- var spclspec = ds_rslt_sppiz00200.getColumn(i, "spclspec");
-
- if (!utlf_isNull(spclspec))
- {
- isAttachedDataList = true;
- }
- // 특정내역 Grid 에서 해당 내용을 삽입 또는 수정한다.
- if (rowstat == "I")
- { // 삽입
- lf_fSpclGridInsertRow();
- ds_list3_clsp.setColumn(ds_list3_clsp.rowposition, "spclcd" , spclcd);
- ds_list3_clsp.setColumn(ds_list3_clsp.rowposition, "spclspec", spclspec);
-
- if (spclcd == "MT015")
- {
- ds_list3_clsp.setColumn(ds_list3_clsp.rowposition, "cdnm" , "제출자료 목록표");
- ds_list3_clsp.setColumn(ds_list3_clsp.rowposition, "spclformat", "X(2)");
- ds_list3_clsp.setColumn(ds_list3_clsp.rowposition, "detldesc" , "제출자료코드/제출자료코드/... 형태로 입력");
- }
- else
- {
- ds_list3_clsp.setColumn(ds_list3_clsp.rowposition, "cdnm" , "제출자료 목록표(기타)");
- ds_list3_clsp.setColumn(ds_list3_clsp.rowposition, "spclformat", "X(200)");
- ds_list3_clsp.setColumn(ds_list3_clsp.rowposition, "detldesc" , "영문(200자), 한글(100자)");
- }
- }
- else if (rowstat == "U")
- {// 수정
- var fRow = ds_list3_clsp.findRow("spclcd", spclcd);
- var gridrowstatus = ds_list3_clsp.getRowType(fRow);
-
- if (fRow > -1)
- {
- ds_list3_clsp.setColumn(fRow, "spclspec", spclspec);
-
- if (gridrowstatus != 2)
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(fRow, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- }
- }
- else
- { // 삭제
- // 특정내역 Grid 에서 해당 내용을 삭제한다.
- var fRow = ds_list3_clsp.findRow("spclcd", spclcd);
- var gridspclcd = ds_list3_clsp.getColumn(fRow, "spclcd");
- var gridspclspec = ds_list3_clsp.getColumn(fRow, "spclspec");
- var gridrowstatus = ds_list3_clsp.getRowType(fRow);
-
- if (fRow > -1)
- {
- if (gridrowstatus == 2)
- {
- ds_list3_clsp.setColumn(fRow, "spclcd" , "");
- ds_list3_clsp.setColumn(fRow, "spclspec", "");
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(fRow, "d");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- }
- }
- }
- // 특정내역 줄번호/특정코드에 따라 sorting 작업
- lf_fSortSpclNo();
-
- lf_fCheckSpclSpecData()
- }
- /****************************************************************************************
- * Argument : function
- * Description : 특정내역 탭 버튼 클릭 시 이벤트 : 특정내역
- ****************************************************************************************/
- var sClsphist;
- // function grp_biz_btn_spclspec_onclick(obj:Button, e:ClickEventInfo)
- // {
- // grp_biz.swt_spclmemo.position.bottom = parseInt(grp_biz.grp_sea01.position.top) - 10 ;
- //
- // var spclspecClass = grp_biz.btn_spclspec.class;
- //
- // if ( spclspecClass == "btn_tab" )
- // {
- // grp_biz.btn_spclspec.class = "btn_tab_S";
- // grp_biz.btn_judgrmemo.class = "btn_tab";
- // grp_biz.btn_ediclammemo.class = "btn_tab";
- // grp_biz.swt_spclmemo.tabindex = 0;
- // }
- // }
- /****************************************************************************************
- * Argument : function
- * Description : 특정내역 탭 버튼 클릭 시 이벤트 : edi메모
- ****************************************************************************************/
- function grp_biz_btn_ediclammemo_onclick(obj:Button, e:ClickEventInfo)
- {
- grp_biz.swt_spclmemo.position.bottom = parseInt(grp_biz.grp_sea01.position.top) - 10 ;
- var ediclammemoClass = grp_biz.btn_ediclammemo.class;
-
- if ( ediclammemoClass == "btn_tab" )
- {
- grp_biz.btn_spclspec.class = "btn_tab";
- grp_biz.btn_judgrmemo.class = "btn_tab";
- grp_biz.btn_ediclammemo.class = "btn_tab_S";
- grp_biz.swt_spclmemo.tabindex = 1;
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 특정내역 메모이력 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_memohist_onclick(obj:Button, e:ClickEventInfo)
- {
- // 특정 환자에 대해 그동안 작성된 심사자메모, 청구메모 내역을 조회한다.
- fGetMemoHistList();
- }
- /****************************************************************************************
- * Argument : button
- * Description : 특정 환자에 대해 그동안 작성된 심사자메모, 청구메모 내역을 조회한다.
- ****************************************************************************************/
-
- function fGetMemoHistList(flag)
- {
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
-
- if (clamym)
- {
- var sppiz00300 = new Object();
- sppiz00300.sClamym = clamym;
- sppiz00300.sClamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- sppiz00300.sPid = ds_main_item1_clbs.getColumn(0, "pid");
- sppiz00300.sPidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
- sppiz00300.sOrddeptcd = ds_main_item1_clbs.getColumn(0, "orddeptcd");
- sppiz00300.sIoflag = lgv_ioflag;
- sppiz00300.sRefterm = "-";
- sppiz00300.sAnofildinclyn = "";
- sppiz00300.sFromdd = ds_main_item1_clbs.getColumn(0, "indd");
- sppiz00300.sTodd = ds_main_item1_clbs.getColumn(0, "dschdd");
- sppiz00300.sOrdfildcd = ds_main_item1_clbs.getColumn(0, "ordfildcd");
- sppiz00300.sFlag = "Y";
-
- // SPPIZ00300_메모이력조회.xrw
- if (utlf_isNull(flag)) {
- var rtn = frmf_open("SPPIZ00300","SPPIZ00300",sppiz00300,"","","","","","","","","","M");
- }
- var SelectMemo = ds_rslt_sppiz00300.rowcount;
- if (SelectMemo > 0 ) {
- var choimemo = utlf_trim(ds_rslt_sppiz00300.getColumn(0, "choimemo"));
- var choiedicd = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(0, "edicd"));
- if (!utlf_isNull(choimemo)) {
- ds_rslt_sppiz00300.setColumn(0, "choimemo", choimemo);
- var destRef = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(0, "destRef"));
- if (destRef == "judgmemo") {
- var judgmemo = utlf_transNullToEmpty(ds_main_item1_memo.getColumn(0, "judgmemo"));
-
- for (var i=0; i < SelectMemo; i++){
- choimemo = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(i, "choimemo"));
- judgmemo = utlf_transNullToEmpty(ds_main_item1_memo.getColumn(0, "judgmemo"));
- ds_main_item1_memo.setColumn(0,"judgmemo", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + choimemo)
- }
-
- grp_biz.swt_spclmemo.tabindex = 1;
- } else if (destRef == "edimemo") {
- var judgmemo = ds_main_item1_memo.getColumn(0, "edimemo");
-
- for (var i=0; i < SelectMemo; i++){
- choimemo = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(i, "choimemo"));
- judgmemo = utlf_transNullToEmpty(ds_main_item1_memo.getColumn(0, "edimemo"));
- ds_main_item1_memo.setColumn(0,"edimemo", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + choimemo)
- }
-
- grp_biz.swt_spclmemo.tabindex = 2;
- }
- else if (destRef == "prcpmemo")
- {
- // 동일한 EDI 코드가 있을 경우 * 표시
- for (var i = 0; i < ds_list2_clod.rowcount; i++)
- {
- var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- var edicd = ds_list2_clod.getColumn(i, "basecd");
- var seqno = ds_list2_clod.getColumn(i, "seqno");
- var edilnno = ds_list2_clod.getColumn(i, "edilnno");
-
- if (choiedicd == edicd)
- {
- var lnunitspclspecyn = grp_biz.grd_clodhist.getCellText(i, grp_biz.grd_clodhist.getBindCellIndex("body", "lnunitspclspecyn"));
- var rowNum = "";
-
- if (lnunitspclspecyn)
- {
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- if (ds_list3_clsp.getRowType(j) != 8)
- {
- var clodseqno = ds_list3_clsp.getColumn(j, "clodseqno");
-
- if (clodseqno == seqno)
- {
- if (ds_list3_clsp.getColumn(j, "spclcd") == "JX999")
- {
- rowNum = j;
- j = ds_list3_clsp.rowcount;
- }
- }
- }
- }
- if (rowNum)
- {
- var ans = sysf_messageBox(edilnno + "번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가", "S001");
- ///***번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가 하시려면 예(Yes
- if (ans == 6)
- {
- var spclspec = ds_list3_clsp.getColumn(rowNum, "spclspec");
- ds_list3_clsp.setColumn(rowNum, "spclspec", spclspec + "\n"+ choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 7)
- {
- ds_list3_clsp.setColumn(rowNum, "spclspec", choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, 'u');
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 2)
- {
- }
- }
- else
- { // 기존에 입력된 JX999가 없는 경우
- // 'JX999' 코드를 추가한다.
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", "JX999");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "기타내역");
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(700)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N"); //원외처방여부
- lf_fSetOrderChangeRowStat(i);
- }
- }
- else
- { // 기존에 입력된 줄단위 특정내역이 없는 경우
- // 'JX999' 코드를 추가한다.
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", "JX999");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "기타내역");
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(700)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N"); //원외처방여부
- lf_fSetOrderChangeRowStat(i); // 처방의 수정된 row 상태를 표시한다.
- } // lnunitspclspecyn == ""
- } // if (choiedicd == clodedicd)
- }
- // 특정내역 줄번호/특정코드에 따라 sorting 작업
- lf_fSortSpclNo();
- //grp_biz_btn_spclspec_onclick();
- } // if (destRef == "prcpmemo")
- }
- }
- ds_rslt_sppiz00300.clearData();
- }
- }
-
- function lf_fGetMemoHistList()
- {
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
-
- if (clamym)
- {
- // 조회된 심사대상자가 있고
- ds_rslt_sppiz00300.clearData();
-
- var sppiz00300 = new Object();
- sppiz00300.sClamym = clamym;
- sppiz00300.sClamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- sppiz00300.sPid = ds_main_item1_clbs.getColumn(0, "pid");
- sppiz00300.sPidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
- sppiz00300.sOrddeptcd = ds_main_item1_clbs.getColumn(0, "orddeptcd");
- sppiz00300.sIoflag = lgv_ioflag;
- sppiz00300.sRefterm = "-";
- sppiz00300.sAnofildinclyn = "";
- sppiz00300.sFromdd = ds_main_item1_clbs.getColumn(0, "indd");
- sppiz00300.sTodd = ds_main_item1_clbs.getColumn(0, "dschdd");
- sppiz00300.sOrdfildcd = ds_main_item1_clbs.getColumn(0, "ordfildcd");
-
-
- // SPPIZ00300_메모이력조회.xrw
- frmf_modal("SPPIZ00300", "SPPIZ00300", sppiz00300, "", "", "", "", "", "", "", "", "", "M");
-
- var SelectMemo = ds_rslt_sppiz00300.rowcount;
-
- if (SelectMemo >= 0 )
- {
- for( i = 0 ; i < ds_rslt_sppiz00300.rowcount; i++)
- {
- var choimemo = utlf_trim(ds_rslt_sppiz00300.getColumn(i, "choimemo"));
- var choiedicd = ds_rslt_sppiz00300.getColumn(i, "edicd");
- var choiedilnno = ds_rslt_sppiz00300.getColumn(i, "edilnno");
- var choispclcd = ds_rslt_sppiz00300.getColumn(i, "spclcd");
-
- if (choimemo)
- {
- ds_rslt_sppiz00300.setColumn(i, "choimemo", choimemo);
- var destRef = ds_rslt_sppiz00300.getColumn(i, "destRef");
-
- if (destRef == "judgmemo")
- {
- // 심사메모로 전달
- var judgmemo = ds_main_item1_memo.getColumn(0, "judgmemo");
- var userid = sysf_getUserInfo("usernm");
- var objDate = new Date();
- var fstrgstdt;
- fstrgstdt = objDate.toFormatString("%Y%m%d%H%M%S"); // YYYYMMDD HHMMSS
-
- if (judgmemo)
- {
- // 기존 심사메모가 공백이 아닌 경우 선택된 메모를 심사화면 메모 뒤에 덧붙인다.
- var insrow = ds_list10_judgmemo.rowcount;
- var iRow = ds_list10_judgmemo.insertRow(insrow++);
- ds_list10_judgmemo.setColumn(iRow, "unitflag" , "M");
- ds_list10_judgmemo.setColumn(iRow, "spclcd" , "MX999");
- ds_list10_judgmemo.setColumn(iRow, "usermemoyn" , "Y");
- ds_list10_judgmemo.setColumn(iRow, "spclspec" , choimemo);
- ds_list10_judgmemo.setColumn(iRow, "userid" , userid);
- ds_list10_judgmemo.setColumn(iRow, "fstrgstdt" , fstrgstdt);
- }
- else
- {
- if (choiedicd)
- {
- // 처방별 메모를 전달하는 경우임
- // 동일한 EDI 코드가 있을 경우만 추가
- for (var j = 0; j < ds_list2_clod.rowcount; j++)
- {
- var clodedicd = ds_list2_clod.getColumn(j, "basecd");
-
- if (choiedicd == clodedicd)
- {
- var insrow = ds_list10_judgmemo.rowcount;
- var iRow = ds_list10_judgmemo.insertRow(insrow++);
- ds_list10_judgmemo.setColumn(iRow, "unitflag" , "M");
- ds_list10_judgmemo.setColumn(iRow, "spclcd" , "MX999");
- ds_list10_judgmemo.setColumn(iRow, "usermemoyn" , "Y");
- ds_list10_judgmemo.setColumn(iRow, "spclspec" , choimemo);
- ds_list10_judgmemo.setColumn(iRow, "userid" , userid);
- ds_list10_judgmemo.setColumn(iRow, "fstrgstdt" , fstrgstdt);
-
- j = ds_list2_clod.rowcount;
- }
- }
- }
- else
- {
- var iRow = ds_list10_judgmemo.addRow();
- ds_list10_judgmemo.setColumn(iRow, "unitflag" , "M");
- ds_list10_judgmemo.setColumn(iRow, "spclcd" , "MX999");
- ds_list10_judgmemo.setColumn(iRow, "usermemoyn" , "Y");
- ds_list10_judgmemo.setColumn(iRow, "spclspec" , choimemo);
- ds_list10_judgmemo.setColumn(iRow, "userid" , userid);
- ds_list10_judgmemo.setColumn(iRow, "fstrgstdt" , fstrgstdt);
- }
- }
- //grp_biz_btn_judgrmemo_onclick();
- grp_biz.swt_spclmemo.tabindex = 1;
- }
- else if (destRef == "edimemo")
- {
- // 청구메모로 전달
- var edimemo = utlf_trim(ds_main_item1_memo.getColumn(0, "edimemo"));
-
- if (edimemo)
- {
- // 기존 청구메모가 공백이 아닌 경우 선택된 메모를 심사화면 메모 뒤에 덧붙인다.
- var insrow = ds_list11_edimemo.rowcount;
- var iRow = ds_list11_edimemo.insertRow(insrow++);
- ds_list11_edimemo.setColumn(iRow, "unitflag", "M");
- ds_list11_edimemo.setColumn(iRow, "spclcd", "MX999");
- ds_list11_edimemo.setColumn(iRow, "usermemoyn", "N");
- ds_list11_edimemo.setColumn(iRow, "spclspec", choimemo);
- }
- else
- {
- if (choiedicd)
- {
- // 처방별 메모를 전달하는 경우임
- // 동일한 EDI 코드가 있을 경우 * 표시
- for (var j = 0; j < ds_list2_clod.rowcount; j++)
- {
- var clodedicd = ds_list2_clod.getColumn(j, "basecd");
-
- if (choiedicd == clodedicd)
- {
- var insrow = ds_list11_edimemo.rowcount;
- var iRow = ds_list11_edimemo.insertRow(insrow++);
- ds_list11_edimemo.setColumn(iRow, "unitflag", "M");
- ds_list11_edimemo.setColumn(iRow, "spclcd", "MX999");
- ds_list11_edimemo.setColumn(iRow, "usermemoyn", "N");
- ds_list11_edimemo.setColumn(iRow, "spclspec", choimemo);
-
- j = ds_list2_clod.rowcount;
- }
- }
- }
- else
- {
- var insrow = ds_list11_edimemo.rowcount;
- var iRow = ds_list11_edimemo.insertRow(insrow++);
- ds_list11_edimemo.setColumn(iRow, "unitflag", "M");
- ds_list11_edimemo.setColumn(iRow, "spclcd", "MX999");
- ds_list11_edimemo.setColumn(iRow, "usermemoyn", "N");
- ds_list11_edimemo.setColumn(iRow, "spclspec", choimemo);
- }
- }
- grp_biz_btn_ediclammemo_onclick();
- }
- else if (destRef == "prcpmemo")
- {
- // 동일한 EDI 코드가 있을 경우 * 표시
- for (var i = 0; i < ds_list2_clod.rowcount; i++)
- {
- var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- var edicd = ds_list2_clod.getColumn(i, "basecd");
- var seqno = ds_list2_clod.getColumn(i, "seqno");
- var edilnno = ds_list2_clod.getColumn(i, "edilnno");
-
- if (choiedicd == edicd)
- {
- var lnunitspclspecyn = grp_biz.grd_clodhist.getCellText(i, grp_biz.grd_clodhist.getBindCellIndex("body", "lnunitspclspecyn"));
- var rowNum = "";
-
- if (lnunitspclspecyn)
- {
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- if (ds_list3_clsp.getRowType(j) != 8)
- {
- var clodseqno = ds_list3_clsp.getColumn(j, "clodseqno");
-
- if (clodseqno == seqno)
- {
- if (ds_list3_clsp.getColumn(j, "spclcd") == "JX999")
- {
- rowNum = j;
- j = ds_list3_clsp.rowcount;
- }
- }
- }
- }
- if (rowNum)
- {
- var ans = sysf_messageBox(edilnno + "번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가", "S001");
- ///***번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가 하시려면 예(Yes
- if (ans == 6)
- {
- var spclspec = ds_list3_clsp.getColumn(rowNum, "spclspec");
- ds_list3_clsp.setColumn(rowNum, "spclspec", spclspec + "\n"+ choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 7)
- {
- ds_list3_clsp.setColumn(rowNum, "spclspec", choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, 'u');
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 2)
- {
- }
- }
- else
- { // 기존에 입력된 JX999가 없는 경우
- // 'JX999' 코드를 추가한다.
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", "JX999");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "기타내역");
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(700)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N"); //원외처방여부
- lf_fSetOrderChangeRowStat(i);
- }
- }
- else
- { // 기존에 입력된 줄단위 특정내역이 없는 경우
- // 'JX999' 코드를 추가한다.
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", "JX999");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "기타내역");
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(700)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N"); //원외처방여부
- lf_fSetOrderChangeRowStat(i); // 처방의 수정된 row 상태를 표시한다.
- } // lnunitspclspecyn == ""
- } // if (choiedicd == clodedicd)
- }
- // 특정내역 줄번호/특정코드에 따라 sorting 작업
- lf_fSortSpclNo();
- //grp_biz_btn_spclspec_onclick();
- } // if (destRef == "prcpmemo")
- else if (destRef == "dispmemo")
- {
- // 처방별 주석로 전달
- // 동일한 group 코드가 있을 경우 * 표시
- for (var i = 0; i < ds_list2_clod.rowcount; i++)
- {
- var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- var edicd = ds_list2_clod.getColumn(i, "grupcalcscorcd");
- var seqno = ds_list2_clod.getColumn(i, "seqno");
- var edilnno = ds_list2_clod.getColumn(i, "edilnno");
-
- if (choiedilnno == edilnno)
- {
- var lnunitspclspecyn = grp_biz.grd_clodhist.getCellText(i, grp_biz.grd_clodhist.getBindCellIndex("body", "lnunitspclspecyn"));
- var rowNum = "";
-
- if (lnunitspclspecyn)
- {
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- if (ds_list3_clsp.getRowType(j) != 8)
- {
- var clodseqno = ds_list3_clsp.getColumn(j, "clodseqno");
-
- if (clodseqno == seqno)
- {
- if (ds_list3_clsp.getColumn(j, "spclcd") == "JX999")
- {
- rowNum = j;
- j = ds_list3_clsp.rowcount;
- }
- }
- }
- }
- if (rowNum)
- {
- var ans = sysf_messageBox(edilnno + "번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가", "S001");
- ///***번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가 하시려면 예(Yes
- if (ans == 6)
- {
- var spclspec = ds_list3_clsp.getColumn(rowNum, "spclspec");
- ds_list3_clsp.setColumn(rowNum, "spclspec", spclspec + "\n"+ choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 7)
- {
- ds_list3_clsp.setColumn(rowNum, "spclspec", choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 2)
- { // 2:cancel
- }
- }
- else
- {
- // 'JX999' 코드를 추가한다.
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", "JX999");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "기타내역");
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(700)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N");
- }
- i = ds_list2_clod.rowcount;
- }
- else
- {
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", "JX999");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "기타내역");
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(700)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N"); //원외처방여부
-
- lf_fSetOrderChangeRowStat(i); // 처방의 수정된 row 상태를 표시한다.
- i = ds_list2_clod.rowcount;
- }
- }
- }
- lf_fSortSpclNo();
- //grp_biz_btn_spclspec_onclick();
- }
- else if (destRef == "oprcmemo")
- {
- // 원외처방 jx999 이동
- // 원외처방 동일 edi 코드가 있을 경우 * 표시
- for (var i = 0; i < ds_list7_clop.rowcount; i++)
- {
- var snglcalcscorcd = ds_list7_clop.getColumn(i, "snglcalcscorcd");
- var edicd = ds_list7_clop.getColumn(i, "edicd");
- var seqno = ds_list7_clop.getColumn(i, "seqno");
- var edilnno = ds_list7_clop.getColumn(i, "edilnno");
- var mpsno = ds_list7_clop.getColumn(i, "mpsno");
-
- if (choiedicd == edicd)
- {
- var lnunitspclspecyn = grp_biz.grd_oprcphist.getCellText(i, grp_biz.grd_oprcphist.getBindCellIndex("body", "spclspecyn"));
- var rowNum = "";
-
- if (lnunitspclspecyn)
- {
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- if (ds_list3_clsp.getRowType(j) != 8)
- {
- var clopseqno = ds_list3_clsp.getColumn(j, "clodseqno");
-
- if (clopseqno == seqno)
- {
- if (ds_list3_clsp.getColumn(j, "spclcd") == "JX999")
- {
- rowNum = j;
- j = ds_list3_clsp.rowcount;
- }
- }
- }
- }
- if (rowNum)
- {
- var ans = sysf_messageBox(edilnno + "번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가", "S001");
- ///***번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가 하시려면 예(Yes
- if (ans == 6)
- {
- var spclspec = ds_list3_clsp.getColumn(rowNum, "spclspec");
- ds_list3_clsp.setColumn(rowNum, "spclspec", spclspec + "\n"+ choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 7)
- {
- ds_list3_clsp.setColumn(rowNum, "spclspec", choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 2)
- {
- }
- }
- else
- {
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", "JX999");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "기타내역");
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(700)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "Y"); //원외처방여부
- ds_list3_clsp.setColumn(clsprow, "mpsno", mpsno); //교부번호
- // JX999 + 다른 코드도 있는 경우가 된다.
- }
- }
- else
- {
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", "JX999");
- ds_list3_clsp.setColumn(clsprow, "cdnm", "기타내역");
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", "X(700)");
- ds_list3_clsp.setColumn(clsprow, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "Y"); //원외처방여부
- ds_list3_clsp.setColumn(clsprow, "mpsno", mpsno); //교부번호
- // JX999만 있는 경우
- lf_fSetOrderChangeRowStat(i); // 처방의 수정된 row 상태를 표시한다.
- }
- }
- }
- lf_fSortSpclNo();
- //grp_biz_btn_spclspec_onclick();
- }
-
- else if (destRef == "spclmemo1")
- {
- for (var i = 0; i < ds_list2_clod.rowcount; i++)
- {
- var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- var edicd = ds_list2_clod.getColumn(i, "basecd");
- var seqno = ds_list2_clod.getColumn(i, "seqno");
- var edilnno = ds_list2_clod.getColumn(i, "edilnno");
-
- if (choiedicd == edicd)
- {
- var lnunitspclspecyn = grp_biz.grd_clodhist.getCellText(i, grp_biz.grd_clodhist.getBindCellIndex("body", "lnunitspclspecyn"));
- var rowNum = "";
-
- if (lnunitspclspecyn)
- {
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- if (ds_list3_clsp.getRowType(j) != 8)
- {
- var clodseqno = ds_list3_clsp.getColumn(j, "clodseqno");
-
- if (clodseqno == seqno)
- {
- if (ds_list3_clsp.getColumn(j, "spclcd") == choispclcd)
- {
- rowNum = j;
- j = ds_list3_clsp.rowcount;
- }
- }
- }
- }
- if (!utlf_isNull(rowNum))
- {
- var ans = sysf_messageBox(edilnno + "번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가", "S001");
- ///***번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가 하시려면 예(Yes
- if (ans == 6)
- {
- var spclspec = ds_list3_clsp.getColumn(rowNum, "spclspec");
- ds_list3_clsp.setColumn(rowNum, "spclspec", spclspec + "\n"+ choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 7)
- {
- ds_list3_clsp.setColumn(rowNum, "spclspec", choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 2)
- {
- }
- }
- else
- { // 기존에 입력된 JX999가 없는 경우
- // 'JX999' 코드를 추가한다.
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", choispclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", ds_init_P0117.lookup("cdid", choispclcd, "cdnm") );
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", ds_init_P0117.lookup("cdid", choispclcd, "cdval") );
- ds_list3_clsp.setColumn(clsprow, "detldesc", ds_init_P0117.lookup("cdid", choispclcd, "detldesc") );
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N"); //원외처방여부
- lf_fSetOrderChangeRowStat(i);
- // JX999 + 다른 코드도 있는 경우가 된다.
- // grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("lnunitspclspecyn")) = "#b5a5d1"; // 연한 보라색
- }
- }
- else
- { // 기존에 입력된 줄단위 특정내역이 없는 경우
- // 'JX999' 코드를 추가한다.
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", choispclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", ds_init_P0117.lookup("cdid", choispclcd, "cdnm") );
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", ds_init_P0117.lookup("cdid", choispclcd, "cdval") );
- ds_list3_clsp.setColumn(clsprow, "detldesc", ds_init_P0117.lookup("cdid", choispclcd, "detldesc") );
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N"); //원외처방여부
- // JX999만 있는 경우
- // grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("lnunitspclspecyn")) = "#f7a08b"; // class="color_6" 다홍색
- lf_fSetOrderChangeRowStat(i); // 처방의 수정된 row 상태를 표시한다.
- } // lnunitspclspecyn == ""
- } // if (choiedicd == clodedicd)
- }
-
- lf_fSortSpclNo();
- //grp_biz_btn_spclspec_onclick();
- }
-
- else if (destRef == "spclmemo2")
- {
- for (var i = 0; i < ds_list7_clop.rowcount; i++)
- {
- var snglcalcscorcd = ds_list7_clop.getColumn(i, "snglcalcscorcd");
- var edicd = ds_list7_clop.getColumn(i, "edicd");
- var seqno = ds_list7_clop.getColumn(i, "seqno");
- var edilnno = ds_list7_clop.getColumn(i, "edilnno");
- var mpsno = ds_list7_clop.getColumn(i, "mpsno");
-
- if (choiedicd == edicd)
- {
- var lnunitspclspecyn = grp_biz.grd_oprcphist.getCellText(i, grp_biz.grd_oprcphist.getBindCellIndex("body", "spclspecyn"));
- var rowNum = "";
-
- if (lnunitspclspecyn)
- {
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- if (ds_list3_clsp.getRowType(j) != 8)
- {
- var clopseqno = ds_list3_clsp.getColumn(j, "clodseqno");
-
- if (clopseqno == seqno)
- {
- if (ds_list3_clsp.getColumn(j, "spclcd") == choispclcd)
- {
- rowNum = j;
- j = ds_list3_clsp.rowcount;
- }
- }
- }
- }
- if (!utlf_isNull(rowNum))
- {
- var ans = sysf_messageBox(edilnno + "번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가", "S001");
- ///***번 줄에 등록된 메모가 있어 기존 내역에 덧붙이거나 삭제후 추가할 수 있습니다.\n덧붙여 추가 하시려면 예(Yes
- if (ans == 6)
- {
- var spclspec = ds_list3_clsp.getColumn(rowNum, "spclspec");
- ds_list3_clsp.setColumn(rowNum, "spclspec", spclspec + "\n"+ choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 7)
- {
- ds_list3_clsp.setColumn(rowNum, "spclspec", choimemo);
- var rowstatus = ds_list3_clsp.getRowType(rowNum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rowNum, 'u');
- ds_list3_clsp.updatecontrol = true;
- }
- }
- else if (ans == 2)
- { // 2:cancel
- }
- }
- else
- { // 기존에 입력된 JX999가 없는 경우
- // 'JX999' 코드를 추가한다.
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", choispclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", ds_init_P0117.lookup("cdid", choispclcd, "cdnm") );
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", ds_init_P0117.lookup("cdid", choispclcd, "cdval") );
- ds_list3_clsp.setColumn(clsprow, "detldesc", ds_init_P0117.lookup("cdid", choispclcd, "detldesc") );
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "Y"); //원외처방여부
- ds_list3_clsp.setColumn(clsprow, "mpsno", mpsno); //교부번호
- // JX999 + 다른 코드도 있는 경우가 된다.
- }
- }
- else
- {
- var clsprow = ds_list3_clsp.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", choispclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", ds_init_P0117.lookup("cdid", choispclcd, "cdnm") );
- ds_list3_clsp.setColumn(clsprow, "spclspec", choimemo);
- ds_list3_clsp.setColumn(clsprow, "spclformat", ds_init_P0117.lookup("cdid", choispclcd, "cdval") );
- ds_list3_clsp.setColumn(clsprow, "detldesc", ds_init_P0117.lookup("cdid", choispclcd, "detldesc") );
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "Y"); //원외처방여부
- ds_list3_clsp.setColumn(clsprow, "mpsno", mpsno); //교부번호
- // JX999만 있는 경우
- lf_fSetOrderChangeRowStat(i); // 처방의 수정된 row 상태를 표시한다.
- }
- }
- }
-
- lf_fSortSpclNo();
- //grp_biz_btn_spclspec_onclick();
- }
- } //for( i = 0 ; i < ds_rslt_sppiz00300.rowcount; i++) {
- //model.refresh();
- } // if (choimemo)
- } // if (SelectMemo != null)
- } // if (clamym)
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 처방의 수정된 row 상태를 표시한다.
- ****************************************************************************************/
- function lf_fSetOrderChangeRowStat(clodrow)
- {
- var clodstatus = ds_list2_clod.getRowType(clodrow);
-
- if ( clodstatus == 2 )
- {
- }
- else
- {
- ds_list2_clod.updatecontrol = false;
- ds_list2_clod.setRowType(clodrow, "u");
- ds_list2_clod.updatecontrol = true;
- // 처방 Grid 배경색을 설정한다. - 추가/수정된 row
- lf_fOrderBkColorNew(clodrow);
- }
- }
- /****************************************************************************************
- * Argument : onclick
- * Description : JT001 제외 체크 박스 이벤트
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_spclspec_chk_JT001_onclick(obj:CheckBox, e:ClickEventInfo)
- {
- grp_biz_swt_spclmemo_case_spclspec_rdo_unitflag_onitemchanged();
- }
- /****************************************************************************************
- * Argument : onclick
- * Description : 심사자 메모 탭 : 심사자메모
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_judgrmemo_btn_memohistory_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("1","");
-
- if( !utlf_isNull(rtn) )
- {
- ds_temp_memolist.copyData(rtn);
-
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if(utlf_isNull(oldTxt))
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
-
- ds_main_item1_memo.setColumn(0,"judgmemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : function
- * Description : SPPIZ00700_심사Comment조회.xrw 호출 modal
- ****************************************************************************************/
- function lf_fGetJudgEdiComment(memoflag, memocls)
- {
- var objArg = new Object();
- objArg.sMemocls = memocls;
- objArg.sMemoflag = memoflag;
- objArg.sEdiitem1 = "";
-
- var rtnObj = frmf_modal("SPPIZ00700","SPPIZ00700", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- return rtnObj;
- }
- /****************************************************************************************
- * Argument : button
- * Description : 심사자메모 탭 : 약 버튼
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_judgrmemo_btn_memohistory_drug_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("1","01");
- if( !utlf_isNull(rtn) )
- {
- ds_temp_memolist.copyData(rtn);
-
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if( utlf_isNull( oldTxt ) )
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
-
- ds_main_item1_memo.setColumn(0,"judgmemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : 심사자메모 탭 : 주사 버튼
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_judgrmemo_btn_memohistory_injection_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("1", "02");
- if( !utlf_isNull(rtn) )
- {
- ds_temp_memolist.copyData(rtn);
-
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if( utlf_isNull( oldTxt ) )
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"judgmemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : 심사자메모 탭 : 처치 버튼
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_judgrmemo_btn_memohistory_treat_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("1", "03");
- if( !utlf_isNull(rtn) )
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if( utlf_isNull( oldTxt ) )
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
-
- ds_main_item1_memo.setColumn(0,"judgmemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : 심사자메모 탭 : 검사 버튼
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_judgrmemo_btn_memohistory_exam_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("1", "04");
- if(!utlf_isNull(rtn))
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if( utlf_isNull( oldTxt ) )
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"judgmemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : 심사자메모 탭 : 기타 버튼
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_judgrmemo_btn_memohistory_etc_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("1", "99");
- if( !utlf_isNull(rtn) )
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if( utlf_isNull( oldTxt ) )
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"judgmemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : 심사자메모 탭 : 청구 메모로 전달
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_judgrmemo_btn_toclammemo_onclick(obj:Button, e:ClickEventInfo)
- {
- var memo = ds_main_item1_memo.getColumn(0,"edimemo");
- var judgmemo = ds_main_item1_memo.getColumn(0, "judgmemo");
-
- if (!utlf_isNull(memo))
- {
- var seletedMemo = grp_biz.swt_spclmemo.case_judgrmemo.tar_judgrmemo.getSelectedText();
- if (!utlf_isNull(seletedMemo))
- {
- memo += " \n"+ seletedMemo;
- }
- else
- {
- if (!utlf_isNull(judgmemo))
- {
- memo += " \n"+ judgmemo;
- }
- }
- }
- else
- {
- var seletedMemo = grp_biz.swt_spclmemo.case_judgrmemo.tar_judgrmemo.getSelectedText();
- if (!utlf_isNull(seletedMemo))
- {
- memo = seletedMemo;
- }
- else
- {
- memo = judgmemo;
- }
- }
-
- ds_main_item1_memo.setColumn(0,"edimemo", memo);
- grp_biz.swt_spclmemo.tabindex = 2; // case_edi tab 으로 토글시킨다.
- }
- /****************************************************************************************
- * Argument : button
- * Description : 심사자메모 탭 : 지우기
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_judgrmemo_btn_clearjudgrmemo_onclick(obj:Button, e:ClickEventInfo)
- {
- ds_main_item1_memo.setColumn(0, "judgmemo", "");
- }
- /****************************************************************************************
- * Argument : button
- * Description : EDI메모 탭 : EDI메모
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_ediclammemo_btn_memoedi_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("2", "");
- if(!utlf_isNull(rtn))
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if( utlf_isNull( oldTxt ) )
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"edimemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : EDI메모 탭 : 약
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_ediclammemo_btn_memoedi_drug_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("2", "01");
- if( !utlf_isNull(rtn) )
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if(utlf_isNull(oldTxt))
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"edimemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : EDI메모 탭 : 주사
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_ediclammemo_btn_memoedi_injection_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("2", "02");
- if( !utlf_isNull(rtn) )
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if( utlf_isNull(oldTxt))
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"edimemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : EDI메모 탭 : 처치
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_ediclammemo_btn_memoedi_treat_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("2", "03");
- if( !utlf_isNull(rtn) )
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if(utlf_isNull(oldTxt ))
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"edimemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : EDI메모 탭 : 검사
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_ediclammemo_btn_memoedi_exam_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("2", "04");
- if(!utlf_isNull(rtn))
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if( utlf_isNull(oldTxt))
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"edimemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : button
- * Description : EDI메모 탭 : 기타
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_ediclammemo_btn_memoedi_etc_onclick(obj:Button, e:ClickEventInfo)
- {
- var rtn = lf_fGetJudgEdiComment("2", "99");
- if(!utlf_isNull(rtn))
- {
- ds_temp_memolist.copyData(rtn);
- var rowCnt = ds_temp_memolist.rowcount;
-
- for ( i = 0 ; i < rowCnt ; i++)
- {
- if(utlf_isNull(oldTxt))
- {
- oldTxt = ds_temp_memolist.getColumn(i, "memo");
- }
- else
- {
- oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
- }
- }
- }
- ds_main_item1_memo.setColumn(0,"edimemo", oldTxt);
- }
- /****************************************************************************************
- * Argument : oncelldblclick
- * Description : 특정내역 그리드 더블 클릭 이벤트
- ****************************************************************************************/
- function grp_biz_swt_spclmemo_case_spclspec_grd_clsphist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
- {
- var row = e.row;
- var unitflag = ds_list3_clsp.getColumn(row, "unitflag");
- var clsoyn = ds_list3_clsp.getColumn(row, "clsoyn");
-
- if ( ds_list3_clsp.getColumn(row, "spclcd") == "JT001")
- {
- lf_fSetCnfmCdSpclSpec();
- }
- else
- {
- if (clsoyn == "N")
- {
- lf_fSetDocRefLnSpclSpec();// 명세서 특정내역
- }
- else if(clsoyn == "Y")
- {
- lf_fSetLnUnitClsoSpclSpec("grd_clsphist"); // 원외처방 특정내역
- }
- }
-
- }
- /****************************************************************************************
- * Argument : oncelldblclick
- * Description : 줄단위 원외처방특정내역을 수정/입력한다
- ****************************************************************************************/
- function lf_fSetLnUnitClsoSpclSpec(sgrid)
- {
- ds_cond_sppiz01700.clearData();
- ds_cond_sppiz01700.addRow();
- ds_rslt_sppiz01700.clearData();
- ds_list_sppiz01700.clearData();
-
- var row = "";
- var seqno = "";
- var edilnno = "";
- var snglcalcscorcd = "";
- var clopdd = "";
- var clopno = "";
- var mpsno = "";
- if (sgrid == "grd_oprcphist" )
- {
- row = ds_list7_clop.rowposition;
- seqno = ds_list7_clop.getColumn(row, "seqno");
- edilnno = ds_list7_clop.getColumn(row, "edilnno");
- snglcalcscorcd = ds_list7_clop.getColumn(row, "snglcalcscorcd");
- clopdd = ds_list7_clop.getColumn(row, "clopdd");
- clopno = ds_list7_clop.getColumn(row, "clopno");
- mpsno = ds_list7_clop.getColumn(row, "mpsno");
- }
- else if (sgrid == "grd_clsphist")
- {
- row = ds_list3_clsp.rowposition;
- seqno = ds_list3_clsp.getColumn(row, "clodseqno");
- edilnno = ds_list3_clsp.getColumn(row, "edilnno");
- snglcalcscorcd = ds_list3_clsp.getColumn(row, "snglcalcscorcd");
- mpsno = ds_list3_clsp.getColumn(row, "mpsno");
- clopdd = mpsno.substr(0,8);
- clopno = mpsno.substr(8,5);
- }
-
- if (seqno != "0")
- {
- if (sgrid == "grd_oprcphist")
- {
- var lnunitspclspecyn = grp_biz.grd_oprcphist.getCellText(row, grp_biz.grd_oprcphist.getBindCellIndex("body", "spclspecyn"));
- }
- else if (sgrid == "grd_clsphist")
- {
- var lnunitspclspecyn = "*";
- }
-
- if(utlf_isNull(lnunitspclspecyn))
- {
- ds_cond_sppiz01700.setColumn(0, "flag" , "I");
- ds_cond_sppiz01700.setColumn(0, "snglcalcscorcd", snglcalcscorcd);
- ds_cond_sppiz01700.setColumn(0, "clopdd" , clopdd);
- ds_cond_sppiz01700.setColumn(0, "clopno" , clopno);
- ds_cond_sppiz01700.setColumn(0, "edilnno" , edilnno);
- ds_cond_sppiz01700.setColumn(0, "clodseqno" , seqno);
- ds_cond_sppiz01700.setColumn(0, "spclcd" , "JX999");
- ds_cond_sppiz01700.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_cond_sppiz01700.setColumn(0, "spclspec" , "");
- ds_cond_sppiz01700.setColumn(0, "spclformat" , "X(700)");
- ds_cond_sppiz01700.setColumn(0, "rownum" , "");
- ds_cond_sppiz01700.setColumn(0, "cdnm" , "기타내역");
- ds_cond_sppiz01700.setColumn(0, "unitflag" , "J");
- }
- else
- {
- var rowcnt = 0;
- var setrow = -1;
-
- for (var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var spcClodseqno = ds_list3_clsp.getColumn(i, "clodseqno");
- var spcClsoyn = ds_list3_clsp.getColumn(i, "clsoyn");
-
- if ( spcClodseqno == seqno && spcClsoyn == "Y" )
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
-
- if (!utlf_isNull(spclcd) && spclcd != "JT001" && ds_list3_clsp.getRowType(i) != 8)
- {
- //var rowcnt = ds_list_sppiz01700.addRow();
-
- dsf_makeValue(ds_list_sppiz01700, "flag", "string", "", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "rownum", "string", i, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "snglcalcscorcd", "string", ds_list3_clsp.getColumn(i, "snglcalcscorcd"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clopdd", "string", ds_list3_clsp.getColumn(i, "mpsno").substr(0,8), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clopno", "string", ds_list3_clsp.getColumn(i, "mpsno").substr(8,5), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clodseqno", "string", ds_list3_clsp.getColumn(i, "clodseqno"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "edilnno", "string", ds_list3_clsp.getColumn(i, "edilnno"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclformat", "string", ds_list3_clsp.getColumn(i, "spclformat"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "cdnm", "string", ds_list3_clsp.getColumn(i, "cdnm"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "detldesc", "string", ds_list3_clsp.getColumn(i, "detldesc"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "oldspclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "oldspclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "mpsno", "string", ds_list3_clsp.getColumn(i, "mpsno"), rowcnt);
-
- if (spclcd == "JX999")
- {
- setrow = i;
- }
- rowcnt = rowcnt+1;
- }
- }
- }
- if (setrow > -1)
- {
- ds_cond_sppiz01700.setColumn(0, "flag" , "");
- ds_cond_sppiz01700.setColumn(0, "rownum" , setrow);
- ds_cond_sppiz01700.setColumn(0, "snglcalcscorcd" , snglcalcscorcd);
- ds_cond_sppiz01700.setColumn(0, "clopdd" , clopdd);
- ds_cond_sppiz01700.setColumn(0, "clopno" , clopno);
- ds_cond_sppiz01700.setColumn(0, "clodseqno" , seqno);
- ds_cond_sppiz01700.setColumn(0, "edilnno" , edilnno);
- ds_cond_sppiz01700.setColumn(0, "spclcd" , ds_list3_clsp.getColumn(setrow, "spclcd"));
- ds_cond_sppiz01700.setColumn(0, "detldesc" , ds_list3_clsp.getColumn(setrow, "detldesc"));
- ds_cond_sppiz01700.setColumn(0, "spclspec" , ds_list3_clsp.getColumn(setrow, "spclspec"));
- ds_cond_sppiz01700.setColumn(0, "spclformat" , ds_list3_clsp.getColumn(setrow, "spclformat"));
- ds_cond_sppiz01700.setColumn(0, "cdnm" , ds_list3_clsp.getColumn(setrow, "cdnm"));
- ds_cond_sppiz01700.setColumn(0, "unitflag" , "J");
- ds_cond_sppiz01700.setColumn(0, "mpsno" , ds_list3_clsp.getColumn(setrow, "mpsno"));
- }
- else
- {
- ds_cond_sppiz01700.setColumn(0, "flag" , "I");
- ds_cond_sppiz01700.setColumn(0, "snglcalcscorcd" , snglcalcscorcd);
- ds_cond_sppiz01700.setColumn(0, "clopdd" , clopdd);
- ds_cond_sppiz01700.setColumn(0, "clopno" , clopno);
- ds_cond_sppiz01700.setColumn(0, "clodseqno" , seqno);
- ds_cond_sppiz01700.setColumn(0, "edilnno" , edilnno);
- ds_cond_sppiz01700.setColumn(0, "spclcd" , "JX999");
- ds_cond_sppiz01700.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
- ds_cond_sppiz01700.setColumn(0, "spclspec" , "");
- ds_cond_sppiz01700.setColumn(0, "spclformat" , "X(700)");
- ds_cond_sppiz01700.setColumn(0, "rownum" , "");
- ds_cond_sppiz01700.setColumn(0, "cdnm" , "기타내역");
- ds_cond_sppiz01700.setColumn(0, "unitflag" , "J");
- ds_cond_sppiz01700.setColumn(0, "mpsno" , "");
- }
-
- }
-
- ds_cond_sppiz01700.setColumn(0, "insukind" , ds_main_item1_clbs.getColumn(0, "insukind"));
- ds_cond_sppiz01700.setColumn(0, "ordfildcd" , ds_main_item1_clbs.getColumn(0, "ordfildcd"));
-
- frmf_setParameter("iParam_mother_view", "SMPID20500_외래사후심사관리");
-
- var objArg = new Object();
- objArg.arg_ds_hidden_clsp_cond = ds_cond_sppiz01700;
- objArg.arg_ds_hidden_clsp_cond_list = ds_list_sppiz01700;
-
- frmf_modal("SPPIZ01700", "SPPIZ01700", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- if (ds_rslt_sppiz01700.rowcount > 0)
- {
- for ( var i = 0; i < ds_rslt_sppiz01700.rowcount; i++)
- {
- var flag = ds_rslt_sppiz01700.getColumn(i, "flag");
- var rownum = ds_rslt_sppiz01700.getColumn(i, "rownum");
- var newspclcd = ds_rslt_sppiz01700.getColumn(i, "spclcd");
- var newcdnm = ds_rslt_sppiz01700.getColumn(i, "cdnm");
- var newspclspec = ds_rslt_sppiz01700.getColumn(i, "spclspec");
- var newspclformat = ds_rslt_sppiz01700.getColumn(i, "spclformat");
- var newdetldesc = ds_rslt_sppiz01700.getColumn(i, "detldesc");
-
- if (flag == "I")
- {
- var clsprow = ds_list3_clsp.addRow();
-
- if( newspclcd == "CT001")
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag" , "C");
- ds_list3_clsp.setColumn(clsprow, "clodseqno" , 0);
- ds_list3_clsp.setColumn(clsprow, "edilnno" , 0);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd" , "-");
- }
- else if( newspclcd == "CT002")
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag" , "C");
- ds_list3_clsp.setColumn(clsprow, "clodseqno" , 0);
- ds_list3_clsp.setColumn(clsprow, "edilnno" , 0);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd" , "-");
- }
- else
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag" , "J");
- ds_list3_clsp.setColumn(clsprow, "clodseqno" , seqno);
- ds_list3_clsp.setColumn(clsprow, "edilnno" , edilnno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd" , snglcalcscorcd);
- }
-
- ds_list3_clsp.setColumn(clsprow, "spclcd" , newspclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm" , newcdnm);
- ds_list3_clsp.setColumn(clsprow, "spclspec" , newspclspec);
- ds_list3_clsp.setColumn(clsprow, "spclformat" , newspclformat);
- ds_list3_clsp.setColumn(clsprow, "detldesc" , newdetldesc);
- ds_list3_clsp.setColumn(clsprow, "oldedilnno" , edilnno);
- ds_list3_clsp.setColumn(clsprow, "oldspclcd" , "");
- ds_list3_clsp.setColumn(clsprow, "mpsno" , clopdd + clopno);
- ds_list3_clsp.setColumn(clsprow, "clsoyn" , "Y");
- ds_hidden_list3.setColumn(0, "msgspclformat" , "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "U")
- {
- ds_list3_clsp.setColumn(rownum, "snglcalcscorcd" , snglcalcscorcd);
- ds_list3_clsp.setColumn(rownum, "spclcd" , newspclcd);
- ds_list3_clsp.setColumn(rownum, "cdnm" , newcdnm);
- ds_list3_clsp.setColumn(rownum, "spclspec" , newspclspec);
- ds_list3_clsp.setColumn(rownum, "spclformat" , newspclformat);
- ds_list3_clsp.setColumn(rownum, "detldesc" , newdetldesc);
- var oldspclcd = ds_rslt_sppiz01700.getColumn(i, "oldspclcd");
- var oldspclspec = ds_rslt_sppiz01700.getColumn(i, "oldspclspec");
- var rowstatus = ds_list3_clsp.getRowType(rownum);
- if (rowstatus == 2)
- {
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rownum, 'u');
- ds_list3_clsp.updatecontrol = true;
- }
- ds_hidden_list3.setColumn(0, "msgspclformat" , "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "D" && !utlf_isNull(rownum))
- {
- var rowstatus = ds_list3_clsp.getRowType(rownum);
- if (rowstatus == 2)
- {
- ds_list3_clsp.deleteRow(rownum);
- }
- else
- {
- ds_list3_clsp.setColumn(rownum, "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rownum, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(rownum);
- }
- ds_list3_clsp.rowposition = rownum;
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 줄단위 특정내역이 없습니다.");
- } // 특정 코드 상태 따른 if end
- } // for end
- }
- }
- else
- {
- sysf_messageBox("처방번호가 부여되지 않았으며 해당 줄단위 특정내역이", "I004");
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 재료행위/급여/항목구분 Radio 선택
- ****************************************************************************************/
- function lf_fGetSelectedOrderData()
- {
- var selectedRdoPay = "";
- var selectedRdoItem = "";
- var selectedRdoMatrAct = "";
- var snglcalcscorcd = " String(snglcalcscorcd).indexOf('"+utlf_transNullToEmpty(ds_hidden_list2_clodsrch.getColumn(0, "inpCalcScorCd"))+"') >= 0 ";
- var edicd = " String(basecd).indexOf('"+utlf_transNullToEmpty(ds_hidden_list2_clodsrch.getColumn(0, "inpEDICd"))+"') >= 0 ";
-
- // if (ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoPay") != "-")
- // {
- // selectedRdoPay = grp_biz.grp_sea02.rdo_payflag.value;
- //
- // selectedRdoPay = "payflag == '" + selectedRdoPay + "'";
- // }
-
- if (ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoItem") != "-")
- {
- selectedRdoItem = "item1 == '" + ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoItem") + "'";
- }
-
- if (!utlf_isNull(ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoMatrAct")) && ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoMatrAct") != "-")
- {
- if (ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoMatrAct") == "0"){
- selectedRdoMatrAct = "(matractflag == '2' || matractflag == '3')";
- } else {
- selectedRdoMatrAct = "(matractflag != '2' && matractflag != '3')";
- }
- }
-
- var prematractflag = ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoMatrAct");
-
- var tmp = "";
- var chk = "0";
-
- if(!utlf_isNull(selectedRdoPay))
- {
- tmp = tmp + selectedRdoPay;
- chk = "1";
- }
-
- if(!utlf_isNull(selectedRdoItem))
- {
- if(chk == "1")
- {
- tmp = tmp + " && " + selectedRdoItem;
- }
- else
- {
- tmp = tmp + selectedRdoItem;
- chk = "1";
- }
- }
-
- if(!utlf_isNull(selectedRdoMatrAct))
- {
- if(chk == "1")
- {
- tmp = tmp + " && " + selectedRdoMatrAct;
- }
- else
- {
- tmp = tmp + selectedRdoMatrAct;
- chk = "1";
- }
- }
-
- if(!utlf_isNull(ds_hidden_list2_clodsrch.getColumn(0, "inpCalcScorCd")))
- {
- if(chk == "1")
- {
- tmp = tmp + " && " + snglcalcscorcd;
- }
- else
- {
- tmp = tmp + snglcalcscorcd;
- chk = "1";
- }
- }
-
- if(!utlf_isNull(ds_hidden_list2_clodsrch.getColumn(0, "inpEDICd")))
- {
- if(chk == "1")
- {
- tmp = tmp + " && " + edicd;
- }
- else
- {
- tmp = tmp + edicd;
- chk = "1";
- }
- }
-
- if(chk == "0")
- {
- tmp = "";
- }
-
- ds_list2_clod.filter(tmp);
- }
- /****************************************************************************************
- * Argument : function
- * Description : 급여구분별 처방조회
- ****************************************************************************************/
- function lf_fClodSelectByPayflag()
- {
- ds_hidden_list2_clodsrch.setColumn(0, "inpCalcScorCd", "");
- ds_hidden_list2_clodsrch.setColumn(0, "inpEDICd", "");
-
- var payflag = ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoPay");
-
- if (payflag == "0")
- {
- ds_list2_clod.copyData(ds_hidden_initclodlist_list2);
- ds_list2_clod.rowposition = -1;
- }
- else
- {
- var datasave = false;
- var clodupdtdata = grdf_getGridUpdateData(grp_biz.grd_clodhist).rowcount;
-
- if (clodupdtdata != 0)
- {
- var ans = sysf_messageBox("급여처방에 수정사항이 있습니다. 저장", "S001");
-
- if (ans == 6)
- {
- lf_fSaveAftJudg("B")
- datasave = true;
- }
- else
- {
- datasave = false;
- }
- }
- // 수정사항을 저장하지 않은 경우 OR 수정사항이 없는 경우
- if (datasave == false)
- {
- var nodeList;
- ds_list2_clod.clearData();
- // 급여구분에 따라 해당되는 처방만 보여준다.
- if (payflag == "-")
- {
- ds_list8_clod2.filterstr = "";
- ds_list2_clod.copyData(ds_list8_clod2);
- }
- else
- { // 전액본인부담, 일반, 선택
- ds_list8_clod2.filterstr = "payflag == '" + payflag + "'";
- ds_list2_clod.copyData(ds_list8_clod2, true);
- }
- ds_list2_clod.rowposition = -1;
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : CLDI 테이블에 저장할 정보가 올바른지 확인한다.
- ****************************************************************************************/
- function lf_fCheckSaveInAftJudgInfoCLDI(judgendyn)
- {
- var delcldiCheck = false;
-
- for ( var i = ds_list1_cldi.rowcount-1; i >= 0; i-- )
- {
- var rowstatus = ds_list1_cldi.getRowType(i);
- var diagcd = ds_list1_cldi.getColumn(i, "diagcd");
-
- if (rowstatus == 2)
- {
- if (utlf_isNull(diagcd))
- {
- ds_list1_cldi.deleteRow(i);
- delcldiCheck = true;
- }
- }
- }
- if ( ds_list1_cldi.rowcount == 0 && judgendyn == "C")
- {
- sysf_messageBox("상병이 입력되지", "E007");
-
- return false;
- }
- else
- {
- var orddeptcd = ds_main_item1_clbs.getColumn(0, "orddeptcd");
- for ( var i = ds_list1_cldi.rowcount-1; i >= 0; i-- )
- {
- var diagcd = ds_list1_cldi.getColumn(i, "diagcd");
- var toot = ds_list1_cldi.getColumn(i, "toot");
- if (utlf_isNull(diagcd))
- {
- ds_list1_cldi.deleteRow(i);
- }
- else
- {
- var diagseq = ds_list1_cldi.getColumn(i, "diagseq");
- var frow = -1;
- for ( var j = 0; j < i; j++)
- {
- var prediagseq = ds_list1_cldi.getColumn(j, "diagseq");
- var prediagcd = ds_list1_cldi.getColumn(j, "diagcd");
- var pretoot = ds_list1_cldi.getColumn(j, "toot");
-
- if (ds_list1_cldi.getRowType(i) != 8)
- {
- if (diagseq == prediagseq)
- {
- sysf_messageBox("상병순서 '" + diagseq + "'가", "E006");
- return false;
- }
-
- if (diagcd == prediagcd && toot == pretoot)
- {
- sysf_messageBox("상병코드 '" + diagcd + "'가", "E006");
- return false;
- }
- frow = ds_main_list2_listdiag.findRowExpr("(orddeptcd == '" +orddeptcd+ "' || orddeptcd == '-') && diagcd == '"+ diagcd +"' && chgdiagcd == '-'")
- if (frow > -1) {
- sysf_messageBox("청구불가 상병코드 '" + diagcd + "'가(이)", "I010");
- }
- }
- }
- if (utlf_isNull(ds_list1_cldi.getColumn(i, "toot")))
- {
- ds_list1_cldi.setColumn(i, "toot", "-");
- }
- }
- }
- }
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : CLSP 테이블에 저장할 정보가 올바른지 확인한다.
- ****************************************************************************************/
- function lf_fCheckSaveInAftJudgInfoCLSP()
- {
- for ( var i = ds_list3_clsp.rowcount-1; i >= 0; i-- )
- {
- var rowstatus = ds_list3_clsp.getRowType(i);
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var spclspec = ds_list3_clsp.getColumn(i, "spclspec");
-
- if (rowstatus != 8 && utlf_isNull(spclcd) && utlf_isNull(spclspec))
- {
- ds_list3_clsp.deleteRow(i);
- }
- }
- var clspList = ds_list3_clsp.rowcount;
-
- if (clspList < 0)
- {
- return false;
- }
- for ( var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var spclspec = ds_list3_clsp.getColumn(i, "spclspec");
-
- if(utlf_isNull(spclspec))
- {
- sysf_messageBox("특정코드 '" + spclcd + "'의 내역이", "I004");
- return false;
- }
- else if (spclcd == "MX999" || spclcd == "MT015" || spclcd == "MT016"|| spclcd == "MT004")
- {
- for ( var j = 0; j < i; j++)
- {
- var prespclcd = ds_list3_clsp.getColumn(j, "spclcd");
- if (ds_list3_clsp.getRowType(i) != 8 && spclcd == prespclcd )
- {
- sysf_messageBox("명세서 단위 특정코드 '" + spclcd + "'가", "E006");
- return false;
- }
- }
- }
- }
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 줄단위 특정내역 중 기타메모(JX999)를 특정내역 형식에 맞춰 설정한다.
- ****************************************************************************************/
- function lf_fSetSpclSpecJX999()
- {
- ds_send_item3_lnunitmemo.clearData();
-
- var iTotSpclCdCnt = 0;
- for ( var i = 0; i < ds_list3_clsp.rowcount; i++ )
- {
- var rowstatus = ds_list3_clsp.getRowType(i);
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var snglcalcscorcd = ds_list3_clsp.getColumn(i, "snglcalcscorcd");
- var edilnno = ds_list3_clsp.getColumn(i, "edilnno");
- var seqno = ds_list3_clsp.getColumn(i, "seqno");
- var clodseqno = ds_list3_clsp.getColumn(i, "clodseqno");
- var clsoyn = ds_list3_clsp.getColumn(i, "clsoyn");
- var mpsno = ds_list3_clsp.getColumn(i, "mpsno");
- if ( rowstatus != 1 && spclcd == "JX999" )
- {
- var delclspNode = ds_send_item3_delclsp;
- var max = delclspNode.addRow();
-
- delclspNode.addColumn("delunitflag", "string");
- delclspNode.setColumn(max, "delunitflag", "J");
-
- var oldspclcd = ds_list3_clsp.getColumn(i, "oldspclcd");
-
- if (oldspclcd)
- {
- delclspNode.setColumn(max, "delspclcd", oldspclcd);
- }
- else
- {
- delclspNode.setColumn(max, "delspclcd", spclcd);
- }
- delclspNode.setColumn(max, "delusermemoyn", "N");
- delclspNode.setColumn(max, "delcalcscorcd", snglcalcscorcd);
- if (rowstatus == 4)
- {
- var initedilnno = ds_list3_clsp.getColumn(i, "initedilnno");
- delclspNode.setColumn(max, "deledilnno", initedilnno);
-
- }
- else
- {
- delclspNode.setColumn(max, "deledilnno", edilnno);
- }
- delclspNode.setColumn(max, "delseqno" , seqno);
- delclspNode.setColumn(max, "delclsoyn", clsoyn);
- delclspNode.setColumn(max, "delmpsno" , mpsno);
- }
- if (rowstatus != 1 && rowstatus != 8 && spclcd == "JX999")
- {
- var iSpclCdCnt = 0;
- var spclmemo = ds_list3_clsp.getColumn(i, "spclspec");
- var repeat = ds_list3_clsp.getColumn(i, "rowstat");
- var iSpclCdTotLength = utlf_getStringLength(spclmemo);
- var insCharTotCnt = 0;
- if (iSpclCdTotLength > 350)
- {
- var iLen = 0;
- var iStartInx = 0;
- var iCharCnt = 0;
-
- for ( var j = 0; j < spclmemo.length; j++ )
- {
- var sBit = spclmemo.charAt(j);
- iCharCnt++;
- if (escape(sBit).length > 4)
- {
- iLen = iLen + 2;
- }
- else
- {
- iLen = iLen + 1;
- }
- if (iLen == 350 || iLen > 350)
- {
- iTotSpclCdCnt = ds_send_item3_lnunitmemo.addRow();
- iSpclCdCnt++;
-
- if (iLen == 350)
- {
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "spclspec", spclmemo.substr(iStartInx, iCharCnt));
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "calcscorcd", snglcalcscorcd);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "edilnno", edilnno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "clodseqno", clodseqno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "clsoyn", clsoyn);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "mpsno", mpsno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "rowstat", repeat);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "spclcd", "JX999");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "usermemoyn", "N");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "unitflag", "J");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "workflag", "12");
- iStartInx += iCharCnt;
- insCharTotCnt += 350;
- }
- else if (iLen > 350)
- {
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "spclspec", spclmemo.substr(iStartInx, iCharCnt));
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "calcscorcd", snglcalcscorcd);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "edilnno", edilnno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "clodseqno", clodseqno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "clsoyn", clsoyn);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "mpsno", mpsno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "rowstat", repeat);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "spclcd", "JX999");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "usermemoyn", "N");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "unitflag", "J");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "workflag", "12");
- iStartInx += (iCharCnt - 1);
- j--;
- insCharTotCnt += 349;
- }
- iCharCnt = 0;
- iLen = 0;
- }
- }
-
- if (iSpclCdTotLength != insCharTotCnt)
- {
- iTotSpclCdCnt = ds_send_item3_lnunitmemo.addRow();
- iSpclCdCnt++;
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "spclspec", spclmemo.substr(iStartInx, iCharCnt));
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "calcscorcd", snglcalcscorcd);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "edilnno", edilnno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "clodseqno", clodseqno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "clsoyn", clsoyn);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "mpsno", mpsno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "rowstat", repeat);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "spclcd", "JX999");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "usermemoyn", "N");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "unitflag", "J");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "workflag", "12");
- }
- }
- else if (iSpclCdTotLength > 0)
- {
- iTotSpclCdCnt = ds_send_item3_lnunitmemo.addRow();
- iSpclCdCnt++;
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "spclspec", spclmemo);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "calcscorcd", snglcalcscorcd);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "edilnno", edilnno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "clodseqno", clodseqno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "clsoyn", clsoyn);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "mpsno", mpsno);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "rowstat", repeat);
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "spclcd", "JX999");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "usermemoyn", "N");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "unitflag", "J");
- ds_send_item3_lnunitmemo.setColumn(iTotSpclCdCnt, "workflag", "12");
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : CLOD 테이블에 저장할 정보가 올바른지 확인한다.
- ****************************************************************************************/
- function lf_fCheckSaveInAftJudgInfoCLOD()
- {
- var clodList = ds_list2_clod.rowcount;
- for ( var i = clodList-1; i >= 0; i-- )
- {
- var rowstatus = ds_list2_clod.getRowType(i);
- var seqno = ds_list2_clod.getColumn(i, "seqno");
- var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- var basecd = ds_list2_clod.getColumn(i, "basecd");
- var drugqty = ds_list2_clod.getColumn(i, "drugqty");
- var edidrugqty = ds_list2_clod.getColumn(i, "edidrugqty");
- var tims = ds_list2_clod.getColumn(i, "tims");
- var dayno = ds_list2_clod.getColumn(i, "dayno");
- var edidayno = ds_list2_clod.getColumn(i, "edidayno");
- var ordfromdd = ds_list2_clod.getColumn(i, "ordfromdd");
- var ordtodd = ds_list2_clod.getColumn(i, "ordtodd");
- if (rowstatus != 8 && utlf_isNull(seqno) && utlf_isNull(snglcalcscorcd) && utlf_isNull(basecd) && utlf_isNull(drugqty) && utlf_isNull(tims) && utlf_isNull(dayno) && utlf_isNull(edidrugqty) && utlf_isNull(edidayno) && utlf_isNull(ordtodd))
- {
- ds_list2_clod.deleteRow(i);
- }
- }
- clodList = ds_list2_clod.rowcount;
-
- if (clodList < 0)
- {
- return false;
- }
-
- for ( var i = 0; i < clodList; i++ )
- {
- var seqno = ds_list2_clod.getColumn(i, "seqno");
- var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- var basecd = ds_list2_clod.getColumn(i, "basecd");
- var drugqty = ds_list2_clod.getColumn(i, "drugqty");
- var edidrugqty = ds_list2_clod.getColumn(i, "edidrugqty");
- var tims = ds_list2_clod.getColumn(i, "tims");
- var dayno = ds_list2_clod.getColumn(i, "dayno");
- var edidayno = ds_list2_clod.getColumn(i, "edidayno");
- var ordfromdd = ds_list2_clod.getColumn(i, "ordfromdd");
- var ordtodd = ds_list2_clod.getColumn(i, "ordtodd");
- if (!utlf_isNull(snglcalcscorcd) && utlf_isNull(basecd))
- {
- if (utlf_isNull(ordfromdd)|| utlf_isNull(ordtodd))
- {
- sysf_messageBox("수가코드 '" + snglcalcscorcd + "'의 처방일자 정보가", "I004");
- return false;
- }
- else if (utlf_isNull(drugqty)|| utlf_isNull(tims) || utlf_isNull(dayno) || utlf_isNull(edidrugqty) || utlf_isNull(edidayno))
- {
- sysf_messageBox("수가코드 '" + snglcalcscorcd + "'의 투여량 정보가", "I004");
- return false;
- }
- }
- }
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : PIFHIUNC 재청구 저장시 차액이 발생했는지 체크
- ****************************************************************************************/
- function lf_fCheckSaveReClamChangeAmt()
- {
- if (ds_main_item1_clbs.getColumn(0, "clamflagcd") == "1" && ds_main_item1_clbs.getColumn(0, "recalcyn") == "Y")
- {
- return true;
- }
- else
- {
- return false;
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 재청구 차액발생 사유입력
- ****************************************************************************************/
- function lf_fSetReClamChgAmtResncd()
- {
- ds_send_item8_pifhiunc.clearData();
- ds_send_item8_pifhiunc.addRow();
- var rtn = frmf_modal("SPPID22800", "SPPID22800", "", "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(rtn))
- {
- var resncd = rtn.sCdid;
-
- if (!utlf_isNull(resncd))
- {
- ds_send_item8_pifhiunc.setColumn(0, "chgamtresncd", resncd);
- }
-
- return resncd;
- }
-
- }
- /****************************************************************************************
- * Argument : onclick
- * Description : 저장 버튼
- ****************************************************************************************/
- function grp_biz_btn_save_onclick(obj:Button, e:ClickEventInfo)
- {
- // 심사중 B값 삭제 -> A:미심으로 저장
- // [2015.06.23] 심사상태완료 -> 저장 가능하도록
- if(obj.visible)
- {
- lf_fSaveAftJudg("B")
- }
- else
- {
- sysf_messageBox("비활성 상태입니다. 진행","E001");
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 입원 저장 버튼 이벤트 함수
- ****************************************************************************************/
- function lf_fSaveAftJudg(judgendyn)
- {
- grp_biz.grd_clodhist.setFocus();
- ds_send_item2_incd.clearData();
- ds_send_item2_incd.addRow();
-
- //ds_send_item3_delclsp.clearData();
- ds_send_item3_lnunitmemo.clearData();
- ds_send_item4_endclbs.clearData();
- ds_send_item5_mech.clearData();
-
- var selectedRow = lgv_ds_rslt.getColumn(0, "selectedRow");
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
- var clamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
- var pidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
- var workflag = ds_main_item1_clbs.getColumn(0, "workflag");
- var ioflag = ds_main_item1_clbs.getColumn(0, "ioflag");
- var insukindcd = ds_main_item1_clbs.getColumn(0, "insukindcd");
- var clamflagcd = ds_main_item1_clbs.getColumn(0, "clamflagcd");
- var isValidCheck = true;
- var cutprcpyn = "";
- var trgtManWindow = "";
- trgtManWindow = frmf_getChildWindow(lgv_trgtManWindow);
- if (!utlf_isNull(trgtManWindow))
- {
- cutprcpyn = trgtManWindow.ds_send.getColumn(0, "cutprcpsel");
- }
- if (!utlf_isNull(clamym))
- {
- var saveNoMsg = "";
- var saveOkMsg = "[계산]";
-
- ds_main_item1_clbs.updatecontrol = false;
- ds_main_item1_clbs.setRowType(0,4);
- ds_main_item1_clbs.updatecontrol = true;
- ds_main_item1_clbs.addColumn("clbsupdateyn", "string");
- ds_main_item1_clbs.addColumn("recalcyn", "string");
-
- if (lf_fCheckSaveInAftJudgCLBS())
- {
- lf_save_grd_ds(ds_main_item1_clbs, ds_send_item1_clbs);
-
- if (ds_send_item1_clbs.rowcount > 0)
- {
- saveOkMsg = "[인적사항] ";
- ds_send_item1_clbs.setColumn(0, "clbsupdateyn", "Y");
- ds_send_item1_clbs.setColumn(0, "suppkind" , ds_main_item1_clbs.getColumn(0, "suppkindcd"));
-
- var init_offcharm = ds_hidden_item1_initclbs.getColumn(0, "offcharm");
- var current_offcharm = ds_main_item1_clbs.getColumn(0, "offcharm");
-
- if (init_offcharm != current_offcharm)
- {
- ds_send_item1_clbs.setColumn(0, "recalcyn", "Y");
- }
- }
- else
- {
- saveNoMsg = "[인적사항] ";
- dsf_copyDs(ds_send_item1_clbs, ds_main_item1_clbs);
- ds_send_item1_clbs.setColumn(0, "clbsupdateyn", "Y");
- }
-
- ds_send_item1_clbs.addColumn("judgendyn", "string");
- ds_send_item1_clbs.setColumn(0, "judgendyn", judgendyn);
- }
- else
- {
- isValidCheck = false;
- }
-
- var initmemo = dsf_getDsCSV(ds_hidden_item1_initmemo, 0);
- var currentmemo = dsf_getDsCSV(ds_main_item1_memo, 0);
- if (initmemo != currentmemo)
- {
- var judgmemo = String(ds_main_item1_memo.getColumn(0, "judgmemo")).trim();
- var judgmemorepeat = ds_main_item1_memo.getColumn(0, "judgmemorepeat");
- var edimemo = String(ds_main_item1_memo.getColumn(0, "edimemo")).trim();
- var edimemorepeat = ds_main_item1_memo.getColumn(0, "edimemorepeat");
-
- var noChange = true;
-
- if (judgmemo != String(ds_hidden_item1_initmemo.getColumn(0, "judgmemo")).trim())
- {
- lf_fSetJudgEDIMemo(judgmemo, "Y");
- noChange = false; // 심사자메모가 변경된 경우임
- }
- else if (!utlf_isNull(judgmemo) && judgmemorepeat != ds_hidden_item1_initmemo.getColumn(0, "judgmemorepeat"))
- {
- lf_fSetJudgEDIMemo(judgmemo, "Y");
- noChange = false; // 심사자메모 반복 설정이 변경된 경우임
- }
- if (edimemo != String(ds_hidden_item1_initmemo.getColumn(0, "edimemo")).trim())
- {
- lf_fSetJudgEDIMemo(edimemo, "N");
- noChange = false; // EDI청구메모가 변경된 경우임
- }
- else if (!utlf_isNull(edimemo) && edimemorepeat != ds_hidden_item1_initmemo.getColumn(0, "edimemorepeat"))
- {
- lf_fSetJudgEDIMemo(edimemo, "N");
- noChange = false; // EDI청구메모 반복 설정이 변경된 경우임
- }
- if (noChange == false)
- {
- saveOkMsg += "[심사메모] ";
- }
- else
- {
- saveNoMsg += "[심사메모] ";
- }
- }
- else
- {
- saveNoMsg += "[심사메모] ";
- }
-
-
- // ds_send_list10_judgmemo.clearData();
- // lf_save_grd_ds(ds_list10_judgmemo, ds_send_list10_judgmemo);
- //
- // if (ds_send_list10_judgmemo.rowcount > 0)
- // {
- // for ( var i = 0; i < ds_send_list10_judgmemo.rowcount; i++ )
- // {
- // if (utlf_isNull(ds_send_list10_judgmemo.getColumn(i, "clamym")))
- // {
- // ds_send_list10_judgmemo.setColumn(i, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
- // }
- // if (utlf_isNull(ds_send_list10_judgmemo.getColumn(i, "clamdg")))
- // {
- // ds_send_list10_judgmemo.setColumn(i, "clamdg", ds_main_item1_clbs.getColumn(0, "clamdg"));
- // }
- // if (utlf_isNull(ds_send_list10_judgmemo.getColumn(i, "pidsn")))
- // {
- // ds_send_list10_judgmemo.setColumn(i, "pidsn", ds_main_item1_clbs.getColumn(0, "pidsn"));
- // }
- // if (utlf_isNull(ds_send_list10_judgmemo.getColumn(i, "usermemoyn")))
- // {
- // ds_send_list10_judgmemo.setColumn(i, "usermemoyn", "Y");
- // }
- // if (utlf_isNull(ds_send_list10_judgmemo.getColumn(i, "unitflag")))
- // {
- // ds_send_list10_judgmemo.setColumn(i, "unitflag", "M");
- // }
- // if (utlf_isNull(ds_send_list10_judgmemo.getColumn(i, "spclcd")))
- // {
- // ds_send_list10_judgmemo.setColumn(i, "spclcd", "MX999");
- // }
- // if (utlf_isNull(ds_send_list10_judgmemo.getColumn(i, "clsoyn")))
- // {
- // ds_send_list10_judgmemo.setColumn(i, "clsoyn", "N");
- // }
- // }
- // }
- // else
- // {
- // saveOkMsg += "[심사메모] ";
- // }
- //
- // ds_send_list11_edimemo.clearData();
- // lf_save_grd_ds(ds_list11_edimemo, ds_send_list11_edimemo);
- //
- // if (ds_send_list11_edimemo.rowcount > 0)
- // {
- // for ( var i = 0; i < ds_send_list11_edimemo.rowcount; i++ )
- // {
- // if (utlf_isNull(ds_send_list11_edimemo.getColumn(i, "clamym")))
- // {
- // ds_send_list11_edimemo.setColumn(i, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
- // }
- // if (utlf_isNull(ds_send_list11_edimemo.getColumn(i, "clamdg")))
- // {
- // ds_send_list11_edimemo.setColumn(i, "clamdg", ds_main_item1_clbs.getColumn(0, "clamdg"));
- // }
- // if (utlf_isNull(ds_send_list11_edimemo.getColumn(i, "pid")))
- // {
- // ds_send_list11_edimemo.setColumn(i, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
- // }
- // if (utlf_isNull(ds_send_list11_edimemo.getColumn(i, "pidsn")))
- // {
- // ds_send_list11_edimemo.setColumn(i, "pidsn", ds_main_item1_clbs.getColumn(0, "pidsn"));
- // }
- // if (utlf_isNull(ds_send_list11_edimemo.getColumn(i, "usermemoyn")))
- // {
- // ds_send_list11_edimemo.setColumn(i, "usermemoyn", "N");
- // }
- // if (utlf_isNull(ds_send_list11_edimemo.getColumn(i, "unitflag")))
- // {
- // ds_send_list11_edimemo.setColumn(i, "unitflag", "M");
- // }
- // if (utlf_isNull(ds_send_list11_edimemo.getColumn(i, "spclcd")))
- // {
- // ds_send_list11_edimemo.setColumn(i, "spclcd", "MX999");
- // }
- // if (utlf_isNull(ds_send_list11_edimemo.getColumn(i, "clsoyn")))
- // {
- // ds_send_list11_edimemo.setColumn(i, "clsoyn", "N");
- // }
- // }
- // }
- // else
- // {
- // saveOkMsg += "[MX999] ";
- // }
- if (lf_fCheckSaveInAftJudgInfoCLDI(judgendyn))
- {
-
- for ( var i = 0; i < ds_list1_cldi.rowcount; i++ )
- {
- var diagseq = ds_list1_cldi.getColumn(i, "diagseq");
-
- if (ds_list1_cldi.getRowType(i) == 8 && String(diagseq).substr(0, 1) == "D")
- {
- ds_list1_cldi.setColumn(i, "diagseq", String(diagseq).substr(1, diagseq.length));
- }
-
- ds_list1_cldi.updatecontrol = false;
- if (utlf_isNull(ds_list1_cldi.getColumn(i, "estmspclcd")))
- {
- ds_list1_cldi.setColumn(i, "estmspclcd", "-");
- }
- if (utlf_isNull(ds_list1_cldi.getColumn(i, "wundresncd")))
- {
- ds_list1_cldi.setColumn(i, "wundresncd", "-");
- }
- if (ds_list1_cldi.getColumn(i, "diagkindcd") == "1")
- {
- ds_list1_cldi.setColumn(i, "diagkindcd", "R");
- }
- if (utlf_isNull(ds_list1_cldi.getColumn(i, "clamdeptcd")))
- {
- ds_list1_cldi.setColumn(i, "clamdeptcd", ds_main_item1_clbs.getColumn(0, "clamdeptcd"));
- }
- ds_list1_cldi.updatecontrol = true;
- }
- }
- else
- {
- isValidCheck = false;
- }
-
- if (lf_fCheckSaveInAftJudgInfoCLSP())
- {
- ds_list3_clsp.updatecontrol = false;
-
- if(ds_list3_clsp.rowcount > 0)
- {
- lf_fSetSpclSpecJX999();
-
- ds_list3_clsp.addColumn("usermemoyn", "string");
- ds_list3_clsp.addColumn("calcscorcd", "string");
- for(var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- ds_list3_clsp.setColumn(i, "calcscorcd", ds_list3_clsp.getColumn(i, "snglcalcscorcd"));
-
- var spclLnNo = ds_list3_clsp.getColumn(i, "seqno");
-
- if ( !utlf_isNull(spclLnNo))
- {
- if (spclLnNo.substr(0, 1) == "D")
- {
- ds_list3_clsp.setColumn(i, "seqno", spclLnNo.substr(1, spclLnNo.length));
- }
- }
- }
- }
- else
- {
- saveNoMsg += "[특정내역] ";
- }
- ds_list3_clsp.updatecontrol = true;
- }
- else
- {
- isValidCheck = false;
- }
- var amtchk = 0;
- var chkCount = 0;
- var arrLinno = new Array();
-
- if (lf_fCheckSaveInAftJudgInfoCLOD())
- {
- if(ds_list2_clod.rowcount > -1)
- {
-
- ds_list2_clod.updatecontrol = false;
- ds_list2_clod.enableevent = false;
- ds_list2_clod.addColumn("hospaddamt", "BIGDECIMAL");
- for( var i = 0; i < ds_list2_clod.rowcount; i++)
- {
- if(ds_list2_clod.getColumn(i, "payflag") == "-")
- {
- ds_list2_clod.setColumn(i, "payflag", "0");
- }
- ds_list2_clod.setColumn(i, "hospaddamt", ds_list2_clod.getColumn(i, "edihospaddamt"));
-
- var ediamt = ds_list2_clod.getColumn(i, "ediamt");
- var ediunitcost = ds_list2_clod.getColumn(i, "ediunitcost");
- var edidrugqty = parseFloat(ds_list2_clod.getColumn(i, "edidrugqty"));
- var tims = ds_list2_clod.getColumn(i, "tims");
- var edidayno = ds_list2_clod.getColumn(i, "edidayno");
-
- if (ediamt != utlf_round(ediunitcost * (edidrugqty * tims * edidayno), -1) ) {
- lf_setAlramMessage("줄번호:" + ds_list2_clod.getColumn(i, "edilnno") + ", 금액오류 발견 " + ediamt + "(" + (ediunitcost * (edidrugqty * tims * edidayno)).toFixed(0) +") ");
- amtchk++;
- }
- //시작일자 단가와 종료일자 단가비교해서 다르면 팝업하는 로직 추가 by 설승민 2019/12/13
- if(ds_main_item1_clbs.getColumn(0,"ioflag") == "I" && ds_list2_clod.getColumn(i,"matractflag") == "4" && (ds_list2_clod.getRowType(i) == '2' || ds_list2_clod.getRowType(i) == '4'
- || ds_list2_clod.getColumn(i,"rowstat") == "U" || ds_list2_clod.getColumn(i,"rowstat") == "I")){
-
- ds_send_mechchk.clearData();
- ds_send_mechchk.addRow();
-
- ds_send_mechchk.setColumn(0,"instcd",ds_main_item1_clbs.getColumn(0,"instcd"));
- ds_send_mechchk.setColumn(0,"insukind",ds_main_item1_clbs.getColumn(0,"insukind"));
- ds_send_mechchk.setColumn(0,"snglcalcscorcd",ds_list2_clod.getColumn(i,"snglcalcscorcd"));
- ds_send_mechchk.setColumn(0,"clbsordfromdd",ds_list2_clod.getColumn(i,"ordfromdd"));
- ds_send_mechchk.setColumn(0,"clbsordtodd",ds_list2_clod.getColumn(i,"ordtodd"));
-
- var oParam = {};
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetMechDrgChk";
- oParam.inds = "req=ds_send_mechchk";
- oParam.outds = "ds_main_mechfromchk=mechFromChk ds_main_mechtochk=mechToChk";
- oParam.async = false;
- tranf_submit(oParam);
-
- if(ds_main_mechfromchk.getColumn(0,"insurbpnt") != ds_main_mechtochk.getColumn(0,"insurbpnt")){
- arrLinno[chkCount] = ds_list2_clod.getColumn(i,"edilnno");
- chkCount++;
- }
- }
-
- }
- if(chkCount > 0){
- var ans = sysf_messageBox("줄번호 " + arrLinno +"번 변경일자와 실시시작일의 단가가 상이합니다. 계속진행" ,"S001");
- if (ans == 6){
- }else{
- isValidCheck = false;
- }
- chkCount = 0;
- }
- ds_list2_clod.enableevent = true;
- ds_list2_clod.updatecontrol = true;
-
- }
- else
- {
- saveNoMsg += "[처방] ";
- }
- }
- else
- {
- isValidCheck = false;
- }
-
- if (amtchk != 0) {
- var ans = sysf_messageBox("금액 오류사항이 있습니다. 계속진행", "S001"); ///수정사항이 있습니다. 저장하시려면 예(Yes)\n아니면 아니오(No)
-
- if (ans == 6)
- {
-
- } else {
- isValidCheck = false;
- }
- }
-
-
-
- if (lf_fCheckSaveOutAftJudgInfoCLOP())
- {
- // 원외처방
- if (ds_list7_clop.rowcount > 0)
- {
- ds_send_item1_clbs.addColumn("reclopedilnnoyn", "string");
- saveOkMsg += "[원외처방] ";
- ds_send_item1_clbs.setColumn(0,"reclopedilnnoyn","Y")
- }
- else
- {
- saveNoMsg += "[원외처방] ";
- }
- }
- else
- {
- isValidCheck = false;
- }
-
- if (lf_fCheckSaveReClamChangeAmt())
- {
- var resncd = lf_fSetReClamChgAmtResncd();
-
- if (!utlf_isNull(resncd))
- {
- saveOkMsg += "[재청구 차액발생사유] ";
- }
- else
- {
- saveNoMsg += "[재청구 차액발생사유] ";
- }
- }
-
- var drgyn = ds_main_item1_clbs.getColumn(0, "drgyn");
- if (drgyn == 'Y') {
- ds_send_item1_clbs.setColumn(0, "recalcyn", "N");; // 저장 시에 재계산할지 여부를 설정함
- } else {
- ds_send_item1_clbs.setColumn(0, "recalcyn", "Y"); // 저장 시에 재계산할지 여부를 설정함
- }
-
- if (grp_biz.btn_end.enable == false && ds_main_item1_clbs.getColumn(0, "judgendyn") == "D") {
- sysf_messageBox("버튼이 비활성화 이거나 심사일로 부터 15일이 경과 된 경우 완료 할 수", "I004");
- return false;
- }
- // 중증, 산정특례 여부 체크
- if (lf_fGetDiagSpclcdCheck() == false) {
- isValidCheck = false;
- return false;
- } else {
- }
-
- if (String(clamdg).substr(0,2) == "10" && clamflagcd != String(clamdg).substr(0,1)) {
- sysf_messageBox("청구차수와 청구구분이 달라 저장", "I004");
- isValidCheck = false;
- }
-
- //추가청구 반송건은 보완삭제 후 추가청구 해야 합니다.
-
-
- if ( isValidCheck )
- {
- if (!utlf_isNull(saveOkMsg) )
- {
- ds_send_item1_clbs.addColumn("insukind", "string");
- ds_send_item1_clbs.setColumn(0, "insukind", ds_main_item1_clbs.getColumn(0, "insukind"));
-
- if (utlf_isNull(ds_send_item1_clbs.getColumn(0, "clbtworkflag")))
- {
- ds_send_item1_clbs.setColumn(0, "clbtworkflag", ds_main_item1_clbs.getColumn(0, "clbtworkflag"));
- }
- // dsf_setDefaultVal(ds_send_delmemo, "delclsoyn:N");
- dsf_setDefaultVal(ds_send_list10_judgmemo, "usermemoyn:Y,unitflag:M,spclcd:MX999,clsoyn:N");
- dsf_setDefaultVal(ds_send_list11_edimemo, "usermemoyn:N,unitflag:M,spclcd:MX999,clsoyn:N");
- dsf_setDefaultVal(ds_send_item1_clbs, "insuno:-,certno:-,rsvordgubn:N,ownbflag:-,oprcpdayno:0,direcprcptims:0,ordtims:0,prockindflag:-,offcharm:0,reclopedilnnoyn:N,fixrateyn:-,suppkindchgresn:-,rareobstflag:-");
- dsf_setDefaultVal(ds_send_item3_lnunitmemo, "usermemoyn:N,unitflag:J,spclcd:JX999,clsoyn:N,workflag:12");
-
- ds_list3_clsp.updatecontrol = false;
- dsf_setDefaultVal(ds_list3_clsp, "usermemoyn:N,clsoyn:N,mpsno:-");
- ds_list3_clsp.updatecontrol = true;
-
- ds_list2_clod.updatecontrol = false;
- ds_list2_clod.enableevent = false;
- dsf_setDefaultVal(ds_list2_clod, "basecd:-,estmmncd:0000,updtdd:-,toot:-,hosinresncd:00,adjtresncd:-,adjtresndesc:-,edicd:-,prcpflag:1,spcljudgyn:N,calcappyn:Y,payflag:0,hospaddamt:0");
- ds_list2_clod.enableevent =true;
- ds_list2_clod.updatecontrol = true;
-
- ds_list7_clop.updatecontrol = false;
- ds_list7_clop.enableevent = false;
- dsf_setDefaultVal(ds_list7_clop, "adjtresncd:-");
- ds_list7_clop.enableevent =true;
- ds_list7_clop.updatecontrol = true;
- var oParam = {};
- oParam.id = "TXPID20301";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqExeInAftJudg";
- oParam.inds = "clbs=ds_send_item1_clbs judgmemo=ds_send_list10_judgmemo edimemo=ds_send_list11_edimemo lnunitmemo=ds_send_item3_lnunitmemo cldi=ds_list1_cldi:U clsp=ds_list3_clsp:U clod=ds_list2_clod:U pifhiunc=ds_send_item8_pifhiunc clop=ds_list7_clop:U delmemo=ds_send_item3_delclsp";
- oParam.async = false;
- oParam.callback = "cf_TXPID20301";
-
- tranf_submit(oParam);
- if (arErrorCode.pop("TXPID20301") > -1){
- if (insukindcd == "11" || insukindcd == "21" || insukindcd == "22") {
- ds_main_clod_chk.clearData();
- var oParam = {};
- oParam.id = "TRPID20601";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetPidhclodCostChk";
- oParam.inds = "req=ds_send_item1_clbs";
- oParam.outds = "ds_main_clod_chk=getPidhclodCostChk";
- oParam.async = false;
- tranf_submit(oParam);
- if (ds_main_clod_chk.rowcount > 0) {
- for( var i = 0; i < ds_main_clod_chk.rowcount; i++)
- {
- var edilnno = ds_main_clod_chk.getColumn(i, "edilnno");
- var ediunitcost = ds_main_clod_chk.getColumn(i, "ediunitcost");
- var mechunitcost = ds_main_clod_chk.getColumn(i, "mechunitcost");
- var snglcalcscorcd = ds_main_clod_chk.getColumn(i, "snglcalcscorcd");
-
- lf_setAlramMessage("줄번호:" + edilnno + ", 단가오류 발견 현재: " + ediunitcost + "(수가: " + mechunitcost +") [" + snglcalcscorcd + "]");
- }
- return false;
- }
- }
- if (judgendyn == "B")
- {
- var selectedRow = lgv_ds_rslt.getColumn(0, "selectedRow");
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
- var clamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
- var pidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
- var tootpopupyn = "";
- // 저장 후 결과를 다시 조회하기 위해
- lgv_ds_rslt.clearData();
- lgv_ds_rslt.addRow();
- lgv_ds_rslt.setColumn(0, "clamym", clamym);
- lgv_ds_rslt.setColumn(0, "clamdg", clamdg);
- lgv_ds_rslt.setColumn(0, "pid" , pid);
- lgv_ds_rslt.setColumn(0, "pidsn" , pidsn);
- lgv_ds_rslt.setColumn(0, "selectedRow", selectedRow);
- lgv_ds_rslt.setColumn(0, "cutprcpyn", cutprcpyn);
- ds_hidden.setColumn(0, "reselect", "N");
- lf_fGetAftJudgMngt(lgv_ds_rslt);
- lf_fSetJudgSaveState("B"); // 심사완료여부 (P0151) - B: 심사중
- }
- return "true";
- }
- } else if (saveNoMsg) {
- if (judgendyn != "B")
- {
- return "false";
- }
- }
- }
- else
- {
- for ( var j = 0; j < ds_list1_cldi.rowcount; j++ )
- {
- if (ds_list1_cldi.getRowType(j) == 8)
- {
- var diagseq = ds_list1_cldi.getColumn(j, "diagseq");
- ds_list1_cldi.setColumn(j, "diagseq", "D" + diagseq);
- }
- }
- if (ds_list1_cldi.rowcount == 1)
- {
- lf_fSpclGridInsertRow();
- }
- }
-
- }
- else
- {
- sysf_messageBox("변경된 정보를 저장할 사후심사 대상자가", "I004");
- return null;
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 저장시 체크 함수
- ****************************************************************************************/
- function lf_fCheckSaveInAftJudgCLBS()
- {
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "clamym")))
- {
- sysf_messageBox("청구년월이", "I004");
- return false;
- }
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "clamdg")))
- {
- sysf_messageBox("청구차수가", "I004");
- return false;
- }
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "pid")))
- {
- sysf_messageBox("등록번호가", "I004");
- return false;
- }
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "patnm")))
- {
- sysf_messageBox("환자이름이", "I004");
- return false;
- }
- var patrrgstno = ds_main_item1_clbs.getColumn(0, "patrrgstno");
-
- if (String(patrrgstno).length != 13)
- {
- sysf_messageBox("주민번호가", "E016");
- return false;
- }
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "patrrgstno")))
- {
- sysf_messageBox("주민번호가", "I004");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "insukindcd")))
- {
- sysf_messageBox("보험유형이", "I004");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "suppkindcd")))
- {
- sysf_messageBox("보조유형이", "I004");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "payownbrate")))
- {
- sysf_messageBox("올바른 보조유형을", "C002");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "ordfildcd")))
- {
- sysf_messageBox("진료분야가", "I004");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "orddeptcd")))
- {
- sysf_messageBox("진료과가", "I004");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "orddrid")))
- {
- sysf_messageBox("주치의가", "I004");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "arvpathcd")))
- {
- sysf_messageBox("도착경로가", "I004");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "inpathcd")))
- {
- sysf_messageBox("입원경로가", "I004");
- return false;
- }
-
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "ordrsltcd")))
- {
- sysf_messageBox("진료결과가", "I004");
- return false;
- }
- if (utlf_isNull(ds_main_item1_clbs.getColumn(0, "insuno")))
- {
- sysf_messageBox("조합기호가", "I004");
- return false;
- }
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 심사자메모, EDI청구메모를 특정내역 형식에 맞춰 설정한다.
- ****************************************************************************************/
- function lf_fSetJudgEDIMemo(spclmemo, usermemoyn)
- {
- var delclspNode = ds_send_item3_delclsp; //instance1.selectSingleNode("/root/send/item3/delclsp");
-
- var max = delclspNode.addRow();
- dsf_makeValue(ds_send_item3_delclsp, "delunitflag", "string", "M", max);
- dsf_makeValue(ds_send_item3_delclsp, "delspclcd", "string", "MX999", max);
- dsf_makeValue(ds_send_item3_delclsp, "delusermemoyn", "string", usermemoyn, max);
- dsf_makeValue(ds_send_item3_delclsp, "delcalcscorcd", "string", "", max);
- dsf_makeValue(ds_send_item3_delclsp, "deledilnno", "string", "", max);
- dsf_makeValue(ds_send_item3_delclsp, "delseqno", "string", "", max);
- dsf_makeValue(ds_send_item3_delclsp, "delclsoyn", "string", "N", max);
- dsf_makeValue(ds_send_item3_delclsp, "delmpsno", "string", "", max);
-
- var item3Path = "";
- var item3Node = "";
- var repeat = "";
-
- if (usermemoyn == "Y")
- {
- item3Path = ds_send_list10_judgmemo; // "/root/send/item3/judgmemo[";
- item3Node = "judg";
- repeat = ds_main_item1_memo.getColumn(0, "judgmemorepeat");
- }
- else
- {
- item3Path = ds_send_list11_edimemo // "/root/send/item3/edimemo[";
- item3Node = "edi";
- repeat = ds_main_item1_memo.getColumn(0, "edimemorepeat");
- }
-
- var iSpclCdCnt = 0;
- var iSpclCdTotLength = utlf_getStringLength(spclmemo);
- var insCharTotCnt = 0;
- var insusermemoyn = (item3Node == "judg" ? "Y" : "N");
-
- if (iSpclCdTotLength > 350)
- {
- var iLen = 0;
- var iStartInx = 0;
- var iCharCnt = 0;
-
- for (var i = 0; i < spclmemo.length; i++)
- {
- var sBit = spclmemo.charAt(i);
- iCharCnt++;
-
- if (escape(sBit).length > 4)
- {
- iLen = iLen + 2;
- } else {
- iLen = iLen + 1;
- }
-
- if (iLen == 350 || iLen > 350)
- {
- iSpclCdCnt = item3Path.addRow();
-
- if (iLen == 350)
- {
- dsf_makeValue(item3Path, "spclspec", "string", spclmemo.substr(iStartInx, iCharCnt), iSpclCdCnt); //model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node +"spclspec", spclmemo.substr(iStartInx, iCharCnt));
- dsf_makeValue(item3Path, "rowstat", "string", repeat, iSpclCdCnt); //model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node +"rowstat", repeat);
- dsf_makeValue(item3Path, "unitflag", "string", "M", iSpclCdCnt);
- dsf_makeValue(item3Path, "spclcd", "string", "MX999", iSpclCdCnt);
- dsf_makeValue(item3Path, "clsoyn", "string", "N", iSpclCdCnt);
- dsf_makeValue(item3Path, "usermemoyn", "string", insusermemoyn, iSpclCdCnt);
- iStartInx += iCharCnt;
- insCharTotCnt += 350;
- }
- else if (iLen > 350)
- {
- dsf_makeValue(item3Path, "spclspec", "string", spclmemo.substr(iStartInx, iCharCnt - 1), iSpclCdCnt); //model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node +"spclspec", spclmemo.substr(iStartInx, iCharCnt - 1));
- dsf_makeValue(item3Path, "rowstat", "string", repeat, iSpclCdCnt); //model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node +"rowstat", repeat);
- dsf_makeValue(item3Path, "unitflag", "string", "M", iSpclCdCnt);
- dsf_makeValue(item3Path, "spclcd", "string", "MX999", iSpclCdCnt);
- dsf_makeValue(item3Path, "clsoyn", "string", "N", iSpclCdCnt);
- dsf_makeValue(item3Path, "usermemoyn", "string", insusermemoyn, iSpclCdCnt);
- iStartInx += (iCharCnt - 1);
-
- i--;
- insCharTotCnt += 349;
- }
- iCharCnt = 0;
- iLen = 0;
- }
- }
-
- if (iSpclCdTotLength != insCharTotCnt)
- {
- iSpclCdCnt = item3Path.addRow();
-
- dsf_makeValue(item3Path, "spclspec", "string", spclmemo.substring(iStartInx, spclmemo.length), iSpclCdCnt); //model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node +"spclspec", spclmemo.substring(iStartInx, spclmemo.length));
- dsf_makeValue(item3Path, "rowstat", "string", repeat, iSpclCdCnt); //model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node +"rowstat", repeat);
- dsf_makeValue(item3Path, "unitflag", "string", "M", iSpclCdCnt);
- dsf_makeValue(item3Path, "spclcd", "string", "MX999", iSpclCdCnt);
- dsf_makeValue(item3Path, "clsoyn", "string", "N", iSpclCdCnt);
- dsf_makeValue(item3Path, "usermemoyn", "string", insusermemoyn, iSpclCdCnt);
- }
- }
- else if (iSpclCdTotLength > 0)
- {
- iSpclCdCnt = item3Path.addRow();
-
- dsf_makeValue(item3Path, "spclspec", "string", spclmemo, iSpclCdCnt); //model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node +"spclspec", spclmemo);
- dsf_makeValue(item3Path, "rowstat", "string", repeat, iSpclCdCnt); //model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node +"rowstat", repeat);
- dsf_makeValue(item3Path, "unitflag", "string", "M", iSpclCdCnt);
- dsf_makeValue(item3Path, "spclcd", "string", "MX999", iSpclCdCnt);
- dsf_makeValue(item3Path, "clsoyn", "string", "N", iSpclCdCnt);
- dsf_makeValue(item3Path, "usermemoyn", "string", insusermemoyn, iSpclCdCnt);
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 처방 휴지통 버튼 이벤트 -> 미개발
- ****************************************************************************************/
- function grp_biz_btn_delordlist_onclick(obj:Button, e:ClickEventInfo)
- {
-
- }
- /****************************************************************************************
- * Argument : button
- * Description : 처방 심사변경 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_delordsrch_onclick(obj:Button, e:ClickEventInfo)
- {
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
-
- if (!utlf_isNull(clamym))
- {
- var sppid21800 = new Object();
- sppid21800.sClamym = ds_main_item1_clbs.getColumn(0, "clamym");
- sppid21800.sClamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- sppid21800.sPid = ds_main_item1_clbs.getColumn(0, "pid");
- sppid21800.sPidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
-
- frmf_open("SPPID21800", "SPPID21800", sppid21800, "", "", "", "", "", "", "", "", "", "M");
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 처방 심사전 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_bfjudgdocu_onclick(obj:Button, e:ClickEventInfo)
- {
- if(ds_main_item1_clbs.getColumn(0, "ioflag") == "O")
- {
- lf_fBfjudgdocu();
- }
- else
- {
- fBfjudgdocu();
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 처방 심사전 버튼 이벤트
- ****************************************************************************************/
- function lf_fActivatePreDocuWindow(ds)
- {
- var openerClamym = ds.getColumn(0, "clamym");
- var openerClamdg = ds.getColumn(0, "clamdg");
- var openerPid = ds.getColumn(0, "pid");
- var openerPidsn = ds.getColumn(0, "pidsn");
- var openerCutprcpyn = ds.getColumn(0, "cutprcpyn");
- var openerWorkflag = ds.getColumn(0, "workflag");
-
- if (!utlf_isNull(openerClamym))
- {
- ds_send_item1_clbs.setColumn(0, "clamym" , openerClamym);
- ds_send_item1_clbs.setColumn(0, "clamdg" , openerClamdg);
- ds_send_item1_clbs.setColumn(0, "pid" , openerPid);
- ds_send_item1_clbs.setColumn(0, "pidsn" , openerPidsn);
- ds_send_item1_clbs.setColumn(0, "cutprcpyn" , openerCutprcpyn);
- ds_send_item1_clbs.setColumn(0, "ioflag" , lgv_ioflag);
- ds_send_item1_clbs.setColumn(0, "workflag" , openerWorkflag);
- // 심사대상자조회
- var oParam = {};
- oParam.id = "TRPID20301";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetInAftJudgTrgtMan_xp";
- oParam.inds = "req=ds_send_item1_clbs";
- oParam.outds = "ds_main_item1_clbs=clbs";
- oParam.async = false;
- oParam.callback = "lf_fSetAftJudgTrgtManSrchData";
- tranf_submit(oParam);
-
- }
- else
- {
- // fCheckAuth(); // 화면 권한을 설정한다.
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 처방 행추가
- ****************************************************************************************/
- function grp_biz_btn_clodinsert_onclick(obj:Button, e:ClickEventInfo)
- {
- // 행추가
- lf_fOrderGridInsertRow();
- }
- /****************************************************************************************
- * Argument : button
- * Description : 처방 행복사
- ****************************************************************************************/
- function grp_biz_btn_clodcopy_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_fOrderGridCopyRow();
- }
- /****************************************************************************************
- * Argument : function
- * Description : 처방 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 복사"
- ****************************************************************************************/
- function lf_fOrderGridCopyRow()
- {
- var clodrow = ds_list2_clod.rowposition;
- var iRow = ds_list2_clod.insertRow(++clodrow);
- ds_list2_clod.copyRow(iRow, ds_list2_clod, iRow-1);
- ds_list2_clod.setColumn(iRow, "rowstat", "");
- ds_list2_clod.setColumn(iRow, "cnfmcd", "");
-
- // seqno 셋팅
- var maxseqno = ds_rslt_maxseqno.getColumn(0, "seqno");
- ds_list2_clod.setColumn(iRow, "seqno", maxseqno);
- ds_rslt_maxseqno.setColumn(0, "seqno", parseInt(maxseqno)+1);
- ds_list2_clod.setColumn(iRow, "edilnno", "0");
-
- var newcd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
-
- if (newcd)
- {
- ds_list2_clod.setColumn(iRow, "adjtresncd", newcd);
- }
- else
- {
- newcd = ds_list2_clod.getColumn(iRow, "adjtresncd");
-
- if (newcd)
- {
- ds_list2_clod.setColumn(iRow, "adjtresncd", newcd);
- }
- else
- {
- newcd = lf_fSetAdjtResnCd();
-
- if (utlf_isNull(newcd) || newcd == "-")
- {
- ds_list2_clod.deleteRow(iRow); // 처방 Grid에서 해당 라인을 삭제한다.
- return;
- }
- }
- }
- // 처방 Grid 타이틀을 이용해서 sorting 한 경우 줄번호가 현재 정렬된 순서대로 부여되므로 다시 sort하여 처리한다.
- lf_fSetOrderLnNo();
- }
- /****************************************************************************************
- * Argument : function
- * Description : 심사사유, 조정사유, 수정사유 입력
- ****************************************************************************************/
- function lf_fSetAdjtResnCdClop()
- {
- var oldcd = ds_list7_clop.getColumn(ds_list7_clop.rowposition, "adjtresncd");
-
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftout";
- sppiz01000.sCdid = oldcd;
- sppiz01000.sAdjtresndesc = "";
-
- // SPPIZ01000_심사수정사유관리.xrw
- var objArg = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
- if (!utlf_isNull(objArg))
- {
- var newcd = objArg.sCdid;
- var newdesc = objArg.sAdjtresndesc;
-
- if (newcd)
- {
- for ( var i = 0; i < ds_list7_clop.rowcount; i++)
- {
- var sRow = ds_list7_clop.getSelect(i);
-
- if ( sRow == true )
- {
- ds_list7_clop.setColumn(i, "adjtresncd", newcd);
-
- if (newcd != oldcd)
- {
- if ( ds_list7_clop.getRowType(i) == 1 )
- {
- ds_list7_clop.updatecontrol = false;
- ds_list7_clop.setRowType(i, "u");
- ds_list7_clop.updatecontrol = true;
- }
- }
- }
- }
- }
- return newcd;
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 처방 행삭제
- ****************************************************************************************/
- function grp_biz_btn_cloddelete_onclick(obj:Button, e:ClickEventInfo)
- {
- // 행삭제
- lf_fOrderGridDeleteRow();
- }
- /****************************************************************************************
- * Argument : button
- * Description : 처방 행삭제
- ****************************************************************************************/
- function grp_biz_btn_initfilter_onclick(obj:Button, e:ClickEventInfo)
- {
- // 처방 Grid 필터용 조회조건을 초기화한다.
- lf_fInitOrderFilter();
- lf_fGetSelectedOrderData();
-
- // 필터초기화버튼 클릭시 급여구분이 "급여"가 아니면 급여로 처방을 다시 조회한다.
- if ( ds_hidden_list2_clodsrch.getColumn(0, "selectedRdoPay") != 0 )
- {
- lf_fClodSelectByPayflag();
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 처방 Grid 필터용 조회조건을 초기화한다.
- ****************************************************************************************/
- function lf_fInitOrderFilter()
- {
- // 처방Grid용 조회부의 Radio 초기값을 "전체"로 설정한다.
- ds_hidden_list2_clodsrch.clearData();
- ds_hidden_list2_clodsrch.addRow();
- ds_hidden_list2_clodsrch.setColumn(0, "selectedRdoPay" , "0");
- ds_hidden_list2_clodsrch.setColumn(0, "selectedRdoItem" , "-");
- }
- /****************************************************************************************
- * Argument : button
- * Description : 하단 우측 화살표 버튼 이벤트 "<<"
- ****************************************************************************************/
- function grp_biz_btn_pretrgtman_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_fClickPrevNext("P");
- }
- function grp_biz_btn_nexttrgtman_onclick(obj:Button, e:ClickEventInfo){
- lf_fClickPrevNext("N");
- }
- /****************************************************************************************
- * Argument : function
- * Description :
- ****************************************************************************************/
- function lf_fGetAftJudgMngt(grd_clbsmast)
- {
- var clamym = grd_clbsmast.getColumn(0, "clamym");
- var clamdg = grd_clbsmast.getColumn(0, "clamdg");
- var pid = grd_clbsmast.getColumn(0, "pid");
- var pidsn = grd_clbsmast.getColumn(0, "pidsn");
- var selectedRow = grd_clbsmast.getColumn(0, "selectedRow");
- var judgenddd = grd_clbsmast.getColumn(0, "judgenddd");
- var cutprcpyn = grd_clbsmast.getColumn(0, "cutprcpyn");
-
- if (!utlf_isNull(clamym))
- {
-
- var rslt = lf_fInitSrchData(); // 화면을 초기화한다.
- if (rslt == false)
- {
- // 수정사항 저장이 완료되지 않아 초기화할 수 없는 경우
- return false;
- }
-
- ds_send_item1_clbs.clearData();
- ds_send_item1_clbs.addRow();
- ds_send_item1_clbs.setColumn(0, "clamym" , clamym);
- ds_send_item1_clbs.setColumn(0, "clamdg" , clamdg);
- ds_send_item1_clbs.setColumn(0, "pid" , pid);
- ds_send_item1_clbs.setColumn(0, "pidsn" , pidsn);
- ds_send_item1_clbs.setColumn(0, "workflag" , "12");
- ds_send_item1_clbs.setColumn(0, "ioflag" , lgv_ioflag);
- ds_send_item1_clbs.setColumn(0, "cutprcpyn" , cutprcpyn);
-
- // 20100328 치식팝업
- if (lgv_ioflag == "O")
- {
- var judgendyn = grd_clbsmast.getColumn(0, "judgendyn");
- var tootpopupyn = grd_clbsmast.getColumn(0, "tootpopupyn");
- ds_send_item1_clbs.addColumn("tootpopupyn", "STRING");
- ds_send_item1_clbs.setColumn(0, "tootpopupyn", tootpopupyn);
- grd_clbsmast.setColumn(0, "judgendyn", judgendyn);
- }
- else
- {
- var cretno = grd_clbsmast.getColumn(0, "cretno");
- var popupcallyn = grd_clbsmast.getColumn(0, "popupcallyn");
- ds_send_item1_clbs.setColumn(0, "cretno" , cretno);
- ds_send_item1_clbs.setColumn(0, "popupcallyn" , popupcallyn);
- }
-
- // 20100302 삭감조회 여부
- if (!utlf_isNull(cutprcpyn))
- {
- ds_send_item1_clbs.addColumn("cutviewyn", "STRING");
- ds_send_item1_clbs.setColumn(0, "cutviewyn", "Y");
- }
- else
- {
- ds_send_item1_clbs.addColumn("cutviewyn", "STRING");
- ds_send_item1_clbs.setColumn(0, "cutviewyn", "N");
- }
-
- // 심사대상자조회
- var oParam = {};
- oParam.id = "TRPID20301";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetInAftJudgTrgtMan_xp";
- oParam.inds = "req=ds_send_item1_clbs";
- oParam.outds = "ds_main_item1_clbs=clbs";
- oParam.async = false;
- oParam.callback = "lf_fSetAftJudgTrgtManSrchData";
- tranf_submit(oParam);
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 초기화
- ****************************************************************************************/
- function lf_fInitSrchData()
- {
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
- var clamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
- var pidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
-
- if (!utlf_isNull(clamym))
- {
- var judgendyn = ds_main_item1_clbs.getColumn(0, "judgendyn");
- if (judgendyn == "B")
- {
- var clamendyn = ds_main_item1_clbs.getColumn(0, "clamendyn");
- var lockyn = ds_main_item1_clbs.getColumn(0, "lockyn");
-
- if (lockyn == "N")
- {
- // 청구완료여부 A:샘생성전
- if ( grp_biz.btn_save.enable == true || grp_biz.btn_unjudg.enable == true)
- {
- var rslt = lf_fCheckChangeSave();
- if (rslt == false)
- {
- return false;
- }
- if ( ds_hidden.getColumn(0, "reselect") == "N" || utlf_isNull(ds_hidden.getColumn(0, "reselect")))
- {
- var judgendyn = "";
-
- if ( utlf_isNull(ds_hidden.getColumn(0, "orgjudgendyn")))
- {
- judgendyn = "A";
- }
- else
- {
- judgendyn = ds_hidden.getColumn(0, "orgjudgendyn");
- }
-
- ds_send_item4_endclbs.clearData();
- ds_send_item4_endclbs.addRow();
- ds_send_item4_endclbs.setColumn(0, "clamym", clamym);
- ds_send_item4_endclbs.setColumn(0, "clamdg", clamdg);
- ds_send_item4_endclbs.setColumn(0, "pid", pid);
- ds_send_item4_endclbs.setColumn(0, "pidsn", pidsn);
- ds_send_item4_endclbs.setColumn(0, "judgendyn", judgendyn);
-
- var oParam = {};
- oParam.id = "TXPID20302";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqSetPidmclbsJudgEndYNAll";
- oParam.inds = "endclbs=ds_send_item4_endclbs";
- oParam.async = false;
- tranf_submit(oParam);
-
- // 대상자조회 심사상태 변경
- lf_fSetJudgSaveState(judgendyn);
- }
-
- }
- }
- }
- }
- lf_fInitUIControlSize();
-
- // 대상자 화면과 이전명세서 화면을 제외한 자식창을 닫는다.
- var judgWindow1 = frmf_getChildWindow("SMPID20400");// SMPID20400_외래사후심사대상자조회.xrw
- var judgWindow2 = frmf_getChildWindow("SMPID20500");// SMPID20500_외래사후심사관리.xrw
- var judgWindow3 = frmf_getChildWindow("SMMMI00100");// SMMMI00100_통합검사결과조회.xrw
- var judgWindow4 = frmf_getChildWindow("SMMMO02500");// SMMMO02500_통합처방조회.xrw
- var judgWindow5 = frmf_getChildWindow("SMMRI00400");// SMMRI00400_통합기록조회.xrw
-
- if ( utlf_isNull(judgWindow1) && utlf_isNull(judgWindow2) && utlf_isNull(judgWindow3) && utlf_isNull(judgWindow4) && utlf_isNull(judgWindow5))
- {
- var childCnt = frmf_getChildPopList(this); //폼에서 열린 팝업 목록을 가져온다.
- }
- else
- {
- }
-
- ds_send_item1_clbs.clearData();
- ds_main_item1_clbs.clearData();
- ds_grd_msg.clearData();
- ds_main_item1_memo.clearData();
- ds_item2_incd.clearData();
- ds_item3_supp.clearData();
- ds_list1_cldi.clearData();
- ds_list2_clod.clearData();
- ds_list3_clsp.clearData();
- ds_main_item5_mech.clearData();
- ds_list4_clbs.clearData();
- ds_hidden_list4_clbs.clearData();
- ds_list5_clod.clearData();
- ds_list6_delclod.clearData();
- ds_list7_clop.clearData();
- ds_rslt_aftjudgbtn.clearData();
- ds_rslt_maxseqno.clearData();
- ds_rslt_clopmaxseqno.clearData();
- ds_rslt_clbt.clearData();
- ds_rslt_mmohdiag1.clearData();
- ds_rslt_mmohdiag2.clearData();
- ds_rslt_nbwt.clearData();
- ds_rslt_dupid.clearData();
-
- ds_hidden_rarecancermsg.clearData();
- ds_tmpsrch.clearData();
- ds_send_item3_delclsp.clearData();
- ds_send_list10_judgmemo.clearData();
- ds_send_list11_edimemo.clearData();
- ds_init_cmb_rarecancermsg.clearData();
- ds_list9_trnpt.clearData();
- ds_send_item8_pifhiunc.clearData();
-
- ds_send_item1_clbs.addRow();
- ds_main_item1_clbs.addRow();
- ds_main_item1_memo.addRow();
- ds_item2_incd.addRow();
- ds_item3_supp.addRow();
- ds_list1_cldi.addRow();
- ds_list2_clod.addRow();
- ds_list3_clsp.addRow();
- ds_main_item5_mech.addRow();
- ds_list4_clbs.addRow();
- ds_list5_clod.addRow();
- ds_list6_delclod.addRow();
- ds_list7_clop.addRow();
- ds_send_item8_pifhiunc.addRow();
-
- ds_hidden_rarecancermsg.addRow();
- ds_tmpsrch.addRow();
-
- grp_biz.swt_spclmemo.case_spclspec.chk_JT001.value = "Y";
-
- grdf_clearSort(grp_biz.grd_cldihist);
- grdf_clearSort(grp_biz.grd_clodhist);
- grdf_clearSort(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist);
- grdf_clearSort(grp_biz.grd_oprcphist);
-
- cmb_rarecancermsg.visible = true;
- // 심사완료여부 상태에 따라 "저장 / 재계산 / 완료 / 미심 / 보류 / 삭제" Btn 권한을 설정한다.
- lf_fSetJudgStatBtnAuth()
-
- // 조회 조건의 초기값을 설정한다. 특정내역Grid용 필터링 Radio 초기값
- ds_hidden_list3.setColumn(0, "selectedUnitFlag", "-");
-
- // 처방 조회부 항목구분 Radio item의 굵은 표시를 취소한다. [2012.10.26] 김경연 주석풀음
- for (var i=0; i < ds_init_ordfilflag.rowcount; i++)
- {
- ds_init_ordfilflag.setColumn(i, "color", "");
- ds_init_ordfilflag.setColumn(i, "font", "");
- }
-
- // 처방Grid 필터용 조회조건을 초기화한다.
- lf_fInitOrderFilter();
-
- grp_sea00.cmb_orddeptcd.innerdataset = "ds_init_orddeptcd2";
- grp_sea00.cmb_orddeptcd.codecolumn = "cd";
- grp_sea00.cmb_orddeptcd.datacolumn = "nm";
-
- grp_sea00.cmb_orddrid.innerdataset = "ds_init_orddrid2";
- grp_sea00.cmb_orddrid.codecolumn = "cd";
- grp_sea00.cmb_orddrid.datacolumn = "nm";
-
- grp_msg.visible = false;
- grp_desc.visible = false;
- ds_main_item1_clbs.setColumn(0, "adjtresndesc", "");
- ds_hidden_list7_clop.setColumn(0, "selectedRdoPay", "0");
-
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 기존 조회 내역 중 수정 사항이 있는 경우 저장할 것인지를 물어본다.
- ****************************************************************************************/
- function lf_fCheckChangeSave()
- {
- var isChange = false;
- var cldiupdtdata = ""; // 상병 Grid 변경
- var clbsupdatadata = false;
- var ioflag = ds_main_item1_clbs.getColumn(0, "ioflag");
- clbsupdatadata = dsf_datasetUpdateChk(ds_main_item1_clbs);
-
- var clopupdtdata = 0;
- var clodupdtdata = 0;
-
- if (clbsupdatadata == false)
- {
- clodupdtdata = grdf_getGridUpdateData(grp_biz.grd_clodhist).rowcount;
-
- if(ioflag == "O")
- {
- clopupdtdata = grdf_getGridUpdateData(grp_biz.grd_oprcphist).rowcount;
- }
-
- if (clodupdtdata != 0 || clopupdtdata != 0)
- {
- // 처방, 원외처방이 수정된 경우
- isChange = true;
- }
- else
- {
- // 특정내역
- for ( var i = ds_list3_clsp.rowcount-1; i >= 0; i-- )
- {
- var rowstatus = ds_list3_clsp.getRowType(i);
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var spclspec = ds_list3_clsp.getColumn(i, "spclspec");
-
- if ( rowstatus != 8 && utlf_isNull(spclcd) && utlf_isNull(spclspec))
- {
- // 줄을 삭제한다.
- ds_list3_clsp.deleteRow(i);
- //i--;
- }
- }
-
- var clspupdtdata = grdf_getGridUpdateData(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist).rowcount;
-
- if (clspupdtdata != 0)
- {
- isChange = true;
- }
- else
- {
- // 상병
- for (var i = ds_list1_cldi.rowcount; i >= 0; i--)
- {
- var rowstatus = ds_list1_cldi.getRowType(i);
- var diagcd = ds_list1_cldi.getColumn(i, "diagcd");
-
- if ( rowstatus == 2 )
- {
- if (utlf_isNull(diagcd))
- {
- // 줄을 삭제한다.
- ds_list1_cldi.deleteRow(i);
- //i--;
- }
- }
- }
-
- cldiupdtdata = grdf_getGridUpdateData(grp_biz.grd_cldihist).rowcount;
-
- if (cldiupdtdata != 0)
- {
- isChange = true;
- }
- }
- }
- }
- if(isChange)
- {
- var ans = sysf_messageBox("수정사항이 있습니다. 저장", "S001"); ///수정사항이 있습니다. 저장하시려면 예(Yes)\n아니면 아니오(No)
-
- if (ans == 6)
- {
- var rslt = lf_fSaveAftJudg("B")
- if (rslt != "true" || utlf_isNull(rslt))
- {
- return false;
- }
- }
- else if (ans == 2)
- {
- if (ds_list3_clsp.rowcount == 1)
- {
- lf_fSpclGridInsertRow(); // 특정내역 줄추가
- }
- if (cldiupdtdata)
- {
- }
- return false;
- }
- }
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 상병, 특정내역, 처방 Group의 컨트롤 크기를 초기화한다.
- ****************************************************************************************/
- function lf_fInitUIControlSize()
- {
- grp_predoculist.cap_grptemp.visible = false;
- grp_predoculist.visible = false; // 이전 명세서 목록용 Group
- grd_delclod.visible = false; // 처방 휴지통 Group
- }
- /****************************************************************************************
- * Argument : button
- * Description : 완료버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_end_onclick(obj:Button, e:ClickEventInfo)
- {
- if (obj.enable == true )
- {
- // P0151 (사후심사-심사완료여부) C: 심사완료
- lf_fGetNextAftJudgTrgtMan("C");
- }
- else
- {
- sysf_messageBox("비활성 상태입니다. 진행","E001");
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : "완료"~"삭제" 처리 후 다음 심사대상자를 조회한다.
- ****************************************************************************************/
- function lf_fGetNextAftJudgTrgtMan(judgendyn)
- {
- // 완료버튼 클릭시
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
- var clamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
- var pidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
- var ioflag = ds_main_item1_clbs.getColumn(0, "ioflag");
- var rslt ;
-
- if (pid)
- {
- var rslt = lf_fSaveAftJudg(judgendyn);
- if (utlf_isNull(rslt) || rslt == false)
- {
- return false;
- }
- else
- {
- if (rslt == "false")
- {
- // 변경된 데이터가 없는 경우 "심사상태" 설정한다.
- ds_send_item4_endclbs.clearData();
- ds_send_item4_endclbs.addRow();
-
- if (!utlf_isNull(ds_send_item4_endclbs.getColumn(0, "suppkind")))
- {
- ds_send_item4_endclbs.setColumn(0, "insukind", ds_main_item1_clbs.getColumn(0, "insukindcd"));
- ds_send_item4_endclbs.setColumn(0, "ordtodd", ds_main_item1_clbs.getColumn(0, "ordtodd"));
- }
-
- ds_send_item4_endclbs.setColumn(0, "clamym", clamym);
- ds_send_item4_endclbs.setColumn(0, "clamdg", clamdg);
- ds_send_item4_endclbs.setColumn(0, "pid", pid);
- ds_send_item4_endclbs.setColumn(0, "pidsn", pidsn);
- ds_send_item4_endclbs.setColumn(0, "judgendyn", judgendyn);
- ds_send_item4_endclbs.setColumn(0, "ioflag", ds_main_item1_clbs.getColumn(0, "ioflag"));
-
- // 기존에 심사중이었던 경우
- var oParam = {};
- oParam.id = "TXPID20302";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqSetPidmclbsJudgEndYNAll";
- oParam.inds = "endclbs=ds_send_item4_endclbs";
- oParam.async = false;
- oParam.callback = "cf_TXPID20302";
- tranf_submit(oParam);
-
- // 대상자조회 심사완료여부 (P0151)
- lf_fSetJudgSaveState(judgendyn);
-
- ds_main_item1_clbs.setColumn(0, "judgendyn", judgendyn);
- }
-
- // 현재 로그인한 사용자 번호(ID)
- var userid = sysf_getUserId();
-
- if (utlf_isNull(userid))
- {
- userid = "12345678";
- }
- ds_main_item1_clbs.setColumn(0, "lastupdtrid", userid);
- ds_main_item1_clbs.setColumn(0, "judgendyn", judgendyn);
- }
-
- lf_fClickPrevNext("N", judgendyn);
- }
- }
- /****************************************************************************************
- * Argument : submit
- * Description : 에러 처리
- ****************************************************************************************/
- function cf_TXPID20302(strSvcID, nErrorCode, strErrorMsg)
- {
- var clodlength;
- //에러 처리
- if(nErrorCode == 0)
- {
- }
- else
- {
- if ( judgendyn == "C")
- {
- ds_tmpmaindetl_tmpmaindetlinfo.setColumn(ds_tmpmaindetl_tmpmaindetlinfo.rowposition, "judgendyn", "0");
- }
- else if ( judgendyn == "A" )
- {
- ds_tmpmaindetl_tmpmaindetlinfo.setColumn(ds_tmpmaindetl_tmpmaindetlinfo.rowposition, "judgendyn", "1");
- }
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 미심 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_unjudg_onclick(obj:Button, e:ClickEventInfo)
- {
- if (obj.enable == true )
- {
- lf_fGetNextAftJudgTrgtMan("A"); // P0151 (사후심사-심사완료여부) A: 미심사
- }
- else
- {
- sysf_messageBox("비활성 상태입니다. 진행","E001");
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 보류 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_rete_onclick(obj:Button, e:ClickEventInfo)
- {
- if (obj.enable == true )
- {
- // P0151 (사후심사-심사완료여부) N: 심사보류
- lf_fGetNextAftJudgTrgtMan("N");
- }
- else
- {
- sysf_messageBox("비활성 상태입니다. 진행","E001");
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 삭제 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_del_onclick(obj:Button, e:ClickEventInfo)
- {
- var judgendyn = ds_main_item1_clbs.getColumn(0, "judgendyn");
-
- if(judgendyn == "D")
- {// 심사상태:삭제 -> 삭제버튼 클릭 return *I007=확인하십시오.
- sysf_messageBox("심사상태가 삭제인 환자입니다. 심사상태를", "I007");
- return;
- }
- else
- {
- if (sysf_messageBox("","Q001") == 6)
- {
- var clamflagcd = ds_main_item1_clbs.getColumn(0, "clamflagcd");
-
- if (clamflagcd == "1")
- {
- if (lf_pidfChkAbdResncd() && lf_pidfChkDocuDelResncd())
- {
- // P0151 (사후심사-심사완료여부) D: 삭제
- lf_fGetNextAftJudgTrgtMan("D");
- }
- }
- else
- {
- if (lf_pidfChkDocuDelResncd())
- {
- // P0151 (사후심사-심사완료여부) D: 삭제
- lf_fGetNextAftJudgTrgtMan("D");
- }
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 1. 재청구 삭제일 경우 : (1). 반송부제기사유 체크 (2). 반송부제기사유 UPDATE
- ****************************************************************************************/
- function lf_pidfChkAbdResncd()
- {
- var abdresncd = ds_main_item1_clbs.getColumn(0, "abdresncd");
- if (utlf_isNull(abdresncd))
- {
- //I003=필수입력입니다.
- sysf_messageBox("반송부제기사유는","I003");
- //grp_biz.grp_sea02.cmb_abdresncd.setFocus();
- return false;
- }
- else
- {
- return true;
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 2. 명세서삭제일 경우 : (1). 명세서삭제사유 체크 (2). 기타일경우 심사자메모에 기타사유 추가
- ****************************************************************************************/
- function lf_pidfChkDocuDelResncd()
- {
- var docudelresncd = ds_main_item1_clbs.getColumn(0, "docudelresncd");
-
- if (utlf_isNull(docudelresncd) || docudelresncd == '-')
- {
- //I003=필수입력입니다.
- sysf_messageBox("명세서삭제사유는","I003");
- grp_desc.visible = true ;
- return false;
- }
- else
- {
- if (docudelresncd == "Z")
- {
- // 명세서삭제사유가 "기타"인경우 심사자메모에 기타사유 넣는다.
- var judgmemo = ds_main_item1_clbs.getColumn(0, "judgmemo");
-
- judgmemo = "[명세서 삭제: 기타]" || " " || judgmemo;
-
- ds_main_item1_clbs.setColumn(0, "judgmemo", judgmemo);
- }
- return true;
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 진료비누적 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_amtsum_onclick(obj:Button, e:ClickEventInfo)
- {
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
- if (!utlf_isNull(clamym))
- {
- var objArg = {};
- objArg.sClamym = clamym;
- objArg.sClamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- objArg.sPid = ds_main_item1_clbs.getColumn(0, "pid");
- objArg.sPidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
- objArg.sInsukind = ds_main_item1_clbs.getColumn(0, "insukindcd");
- objArg.sSuppkind = ds_main_item1_clbs.getColumn(0, "suppkindcd");
- objArg.sOrdfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
-
- // SPPID21300_심사전후차액조회.xrw
- frmf_open("SPPID21300", "SPPID21300", objArg, "", "", "", "", "", "", "", "", "", "M");
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 이전 명세서 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_predocu_onclick(obj:Button, e:ClickEventInfo)
- {
- // 이전명세서
- lf_fGetPreClbs();
- }
- /****************************************************************************************
- * Argument : function
- * Description : 이전 명세서
- ****************************************************************************************/
- function lf_fGetPreClbs()
- {
- if ( grp_predoculist.visible == true )
- {
- grp_predoculist.cap_grptemp.visible = false;
- grp_predoculist.visible = false;
- return;
- }
- var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
- var clamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
- var pidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
-
- if (clamym)
- {
- // 조회된 심사대상자가 있음
- // pid로 검색한 명세서 목록을 보여주고, 해당 목록에서 고른 건에 대하여 이전명세서 조회 화면을 호출한다.
- var preDocuNode = ds_hidden_list4_clbs.rowcount;
-
- if (preDocuNode <= 0)
- {
- ds_send_list4.clearData();
- ds_send_list4.addRow();
-
- ds_send_list4.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
- ds_send_list4.setColumn(0, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_send_list4.setColumn(0, "allordfild", "Y");
- ds_send_list4.setColumn(0, "ioflag", "-"); // 기본 옵션 전체로 수정함
- ds_send_list4.setColumn(0, "refterm", "6"); //기본옵션 6개월로 수정 20130114 이재호
- ds_send_list4.setColumn(0, "clamdg", ds_main_item1_clbs.getColumn(0, "clamdg"));
- ds_send_list4.setColumn(0, "pidsn", ds_main_item1_clbs.getColumn(0, "pidsn"));
- ds_send_list4.setColumn(0, "refterm", "3");
-
- grp_predoculist.cp_periodCal00.enable = false;
-
- var oParam = {};
- oParam.id = "TRPID20304";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetInAftJudgPreDocuList";
- oParam.inds = "req=ds_send_list4";
- oParam.outds = "ds_list4_clbs=clbs";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20304";
- tranf_submit(oParam);
-
- ds_hidden_list4_clbs.copyData(ds_list4_clbs);
- }
- else
- {
- ds_list4_clbs.copyData(ds_hidden_list4_clbs);
- }
- }
-
- grp_predoculist.position.x = 193;
- grp_predoculist.position.y = 413;
- grp_predoculist.bringToFront();
- grp_predoculist.visible = true; // 이전명세서
-
- grd_delclod.visible = false; // 처방 휴지통
- }
- /****************************************************************************************
- * Argument : button
- * Description : 이전명세서 닫기 버튼
- ****************************************************************************************/
- function grp_predoculist_btn_closepredoculist_onclick(obj:Button, e:ClickEventInfo)
- {
- grp_predoculist.visible = false;
- }
- /****************************************************************************************
- * Argument : button
- * Description : 이전명세서 닫기 버튼
- ****************************************************************************************/
- function grp_biz_btn_oscllist_onclick(obj:Button, e:ClickEventInfo)
- {
- if(ds_main_item1_clbs.getColumn(0, "ioflag") == "O")
- {
- lf_fGetOsclClamData("ALL", "grd_clodhist");
- }
- else
- {
- var clamkey = ds_main_item1_clbs.getColumn(0, "clamkey");
-
- if (clamkey)
- {
- fOrderCalcDetail(true);
- }
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 엑셀 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_fExelPrint();
- }
- /****************************************************************************************
- * Argument : functio
- * Description : 엑셀저장 & 출력
- ****************************************************************************************/
- function lf_fExelPrint()
- {
- //하시려면 예(Yes)\n아니면 아니오(No)
- var ans = sysf_messageBox("1. 엑셀저장", "S006", "2. 프린터출력|3. 취소");
- if ( ans == 6 )
- {
- //원내처방 엑셀저장
- if ( ds_list2_clod.rowcount > 0 )
- {
- grdf_exportExcel(grp_biz.grd_clodhist, "원내처방", "원내처방");
- }
- else
- {
- //엑셀저장할 원내처방이 없습니다.
- sysf_messageBox("엑셀저장할 원내처방이", "I004");
- }
-
- //원외처방 엑셀저장
- if ( ds_list7_clop.rowcount > 0 )
- {
- grdf_exportExcel(grp_biz.grd_oprcphist, "원외처방", "원외처방");
- }
- }
- else if ( ans == 7 )
- {
- if (ds_list2_clod.rowcount > 0)
- {
- // 선택 : 부분출력(예6), 전체출력(아니오7), 취소(취소7) 보고서에 들어갈 내용 담기
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
- var patnm = ds_main_item1_clbs.getColumn(0, "patnm");
- var ordfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
- var ordtodd = ds_main_item1_clbs.getColumn(0, "ordtodd");
- var insukind = ds_main_item1_clbs.getColumn(0, "insukindcd");
- var insukindnm = ds_main_item1_clbs.getColumn(0, "insukindnm");
- var suppkind = ds_main_item1_clbs.getColumn(0, "suppkindcd");
- var ioflag = ds_main_item1_clbs.getColumn(0, "ioflag");
- var suppkindnm = grp_sea00.cmb_supprate.text;
- var iphsfromdd = ds_main_item1_clbs.getColumn(0, "iphsfromdd");
- var diagcd = ds_list1_cldi.getColumn(0, "diagcd") + " ("+ ds_list1_cldi.getColumn(0, "diagnm") + ")";
-
- //데이터를 부분출력 하시려면 예(Yes)\n아니면 아니오(No)
- var ret = sysf_messageBox("데이터를 부분출력", "S001");
-
- if (ret == 6)
- {
- // 1. 부분출력 (그리드에 선택된 행만 보고서로 전달한다.)
- ds_send_prntlist.clearData();
-
- for ( var i = 0; i < ds_list2_clod.rowcount; i++ )
- {
- if ( ds_list2_clod.getSelect(i))
- {
- var aRow = ds_send_prntlist.addRow();
- // 상단 정보
- ds_send_prntlist.setColumn(aRow, "pid" , pid); // 환자번호
- ds_send_prntlist.setColumn(aRow, "patnm" , patnm); // 성명
- ds_send_prntlist.setColumn(aRow, "indd" , ordfromdd); // 입원일
- ds_send_prntlist.setColumn(aRow, "insukindcd", insukind); // 환자유형
- ds_send_prntlist.setColumn(aRow, "insukindnm", insukindnm);// 환자유형
- ds_send_prntlist.setColumn(aRow, "suppkindcd", suppkind); // 보조유형
- ds_send_prntlist.setColumn(aRow, "suppkindnm", suppkindnm);// 보조유형
- ds_send_prntlist.setColumn(aRow, "iphsfromdd", ordtodd);// 유형시작일
- ds_send_prntlist.setColumn(aRow, "diagcd" , diagcd);
-
- // 리스트
- ds_send_prntlist.setColumn(aRow, "edilnno" , ds_list2_clod.getColumn(i, "edilnno"));
- ds_send_prntlist.setColumn(aRow, "item1" , ds_list2_clod.getColumn(i, "ediitem1"));
- ds_send_prntlist.setColumn(aRow, "item2" , ds_list2_clod.getColumn(i, "ediitem2"));
- ds_send_prntlist.setColumn(aRow, "ordfromdd" , ds_list2_clod.getColumn(i, "ordfromdd"));
- ds_send_prntlist.setColumn(aRow, "grupsnglflag" , ds_list2_clod.getColumn(i, "grupsnglflag"));
- ds_send_prntlist.setColumn(aRow, "grupcalcscorcd", ds_list2_clod.getColumn(i, "grupcalcscorcd"));
- ds_send_prntlist.setColumn(aRow, "matractflag" , ds_list2_clod.getColumn(i, "matractflag"));
- ds_send_prntlist.setColumn(aRow, "snglcalcscorcd", ds_list2_clod.getColumn(i, "snglcalcscorcd"));
- ds_send_prntlist.setColumn(aRow, "basecd" , ds_list2_clod.getColumn(i, "basecd"));
- ds_send_prntlist.setColumn(aRow, "estmcd" , ds_list2_clod.getColumn(i, "estmcd"));
- ds_send_prntlist.setColumn(aRow, "hngnm" , ds_list2_clod.getColumn(i, "hngnm"));
- ds_send_prntlist.setColumn(aRow, "payflag" , ds_list2_clod.getColumn(i, "payflag"));
- ds_send_prntlist.setColumn(aRow, "ediunitcost" , ds_list2_clod.getColumn(i, "ediunitcost"));
- ds_send_prntlist.setColumn(aRow, "edidrugqty" , ds_list2_clod.getColumn(i, "edidrugqty"));
- ds_send_prntlist.setColumn(aRow, "tims" , ds_list2_clod.getColumn(i, "tims"));
- ds_send_prntlist.setColumn(aRow, "daydrugqty" , ds_list2_clod.getColumn(i, "daydrugqty"));
- ds_send_prntlist.setColumn(aRow, "dayno" , ds_list2_clod.getColumn(i, "dayno"));
- ds_send_prntlist.setColumn(aRow, "ediamt" , ds_list2_clod.getColumn(i, "ediamt"));
- ds_send_prntlist.setColumn(aRow, "cnfmcd" , ds_list2_clod.getColumn(i, "cnfmcd"));
- ds_send_prntlist.setColumn(aRow, "ordtodd" , ds_list2_clod.getColumn(i, "ordtodd"));
- ds_send_prntlist.setColumn(aRow, "updtdd" , ds_list2_clod.getColumn(i, "updtdd"));
- ds_send_prntlist.setColumn(aRow, "edihospaddamt" , ds_list2_clod.getColumn(i, "edihospaddamt"));
- ds_send_prntlist.setColumn(aRow, "ediaddamt" , ds_list2_clod.getColumn(i, "ediaddamt"));
- ds_send_prntlist.setColumn(aRow, "totordamt" , ds_list2_clod.getColumn(i, "totordamt"));
- }
- }
-
- var objDOM = rptf_createDOM(); // DOM 객체 설정
- rptf_setNodeListToDOM(objDOM, "root/send/prntlist/prntinfo", ds_send_prntlist); // 데이터셋 1
-
- var objParam = new Object();
- objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
-
- var option = "open=1;save=1;directprint=0;print=1;zoom=0;callno=;faxno=";
-
- if(ioflag == "O")
- {
- rptf_exeReportPreview30(["RPPID20500"],[objParam], option);
- }
- else
- {
- rptf_exeReportPreview30(["RPPID20300"],[objParam], option);
- }
- }
- else if (ret == 7)
- {
- // 2. 전체출력 (그리드에 보여지는 내용 전체를 보고서로 전달한다.)
- ds_send_prntlist.clearData();
-
- for ( var i = 0; i < ds_list2_clod.rowcount; i++ )
- {
- var aRow = ds_send_prntlist.addRow();
- // 상단 정보
- ds_send_prntlist.setColumn(aRow, "pid" , pid); // 환자번호
- ds_send_prntlist.setColumn(aRow, "patnm" , patnm); // 성명
- ds_send_prntlist.setColumn(aRow, "indd" , ordfromdd); // 입원일
- ds_send_prntlist.setColumn(aRow, "insukindcd", insukind); // 환자유형
- ds_send_prntlist.setColumn(aRow, "insukindnm", insukindnm);// 환자유형
- ds_send_prntlist.setColumn(aRow, "suppkindcd", suppkind); // 보조유형
- ds_send_prntlist.setColumn(aRow, "suppkindnm", suppkindnm);// 보조유형
- ds_send_prntlist.setColumn(aRow, "iphsfromdd", iphsfromdd);// 유형시작일
- ds_send_prntlist.setColumn(aRow, "diagcd" , diagcd);
- // 리스트
- ds_send_prntlist.setColumn(aRow, "edilnno" , ds_list2_clod.getColumn(i, "edilnno"));
- ds_send_prntlist.setColumn(aRow, "item1" , ds_list2_clod.getColumn(i, "ediitem1"));
- ds_send_prntlist.setColumn(aRow, "item2" , ds_list2_clod.getColumn(i, "ediitem2"));
- ds_send_prntlist.setColumn(aRow, "ordfromdd" , ds_list2_clod.getColumn(i, "ordfromdd"));
- ds_send_prntlist.setColumn(aRow, "grupsnglflag" , ds_list2_clod.getColumn(i, "grupsnglflag"));
- ds_send_prntlist.setColumn(aRow, "grupcalcscorcd", ds_list2_clod.getColumn(i, "grupcalcscorcd"));
- ds_send_prntlist.setColumn(aRow, "matractflag" , ds_list2_clod.getColumn(i, "matractflag"));
- ds_send_prntlist.setColumn(aRow, "snglcalcscorcd", ds_list2_clod.getColumn(i, "snglcalcscorcd"));
- ds_send_prntlist.setColumn(aRow, "basecd" , ds_list2_clod.getColumn(i, "basecd"));
- ds_send_prntlist.setColumn(aRow, "estmcd" , ds_list2_clod.getColumn(i, "estmcd"));
- ds_send_prntlist.setColumn(aRow, "hngnm" , ds_list2_clod.getColumn(i, "hngnm"));
- ds_send_prntlist.setColumn(aRow, "payflag" , ds_list2_clod.getColumn(i, "payflag"));
- ds_send_prntlist.setColumn(aRow, "ediunitcost" , ds_list2_clod.getColumn(i, "ediunitcost"));
- ds_send_prntlist.setColumn(aRow, "edidrugqty" , ds_list2_clod.getColumn(i, "edidrugqty"));
- ds_send_prntlist.setColumn(aRow, "tims" , ds_list2_clod.getColumn(i, "tims"));
- ds_send_prntlist.setColumn(aRow, "daydrugqty" , ds_list2_clod.getColumn(i, "daydrugqty"));
- ds_send_prntlist.setColumn(aRow, "dayno" , ds_list2_clod.getColumn(i, "dayno"));
- ds_send_prntlist.setColumn(aRow, "ediamt" , ds_list2_clod.getColumn(i, "ediamt"));
- ds_send_prntlist.setColumn(aRow, "cnfmcd" , ds_list2_clod.getColumn(i, "cnfmcd"));
- ds_send_prntlist.setColumn(aRow, "ordtodd" , ds_list2_clod.getColumn(i, "ordtodd"));
- ds_send_prntlist.setColumn(aRow, "updtdd" , ds_list2_clod.getColumn(i, "updtdd"));
- ds_send_prntlist.setColumn(aRow, "edihospaddamt" , ds_list2_clod.getColumn(i, "edihospaddamt"));
- ds_send_prntlist.setColumn(aRow, "ediaddamt" , ds_list2_clod.getColumn(i, "ediaddamt"));
- ds_send_prntlist.setColumn(aRow, "totordamt" , ds_list2_clod.getColumn(i, "totordamt"));
- }
-
- var objDOM = rptf_createDOM(); // DOM 객체 설정
- rptf_setNodeListToDOM(objDOM, "root/send/prntlist/prntinfo", ds_send_prntlist); // 데이터셋 1
-
- var objParam = new Object();
- objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
-
- var option = "open=1;save=1;directprint=0;print=1;zoom=0;callno=;faxno=";
-
- if(ioflag == "O")
- {
- rptf_exeReportPreview30(["RPPID20500"],[objParam], option);
- }
- else
- {
- rptf_exeReportPreview30(["RPPID20300"],[objParam], option);
- }
- }
- else
- {
- // 3. 취소
- return;
- }
- }
- else
- {
- sysf_messageBox("출력할 처방이", "I004"); ///출력할 처방이 없습니다.
- }
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 자보한도 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_autolimit_onclick(obj:Button, e:ClickEventInfo)
- {
- var insukind = ds_main_item1_clbs.getColumn(0, "insukindcd");
- var suppkind = ds_main_item1_clbs.getColumn(0, "suppkindcd");
-
- if (insukind != "31" && suppkind != "18")
- {
- sysf_messageBox("자보환자중 자손/책임/무보험만 한도잔액조회","I006");
- return;
- }
-
- var sppmc04500 = new Object();
- sppmc04500.sPid = ds_main_item1_clbs.getColumn(0, "pid");
-
- frmf_modal("SPPMC04500", "SPPMC04500", sppmc04500, "", "", "", "", "", "", "", "", "", "M");
- }
- /****************************************************************************************
- * Argument : oncelldblclick
- * Description : 원외처방 더블 클릭 이벤트
- ****************************************************************************************/
- function grp_biz_grd_oprcphist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
- {
- var col = e.col;
-
- if(col == obj.getBindCellIndex("body", "snglcalcscorcd") || col == obj.getBindCellIndex("body", "edicd") || col == obj.getBindCellIndex("body", "hngnm"))
- {
- var row = e.row;
- var rowstatus = ds_list7_clop.getRowType(row);
-
- if(!utlf_isNull(ds_list7_clop.getColumn(row, col)) && rowstatus != 2)
- {
- lf_fGetOsclClamData("N", "grd_oprcphist");
- }
- }
- else if(col == obj.getBindCellIndex("body", "spclspecyn"))
- {
- lf_fSetLnUnitClsoSpclSpec("grd_oprcphist");
- }
- }
- /****************************************************************************************
- * Argument : onrbuttondown
- * Description : 원외처방 마우스 우클릭 이벤트
- ****************************************************************************************/
- function grp_biz_grd_oprcphist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
- {
- // if( ds_list7_clop.rowcount <= 0 )
- // {
- // // 처방이 한줄도 없는 경우에도 "행 추가"를 하기 위해 사용함 - 원외처방 수정기능 X: [2014-12-16]
- // lf_clopinititem.trackPopup(e.screenX,e.screenY);
- // }
- // else
- // {
- if(!grdf_setSelectedCell(obj, e)) return;
- lf_gridclop.trackPopup(e.screenX,e.screenY);
- // }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 원외처방
- ****************************************************************************************/
- function lf_fCallClsoSpclSpec()
- {
- lf_fSetLnUnitClsoSpclSpec("grd_oprcphist");
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 원외처방 행삭제
- ****************************************************************************************/
- function lf_fClopGridDeleteRow()
- {
- var cloprow = ds_list7_clop.rowposition;
- if (cloprow < 0)
- {
- return;
- }
-
- if (utlf_isNull(ds_list7_clop.getColumn(cloprow, "newmpsno")))
- {
- var mpsno = ds_list7_clop.getColumn(cloprow, "mpsno");
- }
- else
- {
- var mpsno = ds_list7_clop.getColumn(cloprow, "newmpsno");
- }
-
- var clopdd = ds_list7_clop.getColumn(cloprow, "clopdd");
- var clopno = ds_list7_clop.getColumn(cloprow, "clopno");
- var edilnno = ds_list7_clop.getColumn(cloprow, "edilnno");
- var snglcalcscorcd = ds_list7_clop.getColumn(cloprow, "snglcalcscorcd");
- var seqno = ds_list7_clop.getColumn(cloprow, "seqno");
- var spclspecyn = ds_list7_clop.getColumn(cloprow, "spclspecyn");
- var clspdelcnt = 0;
-
- var ans = sysf_messageBox("[ 교부일자 : " + clopdd + ", 교부번호 : " + clopno + ", 줄번호 : " + edilnno + ", 수가코드 : " + snglcalcscorcd + " ] 삭제하시려면", "S001");
- if (ans == 6)
- {
- var adjtresncd = ds_list7_clop.getColumn(cloprow, "adjtresncd");
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- var cmbAdjtresncd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
-
- if (utlf_isNull(cmbAdjtresncd) || cmbAdjtresncd == "-" )
- {
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftout";
- sppiz01000.sCdid = adjtresncd;
- sppiz01000.sAdjtresndesc = "";
-
- var objArg = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
- adjtresncd = objArg.sCdid;
- }
- else
- {
- adjtresncd = cmbAdjtresncd;
- }
- }
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- return;
- }
- else
- {
- ds_list7_clop.setColumn(cloprow, "adjtresncd", adjtresncd);
- }
-
- if (spclspecyn)
- {
-
- var nodeList = ds_list3_clsp.rowcount;
- for (var j = nodeList-1; j >= 0; j--)
- {
- var spclmpsno = ds_list3_clsp.getColumn(j, "mpsno"); // mpsno
- var spclClodseqno = ds_list3_clsp.getColumn(j, "clodseqno"); // seqno
- var clsoyn = ds_list3_clsp.getColumn(j, "clsoyn"); // 원외처방 특정내역 여부
-
- if (spclmpsno == mpsno && spclClodseqno == seqno && clsoyn == "Y")
- {
- var clspstatus = ds_list3_clsp.getRowType(j);
-
- if (clspstatus != 2)
- {
- ds_list3_clsp.setColumn(j, "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(j, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(j);
- clspdelcnt++;
- }
- else
- {
- ds_list3_clsp.deleteRow(j);
- }
- }
- }
- }
-
- var clopstatus = ds_list7_clop.getRowType(cloprow);
- ds_list7_clop.deleteRow(cloprow);
- if (clspdelcnt > 0)
- {
- lf_fSortSpclNo();
- }
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 원외처방 "교부번호 전체삭제"
- ****************************************************************************************/
- function lf_fClopGridAllDeleteRow()
- {
- var cloprow = ds_list7_clop.rowposition;
-
- if (cloprow < 0)
- {
- return;
- }
- if ( utlf_isNull(ds_list7_clop.getColumn(cloprow, "newmpsno")))
- {
- var mpsno = ds_list7_clop.getColumn(cloprow, "mpsno");
- }
- else
- {
- var mpsno = ds_list7_clop.getColumn(cloprow, "newmpsno");
- }
-
- var oldclopdd = ds_list7_clop.getColumn(cloprow, "oldclopdd");
- var oldclopno = ds_list7_clop.getColumn(cloprow, "oldclopno");
- var clspdelcnt = 0;
-
- var ans = sysf_messageBox("[ 교부일자 : " + oldclopdd + ", 교부번호 : " + oldclopno + " ] 전체삭제하시려면", "S001"); // 예(Yes)\n아니면 아니오(No)
- if (ans == 6)
- {
- var adjtresncd = ds_list7_clop.getColumn(cloprow, "adjtresncd");
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- var cmbAdjtresncd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
-
- if (utlf_isNull(cmbAdjtresncd)|| cmbAdjtresncd == "-" )
- {
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftout";
- sppiz01000.sCdid = adjtresncd;
- sppiz01000.sAdjtresndesc = "";
-
- var objArg = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
- adjtresncd = objArg.sCdid;
- }
- else
- {
- adjtresncd = cmbAdjtresncd;
- }
- }
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- return;
- }
- var nodeList = ds_list7_clop.rowcount;
- for (var row = 0; row < nodeList; row++)
- {
- var clopseqno = ds_list7_clop.getColumn(row, "clopseqno");
-
- if (utlf_isNull(ds_list7_clop.getColumn(row, "newmpsno")))
- {
- var nowmpsno = ds_list7_clop.getColumn(row, "mpsno");
- }
- else
- {
- var nowmpsno = ds_list7_clop.getColumn(row, "newmpsno");
- }
- if (mpsno == nowmpsno)
- {
- if (ds_list7_clop.getColumn(row, "spclspecyn"))
- {
- for (var j = ds_list3_clsp.rowcount-1; j >= 0; j--)
- {
- var spclmpsno = ds_list3_clsp.getColumn(j, "mpsno"); // mpsno
- var spclClodseqno = ds_list3_clsp.getColumn(j, "clodseqno"); // seqno
- var clsoyn = ds_list3_clsp.getColumn(j, "clsoyn"); // 원외처방 특정내역 여부
-
- if (spclmpsno == mpsno && spclClodseqno == clopseqno && clsoyn == "Y")
- {
- var clspstatus = ds_list3_clsp.getRowType(j);
-
- if (clspstatus != 2)
- {
- ds_list3_clsp.setColumn(j, "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(j, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(j);
- clspdelcnt++;
- }
- else
- {
- ds_list3_clsp.deleteRow(j);
- }
- }
- }
- }
-
- var clopstatus = ds_list7_clop.getRowType(row);
- if (clopstatus != 2)
- {
- ds_list7_clop.setColumn(row, "adjtresncd", adjtresncd); // 삭제사유
- ds_list7_clop.updatecontrol = false;
- ds_list7_clop.setRowType(row, 'd');
- ds_list7_clop.updatecontrol = true;
- }
- else
- {
- ds_list7_clop.deleteRow(row);
- }
-
- }
- }
- if (clspdelcnt > 0)
- {
- lf_fSortSpclNo();
- }
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 원외처방 "수가조회"
- ****************************************************************************************/
- function lf_fOrderCalcScorSrch_clop(isAll)
- {
- frmf_setParameter("calcscorcd", ds_list7_clop.getColumn(ds_list7_clop.rowposition, "snglcalcscorcd"));
- frmf_setParameter("judgflag", "Y");
-
- var trgtManWindow = frmf_getChildWindow("SMPIC00100");
- if (utlf_isNull(trgtManWindow))
- {
- frmf_open("SMPIC00100", "SMPIC00100", "", "", "", "", "", "", "", "", "", "", "M");
- } else {
- trgtManWindow.fPopupMode();
- }
- }
- /****************************************************************************************
- * Argument : funtion
- * Description : 원외처방 "약품편람"
- ****************************************************************************************/
- function lf_fOrderDrugHBook_clop()
- {
- dsf_createDsRow("ds_cond_SMADB01900", [{col:"srchdrugcd", type:"STRING", size:256, val: ds_list7_clop.getColumn(ds_list7_clop.rowposition, "snglcalcscorcd")}]);
- var objArg = new Object();
- objArg.arg_ds_hidden_receivedata = ds_cond_SMADB01900;
-
- frmf_open("SMADB01900", "SMADB01900", objArg, "", "", "", "", "", "", "", "", "", "M");
- }
- /****************************************************************************************
- * Argument : oncelldblclick
- * Description : 처방 더블 클릭 이벤트
- ****************************************************************************************/
- function grp_biz_grd_clodhist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
- {
- var col = e.col;
- if (col == obj.getBindCellIndex("body", "estmmncd") || col == obj.getBindCellIndex("body", "estmcd"))
- {
- var row = e.row;
- var isEstm = false;
- var matractflag = ds_list2_clod.getColumn(row, "matractflag");
-
- // (P0137) 1 : 재료, 2 : 가산있는 행위, 3 : 가산없는 행위, 4:약제, - : 해당없음
- if (matractflag == "2")
- {
- isEstm = true;
- }
- else
- {
- // 검체코드 별로 EDI코드가 존재하는 경우 가X행위로 코드길이는 8자리이고 산정붙은 EDI코드와 basecd가 동일함.
- // 산정코드 바꾸려면 처방 삭제후 신규추가해야하므로 코드 길이를 체크함 (picmediu 예:C4722616)
- var basecd = ds_list2_clod.getColumn(row, "basecd");
-
- if (basecd.length == 5)
- {
- isEstm = true;
- }
- else
- {
- var ediitem = ds_list2_clod.getColumn(row, "ediitem");
- if (ediitem == "0101" || ediitem == "0102" || ediitem == "0103"|| ediitem == "0201" || ediitem == "0202" || ediitem == "0203" || ediitem == "0204" || ediitem == "0299")
- {
- isEstm = true;
- }
- }
- }
-
- if (isEstm == false)
- {
- return;
- }
- lf_fSrchEstmCd();
- }
- else if (col == obj.getBindCellIndex("body", "lnunitspclspecyn"))
- {
- // 'T' 필드
- // 특정내역 : SPPIZ00500_특정내역상세관리.xrw
- lf_fSetLnUnitSpclSpec();
- }
- else if (col == obj.getBindCellIndex("body", "toot1"))
- {
- // '치식' 필드
- // 상병 및 처방 치식 입력
- lf_fDiagOrderToothInput("Order");
- }
- else if (col == obj.getBindCellIndex("body", "grupcalcscorcd") || col == obj.getBindCellIndex("body", "snglcalcscorcd") || col == obj.getBindCellIndex("body", "basecd") || col == grp_biz.grd_clodhist.getBindCellIndex("body", "ediecd") || col == obj.getBindCellIndex("body", "hngnm"))
- {
- var row = e.row;
- var rowstatus = ds_list2_clod.getRowType(row);
-
- if (!utlf_isNull(ds_list2_clod.getColumn(e.row, e.col)) && rowstatus != 2)
- {
- if(ds_main_item1_clbs.getColumn(0, "ioflag") == "O")
- {
- lf_fGetOsclClamData("N", "grd_clodhist");
- }
- else
- {
- fOrderCalcDetail();
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : oncellclick
- * Description : 처방 셀 클릭 이벤트
- ****************************************************************************************/
- function grp_biz_grd_clodhist_oncellclick(obj:Grid, e:GridClickEventInfo)
- {
- var row = ds_list2_clod.rowposition;
- ds_hidden_item5_clod.copyRow(0, ds_list2_clod, row);
- if ( e.col == obj.getBindCellIndex("body", "estmmncd") || e.col == obj.getBindCellIndex("body", "estmcd"))
- {
- // Message 표시
- var estmcls = ds_list2_clod.getColumn(e.row, "estmcls");
- var estmmncd = ds_list2_clod.getColumn(e.row, "estmmncd");
- var estmcd = ds_list2_clod.getColumn(e.row, "estmcd");
- var estmcdnm = ds_list2_clod.getColumn(e.row, "estmcdnm");
-
- if (estmcls)
- {
- var msg = "산정코드 ["+ estmcls +"] ";
-
- if (!utlf_isNull(estmmncd) && estmmncd != "-")
- {
- msg += "산정의미코드: "+ estmmncd;
- }
- else
- {
- ds_hidden_list3.setColumn(0, "msgspclformat", msg +" 입력된 산정의미코드가 없습니다.");
- return;
- }
-
- if (estmcd)
- {
- msg += " / 산정코드: "+ estmcd;
- }
-
- if (estmcdnm)
- {
- msg += " / 명칭: "+ estmcdnm;
- }
-
- ds_hidden_list3.setColumn(0, "msgspclformat", msg);
- }
- else
- {
- ds_hidden_list3.setColumn(0, "msgspclformat", "조회된 산정코드가 없습니다.");
- }
- }
- else if ( e.col == obj.getBindCellIndex("body", "cnfmcd"))
- {
- // '확인코드' 필드
- // Message 표시
- var seqno = ds_list2_clod.getColumn(e.row, "seqno");
- var clspindex = "";
-
- for ( var j = 0; j < ds_list3_clsp.rowcount; j++ )
- {
- var spcClodseqno = ds_list3_clsp.getColumn(j, "clodseqno");
- var unitflag = ds_list3_clsp.getColumn(j, "unitflag");
-
- if (unitflag == "J" && seqno == spcClodseqno && ds_list3_clsp.getColumn(j, "spclcd") == "JT001" && ds_list3_clsp.getRowType(j) != 8)
- {
- clspindex = j;
- j = ds_list3_clsp.rowcount-1;
- }
- }
-
- if (clspindex)
- {
- var spclcd = ds_list3_clsp.getColumn(clspindex, "spclcd");
- var spclspec = ds_list3_clsp.getColumn(clspindex, "spclspec");
- var spclformat = ds_list3_clsp.getColumn(clspindex, "spclformat");
- ds_hidden_list3.setColumn(0, "msgspclformat", "확인코드 - "+ spclcd +" / 입력코드내역 : "+ spclspec +" / 기재형식 : "+ spclformat);
- }
- else
- {
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 확인코드 내역이 없습니다.");
- }
- }
- else if ( e.col == obj.getBindCellIndex("body", "lnunitspclspecyn"))
- {
- // 'T' 필드
- // Message 표시
- var seqno = ds_list2_clod.getColumn(e.row, "seqno");
- var clspindex = "";
-
- for ( var j = 0; j < ds_list3_clsp.rowcount; j++ )
- {
- var spcClodseqno = ds_list3_clsp.getColumn(j, "clodseqno");
- var unitflag = ds_list3_clsp.getColumn(j, "unitflag");
- if (unitflag == "J" && seqno == spcClodseqno && ds_list3_clsp.getColumn(j, "spclcd") == "JT001" && ds_list3_clsp.getRowType(j) != 8)
- {
- clspindex = j;
- j = ds_list3_clsp.rowcount-1;
- }
- }
-
- if (clspindex)
- {
- var spclcd = ds_list3_clsp.getColumn(clspindex, "spclcd");
- var cdnm = ds_list3_clsp.getColumn(clspindex, "cdnm");
- var spclspec = ds_list3_clsp.getColumn(clspindex, "spclspec");
- var spclformat = ds_list3_clsp.getColumn(clspindex, "spclformat");
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "특정내역코드: "+ spclcd +" / 특정내역명칭: "+ cdnm +" / 기재내역: "+ spclspec +" / 기재형식: "+ spclformat);
- }
- else
- {
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 줄단위 특정내역이 없습니다.");
- }
- }
- else if ( e.col == obj.getBindCellIndex("body", "hosinresncd"))
- {
- // '원내사유코드' 필드
- //lf_fSetHosInResnCd();
- }
- else if ( e.col == obj.getBindCellIndex("body", "adjtresncd"))
- {
- // '심사사유' 필드
- var adjtresncd = ds_list2_clod.getColumn(e.row, "adjtresncd");
- //if (!utlf_isNull(adjtresncd) && adjtresncd != "-" )
- //{
- lf_fSetAdjtResnCd();
- //}
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 원내사유코드에 따라 의약분업예외환자 요율로 재계산한다.
- ****************************************************************************************/
- function lf_fSetHosInResnCd()
- {
- var row = ds_list2_clod.rowposition;
-
- var objArg = new Object();
- objArg.sOldcd = ds_list2_clod.getColumn(row, "hosinresncd");
-
- frmf_modal("SPPIZ01500", "SPPIZ01500", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- var hosinresncd = ds_rslt_sppiz01500.getColumn(0, "cdid");
-
- if (!utlf_isNull(hosinresncd))
- {
- if ( hosinresncd == "00" )
- {
- //ediflagcd 가 3일때 예외가 없으면 팝업 띄울려고 함. 00값 들어가게끔 수정 20130617 이재호
- hosinresncd = "";
- }
-
- for (var i = 0; i < ds_list2_clod.rowcount; i++)
- {
- if ( ds_list2_clod.getSelect(i))
- {
- var ordfromdd = ds_list2_clod.getColumn(i, "ordfromdd");
-
- if (utlf_isNull(ordfromdd))
- {
- //처방일시는 필수입력입니다.
- sysf_messageBox("처방일시는", "I003");
- }
- else
- {
- var edicdflag = ds_list2_clod.getColumn(i, "edicdflag");
- var edicd = ds_list2_clod.getColumn(i, "edicd");
- var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- var oldcd = ds_list2_clod.getColumn(i, "hosinresncd");
-
- // 3:보험등재약에 대해서만 원내사유코드를 입력할 수 있다.
- if ( edicdflag == "3" && snglcalcscorcd )
- {
- ds_list2_clod.setColumn(i, "hosinresncd", hosinresncd);
-
- if (hosinresncd != oldcd && ds_list2_clod.getRowType(i) == 1)
- {
- ds_list2_clod.updatecontrol = false;
- ds_list2_clod.setRowType(i, "u");
- ds_list2_clod.updatecontrol = true;
- // 처방 Grid 배경색을 설정한다. - 추가/수정된 row
- lf_fOrderBkColorNew(i);
- }
-
- // 변경된 분업예외코드 특정내역에 반영
- var isFind = false;
- var seqno = ds_list2_clod.getColumn(i, "seqno");
- var edilnno = ds_list2_clod.getColumn(i, "edilnno");
-
- var okmsg = "분업예외코드";
- var spclcd = "JS002";
- var cdnm = "분업예외코드";
- var spclspec = hosinresncd;
- var spclformat = "9(2)";
- var detldesc = "의약분업 예외사항 발생으로 의료기관에서 원내 조제/투약이 이루어진 경우 해당 예외구분코드를 기재하고, 원외처방발행기에서 퇴장방지의약품 원외처방시 해당의약품의 사용장려비를 청구할 경우 구분코드 99를 기재";
-
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- var spclColdSeqno = ds_list3_clsp.getColumn(j, "clodseqno");
- var unitflag = ds_list3_clsp.getColumn(j, "unitflag");
-
- if (unitflag == "J" && seqno == spclColdSeqno && ds_list3_clsp.getColumn(j, "spclcd") == "JS002" && ds_list3_clsp.getRowType(j) != 8)
- {
- ds_list3_clsp.setColumn(j, "spclspec", spclspec);
-
- var rowstatus = ds_list3_clsp.getRowType(j);
-
- if ( rowstatus == 1 || rowstatus == 2)
- {
- }
- else
- {
- // 2 : update 상태로 stat를 변경한다.
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(j, 'u');
- ds_list3_clsp.updatecontrol = true;
- }
- isFind = true;
- }
- }
-
- if (isFind == false)
- {
- // 기존에 없었던 경우
- var clsprow = ds_list3_clsp.addRow();
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", ds_list2_clod.getColumn(i, "snglcalcscorcd"));
- ds_list3_clsp.setColumn(clsprow, "spclcd", spclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", cdnm);
- ds_list3_clsp.setColumn(clsprow, "spclspec", spclspec);
- ds_list3_clsp.setColumn(clsprow, "spclformat", spclformat);
- ds_list3_clsp.setColumn(clsprow, "detldesc", detldesc);
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "edicdflag", edicdflag);
- ds_list3_clsp.setColumn(clsprow, "edicd", edicd);
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N");
- ds_list3_clsp.rowposition = clsprow;
- }
- } // if ((edicdflag == "3" && snglcalcscorcd) || oldcd) 끝
- } // ordfromdd 가 입력된 경우
- }
- } // for (var i = 0; i < grd_clodhist.selectedRows; i++) 끝
- } // if (hosinresncd) 끝
- }
- /****************************************************************************************
- * Argument : onexpanddown
- * Description : 처방 확인코드 expanddown
- ****************************************************************************************/
- function grp_biz_grd_clodhist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
- {
- lf_fOrderGridInsertCnfmCd();
- }
- /****************************************************************************************
- * Argument : function
- * Description : 입력한 산정의미코드에 해당하는 산정코드를 조회한다.
- ****************************************************************************************/
- function lf_fSrchEstmCd()
- {
- ds_rslt_sppiz00800.clearData();
- ds_rslt_sppiz00800.addRow();
- ds_cond_sppiz00800.clearData();
- ds_cond_sppiz00800.addRow();
- var row = grp_biz.grd_clodhist.currentrow;
- var estmcls = ds_list2_clod.getColumn(row, "estmcls");
- var insukindcd = ds_main_item1_clbs.getColumn(0, "insukindcd");
-
- if (utlf_isNull(insukindcd))
- {
- // 심사대상자의 보험유형이 없습니다
- sysf_messageBox("심사대상자의 보험유형이", "I004");
- return false;
- }
-
- ds_cond_sppiz00800.setColumn(0, "name" , this.name);
- ds_cond_sppiz00800.setColumn(0, "insukind" , insukindcd);
- ds_cond_sppiz00800.setColumn(0, "calcscorcd", ds_list2_clod.getColumn(row, "snglcalcscorcd"));
- ds_cond_sppiz00800.setColumn(0, "estmcls" , estmcls);
- ds_cond_sppiz00800.setColumn(0, "estmmncd" , ds_list2_clod.getColumn(row, "estmcd"));
- ds_cond_sppiz00800.setColumn(0, "todd" , ds_list2_clod.getColumn(row, "ordtodd"));
-
- var rtn = frmf_modal("SPPIZ00800","SPPIZ00800", {objDs:ds_cond_sppiz00800}, "", "", "", "", "", "", "", "", "", "M");
-
- if (!utlf_isNull(ds_rslt_sppiz00800.getColumn(0, "estmcd")))
- {
- // 리턴값이 있으면
- var estmmncd = ds_rslt_sppiz00800.getColumn(0, "estmmncd");
- var oldestmmncd = ds_list2_clod.getColumn(row, "estmmncd");
- if (estmmncd == "0000" && utlf_isNull(oldestmmncd))
- {
- }
- else
- {
- if (estmmncd != oldestmmncd)
- {
- var adjtresncd = ds_list2_clod.getColumn(row, "adjtresncd");
- var cmbAdjtresncd = "";
-
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- // 심사(조정)사유가 입력되지 않은 경우
- cmbAdjtresncd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
-
- if (!utlf_isNull(cmbAdjtresncd))
- {
- ds_hidden_list2_clodstat.setColumn(row, "adjtresncd", cmbAdjtresncd);
- }
- else
- {
- var newcd = lf_fSetAdjtResnCd();
-
- if (utlf_isNull(newcd) || newcd == "-")
- {
- return;
- }
- }
- }
- lf_fSetOrderChangeRowStat(row);
- }
- else
- {
- return;
- }
-
- var oldestmcd = ds_list2_clod.getColumn(row, "estmcd");
- var oldestmcdnm = ds_list2_clod.getColumn(row, "estmcdnm");
-
- ds_list2_clod.setColumn(row, "estmmncd", estmmncd);
- ds_list2_clod.setColumn(row, "estmcd" , ds_rslt_sppiz00800.getColumn(0, "estmcd"));
- ds_list2_clod.setColumn(row, "estmcdnm", ds_rslt_sppiz00800.getColumn(0, "estmcdnm"));
- var rslt = lf_fSetEstmCd();
- row = grp_biz.grd_clodhist.currentrow;
-
- if (rslt == false)
- {
- ds_list2_clod.setColumn(row, "estmmncd", oldestmmncd);
- ds_list2_clod.setColumn(row, "estmcd" , oldestmcd);
- ds_list2_clod.setColumn(row, "estmcdnm", oldestmcdnm);
- }
- else
- {
- if (row != -1 && estmmncd == "0000") {
-
- // sort 이후에 선택된 row가 있고
- estmmncd = "";
- ds_list2_clod.setColumn(row, "estmmncd", estmmncd);
- ds_list2_clod.setColumn(row, "estmcd" , "");
- ds_list2_clod.setColumn(row, "estmcdnm", "");
- }
- }
- }
- }
-
- if (row == -1)
- {
- // sort 이후에 선택된 row가 없음
- return false;
- }
-
- var estmmncd = ds_list2_clod.getColumn(row, "estmmncd");
-
- var msg = "산정분류 [" + estmcls + "] ";
-
- if (!utlf_isNull(estmmncd))
- {
- msg += "산정의미코드: " + estmmncd;
- }
- else
- {
- ds_hidden_list3.setColumn(0, "msg", msg + " 입력된 산정의미코드가 없습니다.");
- return true;
- }
- var estmcd = ds_rslt_sppiz00800.getColumn(0, "estmcd");
- var estmcdnm = ds_rslt_sppiz00800.getColumn(0, "estmcdnm");
-
- if (!utlf_isNull(estmcd))
- {
- msg += " / 산정코드: " + estmcd;
- }
-
- if (!utlf_isNull(estmcdnm))
- {
- msg += " / 명칭: " + estmcdnm;
- }
-
- var addmthd = ds_rslt_sppiz00800.getColumn(0, "addmthd");
-
- if (addmthd)
- {
- msg += " // 계산방법: [" + addmthd + "] ";
- msg += ds_rslt_sppiz00800.getColumn(0, "pnt");
- msg += " / " + ds_rslt_sppiz00800.getColumn(0, "amt");
- msg += " / " + ds_rslt_sppiz00800.getColumn(0, "rate");
- }
- else
- {
- msg += " // 조회된 산정코드가 없습니다.";
- }
- ds_hidden_list3.setColumn(0, "msgspclformat", msg);
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 수가코드의 estmcls(산정분류)에 따라 선택가능한 5자리의 estmmncd(산정의미), 이에 해당하는 3자리의 estmcd(산정코드)를 조회하고 금액을 재계산한다.
- ****************************************************************************************/
- function lf_fSetEstmCd()
- {
- var row = ds_list2_clod.rowposition;
- ds_send_item5_mech.clearData();
- ds_send_item5_mech.addRow();
- var ordfromdd = ds_list2_clod.getColumn(row, "ordfromdd");
- var ordtodd = ds_list2_clod.getColumn(row, "ordtodd");
- if (utlf_isNull(ordfromdd) || utlf_isNull(ordtodd) )
- {
- //실시일자는 필수입력입니다.
- sysf_messageBox("처방시작일 & 종료일은", "I003");
- return false;
- }
-
- var snglcalcscorcd = ds_list2_clod.getColumn(row, "snglcalcscorcd");
-
- if (utlf_isNull(snglcalcscorcd))
- {
- //수가코드가 입력되지 않았습니다.
- sysf_messageBox("수가코드가 입력되지", "E007");
- return false;
- }
-
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", snglcalcscorcd);
- ds_send_item5_mech.setColumn(0, "insukind" , ds_main_item1_clbs.getColumn(0, "insukindcd"));
- ds_send_item5_mech.setColumn(0, "suppkind" , ds_main_item1_clbs.getColumn(0, "suppkindcd"));
- var orddeptcd = ds_list2_clod.getColumn(row, "orddeptcd");
- if (orddeptcd)
- {
- ds_send_item5_mech.setColumn(0, "orddeptcd", orddeptcd);
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "orddeptcd", ds_main_item1_clbs.getColumn(0, "orddeptcd"));
- }
-
- var orddrid = ds_list2_clod.getColumn(row, "orddrid");
-
- if (orddrid)
- {
- ds_send_item5_mech.setColumn(0, "orddrid", orddrid);
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "orddrid", ds_main_item1_clbs.getColumn(0, "orddrid"));
- }
-
- ds_send_item5_mech.setColumn(0, "orddd", ds_list2_clod.getColumn(row, "orddd"));
- ds_send_item5_mech.setColumn(0, "ordfromdd", ds_list2_clod.getColumn(row, "ordfromdd"));
- ds_send_item5_mech.setColumn(0, "ordtodd", ds_list2_clod.getColumn(row, "ordtodd"));
-
- var estmmncd = ds_list2_clod.getColumn(row, "estmmncd");
-
- if (estmmncd != "-")
- {
- ds_send_item5_mech.setColumn(0, "estmmncd", estmmncd);
- }
- else
- {
- //산정의미코드가 입력되지 않았습니다.
- sysf_messageBox("산정의미코드가 입력되지", "E007");
- return false;
- }
- var drugqty = ds_list2_clod.getColumn(row, "drugqty");
-
- if (utlf_isNull(drugqty))
- {
- drugqty = "1";
- }
-
- ds_send_item5_mech.setColumn(0, "drugqty", drugqty);
-
- var tims = ds_list2_clod.getColumn(row, "tims");
-
- if (utlf_isNull(tims))
- {
- tims = "1";
- }
- ds_send_item5_mech.setColumn(0, "tims", tims);
-
- var dayno = ds_list2_clod.getColumn(row, "dayno");
-
- if (utlf_isNull(dayno))
- {
- dayno = "1";
- }
- ds_send_item5_mech.setColumn(0, "dayno", dayno);
-
- ds_send_item5_mech.setColumn(0, "adjtresncd" , ds_list2_clod.getColumn(row, "adjtresncd"));
- ds_send_item5_mech.setColumn(0, "payflag" , ds_list2_clod.getColumn(row, "payflag"));
- ds_send_item5_mech.setColumn(0, "undersixageyn" , ds_main_item1_clbs.getColumn(0, "undersixageyn"));
- ds_send_item5_mech.setColumn(0, "mechage" , ds_main_item1_clbs.getColumn(0, "mechage"));
- ds_send_item5_mech.setColumn(0, "hosinresncd" , ds_list2_clod.getColumn(row, "hosinresncd"));
- ds_send_item5_mech.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_send_item5_mech.setColumn(0, "clamflagcd" , ds_main_item1_clbs.getColumn(0, "clamflagcd"));
- ds_send_item5_mech.setColumn(0, "mode", "u");
- var oParam = {};
- oParam.id = "TRPID20303";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetCalcScorCd";
- oParam.inds = "req=ds_send_item5_mech";
- oParam.outds = "ds_main_item5_mech=mech";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20303";
- tranf_submit(oParam);
- var clod = ds_main_item5_mech.rowcount;
-
- if (clod == 1)
- {
- var mechfromdd = ds_main_item5_mech.getColumn(0, "mechfromdd");
- var mechtodd = ds_main_item5_mech.getColumn(0, "mechtodd");
-
- if (mechfromdd && mechtodd)
- {
- lf_fSetCalcScorAmt(clod, "update");
- }
- else
- {
- //산정코드가 올바르지 않거나 조회된 처방 계산 내역이 없습니다
- sysf_messageBox("산정코드가 올바르지 않거나 조회된 처방 계산 내역이", "I004");
- return false;
- }
- }
- else
- {
- //조회된 처방 계산 내역이 없습니다
- sysf_messageBox("조회된 처방 계산 내역이", "I004");
- return false;
- }
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 조회한 수가코드의 금액정보를 표시한다.
- ****************************************************************************************/
- function lf_fSetCalcScorAmt(clod, mode)
- {
- ds_list2_clod.enableevent = false;
- for ( var i = 0; i < clod; i++ )
- {
- // 싱글 수가코드 개수 만큼
- var row = ds_list2_clod.rowposition;
-
- if (mode == "new")
- {
- ds_list2_clod.setColumn(row, "grupsnglflag" , ds_main_item5_mech.getColumn(i, "grupsnglflag")); // 그룹싱글구분
- ds_list2_clod.setColumn(row, "grupseqno" , ds_main_item5_mech.getColumn(i, "grupseqno")); // 그룹 정렬순번
- ds_list2_clod.setColumn(row, "grupcalcscorcd", ds_main_item5_mech.getColumn(i, "grupcalcscorcd"));
- ds_list2_clod.setColumn(row, "snglcalcscorcd", ds_main_item5_mech.getColumn(i, "snglcalcscorcd"));
- ds_list2_clod.setColumn(row, "orddeptcd" , ds_main_item5_mech.getColumn(i, "orddeptcd"));
- ds_list2_clod.setColumn(row, "orddrid" , ds_main_item5_mech.getColumn(i, "orddrid"));
- ds_list2_clod.setColumn(row, "matractflag" , ds_main_item5_mech.getColumn(i, "matractflag"));
- ds_list2_clod.setColumn(row, "item" , ds_main_item5_mech.getColumn(i, "item"));
- ds_list2_clod.setColumn(row, "payflag" , ds_main_item5_mech.getColumn(i, "payflag"));
- ds_list2_clod.setColumn(row, "payownbrate" , ds_main_item5_mech.getColumn(i, "payownbrate"));
- ds_list2_clod.setColumn(row, "pynpy1" , ds_main_item5_mech.getColumn(i, "pynpy1"));
- ds_list2_clod.setColumn(row, "earncls1" , ds_main_item5_mech.getColumn(i, "earncls1"));
- ds_list2_clod.setColumn(row, "earncls2" , ds_main_item5_mech.getColumn(i, "earncls2"));
- ds_list2_clod.setColumn(row, "earncls3" , ds_main_item5_mech.getColumn(i, "earncls3"));
-
- if (ds_main_item5_mech.getColumn(i, "insupynpy2") == "8" || ds_main_item5_mech.getColumn(i, "insupynpy2") == "9") {
- if (sysf_messageBox("선별급여품목입니다. 적용하","S001") == 6)
- {
- var ls_hang = "";
- var ls_mok = "";
- if(ds_main_item5_mech.getColumn(i, "insupynpy2") == "8"){
- ls_hang = "AA";
- } else if(ds_main_item5_mech.getColumn(i, "insupynpy2") == "9"){
- ls_hang = "BB";
- }
- if(ds_main_item5_mech.getColumn(i, "matrflag") == "1"){
- ls_mok = '01';
- } else if(ds_main_item5_mech.getColumn(i, "matrflag") == "2"){
- ls_mok = '02';
- } else {
- ls_mok = '03';
- }
- ds_list2_clod.setColumn(row, "ediitem1" , ls_hang);
- ds_list2_clod.setColumn(row, "ediitem2" , ls_mok);
- ds_list2_clod.setColumn(row, "ediitem" , ls_hang + ls_mok);
- } else {
- ds_list2_clod.setColumn(row, "ediitem1" , ds_main_item5_mech.getColumn(i, "ediitem1"));
- ds_list2_clod.setColumn(row, "ediitem2" , ds_main_item5_mech.getColumn(i, "ediitem2"));
- ds_list2_clod.setColumn(row, "ediitem" , ds_main_item5_mech.getColumn(i, "ediitem"));
- }
- } else {
- ds_list2_clod.setColumn(row, "ediitem1" , ds_main_item5_mech.getColumn(i, "ediitem1"));
- ds_list2_clod.setColumn(row, "ediitem2" , ds_main_item5_mech.getColumn(i, "ediitem2"));
- ds_list2_clod.setColumn(row, "ediitem" , ds_main_item5_mech.getColumn(i, "ediitem"));
- }
- ds_list2_clod.setColumn(row, "cnfmcd" , ds_main_item5_mech.getColumn(i, "cnfmcd"));
- ds_list2_clod.setColumn(row, "orddd" , ds_main_item5_mech.getColumn(i, "orddd"));
- ds_list2_clod.setColumn(row, "calcappyn" , ds_main_item5_mech.getColumn(i, "calcappyn"));
-
- var fRow = ds_init_orddrid2.findRow("cd", ds_main_item5_mech.getColumn(i, "orddrid"));
- var orddrnm = ds_init_orddrid2.getColumn(fRow, "nm");
- ds_list2_clod.setColumn(row, "orddrnm" , orddrnm);
- // 신규입력된 처방은 edilnno는 0, seqno는 최종번호를 셋팅하고 maxseqno에 최종값을 +1한다.
- ds_list2_clod.setColumn(row, "edilnno", "0");
- var maxseqno = ds_rslt_maxseqno.getColumn(0, "seqno");
- ds_list2_clod.setColumn(row, "seqno", maxseqno);
- ds_rslt_maxseqno.setColumn(0, "seqno", parseInt(maxseqno)+1);
- }
-
- ds_list2_clod.setColumn(row, "mechfromdd" , ds_main_item5_mech.getColumn(i, "mechfromdd"));
- ds_list2_clod.setColumn(row, "mechtodd" , ds_main_item5_mech.getColumn(i, "mechtodd"));
- ds_list2_clod.setColumn(row, "unitcost" , ds_main_item5_mech.getColumn(i, "unitcost"));
- ds_list2_clod.setColumn(row, "drugqty" , ds_main_item5_mech.getColumn(i, "drugqty"));
- ds_list2_clod.setColumn(row, "tims" , ds_main_item5_mech.getColumn(i, "tims"));
- ds_list2_clod.setColumn(row, "daydrugqty" , ds_main_item5_mech.getColumn(i, "daydrugqty"));
- ds_list2_clod.setColumn(row, "dayno" , ds_main_item5_mech.getColumn(i, "dayno"));
- ds_list2_clod.setColumn(row, "totdrugqty" , ds_main_item5_mech.getColumn(i, "totdrugqty"));
- ds_list2_clod.setColumn(row, "amt" , ds_main_item5_mech.getColumn(i, "amt"));
- ds_list2_clod.setColumn(row, "basecd" , ds_main_item5_mech.getColumn(i, "basecd"));
- ds_list2_clod.setColumn(row, "baserlapnt" , ds_main_item5_mech.getColumn(i, "baserlapnt"));
- ds_list2_clod.setColumn(row, "baseaddrlapnt" , ds_main_item5_mech.getColumn(i, "baseaddrlapnt"));
- ds_list2_clod.setColumn(row, "estmcls" , ds_main_item5_mech.getColumn(i, "estmcls"));
- ds_list2_clod.setColumn(row, "estmmncd" , ds_main_item5_mech.getColumn(i, "estmmncd"));
- ds_list2_clod.setColumn(row, "pntunitcost" , ds_main_item5_mech.getColumn(i, "pntunitcost"));
-
- if (utlf_isNull(ds_main_item5_mech.getColumn(i, "hosinresncd")))
- {
- ds_list2_clod.setColumn(row, "hosinresncd" , "00");
- }
- else
- {
- ds_list2_clod.setColumn(row, "hosinresncd" , ds_main_item5_mech.getColumn(i, "hosinresncd"));
- }
- ds_list2_clod.setColumn(row, "ordfromdd" , ds_main_item5_mech.getColumn(i, "ordfromdd"));
- ds_list2_clod.setColumn(row, "ordtodd" , ds_main_item5_mech.getColumn(i, "ordtodd"));
-
- var l_edicdflag = utlf_transNullToEmpty(ds_init_PK257list.lookupExpr("cdid=='" + ds_main_item5_mech.getColumn(i, "snglcalcscorcd") + "'","detldesc"));
- if (l_edicdflag.length > 0){
- ds_list2_clod.setColumn(row, "edicdflag" , l_edicdflag);
- } else {
- ds_list2_clod.setColumn(row, "edicdflag" , ds_main_item5_mech.getColumn(i, "edicdflag"));
- }
- ds_list2_clod.setColumn(row, "edicd" , ds_main_item5_mech.getColumn(i, "edicd"));
- ds_list2_clod.setColumn(row, "ediunitcost" , ds_main_item5_mech.getColumn(i, "ediunitcost"));
- ds_list2_clod.setColumn(row, "edidrugqty" , ds_main_item5_mech.getColumn(i, "edidrugqty"));
- ds_list2_clod.setColumn(row, "edidayno" , ds_main_item5_mech.getColumn(i, "edidayno"));
- ds_list2_clod.setColumn(row, "rcptunitcost" , ds_main_item5_mech.getColumn(i, "rcptunitcost"));
- ds_list2_clod.setColumn(row, "prcpflag" , ds_main_item5_mech.getColumn(i, "prcpflag"));
- ds_list2_clod.setColumn(row, "ediamt" , ds_main_item5_mech.getColumn(i, "ediamt"));
- ds_list2_clod.setColumn(row, "rcptcalcamt" , ds_main_item5_mech.getColumn(i, "rcptcalcamt"));
-
- ds_list2_clod.setColumn(row, "estmcd" , ds_main_item5_mech.getColumn(i, "estmcd"));
- ds_list2_clod.setColumn(row, "hngnm" , ds_main_item5_mech.getColumn(i, "hngnm"));
-
- ds_list2_clod.setColumn(row, "edihospaddamt" , ds_main_item5_mech.getColumn(i, "edihospaddamt"));
- ds_list2_clod.setColumn(row, "ediaddamt" , ds_main_item5_mech.getColumn(i, "ediaddamt"));
- ds_list2_clod.setColumn(row, "paytotamt" , ds_main_item5_mech.getColumn(i, "paytotamt"));
- ds_list2_clod.setColumn(row, "ownbamt" , ds_main_item5_mech.getColumn(i, "ownbamt"));
- ds_list2_clod.setColumn(row, "clamamt" , ds_main_item5_mech.getColumn(i, "clamamt"));
- ds_list2_clod.setColumn(row, "choiordamt" , ds_main_item5_mech.getColumn(i, "choiordamt"));
- ds_list2_clod.setColumn(row, "edihospaddtotamt", ds_main_item5_mech.getColumn(i, "edihospaddtotamt"));
- ds_list2_clod.setColumn(row, "ediaddtotamt" , ds_main_item5_mech.getColumn(i, "ediaddtotamt"));
- ds_list2_clod.setColumn(row, "choiordtotamt" , ds_main_item5_mech.getColumn(i, "choiordtotamt"));
- ds_list2_clod.setColumn(row, "totordamt" , ds_main_item5_mech.getColumn(i, "totordamt"));
- ds_list2_clod.setColumn(row, "ownbtotamt" , ds_main_item5_mech.getColumn(i, "ownbtotamt"));
-
- ds_list2_clod.setColumn(row, "ordnm" , ds_main_item5_mech.getColumn(i, "ordnm"));
- ds_list2_clod.setColumn(row, "estmcdnm" , ds_main_item5_mech.getColumn(i, "estmcdnm"));
- ds_list2_clod.setColumn(row, "adjtresncd" , ds_main_item5_mech.getColumn(i, "adjtresncd"));
-
- ds_list2_clod.setColumn(row, "druglimitamt" , ds_main_item5_mech.getColumn(i, "druglimitamt"));
- ds_list2_clod.setColumn(row, "limitdiffamt" , ds_main_item5_mech.getColumn(i, "limitdiffamt"));
- ds_list2_clod.setColumn(row, "edidruglimitamt" , ds_main_item5_mech.getColumn(i, "edidruglimitamt"));
- ds_list2_clod.setColumn(row, "edilimitdiffamt" , ds_main_item5_mech.getColumn(i, "edilimitdiffamt"));
-
- // 행 추가 후 싱글코드 조회 후에 다음 줄을 자동으로 한줄 추가함.
- if ( i < clod - 1)
- {
- ds_list2_clod.addRow();
- }
- }
- ds_list2_clod.enableevent = true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 처방 data 및 row status를 변경 이전 상태로 복구한다.
- ****************************************************************************************/
- function lf_fCancelClodStatusChng()
- {
- var row = ds_list2_clod.rowposition;
- if (ds_list2_clod.getRowType(row) == 2)
- {
- ds_list2_clod.deleteRow(row);
- }
- else
- {
- ds_list2_clod.setColumn(row, "adjtresncd" , ds_hidden_item5_clod.getColumn(0, "adjtresncd"));
- ds_list2_clod.setColumn(row, "ordfromdd" , ds_hidden_item5_clod.getColumn(0, "ordfromdd"));
- ds_list2_clod.setColumn(row, "ordtodd" , ds_hidden_item5_clod.getColumn(0, "ordtodd"));
- ds_list2_clod.setColumn(row, "orddd" , ds_hidden_item5_clod.getColumn(0, "orddd"));
- ds_list2_clod.setColumn(row, "updtdd" , ds_hidden_item5_clod.getColumn(0, "updtdd"));
- ds_list2_clod.setColumn(row, "grupcalcscorcd", ds_hidden_item5_clod.getColumn(0, "grupcalcscorcd"));
- ds_list2_clod.setColumn(row, "snglcalcscorcd", ds_hidden_item5_clod.getColumn(0, "snglcalcscorcd"));
- ds_list2_clod.setColumn(row, "basecd" , ds_hidden_item5_clod.getColumn(0, "basecd"));
- ds_list2_clod.setColumn(row, "hngnm" , ds_hidden_item5_clod.getColumn(0, "hngnm"));
- ds_list2_clod.setColumn(row, "drugqty" , ds_hidden_item5_clod.getColumn(0, "drugqty"));
- ds_list2_clod.setColumn(row, "tims" , ds_hidden_item5_clod.getColumn(0, "tims"));
- ds_list2_clod.setColumn(row, "dayno" , ds_hidden_item5_clod.getColumn(0, "dayno"));
- ds_list2_clod.setColumn(row, "edidrugqty" , ds_hidden_item5_clod.getColumn(0, "edidrugqty"));
- ds_list2_clod.setColumn(row, "edidayno" , ds_hidden_item5_clod.getColumn(0, "edidayno"));
- ds_list2_clod.setColumn(row, "unitcost" , ds_hidden_item5_clod.getColumn(0, "unitcost"));
- ds_list2_clod.updatecontrol = false;
- ds_list2_clod.setRowType(row, ds_hidden_item5_clod.getColumn(0, "rowstatus"));
- ds_list2_clod.updatecontrol = true;
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 기존코드 수정 1회량/횟수/일수 수정시
- ****************************************************************************************/
- function lf_fSetTotDrugQtyAmt()
- {
- var i = ds_list2_clod.rowposition;
- var col = grp_biz.grd_clodhist.currentcol;
- //기존코드 수정시에 퇴장장려비용이 있었다면 그 전 데이터 저장 작업 by 설승민 2020/04/08
- var leprotflag = ds_send_item5_mech.getColumn(0,"leprotflag");
- var leprotamt = ds_send_item5_mech.getColumn(0,"leprotamt");
- var rbpnt = ds_send_item5_mech.getColumn(0,"rbpnt");
- ds_send_item5_mech.clearData();
- ds_send_item5_mech.addRow();
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "N");
- ds_send_item5_mech.setColumn(0, "ediupdateyn", "N");
-
- //퇴장방지장려비가 있다면 추가 by 설승민 2020/04/08
- if(leprotflag == "A" || leprotflag == "B"){
- ds_send_item5_mech.setColumn(0, "leprotflag", leprotflag);
- ds_send_item5_mech.setColumn(0, "leprotamt", leprotamt);
- ds_send_item5_mech.setColumn(0, "rbpnt", rbpnt);
- }
- var drugqty = ds_list2_clod.getColumn(i, "drugqty");
-
- if (utlf_isNull(drugqty) || drugqty == "0")
- {
- ds_list2_clod.setColumn(i, "drugqty", "1");
- }
- var tims = ds_list2_clod.getColumn(i, "tims");
-
- if (utlf_isNull(tims) || tims == "0")
- {
- ds_list2_clod.setColumn(i, "tims", "1");
- }
- var dayno = ds_list2_clod.getColumn(i, "dayno");
-
- if (utlf_isNull(dayno) || dayno == "0")
- {
- ds_list2_clod.setColumn(i, "dayno", "1");
- }
- var edidrugqty = ds_list2_clod.getColumn(i, "edidrugqty");
-
- if (utlf_isNull(edidrugqty) || edidrugqty == "0")
- {
- ds_list2_clod.setColumn(i, "edidrugqty", "1");
- }
-
- var edidayno = ds_list2_clod.getColumn(i, "edidayno");
-
- if (utlf_isNull(edidayno)|| edidayno == "0")
- {
- ds_list2_clod.setColumn(i, "edidayno", "1");
- }
-
- if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "edidrugqty"))
- {
- // edi1회투여량이 변경된 경우
- ds_list2_clod.setColumn(i, "drugqty", ds_list2_clod.getColumn(i, "edidrugqty"));
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "edidayno"))
- {
- // edi일수가 변경된 경우
- ds_list2_clod.setColumn(i, "dayno", ds_list2_clod.getColumn(i, "edidayno"));
- }
- var sDrugqty = ds_list2_clod.getColumn(i, "drugqty");
- var sTims = ds_list2_clod.getColumn(i, "tims");
- var sDayno = ds_list2_clod.getColumn(i, "dayno");
- var sUnitcost = ds_list2_clod.getColumn(i, "unitcost");
- var sAmt = ds_list2_clod.getColumn(i, "amt");
- var sEdiAmt = ds_list2_clod.getColumn(i, "ediamt");
- var sDruglimitamt = ds_list2_clod.getColumn(i, "druglimitamt");
- var sEdiDruglimitamt = ds_list2_clod.getColumn(i, "edidruglimitamt");
- var sLimitdiffamt = ds_list2_clod.getColumn(i, "limitdiffamt");
- var sEdiLimitdiffamt = ds_list2_clod.getColumn(i, "edilimitdiffamt");
- var sEdiDrugqty = ds_list2_clod.getColumn(i, "edidrugqty");
- var sEdiDayno = ds_list2_clod.getColumn(i, "edidayno");
- var sEdiUnitcost = ds_list2_clod.getColumn(i, "ediunitcost");
-
- var drugqty = parseFloat(sDrugqty);
- var tims = parseFloat(sTims);
- var dayno = parseInt(sDayno);
- var unitcost = parseFloat(sUnitcost);
- var amt = parseInt(sAmt);
- var ediamt = parseInt(sEdiAmt);
- var druglimitamt = parseInt(sDruglimitamt);
- var edidruglimitamt = parseInt(sEdiDruglimitamt);
- var limitdiffamt = parseInt(sLimitdiffamt);
- var edilimitdiffamt = parseInt(sEdiLimitdiffamt);
- var edidrugqty = parseFloat(sEdiDrugqty);
- var edidayno = parseInt(sEdiDayno);
- var ediunitcost = parseInt(sEdiUnitcost);
-
- if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "drugqty"))
- {
- // 1회투여량이 변경된 경우
- if (utlf_isNull(sDrugqty) || drugqty <= 0)
- {
- // 처방이전상태 복구
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "dayno", sDrugqty);
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "tims"))
- {
- // 횟수가 변경된 경우
- if (utlf_isNull(sTims) || tims <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "edidrugqty", edidrugqty);
- ds_send_item5_mech.setColumn(0, "dayno", sTims);
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "dayno"))
- {
- // 일수가 변경된 경우
- if (utlf_isNull(sDayno) || dayno <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "dayno", sDayno);
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "unitcost"))
- {
- // 단가 변경된 경우(추가청구인경우만 해당)
- if (utlf_isNull(sUnitcost) || unitcost <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- // 단가변경여부
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "ediunitcost"))
- {
- // 단가가 변경된 경우
- if (utlf_isNull(sEdiUnitcost) || ediunitcost <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "amt"))
- {
- // 단가가 변경된 경우
- if (utlf_isNull(sAmt) || amt <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "ediamt"))
- {
- if (utlf_isNull(sEdiAmt) || ediamt <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "druglimitamt"))
- {
- if (utlf_isNull(sDruglimitamt) || druglimitamt <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "edidruglimitamt"))
- {
- if (utlf_isNull(sEdiDruglimitamt) || edidruglimitamt <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "limitdiffamt"))
- {
- // edi1회투여량이 변경된 경우
- if (utlf_isNull(sLimitdiffamt) || limitdiffamt <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- // edi변경여부
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "edilimitdiffamt"))
- {
- // edi일수가 변경된 경우
- if (utlf_isNull(sEdiLimitdiffamt) || edilimitdiffamt <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- // edi변경여부
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "edidrugqty"))
- {
- // edi일수가 변경된 경우
- if (utlf_isNull(sEdiDrugqty) || edidrugqty <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- // edi변경여부
- ds_send_item5_mech.setColumn(0, "ediupdateyn", "Y");
- }
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "edidayno"))
- {
- // edi일수가 변경된 경우
- if (utlf_isNull(sEdiDayno) || edidayno <= 0)
- {
- lf_fCancelClodStatusChng();
- return false;
- }
- else
- {
- // edi변경여부
- ds_send_item5_mech.setColumn(0, "ediupdateyn", "Y");
- }
- }
- var ordfromdd = ds_list2_clod.getColumn(i, "ordfromdd");
- var ordtodd = ds_list2_clod.getColumn(i, "ordtodd");
- var dayno = ds_list2_clod.getColumn(i, "dayno");
- var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- if (utlf_isNull(ordfromdd) || utlf_isNull(dayno) || utlf_isNull(snglcalcscorcd))
- {
- return false;
- }
-
- // 두일자사이의 차를 일단위로 반환
- if (parseInt(dayno) < 0)
- {
- return false;
- }
- else if (parseInt(dayno) > 365)
- {
- return false;
- }
- ds_send_item5_mech.setColumn(0, "ordfromdd" , ordfromdd);
- ds_send_item5_mech.setColumn(0, "ordtodd" , ordtodd);
- ds_send_item5_mech.setColumn(0, "drugqty" , edidrugqty);
- ds_send_item5_mech.setColumn(0, "tims" , sTims);
- ds_send_item5_mech.setColumn(0, "dayno" , sDayno);
- ds_send_item5_mech.setColumn(0, "unitcost" , sUnitcost);
- ds_send_item5_mech.setColumn(0, "amt" , sAmt);
- ds_send_item5_mech.setColumn(0, "ediamt" , sEdiAmt);
- ds_send_item5_mech.setColumn(0, "druglimitamt" , sDruglimitamt);
- ds_send_item5_mech.setColumn(0, "edidruglimitamt", sEdiDruglimitamt);
- ds_send_item5_mech.setColumn(0, "limitdiffamt" , sLimitdiffamt);
- ds_send_item5_mech.setColumn(0, "edilimitdiffamt", sEdiLimitdiffamt);
- ds_send_item5_mech.setColumn(0, "edidrugqty" , edidrugqty);
- ds_send_item5_mech.setColumn(0, "edidayno" , sEdiDayno);
- var grupcalcscorcd = ds_list2_clod.getColumn(i, "grupcalcscorcd");
-
- if (!utlf_isNull(grupcalcscorcd) && grupcalcscorcd != "-" )
- {
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", grupcalcscorcd);
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", "");
- }
-
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", snglcalcscorcd);
- ds_send_item5_mech.setColumn(0, "basecd" , "");
- ds_send_item5_mech.setColumn(0, "insukind" , ds_main_item1_clbs.getColumn(0, "insukindcd"));
- ds_send_item5_mech.setColumn(0, "suppkind" , ds_main_item1_clbs.getColumn(0, "suppkindcd"));
- var orddeptcd = ds_list2_clod.getColumn(i, "orddeptcd");
-
- if (orddeptcd)
- {
- ds_send_item5_mech.setColumn(0, "orddeptcd", orddeptcd);
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "orddeptcd", ds_main_item1_clbs.getColumn(0, "orddeptcd"));
- }
-
- var orddrid = ds_list2_clod.getColumn(i, "orddrid");
-
- if (orddrid)
- {
- ds_send_item5_mech.setColumn(0, "orddrid", orddrid);
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "orddrid", ds_main_item1_clbs.getColumn(0, "orddrid"));
- }
-
- var estmmncd = ds_list2_clod.getColumn(i, "estmmncd");
-
- if (!utlf_isNull(estmmncd) && estmmncd != "-")
- {
- ds_send_item5_mech.setColumn(0, "estmmncd", estmmncd);
- }
- ds_send_item5_mech.setColumn(0, "adjtresncd" , ds_list2_clod.getColumn(i, "adjtresncd"));
- ds_send_item5_mech.setColumn(0, "undersixageyn" , ds_main_item1_clbs.getColumn(0, "undersixageyn"));
- ds_send_item5_mech.setColumn(0, "mechage" , ds_main_item1_clbs.getColumn(0, "mechage"));
- ds_send_item5_mech.setColumn(0, "hosinresncd" , ds_list2_clod.getColumn(i, "hosinresncd"));
- ds_send_item5_mech.setColumn(0, "payflag" , ds_list2_clod.getColumn(i, "payflag"));
- ds_send_item5_mech.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_send_item5_mech.setColumn(0, "clamflagcd" , ds_main_item1_clbs.getColumn(0, "clamflagcd"));
- ds_send_item5_mech.setColumn(0, "prcpflagyn" , ds_list2_clod.getColumn(i, "prcpflagyn"));
-
- // if (utlf_isNull(ds_list2_clod.getColumn(i, "seqno")))
- // {
- // // EDI환산치, 위탁진료 적용
- // ds_send_item5_mech.setColumn(0, "mode", "n");
- // }
- // else
- // {
- ds_send_item5_mech.setColumn(0, "mode", "u");
- // }
- // 그룹,싱글,EDI코드 입력에 따라 조회 / 또는 SMPIC00200_수가조회 검색 결과
- var oParam = {};
- oParam.id = "2";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetCalcScorCd";
- oParam.inds = "req=ds_send_item5_mech";
- oParam.outds = "ds_main_item5_mech=mech";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20303";
- tranf_submit(oParam);
- var clod = ds_main_item5_mech.rowcount;
-
- if (clod == 1)
- {
- // 조회한 수가코드의 금액정보를 표시한다.
- lf_fSetCalcScorAmt(clod, "update");
- }
- else
- {
- if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "edidrugqty"))
- {
- lf_fCancelClodStatusChng();
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "tims"))
- {
- lf_fCancelClodStatusChng();
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "edidayno"))
- {
- lf_fCancelClodStatusChng();
- }
-
- sysf_messageBox("조회된 처방 계산 내역이", "I004");
- }
- return true;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 조회된 심사대상자의 특이 인적사항, 보조/요율 등을 계산하여 보여준다.
- ****************************************************************************************/
- function lf_fGetPersonalData()
- {
- var srchrslt = "";
-
- ds_hidden_rarecancermsg.clearData();
- var suppkind = ds_main_item1_clbs.getColumn(0, "suppkindcd");
- var rooa = ds_main_item1_clbs.getColumn(0, "rooamsg");
- var sdoa = ds_main_item1_clbs.getColumn(0, "sdoamsg");
- var rooamsg ;
- var sdoamsg ;
-
- if(!utlf_isNull(rooa))
- {
- rooamsg = rooa.length;
- }
-
- if(!utlf_isNull(sdoa))
- {
- sdoamsg = sdoa.length;
- }
-
- if ((rooamsg > 1) && (sdoamsg > 1))
- {
- cmb_rarecancermsg.visible = true;
-
- if ( suppkind == "06" || suppkind == "11" || suppkind == "32" || suppkind == "40")
- {
- ds_hidden_rarecancermsg.addRow();
- ds_hidden_rarecancermsg.addRow();
- ds_hidden_rarecancermsg.setColumn(0, "msg", sdoa);
- ds_hidden_rarecancermsg.setColumn(1, "msg", rooa);
- }
- else
- {
- ds_hidden_rarecancermsg.addRow();
- ds_hidden_rarecancermsg.addRow();
- ds_hidden_rarecancermsg.setColumn(0, "msg", rooa);
- ds_hidden_rarecancermsg.setColumn(1, "msg", sdoa);
- }
- }
- else if (rooamsg > 1)
- {
- srchrslt += ds_main_item1_clbs.getColumn(0, "rooamsg"); // 희귀등록번호
-
- cmb_rarecancermsg.visible = true;
-
- ds_hidden_rarecancermsg.addRow();
- ds_hidden_rarecancermsg.setColumn(0, "msg", srchrslt);
-
- }
- else if (sdoamsg > 1)
- {
- srchrslt += ds_main_item1_clbs.getColumn(0, "sdoamsg"); // 중증등록정보
- cmb_rarecancermsg.visible = true;
- ds_hidden_rarecancermsg.addRow();
- ds_hidden_rarecancermsg.setColumn(0, "msg", srchrslt);
- }
- else
- {
- cmb_rarecancermsg.visible = false;
- }
-
- var suppkindcd = ds_main_item1_clbs.getColumn(0, "suppkindcd");
- var payownbrate = ds_main_item1_clbs.getColumn(0, "payownbrate");
- var supprate = suppkindcd + "/" + payownbrate;
-
- ds_hidden_item1_clbs.setColumn(0, "patsupprate", supprate);
- }
- /****************************************************************************************
- * Argument : function
- * Description :
- ****************************************************************************************/
- function lf_fSaveClspList()
- {
- if (grp_biz.btn_save.enable == true && "M" == "S")
- {
- ds_send_item1_clbs.copyData(ds_main_item1_clbs); //model.copyNode("/root/send/item1/clbs", "/root/main/item1/clbs");
-
- dsf_makeValue(ds_send_item1_clbs, "clbsupdateyn", "string", "N", 0);
- dsf_makeValue(ds_send_item1_clbs, "judgendyn", "string", "B", 0);
-
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- var spclLnNo = ds_list3_clsp.getColumn(j, "seqno");
-
- if (spclLnNo.substr(0, 1) == "D")
- {
- ds_list3_clsp.setColumn(j, "seqno", spclLnNo.substr(1, spclLnNo.length));
- }
- }
-
- lf_fSetSpclSpecJX999();
-
-
- dsf_setDefaultVal(ds_send_item1_clbs, "insuno:-,certno:-,rsvordgubn:N,ownbflag:-,oprcpdayno:0,direcprcptims:0,ordtims:0,prockindflag:-,offcharm:0,reclopedilnnoyn:N,fixrateyn:-,suppkindchgresn:-");
- dsf_setDefaultVal(ds_list3_clsp, "usermemoyn:N,clsoyn:N,mpsno:-");
- dsf_setDefaultVal(ds_send_item3_lnunitmemo, "usermemoyn:N,unitflag:J,spclcd:JX999,clsoyn:N,workflag:12");
-
- var oParam = {};
- oParam.id = "TXPID20315";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqExePidhclsp";
- oParam.inds = "clbs=ds_send_item1_clbs clsp=ds_list3_clsp lnunitmemo=ds_send_item3_lnunitmemo";
- oParam.outds = "ds_list3_clsp=clsp";
- oParam.async = false;
- //oParam.callback = "cf_TXPID20315";
- tranf_submit(oParam);
-
- lf_fSelectSpclRadio();
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 알림 메세지 닫기 이벤트
- ****************************************************************************************/
- function grp_msg_button25_onclick(obj:Button, e:ClickEventInfo)
- {
- grp_msg.visible = false;
- ds_grd_msg.clearData();
- }
- /****************************************************************************************
- * Argument : function
- * Description : CLOP 저장전 점검
- ****************************************************************************************/
- function lf_fCheckSaveOutAftJudgInfoCLOP()
- {
- // 저장할 정보를 체크한다.
- // 원외처방 Grid
- var clopList = ds_list7_clop.rowcount;
-
- if (clopList < 0)
- {
- return true;
- }
- var clopNode = ds_list7_clop.rowcount;
-
- for (var i = 0; i < clopNode; i++)
- {
- if ( utlf_isNull(ds_list7_clop.getColumn(i, "snglcalcscorcd")))
- {
- //원외처방 수가코드를 입력하십시오.
- sysf_messageBox("원외처방 수가코드를", "C001");
- return false;
- }
- }
- return true;
- }
- /****************************************************************************************
- * Argument : enterkeydown
- * Description : 원외처방 수정
- ****************************************************************************************/
- function grp_biz_grd_oprcphist_onenterdown(obj:Grid, e:GridEditEventInfo)
- {
- // 수가코드, EDI코드
- var row = e.row;
- var adjtresncd = ds_list7_clop.getColumn(row, "adjtresncd");
- if ( e.col == obj.getBindCellIndex("body", "snglcalcscorcd") || e.col == obj.getBindCellIndex("body", "edicd"))
- {
- lf_fSetSrchOutCalcScorCd(adjtresncd);
- }
- }
- function grp_biz_grd_oprcphist_ontextchanged(obj:Grid, e:GridEditTextChangedEventInfo)
- {
- var row = e.row;
- var col = e.col;
- var adjtresncd = ds_list7_clop.getColumn(row, "adjtresncd");
-
- if( e.col != obj.getBindCellIndex("body", "edidrugdaynomax"))
- {
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- var cmbAdjtresncd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
-
- if (utlf_isNull(cmbAdjtresncd) || cmbAdjtresncd == "-")
- {
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftout";
- sppiz01000.sCdid = adjtresncd;
- sppiz01000.sAdjtresndesc = "";
-
- var rtn = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
- if (!utlf_isNull(rtn))
- {
- adjtresncd = rtn.sCdid;
- }
- }
- else
- {
- adjtresncd = cmbAdjtresncd;
- }
- }
-
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- // 사유 없으면 원상복귀
- ds_list7_clop.setColumn(row, "clopdd", ds_hidden_list7_clop.getColumn(0, "oldclopdd")); // 교부일자
- ds_list7_clop.setColumn(row, "clopno", ds_hidden_list7_clop.getColumn(0, "oldclopno")); // 교부번호
- ds_list7_clop.setColumn(row, "snglcalcscorcd", ds_hidden_list7_clop.getColumn(0, "oldsnglcalcscorcd")); // 수가코드
- ds_list7_clop.setColumn(row, "edicd", ds_hidden_list7_clop.getColumn(0, "oldedicd")); // edi코드
- ds_list7_clop.setColumn(row, "edidrugqty", ds_hidden_list7_clop.getColumn(0, "oldedidrugqty")); // edi수량
- ds_list7_clop.setColumn(row, "drugtims", ds_hidden_list7_clop.getColumn(0, "olddrugtims")); // 횟수
- ds_list7_clop.setColumn(row, "edidrugdayno", ds_hidden_list7_clop.getColumn(0, "oldedidrugdayno")); // edi일수
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
- return;
- }
-
-
- }
-
- var newclopdd = utlf_transNullToEmpty(ds_list7_clop.getColumn(row, "clopdd"));
- var newclopno = utlf_transNullToEmpty(ds_list7_clop.getColumn(row, "clopno"));
- var curmpsno = utlf_transNullToEmpty(ds_list7_clop.getColumn(row, "mpsno"));
- var newmpsno = newclopdd+newclopno;
-
- // 교부일자
- if ( e.col == obj.getBindCellIndex("body", "clopdd"))
- {
- newclopdd = e.posttext;
- if ( !utlf_isValidDateTime(newclopdd) || curmpsno == newmpsno )
- {
- ds_list7_clop.setColumn(row, "clopdd", ds_hidden_list7_clop.getColumn(0, "oldclopdd"));
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
- }
- else
- {
- for (var i = 0; i < ds_list7_clop.rows; i++)
- {
- var mpsno = ds_list7_clop.getColumn(i, "mpsno");
-
- if (curmpsno == mpsno)
- {
- ds_list7_clop.setColumn(i, "clopdd", newclopdd);
- ds_list7_clop.setColumn(i, "newmpsno", newmpsno);
- ds_list7_clop.setColumn(i, "adjtresncd", adjtresncd); // 조정사유
-
- if ( ds_list7_clop.getRowType(i) == 1 )
- {
- ds_list7_clop.updatecontrol = false;
- ds_list7_clop.setRowType(i, "u");
- ds_list7_clop.updatecontrol = true;
- }
- }
- }
-
- // 원외처방 특정내역이 있는 경우
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- var spclmpsno = utlf_transNullToEmpty(ds_list3_clsp.getColumn(j, "mpsno")); // mpsno
- var clsoyn = utlf_transNullToEmpty(ds_list3_clsp.getColumn(j, "clsoyn")); // 원외처방 특정내역 여부
-
- if (curmpsno == mpsno && clsoyn == "Y")
- {
- ds_list3_clsp.setColumn(j, "mpsno", newmpsno);
-
- if ( ds_list3_clsp.getRowType(j) == 1 )
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(i, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- }
- }
- }
- // 교부번호
- else if ( e.col == obj.getBindCellIndex("body", "clopno"))
- {
- newclopdd = utlf_transNullToEmpty(ds_list7_clop.getColumn(row, "clopdd"));
- newclopno = e.posttext;
- curmpsno = utlf_transNullToEmpty(ds_list7_clop.getColumn(row, "mpsno"));
- newmpsno = newclopdd+newclopno;
- //trace(">>>>"+curmpsno + " === " + newmpsno)
- if (utlf_isNull(newclopno) || curmpsno == newmpsno )
- {
- ds_list7_clop.setColumn(row, "clopno", ds_hidden_list7_clop.getColumn(0 , "oldclopno"));
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
- //trace("11"+newmpsno)
- }
- else
- {
- //trace("@@@"+curmpsno + " === " + newmpsno)
- // for (var i = 0; i < ds_list7_clop.rows; i++)
- // {
- // var mpsno = utlf_transNullToEmpty(ds_list7_clop.getColumn(i, "mpsno"));
- //
- // if (curmpsno == mpsno)
- // { // 수정된 row와 처방전 교부번호가 같은 경우
- //
- // ds_list7_clop.setColumn(i, "clopno", newclopno);
- // ds_list7_clop.setColumn(i, "newmpsno", newmpsno);
- // ds_list7_clop.setColumn(i, "adjtresncd", adjtresncd); // 조정사유
- //
- // if ( ds_list7_clop.getRowType(i) == 1 )
- // {
- // ds_list7_clop.updatecontrol = false;
- // ds_list7_clop.setRowType(i, "u");
- // ds_list7_clop.updatecontrol = true;
- // }
- // }
- // }
- ds_list7_clop.setColumn(row, "clopno", newclopno);
- ds_list7_clop.setColumn(row, "newmpsno", newmpsno);
- ds_list7_clop.setColumn(row, "adjtresncd", adjtresncd); // 조정사유
- if ( ds_list7_clop.getRowType(i) == 1 )
- {
- ds_list7_clop.updatecontrol = false;
- ds_list7_clop.setRowType(row, "u");
- ds_list7_clop.updatecontrol = true;
- }
- //alert();
- // 원외처방 특정내역이 있는 경우
- for (var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- var spclmpsno = utlf_transNullToEmpty(ds_list3_clsp.getColumn(j, "mpsno")); // mpsno
- var clsoyn = utlf_transNullToEmpty(ds_list3_clsp.getColumn(j, "clsoyn")); // 원외처방 특정내역 여부
-
- if (curmpsno == mpsno && clsoyn == "Y")
- {
- ds_list3_clsp.setColumn(j, "mpsno", newmpsno);
-
- if ( ds_list3_clsp.getRowType(j) == 1 )
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(i, "u");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- }
- }
- }
- // edi수량
- else if (e.col == obj.getBindCellIndex("body", "edidrugqty"))
- {
- var oldedidrugqty = ds_hidden_list7_clop.getColumn(0, "oldedidrugqty");
- var edidrugqty = e.posttext;
-
- if ( utlf_isNull(edidrugqty) || edidrugqty == "0" )
- {
- ds_list7_clop.setColumn(row, "edidrugqty", oldedidrugqty);
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
- }
- else
- {
- ds_list7_clop.setColumn(row, "drugqty", edidrugqty); // 수량 같이 변경
- ds_list7_clop.setColumn(row, "edidrugqty", edidrugqty); // 수량 같이 변경
- ds_list7_clop.setColumn(row, "adjtresncd", adjtresncd); // 조정사유
- ds_list7_clop.setColumn(row, "daydrugqty", edidrugqty); // 조정사유
-
- if ( ds_list7_clop.getRowType(i) == 1 )
- {
- ds_list7_clop.updatecontrol = false;
- ds_list7_clop.setRowType(i, "u");
- ds_list7_clop.updatecontrol = true;
- }
- }
- }
- // 횟수
- else if (e.col == obj.getBindCellIndex("body", "drugtims"))
- {
- var olddrugtims = ds_hidden_list7_clop.getColumn(0, "olddrugtims");
- var drugtims = e.posttext;
-
- if ( utlf_isNull(drugtims) || drugtims == "0" )
- {
- ds_list7_clop.setColumn(row, "drugtims", olddrugtims);
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
- }
- else
- {
- ds_list7_clop.setColumn(row, "drugtims", drugtims); // 수량 같이 변경
- ds_list7_clop.setColumn(row, "adjtresncd", adjtresncd); // 조정사유
-
- if ( ds_list7_clop.getRowType(i) == 1 )
- {
- ds_list7_clop.updatecontrol = false;
- ds_list7_clop.setRowType(i, "u");
- ds_list7_clop.updatecontrol = true;
- }
- }
- }
- // edi일수
- else if (e.col == obj.getBindCellIndex("body", "edidrugdayno"))
- {
- var oldedidrugdayno = ds_hidden_list7_clop.getColumn(0, "oldedidrugdayno");
- var edidrugdayno = e.posttext;
-
- if ( utlf_isNull(edidrugdayno) || edidrugdayno == "0" )
- {
- ds_list7_clop.setColumn(row, "edidrugdayno", oldedidrugdayno);
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
- }
- else
- {
- ds_list7_clop.setColumn(row, "drugdayno", edidrugdayno); // 수량 같이 변경
- ds_list7_clop.setColumn(row, "edidrugdayno", edidrugdayno); // 수량 같이 변경
- ds_list7_clop.setColumn(row, "adjtresncd", adjtresncd); // 조정사유
-
- if ( ds_list7_clop.getRowType(i) == 1 )
- {
- ds_list7_clop.updatecontrol = false;
- ds_list7_clop.setRowType(i, "u");
- ds_list7_clop.updatecontrol = true;
- }
- }
- }
- // 최대일수
- else if ( e.col == obj.getBindCellIndex("body", "edidrugdaynomax"))
- {
- for(var i = 0; i < ds_list7_clop.rowcount; i++)
- {
- ds_list7_clop.setColumn(i, "edidrugdaynomax", e.posttext);
- }
- } else {
- ds_list7_clop.setColumn(row, "adjtresncd", adjtresncd);
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 수가코드, EDI코드를 조회한 후 원외처방으로 행 추가를 한다.
- ****************************************************************************************/
- function lf_fSetSrchOutCalcScorCd(adjtresncd)
- {
- var col = grp_biz.grd_oprcphist.currentcol;
- var row = grp_biz.grd_oprcphist.currentrow;
- ds_cond_smpic00200.clearData();
- ds_cond_smpic00200.addRow();
-
- ds_send_item5_mech.clearData();
- ds_send_item5_mech.addRow();
-
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "N"); // 단가변경여부
- ds_send_item5_mech.setColumn(0, "ediupdateyn", "N"); // edi변경여부
-
- if (col == grp_biz.grd_oprcphist.getBindCellIndex("body", "snglcalcscorcd"))
- {
- var oldsnglcalcscorcd = ds_hidden_list7_clop.getColumn(0, "oldsnglcalcscorcd");
- var snglcalcscorcd = ds_list7_clop.getColumn(row, "snglcalcscorcd");
- if (utlf_isNull(snglcalcscorcd))
- {
- ds_list7_clop.setColumn(row, "snglcalcscorcd", oldsnglcalcscorcd);
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
- return;
- }
-
- ds_cond_smpic00200.setColumn(0, "con4_search2" , snglcalcscorcd);
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", snglcalcscorcd);
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "basecd", "");
- }
- else if (col == grp_biz.grd_oprcphist.getBindCellIndex("body", "edicd"))
- { // EDI코드
- var oldedicd = ds_hidden_list7_clop.getColumn(0, "oldedicd");
- var edicd = ds_list7_clop.getColumn(row, "edicd");
- if (utlf_isNull(edicd))
- {
- ds_list7_clop.setColumn(row, "edicd", oldedicd);
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
- return;
- }
- ds_cond_smpic00200.setColumn(0, "con4_search2" , edicd);
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", edicd);
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "basecd", "");
- }
-
-
- var ordfromdd = ds_list7_clop.getColumn(row, "clopdd");
-
- ds_send_item5_mech.setColumn(0, "indd", ds_main_item1_clbs.getColumn(0, "indd"));
- ds_send_item5_mech.setColumn(0, "ordfromdd", ordfromdd);
- ds_send_item5_mech.setColumn(0, "ordtodd", ordfromdd);
-
- ds_send_item5_mech.setColumn(0, "insukind", ds_main_item1_clbs.getColumn(0, "insukind"));
- ds_send_item5_mech.setColumn(0, "suppkind", ds_main_item1_clbs.getColumn(0, "suppkindcd"));
- ds_send_item5_mech.setColumn(0, "orddeptcd", ds_main_item1_clbs.getColumn(0, "orddeptcd"));
- ds_send_item5_mech.setColumn(0, "orddrid", ds_main_item1_clbs.getColumn(0, "orddrid"));
- var edidrugqty = ds_list7_clop.getColumn(row, "edidrugqty");
- var drugtims = ds_list7_clop.getColumn(row, "drugtims");
- var edidrugdayno = ds_list7_clop.getColumn(row, "edidrugdayno");
-
- ds_send_item5_mech.setColumn(0, "drugqty", edidrugqty);
- ds_send_item5_mech.setColumn(0, "tims", drugtims);
- ds_send_item5_mech.setColumn(0, "dayno", edidrugdayno);
-
- ds_send_item5_mech.setColumn(0, "adjtresncd", adjtresncd);
- ds_send_item5_mech.setColumn(0, "undersixageyn", ds_main_item1_clbs.getColumn(0, "insukind"));
- ds_send_item5_mech.setColumn(0, "mechage", ds_main_item1_clbs.getColumn(0, "insukind"));
- ds_send_item5_mech.setColumn(0, "hosinresncd", "-");
- ds_send_item5_mech.setColumn(0, "payflag", ds_list7_clop.getColumn(row, "payflag"));
- ds_send_item5_mech.setColumn(0, "clbsordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
- ds_send_item5_mech.setColumn(0, "ioflag", ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_send_item5_mech.setColumn(0, "clamflagcd", ds_main_item1_clbs.getColumn(0, "clamflagcd"));
- ds_send_item5_mech.setColumn(0, "mode", "n");
- ds_send_item5_mech.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
- var cloplength = 0;
- var clopSelect = "";
- var clop = "";
-
- var oParam = {};
- oParam.id = "TRPID20303";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetCalcScorCd";
- oParam.inds = "req=ds_send_item5_mech";
- oParam.outds = "ds_main_item5_mech=mech";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20303";
- tranf_submit(oParam);
-
- cloplength = ds_main_item5_mech.rowcount;
-
- // 입력한 코드에 대해 조회된 결과가 없거나, 하나의 EDI코드에 여러 수가코드가 존재할 때
- if (cloplength == 0)
- {
- // 검색된 결과가 여러 수가코드인 경우 이를 초기화하고 수가조회 Popup 창에서 새로 결과를 얻는다.
- ds_main_item5_mech.clearData();
- ds_main_item5_mech.addRow();
-
- var insukindcd = ds_main_item1_clbs.getColumn(0, "insukindcd");
- if (insukindcd == "11")
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "insu");
- }
- else if (insukindcd == "21" || insukindcd == "22")
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "proc");
- }
- else if (insukindcd == "31")
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "autm");
- }
- else if (insukindcd == "41")
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "indus");
- }
- else
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "insu");
- }
-
- // SMPIC00200_수가조회 화면의 그룹,싱글 combo 조건값 설정
- if (col == grp_biz.grd_oprcphist.getBindCellIndex("body", "snglcalcscorcd"))
- {
- ds_cond_smpic00200.setColumn(0, "con2_gsflag", "S");
- }
- // SMPIC00200_수가조회 화면의 검색조건 combo 조건값 설정
- if (col == grp_biz.grd_oprcphist.getBindCellIndex("body", "edicd"))
- {
- ds_cond_smpic00200.setColumn(0, "con3_search1", "edicd");
- }
- else
- {
- ds_cond_smpic00200.setColumn(0, "con3_search1", "calcscorcd");
- }
- // 처방시작일을 수가조회 기준일자로 설정
- if (ordfromdd)
- {
- ds_cond_smpic00200.setColumn(0, "con1_dd", ordfromdd);
- }
- ds_cond_smpic00200.setColumn(0, "con_ordinptflag", "PAM");
- var objArg = new Object();
- objArg.arg_ds_temp = ds_cond_smpic00200;
-
- ds_rslt_smpic00200.clearData();
- var mechSelect = frmf_modal("SMPIC00200", "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- // SMPIC00200_수가조회 화면에서 보낸 결과 값에 대한 처리
- if (ds_temp_picmmech.getColumn(0, "picmmech_temp_grupsnglflag") != "S")
- { // 그룹코드인 경우의 그룹코드에 속하는 싱글코드를 조회함.
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd"));
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "basecd" , "");
- ds_send_item5_mech.setColumn(0, "estmmncd" , "");
- ds_send_item5_mech.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- var oParam = {};
- oParam.id = "TRPID20303";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetCalcScorCd";
- oParam.inds = "req=ds_send_item5_mech";
- oParam.outds = "ds_main_item5_mech=mech";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20303";
- tranf_submit(oParam);
- }
- else
- { // 싱글코드를 선택했을 때
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd"));
- ds_send_item5_mech.setColumn(0, "basecd" , "");
- ds_send_item5_mech.setColumn(0, "estmmncd" , "");
- ds_send_item5_mech.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
-
- var oParam = {};
- oParam.id = "TRPID20303";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetCalcScorCd";
- oParam.inds = "req=ds_send_item5_mech";
- oParam.outds = "ds_main_item5_mech=mech";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20303";
- tranf_submit(oParam);
- }
- }
- var clop = ds_main_item5_mech.rowcount;
-
- if (clop < 0)
- {
- ds_list7_clop.setColumn(row, "edicd", "");
- ds_list7_clop.setColumn(row, "snglcalcscorcd", "");
- ds_list7_clop.setRowType(row, ds_hidden_list7_clop.getColumn(0, "oldrowstatus"));
-
- sysf_messageBox("처방이 불가한 코드입니다. 수가조회 화면에서 선택한 그룹코드에 대해 조회한 결과가", "I004");
- return;
- }
- else
- {
- for (var i = 0; i < clop; i++)
- {
- ds_list7_clop.setColumn(row, "snglcalcscorcd", ds_main_item5_mech.getColumn(i, "snglcalcscorcd"));
- ds_list7_clop.setColumn(row, "edicd", ds_main_item5_mech.getColumn(i, "edicd"));
- ds_list7_clop.setColumn(row, "hngnm", ds_main_item5_mech.getColumn(i, "hngnm"));
- ds_list7_clop.setColumn(row, "ordnm", ds_main_item5_mech.getColumn(i, "ordnm"));
- ds_list7_clop.setColumn(row, "payflag", ds_main_item5_mech.getColumn(i, "payflag"));
- ds_list7_clop.setColumn(row, "edicdflag", ds_main_item5_mech.getColumn(i, "edicdflag"));
- ds_list7_clop.setColumn(row, "efcyclscd", ds_main_item5_mech.getColumn(i, "efcyclscd"));
- ds_list7_clop.setColumn(row, "efcyclsnm", ds_main_item5_mech.getColumn(i, "efcyclsnm"));
- ds_list7_clop.setColumn(row, "efcynm2", ds_main_item5_mech.getColumn(i, "efcynm2"));
- ds_list7_clop.setColumn(row, "efcynm3", ds_main_item5_mech.getColumn(i, "efcynm3"));
- ds_list7_clop.setColumn(row, "adjtresncd", adjtresncd );
-
- // 신규입력된 처방은 seqno는 최종번호를 셋팅하고 maxseqno에 최종값을 +1한다.
- if ( ds_list7_clop.getColumn(row, "seqno") == "0" || utlf_isNull(ds_list7_clop.getColumn(row, "seqno")))
- {
- var cur_seqno = ds_rslt_clopmaxseqno.getColumn(0, "seqno");
- ds_list7_clop.setColumn(row, "seqno", cur_seqno);
- ds_rslt_clopmaxseqno.setColumn(0, "seqno", parseInt(cur_seqno)+1);
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 수가조회 이후 신규처방 추가처리
- ****************************************************************************************/
- function lf_fSetNewCalcScorCd()
- {
- var row = ds_list2_clod.rowposition;
- var clod = ds_main_item5_mech.rowcount;
- if( clod > 0 )
- {
- lf_fSetCalcScorAmt(clod, "new");
- ds_list2_clod.setColumn(row, "toot", "");
- //lf_fSetOrderLnNo();
- lf_fSetNewCnfmCd();
- }
- else
- {
- sysf_messageBox("처방이 불가한 코드입니다. 수가조회 화면에서 선택한 그룹코드에 대해 조회한 결과가", "I004");
- lf_fCancelClodStatusChng();
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 정렬
- ****************************************************************************************/
- function lf_fSetOrderLnNo()
- {
- var row = ds_list2_clod.rowposition;
- var seqno = ds_list2_clod.getColumn(row, "seqno");
- var ediitem1 = ds_list2_clod.getColumn(row, "ediitem1");
- var ediitem2 = ds_list2_clod.getColumn(row, "ediitem2");
- var grupcalcscorcd = ds_list2_clod.getColumn(row, "grupcalcscorcd");
- var snglcalcscorcd = ds_list2_clod.getColumn(row, "snglcalcscorcd");
- var estmmncd = ds_list2_clod.getColumn(row, "estmmncd");
- ds_list2_clod.keystring = "S:+ediitem1+ediitem2+grupcalcscorcd+grupseqno+snglcalcscorcd+edicd";
- ds_list2_clod.rowposition = -1;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 확인코드, 분업예외코드 검체검사위탁, 준용코드를 특정내역에 자동으로 추가한다.
- ****************************************************************************************/
- function lf_fSetNewCnfmCd()
- {
- var isClspChange = false;
- //처방전체로 for문을 돌리면 특정내역에 중복으로 들어가는 문제 발생으로 인해 for 삭제
- //대신 i를 rowposition으로 변경 by 설승민 2020/04/09
- var i = ds_list2_clod.rowposition;
- //for ( var i = 0; i < ds_list2_clod.rowcount; i++ )
- //{
- var rowstatus = ds_list2_clod.getRowType(i);
-
- if ( rowstatus == 2 )
- {
- var seqno = ds_list2_clod.getColumn(i, "seqno");
- var cnfmcd = ds_list2_clod.getColumn(i, "cnfmcd");
- var basecd = ds_list2_clod.getColumn(i, "basecd");
- var hosinresncd = ds_list2_clod.getColumn(i, "hosinresncd");
- var trustinstno = ds_main_item5_mech.getColumn(0, "trustinstno");
- var clamspclcd = ds_main_item5_mech.getColumn(0, "clamspclcd");
- var edicd = ds_main_item5_mech.getColumn(0, "edicd");
- var edicdflag = ds_main_item5_mech.getColumn(0, "edicdflag");
- var okmsg = "";
- var spclcd = "";
- var cdnm = "";
- var spclspec = "";
- var spclformat = "";
- var detldesc = "";
- //퇴장방지장려비를 선택했을시에 예외코드 99로 세팅하도록 함 by 설승민 2020/04/09
- if(ds_main_item5_mech.getColumn(0,"rdoleprot") == "A")
- {
- hosinresncd = "99";
- ds_list2_clod.setColumn(i,"hosinresncd","99");
- }
- if (cnfmcd)
- {
- okmsg = "확인코드";
- spclcd = "JT001";
- cdnm = "확인코드";
- spclspec = cnfmcd;
- spclformat = "X(5)";
- detldesc = "진료행위에 대한 추가기술 사항을 구분하는 코드로서 확인코드가 여러개 발생할 경우 '/'로 구분하여 기재";
- }
- else if (!utlf_isNull(hosinresncd) && hosinresncd != "00" && hosinresncd != "-")
- {
- okmsg = "분업예외코드";
- spclcd = "JS002";
- cdnm = "분업예외코드";
- spclspec = hosinresncd;
- spclformat = "9(2)";
- detldesc = "의약분업 예외사항 발생으로 의료기관에서 원내 조제/투약이 이루어진 경우 해당 예외구분코드를 기재하고, 원외처방발행기에서 퇴장방지의약품 원외처방시 해당의약품의 사용장려비를 청구할 경우 구분코드 99를 기재";
- }
- else if (!utlf_isNull(trustinstno) && clamspclcd == "1")
- {
- okmsg = "검체검사위탁";
- spclcd = "JS005";
- cdnm = "검체검사위탁";
- spclspec = trustinstno + "/" + ds_list2_clod.getColumn(i, "ordfromdd");
- spclformat = "9(8)/ccyymmdd";
- detldesc = "수탁기관에 검체검사를 의뢰한 경우 수탁기관기호와 검사의뢰일을 기재";
- }
- else if (basecd == "JJJJJJ")
- {
- okmsg = "준용명";
- spclcd = "JS009";
- cdnm = "준용명";
- spclspec = ds_list2_clod.getColumn(i, "hngnm");
- spclformat = "X(700)";
- detldesc = "상대가치점수표에 분류되지 않은 항목을 상대가치점수표상의 비슷한 진료행위로 준용하여 'JJJJJJ'코드로 청구시 진료행위명과 산출식을 기재하고, 한의사의 임의처방 청구시에는 임의 처방명을 기재";
- }
- if (okmsg)
- {
- var isFind = false;
- var edilnno = ds_list2_clod.getColumn(i, "edilnno");
- if ( utlf_isNull(edilnno) || edilnno == "0" )
- {
- // 기존에 없었던 경우
- if (isFind == false)
- {
- var aRow = ds_list3_clsp.addRow();
-
- ds_list3_clsp.setColumn(aRow, "unitflag" , "J");
- ds_list3_clsp.setColumn(aRow, "edilnno" , edilnno);
- ds_list3_clsp.setColumn(aRow, "snglcalcscorcd" , ds_list2_clod.getColumn(i, "snglcalcscorcd"));
- ds_list3_clsp.setColumn(aRow, "spclcd" , spclcd);
- ds_list3_clsp.setColumn(aRow, "cdnm" , cdnm);
- ds_list3_clsp.setColumn(aRow, "spclspec" , spclspec);
- ds_list3_clsp.setColumn(aRow, "spclformat" , spclformat);
- ds_list3_clsp.setColumn(aRow, "detldesc" , detldesc);
- ds_list3_clsp.setColumn(aRow, "oldedilnno" , edilnno);
- ds_list3_clsp.setColumn(aRow, "clodseqno" , seqno);
- ds_list3_clsp.setColumn(aRow, "edicd" , edicd);
- ds_list3_clsp.setColumn(aRow, "edicdflag" , edicdflag);
- ds_list3_clsp.setColumn(aRow, "clsoyn" , "N");
-
- ds_list3_clsp.rowposition = aRow;
- isClspChange = true;
- }
- ds_hidden_list3.setColumn(0, "msgspclformat", cdnm + " - " + spclcd + " / " + "입력코드내역 : " + spclspec + " / 기재형식 : " + spclformat);
- }
- }
- }
- //}
-
- if (isClspChange == true)
- {
- lf_fSortSpclNo();
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 상단 버튼 탭 화면 X 이벤트
- ****************************************************************************************/
- function grp_dropdownmenu_Button00_onclick(obj:Button, e:ClickEventInfo)
- {
- grp_dropdownmenu.visible = false;
- }
- /****************************************************************************************
- * Argument : button
- * Description : 상단 버튼 탭 화면 닫기 이벤트
- ****************************************************************************************/
- function grp_dropdownmenu_btn_closedropdownmenu_onclick(obj:Button, e:ClickEventInfo)
- {
- grp_dropdownmenu.visible = false;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 처방주석입력
- ****************************************************************************************/
- function lf_fOrderGridInsertCmt()
- {
- ds_rslt_sppiz00500.clearData();
- ds_cond_sppiz00500.clearData();
- ds_cond_sppiz00500_list.clearData();
- var row = ds_list2_clod.rowposition;
-
- var seqno = ds_list2_clod.getColumn(row, "seqno");
- var edilnno = ds_list2_clod.getColumn(row, "edilnno");
- var snglcalcscorcd = ds_list2_clod.getColumn(row, "snglcalcscorcd");
-
- if (!utlf_isNull(seqno) && seqno != "0")
- {
- var lnunitspclspecyn = grp_biz.grd_clodhist.getCellText(row, grp_biz.grd_clodhist.getBindCellIndex("body", "lnunitspclspecyn"));
-
- if (utlf_isNull(lnunitspclspecyn))
- {
- dsf_makeValue(ds_cond_sppiz00500, "flag", "string", "I", 0);
- dsf_makeValue(ds_cond_sppiz00500, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz00500, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "clodseqno", "string",seqno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclcd", "string", "JX999", 0);
- dsf_makeValue(ds_cond_sppiz00500, "detldesc", "string","특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclspec", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclformat", "string", "X(700)", 0);
- dsf_makeValue(ds_cond_sppiz00500, "rownum", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "cdnm", "string", "기타내역", 0);
- dsf_makeValue(ds_cond_sppiz00500, "unitflag", "string", "J", 0);
- }
- else
- {
- var rowcnt = 0;
- var setrow = 0;
-
- for (var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var spcClodseqno = ds_list3_clsp.getColumn(i, "clodseqno");
- var spcClsoyn = ds_list3_clsp.getColumn(i, "clsoyn");
- if (spcClodseqno == seqno && spcClsoyn == "N")
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
-
- if (!utlf_isNull(spclcd) && spclcd != "JT001" && ds_list3_clsp.getRowType(i) != 8)
- {
- dsf_makeValue(ds_cond_sppiz00500_list, "flag", "string", "", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "rownum", "string", i, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "snglcalcscorcd", "string", ds_list3_clsp.getColumn(i, "snglcalcscorcd"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "clodseqno", "string", ds_list3_clsp.getColumn(i, "clodseqno"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "edilnno", "string", ds_list3_clsp.getColumn(i, "edilnno"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclformat", "string", ds_list3_clsp.getColumn(i, "spclformat"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "cdnm", "string", ds_list3_clsp.getColumn(i, "cdnm"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "detldesc", "string", ds_list3_clsp.getColumn(i, "detldesc"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "oldspclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "oldspclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
-
- if (spclcd == "JX999")
- {
- setrow = i;
- }
-
- rowcnt++;
- }
- }
- }
-
- if (setrow > 0)
- {
- dsf_makeValue(ds_cond_sppiz00500, "flag", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz00500, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "clodseqno", "string", seqno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclcd", "string", ds_list3_clsp.getColumn(setrow, "spclcd"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "detldesc", "string", ds_list3_clsp.getColumn(setrow, "detldesc"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclspec", "string", ds_list3_clsp.getColumn(setrow, "spclspec"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclformat", "string", ds_list3_clsp.getColumn(setrow, "spclformat"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "rownum", "string", setrow, 0);
- dsf_makeValue(ds_cond_sppiz00500, "cdnm", "string", ds_list3_clsp.getColumn(setrow, "cdnm"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "unitflag", "string", "J", 0);
- }
- else
- {
- dsf_makeValue(ds_cond_sppiz00500, "flag", "string", "I", 0);
- dsf_makeValue(ds_cond_sppiz00500, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz00500, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "clodseqno", "string", seqno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclcd", "string", "JX999", 0);
- dsf_makeValue(ds_cond_sppiz00500, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclspec", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclformat", "string", "X(700)", 0);
- dsf_makeValue(ds_cond_sppiz00500, "rownum", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "cdnm", "string", "기타내역", 0);
- dsf_makeValue(ds_cond_sppiz00500, "unitflag", "string", "J", 0);
- }
- }
-
- var objArg = new Object();
- objArg.arg_ds_hidden_clsp = ds_cond_sppiz00500;
- objArg.arg_ds_hidden_clsp_list = ds_cond_sppiz00500_list;
-
- var rtn = frmf_modal("SPPIZ00500", "SPPIZ00500", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- var rsltcnt = ds_rslt_sppiz00500.rowcount;
-
- if (rsltcnt > 0)
- {
- for (var i = 0; i < rsltcnt; i++)
- {
- var flag = ds_rslt_sppiz00500.getColumn(i, "flag");
- var rownum = ds_rslt_sppiz00500.getColumn(i, "rownum");
- var newspclcd = ds_rslt_sppiz00500.getColumn(i, "spclcd");
- var newcdnm = ds_rslt_sppiz00500.getColumn(i, "cdnm");
- var newspclspec = ds_rslt_sppiz00500.getColumn(i, "spclspec");
- var newspclformat = ds_rslt_sppiz00500.getColumn(i, "spclformat");
- var newdetldesc = ds_rslt_sppiz00500.getColumn(i, "detldesc");
-
- if (flag == "I")
- {
- var clsprow = ds_list3_clsp.addRow();
-
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "clodseqno", seqno);
- ds_list3_clsp.setColumn(clsprow, "edilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", newspclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", newcdnm);
- ds_list3_clsp.setColumn(clsprow, "spclspec", newspclspec);
- ds_list3_clsp.setColumn(clsprow, "detldesc", newdetldesc);
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", edilnno);
- ds_list3_clsp.setColumn(clsprow, "oldspclcd", "");
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N");
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "U")
- {
- ds_list3_clsp.setColumn(rownum, "snglcalcscorcd", snglcalcscorcd);
- ds_list3_clsp.setColumn(rownum, "spclcd", newspclcd);
- ds_list3_clsp.setColumn(rownum, "cdnm", newcdnm);
- ds_list3_clsp.setColumn(rownum, "spclspec", newspclspec);
- ds_list3_clsp.setColumn(rownum, "spclformat", newspclformat);
- ds_list3_clsp.setColumn(rownum, "detldesc", newdetldesc);
-
- var oldspclcd = ds_rslt_sppiz00500.getColumn(i, "oldspclcd");
- var oldspclspec = ds_rslt_sppiz00500.getColumn(i, "oldspclspec");
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- var arrRow = new Array();
- arrRow[0] = rownum;
- grdf_setStatus(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, "U", arrRow);
- }
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "D" && !utlf_isNull(rownum))
- {
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if (rowstatus == 2)
- {
- ds_list3_clsp.deleteRow(rownum);
- }
- else
- {
- ds_list3_clsp.setColumn(rownum, "rowstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rownum, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(rownum);
- }
- ds_list3_clsp.rowposition = rownum;
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 줄단위 특정내역이 없습니다.");
- }
- }
- }
- lf_fSortSpclNo();
- lf_fSaveClspList();
- }
- else
- {
- sysf_messageBox("줄번호가 부여되지 않았으며 해당 줄단위 특정내역이", "I004"); ///줄번호가 부여되지 않았으며 해당 줄단위 특정내역이 없습니다.
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 일괄처방주석입력
- ****************************************************************************************/
- function lf_fOrderGridInsertAllCmt()
- {
- ds_rslt_sppiz00500.clearData();
- ds_cond_sppiz00500.clearData();
- ds_cond_sppiz00500_list.clearData();
-
- var rows = grdf_getSelectedRows(grp_biz.grd_clodhist);
-
- for (var k = 0; k < rows.length; k++ )
- {
- var row = rows[k];
-
- var seqno = ds_list2_clod.getColumn(row, "seqno");
- var edilnno = ds_list2_clod.getColumn(row, "edilnno");
-
- if (!utlf_isNull(seqno) && seqno != "0")
- {
- }
- else
- {
- sysf_messageBox("줄번호가 부여되지 않았으며 해당 줄단위 특정내역이", "I004");
- return;
- }
- }
-
- var rowcnt = 0;
- var setrow = 0;
-
- for (var k = 0; k < rows.length; k++ )
- {
- var row = rows[k];
- var seqno = ds_list2_clod.getColumn(row, "seqno");
- var edilnno = ds_list2_clod.getColumn(row, "edilnno");
- var snglcalcscorcd = ds_list2_clod.getColumn(row, "snglcalcscorcd");
-
- var lnunitspclspecyn = grp_biz.grd_clodhist.getCellText(row, grp_biz.grd_clodhist.getBindCellIndex("body", "lnunitspclspecyn"));
-
- if (utlf_isNull(lnunitspclspecyn))
- {
- dsf_makeValue(ds_cond_sppiz00500, "flag", "string", "I", 0);
- dsf_makeValue(ds_cond_sppiz00500, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz00500, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "clodseqno", "string", seqno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclcd", "string", "JX999", 0);
- dsf_makeValue(ds_cond_sppiz00500, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclspec", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclformat", "string", "X(700)", 0);
- dsf_makeValue(ds_cond_sppiz00500, "rownum", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "cdnm", "string", "기타내역", 0);
- dsf_makeValue(ds_cond_sppiz00500, "unitflag", "string", "J", 0);
-
- dsf_makeValue(ds_cond_sppiz00500_list, "flag", "string", "I", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "rownum", "string", "", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "snglcalcscorcd", "string", snglcalcscorcd, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "clodseqno", "string", seqno, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "edilnno", "string", edilnno, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclcd", "string", "JX999", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclspec", "string", "", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclformat", "string", "X(700)", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "cdnm", "string", "기타내역", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", rowcnt);
-
- rowcnt++;
-
- }
- else
- {
- for (var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var spcClodseqno = ds_list3_clsp.getColumn(i, "clodseqno");
- var spcClsoyn = ds_list3_clsp.getColumn(i, "clsoyn");
-
- if (spcClodseqno == seqno && spcClsoyn == "N")
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var spclcdJX999 = ds_list3_clsp.lookupExpr("insntstat!='D' && spclcd=='JX999' && snglcalcscorcd='"+snglcalcscorcd+"'", "spclcd");
-
- if (!utlf_isNull(spclcd) && spclcd == "JX999" && ds_list3_clsp.getRowType(i) != 8)
- {
- dsf_makeValue(ds_cond_sppiz00500, "flag", "string", "U", 0);
- dsf_makeValue(ds_cond_sppiz00500, "snglcalcscorcd", "string", ds_list3_clsp.getColumn(i, "snglcalcscorcd"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "edilnno", "string", ds_list3_clsp.getColumn(i, "edilnno"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "clodseqno", "string", ds_list3_clsp.getColumn(i, "clodseqno"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclcd", "string", spclcd, 0);
- dsf_makeValue(ds_cond_sppiz00500, "detldesc", "string", ds_list3_clsp.getColumn(i, "detldesc"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclformat", "string", "X(700)", 0);
- dsf_makeValue(ds_cond_sppiz00500, "rownum", "string", i, 0);
- dsf_makeValue(ds_cond_sppiz00500, "cdnm", "string", ds_list3_clsp.getColumn(i, "cdnm"), 0);
- dsf_makeValue(ds_cond_sppiz00500, "unitflag", "string", ds_list3_clsp.getColumn(i, "unitflag"), 0);
-
- dsf_makeValue(ds_cond_sppiz00500_list, "flag", "string", "U", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "rownum", "string", i, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "snglcalcscorcd", "string", ds_list3_clsp.getColumn(i, "snglcalcscorcd"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "clodseqno", "string", ds_list3_clsp.getColumn(i, "clodseqno"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "edilnno", "string", ds_list3_clsp.getColumn(i, "edilnno"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclformat", "string", ds_list3_clsp.getColumn(i, "spclformat"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "cdnm", "string", ds_list3_clsp.getColumn(i, "cdnm"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "detldesc", "string", ds_list3_clsp.getColumn(i, "detldesc"), rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "oldspclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "oldspclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
-
- if (spclcd == "JX999")
- {
- setrow = i;
- }
-
- rowcnt++;
- }
- else if (!utlf_isNull(spclcd) && spclcd != "JT001" && utlf_isNull(spclcdJX999) && ds_list3_clsp.getRowType(i) != 8)
- {
- dsf_makeValue(ds_cond_sppiz00500, "flag", "string", "I", 0);
- dsf_makeValue(ds_cond_sppiz00500, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz00500, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "clodseqno", "string", seqno, 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclcd", "string", "JX999", 0);
- dsf_makeValue(ds_cond_sppiz00500, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclspec", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "spclformat", "string", "X(700)", 0);
- dsf_makeValue(ds_cond_sppiz00500, "rownum", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz00500, "cdnm", "string", "기타내역", 0);
- dsf_makeValue(ds_cond_sppiz00500, "unitflag", "string", "J", 0);
-
- dsf_makeValue(ds_cond_sppiz00500_list, "flag", "string", "I", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "rownum", "string", "", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "snglcalcscorcd", "string", snglcalcscorcd, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "clodseqno", "string", seqno, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "edilnno", "string", edilnno, rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclcd", "string", "JX999", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclspec", "string", "", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "spclformat", "string", "X(700)", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "cdnm", "string", "기타내역", rowcnt);
- dsf_makeValue(ds_cond_sppiz00500_list, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", rowcnt);
-
- rowcnt++;
- }
- }
- }
-
- }
- }
-
- var objArg = new Object();
- objArg.arg_ds_hidden_clsp = ds_cond_sppiz00500;
- objArg.arg_ds_hidden_clsp_list = ds_cond_sppiz00500_list;
-
- var rtn = frmf_modal("SPPIZ00500", "SPPIZ00500", objArg, "", "", "", "", "", "", "", "", "", "M");
- var rsltcnt = ds_rslt_sppiz00500.rowcount;
-
- if (rsltcnt > 0)
- {
- ds_list2_clod.updatecontrol = false;
-
- for (var i = 0; i < rsltcnt; i++)
- {
- var flag = ds_rslt_sppiz00500.getColumn(i, "flag");
- var rownum = ds_rslt_sppiz00500.getColumn(i, "rownum");
- var newspclcd = ds_rslt_sppiz00500.getColumn(i, "spclcd");
- var newcdnm = ds_rslt_sppiz00500.getColumn(i, "cdnm");
- var newspclspec = ds_rslt_sppiz00500.getColumn(ds_rslt_sppiz00500.rowcount-1, "spclspec");
- var newspclformat = ds_rslt_sppiz00500.getColumn(i, "spclformat");
- var newdetldesc = ds_rslt_sppiz00500.getColumn(i, "detldesc");
- var newclodseqno = ds_rslt_sppiz00500.getColumn(i, "clodseqno");
- var newsnglcalcscorcd = ds_rslt_sppiz00500.getColumn(i, "snglcalcscorcd");
- var newedilnno = ds_rslt_sppiz00500.getColumn(i, "edilnno");
-
- if (flag == "I")
- {
- var clsprow = ds_list3_clsp.addRow();
-
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "clodseqno", newclodseqno);
- ds_list3_clsp.setColumn(clsprow, "edilnno", newedilnno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", newsnglcalcscorcd);
- ds_list3_clsp.setColumn(clsprow, "spclcd", newspclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", newcdnm);
- ds_list3_clsp.setColumn(clsprow, "spclspec", newspclspec);
- ds_list3_clsp.setColumn(clsprow, "spclformat", newspclformat);
- ds_list3_clsp.setColumn(clsprow, "detldesc", newdetldesc);
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", newedilnno);
- ds_list3_clsp.setColumn(clsprow, "oldspclcd", "");
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "N");
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
-
- // var find = ds_list2_clod.findRow("seqno", newclodseqno);
- // var srow = ds_list2_clod.findRow("seqno", newclodseqno);
- //
- // if (newspclcd == "JX999")
- // {
- // //grid_obj.cellStyle("background-color", srow, grid_obj.colRef("lnunitspclspecyn")) = "#f7a08b"; // class="color_6" 다홍색
- // }
- // else if (newspclcd != "JT001")
- // {
- // //grid_obj.cellStyle("background-color", srow, grid_obj.colRef("lnunitspclspecyn")) = "#b5a5d1"; // 연한 보라색
- // }
- }
- else if (flag == "U")
- {
- ds_list3_clsp.setColumn(rownum, "snglcalcscorcd", newsnglcalcscorcd);
- ds_list3_clsp.setColumn(rownum, "spclcd", newspclcd);
- ds_list3_clsp.setColumn(rownum, "cdnm", newcdnm);
- ds_list3_clsp.setColumn(rownum, "spclspec", newspclspec);
- ds_list3_clsp.setColumn(rownum, "spclformat", newspclformat);
- ds_list3_clsp.setColumn(rownum, "detldesc", newdetldesc);
- var oldspclcd = ds_rslt_sppiz00500.getColumn(i, "oldspclcd");
- var oldspclspec = ds_rslt_sppiz00500.getColumn(i, "oldspclspec");
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if (rowstatus == 2)
- {
- }
- else
- {
- var arrRow = new Array();
- arrRow[0] = rownum;
- grdf_setStatus(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, "U", arrRow);
- }
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "D" && !utlf_isNull(rownum))
- {
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if (rowstatus == 2)
- {
- ds_list3_clsp.deleteRow(rownum);
- }
- else
- {
- ds_list3_clsp.setColumn(rownum, "insntstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rownum, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(rownum);
- }
-
- ds_list3_clsp.setColumn(rownum, "insntstat", "D");
- ds_list3_clsp.rowposition = rownum;
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 줄단위 특정내역이 없습니다.");
- }
- }
- }
-
- ds_list2_clod.updatecontrol = true;
-
- lf_fSortSpclNo();
- lf_fSaveClspList();
- }
- /****************************************************************************************
- * Argument : function
- * Description : 1회량 일괄수정
- ****************************************************************************************/
- function lf_fAllSetDrugqtyCol()
- {
- var rows = grdf_getSelectedRows(grp_biz.grd_clodhist);
- if (rows.length > 0)
- {
- var setrow = rows[0];
-
- var edidrugqty = parseFloat(ds_list2_clod.getColumn(setrow, "edidrugqty"));
- if (utlf_isNull(edidrugqty) || edidrugqty == 0)
- {
- return;
- }
-
- var rCnt = 0;
-
- for (var i = 0; i < rows.length; i++)
- {
- var clodrow = rows[i];
-
- ds_list2_clod.setColumn(clodrow, "drugqty", edidrugqty);
- ds_list2_clod.setColumn(clodrow, "edidrugqty", edidrugqty);
- ds_list2_clod.setColumn(clodrow, "adjtresncd", "A");
-
- var arrRow = new Array();
- arrRow[0] = clodrow;
- grdf_setStatus(grp_biz.grd_clodhist, "U", arrRow);
-
- ds_list2_clod.clearSelect();
- ds_list2_clod.rowposition = clodrow;
- ds_list2_clod.selectRow(clodrow);
-
- lf_fSetTotDrugQtyAmt(); //1회량수정 후 계산
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 진료정보 버튼 이벤트 함수
- ****************************************************************************************/
- function lf_fGetEmrInformation()
- {
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
-
- if(pid)
- {
- fOpenSMMMO02500_1(pid);
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 횟수 일괄 수정
- ****************************************************************************************/
- function lf_fAllSetTimsCol()
- {
- var rows = grdf_getSelectedRows(grp_biz.grd_clodhist);
-
- if (rows.length > 0)
- {
- var setrow = rows[0];
-
- var tims = ds_list2_clod.getColumn(setrow, "tims");
-
- if (utlf_isNull(tims) || tims == "0")
- {
- return;
- }
-
- for (var i = 0; i < rows.length; i++)
- {
- var clodrow = rows[i];
-
- ds_list2_clod.setColumn(clodrow, "tims", tims);
- ds_list2_clod.setColumn(clodrow, "adjtresncd", "A");
-
- var arrRow = new Array();
- arrRow[0] = clodrow;
- grdf_setStatus(grp_biz.grd_clodhist, "U", arrRow);
-
- ds_list2_clod.clearSelect();
- ds_list2_clod.rowposition = clodrow;
- ds_list2_clod.selectRow(clodrow);
- lf_fSetTotDrugQtyAmt();
-
- }
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 수술 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_opyn_onclick(obj:Button, e:ClickEventInfo)
- {
- var clamkey = ds_main_item1_clbs.getColumn(0, "clamkey");
-
- if (clamkey)
- {
- var judgOpenWindow = frmf_findPopup("SPPIZ01300"); // SPPIZ01300_수술정보조회
-
- if (utlf_isNull(judgOpenWindow))
- {
- ds_cond_sppiz01300.clearData();
- ds_cond_sppiz01300.addRow();
-
- ds_cond_sppiz01300.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
- ds_cond_sppiz01300.setColumn(0, "indd", ds_main_item1_clbs.getColumn(0, "indd"));
- ds_cond_sppiz01300.setColumn(0, "cretno", ds_main_item1_clbs.getColumn(0, "cretno"));
- ds_cond_sppiz01300.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
- ds_cond_sppiz01300.setColumn(0, "instcd", ds_main_item1_clbs.getColumn(0, "ioflag"));
-
- var objArg = new Object();
- objArg.objDs = ds_cond_sppiz01300;
-
- frmf_modal("SPPIZ01300", "SPPIZ01300", objArg, "", "", "", "", "", "", "", "", "", "M");
- }
- else
- {
- judgOpenWindow.fSrchInfo();
- frmf_setFocusPop("SPPIZ01300");
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 기존코드 수정 1회량/횟수/일수 수정시
- ****************************************************************************************/
- // function fSetTotDrugQtyAmt(col)
- // {
- // var i = ds_list2_clod.rowposition;
- // var col = col;
- //
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "N", 0);
- // dsf_makeValue(ds_send_item5_mech, "ediupdateyn", "string", "N", 0);
- //
- // var drugqty = ds_list2_clod.getColumn(i, "drugqty");
- //
- // if (utlf_isNull(drugqty) || drugqty == "0")
- // {
- // ds_list2_clod.setColumn(i, "drugqty", "1");
- // }
- //
- // var tims = ds_list2_clod.getColumn(i, "tims");
- //
- // if (utlf_isNull(tims) || tims == "0")
- // {
- // ds_list2_clod.setColumn(i, "tims", "1");
- // }
- //
- // var dayno = ds_list2_clod.getColumn(i, "dayno");
- //
- // if (utlf_isNull(dayno) || dayno == "0")
- // {
- // ds_list2_clod.setColumn(i, "dayno", "1");
- // }
- //
- // var dayno = ds_list2_clod.getColumn(i, "edidrugqty");
- //
- // if (utlf_isNull(dayno)|| dayno == "0")
- // {
- // ds_list2_clod.setColumn(i, "edidrugqty", "1");
- // }
- // var dayno = ds_list2_clod.getColumn(i, "edidayno");
- //
- // if (utlf_isNull(dayno)|| dayno == "0")
- // {
- // ds_list2_clod.setColumn(i, "edidayno", "1");
- // }
- //
- // if(col == "edidrugqty")
- // {
- // ds_list2_clod.setColumn(i, "drugqty", ds_list2_clod.getColumn(i, "edidrugqty"));
- // ds_list2_clod.setColumn(i, "daydrugqty", ds_list2_clod.getColumn(i, "edidrugqty"));
- // col = "drugqty";
- // }
- // else if(col == "edidayno")
- // {
- // ds_list2_clod.setColumn(i, "dayno", ds_list2_clod.getColumn(i, "edidayno"));
- // col = "dayno";
- // }
- //
- // var sDrugqty = ds_list2_clod.getColumn(i, "drugqty");
- // var sTims = ds_list2_clod.getColumn(i, "tims");
- // var sDayno = ds_list2_clod.getColumn(i, "dayno");
- // var sUnitcost = ds_list2_clod.getColumn(i, "unitcost");
- // var sEdiUnitcost = ds_list2_clod.getColumn(i, "ediunitcost");
- // var sAmt = ds_list2_clod.getColumn(i, "amt");
- // var sEdiAmt = ds_list2_clod.getColumn(i, "ediamt");
- // var sDruglimitamt = ds_list2_clod.getColumn(i, "druglimitamt");
- // var sEdiDruglimitamt = ds_list2_clod.getColumn(i, "edidruglimitamt");
- // var sLimitdiffamt = ds_list2_clod.getColumn(i, "limitdiffamt");
- // var sEdiLimitdiffamt = ds_list2_clod.getColumn(i, "edilimitdiffamt");
- // var sEdiDrugqty = ds_list2_clod.getColumn(i, "edidrugqty");
- // var sEdiDayno = ds_list2_clod.getColumn(i, "edidayno");
- //
- // var drugqty = parseFloat(sDrugqty);
- // var tims = parseInt(sTims);
- // var dayno = parseInt(sDayno);
- // var unitcost = parseInt(sUnitcost);
- // var ediunitcost = parseInt(sEdiUnitcost);
- // var amt = parseInt(sAmt);
- // var ediamt = parseInt(sEdiAmt);
- // var druglimitamt = parseInt(sDruglimitamt);
- // var edidruglimitamt = parseInt(sEdiDruglimitamt);
- // var limitdiffamt = parseInt(sLimitdiffamt);
- // var edilimitdiffamt = parseInt(sEdiLimitdiffamt);
- //
- // var edidrugqty = parseFloat(sEdiDrugqty);
- // var edidayno = parseInt(sEdiDayno);
- //
- // if(col == "drugqty")
- // {
- // if(utlf_isNull(sDrugqty) || drugqty <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "dayno", "string", sDrugqty, 0);
- //
- // }
- // }
- // else if(col == "tims")
- // {
- // if(utlf_isNull(sTims) || tims <= 0)
- // {
- // lf_fCancelClodStatusChng(); // 처방이전상태 복구
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "dayno", "string", sTims, 0);
- // }
- // }
- // else if(col == "dayno")
- // {
- // if (utlf_isNull(sDayno) || dayno <= 0)
- // {
- // lf_fCancelClodStatusChng(); // 처방이전상태 복구
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "dayno", "string", sDayno, 0);
- // }
- // }
- // else if (col == "unitcost")
- // {
- // if (utlf_isNull(sUnitcost) || unitcost <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == "ediunitcost")
- // {
- // if(utlf_isNull(sEdiUnitcost) || ediunitcost <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == "amt")
- // {
- // if (utlf_isNull(sAmt) || amt <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == "ediamt")
- // {
- // if (utlf_isNull(sEdiAmt) || ediamt <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == grd_clodhist.colRef("druglimitamt"))
- // {
- // if (utlf_isNull(sDruglimitamt) || druglimitamt <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == "edidruglimitamt")
- // {
- // if (utlf_isNull(sEdiDruglimitamt) || edidruglimitamt <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == "limitdiffamt")
- // {
- // if (utlf_isNull(sLimitdiffamt)|| limitdiffamt <= 0)
- // {
- // lf_fCancelClodStatusChng(); // 처방이전상태 복구
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == "edilimitdiffamt")
- // {
- // if (utlf_isNull(sEdiLimitdiffamt) || edilimitdiffamt <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "unitcostupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == "edidrugqty")
- // {
- // if (utlf_isNull(sEdiDrugqty) || edidrugqty <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "ediupdateyn", "string", "Y", 0);
- // }
- // }
- // else if (col == "edidayno")
- // {
- // if (utlf_isNull(sEdiDayno) || edidayno <= 0)
- // {
- // lf_fCancelClodStatusChng();
- // return false;
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "ediupdateyn", "string", "Y", 0);
- // }
- // }
- //
- // var ordfromdd = ds_list2_clod.getColumn(i, "ordfromdd");
- // var ordtodd = ds_list2_clod.getColumn(i, "ordtodd");
- // var dayno = ds_list2_clod.getColumn(i, "dayno");
- // var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
- //
- // if ( utlf_isNull(ordfromdd)|| utlf_isNull(dayno)|| utlf_isNull(snglcalcscorcd))
- // {
- // return false;
- // }
- // if (parseInt(dayno) < 0)
- // {
- // return false;
- // }
- // else if (parseInt(dayno) > 365)
- // {
- // return false;
- // }
- //
- // dsf_makeValue(ds_send_item5_mech, "ordfromdd", "string", ordfromdd, 0);
- // dsf_makeValue(ds_send_item5_mech, "ordtodd", "string", ordtodd, 0);
- // dsf_makeValue(ds_send_item5_mech, "drugqty", "string", sEdiDrugqty, 0);
- // dsf_makeValue(ds_send_item5_mech, "tims", "string", sTims, 0);
- // dsf_makeValue(ds_send_item5_mech, "dayno", "string", sDayno, 0);
- // dsf_makeValue(ds_send_item5_mech, "unitcost", "string", sUnitcost, 0);
- // dsf_makeValue(ds_send_item5_mech, "ediunitcost", "string", sEdiUnitcost, 0);
- // dsf_makeValue(ds_send_item5_mech, "amt", "string", sAmt, 0);
- // dsf_makeValue(ds_send_item5_mech, "ediamt", "string", sEdiAmt, 0);
- // dsf_makeValue(ds_send_item5_mech, "druglimitamt", "string", sDruglimitamt, 0);
- // dsf_makeValue(ds_send_item5_mech, "edidruglimitamt", "string", sEdiDruglimitamt, 0);
- // dsf_makeValue(ds_send_item5_mech, "limitdiffamt", "string", sLimitdiffamt, 0);
- // dsf_makeValue(ds_send_item5_mech, "edilimitdiffamt", "string", sEdiLimitdiffamt, 0);
- // dsf_makeValue(ds_send_item5_mech, "edidrugqty", "string", sEdiDrugqty, 0);
- // dsf_makeValue(ds_send_item5_mech, "edidayno", "string", sEdiDayno, 0);
- //
- // var grupcalcscorcd = ds_list2_clod.getColumn(i, "grupcalcscorcd");
- //
- // if (!utlf_isNull(grupcalcscorcd) && grupcalcscorcd != "-")
- // {
- // dsf_makeValue(ds_send_item5_mech, "grupcalcscorcd", "string", grupcalcscorcd, 0);
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "grupcalcscorcd", "string", "", 0);
- // }
- //
- // dsf_makeValue(ds_send_item5_mech, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- // dsf_makeValue(ds_send_item5_mech, "basecd", "string", "", 0);
- //
- // dsf_makeValue(ds_send_item5_mech, "insukind", "string", ds_main_item1_clbs.getColumn(0, "insukindcd"), 0);
- // dsf_makeValue(ds_send_item5_mech, "suppkind", "string", ds_main_item1_clbs.getColumn(0, "suppkindcd"), 0);
- //
- // var orddeptcd = ds_list2_clod.getColumn(i, "orddeptcd");
- //
- // if (orddeptcd)
- // {
- // dsf_makeValue(ds_send_item5_mech, "orddeptcd", "string", orddeptcd, 0);
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "orddeptcd", "string", ds_main_item1_clbs.getColumn(0, "orddeptcd"), 0);
- // }
- // var orddrid = ds_list2_clod.getColumn(i, "orddrid");
- //
- // if (orddrid)
- // {
- // dsf_makeValue(ds_send_item5_mech, "orddrid", "string", orddrid, 0);
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "orddrid", "string", ds_main_item1_clbs.getColumn(0, "orddrid"), 0);
- // }
- //
- // var estmmncd = ds_list2_clod.getColumn(i, "estmmncd");
- //
- // if (!utlf_isNull(estmmncd) && estmmncd != "-")
- // {
- // dsf_makeValue(ds_send_item5_mech, "estmmncd", "string", estmmncd, 0);
- // }
- //
- // dsf_makeValue(ds_send_item5_mech, "adjtresncd", "string", ds_list2_clod.getColumn(i, "adjtresncd"), 0);
- // dsf_makeValue(ds_send_item5_mech, "undersixageyn", "string", ds_main_item1_clbs.getColumn(0, "undersixageyn"), 0);
- // dsf_makeValue(ds_send_item5_mech, "mechage", "string", ds_main_item1_clbs.getColumn(0, "mechage"), 0);
- // dsf_makeValue(ds_send_item5_mech, "hosinresncd", "string", ds_list2_clod.getColumn(i, "hosinresncd"), 0);
- // dsf_makeValue(ds_send_item5_mech, "ioflag", "string", ds_main_item1_clbs.getColumn(0, "ioflag"), 0);
- // dsf_makeValue(ds_send_item5_mech, "clamflagcd", "string", ds_main_item1_clbs.getColumn(0, "clamflagcd"), 0);
- //
- // if (utlf_isNull(ds_list2_clod.getColumn(i, "seqno")))
- // {
- // dsf_makeValue(ds_send_item5_mech, "mode", "string", "n", 0);
- // }
- // else
- // {
- // dsf_makeValue(ds_send_item5_mech, "mode", "string", "u", 0);
- // }
- //
- //
- // var oParam = {};
- // oParam.id = "TRPID20303";
- // oParam.service = "aftjudgapp.InAftJudg";
- // oParam.method = "reqGetCalcScorCd";
- // oParam.inds = "req=ds_send_item5_mech";
- // oParam.outds = "ds_main_item5_mech=mech";
- // oParam.async = false;
- // //oParam.callback = "cf_TRPID20303";
- //
- // tranf_submit(oParam);
- //
- // var clod = ds_main_item5_mech.rowcount;
- //
- // if (ds_main_item5_mech.rowcount == 1)
- // {
- // lf_fSetCalcScorAmt(clod, "update");
- // }
- // else
- // {
- // if (col == "drugqty")
- // {
- // lf_fCancelClodStatusChng();
- // }
- // else if (col == "tims")
- // {
- // lf_fCancelClodStatusChng();
- // }
- // else if (col == "dayno")
- // {
- // lf_fCancelClodStatusChng();
- // }
- // sysf_messageBox("조회된 처방 계산 내역이", "I004");
- // }
- // return true;
- // }
- /****************************************************************************************
- * Argument : function
- * Description : 일수 일괄수정
- ****************************************************************************************/
- function lf_fAllSetDaynoCol()
- {
- var rows = grdf_getSelectedRows(grp_biz.grd_clodhist);
-
- if(rows.length > 0)
- {
- var setrow = rows[0];
-
- var dayno = ds_list2_clod.getColumn(setrow, "edidayno");
- if(utlf_isNull(dayno) || dayno == "0")
- {
- return;
- }
-
- for(var i = 0; i < rows.length; i++)
- {
- var clodrow = rows[i];
- ds_list2_clod.setColumn(clodrow, "adjtresncd", "A");
- ds_list2_clod.setColumn(clodrow, "edidayno", dayno);
- ds_list2_clod.setColumn(clodrow, "dayno", dayno);
-
- var arrRow = new Array();
- arrRow[0] = clodrow;
- grdf_setStatus(grp_biz.grd_clodhist, "U", arrRow);
-
- var Sdayno = ds_list2_clod.getColumn(clodrow, "edidayno");
- var dayno = parseInt(Sdayno);
- var ordfromdd = ds_list2_clod.getColumn(clodrow, "ordfromdd");
- var ordtodd = ds_list2_clod.getColumn(clodrow, "ordtodd");
- var item1 = ds_list2_clod.getColumn(clodrow, "item1");
-
- var clbsordfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
- var clbsordtodd = ds_main_item1_clbs.getColumn(0, "ordtodd");
- var insukind = ds_main_item1_clbs.getColumn(0, "insukindcd");
- if (lgv_ioflag == "O") {
- if (utlf_isNull(Sdayno)|| dayno <= 0)
- {
- }
- else if (ordfromdd)
- {
- var fromDate = ordfromdd.toDate();
- var toDate = fromDate.getAddDate(dayno - 1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
- ordtodd = toDate.getDateFormat("YYYY") + toDate.getDateFormat("MM") + toDate.getDateFormat("DD");
-
- if (insukind == "41" && clbsordfromdd && clbsordtodd)
- {
- if (ordtodd > clbsordtodd)
- {
- ds_main_item1_clbs.setColumn(0, "ordtodd", ordtodd);
- }
-
- ds_list2_clod.setColumn(clodrow, "ordtodd", ordtodd);
- }
- }
- } else if (lgv_ioflag == "I") {
- if (utlf_isNull(Sdayno)|| dayno <= 0)
- {
- }
- else if (!utlf_isNull(ordfromdd))
- {
- var fromDate = ordfromdd.toDate();
- var toDate = fromDate.getAddDate(dayno - 1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
- ordtodd = toDate.getDateFormat("YYYY") + toDate.getDateFormat("MM") + toDate.getDateFormat("DD");
- if (item1 != "03" && clbsordfromdd && clbsordtodd) {
- if (ordtodd < clbsordfromdd || ordtodd > clbsordtodd) {
- sysf_messageBox("일수를 기준으로 계산된 처방종료일자가 [진료 개시일자~종료일자]를 벗어나", "E016"); // /일수(총투)를 기준으로 계산된처방 종료일자가 입원 개시일자~종료일자를 벗어나 유효하지 않습니다. 처방 data 및 row status를 변경 이전 상태로 복구한다.
- ds_list2_clod.setColumn(clodrow, "dayno", dayno);
- return;
- }
- }
- } else if (!utlf_isNull(ordtodd)) {
- var toDate = ordtodd.toDate();
- var fromDate = toDate.getAddDate((dayno - 1) * -1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
- ordfromdd = fromDate.getDateFormat("YYYY") + fromDate.getDateFormat("MM") + fromDate.getDateFormat("DD");
-
- if (item1 != "03" && !utlf_isNull(clbsordfromdd) && !utlf_isNull(clbsordtodd)) {
- if (ordfromdd < clbsordfromdd || ordfromdd > clbsordtodd) {
- sysf_messageBox("일수를 기준으로 계산된 처방시작일자가 [진료 개시일자~종료일자]를 벗어나", "E016"); // /일수(총투)를 기준으로 계산된 처방
- // 시작일자가 입원 개시일자~종료일자를 벗어나 유효하지 않습니다. 처방 data 및 row status를 변경 이전 상태로 복구한다.
- ds_list2_clod.setColumn(clodrow, "dayno", dayno);
- return;
- }
- }
- // 일수를 기준으로 구한 날짜가 올바른 경우
- ds_list2_clod.setColumn(clodrow, "ordfromdd", ordfromdd);
- }
- }
-
- ds_list2_clod.clearSelect();
- ds_list2_clod.rowposition = clodrow;
- ds_list2_clod.selectRow(clodrow);
-
- lf_fSetTotDrugQtyAmt();
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 수가 코드 조회 이벤트 함수
- ****************************************************************************************/
- function lf_fSetSrchCalcScorCd()
- {
- var col = grp_biz.grd_clodhist.currentcol;
- var row = grp_biz.grd_clodhist.currentrow;
- var calcscorcd = "";
- ds_cond_smpic00200.clearData();
- ds_cond_smpic00200.addRow();
-
- ds_send_item5_mech.clearData();
- ds_send_item5_mech.addRow();
-
- ds_send_item5_mech.setColumn(0, "unitcostupdateyn", "N");
- ds_send_item5_mech.setColumn(0, "ediupdateyn", "N");
-
- var cnfmcd = ds_list2_clod.getColumn(row, "cnfmcd");
-
- var lnunitspclspecyn = grp_biz.grd_clodhist.getCellText(row, grp_biz.grd_clodhist.getBindCellIndex("body", "lnunitspclspecyn"));
-
- if (!utlf_isNull(lnunitspclspecyn))
- {
- var ans = sysf_messageBox("입력된 줄단위 특정내역을 삭제하고 코드를 변경", "S001");
-
- if (ans == 6)
- {
- ds_list2_clod.setColumn(row, "cnfmcd", "");
- bgcExpr = "EXPR( !utlf_isNull(cnfmcd) || !utlf_isNull(lnunitspclspecyn) ? '#ffffff' : 'default')"; // White
- grp_biz.grd_clodhist.setCellProperty('Body',32, "background" , bgcExpr); // lnunitspclspecyn
- grp_biz.grd_clodhist.setCellProperty('Body',32, "background2", bgcExpr); // lnunitspclspecyn
-
- var edilnno = ds_list2_clod.getColumn(row, "edilnno");
- var clspgridrow;
-
- for ( var j = 0; j < ds_list3_clsp.rowcount; j++)
- {
- var spclLnNo = ds_list3_clsp.getColumn(j, "edilnno");
-
- if (spclLnNo == edilnno)
- {
- var rowstatus = ds_list3_clsp.getRowType(j);
- if (rowstatus == 2 )
- {
- ds_list3_clsp.setColumn(j, "spclcd" ,"");
- ds_list3_clsp.setColumn(j, "spclspec","");
- }
- else
- {
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(j, "d");
- ds_list3_clsp.updatecontrol = true;
- }
- }
- }
- lf_fSortSpclNo();
- }
- else if (ans == 7 || ans == 2)
- {
- lf_fCancelClodStatusChng();
- return;
- }
- }
- if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "grupcalcscorcd"))
- {
- var grupcalcscorcd = ds_list2_clod.getColumn(row, "grupcalcscorcd");
-
- if (utlf_isNull(grupcalcscorcd))
- {
- lf_fCancelClodStatusChng();
- return;
- }
-
- // SMPIC00200_수가조회 용
- ds_cond_smpic00200.setColumn(0, "con4_search2" , grupcalcscorcd);
- // submit("TRPID20303") 용
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", grupcalcscorcd);
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "basecd", "");
-
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("Body", "snglcalcscorcd"))
- {
- var snglcalcscorcd = ds_list2_clod.getColumn(row, "snglcalcscorcd");
- if (utlf_isNull(snglcalcscorcd))
- {
- lf_fCancelClodStatusChng();
- return;
- }
- ds_cond_smpic00200.setColumn(0, "con4_search2", snglcalcscorcd);
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", snglcalcscorcd);
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "basecd", "");
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "basecd"))
- {
- var basecd = ds_list2_clod.getColumn(row, "basecd");
-
- if (utlf_isNull(basecd))
- {
- lf_fCancelClodStatusChng();
- return;
- }
- else if ( ds_hidden_item5_clod.getColumn(0, "basecd") == basecd )
- {
- return;
- }
- ds_cond_smpic00200.setColumn(0, "con4_search2", basecd);
- ds_send_item5_mech.setColumn(0, "basecd", basecd);
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", "");
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "hngnm"))
- {
- var hngnm = ds_list2_clod.getColumn(row, "hngnm");
- if (utlf_isNull(hngnm))
- {
- lf_fCancelClodStatusChng();
- return;
- }
- else if ( ds_hidden_item5_clod.getColumn(0, "hngnm") == hngnm )
- {
- return;
- }
- ds_cond_smpic00200.setColumn(0, "con4_search2", hngnm);
- ds_send_item5_mech.setColumn(0, "basecd", "");
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", "");
- }
- var ordfromdd = ds_list2_clod.getColumn(row, "ordfromdd");
- var ordtodd = ds_list2_clod.getColumn(row, "ordtodd");
- if (utlf_isValidDateTime(ordfromdd))
- {
- if (!utlf_isValidDateTime(ordtodd))
- {
- ds_list2_clod.setColumn(row, "ordtodd", ordfromdd);
- ds_list2_clod.setColumn(row, "orddd", ordfromdd);
- ordtodd = ordfromdd;
- }
- }
- else
- {
- lf_fCancelClodStatusChng();
- sysf_messageBox("처방시작일 & 종료일은", "I003"); // /처방시작일 & 종료일은 필수입력입니다.
- return;
- }
- var dayno = utlf_getDateInterval(ordfromdd, ordtodd);
-
- if (dayno < 0)
- {
- sysf_messageBox("처방종료일자가 처방시작일자 보다 이전 날짜", "E008");
-
- return;
- }
- else if (dayno > 365)
- {
- sysf_messageBox("처방일이 잘못", "E005"); // /처방일이 잘못 선택되었습니다.
- return;
- }
-
- ds_send_item5_mech.setColumn(0, "indd" , ds_main_item1_clbs.getColumn(0, "indd"));
- ds_send_item5_mech.setColumn(0, "ordfromdd", ordfromdd);
- ds_send_item5_mech.setColumn(0, "ordtodd" , ordfromdd);
- ds_send_item5_mech.setColumn(0, "insukind" , ds_main_item1_clbs.getColumn(0, "insukindcd"));
- ds_send_item5_mech.setColumn(0, "suppkind" , ds_main_item1_clbs.getColumn(0, "suppkindcd"));
-
- var orddeptcd = ds_list2_clod.getColumn(row, "orddeptcd");
- if (orddeptcd)
- {
- ds_send_item5_mech.setColumn(0, "orddeptcd" , orddeptcd);
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "orddeptcd" , ds_main_item1_clbs.getColumn(0, "orddeptcd"));
- }
-
- var orddrid = ds_list2_clod.getColumn(row, "orddrid");
-
- if (orddrid)
- {
- ds_send_item5_mech.setColumn(0, "orddrid" , orddrid);
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "orddrid" , ds_main_item1_clbs.getColumn(0, "orddrid"));
- }
- var drugqty = ds_list2_clod.getColumn(row, "drugqty");
-
- if (utlf_isNull(drugqty))
- {
- drugqty = "1";
- }
- ds_send_item5_mech.setColumn(0, "drugqty", drugqty);
- var tims = ds_list2_clod.getColumn(row, "tims");
-
- if (utlf_isNull(tims))
- {
- tims = "1";
- }
-
- ds_send_item5_mech.setColumn(0, "tims", tims);
- var dayno = ds_list2_clod.getColumn(row, "dayno");
-
- if (utlf_isNull(dayno))
- {
- dayno = "1";
- }
- ds_send_item5_mech.setColumn(0, "dayno" , dayno);
- ds_send_item5_mech.setColumn(0, "adjtresncd" , ds_list2_clod.getColumn(row, "adjtresncd"));
- ds_send_item5_mech.setColumn(0, "undersixageyn" , ds_main_item1_clbs.getColumn(0, "undersixageyn"));
- ds_send_item5_mech.setColumn(0, "mechage" , ds_main_item1_clbs.getColumn(0, "mechage"));
- ds_send_item5_mech.setColumn(0, "hosinresncd" , ds_list2_clod.getColumn(row, "hosinresncd"));
- ds_send_item5_mech.setColumn(0, "payflag" , ds_list2_clod.getColumn(row, "payflag"));
- ds_send_item5_mech.setColumn(0, "clbsordfromdd" , ds_main_item1_clbs.getColumn(0, "ordfromdd"));
- ds_send_item5_mech.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
- ds_send_item5_mech.setColumn(0, "clamflagcd" , ds_main_item1_clbs.getColumn(0, "clamflagcd"));
- ds_send_item5_mech.setColumn(0, "mode" , "n");
- ds_send_item5_mech.setColumn(0, "pid" , ds_main_item1_clbs.getColumn(0, "pid"));
- ds_send_item5_mech.setColumn(0, "clamdeptcd" , ds_main_item1_clbs.getColumn(0, "clamdeptcd"));
- var clodlength;
- if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "hngnm"))
- {
- clodlength = 0;
- } else {
- var oParam = {};
- oParam.id = "TRPID20303";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetCalcScorCd";
- oParam.inds = "req=ds_send_item5_mech";
- oParam.outds = "ds_main_item5_mech=mech";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20303";
- tranf_submit(oParam);
-
- clodlength = ds_main_item5_mech.rowcount;
- }
-
- if ((clodlength == 0) || (col == grp_biz.grd_clodhist.getBindCellIndex("body", "basecd") && clodlength > 1))
- {
- ds_main_item5_mech.clearData();
- ds_main_item5_mech.addRow();
- var insukindcd = ds_main_item1_clbs.getColumn(0, "insukindcd");
- if (insukindcd == "11")
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "insu");
- }
- else if (insukindcd == "21" || insukindcd == "22")
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "proc");
- }
- else if (insukindcd == "31")
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "autm");
- }
- else if (insukindcd == "41")
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "indus");
- }
- else
- {
- ds_cond_smpic00200.setColumn(0, "con5_insu", "insu");
- }
-
- if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "grupcalcscorcd"))
- {
- ds_cond_smpic00200.setColumn(0, "con2_gsflag", "G");
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "snglcalcscorcd"))
- {
- ds_cond_smpic00200.setColumn(0, "con2_gsflag", "S");
- }
-
- if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "basecd"))
- {
- ds_cond_smpic00200.setColumn(0, "con3_search1", "edicd");
- }
- else if (col == grp_biz.grd_clodhist.getBindCellIndex("body", "hngnm"))
- {
- ds_cond_smpic00200.setColumn(0, "con3_search1", "hngnm");
- }
- else
- {
- ds_cond_smpic00200.setColumn(0, "con3_search1", "calcscorcd");
- }
-
- if (ordfromdd)
- {
- ds_cond_smpic00200.setColumn(0, "con1_dd", ordfromdd);
- }
-
- var objArg = new Object();
- objArg.arg_ds_temp = ds_cond_smpic00200;
-
- ds_rslt_smpic00200.clearData();
- var mechSelect = frmf_modal("SMPIC00200", "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- if (utlf_isNull(mechSelect))
- {
- ds_list2_clod.setColumn(row, "grupcalcscorcd", ds_hidden_item5_clod.getColumn(0, "grupcalcscorcd"));
- ds_list2_clod.setColumn(row, "snglcalcscorcd", ds_hidden_item5_clod.getColumn(0, "snglcalcscorcd"));
- ds_list2_clod.setColumn(row, "basecd" , ds_hidden_item5_clod.getColumn(0, "basecd"));
- sysf_messageBox("수가조회 화면에서 선택한 결과가", "I004");
- return;
- }
- if (ds_temp_picmmech.getColumn(0, "picmmech_ordinptflag") != "A" && ds_temp_picmmech.getColumn(0, "picmmech_ordinptflag") != "I")
- {
- ds_list2_clod.setColumn(row, "grupcalcscorcd", ds_hidden_item5_clod.getColumn(0, "grupcalcscorcd"));
- ds_list2_clod.setColumn(row, "snglcalcscorcd", ds_hidden_item5_clod.getColumn(0, "snglcalcscorcd"));
- ds_list2_clod.setColumn(row, "basecd", ds_hidden_item5_clod.getColumn(0, "basecd"));
-
- sysf_messageBox("처방이 불가한 코드", "E008"); // /처방이 불가한 코드입니다.
- return;
- }
- if (ds_temp_picmmech.getColumn(0, "picmmech_temp_grupsnglflag") != "S")
- {
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd"));
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "basecd" , "");
- ds_send_item5_mech.setColumn(0, "estmmncd" , "");
- ds_send_item5_mech.setColumn(0, "ioflag" , ds_main_item1_clbs.getColumn(0, "ioflag"));
-
- var oParam = {};
- oParam.id = "TRPID20303";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetCalcScorCd";
- oParam.inds = "req=ds_send_item5_mech";
- oParam.outds = "ds_main_item5_mech=mech";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20303";
- tranf_submit(oParam);
- }
- else
- {
- ds_send_item5_mech.setColumn(0, "grupcalcscorcd", "");
- ds_send_item5_mech.setColumn(0, "snglcalcscorcd", ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd"));
- ds_send_item5_mech.setColumn(0, "basecd" , "");
- ds_send_item5_mech.setColumn(0, "estmmncd" , "");
- ds_send_item5_mech.setColumn(0, "ioflag" , lgv_ioflag);
-
- var oParam = {};
- oParam.id = "TRPID20303";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetCalcScorCd";
- oParam.inds = "req=ds_send_item5_mech";
- oParam.outds = "ds_main_item5_mech=mech";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20303";
- tranf_submit(oParam);
- }
- }
-
- if(ds_main_item5_mech.getColumn(0,"leprotamt") > 0){
- grp_leprot.visible = true;
- }
-
- if(!grp_leprot.visible){
- lf_fSetNewCalcScorCd();
- }
-
- grp_biz.grd_clodhist.showEditor(false);
- }
- /****************************************************************************************
- * Argument : callback
- * Description : TRPID20331 submid callback 함수
- ****************************************************************************************/
- function cf_TRPID20331(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- alert("["+sSvcId+"]"+sErrorMsg);
- return;
- }
-
- var bfafamtdiff = ds_rslt_bfafamtdiff.rowcount;
- var payamt = ds_rslt_bfafamtdiff.getColumn(0, "payamt");
- var tot12 = ds_rslt_bfafamtdiff.getColumn(0, "tot12");
- var ownbamt = ds_rslt_bfafamtdiff.getColumn(0, "ownbamt");
- var ownb12 = ds_rslt_bfafamtdiff.getColumn(0, "ownb12");
- var insubamt = ds_rslt_bfafamtdiff.getColumn(0, "insubamt");
- var clam12 = ds_rslt_bfafamtdiff.getColumn(0, "clam12");
- var handcapfund = ds_rslt_bfafamtdiff.getColumn(0, "handcapfund");
- var handcap12 = ds_rslt_bfafamtdiff.getColumn(0, "handcap12");
- var procsubtamt = ds_rslt_bfafamtdiff.getColumn(0, "procsubtamt");
- var subt12 = ds_rslt_bfafamtdiff.getColumn(0, "subt12");
- var suppamt = ds_rslt_bfafamtdiff.getColumn(0, "suppamt");
- var supp12 = ds_rslt_bfafamtdiff.getColumn(0, "supp12");
- var max12 = ds_rslt_bfafamtdiff.getColumn(0, "max12");
- var payownblimamt = ds_rslt_bfafamtdiff.getColumn(0, "payownblimamt");
-
- if (bfafamtdiff > 0 )
- {
- // lf_setAlramMessage("원무사후차액이 10,000원 이상입니다." + "\n" +
- // "원무급여총액:[" + payamt + "] 사후급여총액:[" + tot12 + "]\n" +
- // "원무본인부담액:[" + ownbamt + "] 사후본인부담액:[" + ownb12 + "]\n" +
- // "원무청구액:[" + insubamt + "] 사후청구액:[" + clam12 + "]\n" +
- // "원무장애인금액:[" + handcapfund + "] 사후장애인금액:[" + handcap12 + "]\n" +
- // "원무대불금:[" + procsubtamt + "] 사후대불금:[" + subt12 + "]\n" +
- // "원무지원금:[" + suppamt + "] 사후지원금:[" + supp12 + "]\n" +
- // "원무본인부담상한액:[" + payownblimamt + "] 사후본인부담상한액:[" + max12 + "]\n"
- // + "확인하쉽시오.");
- ds_tmp_difflist.clearData();
- grp_clod00.visible = true;
- grp_clod00.position.x = 343;
- grp_clod00.position.y = 241;
-
- var arow = ds_tmp_difflist.addRow();
- ds_tmp_difflist.setColumn(arow,"nm", "급여총액");
- ds_tmp_difflist.setColumn(arow,"bf", payamt);
- ds_tmp_difflist.setColumn(arow,"af", tot12);
-
- arow = ds_tmp_difflist.addRow();
- ds_tmp_difflist.setColumn(arow,"nm", "본인부담액");
- ds_tmp_difflist.setColumn(arow,"bf", ownbamt);
- ds_tmp_difflist.setColumn(arow,"af", ownb12);
-
- arow = ds_tmp_difflist.addRow();
- ds_tmp_difflist.setColumn(arow,"nm", "청구액");
- ds_tmp_difflist.setColumn(arow,"bf", insubamt);
- ds_tmp_difflist.setColumn(arow,"af", clam12);
-
- arow = ds_tmp_difflist.addRow();
- ds_tmp_difflist.setColumn(arow,"nm", "장애인금액");
- ds_tmp_difflist.setColumn(arow,"bf", handcapfund);
- ds_tmp_difflist.setColumn(arow,"af", handcap12);
-
- arow = ds_tmp_difflist.addRow();
- ds_tmp_difflist.setColumn(arow,"nm", "대불금");
- ds_tmp_difflist.setColumn(arow,"bf", procsubtamt);
- ds_tmp_difflist.setColumn(arow,"af", subt12);
-
- arow = ds_tmp_difflist.addRow();
- ds_tmp_difflist.setColumn(arow,"nm", "지원금");
- ds_tmp_difflist.setColumn(arow,"bf", suppamt);
- ds_tmp_difflist.setColumn(arow,"af", supp12);
-
- arow = ds_tmp_difflist.addRow();
- ds_tmp_difflist.setColumn(arow,"nm", "본인부담상한액");
- ds_tmp_difflist.setColumn(arow,"bf", payownblimamt);
- ds_tmp_difflist.setColumn(arow,"af", max12);
-
- }
- }
- function grp_clod00_Button00_onclick(obj:Button, e:ClickEventInfo)
- {
- ds_tmp_difflist.clearData();
- grp_clod00.visible = false;
- }
- /****************************************************************************************
- * Argument :
- * Description : TRPID20332 submid callback 함수
- ****************************************************************************************/
- function cf_TRPID20332(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- alert("["+sSvcId+"]"+sErrorMsg);
- return;
- }
-
- var rsvcnt = ds_list9_trnpt.getColumn(0, "trnptcnt");
- var rsvname = ds_list9_trnpt.getColumn(0, "rsvname");
- var rsvrrgstno = ds_list9_trnpt.getColumn(0, "rsvrrgstno");
- if (rsvcnt > "1")
- {
- lf_setAlramMessage("이식건수가 2건 이상인 공여자입니다 이식 정보를 확인하세요 ");
- }
- if (rsvcnt == "1")
- {
- var msg = sysf_messageBox("공여자입니다 정보를 수혜자로 변경(변경후 저장해야 적용) ", "S001");
-
- if (msg == "6")
- {
- if (ds_list9_trnpt.rowcount > 0 ) {
- ds_main_item1_clbs.setColumn(0, "patnm", rsvname);
- ds_main_item1_clbs.setColumn(0, "patrrgstno", rsvrrgstno);
- }
- }
- }
- }
- /****************************************************************************************
- * Argument :
- * Description : TRPID20327 submid callback 함수
- ****************************************************************************************/
- function cf_TRPID20327(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0) { alert("["+sSvcId+"]"+sErrorMsg); return; }
- lf_fCheckSpclSpecData();
- lf_fSelectSpclRadio();
- }
- /****************************************************************************************
- * Argument : function
- * Description : 환자기준 메세지작성
- ****************************************************************************************/
- function lf_fPatJudgPatMsgTrsm()
- {
- if (!utlf_isNull(ds_main_item1_clbs.getColumn(0, "pid")))
- {
- ds_msgtrsm_info.clearData();
- ds_msgtrsm_info.addRow();
-
- // 값셋팅
- // 세션값 받기
- var sUserInfosS = sysf_getUserInfos();
- sUserInfosS = sUserInfosS + "|";
- var UserInfosS_Array = sUserInfosS.split("|");
- var userid = UserInfosS_Array[0]; //사용자번호
- var usernm = UserInfosS_Array[1]; //사용자이름
- var posinstcd = UserInfosS_Array[6]; //근무지기관코드 2009.04.15
- var posinstnm = UserInfosS_Array[7]; //근무지기관명 2009.04.15
- var posdeptcd = UserInfosS_Array[4]; //소속부서코드
- var posdeptnm = UserInfosS_Array[5]; //소속부서명
- if (utlf_isNull(userid) || userid == " " || userid == "-") userid = "pam";
-
- ds_msgtrsm_info.setColumn(0, "instcd" , "");
- ds_msgtrsm_info.setColumn(0, "msgwrtedd" , utlf_getCurrentDate());
- ds_msgtrsm_info.setColumn(0, "msgwrteno" , "");
- ds_msgtrsm_info.setColumn(0, "msgwrtehistno" , "");
- ds_msgtrsm_info.setColumn(0, "histstat" , "Y");
- ds_msgtrsm_info.setColumn(0, "pid" , ds_main_item1_clbs.getColumn(0, "pid"));
- ds_msgtrsm_info.setColumn(0, "orddd" , ds_main_item1_clbs.getColumn(0, "indd"));
- ds_msgtrsm_info.setColumn(0, "cretno" , ds_main_item1_clbs.getColumn(0, "cretno"));
- ds_msgtrsm_info.setColumn(0, "mskind" , "M");
- ds_msgtrsm_info.setColumn(0, "orddeptcd" , ds_main_item1_clbs.getColumn(0, "orddeptcd"));
-
- var drid = ds_main_item1_clbs.getColumn(0, "orddrid");
- var fRow = ds_init_orddrid2.findRow("cd", drid);
- var drnm = ds_init_orddrid2.getColumn(fRow, "nm");
-
- ds_msgtrsm_info.setColumn(0, "orddrid", drid); // chk, TABLE에 적용안함.(값만확인)
- ds_msgtrsm_info.setColumn(0, "orddrnm", drnm ); // chk, TABLE에 적용안함.(값만확인)
-
- ds_msgtrsm_info.setColumn(0, "ordtype" , "O"); // 외래기본 'O', chk
- ds_msgtrsm_info.setColumn(0, "kindflag" , "P"); // 환자기준 'P', chk
- ds_msgtrsm_info.setColumn(0, "grupcalcscorcd", "-");
- ds_msgtrsm_info.setColumn(0, "snglcalcscorcd", "-");
- ds_msgtrsm_info.setColumn(0, "ordqty" , 0);
- ds_msgtrsm_info.setColumn(0, "ordtims" , 0);
- ds_msgtrsm_info.setColumn(0, "orddays" , 0);
- ds_msgtrsm_info.setColumn(0, "prcpdd" , "-");
- ds_msgtrsm_info.setColumn(0, "prcpno" , 0);
- ds_msgtrsm_info.setColumn(0, "prcppayflag" , "-");
-
- ds_msgtrsm_info.setColumn(0, "rgstrid" , "-"); // 서버단에서 조회하여 가져와야함. chk
- ds_msgtrsm_info.setColumn(0, "rgstdd" , "-"); // 서버단에서 조회하여 가져와야함. chk
- ds_msgtrsm_info.setColumn(0, "rgsttm" , "-"); // 서버단에서 조회하여 가져와야함. chk
-
- ds_msgtrsm_info.setColumn(0, "sendphone" , ""); // 서버단에서 조회하여 가져와야함. chk
- ds_msgtrsm_info.setColumn(0, "anybodyyn" , "N"); // 누구나 기본 'N', chk
-
- ds_msgtrsm_info.setColumn(0, "sendflag" , "O"); // 진료기본 'O', chk
- ds_msgtrsm_info.setColumn(0, "senddate" , ""); //쿼리에서 timestamp chk
- ds_msgtrsm_info.setColumn(0, "sendid" , userid); //chk
-
- ds_msgtrsm_info.setColumn(0, "deliveid" , "-"); // 화면에서선택. chk
- ds_msgtrsm_info.setColumn(0, "recvdate" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "recvid" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "recvcnfmyn" , "N"); // 기본 비연속 'N', chk
-
- ds_msgtrsm_info.setColumn(0, "recvcnfmid" , userid); //chk
- ds_msgtrsm_info.setColumn(0, "sendmsg" , ""); //sendmsgvalue); // 기본 처방코드, 처방명값가지고 시작. chk
- ds_msgtrsm_info.setColumn(0, "recvmsg" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "fstrgstrid" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "fstrgstdt" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "lastupdtrid" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "lastupdtdt" , ""); // chk
-
- }
- else
- {
- lf_setAlramMessage("기본정보가 없습니다.");
- }
- var objArg = new Object();
- objArg.sName = this.name;
- var rtn = frmf_modal("SPPIZ01900", "SPPIZ01900", objArg, "", "", "", "", "", "", "", "", "", "M");// SPPIZ01900_심사환자메세지작성
-
- if (!utlf_isNull(rtn)) {
- img_msg.visible = true;
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 처방기준 전송메세지작성
- ****************************************************************************************/
- function lf_fOrderJudgPatMsgTrsm()
- {
- if (!utlf_isNull(ds_main_item1_clbs.getColumn(0, "pid")))
- {
- ds_msgtrsm_info.clearData();
- ds_msgtrsm_info.addRow();
-
- // 값셋팅
- // 처방이므로 처방row선택여부 확인
- if(ds_list2_clod.rowcount < 0)
- {
- return;
- }
- // 세션값 받기
- var sUserInfosS = sysf_getUserInfos();
- sUserInfosS = sUserInfosS + "|";
- var UserInfosS_Array = sUserInfosS.split("|");
- var userid = UserInfosS_Array[0]; //사용자번호
- var usernm = UserInfosS_Array[1]; //사용자이름
- var posinstcd = UserInfosS_Array[6]; //근무지기관코드 2009.04.15
- var posinstnm = UserInfosS_Array[7]; //근무지기관명 2009.04.15
- var posdeptcd = UserInfosS_Array[4]; //소속부서코드
- var posdeptnm = UserInfosS_Array[5]; //소속부서명
-
- if (utlf_isNull(userid) || userid == " " || userid == "-")
- {
- userid = "pam";
- }
-
- ds_msgtrsm_info.setColumn(0, "instcd" , "");
- ds_msgtrsm_info.setColumn(0, "msgwrtedd" , utlf_getCurrentDate());
- ds_msgtrsm_info.setColumn(0, "msgwrteno" , "");
- ds_msgtrsm_info.setColumn(0, "msgwrtehistno" , "");
- ds_msgtrsm_info.setColumn(0, "histstat" , "Y");
- ds_msgtrsm_info.setColumn(0, "pid" , ds_main_item1_clbs.getColumn(0, "pid"));
- ds_msgtrsm_info.setColumn(0, "orddd" , ds_main_item1_clbs.getColumn(0, "indd"));
- ds_msgtrsm_info.setColumn(0, "cretno" , ds_main_item1_clbs.getColumn(0, "cretno"));
- ds_msgtrsm_info.setColumn(0, "mskind" , "M");
- ds_msgtrsm_info.setColumn(0, "orddeptcd" , ds_main_item1_clbs.getColumn(0, "orddeptcd"));
-
- var drid = ds_main_item1_clbs.getColumn(0, "orddrid");
- var fRow = ds_init_orddrid2.findRow("cd", drid);
- var drnm = ds_init_orddrid2.getColumn(fRow, "nm");
- ds_msgtrsm_info.setColumn(0, "orddrid" , ds_main_item1_clbs.getColumn(0, "orddrid")); // chk, TABLE에 적용안함.(값만확인)
- ds_msgtrsm_info.setColumn(0, "orddrnm" , drnm); // chk, TABLE에 적용안함.(값만확인)
-
- ds_msgtrsm_info.setColumn(0, "ordtype" , "O"); // 외래기본 'O', chk
- ds_msgtrsm_info.setColumn(0, "kindflag" , "O");
- ds_msgtrsm_info.setColumn(0, "grupcalcscorcd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "grupcalcscorcd"));
- ds_msgtrsm_info.setColumn(0, "snglcalcscorcd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd"));
- ds_msgtrsm_info.setColumn(0, "ordqty" , ds_list2_clod.getColumn(ds_list2_clod.rowposition, "drugqty"));
- ds_msgtrsm_info.setColumn(0, "ordtims" , ds_list2_clod.getColumn(ds_list2_clod.rowposition, "tims"));
- ds_msgtrsm_info.setColumn(0, "orddays" , ds_list2_clod.getColumn(ds_list2_clod.rowposition, "dayno"));
- ds_msgtrsm_info.setColumn(0, "prcpdd" , "");
- ds_msgtrsm_info.setColumn(0, "prcpno" , "");
- ds_msgtrsm_info.setColumn(0, "prcppayflag" , ds_list2_clod.getColumn(ds_list2_clod.rowposition, "payflag"));
-
- ds_msgtrsm_info.setColumn(0, "rgstrid" , "-"); // 서버단에서 조회하여 가져와야함. chk
- ds_msgtrsm_info.setColumn(0, "rgstdd" , "-"); // 서버단에서 조회하여 가져와야함. chk
- ds_msgtrsm_info.setColumn(0, "rgsttm" , "-"); // 서버단에서 조회하여 가져와야함. chk
-
- ds_msgtrsm_info.setColumn(0, "sendphone" , ""); // 서버단에서 조회하여 가져와야함. chk
- ds_msgtrsm_info.setColumn(0, "anybodyyn" , "N"); // 누구나 기본 'N', chk
-
- ds_msgtrsm_info.setColumn(0, "sendflag" , "O"); // 진료기본 'O', chk
- ds_msgtrsm_info.setColumn(0, "senddate" , ""); //쿼리에서 timestamp chk
- ds_msgtrsm_info.setColumn(0, "sendid" , userid); //chk
-
- ds_msgtrsm_info.setColumn(0, "deliveid" , "-"); // 화면에서선택. chk
- ds_msgtrsm_info.setColumn(0, "recvdate" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "recvid" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "recvcnfmyn" , "N"); // 기본 비연속 'N', chk
-
- ds_msgtrsm_info.setColumn(0, "recvcnfmid" , userid); //chk
- ds_msgtrsm_info.setColumn(0, "sendmsg" , ""); //sendmsgvalue); // 기본 처방코드, 처방명값가지고 시작. chk
- ds_msgtrsm_info.setColumn(0, "recvmsg" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "fstrgstrid" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "fstrgstdt" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "lastupdtrid" , ""); // chk
- ds_msgtrsm_info.setColumn(0, "lastupdtdt" , ""); // chk
-
- }
- else
- {
- lf_setAlramMessage("기본정보가 없습니다.");
- }
- var objArg = new Object();
- objArg.sName = this.name;
-
- var rtn = frmf_modal("SPPIZ01900", "SPPIZ01900", objArg, "", "", "", "", "", "", "", "", "", "M");// SPPIZ01900_심사환자메세지작성
-
- if (!utlf_isNull(rtn)) {
- img_msg.visible = true;
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 약품편람 이벤트 함수
- ****************************************************************************************/
- function lf_fOrderDrugHBook()
- {
- var sInDsnm = dsf_createDsRow("ds_cond_SMADB01900", [
- {col:"srchdrugcd", type:"STRING", size:256, val:ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd")}
- ]);
- var objArg = new Object();
- objArg.arg_ds_hidden_receivedata = eval(sInDsnm);
-
- var rtn = frmf_open("SMADB01900", "SMADB01900", objArg, "", "", "", "", "", "", "", "", "", "M");
- dsf_deleteDs(sInDsnm)
- }
- /****************************************************************************************
- * Argument : function
- * Description : 수가조회 이벤트 함수
- ****************************************************************************************/
- function lf_fOrderCalcScorSrch(isAll)
- {
- frmf_setParameter("calcscorcd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd"));
- frmf_setParameter("judgflag", "Y" );
-
- var trgtManWindow = frmf_getChildWindow("SMPIC00100");
- if (utlf_isNull(trgtManWindow))
- {
- frmf_open("SMPIC00100", "SMPIC00100", "", "", "", "", "", "", "", "", "", "", "M");
- } else {
- trgtManWindow.fPopupMode();
- }
- }
- /****************************************************************************************
- * Argument : oncellclick
- * Description : 상단 버튼 탭
- ****************************************************************************************/
- function grp_dropdownmenu_grd_popup_oncellclick(obj:Grid, e:GridClickEventInfo)
- {
- // 바인드된 Dataset의 Row
- var nCrow = obj.getTreeChildRow(ds_popup.rowposition, 0);
- if (nCrow >= 0)
- {
- var nGrow = obj.getTreeRow(ds_popup.rowposition);
- //보여지지 않는 Row인지 확인
- if (obj.isTreeCollapsedRow(nCrow))
- {
- obj.setTreeStatus(nGrow, true);
- }
- else
- {
- obj.setTreeStatus(nGrow, false);
- }
- }
-
- var trgtWindow = ds_popup.getColumn(e.row, "popupid");
- frmf_setParameter("pid", ds_main_item1_clbs.getColumn(0, "pid"));
- if (trgtWindow == "SMMRI00400"){
- fOpenSMMRI00400(ds_main_item1_clbs.getColumn(0, "pid"));
- } else if(trgtWindow == "SMMNR02500"){
- frmf_setParameter("SMMNR02500_pid", "");
- frmf_setParameter("SMMNR02500_dschdd", "");
- frmf_setParameter("SMMNR02500_wardcd", "");
-
- frmf_open("SMMNR02500", "SMMNR02500", null, null, null, null, null, null, null, null, null, null, "M");
- } else if(trgtWindow == "SMAEA00300"){
- var objArg = new Object();
- objArg.sArg01 = ds_main_item1_clbs.getColumn(0, "pid");
- objArg.sArg02 = ds_main_item1_clbs.getColumn(0, "patnm");
-
- frmf_open(trgtWindow, trgtWindow, objArg, null, null, null, null, null, null, null, null, null, "M");
- } else {
- frmf_open(trgtWindow, trgtWindow, null, null, null, null, null, null, null, null, null, null, "M");
- }
-
- }
- /****************************************************************************************
- * Argument : submit
- * Description : TRPID20322
- ****************************************************************************************/
- function cf_TRPID20322(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0) { alert("["+sSvcId+"]"+sErrorMsg); return; }
- else
- {
-
- }
- }
- /****************************************************************************************
- * Argument : radio
- * Description : 원외처방 라디오 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_rdo_cloppayflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
- {
- var selectedRdoPay = obj.value;
-
- if (selectedRdoPay == "0" || selectedRdoPay == "1")
- {
- ds_list7_clop.filterstr = "payflag == '"+selectedRdoPay+"'";
- }
- else
- {
- ds_list7_clop.filterstr = "";
- }
- }
- function grp_biz_grd_clodhist_onlbuttonup(obj:Grid, e:GridMouseEventInfo)
- {
- if ( e.col == obj.getBindCellIndex("body", "hosinresncd"))
- {
- // '원내사유코드' 필드
- lf_fSetHosInResnCd();
- }
- }
- function btn_spclup_onclick(obj:Button, e:ClickEventInfo)
- {
- if(obj.visible) {
- grp_biz.btn_spcldown.visible = true;
- obj.visible = false;
- } else {
- obj.visible = false;
- }
- grp_biz.swt_spclmemo.bringToFront();
- grp_biz.btn_spclup.bringToFront();
- grp_biz.btn_spcldown.bringToFront();
- grp_biz.swt_spclmemo.position.height = swt_spclmemo_cheight;
- grp_biz.btn_preresncd.bringToFront();
- grp_biz.opt_preresncdnm.bringToFront();
- grp_biz.btn_mt0004.bringToFront();
- grp_biz.btn_memohist.bringToFront();
- grp_biz.btn_attData.bringToFront();
- grp_biz.opt_preresncd.bringToFront();
- }
- function btn_spcldown_onclick(obj:Button, e:ClickEventInfo)
- {
- if(obj.visible) {
- grp_biz.btn_spclup.visible = true;
- obj.visible = false;
- } else {
- obj.visible = false;
- }
- grp_biz.swt_spclmemo.bringToFront();
- grp_biz.swt_spclmemo.position.height = 500;
- grp_biz.btn_spclup.bringToFront();
- grp_biz.btn_spcldown.bringToFront();
- grp_biz.btn_preresncd.bringToFront();
- grp_biz.opt_preresncdnm.bringToFront();
- grp_biz.btn_mt0004.bringToFront();
- grp_biz.btn_memohist.bringToFront();
- grp_biz.btn_attData.bringToFront();
- grp_biz.opt_preresncd.bringToFront();
- }
- function grp_biz_grd_cldihist_onchar(obj:Grid, e:GridEditCharEventInfo)
- {
- var cur_row = obj.currentrow;
- ds_hidden_list1_cldi.setColumn(0, "oldseq", ds_list1_cldi.getColumn(cur_row, "diagseq"));
- ds_hidden_list1_cldi.setColumn(0, "olddiagcd", ds_list1_cldi.getColumn(cur_row, "diagcd"));
- ds_hidden_list1_cldi.setColumn(0, "olddiagnm", ds_list1_cldi.getColumn(cur_row, "diagnm"));
- ds_hidden_list1_cldi.setColumn(0, "oldengnm", ds_list1_cldi.getColumn(cur_row, "diagengnm"));
- ds_hidden_list1_cldi.setColumn(0, "oldrowstat", ds_list1_cldi.getRowType(cur_row));
- ds_hidden_list1_cldi.setColumn(0, "oldordfromdd", ds_list1_cldi.getColumn(cur_row, "ordfromdd"));
- }
- function grp_biz_button5_onclick(obj:Button, e:ClickEventInfo)
- {
- fSaveSetInfo();
- }
- function fSaveSetInfo(){
- grdf_SaveOrderInfoOfCol(grp_biz.grd_cldihist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
- grdf_SaveOrderInfoOfCol(grp_biz.grd_clodhist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
- grdf_SaveOrderInfoOfCol(grp_biz.grd_oprcphist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
- grdf_SaveOrderInfoOfCol(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
-
- grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
- }
- function cf_TXPID20301(sSvcId, nErrorCode, sErrorMsg) {
- arErrorCode.push(sSvcId, nErrorCode);
- }
- function fSetTextSpclJudgOrder(clopseqno,clopyn)
- {
- var ctext = "";
-
- if (clopyn=="Y"){
- ctext = " && clsoyn=='Y'";
- }
-
- if (ds_list3_clsp.findRowExpr("spclcd != 'JT001' && ds_list3_clsp.getRowType(currow) != 8 && clodseqno=='"+clopseqno+"'" + ctext) > -1 )
- {
- return "*";
- }
- else {
- return "";
- }
- }
- function lf_tooltipSet(grdObj, currow, curcell)
- {
- if(currow > -1 && curcell > 0)
- {
- grdObj.tooltiptext = grdObj.getCellText(currow, curcell);
- }
- else
- {
- grdObj.tooltiptext = "";
- }
- }
- function grp_biz_grd_oprcphist_onmousemove(obj:Grid, e:GridMouseEventInfo){
- if ( e.col == obj.getBindCellIndex("body", "adjtresncd")) {
- // '심사사유' 필드
- var adjtresncd = ds_list7_clop.getColumn(e.row, "adjtresncd");
- if ( !utlf_isNull(adjtresncd) && adjtresncd != "-" ) {
- lf_fSetAdjtResnCdClop();
- }
- }
- if ( e.col == obj.getBindCellIndex("body", "spclspecyn")) {
- obj.tooltiptext = obj.getCellText(e.row, obj.getBindCellIndex("body", "lnunitspclspec"));
- } else {
- obj.tooltiptext = "";
- }
- }
- function grp_biz_grd_oprcphist_onkeydown(obj:Grid, e:KeyEventInfo)
- {
- if (e.ctrlKey && e.keycode == 67 ) {
- system.setClipboard("CF_TEXT", obj.getCellText(obj.currentrow, obj.currentcol));
- }
- }
- function grp_biz_grd_clodhist_onmousemove(obj:Grid, e:GridMouseEventInfo)
- {
- if ( e.col == obj.getBindCellIndex("body", "lnunitspclspecyn")){
- obj.tooltiptext = eval(obj.binddataset).getColumn(e.row, "lnunitspclspec");
- } else if (e.col == obj.getBindCellIndex("body", "cnfmcd") || e.col == obj.getBindCellIndex("body", "toot1") || e.col == obj.getBindCellIndex("body", "toot")){
- lf_tooltipSet(obj, e.row, e.cell);
- } else if( (!utlf_isNull(eval(obj.binddataset).getColumn(e.row, "estmcls")) && !utlf_isNull(eval(obj.binddataset).getColumn(e.row, "estmmncd")) && !utlf_isNull(eval(obj.binddataset).getColumn(e.row, "estmcdnm"))) && (e.col == obj.getBindCellIndex("body", "estmcd") || e.col == obj.getBindCellIndex("body", "estmmncd"))){
- obj.tooltiptext = '[산정의미코드: ' + eval(obj.binddataset).getColumn(e.row, "estmmncd") + '] ' + eval(obj.binddataset).getColumn(e.row, "estmcdnm")
- } else {
- obj.tooltiptext = "";
- }
- }
- function grp_biz_grd_oprcphist_oncellclick(obj:Grid, e:GridClickEventInfo){
- var row = e.row;
- ds_hidden_list7_clop.setColumn(0, "oldclopdd", ds_list7_clop.getColumn(row, "clopdd"));
- ds_hidden_list7_clop.setColumn(0, "oldclopno", ds_list7_clop.getColumn(row, "clopno"));
- ds_hidden_list7_clop.setColumn(0, "oldrowstatus", ds_list7_clop.getRowType(row));
-
- ds_hidden_list7_clop.setColumn(0, "oldsnglcalcscorcd", ds_list7_clop.getColumn(row, "snglcalcscorcd"));
- ds_hidden_list7_clop.setColumn(0, "oldedicd", ds_list7_clop.getColumn(row, "edicd"));
- ds_hidden_list7_clop.setColumn(0, "oldedidrugqty", ds_list7_clop.getColumn(row, "edidrugqty"));
- ds_hidden_list7_clop.setColumn(0, "olddrugtims", ds_list7_clop.getColumn(row, "drugtims"));
- ds_hidden_list7_clop.setColumn(0, "oldedidrugdayno", ds_list7_clop.getColumn(row, "edidrugdayno"));
- }
- /****************************************************************************************
- * Argument : function
- * Description :
- 1. 중증/산정특례 상병 체크- 상병 화면 주상병(no=1)의 MT002에 V Code 있으면 중증/산정특례 V252, V027은 제외
- 2. 특정내역에 MT002 체크 - 중증/산정특례 특정기호 관련 특정내역
- 3. 특정내역에 MT014 체크 - 중증/산정특례 자격 번호 관련 특정내역
- //주상병이 v252이고 특정내역에 ct002코드가 없을때 발생 2012.07.05 plet2
- //특정내역이 ct002이고 주상병에 v252코드가 없을때 발생 2012.07.05 plet2
- //불완전상병체크
- ****************************************************************************************/
- function lf_fGetDiagSpclcdCheck()
- {
- var chk_vcode = ds_list1_cldi.lookup("diagseq", "1", "vcode");
- var chk_vcodeR = ds_list1_cldi.lookupExpr("diagseq == '1' && diagkindcd != 'R'", "vcode");
- var chk_CT002 = ds_list3_clsp.lookupExpr("spclcd == 'CT002' && rowstat != 'D'", "spclcd");
- var chk_MT002 = ds_list3_clsp.lookupExpr("spclcd == 'MT002' && rowstat != 'D'", "spclcd");
- var chk_F = ds_list3_clsp.lookupExpr("spclcd == 'MT002' && String(spclspec).indexOf('F') >= 0 && rowstat != 'D'", "spclcd");
- var chk_V001 = ds_list3_clsp.lookupExpr("spclcd == 'MT002' && spclspec == 'V001' && rowstat != 'D'", "spclspec");
- var chk_V008 = ds_list3_clsp.lookupExpr("spclcd == 'MT002' && spclspec == 'V008' && rowstat != 'D'", "spclcd");
- var chk_MT014 = ds_list3_clsp.lookupExpr("spclcd == 'MT014' && rowstat != 'D'", "spclcd");
- var kcd6chk = ds_list1_cldi.lookupExpr("kcd6chk == 'Y' && rowstat != 'U'", "kcd6chk"); // 불완전상병체크
- var snglcalcscorcdcnt = ds_list7_clop.rowcount;
- var chk_396 = ds_list7_clop.lookup("efcyclscd", "396", "efcyclscd");
- var chk_insukindcd = ds_main_item1_clbs.getColumn(0, "insukindcd");
- var chk_suppkindcd = ds_main_item1_clbs.getColumn(0, "suppkindcd");
- var chk_diagcd = ds_main_item1_clbs.lookup("diagseq", "1", "diagcd");
- var chk_diagcdR = ds_main_item1_clbs.lookupExpr("diagseq == '1' && diagkindcd != 'R'", "diagcd");
- var chk_pid = ds_main_item1_clbs.getColumn(0, "pid");
- var chk_ioflag = ds_main_item1_clbs.getColumn(0, "ioflag");
- var chk_ordfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
- var chk_clamym = ds_main_item1_clbs.getColumn(0, "clamym");
- var chk_clamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
- var chk_pidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
- var chk_O3420 = ds_main_item1_clbs.lookup("diagcd", "O3420", "diagcd");
- var chk_JT005 = ds_list3_clsp.lookupExpr("spclcd == 'JT005' && rowstat != 'D'", "spclspec");
- var chk_MS004 = ds_list3_clsp.lookupExpr("spclcd == 'MS004' && rowstat != 'D'", "spclspec");
- var chk_O365 = ds_main_item1_clbs.lookupExpr("diagcd == 'O365' && diagcd != 'O366'", "diagcd");
- var chk_rareobstflag = ds_main_item1_clbs.lookupExpr("suppamt > 0 && rareobstflag=='L'", "rareobstflag");
- var cnt_MT002 = ds_list3_clsp.getCaseCount("spclcd=='MT002' && rowstat !='D' && spclspec!='V206' && spclspec!='V246' && spclspec!='V231' && spclspec!='F008'");
- var chk_orddeptcd = ds_main_item1_clbs.getColumn(0, "orddeptcd");
-
- var result = true;
- if (chk_vcodeR != "V252" && chk_vcodeR != "V027" && chk_vcodeR != "V191" && chk_vcodeR != "V192")
- {
- if((utlf_isNull(chk_MT002) || utlf_isNull(chk_MT014)) && !utlf_isNull(chk_vcodeR))
- {
- if ((chk_diagcdR >= "N180" && chk_diagcdR <= "N189") && chk_V001 == "V001" && utlf_isNull(chk_MT014))
- {
- if(sysf_messageBox("주상병과 특정내역이 일치 하지 않습니다.!! (중증/산정특례)", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
- else
- {
- if ((chk_vcodeR == "V103") || (chk_insukindcd == "21" || chk_insukindcd == "22" )|| (chk_insukindcd == "11" && (chk_suppkindcd == "32" || chk_suppkindcd == "33" || chk_suppkindcd == "60" || chk_suppkindcd == "88"))|| chk_suppkindcd == "00")
- {
- result = true;
- }
- else
- {
- if(sysf_messageBox("주상병과 특정내역이 일치 하지 않습니다.!! (중증/산정특례).", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
-
- }
- }
- else if ((!utlf_isNull(chk_MT002) || !utlf_isNull(chk_MT014)) && utlf_isNull(chk_vcodeR))
- {
- if (!utlf_isNull(chk_F) || chk_V008)
- {
- result = true;
- }
- else
- {
- if (((!utlf_isNull(chk_MT002) || !utlf_isNull(chk_MT014)) && utlf_isNull(chk_vcodeR) && !((chk_insukindcd == "21" || chk_insukindcd == "22" ) && chk_suppkindcd == "00" )) || ((utlf_isNull(chk_MT002) || utlf_isNull(chk_MT014)) && !utlf_isNull(chk_vcodeR)))
- {
- if(sysf_messageBox("주상병과 특정내역이 일치 하지 않습니다.!! (중증/산정특례),", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
- }
- }
- else if (chk_vcodeR == "V103" && utlf_isNull(chk_MT002))
- {
- if(sysf_messageBox("주상병과 특정내역이 일치 하지 않습니다.!! (중증/산정특례)...", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
- else if (!utlf_isNull(chk_vcodeR) && chk_rareobstflag == "L" && cnt_MT002 > "0" )
- {
- if(sysf_messageBox("결핵환자는 결핵관련 특정기호(MT002) 이외에는 기재 할 수 없습니다.", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
-
- }
- if ((chk_vcodeR == "V252" && utlf_isNull(chk_CT002) && snglcalcscorcdcnt > 0 && (chk_insukindcd == "11" && chk_suppkindcd == "00")) || (chk_vcodeR != "V252" && !utlf_isNull(chk_CT002) && snglcalcscorcdcnt > 0 && (chk_insukindcd == "11" && chk_suppkindcd == "00")))
- {
- if ((chk_diagcdR >= "E10" && chk_diagcdR <= "E149") && chk_396 != "396")
- {
- if(sysf_messageBox("주상병과 특정내역이 일치 하지 않습니다.!! (경증)", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
-
- }
- if (kcd6chk == "Y")
- {
- if(sysf_messageBox("불완전상병이 존재 합니다.", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
- if (utlf_transNullToEmpty(chk_vcodeR).length > 0)
- {
- dsf_createDsRow("ds_send_chksuppkindflag_cond", [{ col: "diagcd", type: "string", size: 256, val: chk_diagcdR}
- , { col: "spclcd", type: "string", size: 256, val: chk_vcodeR}
- , { col: "ioflag", type: "string", size: 256, val: chk_ioflag}
- , { col: "ordfromdd", type: "string", size: 256, val: chk_ordfromdd}
- , { col: "clamym", type: "string", size: 256, val: chk_clamym}
- , { col: "clamdg", type: "string", size: 256, val: chk_clamdg}
- , { col: "pidsn", type: "string", size: 256, val: chk_clamdg}
- , { col: "pid", type: "string", size: 256, val: chk_pid}
- , { col: "insukindcd", type: "string", size: 256, val: chk_insukindcd}]);
-
- dsf_createDs("ds_hidden_chksuppkindflag_rslt", [{ col: "chksuppkindflag", type: "string", size: 256}]);
- var oParam = {};
- oParam.id = "TRPID20313";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetChkSuppkindFlag";
- oParam.inds = "req=ds_send_chksuppkindflag_cond";
- oParam.outds = "ds_hidden_chksuppkindflag_rslt=rslt";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20313";
- tranf_submit(oParam);
- var chksuppkindflag = ds_hidden_chksuppkindflag_rslt.getColumn(0, "chksuppkindflag");
-
- if (!utlf_isNull(chksuppkindflag) && chksuppkindflag != chk_suppkindcd && !utlf_isNull(chk_diagcdR) && chk_suppkindcd != "00" )
- {
- if(sysf_messageBox("주상병과 보조유형이 일치 하지 않습니다.", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
- }
- if (chk_diagcd == "O820" && utlf_transNullToEmpty(chk_O3420).length == 0 )
- {
- if(sysf_messageBox("반복제왕절개 환자입니다.", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- var ans = sysf_messageBox("O3420 상병을 입력" , "S001");
- if (ans == 6)
- {
- grp_biz.grd_cldihist.setFocus();
-
- lf_fDiagGridInsertRow("Y", "N");
-
- var maxseq = ds_main_item1_clbs.getMax("diagseq"); // var maxseq = model.getXPathValue("max(/root/main/list1/cldi[*]/diagseq)");
-
- ds_main_item1_clbs.setColumn(maxseq, "diagcd", "O3420"); //model.setValue("/root/main/list1/cldi[diagseq='"+maxseq+"']/diagcd","O3420");
- ds_main_item1_clbs.setColumn(maxseq, "diagnm", "이전의 제왕절개로 인한 흉터의 산모 관리"); //model.setValue("/root/main/list1/cldi[diagseq='"+maxseq+"']/diagnm","이전의 제왕절개로 인한 흉터의 산모 관리");
- }
- result = false;
- }
- }
- if (utlf_transNullToEmpty(chk_JT005).length > 0 && utlf_transNullToEmpty(chk_MS004).length > 0)
- {
- var nwbabyweight = parseInt(chk_MS004);
- var minweight = parseInt(ds_rslt_nbwt.lookup("prgntweek", chk_JT005, "minweight")); //getValue("/root/main/nbwt/nbwtlist[prgntweek='"+chk_JT005+"']/minweight"));
- var maxweight = parseInt(ds_rslt_nbwt.lookup("prgntweek", chk_JT005, "maxweight")); //getValue("/root/main/nbwt/nbwtlist[prgntweek='"+chk_JT005+"']/maxweight"));
-
- if (utlf_transNullToEmpty(chk_O365).length == 0 && (nwbabyweight <= minweight || nwbabyweight >= maxweight ))
- {
- if(sysf_messageBox("신생아 체중관련 상병누락 환자입니다.", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
- }
- var clbs_licnsno = ds_main_item1_clbs.getColumn(0, "licnsno");
- var cldi_licnsno = ds_list1_cldi.lookup("diagseq", "1", "licnsno");
- var clod_licnsno = ds_list2_clod.lookupExpr("item == '0101' || item == '0102'", "licnsno"); //getValue("/root/main/list2/clod[item='0101' or item='0102']/licnsno");
- var clod_snglcalcscorcd = ds_list2_clod.lookupExpr("item == '0101' || item == '0102'", "snglcalcscorcd"); //model.getValue("/root/main/list2/clod[item='0101' or item='0102']/snglcalcscorcd");
- if(clbs_licnsno != cldi_licnsno && ds_list1_cldi.getRowType(0) != 2)
- {
- var arrRow = new Array();
- arrRow[0] = 0;
-
- grdf_setStatus(grp_biz.grd_cldihist, "U", arrRow);
- }
- // if (clbs_licnsno != clod_licnsno && ds_list2_clod.getRowType(0) != 2)
- // {
- // var arrRow = new Array();
- // arrRow[0] = ds_list2_clod.findRow("snglcalcscorcd", clod_snglcalcscorcd);
- //
- // grdf_setStatus(grp_biz.grd_clodhist, "U", arrRow);
- // }
-
- var holigbn = ds_rslt_aftjudgbtn.getColumn(0, "holigbn");
- var holifromdd = ds_rslt_aftjudgbtn.getColumn(0, "holifromdd");
- var holitodd = ds_rslt_aftjudgbtn.getColumn(0, "holitodd");
-
- if(holigbn == "Y" && utlf_transNullToEmpty(clod_snglcalcscorcd).length > 0)
- {
- if(sysf_messageBox("진료의가 "+holifromdd+" ~ "+holitodd+" 기간동안 해외 출장입니다. 진료의사를 변경하세요.", "Q003") == 6)
- {
- result = true;
- }
- else
- {
- result = false;
- }
- }
-
- return result;
- }
- /****************************************************************************************
- * Argument : function
- * Description : 하단 우측 화살표 버튼 이벤트 "<<"
- ****************************************************************************************/
- function lf_fClickPrevNext(flag, judgendyn)
- {
- var iCompVal = -1;
-
- var trgtManWindow = frmf_getChildWindow(lgv_trgtManWindow); // SMPID20400_외래사후심사대상자조회.xrw
- if (!utlf_isNull(trgtManWindow))
- {
- var srchmode = trgtManWindow.ds_hidden_clbs.getColumn(0,"srchmode");
- var trgtmanlist = trgtManWindow.ds_grid_grd_clbsmast;
-
- var selectedRow = "";
- if (srchmode == "specclbs")
- { // 선별심사 모드인 경우
- selectedRow = trgtManWindow.ds_grid_grd_specclbs.rowposition; // row 선택 후 타이틀 부분 조정시 row = 0으로 바뀌므로 selectedRow로 체크함
- trgtmanlist = trgtManWindow.ds_grid_grd_specclbs;
- }
- else
- {
- selectedRow = trgtManWindow.ds_grid_grd_clbsmast.rowposition; // row 선택 후 타이틀 부분 조정시 row = 0으로 바뀌므로 selectedRow로 체크함
- }
- if (selectedRow > -1)
- {
- if ( flag == "N" )
- { // 이후선택
- var maxRow = trgtmanlist.rowcount;
- iCompVal = maxRow-1;
- }
- else
- { // 이전선택
- iCompVal = -1;
- }
-
- if (( flag == "P" && selectedRow > iCompVal ) || ( flag == "N" && selectedRow < iCompVal ))
- {
- if (grp_biz.btn_save.enable == true || grp_biz.btn_unjudg.enable == true)
- {
- // "심사중" 상태를 해제한다. "심사저장" 상태로 대상자 화면 갱신
- var tarjudgendyn = ds_main_item1_clbs.getColumn(0,"judgendyn");
- lf_fSetJudgSaveState(tarjudgendyn);
- }
-
- if (utlf_isNull(judgendyn) != true){
- var nextclamkey = trgtManWindow.lf_fSrchNextJudgTrgtManCLBS1(selectedRow, judgendyn)
- selectedRow= trgtManWindow.ds_grid_grd_clbsmast.findRow("clamkey", nextclamkey);
- if (utlf_isNull(selectedRow) || selectedRow == -1){
- sysf_messageBox("조회된 마지막 심사대상자 입니다. 이후 심사 대상자가", "I004"); ///조회된 마지막 심사대상자 입니다. 이후 심사 대상자가 없습니다.
- return;
- }
-
- } else {
- if ( flag == "N" )
- {
- selectedRow = selectedRow + 1;
- }
- else
- {
- selectedRow = selectedRow - 1;
- }
- }
- var trgtmanclamym = trgtmanlist.getColumn(selectedRow, "clamym");
- var trgtmanclamdg = trgtmanlist.getColumn(selectedRow, "clamdg");
- var trgtmanpid = trgtmanlist.getColumn(selectedRow, "pid");
- var trgtmanpidsn = trgtmanlist.getColumn(selectedRow, "pidsn");
- var trgtmancutprcpyn = trgtManWindow.ds_send.getColumn(0, "cutprcpsel");
- var trgtmanjudgendyn = trgtmanlist.getColumn(selectedRow, "judgendyn");
- var trgtmantootpopyn = lgv_ioflag == "O" ? trgtManWindow.grp_biz.checkbox10.value : "";
- var judgenddd = trgtmanlist.getColumn(selectedRow, "judgenddd");
- if (trgtmanclamym)
- {
- // 저장 후 결과를 다시 조회하기 위해
- lgv_ds_rslt.clearData();
- lgv_ds_rslt.addRow();
- lgv_ds_rslt.setColumn(0, "clamym", trgtmanclamym);
- lgv_ds_rslt.setColumn(0, "clamdg", trgtmanclamdg);
- lgv_ds_rslt.setColumn(0, "pid" , trgtmanpid);
- lgv_ds_rslt.setColumn(0, "pidsn" , trgtmanpidsn);
- lgv_ds_rslt.setColumn(0, "cutprcpyn", trgtmancutprcpyn);
- lgv_ds_rslt.setColumn(0, "judgendyn", trgtmanjudgendyn);
- lgv_ds_rslt.setColumn(0, "tootpopupyn", trgtmantootpopyn);
- lgv_ds_rslt.setColumn(0, "judgenddd", judgenddd);
- lgv_ds_rslt.setColumn(0, "selectedRow", selectedRow);
-
- var srchmode = trgtManWindow.ds_hidden_clbs.getColumn(0,"srchmode");
-
- if (srchmode == "specclbs")
- { // 선별심사 모드인 경우
- trgtManWindow.ds_grid_grd_specclbs.clearSelect();
- trgtManWindow.ds_grid_grd_specclbs.rowposition = selectedRow;
- trgtManWindow.ds_grid_grd_specclbs.selectRow(selectedRow);
- }
- else
- {
- trgtManWindow.ds_grid_grd_clbsmast.clearSelect();
- trgtManWindow.ds_grid_grd_clbsmast.rowposition = selectedRow;
- trgtManWindow.ds_grid_grd_clbsmast.selectRow(selectedRow);
- }
- lf_fGetAftJudgMngt(lgv_ds_rslt);
-
- trgtManWindow.setPopupRefresh(trgtmanpid);
- }
- return;
- }
- else
- { // 마지막 줄인 경우 이후 대상자가 없다.
- var judgendyn = ds_main_item1_clbs.getColumn(0,"judgendyn");
-
- lf_fSetJudgSaveState(judgendyn);
- sysf_messageBox("조회된 마지막 심사대상자 입니다. 이후 심사 대상자가", "I004"); ///조회된 마지막 심사대상자 입니다. 이후 심사 대상자가 없습니다.
- return;
- }
- }
- }
- if (frmf_isPopup()) {
- ds_tmp_clbs.setColumn(0, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
- ds_tmp_clbs.setColumn(0, "clamdg", ds_main_item1_clbs.getColumn(0, "clamdg"));
- ds_tmp_clbs.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
- ds_tmp_clbs.setColumn(0, "pidsn", ds_main_item1_clbs.getColumn(0, "pidsn"));
- ds_tmp_clbs.setColumn(0, "cutprcpyn", "N");
- lf_fGetAftJudgMngt(ds_tmp_clbs)
- } else {
- sysf_messageBox("외래사후심사대상자 조회에서 선택된 심사 대상자가", "I004"); ///외래사후심사대상자 조회에서 선택된 심사 대상자가 없습니다.
- }
- }
- function grp_biz_cap_clod_onclick(obj:Static, e:ClickEventInfo){
- fClopSizeChange(gClopSize);
- }
- function btn_clopmax_onclick(obj:Button, e:ClickEventInfo)
- {
- fClopSizeChange("MAX");
- }
- function btn_clopauto_onclick(obj:Button, e:ClickEventInfo)
- {
- fClopSizeChange("AUTO");
- }
- function btn_clopmin_onclick(obj:Button, e:ClickEventInfo)
- {
- fClopSizeChange("MIN");
- }
- function fClopSizeChange(tSize){
- if (tSize == "MAX"){
- grp_biz.cap_clop.position.y = gClop_cap_clop - 100;
- grp_biz.btn_clopmax.position.y = gClop_btn_clopmax - 100;
- grp_biz.btn_clopmin.position.y = gClop_btn_clopmin - 100;
- grp_biz.btn_clopauto.position.y = gClop_btn_clopauto - 100;
- grp_biz.btn_clopadd.position.y = gClop_btn_clopadd - 100;
- grp_biz.btn_clopdel.position.y = gClop_btn_clopdel - 100;
- grp_biz.btn_clop_idx.position.y = gClop_btn_clop_idx - 100;
- grp_biz.btn_samedateyn.position.y = gClop_btn_samedateyn - 100;
- grp_biz.grd_oprcphist.position.top = gClop_grd_oprcphist_top - 100;
- grp_biz.grd_clodhist.position.bottom = gClop_cap_clop - 100 - 5;
- grp_biz.rdo_cloppayflag.position.y = gClop_btn_clopmax - 100;
- grp_biz.button5.position.y = gClop_btn_clopmax - 100;
- grp_biz.button3.position.y = gClop_btn_clopmax - 100;
- grp_biz.button1.position.y = gClop_btn_clopmax - 100;
- grp_biz.stc_v252.position.y = gClop_stc_v252 - 100;
- grp_biz.line02.position.y = gClop_line02 - 100;
- if(grp_biz.cap_clop.visible == false) {
- grp_biz.grd_clodhist.position.bottom = grp_biz.grp_aftamt.position.y;
- }
- gClopSize = "MIN";
- } else if (tSize == "AUTO" ) {
- grp_biz.cap_clop.position.y = gClop_cap_clop;
- grp_biz.btn_clopmax.position.y = gClop_btn_clopmax;
- grp_biz.btn_clopmin.position.y = gClop_btn_clopmin;
- grp_biz.btn_clopauto.position.y = gClop_btn_clopauto;
- grp_biz.btn_clopadd.position.y = gClop_btn_clopadd;
- grp_biz.btn_clopdel.position.y = gClop_btn_clopdel;
- grp_biz.btn_clop_idx.position.y = gClop_btn_clop_idx;
- grp_biz.btn_samedateyn.position.y = gClop_btn_samedateyn;
- grp_biz.grd_oprcphist.position.top = gClop_grd_oprcphist_top ;
- grp_biz.grd_clodhist.position.bottom = gClop_cap_clop - 5;
- grp_biz.rdo_cloppayflag.position.y = gClop_btn_clopmax;
- grp_biz.button5.position.y = gClop_btn_samedateyn;
- grp_biz.button3.position.y = gClop_btn_samedateyn;
- grp_biz.button1.position.y = gClop_btn_samedateyn;
- grp_biz.stc_v252.position.y = gClop_stc_v252;
- grp_biz.line02.position.y = gClop_line02;
-
- gClopSize = "MAX";
- } else if (tSize == "MIN") {
- grp_biz.cap_clop.position.y = gClop_cap_clop + 50;
- grp_biz.btn_clopmax.position.y = gClop_btn_clopmax + 50;
- grp_biz.btn_clopmin.position.y = gClop_btn_clopmin + 50;
- grp_biz.btn_clopauto.position.y = gClop_btn_clopauto + 50;
- grp_biz.btn_clopadd.position.y = gClop_btn_clopadd + 50;
- grp_biz.btn_clopdel.position.y = gClop_btn_clopdel + 50;
- grp_biz.btn_clop_idx.position.y = gClop_btn_clop_idx + 50;
- grp_biz.btn_samedateyn.position.y = gClop_btn_samedateyn + 50;
- grp_biz.grd_oprcphist.position.top = gClop_grd_oprcphist_top + 50;
- grp_biz.grd_clodhist.position.bottom = gClop_cap_clop + 50 - 5;
- grp_biz.rdo_cloppayflag.position.y = gClop_btn_clopmax + 50;
- grp_biz.button5.position.y = gClop_btn_samedateyn + 50;
- grp_biz.button3.position.y = gClop_btn_samedateyn + 50;
- grp_biz.button1.position.y = gClop_btn_samedateyn + 50;
- grp_biz.stc_v252.position.y = gClop_stc_v252 + 50;
- grp_biz.line02.position.y = gClop_line02 + 50;
- gClopSize = "AUTO";
- }
-
- grp_biz.cap_clop.bringToFront();
- grp_biz.btn_clopmax.bringToFront();
- grp_biz.btn_clopmin.bringToFront();
- grp_biz.btn_clopauto.bringToFront();
- grp_biz.btn_clopadd.bringToFront();
- grp_biz.btn_clopdel.bringToFront();
- grp_biz.btn_clop_idx.bringToFront();
- grp_biz.btn_samedateyn.bringToFront();
- grp_biz.cap_clop.bringToFront();
- grp_biz.rdo_cloppayflag.bringToFront();
- grp_biz.button5.bringToFront();
- grp_biz.button3.bringToFront();
- grp_biz.button1.bringToFront();
- grp_biz.stc_v252.bringToFront();
- grp_biz.line02.bringToFront();
- }
- function ds_list7_clop_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
- {
- // var clopdd = utlf_transNullToEmpty(obj.getColumn(e.row, "clopdd"));
- // var clopno = utlf_transNullToEmpty(e.newvalue);
- //
- // obj.setColumn(e.row, "newmpsno", clopdd + clopno)
- // if( e.columnid == "clopno" ){
- // trace("dfdfdfdf"+e.newvalue)
- // obj.setColumn(e.row, "clopno", e.newvalue);
- // }
- }
- function cap_diag_onclick(obj:Static, e:ClickEventInfo){
-
- var tSize = "CHANGE";
- if ( tSize == "CHANGE" ) {
- if ( gCldiSize == "MAX" ) {
- tSize = "AUTO";
- } else if ( gCldiSize == "AUTO" ) {
- tSize = "MAX";
- }
- }
-
- if ( tSize == "MAX" ) {
- // 처방 그리드 : 진료분야 치과와 구분
- grp_biz.grd_cldihist.position.bottom = parseInt(grp_biz.grp_sea02.position.bottom) + (lgv_ioflag == "I" ? 300 : 45);
- } else if (tSize == "AUTO") {
- // 처방 그리드 : 진료분야 치과와 구분
- grp_biz.grd_cldihist.position.bottom = parseInt(grp_biz.grp_sea02.position.top) - + (lgv_ioflag == "I" ? 21 : 1);
- }
- grp_biz.grd_cldihist.bringToFront();
- gCldiSize = tSize;
- }
- function grp_biz_grp_sea00_ipt_insuno_onkeydown(obj:Edit, e:KeyEventInfo){
- if ( e.keycode == 13 ) {
- obj.updateToDataset();
- // 조합기호(ipt_insuno)를 입력하면 해당 조합명칭을 조회한다.
- lf_fGetOutAftJudgTrgtManInsunm();
- }
- }
- // 조합기호(ipt_insuno)를 입력하면 해당 조합명칭을 조회한다.
- function lf_fGetOutAftJudgTrgtManInsunm() {
- ds_send_item2_incd.setColumn(0, "insucd" , ds_main_item1_clbs.getColumn(0, "insuno"));
- ds_send_item2_incd.setColumn(0, "ordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
-
- var oParam = {};
- oParam.id = "TRPID20302";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetInAftJudgTrgtManInsunm";
- oParam.inds = "req=ds_send_item2_incd";
- oParam.outds = "ds_item2_incd=incd";
- oParam.async = true;
- oParam.progress = false;
- oParam.callback = "cf_TRPID20302";
- tranf_submit(oParam);
- }
- function cf_TRPID20302(sSvcId, nErrorCode, sErrorMsg) {
- if(nErrorCode < 0) return;
-
- var insucdnm = ds_item2_incd.getColumn(0, "insucdnm");
- if (!utlf_isNull(insucdnm)){
- ds_main_item1_clbs.setColumn(0, "insunm", insucdnm);
- } else {
- ds_main_item1_clbs.setColumn(0, "insunm", "");
- grp_biz_grp_sea00_btn_insuno_onclick();
- }
- }
- function grp_biz_grp_sea00_btn_insuno_onclick(obj:Button, e:ClickEventInfo){
- var ipt_pid = grp_sea00.ipt_pid.value;
- if (!utlf_isNull(ipt_pid)) {
- ds_hidden_sppmc02500.setColumn(0,"srchcond", "1");// 검색조건 : 등록번호로 설정
- ds_hidden_sppmc02500.setColumn(0,"pid", ipt_pid);
- } else {
- ds_hidden_sppmc02500.clearData();
- ds_hidden_sppmc02500.addRow();
- }
-
- var objArg = new Object();
- objArg.arg_ds_send = ds_hidden_sppmc02500;
-
- frmf_modal("SPPMC02500", "SPPMC02500", objArg, null, 1, 150, 150, null, null, null, null, null, "M");
-
- if(!utlf_isNull(this.objects["ds_patinfolist"])) {
- var srch_pid = ds_patinfolist.getColumn(0, "pid");
- var srch_hngnm = ds_patinfolist.getColumn(0, "hngnm");
-
- grp_sea00.ipt_pid.value = srch_pid;
- grp_sea00.opt_patnm.value = srch_hngnm;
- }
- }
- function btn_no_onclick(obj:Button, e:ClickEventInfo)
- {
- var pid = ds_main_item1_clbs.getColumn(0, "pid");
- if (pid) { // 조회된 심사대상자가 있으면
- // 의료급여자격조회
- var ordtype = ds_main_item1_clbs.getColumn(0, "stsioflag");
- if (ordtype == "-") {
- ordtype = "O";
- }
- }
- var parm = ds_main_item1_clbs.getColumn(0, "patrrgstno").substr(0,6) +
- ds_main_item1_clbs.getColumn(0, "patrrgstno").substr(6,7) + "▦" + //주민번호
- ds_main_item1_clbs.getColumn(0, "patnm") + "▦" + //이름
- ds_main_item1_clbs.getColumn(0, "ordfromdd") + "▦" + //입원일
- ds_main_item1_clbs.getColumn(0, "cretno") + "▦" + //생성번호
- ordtype + "▦" + //진료형태
- ds_main_item1_clbs.getColumn(0, "ordtodd") + "▦" + //퇴원일자
- "" + "▦" + //본인일부부담금
- "" + "▦" + //기관부담금
- pid + "▦" + //등록번호
- ds_main_item1_clbs.getColumn(0, "orddeptcd") + "▦" ; //진료과
- frmf_setParameter("SPPMC03900_PARM",parm);
- frmf_modal("SPPMC03900", "SPPMC03900", "" ,"","", 10, 10, "","","","","","M");
-
- var oParam = {};
- oParam.id = "TRPIJ00340";
- oParam.service = "bfjudgapp.InHospJudg";
- oParam.method = "reqGetRareCancerMsg_xp";
- oParam.inds = "req=ds_main_item1_clbs";
- oParam.outds = "ds_init_cmb_rarecancermsg=rarecancermsg";
- oParam.async = true;
- oParam.progress = false;
- oParam.callback = "cf_TRPIJ00340";
-
- tranf_submit(oParam);
- if (frmf_getParameter("SPPMC03900_RTN") == "Y") {
- var ptin_insdnm = frmf_getParameter("SPPMC03900_insdnm"); // 세대주성명
- var ptin_insucd = frmf_getParameter("SPPMC03900_insucd"); // 보장기관기호(사업장기호)
- var ptin_insuno = frmf_getParameter("SPPMC03900_insuno"); // 시설기호(증번호)
-
- if (utlf_isNull(ptin_insdnm)) {
- ptin_insdnm = "-";
- }
- if (utlf_isNull(ptin_insucd)) {
- ptin_insucd = "-";
- }
- if (utlf_isNull(ptin_insuno)) {
- ptin_insuno = "-";
- }
- ds_main_item1_clbs.setColumn(0,"insdnm",ptin_insdnm);
- ds_main_item1_clbs.setColumn(0,"insuno",ptin_insucd);
- ds_main_item1_clbs.setColumn(0,"certno",ptin_insuno);
-
- // 조합기호에 해당하는 조합명칭을 조회한다.
- ds_send_item2_incd.setColumn(0, "insucd", ds_main_item1_clbs.getColumn(0, "insuno"));
- ds_send_item2_incd.setColumn(0, "ordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
-
- var oParam = {};
- oParam.id = "TRPID20302";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqGetInAftJudgTrgtManInsunm";
- oParam.inds = "req=ds_send_item2_incd";
- oParam.outds = "ds_item2_incd=incd";
- oParam.async = false;
- tranf_submit(oParam);
- var insucdnm = ds_item2_incd.getColumn(0, "insucdnm");
- ds_main_item1_clbs.setColumn(0, "insunm", insucdnm);
- }
- }
- function lf_fPreListOnDblClick(){
- var row = ds_list4_clbs.rowposition;
- var clamym = ds_list4_clbs.getColumn(row, "clamym");
- var clamdg = ds_list4_clbs.getColumn(row, "clamdg");
- var pid = ds_list4_clbs.getColumn(row, "pid");
- var pidsn = ds_list4_clbs.getColumn(row, "pidsn");
- var ioflag = ds_list4_clbs.getColumn(row, "ioflag");
-
- if ((clamym == ds_main_item1_clbs.getColumn(0, "clamym")) &&
- (clamdg == ds_main_item1_clbs.getColumn(0, "clamdg")) &&
- (pid == ds_main_item1_clbs.getColumn(0, "pid")) &&
- (pidsn == ds_main_item1_clbs.getColumn(0, "pidsn"))) {
- //현재 심사중인 명세서와 동일한 명세서가 선택되었습니다.
- sysf_messageBox("현재 심사중인 명세서와 동일한 명세서가", "E005");
- return;
- }
-
- if(!utlf_isNull(clamym))
- {
- if(ioflag == "I")
- {
- var preDocuWindow = frmf_getChildWindow("SMPID20300");
- }
- else
- {
- var preDocuWindow = frmf_getChildWindow("SMPID20500");
- }
-
- if(utlf_isNull(preDocuWindow))
- {
- ds_send_item1_clbs.setColumn(0, "workflag", "12");
- ds_send_item1_clbs.setColumn(0, "clamym", clamym);
- ds_send_item1_clbs.setColumn(0, "clamdg", clamdg);
- ds_send_item1_clbs.setColumn(0, "pid", pid);
- ds_send_item1_clbs.setColumn(0, "pidsn", pidsn);
- ds_send_item1_clbs.setColumn(0, "ioflag", ioflag);
- if(ioflag == "I")
- {
- frmf_open("SMPID20300", "SMPID20300", {objDs:ds_send_item1_clbs}, "", "", "", "", "", "", "", "", "", "M");
- }
- else
- {
- frmf_open("SMPID20500", "SMPID20500", {objDs:ds_send_item1_clbs}, "", "", "", "", "", "", "", "", "", "M");
- }
- }
- else
- {
- ds_cond_smpid20500.setColumn(0, "workflag", "12");
- ds_cond_smpid20500.setColumn(0, "clamym", clamym);
- ds_cond_smpid20500.setColumn(0, "clamdg", clamdg);
- ds_cond_smpid20500.setColumn(0, "pid", pid);
- ds_cond_smpid20500.setColumn(0, "pidsn", pidsn);
- ds_cond_smpid20500.setColumn(0, "cutprcpyn", "N");
- preDocuWindow.lf_fGetAftJudgMngt(ds_cond_smpid20500);
-
- if(ioflag == "I")
- {
- frmf_setFocusPop("SMPID20300");
- }
- else
- {
- frmf_setFocusPop("SMPID20500");
- }
-
- }
- }
- }
- function grp_predoculist_grd_predocu_oncelldblclick(obj:Grid, e:GridClickEventInfo){
- // 이전 명세서 목록
- lf_fPreListOnDblClick();
- }
- /****************************************************************************************
- * Argument : function
- * Description : 일괄처방주석입력
- ****************************************************************************************/
- function lf_fCallClsoSpclAllSpec()
- {
- lf_fSetLnUnitClsoSpclAllSpec("grp_biz.grd_oprcphist");
- }
- /****************************************************************************************
- * Argument : function
- * Description :
- ****************************************************************************************/
- function lf_fSetLnUnitClsoSpclAllSpec(sgrid)
- {
- ds_rslt_sppiz01700.clearData();
- ds_cond_sppiz01700.clearData();
- ds_list_sppiz01700.clearData();
-
- var grid_obj = eval(sgrid);
- var grid_ds = eval(grid_obj.binddataset); //ds_list7_clop
- var rowcnt = 0;
- var setrow = 0;
-
- var rows = grdf_getSelectedRows(grp_biz.grd_oprcphist);
-
- for (var k = 0; k < rows.length; k++ )
- {
- var row = rows[k];
-
- var seqno = grid_ds.getColumn(row, "seqno");
- var edilnno = grid_ds.getColumn(row, "edilnno");
- var snglcalcscorcd = grid_ds.getColumn(row, "snglcalcscorcd");
- var mpsno = grid_ds.getColumn(row, "mpsno");
-
- if (sgrid == "grp_biz.grd_oprcphist")
- {
- var clopdd = grid_ds.getColumn(row, "clopdd");
- var clopno = grid_ds.getColumn(row, "clopno");
- }
- else if (sgrid == "grd_clsphist")
- {
- var clopdd = String(grid_ds.getColumn(row, "mpsno")).substr(0,8);
- var clopno = String(grid_ds.getColumn(row, "mpsno")).substr(8,5);
- }
-
- if (seqno != "0")
- {
- if (sgrid == "grp_biz.grd_oprcphist")
- {
- var lnunitspclspecyn = grid_obj.getCellText(row, grid_obj.getBindCellIndex("body", "spclspecyn"));
- }
- else if (sgrid == "grd_clsphist")
- {
- var lnunitspclspecyn = "*";
- }
- if (utlf_isNull(lnunitspclspecyn))
- {
- dsf_makeValue(ds_cond_sppiz01700, "flag", "string", "I", 0);
- dsf_makeValue(ds_cond_sppiz01700, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clopdd", "string", clopdd, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clopno", "string", clopno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clodseqno", "string", seqno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclcd", "string", "JX999", 0);
- dsf_makeValue(ds_cond_sppiz01700, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclspec", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclformat", "string", "X(700)", 0);
- dsf_makeValue(ds_cond_sppiz01700, "rownum", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz01700, "cdnm", "string", "기타내역", 0);
- dsf_makeValue(ds_cond_sppiz01700, "unitflag", "string", "J", 0);
-
- dsf_makeValue(ds_list_sppiz01700, "flag", "string", "I", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "rownum", "string", "", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "snglcalcscorcd", "string", snglcalcscorcd, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clopdd", "string", clopdd, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clopno", "string", clopno, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clodseqno", "string", seqno, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "edilnno", "string", edilnno, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclcd", "string", "JX999", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclspec", "string", "", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclformat", "string", "X(700)", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "cdnm", "string", "기타내역", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "unitflag", "string", "J", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "oldspclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "oldspclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "mpsno", "string", ds_list3_clsp.getColumn(i, "mpsno"), rowcnt);
- rowcnt++;
-
- }
- else
- {
-
- for (var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- var spcClodseqno = ds_list3_clsp.getColumn(i, "clodseqno");
- var spcClsoyn = ds_list3_clsp.getColumn(i, "clsoyn");
-
- if (spcClodseqno == seqno && spcClsoyn == "Y")
- {
- var spclcd = ds_list3_clsp.getColumn(i, "spclcd");
- var spclcdJX999 = ds_list3_clsp.lookupExpr("spclcd=='JX999' && snglcalcscorcd == '"+ snglcalcscorcd +"'", "spclcd");
-
- if (!utlf_isNull(spclcd) && spclcd != "JT001" && spclcd == "JX999" && ds_list3_clsp.getRowType(i) != 8)
- {
- dsf_makeValue(ds_cond_sppiz01700, "flag", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz01700, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clopdd", "string", clopdd, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clopno", "string", clopno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clodseqno", "string", seqno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclcd", "string", ds_list3_clsp.getColumn(i, "spclcd"), 0);
- dsf_makeValue(ds_cond_sppiz01700, "detldesc", "string", ds_list3_clsp.getColumn(i, "detldesc"), 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclformat", "string", ds_list3_clsp.getColumn(i, "spclformat"), 0);
- dsf_makeValue(ds_cond_sppiz01700, "rownum", "string", setrow, 0);
- dsf_makeValue(ds_cond_sppiz01700, "cdnm", "string", ds_list3_clsp.getColumn(i, "cdnm"), 0);
- dsf_makeValue(ds_cond_sppiz01700, "unitflag", "string", "J", 0);
-
-
- dsf_makeValue(ds_list_sppiz01700, "flag", "string", "", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "rownum", "string", i, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "snglcalcscorcd", "string", ds_list3_clsp.getColumn(i, "snglcalcscorcd"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clopdd", "string", String(ds_list3_clsp.getColumn(i, "mpsno")).substr(0,8), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clopno", "string", String(ds_list3_clsp.getColumn(i, "mpsno")).substr(8,5), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clodseqno", "string", ds_list3_clsp.getColumn(i, "clodseqno"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "edilnno", "string", ds_list3_clsp.getColumn(i, "edilnno"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclformat", "string", ds_list3_clsp.getColumn(i, "spclformat"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "cdnm", "string", ds_list3_clsp.getColumn(i, "cdnm"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "detldesc", "string", ds_list3_clsp.getColumn(i, "detldesc"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "oldspclcd", "string", spclcd, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "oldspclspec", "string", ds_list3_clsp.getColumn(i, "spclspec"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "mpsno", "string", ds_list3_clsp.getColumn(i, "mpsno"), rowcnt);
-
- if (spclcd == "JX999")
- {
- setrow = i;
- }
- rowcnt++;
- }
- else if (!utlf_isNull(spclcd) && spclcd != "JT001" && utlf_isNull(spclcdJX999) && ds_list3_clsp.getRowType(i) != 8)
- {
- dsf_makeValue(ds_cond_sppiz01700, "flag", "string", "I", 0);
- dsf_makeValue(ds_cond_sppiz01700, "snglcalcscorcd", "string", snglcalcscorcd, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clopdd", "string", clopdd, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clopno", "string", clopno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "clodseqno", "string", seqno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "edilnno", "string", edilnno, 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclcd", "string", "JX999", 0);
- dsf_makeValue(ds_cond_sppiz01700, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclspec", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz01700, "spclformat", "string", "X(700)", 0);
- dsf_makeValue(ds_cond_sppiz01700, "rownum", "string", "", 0);
- dsf_makeValue(ds_cond_sppiz01700, "cdnm", "string", "기타내역", 0);
- dsf_makeValue(ds_cond_sppiz01700, "unitflag", "string", "J", 0);
- dsf_makeValue(ds_list_sppiz01700, "flag", "string", "I", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "rownum", "string", i, rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "snglcalcscorcd", "string", ds_list3_clsp.getColumn(i, "snglcalcscorcd"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clopdd", "string", String(ds_list3_clsp.getColumn(i, "mpsno")).substr(0,8), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clopno", "string", String(ds_list3_clsp.getColumn(i, "mpsno")).substr(8,5), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "clodseqno", "string", ds_list3_clsp.getColumn(i, "clodseqno"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "edilnno", "string", ds_list3_clsp.getColumn(i, "edilnno"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclcd", "string", "JX999", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclspec", "string", "", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "spclformat", "string", "X(700)", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "cdnm", "string", ds_list3_clsp.getColumn(i, "cdnm"), rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "detldesc", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "oldspclcd", "string", "JX999", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "oldspclspec", "string", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재", rowcnt);
- dsf_makeValue(ds_list_sppiz01700, "mpsno", "string", ds_list3_clsp.getColumn(i, "mpsno"), rowcnt);
-
- rowcnt ++;
- }
- }
- }
- }
- }
- else
- {
- sysf_messageBox("처방번호가 부여되지 않았으며 해당 줄단위 특정내역이", "I004");
- }
- }
- var objArg = new Object();
- objArg.arg_ds_hidden_clsp_cond = ds_cond_sppiz01700;
- objArg.arg_ds_hidden_clsp_cond_list = ds_list_sppiz01700;
-
- frmf_modal("SPPIZ01700", "SPPIZ01700", objArg, "", "", "", "", "", "", "", "", "", "M");
- var rsltcnt = ds_rslt_sppiz01700.rowcount;
-
- if(rsltcnt > 0)
- {
- for(var i = 0; i < rsltcnt; i++)
- {
- var flag = ds_rslt_sppiz01700.getColumn(i, "flag");
- var rownum = ds_rslt_sppiz01700.getColumn(i, "rownum");
- var newspclcd = ds_rslt_sppiz01700.getColumn(i, "spclcd");
- var newcdnm = ds_rslt_sppiz01700.getColumn(i, "cdnm");
- var newspclspec = ds_rslt_sppiz01700.getColumn(ds_rslt_sppiz01700.rowcount-1, "spclspec");
- var newspclformat = ds_rslt_sppiz01700.getColumn(i, "spclformat");
- var newdetldesc = ds_rslt_sppiz01700.getColumn(i, "detldesc");
- var newclodseqno = ds_rslt_sppiz01700.getColumn(i, "clodseqno");
- var newsnglcalcscorcd = ds_rslt_sppiz01700.getColumn(i, "snglcalcscorcd");
- var newedilnno = ds_rslt_sppiz01700.getColumn(i, "edilnno");
-
- if(flag == "I")
- {
- var clsprow = ds_list3_clsp.addRow();
-
- if(newspclcd == "CT001")
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag", "C");
- ds_list3_clsp.setColumn(clsprow, "clodseqno", "0");
- ds_list3_clsp.setColumn(clsprow, "edilnno", "0");
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", "-");
- }
- else if( newspclcd == "CT002")
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag", "C");
- ds_list3_clsp.setColumn(clsprow, "clodseqno", "0");
- ds_list3_clsp.setColumn(clsprow, "edilnno", "0");
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", "-");
- }
- else
- {
- ds_list3_clsp.setColumn(clsprow, "unitflag", "J");
- ds_list3_clsp.setColumn(clsprow, "clodseqno", newclodseqno);
- ds_list3_clsp.setColumn(clsprow, "edilnno", newedilnno);
- ds_list3_clsp.setColumn(clsprow, "snglcalcscorcd", newsnglcalcscorcd);
- }
-
- var snglcalcscorcdcnt = ds_list7_clop.rowcount;
-
- var clopdd = ds_list7_clop.getColumn(0, "clopdd");
- var clopno = ds_list7_clop.getColumn(0, "clopno");
-
- if(snglcalcscorcdcnt > 0)
- {
- ds_list3_clsp.setColumn(clsprow, "mpsno", clopdd +""+clopno);
- }
- ds_list3_clsp.setColumn(clsprow, "spclcd", newspclcd);
- ds_list3_clsp.setColumn(clsprow, "cdnm", newcdnm);
- ds_list3_clsp.setColumn(clsprow, "spclspec", newspclspec);
- ds_list3_clsp.setColumn(clsprow, "spclformat", newspclformat);
- ds_list3_clsp.setColumn(clsprow, "detldesc", newdetldesc);
- ds_list3_clsp.setColumn(clsprow, "oldedilnno", newedilnno);
- ds_list3_clsp.setColumn(clsprow, "oldspclcd", "");
- ds_list3_clsp.setColumn(clsprow, "clsoyn", "Y");
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "U")
- {
- ds_list3_clsp.setColumn(rownum, "snglcalcscorcd", newsnglcalcscorcd);
- ds_list3_clsp.setColumn(rownum, "spclcd", newspclcd);
- ds_list3_clsp.setColumn(rownum, "cdnm", newcdnm);
- ds_list3_clsp.setColumn(rownum, "spclspec", newspclspec);
- ds_list3_clsp.setColumn(rownum, "spclformat", newspclformat);
- ds_list3_clsp.setColumn(rownum, "detldesc", newdetldesc);
-
- var oldspclcd = ds_rslt_sppiz01700.getColumn(i, "oldspclcd");
- var oldspclspec = ds_rslt_sppiz01700.getColumn(i, "oldspclspec");
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if(rowstatus == 2)
- {
- }
- else
- {
- var arrRow = new Array();
- arrRow[0] = rownum;
- grdf_setStatus(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, "I", arrRow);
- }
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "코드: "+ newspclcd +" / 명칭: "+ newcdnm +" / 내역: "+ newspclspec +" / 형식: "+ newspclformat);
- }
- else if (flag == "D" && !utlf_isNull(rownum))
- {
- var rowstatus = ds_list3_clsp.getRowType(rownum);
-
- if(rowstatus == 2)
- {
- ds_list3_clsp.deleteRow(rownum);
- }
- else
- {
- ds_list3_clsp.setColumn(rownum, "insntstat","D");
- ds_list3_clsp.updatecontrol = false;
- ds_list3_clsp.setRowType(rownum, 'd');
- ds_list3_clsp.updatecontrol = true;
- lf_fSetSpclSpecJX999()
- ds_list3_clsp.deleteRow(rownum);
- }
-
- ds_list3_clsp.setColumn(rownum, "insntstat", "D");
- ds_list3_clsp.rowposition = rownum;
-
- ds_hidden_list3.setColumn(0, "msgspclformat", "입력된 줄단위 특정내역이 없습니다.");
- } // 특정 코드 상태 따른 if end
- } // for end
- var cnt = 0;
-
- for(var i = 0; i < ds_list3_clsp.rowcount; i++)
- {
- if(ds_list3_clsp.getRowType(i) != 8)
- {
- var spcmpsno = ds_list3_clsp.getColumn(i, "mpsno");
- var spcClodseqno = ds_list3_clsp.getColumn(i, "clodseqno");
- var spcClsoyn = ds_list3_clsp.getColumn(i, "clsoyn");
-
- if (spcmpsno == mpsno && spcClodseqno == seqno && spcClsoyn == "Y")
- {
- cnt++;
- break;
- }
- }
- }
-
- ds_list7_clop.updatecontrol = false;
-
- if (cnt > 0)
- {
- for (var i = 0; i < ds_list7_clop.rowcount; i++)
- {
- var mpsno = ds_list7_clop.getColumn(i, "mpsno");
- var seqno = ds_list7_clop.getColumn(i, "seqno");
-
- if (spcmpsno == mpsno && spcClodseqno == seqno && spcClsoyn == "Y")
- {
- ds_list7_clop.setColumn(i, "spclspecyn", "*");
- break;
- }
- }
- }
-
- ds_list7_clop.updatecontrol = true;
-
- lf_fSortSpclNo();
- lf_fSaveClspList();
- }
- }
- // 보조유형 및 요율 combo(cmb_supprate)의 선택 값이 변경된 경우 각각을 해당 output에 설정한다.
- function lf_fSetPatSuppRate() {
- // 보조유형ID과 요율%로 combo 의 value
- // 보조유형NM과 요율%로 combo 의 label
- var patsupprate = utlf_transNullToEmpty(ds_main_item1_clbs.getColumn(0, "patsupprate"));
- var suppkindcd = patsupprate.substr(0, 2);
- var insukindcd = ds_main_item1_clbs.getColumn(0, "insukindcd");
- var payownbrate = patsupprate.substr(3, patsupprate.length);
-
- ds_main_item1_clbs.addColumn("recalcyn", "string");
-
- ds_main_item1_clbs.setColumn(0, "suppkindcd", suppkindcd);
- ds_main_item1_clbs.setColumn(0, "payownbrate", payownbrate);
- ds_main_item1_clbs.setColumn(0, "recalcyn", "Y"); // 저장 시에 재계산할지 여부를 설정함
-
- // 공상구분(offcharm) :1:공상, C:차상위본인부담경감자, 0:무
- if (lgv_ioflag == "O") {
- if (suppkindcd == "42"){
- ds_main_item1_clbs.setColumn(0, "offcharm", "1");
- } else if (suppkindcd == "32"){
- ds_main_item1_clbs.setColumn(0, "offcharm", "C");
- } else {
- ds_main_item1_clbs.setColumn(0, "offcharm", "0");
- }
- }
- if (!utlf_isNull(suppkindcd) && suppkindcd != "00") {
- grp_sea00.opt_suppkind.style.backgroundColor = "#f7a08b";
- grp_sea00.opt_payownbrate.style.backgroundColor = "#f7a08b";
- } else {
- grp_sea00.opt_suppkind.style.backgroundColor = "#f2f2f2"; // output_fix 클래스의 background-color
- grp_sea00.opt_payownbrate.style.backgroundColor = "#f2f2f2";
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description :
- ****************************************************************************************/
- function lf_fGetToothPop()
- {
- var tootSelectcnt = ds_rslt_sppiz00600.rowcount;
- var flag = "";
- var row = "";
- var toot = "";
- tootSelectcnt = eval(tootSelectcnt);
- for ( var i = 0; i < tootSelectcnt; i++)
- {
- flag = ds_rslt_sppiz00600.getColumn(i, "flag");
- row = ds_rslt_sppiz00600.getColumn(i, "row");
- var rlsttoot = ds_rslt_sppiz00600.getColumn(i, "toot");
- var rlsttoot1 = ds_rslt_sppiz00600.getColumn(i, "toot1");
- if (utlf_isNull(rlsttoot))
- {
- rlsttoot = "-";
- }
- if (utlf_isNull(rlsttoot1))
- {
- rlsttoot1 = "-";
- }
-
- if (flag == "1")
- {
- toot = ds_list1_cldi.getColumn(row, "toot");
- ds_list1_cldi.setColumn(row, "toot" , rlsttoot);
- ds_list1_cldi.setColumn(row, "toot1", rlsttoot1);
- if (rlsttoot != toot)
- {
- var cldistatus = ds_list1_cldi.getRowType(row);
-
- if (cldistatus == 4)
- {
- // update
- ds_list1_cldi.updatecontrol = false;
- ds_list1_cldi.setRowType(row, "u");
- ds_list1_cldi.updatecontrol = true;
- }
- }
- }
- else if (flag == "2")
- {
- toot = ds_list2_clod.getColumn(row, "toot");
- ds_list2_clod.setColumn(row, "toot" , rlsttoot);
- ds_list2_clod.setColumn(row, "toot1", rlsttoot1);
- if (rlsttoot != toot)
- {
- // 치식번호가 변경된 경우 처방의 수정된 row 상태를 표시한다.
- lf_fSetOrderChangeRowStat(row);
- }
- }
- }
- }
- /****************************************************************************************
- * Argument : 버튼 이벤트
- * Description : 인적사항 우측 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_btn_patspcfyn_onclick(obj:Button, e:ClickEventInfo)
- {
- ds_hidden_smpmc01300_cond.setColumn(0, "srchcond", "1");
- ds_hidden_smpmc01300_cond.setColumn(0, "srchcond", ds_main_item1_clbs.getColumn(0, "pid"));
-
- var objArg = new Object();
- objArg.arg_ds_source= ds_hidden_smpmc01300_cond;
-
- frmf_modal("SMPMC01300", "SMPMC01300", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- var indd = ds_main_item1_clbs.getColumn(0, "indd");
-
- if(indd)
- {
- ds_hidden_smpmc01300_cond.setColumn(0, "indd", indd);
-
- var oParam = {};
- oParam.id = "TRPID20308";
- oParam.service = "aftjudgapp.InAftJudg";
- oParam.method = "reqExeProbJudgFlag";
- oParam.inds = "req=ds_hidden_smpmc01300_cond";
- oParam.outds = "ds_hidden_smpmc01300_cond=cond ds_hidden_smpmc01300_rslt=rslt";
- oParam.async = false;
- //oParam.callback = "cf_TRPID20308";
- tranf_submit(oParam);
- }
- }
- function grp_biz_grp_sea00_cmb_orddrid_ondropdown(obj:Combo, e:EventInfo)
- {
- ds_init_orddrid2.filter("dp == '"+ ds_main_item1_clbs.getColumn(0,"orddeptcd") +"'");
- }
- /****************************************************************************************
- * Argument : dataset
- * Description : 처방 그리드 데이터 셋 컬럼 변경 이벤트
- ****************************************************************************************/
- function ds_list2_clod_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
- {
- var row = e.row
- var col = e.columnid;
- if (col == "ordfromdd")
- {
- if (lgv_ioflag=="I") {
- var ordfromdd = e.newvalue;
- var ordtodd = obj.getColumn(row, "ordtodd");
- var item1 = obj.getColumn(row, "item1");
-
- if(ds_hidden_item5_clod.getColumn(0, "ordfromdd") == ordfromdd) {
- return;
- }
-
- if (utlf_isValidDateTime(ordfromdd) == false){
- lf_fCancelClodStatusChng();
-
- return;
- }
-
- var clbsordfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
- var clbsordtodd = ds_main_item1_clbs.getColumn(0, "ordtodd");
-
- if (item1 != "03" && clbsordfromdd && clbsordtodd) {
- if (ordfromdd < clbsordfromdd || ordfromdd > clbsordtodd) {
- sysf_messageBox("진료 개시일자~종료일자를 벗어난 처방 시작일자가", "E005");
-
- lf_fCancelClodStatusChng();
-
- return;
- }
- }
-
- var mechfromdd = obj.getColumn(row, "mechfromdd");
- var mechtodd = obj.getColumn(row, "mechtodd");
- var rowstatus = obj.getRowType(row);
-
- if (rowstatus == 2) { // 1 : insert, 3 : insert & new
- obj.setColumn(row, "orddd", ordfromdd);
- }
-
- var dayno = obj.getColumn(row, "dayno");
-
- if (dayno) {
- dayno = parseInt(dayno);
-
- if (dayno >= 0) {
- var fromDate = ordfromdd.toDate();
- var toDate = fromDate.getAddDate(dayno - 1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
-
- ordtodd = toDate.getDateFormat("YYYY") + toDate.getDateFormat("MM") + toDate.getDateFormat("DD");
-
- if (item1 != "03" && clbsordfromdd && clbsordtodd) {
- if (ordtodd < clbsordfromdd || ordtodd > clbsordtodd) {
- sysf_messageBox("일수(총투)를 기준으로 계산된 처방 종료일자가 진료 개시일자~종료일자를 벗어나", "E016");
-
- lf_fCancelClodStatusChng();
-
- return;
- }
- }
- obj.setColumn(e.row, "ordtodd", ordtodd);
- } else {
- lf_fCancelClodStatusChng();
-
- return;
- }
- } else {
- if (ordtodd) {
- var dayno = utlf_getDateInterval(ordfromdd, ordtodd);
- if (dayno >= 0) {
- obj.setColumn(row, "dayno", dayno+1);
- // 기존에 줄번호가 부여안된 경우
- if(utlf_isNull(obj.getColumn(row, "edilnno"))) {
- var snglcalcscorcd = obj.getColumn(row, "snglcalcscorcd");
- if (snglcalcscorcd) {
- col = "snglcalcscorcd";
- lf_fSetSrchCalcScorCd();
- }
- } else {
- col = "dayno";
- lf_fSetTotDrugQtyAmt();
- lf_fSetOrderChangeRowStat(row);
- }
- } else {
- obj.setColumn(row, "ordtodd", ordfromdd);
- }
- } else {
- obj.setColumn(row, "ordtodd", ordfromdd);
- }
- }
-
- var updtdd = obj.getColumn(row, "updtdd");
-
- if (updtdd) {
- fChkUpdtdd();
- }
-
- if (mechfromdd && mechtodd) {
- if (mechfromdd > ordfromdd || mechtodd < ordfromdd){
- lf_fSetTotDrugQtyAmt();
- }
- }
- } else if (lgv_ioflag=="O") {
- var ordfromdd = e.newvalue;
- if(ds_hidden_item5_clod.getColumn(0, "ordfromdd") == ordfromdd) {
- return;
- } else {
- if (utlf_isValidDateTime(ordfromdd)) { // (dateHelper.js) 유효한 날짜, 시간 인지 점검
- // 신규입력된 처방만 처방일수를 변경한다.
- var rowstatus = obj.getRowType(row);
- if (rowstatus == 2) { // 1 : insert, 3 : insert & new
- obj.setColumn(row, "orddd", ordfromdd);
- }
- obj.setColumn(row, "ordfromdd", ordfromdd);
- obj.setColumn(row, "ordtodd", ordfromdd);
- // 처방의 수정된 row 상태를 표시한다.
- lf_fSetOrderChangeRowStat(row);
-
- // 2009-01-30 실시일자를 변경한 경우 현재 수가의 적용일자를 벗어나면 수가를 다시 조회한다.
- var mechfromdd = obj.getColumn(row, "mechfromdd");
- var mechtodd = obj.getColumn(row, "mechtodd");
- if (mechfromdd && mechtodd) { // 신규 추가된 row를 제외한다.
- if (mechfromdd > ordfromdd || mechtodd < ordfromdd) { // 입력된 처방일자가 수가적용~종료일자를 벗어난 경우
- lf_fSetTotDrugQtyAmt();
- }
- }
- } else {
- // 처방 data 및 row status를 변경 이전 상태로 복구한다.
- lf_fCancelClodStatusChng();
- }
- }
- }
- }
- else if (col == "ordtodd")
- {
- if (lgv_ioflag=="I") {
- var ordfromdd = obj.getColumn(row, "ordfromdd");
- var ordtodd = e.newvalue;
- var item1 = obj.getColumn(row, "item1");
-
- if(ds_hidden_item5_clod.getColumn(0, "ordtodd") == ordtodd) {
- return;
- }
- if (utlf_isValidDateTime(ordtodd) == false) {
- lf_fCancelClodStatusChng();
-
- return;
- }
-
- var clbsordfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
- var clbsordtodd = ds_main_item1_clbs.getColumn(0, "ordtodd");
-
- if (item1 != "03" && clbsordfromdd && clbsordtodd)
- {
- if (ordtodd < clbsordfromdd || ordtodd > clbsordtodd)
- {
- sysf_messageBox("진료 개시일자~종료일자를 벗어난 처방 종료일자가", "E005");
-
- lf_fCancelClodStatusChng();
-
- return;
- }
- }
-
- var mechfromdd = obj.getColumn(row, "mechfromdd");
- var mechtodd = obj.getColumn(row, "mechtodd");
-
- if (ordfromdd)
- {
- var dayno = utlf_getDateInterval(ordfromdd, ordtodd);
-
- if (dayno >= 0)
- {
- obj.setColumn(row, "dayno", dayno+1);
-
- if(utlf_isNull(obj.getColumn(row, "edilnno")))
- {
- var snglcalcscorcd = obj.getColumn(row, "snglcalcscorcd");
-
- if (snglcalcscorcd)
- {
- col = "snglcalcscorcd";
-
- lf_fSetSrchCalcScorCd();
- }
- }
- else
- {
- col = "dayno";
-
- lf_fSetTotDrugQtyAmt();
- lf_fSetOrderChangeRowStat(row);
- }
- }
- else
- {
- sysf_messageBox("처방 시작일자가 처방 종료일자 보다 이후", "E008");
- lf_fCancelClodStatusChng();
- }
- }
- else
- {
- var dayno = obj.getColumn(row, "dayno");
-
- if (dayno)
- {
- dayno = parseInt(dayno);
-
- if (dayno >= 0)
- {
- var toDate = ordtodd.toDate();
- var fromDate = toDate.getAddDate((dayno - 1) * -1, "D");
-
- ordfromdd = fromDate.getDateFormat("YYYY") + fromDate.getDateFormat("MM") + fromDate.getDateFormat("DD");
-
- if (item1 != "03" && clbsordfromdd && clbsordtodd)
- {
- if (ordfromdd < clbsordfromdd || ordfromdd > clbsordtodd)
- {
- }
- }
- obj.setColumn(row, "ordfromdd", ordfromdd);
- obj.setColumn(row, "orddd", ordfromdd);
-
- if(utlf_isNull(obj.getColumn(row, "edilnno")))
- {
- var snglcalcscorcd = obj.getColumn(row, "snglcalcscorcd");
-
- if (snglcalcscorcd)
- {
- col = "snglcalcscorcd";
-
- lf_fSetSrchCalcScorCd();
- }
- }
- else
- {
- col = "dayno"; //grd_clodhist.col = grd_clodhist.colRef("dayno"); // 일수
-
- lf_fSetTotDrugQtyAmt();
- lf_fSetOrderChangeRowStat(row);
- }
- }
- else
- {
- lf_fCancelClodStatusChng();
- }
- }
- else
- {
- obj.setColumn(row, "ordfromdd", ordtodd);
- obj.setColumn(row, "orddd", ordtodd);
- }
- }
- }
- }
- else if (col == "updtdd")
- {
- var updtdd = obj.getColumn(row, "updtdd");
-
- if (ds_hidden_item5_clod.getColumn(0, "updtdd") == updtdd)
- {
- return;
- }
-
- if (utlf_isValidDateTime(updtdd) == false)
- {
- lf_fCancelClodStatusChng();
-
- return;
- }
- }
- else if (col == "edidrugqty")
- {
- if(obj.getColumn(row, "edidrugqty") != ds_hidden_item5_clod.getColumn(0, "edidrugqty"))
- {
- lf_fSetTotDrugQtyAmt();
- }
-
- grp_biz.grd_clodhist.setCellPos(grp_biz.grd_clodhist.getBindCellIndex("body", "tims"));
- grp_biz.grd_clodhist.showEditor(true);
- }
- else if (col == "unitcost")
- {
- if ( obj.getColumn(row, "unitcost") != ds_hidden_item5_clod.getColumn(0, "unitcost"))
- {
- lf_fSetTotDrugQtyAmt();
- }
- }
- else if (col == "ediunitcost")
- {
- if ( obj.getColumn(row, "ediunitcost") != ds_hidden_item5_clod.getColumn(0, "ediunitcost"))
- {
- var ediunitcost = ds_list2_clod.getColumn(row, "ediunitcost");
- var totdrugqty = ds_list2_clod.getColumn(row, "totdrugqty");
- var ediamt = eval(ediunitcost) * eval(totdrugqty);
-
- obj.setColumn(row, "ediamt", ediamt);
- }
- }
- else if (col == "edidruglimitamt")
- {
- if ( obj.getColumn(row, "edidruglimitamt") != ds_hidden_item5_clod.getColumn(0, "edidruglimitamt"))
- {
- var edidruglimitamt = ds_list2_clod.getColumn(row, "edidruglimitamt");
- var totdrugqty = ds_list2_clod.getColumn(row, "totdrugqty");
- var ediunitcost = ds_list2_clod.getColumn(row, "ediunitcost");
- var edilimitdiffamt = (eval(edidruglimitamt) - eval(ediunitcost)) * 0.7 * eval(totdrugqty);
- ds_list2_clod.setColumn(row, "edilimitdiffamt", edilimitdiffamt);
- }
- }
- else if (col == "edidayno")
- {
- if ( e.newvalue != ds_hidden_item5_clod.getColumn(0, "edidayno")) {
- if (lgv_ioflag=="I") {
- var Sdayno = e.newvalue;
- var dayno = parseInt(Sdayno);
- var ordfromdd = obj.getColumn(row, "ordfromdd");
- var ordtodd = obj.getColumn(row, "ordtodd");
- var item1 = obj.getColumn(row, "item1");
- var edilnno = obj.getColumn(row, "edilnno");
- // 진료개시일과 종료일 사이의 일자인지 체크
- var clbsordfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
- var clbsordtodd = ds_main_item1_clbs.getColumn(0, "ordtodd");
- var insukind = ds_main_item1_clbs.getColumn(0, "insukindcd");
- if ( utlf_isNull(Sdayno) || dayno <= 0 )
- {
- }
- else if (!utlf_isNull(ordfromdd))
- {
- var fromDate = ordfromdd.toDate();
- var toDate = fromDate.getAddDate(dayno - 1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
- ordtodd = toDate.getDateFormat("YYYY") + toDate.getDateFormat("MM") + toDate.getDateFormat("DD");
-
- if(obj.getColumn(row,"prcpflagyn") != "Y"){
- obj.setColumn(row, "ordtodd", ordtodd);
- }
-
- } else if (ordtodd) {
- var toDate = ordtodd.toDate();
- var fromDate = toDate.getAddDate((dayno - 1) * -1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
- ordfromdd = fromDate.getDateFormat("YYYY") + fromDate.getDateFormat("MM") + fromDate.getDateFormat("DD");
- // 일수를 기준으로 구한 날짜가 올바른 경우
- obj.setColumn(row, "ordfromdd", ordfromdd);
- }
-
- // 기존에 줄번호가 부여안된 경우
- if (utlf_isNull(edilnno)) {
- var snglcalcscorcd = obj.getColumn(row, "snglcalcscorcd");
- if (!utlf_isNull(snglcalcscorcd)) {
- //grd_clodhist.col = grd_clodhist.colRef("snglcalcscorcd");
- //lf_fSetSrchCalcScorCd(); // 처방 종료일자를 입력했는데 일수가 자동계산된 경우
- }
- }
- }
-
- lf_fSetTotDrugQtyAmt();
- }
- }
- else if (col == "drugqty")
- {
- //if ( ds_list2_clod.getColumn(row, "drugqty") != ds_hidden_item5_clod.getColumn(0, "drugqty"))
- //{
- lf_fSetTotDrugQtyAmt();
- //}
- }
- else if (col == "tims")
- {
- //if ( ds_list2_clod.getColumn(row, "tims") != ds_hidden_item5_clod.getColumn(0, "tims"))
- //{
- lf_fSetTotDrugQtyAmt();
- //}
- }
- else if (col == "dayno")
- { //일수수정은 없다 일단 막아보자 plet2 20180103
- // if ( ds_list2_clod.getColumn(row, "dayno") != ds_hidden_item5_clod.getColumn(0, "dayno"))
- // {
- // var Sdayno = ds_list2_clod.getColumn(row, "dayno");
- // var dayno = parseInt(Sdayno);
- // var ordfromdd = ds_list2_clod.getColumn(row, "ordfromdd");
- // var ordtodd = ds_list2_clod.getColumn(row, "ordtodd");
- // var item1 = ds_list2_clod.getColumn(row, "item1");
- //
- // // 진료개시일과 종료일 사이의 일자인지 체크
- // var clbsordfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
- // var clbsordtodd = ds_main_item1_clbs.getColumn(0, "ordtodd");
- // var insukind = ds_main_item1_clbs.getColumn(0, "insukindcd");
- //
- // if (lgv_ioflag=="O") {
- // if ( utlf_isNull(Sdayno) || dayno <= 0 )
- // {
- // }
- // else if (!utlf_isNull(ordfromdd))
- // {
- // var fromDate = ordfromdd.toDate();
- // var toDate = fromDate.getAddDate(dayno - 1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
- // ordtodd = toDate.getDateFormat("YYYY") + toDate.getDateFormat("MM") + toDate.getDateFormat("DD");
- //
- // if ( insukind == "41" && !utlf_isNull(clbsordfromdd) && !utlf_isNull(clbsordtodd))
- // {
- // if (ordtodd > clbsordtodd)
- // {
- // ds_main_item1_clbs.setColumn(0, "ordtodd", ordtodd);
- // }
- // ds_list2_clod.setColumn(row, "ordtodd", ordtodd);
- // }
- // }
- // } else if (lgv_ioflag=="I") {
- // if ( utlf_isNull(Sdayno) || dayno <= 0 )
- // {
- // }
- // else if (!utlf_isNull(ordfromdd))
- // {
- // var fromDate = ordfromdd.toDate();
- // var toDate = fromDate.getAddDate(dayno - 1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
- // ordtodd = toDate.getDateFormat("YYYY") + toDate.getDateFormat("MM") + toDate.getDateFormat("DD");
- //
- // obj.setColumn(row, "ordtodd", ordtodd);
- // } else if (ordtodd) {
- // var toDate = ordtodd.toDate();
- // var fromDate = toDate.getAddDate((dayno - 1) * -1, "D"); // (dateHelper.js) 특정일자의 상대일자(+/-)를 계산
- // ordfromdd = fromDate.getDateFormat("YYYY") + fromDate.getDateFormat("MM") + fromDate.getDateFormat("DD");
- //
- // // 일수를 기준으로 구한 날짜가 올바른 경우
- // obj.setColumn(row, "ordfromdd", ordfromdd);
- // }
- //
- // // 기존에 줄번호가 부여안된 경우
- // if (utlf_isNull(edilnno)) {
- // var snglcalcscorcd = obj.getColumn(row, "snglcalcscorcd");
- // if (!utlf_isNull(snglcalcscorcd)) {
- // //grd_clodhist.col = grd_clodhist.colRef("snglcalcscorcd");
- // lf_fSetSrchCalcScorCd(); // 처방 종료일자를 입력했는데 일수가 자동계산된 경우
- // }
- // }
- //
- // }
- // lf_fSetTotDrugQtyAmt();
- // }
- }
-
- var rowstat = ds_list2_clod.getRowType(row);
- var adjtresncd = ds_list2_clod.getColumn(row, "adjtresncd");
- var cmbAdjtresncd,newcd,newdesc = "";
-
- if (col != "adjtresncd" && col != "adjtresndesc" && col != "cnfmcd" && col != "hosinresncd" && col != "toot" && col != "toot1") {
- if (utlf_isNull(adjtresncd) || rowstat == 4 || rowstat == 2)
- {
- // 심사(조정)사유가 입력되지 않은 경우
- cmbAdjtresncd = ds_hidden_list2_clodstat.getColumn(0,"cmbAdjtresncd");
-
- if (!utlf_isNull(cmbAdjtresncd)|| !utlf_isNull(adjtresncd))
- {
- }
- else
- {
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftin";
- sppiz01000.sCdid = adjtresncd;
- sppiz01000.sAdjtresndesc = "";
-
- // SPPIZ01000_심사수정사유관리.xrw
- var rtn = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
-
- if (utlf_isNull(rtn))
- {
- // 처방 data 및 row status를 변경 이전 상태로 복구한다.
- lf_fCancelClodStatusChng();
- }
- else
- {
- newcd = rtn.sCdid;
- newdesc = rtn.sAdjtresndesc;
- }
- }
- }
-
- if (ds_list2_clod.getRowType(row) == 4)
- {
- if (!utlf_isNull(newcd) && adjtresncd != "G")
- {
- ds_list2_clod.setColumn(row, "adjtresncd", newcd);
- ds_list2_clod.setColumn(row, "adjtresndesc", newdesc);
- }
- lf_fOrderBkColorNew(row);
- }
- }
-
- }
- function grp_biz_grd_clodhist_onkeydown(obj:Grid, e:KeyEventInfo)
- {
- var col = obj.currentcol
- var row = obj.currentrow;
- var cmbAdjtresncd = "";
- var adjtresncd = ds_list2_clod.getColumn(row, "adjtresncd");
- var rowstat = ds_list2_clod.getRowType(row);
- var cmbAdjtresncd = "";
- var newcd,newdesc = "";
-
- if (e.keycode == 13)
- {
- obj.updateToDataset();
- if (col == obj.getBindCellIndex("Body", "edidrugqty"))
- {
- //if(ds_list2_clod.getColumn(row, "edidrugqty") != ds_hidden_item5_clod.getColumn(0, "edidrugqty"))
- //{
- //lf_fSetTotDrugQtyAmt();
- //}
- grp_biz.grd_clodhist.setCellPos(grp_biz.grd_clodhist.getBindCellIndex("body", "tims"));
- grp_biz.grd_clodhist.showEditor(true);
- }
- else if (col == obj.getBindCellIndex("body", "unitcost"))
- {
- //if ( ds_list2_clod.getColumn(row, "unitcost") != ds_hidden_item5_clod.getColumn(0, "unitcost"))
- //{
- // lf_fSetTotDrugQtyAmt();
- //}
- }
- else if (col == obj.getBindCellIndex("body", "ediunitcost"))
- {
- if ( ds_list2_clod.getColumn(row, "ediunitcost") != ds_hidden_item5_clod.getColumn(0, "ediunitcost"))
- {
- var ediunitcost = ds_list2_clod.getColumn(row, "ediunitcost");
- var totdrugqty = ds_list2_clod.getColumn(row, "totdrugqty");
- var ediamt = eval(ediunitcost) * eval(totdrugqty);
-
- ds_list2_clod.setColumn(row, "ediamt", ediamt);
- }
- }
- else if ( col == obj.getBindCellIndex("body", "edidruglimitamt"))
- {
- if ( ds_list2_clod.getColumn(row, "edidruglimitamt") != ds_hidden_item5_clod.getColumn(0, "edidruglimitamt"))
- {
- var edidruglimitamt = ds_list2_clod.getColumn(row, "edidruglimitamt");
- var totdrugqty = ds_list2_clod.getColumn(row, "totdrugqty");
- var ediunitcost = ds_list2_clod.getColumn(row, "ediunitcost");
- var edilimitdiffamt = (eval(edidruglimitamt) - eval(ediunitcost)) * 0.7 * eval(totdrugqty);
- ds_list2_clod.setColumn(row, "edilimitdiffamt", edilimitdiffamt);
- }
- }
- else if ( col == obj.getBindCellIndex("body", "drugqty"))
- {
- //if ( ds_list2_clod.getColumn(row, "drugqty") != ds_hidden_item5_clod.getColumn(0, "drugqty"))
- //{
- // lf_fSetTotDrugQtyAmt();
- //}
- }
- else if ( col == obj.getBindCellIndex("body", "tims"))
- {
- //if ( ds_list2_clod.getColumn(row, "tims") != ds_hidden_item5_clod.getColumn(0, "tims"))
- //{
- // lf_fSetTotDrugQtyAmt();
- //}
-
- grp_biz.grd_clodhist.setCellPos(grp_biz.grd_clodhist.getBindCellIndex("body", "edidayno"));
- grp_biz.grd_clodhist.showEditor(true);
- }
- else if ( col == obj.getBindCellIndex("body", "dayno"))
- {
- lf_fSetTotDrugQtyAmt();
- }
- else if ( col == obj.getBindCellIndex("body", "edidayno"))
- {
- lf_fSetTotDrugQtyAmt();
-
- ds_list2_clod.rowposition = row + 1;
- grp_biz.grd_clodhist.setCellPos(grp_biz.grd_clodhist.getBindCellIndex("body", "edidrugqty"));
- grp_biz.grd_clodhist.showEditor(true);
- }
- }
-
- if (e.ctrlKey && e.keycode == 67 && ( obj.currentcol == obj.getBindCellIndex("Body","grupcalcscorcd") ||
- obj.currentcol == obj.getBindCellIndex("Body","snglcalcscorcd") ||
- obj.currentcol == obj.getBindCellIndex("Body","basecd") ||
- obj.currentcol == obj.getBindCellIndex("Body","hngnm")) ) {
- system.setClipboard("CF_TEXT", obj.getCellText(obj.currentrow, obj.currentcol));
- }
- }
- /****************************************************************************************
- * Argument : onenterdown
- * Description : 처방 그리드 enter key 이벤트
- ****************************************************************************************/
-
- function grp_biz_grd_clodhist_onenterdown(obj:Grid, e:GridEditEventInfo)
- {
- var col = e.col;
- var row = e.row;
- var adjtresncd = ds_list2_clod.getColumn(row, "adjtresncd");
- var cmbAdjtresncd = "";
- var newcd = "";
- if (utlf_isNull(adjtresncd) || adjtresncd == "-")
- {
- cmbAdjtresncd = ds_hidden_list2_clodstat.getColumn(0, "cmbAdjtresncd");
- if (cmbAdjtresncd)
- {
- }
- else
- {
- var sppiz01000 = new Object();
- sppiz01000.sCdCls = "aftin";
- sppiz01000.sCdid = adjtresncd;
- sppiz01000.sAdjtresndesc = "";
-
- var objArg = frmf_modal("SPPIZ01000","SPPIZ01000", sppiz01000, "", "", "", "", "", "", "", "", "", "M");
- newcd = objArg.sCdid;
- newdesc = objArg.sAdjtresndesc;
-
- if (utlf_isNull(newcd) || newcd == "-")
- {
- lf_fCancelClodStatusChng();
- return;
- }
- }
- }
- if (col == obj.getBindCellIndex("Body", "grupcalcscorcd") || col == obj.getBindCellIndex("Body","snglcalcscorcd") || col == obj.getBindCellIndex("Body","basecd") || col == obj.getBindCellIndex("Body","hngnm"))
- {
- lf_fSetSrchCalcScorCd();
- }
- }
- function grp_biz_btn_clopadd_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_fOutOrderGridInsertRow();
- }
- function grp_biz_btn_clopdel_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_fClopGridDeleteRow();
- }
- function grp_biz_swt_spclmemo_case_spclspec_grd_clsphist_ondropdown(obj:Grid, e:GridEditEventInfo)
- {
- var row = e.row;
- var rowstatus = ds_list3_clsp.getRowType(row);
- if (rowstatus == 1 || rowstatus == 4 || rowstatus == 8) { // DB에 저장된 data인 경우
- } else { // 신규로 추가한 경우
- var unitflag = ds_list3_clsp.getColumn(row,"unitflag");
- if (unitflag == "J") {
- if (ds_list3_clsp.getColumn(row,"spclcd") == "JT001") {
- // 확인코드의 경우 전용 팝업창을 사용하므로 특정내역 Grid에서 수정하지 않는다.
- fds_init_P0117.filterstr = "cdid=='JT001'";
- } else {
- fds_init_P0117.filterstr = "minval == 'J' && cdid != 'JT001'";
- }
- } else {
- fds_init_P0117.filterstr = "minval == 'M' && cdid != 'MX999'";
- }
- }
- }
- /****************************************************************************************
- * Argument : function
- * Description : 환경 초기화 이벤트
- ****************************************************************************************/
- function fClearSetInfo()
- {
- var msg = sysf_messageBox("환경저장 데이터가 모두 삭제 됩니다.","Q003");
- if (msg == 6) { // 6세미만 요율을 적용한다.
- grdf_DelUuee(grp_biz.grd_cldihist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
- grp_biz.grd_cldihist.formatid = "default";
-
- grdf_DelUuee(grp_biz.grd_clodhist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
- grp_biz.grd_clodhist.formatid = "default";
-
- grdf_DelUuee(grp_biz.grd_oprcphist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
- grp_biz.grd_oprcphist.formatid = "default";
-
- grdf_DelUuee(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
- grp_biz.swt_spclmemo.case_spclspec.grd_clsphist.formatid = "default";
- grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
- }
- }
- /****************************************************************************************
- * Argument : button
- * Description : 환경초기화 버튼 이벤트
- ****************************************************************************************/
- function grp_biz_grp_sea02_button3_onclick(obj:Button, e:ClickEventInfo)
- {
- fClearSetInfo();
- }
- function fGetLglydisInfo() {
- var dsnm = dsf_createDsRow("ds_cond_lglydisinfo", [{col:"reptflag", type:"STRING", size:256 , val : ""}]);
-
- var oParam = {};
- oParam.id = "TRASB02301";
- oParam.service = "infcmngtapp.LglyDisMngt";
- oParam.method = "reqGetLglyDisInfo";
- oParam.inds = "req="+dsnm;
- oParam.outds = "ds_lglydisinfo=list";
- oParam.async = true;
- oParam.callback = "cf_TRASB02301";
- tranf_submit(oParam);
- }
- function cf_TRASB02301(sSvcId, nErrorCode, sErrorMsg) {
- if(nErrorCode < 0) return;
-
- ds_lglydisinfo.addColumn("fromdiag","string");
- ds_lglydisinfo.addColumn("todiag","string");
-
- var fromicd10cd = "";
- var toicd10cd = "";
- for (var i=0,rcount = ds_lglydisinfo.rowcount; i < rcount; i++){
- var fromicd10cd = String(ds_lglydisinfo.getColumn(i,"fromicd10cd"));
- var toicd10cd = String(ds_lglydisinfo.getColumn(i,"toicd10cd"));
-
- ds_lglydisinfo.setColumn(i,"fromdiag", fromicd10cd.indexOf(".") > -1 ? fromicd10cd.split(".")[0] : fromicd10cd )
- ds_lglydisinfo.setColumn(i,"todiag", toicd10cd.indexOf(".") > -1 ? toicd10cd.split(".")[0] : toicd10cd )
-
- }
-
- }
- function grp_sea00_cmb_orddrid_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
- {
- var arrRow = new Array();
- arrRow[0] = 0;
- grdf_setStatus(grp_biz.grd_cldihist, "U", arrRow);
- }]]></Script>
|