SMPIJ00300_입원재원심사관리.xfdl 576 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815581658175818581958205821582258235824582558265827582858295830583158325833583458355836583758385839584058415842584358445845584658475848584958505851585258535854585558565857585858595860586158625863586458655866586758685869587058715872587358745875587658775878587958805881588258835884588558865887588858895890589158925893589458955896589758985899590059015902590359045905590659075908590959105911591259135914591559165917591859195920592159225923592459255926592759285929593059315932593359345935593659375938593959405941594259435944594559465947594859495950595159525953595459555956595759585959596059615962596359645965596659675968596959705971597259735974597559765977597859795980598159825983598459855986598759885989599059915992599359945995599659975998599960006001600260036004600560066007600860096010601160126013601460156016601760186019602060216022602360246025602660276028602960306031603260336034603560366037603860396040604160426043604460456046604760486049605060516052605360546055605660576058605960606061606260636064606560666067606860696070607160726073607460756076607760786079608060816082608360846085608660876088608960906091609260936094609560966097609860996100610161026103610461056106610761086109611061116112611361146115611661176118611961206121612261236124612561266127612861296130613161326133613461356136613761386139614061416142614361446145614661476148614961506151615261536154615561566157615861596160616161626163616461656166616761686169617061716172617361746175617661776178617961806181618261836184618561866187618861896190619161926193619461956196619761986199620062016202620362046205620662076208620962106211621262136214621562166217621862196220622162226223622462256226622762286229623062316232623362346235623662376238623962406241624262436244624562466247624862496250625162526253625462556256625762586259626062616262626362646265626662676268626962706271627262736274627562766277627862796280628162826283628462856286628762886289629062916292629362946295629662976298629963006301630263036304630563066307630863096310631163126313631463156316631763186319632063216322632363246325632663276328632963306331633263336334633563366337633863396340634163426343634463456346634763486349635063516352635363546355635663576358635963606361636263636364636563666367636863696370637163726373637463756376637763786379638063816382638363846385638663876388638963906391639263936394639563966397639863996400640164026403640464056406640764086409641064116412641364146415641664176418641964206421642264236424642564266427642864296430643164326433643464356436643764386439644064416442644364446445644664476448644964506451645264536454645564566457645864596460646164626463646464656466646764686469647064716472647364746475647664776478647964806481648264836484648564866487648864896490649164926493649464956496649764986499650065016502650365046505650665076508650965106511651265136514651565166517651865196520652165226523652465256526652765286529653065316532653365346535653665376538653965406541654265436544654565466547654865496550655165526553655465556556655765586559656065616562656365646565656665676568656965706571657265736574657565766577657865796580658165826583658465856586658765886589659065916592659365946595659665976598659966006601660266036604660566066607660866096610661166126613661466156616661766186619662066216622662366246625662666276628662966306631663266336634663566366637663866396640664166426643664466456646664766486649665066516652665366546655665666576658665966606661666266636664666566666667666866696670667166726673667466756676667766786679668066816682668366846685668666876688668966906691669266936694669566966697669866996700670167026703670467056706670767086709671067116712671367146715671667176718671967206721672267236724672567266727672867296730673167326733673467356736673767386739674067416742674367446745674667476748674967506751675267536754675567566757675867596760676167626763676467656766676767686769677067716772677367746775677667776778677967806781678267836784678567866787678867896790679167926793679467956796679767986799680068016802680368046805680668076808680968106811681268136814681568166817681868196820682168226823682468256826682768286829683068316832683368346835683668376838683968406841684268436844684568466847684868496850685168526853685468556856685768586859686068616862686368646865686668676868686968706871687268736874687568766877687868796880688168826883688468856886688768886889689068916892689368946895689668976898689969006901690269036904690569066907690869096910691169126913691469156916691769186919692069216922692369246925692669276928692969306931693269336934693569366937693869396940694169426943694469456946694769486949695069516952695369546955695669576958695969606961696269636964696569666967696869696970697169726973697469756976697769786979698069816982698369846985698669876988698969906991699269936994699569966997699869997000700170027003700470057006700770087009701070117012701370147015701670177018701970207021702270237024702570267027702870297030703170327033703470357036703770387039704070417042704370447045704670477048704970507051705270537054705570567057705870597060706170627063706470657066706770687069707070717072707370747075707670777078707970807081708270837084708570867087708870897090709170927093709470957096709770987099710071017102710371047105710671077108710971107111711271137114711571167117711871197120712171227123712471257126712771287129713071317132713371347135713671377138713971407141714271437144714571467147714871497150715171527153715471557156715771587159716071617162716371647165716671677168716971707171717271737174717571767177717871797180718171827183718471857186718771887189719071917192719371947195719671977198719972007201720272037204720572067207720872097210721172127213721472157216721772187219722072217222722372247225722672277228722972307231723272337234723572367237723872397240724172427243724472457246724772487249725072517252725372547255725672577258725972607261726272637264726572667267726872697270727172727273727472757276727772787279728072817282728372847285728672877288728972907291729272937294729572967297729872997300730173027303730473057306730773087309731073117312731373147315731673177318731973207321732273237324732573267327732873297330733173327333733473357336733773387339734073417342734373447345734673477348734973507351735273537354735573567357735873597360736173627363736473657366736773687369737073717372737373747375737673777378737973807381738273837384738573867387738873897390739173927393739473957396739773987399740074017402740374047405740674077408740974107411741274137414741574167417741874197420742174227423742474257426742774287429743074317432743374347435743674377438743974407441744274437444744574467447744874497450745174527453745474557456745774587459746074617462746374647465746674677468746974707471747274737474747574767477747874797480748174827483748474857486748774887489749074917492749374947495749674977498749975007501750275037504750575067507750875097510751175127513751475157516751775187519752075217522752375247525752675277528752975307531753275337534753575367537753875397540754175427543754475457546754775487549755075517552755375547555755675577558755975607561756275637564756575667567756875697570757175727573757475757576757775787579758075817582758375847585758675877588758975907591759275937594759575967597759875997600760176027603760476057606760776087609761076117612761376147615761676177618761976207621762276237624762576267627762876297630763176327633763476357636763776387639764076417642764376447645764676477648764976507651765276537654765576567657765876597660766176627663766476657666766776687669767076717672767376747675767676777678767976807681768276837684768576867687768876897690769176927693769476957696769776987699770077017702770377047705770677077708770977107711771277137714771577167717771877197720772177227723772477257726772777287729773077317732773377347735773677377738773977407741774277437744774577467747774877497750775177527753775477557756775777587759776077617762776377647765776677677768776977707771777277737774777577767777777877797780778177827783778477857786778777887789779077917792779377947795779677977798779978007801780278037804780578067807780878097810781178127813781478157816781778187819782078217822782378247825782678277828782978307831783278337834783578367837783878397840784178427843784478457846784778487849785078517852785378547855785678577858785978607861786278637864786578667867786878697870787178727873787478757876787778787879788078817882788378847885788678877888788978907891789278937894789578967897789878997900790179027903790479057906790779087909791079117912791379147915791679177918791979207921792279237924792579267927792879297930793179327933793479357936793779387939794079417942794379447945794679477948794979507951795279537954795579567957795879597960796179627963796479657966796779687969797079717972797379747975797679777978797979807981798279837984798579867987798879897990799179927993799479957996799779987999800080018002800380048005800680078008800980108011801280138014801580168017801880198020802180228023802480258026802780288029803080318032803380348035803680378038803980408041804280438044804580468047804880498050805180528053805480558056805780588059806080618062806380648065806680678068806980708071807280738074807580768077807880798080808180828083808480858086808780888089809080918092809380948095809680978098809981008101810281038104810581068107810881098110811181128113811481158116811781188119812081218122812381248125812681278128812981308131813281338134813581368137813881398140814181428143814481458146814781488149815081518152815381548155815681578158815981608161816281638164816581668167816881698170817181728173817481758176817781788179818081818182818381848185818681878188818981908191819281938194819581968197819881998200820182028203820482058206820782088209821082118212821382148215821682178218821982208221822282238224822582268227822882298230823182328233823482358236823782388239824082418242824382448245824682478248824982508251825282538254825582568257825882598260826182628263826482658266826782688269827082718272827382748275827682778278827982808281828282838284828582868287828882898290829182928293829482958296829782988299830083018302830383048305830683078308830983108311831283138314831583168317831883198320832183228323832483258326832783288329833083318332833383348335833683378338833983408341834283438344834583468347834883498350835183528353835483558356835783588359836083618362836383648365836683678368836983708371837283738374837583768377837883798380838183828383838483858386838783888389839083918392839383948395839683978398839984008401840284038404840584068407840884098410841184128413841484158416841784188419842084218422842384248425842684278428842984308431843284338434843584368437843884398440844184428443844484458446844784488449845084518452845384548455845684578458845984608461846284638464846584668467846884698470847184728473847484758476847784788479848084818482848384848485848684878488848984908491849284938494849584968497849884998500850185028503850485058506850785088509851085118512851385148515851685178518851985208521852285238524852585268527852885298530853185328533853485358536853785388539854085418542854385448545854685478548854985508551855285538554855585568557855885598560856185628563856485658566856785688569857085718572857385748575857685778578857985808581858285838584858585868587858885898590859185928593859485958596859785988599860086018602860386048605860686078608860986108611861286138614861586168617861886198620862186228623862486258626862786288629863086318632863386348635863686378638863986408641864286438644864586468647864886498650865186528653865486558656865786588659866086618662866386648665866686678668866986708671867286738674867586768677867886798680868186828683868486858686868786888689869086918692869386948695869686978698869987008701870287038704870587068707870887098710871187128713871487158716871787188719872087218722872387248725872687278728872987308731873287338734873587368737873887398740874187428743874487458746874787488749875087518752875387548755875687578758875987608761876287638764876587668767876887698770877187728773877487758776877787788779878087818782878387848785878687878788878987908791879287938794879587968797879887998800880188028803880488058806880788088809881088118812881388148815881688178818881988208821882288238824882588268827882888298830883188328833883488358836883788388839884088418842884388448845884688478848884988508851885288538854885588568857885888598860886188628863886488658866886788688869887088718872887388748875887688778878887988808881888288838884888588868887888888898890889188928893889488958896889788988899890089018902890389048905890689078908890989108911891289138914891589168917891889198920892189228923892489258926892789288929893089318932893389348935893689378938893989408941894289438944894589468947894889498950895189528953895489558956895789588959896089618962896389648965896689678968896989708971897289738974897589768977897889798980898189828983898489858986898789888989899089918992899389948995899689978998899990009001900290039004900590069007900890099010901190129013901490159016901790189019902090219022902390249025902690279028902990309031903290339034903590369037903890399040904190429043904490459046904790489049905090519052905390549055905690579058905990609061906290639064906590669067906890699070907190729073907490759076907790789079908090819082908390849085908690879088908990909091909290939094909590969097909890999100910191029103910491059106910791089109911091119112911391149115911691179118911991209121912291239124912591269127912891299130913191329133913491359136913791389139914091419142914391449145914691479148914991509151915291539154915591569157915891599160916191629163916491659166916791689169917091719172917391749175917691779178917991809181918291839184918591869187918891899190919191929193919491959196919791989199920092019202920392049205920692079208920992109211921292139214921592169217921892199220922192229223922492259226922792289229923092319232923392349235923692379238923992409241924292439244924592469247924892499250925192529253925492559256925792589259926092619262926392649265926692679268926992709271927292739274927592769277927892799280928192829283928492859286928792889289929092919292929392949295929692979298929993009301930293039304930593069307930893099310931193129313931493159316931793189319932093219322932393249325932693279328932993309331933293339334933593369337933893399340934193429343934493459346934793489349935093519352935393549355935693579358935993609361936293639364936593669367936893699370937193729373937493759376937793789379938093819382938393849385938693879388938993909391939293939394939593969397939893999400940194029403940494059406940794089409941094119412941394149415941694179418941994209421942294239424942594269427942894299430943194329433943494359436943794389439944094419442944394449445944694479448944994509451945294539454945594569457945894599460946194629463946494659466946794689469947094719472947394749475947694779478947994809481948294839484948594869487948894899490949194929493949494959496949794989499950095019502950395049505950695079508950995109511951295139514951595169517951895199520952195229523952495259526952795289529953095319532953395349535953695379538953995409541954295439544954595469547954895499550955195529553955495559556955795589559956095619562956395649565956695679568956995709571957295739574957595769577957895799580958195829583958495859586958795889589959095919592959395949595959695979598959996009601960296039604960596069607960896099610961196129613961496159616961796189619962096219622962396249625962696279628962996309631963296339634963596369637963896399640964196429643964496459646964796489649965096519652965396549655965696579658965996609661966296639664966596669667966896699670967196729673967496759676967796789679968096819682968396849685968696879688968996909691969296939694969596969697969896999700970197029703970497059706970797089709971097119712971397149715971697179718971997209721972297239724972597269727972897299730973197329733973497359736973797389739974097419742974397449745974697479748974997509751975297539754975597569757975897599760976197629763976497659766976797689769977097719772977397749775977697779778977997809781978297839784978597869787978897899790979197929793979497959796979797989799980098019802980398049805980698079808980998109811981298139814981598169817981898199820982198229823982498259826982798289829983098319832983398349835983698379838983998409841984298439844984598469847984898499850985198529853985498559856985798589859986098619862986398649865986698679868986998709871987298739874987598769877987898799880988198829883988498859886988798889889989098919892989398949895989698979898989999009901990299039904990599069907990899099910991199129913991499159916991799189919992099219922992399249925992699279928992999309931993299339934993599369937993899399940994199429943994499459946994799489949995099519952995399549955995699579958995999609961996299639964996599669967996899699970997199729973997499759976997799789979998099819982998399849985998699879988998999909991999299939994999599969997999899991000010001100021000310004100051000610007100081000910010100111001210013100141001510016100171001810019100201002110022100231002410025100261002710028100291003010031100321003310034100351003610037100381003910040100411004210043100441004510046100471004810049100501005110052100531005410055100561005710058100591006010061100621006310064100651006610067100681006910070100711007210073100741007510076100771007810079100801008110082100831008410085100861008710088100891009010091100921009310094100951009610097100981009910100101011010210103101041010510106101071010810109101101011110112101131011410115101161011710118101191012010121101221012310124101251012610127101281012910130101311013210133101341013510136101371013810139101401014110142101431014410145101461014710148101491015010151101521015310154101551015610157101581015910160101611016210163101641016510166101671016810169101701017110172101731017410175101761017710178101791018010181101821018310184101851018610187101881018910190101911019210193101941019510196101971019810199102001020110202102031020410205102061020710208102091021010211102121021310214102151021610217102181021910220102211022210223102241022510226102271022810229102301023110232102331023410235102361023710238102391024010241102421024310244102451024610247102481024910250102511025210253102541025510256102571025810259102601026110262102631026410265102661026710268102691027010271102721027310274102751027610277102781027910280102811028210283102841028510286102871028810289102901029110292102931029410295102961029710298102991030010301103021030310304103051030610307103081030910310103111031210313103141031510316103171031810319103201032110322103231032410325103261032710328103291033010331103321033310334103351033610337103381033910340103411034210343103441034510346103471034810349103501035110352103531035410355103561035710358103591036010361103621036310364103651036610367103681036910370103711037210373103741037510376103771037810379103801038110382103831038410385103861038710388103891039010391103921039310394103951039610397103981039910400104011040210403104041040510406104071040810409104101041110412104131041410415104161041710418104191042010421104221042310424104251042610427104281042910430104311043210433104341043510436104371043810439104401044110442104431044410445104461044710448104491045010451104521045310454104551045610457104581045910460104611046210463104641046510466104671046810469104701047110472104731047410475104761047710478104791048010481104821048310484104851048610487104881048910490104911049210493104941049510496104971049810499105001050110502105031050410505105061050710508105091051010511105121051310514105151051610517105181051910520105211052210523105241052510526105271052810529105301053110532105331053410535105361053710538105391054010541105421054310544105451054610547105481054910550105511055210553105541055510556105571055810559105601056110562105631056410565105661056710568105691057010571105721057310574105751057610577105781057910580105811058210583105841058510586105871058810589105901059110592105931059410595105961059710598105991060010601106021060310604106051060610607106081060910610106111061210613106141061510616106171061810619106201062110622106231062410625106261062710628106291063010631106321063310634106351063610637106381063910640106411064210643106441064510646106471064810649106501065110652106531065410655106561065710658106591066010661106621066310664106651066610667106681066910670106711067210673106741067510676106771067810679106801068110682106831068410685106861068710688106891069010691106921069310694106951069610697106981069910700107011070210703107041070510706107071070810709107101071110712107131071410715107161071710718107191072010721107221072310724107251072610727107281072910730107311073210733107341073510736107371073810739107401074110742107431074410745107461074710748107491075010751107521075310754107551075610757107581075910760107611076210763107641076510766107671076810769107701077110772107731077410775107761077710778107791078010781107821078310784107851078610787107881078910790107911079210793107941079510796107971079810799108001080110802108031080410805108061080710808108091081010811108121081310814108151081610817108181081910820108211082210823108241082510826108271082810829108301083110832108331083410835108361083710838108391084010841108421084310844108451084610847108481084910850108511085210853108541085510856108571085810859108601086110862108631086410865108661086710868108691087010871108721087310874108751087610877108781087910880108811088210883108841088510886108871088810889108901089110892108931089410895108961089710898108991090010901109021090310904109051090610907109081090910910109111091210913109141091510916109171091810919109201092110922109231092410925109261092710928109291093010931109321093310934109351093610937109381093910940109411094210943109441094510946109471094810949109501095110952109531095410955109561095710958109591096010961109621096310964109651096610967109681096910970109711097210973109741097510976109771097810979109801098110982109831098410985109861098710988109891099010991109921099310994109951099610997109981099911000110011100211003110041100511006110071100811009110101101111012110131101411015110161101711018110191102011021110221102311024110251102611027110281102911030110311103211033110341103511036110371103811039110401104111042110431104411045110461104711048110491105011051110521105311054110551105611057110581105911060110611106211063110641106511066110671106811069110701107111072110731107411075110761107711078110791108011081110821108311084110851108611087110881108911090110911109211093110941109511096110971109811099111001110111102111031110411105111061110711108111091111011111111121111311114111151111611117111181111911120111211112211123111241112511126111271112811129111301113111132111331113411135111361113711138111391114011141111421114311144111451114611147111481114911150111511115211153111541115511156111571115811159111601116111162111631116411165111661116711168111691117011171111721117311174111751117611177111781117911180111811118211183111841118511186111871118811189111901119111192111931119411195111961119711198111991120011201112021120311204112051120611207112081120911210112111121211213112141121511216112171121811219112201122111222112231122411225112261122711228112291123011231112321123311234112351123611237112381123911240112411124211243112441124511246112471124811249112501125111252112531125411255112561125711258112591126011261112621126311264112651126611267112681126911270112711127211273112741127511276112771127811279112801128111282112831128411285112861128711288112891129011291112921129311294112951129611297112981129911300113011130211303113041130511306113071130811309113101131111312113131131411315113161131711318113191132011321113221132311324113251132611327113281132911330113311133211333113341133511336113371133811339113401134111342113431134411345113461134711348113491135011351113521135311354113551135611357113581135911360113611136211363113641136511366113671136811369113701137111372113731137411375113761137711378113791138011381113821138311384113851138611387113881138911390113911139211393113941139511396113971139811399114001140111402114031140411405114061140711408114091141011411114121141311414114151141611417114181141911420114211142211423114241142511426114271142811429114301143111432114331143411435114361143711438114391144011441114421144311444114451144611447114481144911450114511145211453114541145511456114571145811459114601146111462114631146411465114661146711468114691147011471114721147311474114751147611477114781147911480114811148211483114841148511486114871148811489114901149111492114931149411495114961149711498114991150011501115021150311504115051150611507115081150911510115111151211513115141151511516115171151811519115201152111522115231152411525115261152711528115291153011531115321153311534115351153611537115381153911540115411154211543115441154511546115471154811549115501155111552115531155411555115561155711558115591156011561115621156311564115651156611567115681156911570115711157211573115741157511576115771157811579115801158111582115831158411585115861158711588115891159011591115921159311594115951159611597115981159911600116011160211603116041160511606116071160811609116101161111612116131161411615116161161711618116191162011621116221162311624116251162611627116281162911630116311163211633116341163511636116371163811639116401164111642116431164411645116461164711648116491165011651116521165311654116551165611657116581165911660116611166211663116641166511666116671166811669116701167111672116731167411675116761167711678116791168011681116821168311684116851168611687116881168911690116911169211693116941169511696116971169811699117001170111702117031170411705117061170711708117091171011711117121171311714117151171611717117181171911720117211172211723117241172511726117271172811729117301173111732117331173411735117361173711738117391174011741117421174311744117451174611747117481174911750117511175211753117541175511756117571175811759117601176111762117631176411765117661176711768117691177011771117721177311774117751177611777117781177911780117811178211783117841178511786117871178811789117901179111792117931179411795117961179711798117991180011801118021180311804118051180611807118081180911810118111181211813118141181511816118171181811819118201182111822118231182411825118261182711828118291183011831118321183311834118351183611837118381183911840118411184211843118441184511846118471184811849118501185111852118531185411855118561185711858118591186011861118621186311864118651186611867118681186911870118711187211873118741187511876118771187811879118801188111882118831188411885118861188711888118891189011891118921189311894118951189611897118981189911900119011190211903119041190511906119071190811909119101191111912119131191411915119161191711918119191192011921119221192311924119251192611927119281192911930119311193211933119341193511936119371193811939119401194111942119431194411945119461194711948119491195011951119521195311954119551195611957119581195911960119611196211963119641196511966119671196811969119701197111972119731197411975119761197711978119791198011981119821198311984119851198611987119881198911990119911199211993119941199511996119971199811999120001200112002120031200412005120061200712008120091201012011120121201312014120151201612017120181201912020120211202212023120241202512026120271202812029120301203112032120331203412035120361203712038120391204012041120421204312044120451204612047120481204912050120511205212053120541205512056120571205812059120601206112062120631206412065120661206712068120691207012071120721207312074120751207612077120781207912080120811208212083120841208512086120871208812089120901209112092120931209412095120961209712098120991210012101121021210312104121051210612107121081210912110121111211212113121141211512116121171211812119121201212112122121231212412125121261212712128121291213012131121321213312134121351213612137121381213912140121411214212143121441214512146121471214812149121501215112152121531215412155121561215712158121591216012161121621216312164121651216612167121681216912170121711217212173121741217512176121771217812179121801218112182121831218412185121861218712188121891219012191121921219312194121951219612197121981219912200122011220212203122041220512206122071220812209122101221112212122131221412215122161221712218122191222012221122221222312224122251222612227122281222912230122311223212233122341223512236122371223812239122401224112242122431224412245122461224712248122491225012251122521225312254122551225612257122581225912260122611226212263122641226512266122671226812269122701227112272122731227412275122761227712278122791228012281122821228312284122851228612287122881228912290122911229212293122941229512296122971229812299123001230112302123031230412305123061230712308123091231012311123121231312314123151231612317123181231912320123211232212323123241232512326123271232812329123301233112332123331233412335123361233712338123391234012341123421234312344123451234612347123481234912350123511235212353123541235512356123571235812359123601236112362123631236412365123661236712368123691237012371123721237312374123751237612377123781237912380123811238212383123841238512386123871238812389123901239112392123931239412395123961239712398123991240012401124021240312404124051240612407124081240912410124111241212413124141241512416124171241812419124201242112422124231242412425124261242712428124291243012431124321243312434124351243612437124381243912440124411244212443124441244512446124471244812449124501245112452124531245412455124561245712458124591246012461124621246312464124651246612467124681246912470124711247212473124741247512476124771247812479124801248112482124831248412485124861248712488124891249012491124921249312494124951249612497124981249912500125011250212503125041250512506125071250812509125101251112512125131251412515125161251712518125191252012521125221252312524125251252612527125281252912530125311253212533125341253512536125371253812539125401254112542125431254412545125461254712548125491255012551125521255312554125551255612557125581255912560125611256212563125641256512566125671256812569125701257112572125731257412575125761257712578125791258012581125821258312584125851258612587125881258912590125911259212593125941259512596125971259812599126001260112602126031260412605126061260712608126091261012611126121261312614126151261612617126181261912620126211262212623126241262512626126271262812629126301263112632126331263412635126361263712638126391264012641126421264312644126451264612647126481264912650126511265212653126541265512656126571265812659126601266112662126631266412665126661266712668126691267012671126721267312674126751267612677126781267912680126811268212683126841268512686126871268812689126901269112692126931269412695126961269712698126991270012701127021270312704127051270612707127081270912710127111271212713127141271512716127171271812719127201272112722127231272412725127261272712728127291273012731127321273312734127351273612737127381273912740127411274212743127441274512746127471274812749127501275112752127531275412755127561275712758127591276012761127621276312764127651276612767127681276912770127711277212773127741277512776127771277812779127801278112782127831278412785127861278712788127891279012791127921279312794127951279612797127981279912800128011280212803128041280512806128071280812809128101281112812128131281412815128161281712818128191282012821128221282312824128251282612827128281282912830128311283212833128341283512836128371283812839128401284112842128431284412845128461284712848128491285012851128521285312854128551285612857128581285912860128611286212863128641286512866128671286812869128701287112872128731287412875128761287712878128791288012881128821288312884128851288612887128881288912890128911289212893128941289512896128971289812899129001290112902129031290412905129061290712908129091291012911129121291312914129151291612917129181291912920129211292212923129241292512926129271292812929129301293112932129331293412935129361293712938129391294012941129421294312944129451294612947129481294912950129511295212953129541295512956129571295812959129601296112962129631296412965129661296712968129691297012971129721297312974129751297612977129781297912980129811298212983129841298512986129871298812989129901299112992129931299412995129961299712998129991300013001130021300313004130051300613007130081300913010130111301213013130141301513016130171301813019130201302113022130231302413025130261302713028130291303013031130321303313034130351303613037130381303913040130411304213043130441304513046130471304813049130501305113052130531305413055130561305713058130591306013061130621306313064130651306613067130681306913070130711307213073130741307513076130771307813079130801308113082130831308413085130861308713088130891309013091130921309313094130951309613097130981309913100131011310213103131041310513106131071310813109131101311113112131131311413115131161311713118131191312013121131221312313124131251312613127131281312913130131311313213133131341313513136131371313813139131401314113142131431314413145131461314713148131491315013151131521315313154131551315613157131581315913160131611316213163131641316513166131671316813169131701317113172131731317413175131761317713178131791318013181131821318313184131851318613187131881318913190131911319213193131941319513196131971319813199132001320113202132031320413205132061320713208132091321013211132121321313214132151321613217132181321913220132211322213223132241322513226132271322813229132301323113232132331323413235
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPIJ00300" position="absolute 0 0 1211 827" titletext="입원재원심사관리" oninit="SMPIJ00300_oninit" onload="SMPIJ00300_onload" style="border:0 none #808080ff ;" onclose="SMPIJ00300_onclose">
  5. <Layouts>
  6. <Layout>
  7. <Shape id="line1" class="line_10" position="absolute 0 134 448 137" anchor="left top right"/>
  8. <Button id="btn_EnvSetup" taborder="99" text="환경저장" onclick="grp_calc_btn_EnvSetup_onclick" class="btn4" position="absolute 1104 8 1187 27" anchor="top right"/>
  9. <Button id="btn_exlsave" taborder="100" text="엑셀저장" onclick="grp_calc_btn_exlsave_onclick" class="btn7" position="absolute 1080 306 1157 325" anchor="top right"/>
  10. <Button id="btn_print" taborder="101" text="출력" onclick="grp_calc_btn_print_onclick" class="btn6" position="absolute 1158 306 1210 325" anchor="top right"/>
  11. <Button id="btn_ave" taborder="104" text="범례" onclick="grp_calc_btn_ave_onclick" class="btn2" position="absolute 1036 306 1079 325" anchor="top right"/>
  12. <Static id="caption101" text="조합기호" class="cell_2" position="absolute 822 52 881 71" anchor="default" style="padding:0 0 0 3;align:left middle;"/>
  13. <Button id="btn_no" taborder="96" position="absolute 956 51 974 70" anchor="default" style="background:@gradation URL('theme://images\icon_btn.png');" onclick="btn_no_onclick"/>
  14. <MaskEdit id="ipt_no" taborder="98" mask="####" oneditclick="ipt_no_oneditclick" class="input_default" position="absolute 882 52 957 71"/>
  15. <Grid id="grd_diaglist" taborder="70" binddataset="ds_grd_diaglist" useinputpanel="false" position="absolute 0 137 448 303" anchor="left top right" oncelldblclick="grd_diaglist_oncelldblclick" onrbuttondown="grd_diaglist_onrbuttondown" onenterdown="grd_diaglist_onenterdown" onchar="grd_diaglist_onchar" onkeydown="grd_diaglist_onkeydown" findtype="none" autoenter="select" cellclickbound="control" cellsizingtype="col" oncellclick="grd_diaglist_oncellclick" tooltiptype="hover">
  16. <Formats>
  17. <Format id="default">
  18. <Columns>
  19. <Column size="23"/>
  20. <Column size="22"/>
  21. <Column size="28"/>
  22. <Column size="45"/>
  23. <Column size="179"/>
  24. <Column size="45"/>
  25. <Column size="121"/>
  26. <Column size="0"/>
  27. <Column size="22"/>
  28. <Column size="0"/>
  29. <Column size="0"/>
  30. <Column size="0"/>
  31. <Column size="0"/>
  32. <Column size="0"/>
  33. <Column size="0"/>
  34. <Column size="0"/>
  35. <Column size="0"/>
  36. <Column size="0"/>
  37. <Column size="0"/>
  38. <Column size="50"/>
  39. <Column size="45"/>
  40. <Column size="40"/>
  41. </Columns>
  42. <Rows>
  43. <Row size="27" band="head"/>
  44. <Row size="24"/>
  45. </Rows>
  46. <Band id="head">
  47. <Cell celltype="head"/>
  48. <Cell col="1" text="S"/>
  49. <Cell col="2" text="R/O"/>
  50. <Cell col="3" text="상병&#13;&#10;코드"/>
  51. <Cell col="4" text="상 병 명"/>
  52. <Cell col="5" text=" 진료과"/>
  53. <Cell col="6" text="진료개시일"/>
  54. <Cell col="7" text="치EDI"/>
  55. <Cell col="8" text="치"/>
  56. <Cell col="9" text="부서명"/>
  57. <Cell col="10" text="영문상병명"/>
  58. <Cell col="11" text="환자번호"/>
  59. <Cell col="12" text="입원일자"/>
  60. <Cell col="13" text="cretno"/>
  61. <Cell col="14" text="시작일자"/>
  62. <Cell col="15" text="mskind"/>
  63. <Cell col="16" text="drinptyn"/>
  64. <Cell col="17" text="ddflag"/>
  65. <Cell col="18" text="chkflag"/>
  66. <Cell col="19" text="중증도"/>
  67. <Cell col="20" text="POA"/>
  68. <Cell col="21" text="vcode"/>
  69. </Band>
  70. <Band id="body">
  71. <Cell celltype="head"/>
  72. <Cell col="1" displaytype="text" edittype="text" text="bind:seqno"/>
  73. <Cell col="2" displaytype="checkbox" edittype="checkbox" text="bind:ruleoutyn"/>
  74. <Cell col="3" displaytype="text" edittype="text" editfilter="upper,digit" style="padding:0 5 0 5;" text="bind:diagcd" edituseime="none" editimemode="alpha" editautoselect="true"/>
  75. <Cell col="4" edittype="text" style="align:left middle;" text="bind:diagnm"/>
  76. <Cell col="5" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:orddeptcd" combodataset="ds_init_cmb_orddeptcd" combocodecol="deptcd" combodatacol="deptengabbr"/>
  77. <Cell col="6" displaytype="date" edittype="date" style="align:left middle;" text="bind:ordfromdd" mask="yyyy/MM/dd" calendardisplay="edit" calendardisplaynulltype="nulltext"/>
  78. <Cell col="7" text="bind:toot"/>
  79. <Cell col="8" style="align:left middle;" text="bind:toot1"/>
  80. <Cell col="9" text="bind:orddeptnm"/>
  81. <Cell col="10" text="bind:diagengnm"/>
  82. <Cell col="11" text="bind:pid"/>
  83. <Cell col="12" text="bind:indd"/>
  84. <Cell col="13" text="bind:cretno"/>
  85. <Cell col="14" text="bind:fromdd"/>
  86. <Cell col="15" text="bind:mskind"/>
  87. <Cell col="16" text="bind:drinptyn"/>
  88. <Cell col="17" text="bind:addflag"/>
  89. <Cell col="18" text="bind:chkflag"/>
  90. <Cell col="19" style="align:center middle;" text="bind:spoint"/>
  91. <Cell col="20" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:poaflag" combodataset="ds_PK029list" combocodecol="cdid" combodatacol="cdnm"/>
  92. <Cell col="21" style="align:center middle;" text="bind:vcode"/>
  93. </Band>
  94. </Format>
  95. </Formats>
  96. </Grid>
  97. <Button id="btn_patdnor" taborder="71" text="공여자" class="btn2" position="absolute 70 114 123 133" anchor="top right" onclick="btn_patdnor_onclick"/>
  98. <Button id="btn_esscdiag" taborder="90" text="중증질환" class="btn2" position="absolute 124 114 188 133" onclick="btn_esscdiag_onclick" visible="false" anchor="top right"/>
  99. <Button id="btn_mou" taborder="94" text="MOU" class="btn2" visible="true" position="absolute 1013 282 1059 301" anchor="top right" style="align:left middle;" onclick="btn_mou_onclick"/>
  100. <Button id="btn_nst" taborder="95" text="NST" class="btn5" visible="true" position="absolute 1060 282 1176 301" anchor="top right" style="align:left middle;" enable="false" onclick="btn_nst_onclick"/>
  101. <Static id="caption80" text="주민번호" class="cell_1" position="absolute 143 53 208 72" style="align:left middle;"/>
  102. <Static id="caption82" text="보험유형" class="cell_1" position="absolute 143 73 208 92" style="align:left middle;"/>
  103. <Static id="caption81" text="보조/요율" class="cell_1" position="absolute 143 93 208 112" style="align:left middle;"/>
  104. <Static id="caption108" text="진료과" class="cell_1" position="absolute 349 53 400 72" style="align:left middle;"/>
  105. <Static id="caption109" text="담당교수" class="cell_1" position="absolute 349 73 408 92" style="align:left middle;"/>
  106. <Static id="caption110" text="담당의" class="cell_1" position="absolute 349 93 400 112" style="align:left middle;"/>
  107. <Static id="caption115" text="입원일자" class="cell_1" position="absolute 495 52 569 71" style="align:left middle;"/>
  108. <Static id="caption116" text="퇴원일자" class="cell_1" position="absolute 495 72 569 91" style="align:left middle;"/>
  109. <Static id="caption112" text="재원/요양" class="cell_1" position="absolute 495 92 569 111" style="align:left middle;"/>
  110. <Static id="caption79" text="진료결과" class="cell_1" position="absolute 665 92 729 111" style="align:left middle;"/>
  111. <Static id="caption120" text="도착경로" class="cell_1" position="absolute 665 71 729 90" style="align:left middle;"/>
  112. <Static id="caption118" text="입원경로" class="cell_1" position="absolute 665 51 729 70" style="align:left middle;"/>
  113. <Div id="group7" taborder="84" position="absolute 1013 114 1211 281" anchor="top right">
  114. <Layouts>
  115. <Layout width="1222" height="558">
  116. <Static id="caption4" text="급 여" class="cell_1" position="absolute 0 43 62 62" anchor="default"/>
  117. <Static id="caption5" text="전액본인" class="cell_1" position="absolute 0 63 62 82" anchor="default"/>
  118. <Static id="caption7" text="선택진료" class="cell_1" position="absolute 0 83 62 102" anchor="default"/>
  119. <Static id="caption8" text="SUM" class="cell_1" position="absolute 0 103 62 122" anchor="default"/>
  120. <Static id="caption20" text="미실행" class="cell_1" position="absolute 0 123 62 142" anchor="default"/>
  121. <Static id="caption21" text="예상SUM" class="cell_1" position="absolute 0 143 62 162" anchor="default"/>
  122. <MaskEdit id="opt_sum_totsumownbamt" taborder="1" readonly="false" mask="#,###" position="absolute 130 143 196 162" anchor="default"/>
  123. <MaskEdit id="opt_sum_totsumamt" taborder="2" readonly="false" mask="#,###" position="absolute 63 143 129 162" anchor="default"/>
  124. <MaskEdit id="opt_sum_prcpownbamt" taborder="3" readonly="false" mask="#,###" position="absolute 130 123 196 142" anchor="default"/>
  125. <MaskEdit id="opt_sum_prcptotordamt" taborder="4" readonly="false" mask="#,###" position="absolute 63 123 129 142" anchor="default"/>
  126. <MaskEdit id="opt_sum_owbtotordamt" taborder="5" readonly="false" mask="#,###" position="absolute 130 103 196 122" anchor="default"/>
  127. <MaskEdit id="opt_sum_totordamt" taborder="6" readonly="false" mask="#,###" position="absolute 63 103 129 122" anchor="default"/>
  128. <MaskEdit id="opt_sum_ownbspecamt" taborder="7" readonly="false" mask="#,###" position="absolute 130 83 196 102" anchor="default"/>
  129. <MaskEdit id="opt_sum_specamt" taborder="8" readonly="false" mask="#,###" position="absolute 63 83 129 102" anchor="default"/>
  130. <MaskEdit id="opt_sum_ownbnopyamt" taborder="9" readonly="false" mask="#,###" position="absolute 130 63 196 82" anchor="default"/>
  131. <MaskEdit id="opt_sum_nopyamt" taborder="10" readonly="false" mask="#,###" position="absolute 63 63 129 82" anchor="default"/>
  132. <MaskEdit id="opt_sum_ownbpayamt" taborder="11" readonly="false" mask="#,###" position="absolute 130 43 196 62" anchor="default"/>
  133. <MaskEdit id="opt_sum_payamt" taborder="12" readonly="false" position="absolute 63 43 129 62" anchor="default" mask="#,###"/>
  134. <Static id="caption3" text="본인부담" class="cell_1" position="absolute 130 23 196 42" anchor="default"/>
  135. <Static id="caption2" text="총 액" class="cell_1" position="absolute 63 23 129 42" anchor="default"/>
  136. <CheckBox id="chk_totalsum" taborder="13" class="checkbox_search" position="absolute 0 23 59 42" anchor="default" text="전체" truevalue="Y" onclick="group7_chk_totalsum_onclick" falsevalue="N"/>
  137. <Button id="btn_dschmemo" taborder="14" text="퇴실정리" class="btn2" position="absolute 132 0 196 19" anchor="default" onclick="group7_btn_dschmemo_onclick" visible="false"/>
  138. <Static id="caption96" text="진료비 계산내역" class="tit_2" position="absolute 0 2 134 18" anchor="default" onclick="group7_caption96_onclick"/>
  139. <Shape id="line1" class="line_10" position="absolute 0 20 198 23" anchor="left top right"/>
  140. <Shape id="line00" class="line_10" position="absolute 0 164 198 167" anchor="left top right"/>
  141. </Layout>
  142. </Layouts>
  143. </Div>
  144. <Tab id="swt_spclmemo" taborder="69" tabindex="0" position="absolute 452 114 1011 303" anchor="top right" onlbuttondown="swt_spclmemo_onlbuttondown" ondevicebuttonup="swt_spclmemo_ondevicebuttonup">
  145. <Tabpages>
  146. <Tabpage id="case_spclspec" text="특정내역">
  147. <Layouts>
  148. <Layout>
  149. <Grid id="grd_clcjlist" taborder="1" binddataset="ds_grd_clcjlist" useinputpanel="false" position="absolute 0 23 559 162" anchor="all" onrbuttondown="swt_spclmemo_case_spclspec_grd_clcjlist_onrbuttondown" oncloseup="swt_spclmemo_case_spclspec_grd_clcjlist_oncloseup" onkeydown="swt_spclmemo_case_spclspec_grd_clcjlist_onkeydown" oncelldblclick="swt_spclmemo_case_spclspec_grd_clcjlist_oncelldblclick" ondropdown="swt_spclmemo_case_spclspec_grd_clcjlist_ondropdown" cellsizingtype="col" autoenter="select" cellmovingtype="col" tooltiptype="hover">
  150. <Formats>
  151. <Format id="default">
  152. <Columns>
  153. <Column size="23"/>
  154. <Column size="30"/>
  155. <Column size="65"/>
  156. <Column size="65"/>
  157. <Column size="140"/>
  158. <Column size="155"/>
  159. <Column size="56"/>
  160. <Column size="235"/>
  161. <Column size="0"/>
  162. <Column size="0"/>
  163. <Column size="0"/>
  164. <Column size="0"/>
  165. <Column size="0"/>
  166. <Column size="0"/>
  167. <Column size="0"/>
  168. <Column size="0"/>
  169. </Columns>
  170. <Rows>
  171. <Row size="24" band="head"/>
  172. <Row size="24"/>
  173. </Rows>
  174. <Band id="head">
  175. <Cell/>
  176. <Cell col="1" text="구분"/>
  177. <Cell col="2" text="수가코드"/>
  178. <Cell col="3" text="EDI코드"/>
  179. <Cell col="4" text="구분코드"/>
  180. <Cell col="5" text="내역"/>
  181. <Cell col="6" text="형식"/>
  182. <Cell col="7" text="상세설명"/>
  183. <Cell col="8" text="상태"/>
  184. <Cell col="9"/>
  185. <Cell col="10"/>
  186. <Cell col="11"/>
  187. <Cell col="12"/>
  188. <Cell col="13"/>
  189. <Cell col="14"/>
  190. <Cell col="15"/>
  191. </Band>
  192. <Band id="body">
  193. <Cell celltype="head"/>
  194. <Cell col="1" text="bind:unitflag"/>
  195. <Cell col="2" style="align:left middle;" text="bind:calcscorcd"/>
  196. <Cell col="3" displaytype="text" edittype="text" style="align:left middle;padding:0 5 0 5;" text="bind:edicd"/>
  197. <Cell col="4" displaytype="combo" edittype="combo" style="padding:0 5 0 5;" text="bind:spclcd" combodataset="expr:unitflag == 'M' ? 'fds_P0117list_M' : unitflag == 'J' ? 'fds_P0117list_J' : 'ds_P0117list'" combocodecol="cdid" combodatacol="cdengabbrnm" id="col01"/>
  198. <Cell col="5" displaytype="text" edittype="textarea" style="align:left top;padding:0 5 0 5;" text="bind:spclspec" wordwrap="word" editimemode="hangul" editautoselect="true"/>
  199. <Cell col="6" style="padding:0 5 0 5;" text="bind:remfact"/>
  200. <Cell col="7" style="align:left top;padding:0 5 0 5;" text="bind:detldesc" expr="expr:ds_P0117list.lookup('cdid',spclcd,'detldesc')" wordwrap="word" tooltiptext="bind:detldesc"/>
  201. <Cell col="8" text="bind:status"/>
  202. <Cell col="9" text="bind:pid"/>
  203. <Cell col="10" text="bind:indd"/>
  204. <Cell col="11" text="bind:cretno"/>
  205. <Cell col="12" text="bind:fromdd"/>
  206. <Cell col="13" text="bind:mskind"/>
  207. <Cell col="14" text="bind:spclmemoflag"/>
  208. <Cell col="15" text="bind:seqno"/>
  209. </Band>
  210. </Format>
  211. </Formats>
  212. </Grid>
  213. <Radio id="rdo_unitflag" taborder="2" columncount="4" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 0 0 314 19" anchor="default" onitemchanged="swt_spclmemo_case_spclspec_rdo_unitflag_onitemchanged">
  214. <Dataset id="innerdataset">
  215. <ColumnInfo>
  216. <Column id="codecolumn"/>
  217. <Column id="datacolumn"/>
  218. </ColumnInfo>
  219. <Rows>
  220. <Row>
  221. <Col id="codecolumn">-</Col>
  222. <Col id="datacolumn">전체</Col>
  223. </Row>
  224. <Row>
  225. <Col id="codecolumn">M</Col>
  226. <Col id="datacolumn">명단위</Col>
  227. </Row>
  228. <Row>
  229. <Col id="codecolumn">J</Col>
  230. <Col id="datacolumn">줄단위</Col>
  231. </Row>
  232. <Row>
  233. <Col id="codecolumn">JX999</Col>
  234. <Col id="datacolumn">처방주석</Col>
  235. </Row>
  236. </Rows>
  237. </Dataset>
  238. </Radio>
  239. <Button id="button5" taborder="3" text="코드조회" class="btn2" position="absolute 441 0 505 19" anchor="top right" onclick="swt_spclmemo_case_spclspec_button5_onclick"/>
  240. <Button id="btn_savespcllist" taborder="4" text="저장" class="btn5" position="absolute 506 0 559 19" anchor="top right" visible="false" onclick="swt_spclmemo_case_spclspec_btn_savespcllist_onclick"/>
  241. <Shape id="line1" class="line_10" position="absolute 0 20 559 23" anchor="left top right"/>
  242. </Layout>
  243. </Layouts>
  244. </Tabpage>
  245. <Tabpage id="case_judgrmemo" text="심사메모">
  246. <Layouts>
  247. <Layout width="559" height="162">
  248. <Button id="btn_memohistory" taborder="1" text="심사자메모" class="btn2" position="absolute 0 0 78 19" anchor="left top" onclick="swt_spclmemo_case_judgrmemo_btn_memohistory_onclick"/>
  249. <Button id="btn_memohistory_drug" taborder="2" text="약" class="btn2" position="absolute 79 0 121 19" anchor="default" onclick="swt_spclmemo_case_judgrmemo_btn_memohistory_drug_onclick"/>
  250. <Button id="btn_memohistory_injection" taborder="3" text="주사" class="btn2" position="absolute 122 0 164 19" anchor="default" onclick="swt_spclmemo_case_judgrmemo_btn_memohistory_injection_onclick"/>
  251. <Button id="btn_memohistory_treat" taborder="4" text="처치" class="btn2" position="absolute 165 0 207 19" anchor="default" onclick="swt_spclmemo_case_judgrmemo_btn_memohistory_treat_onclick"/>
  252. <Button id="btn_memohistory_exam" taborder="5" text="검사" class="btn2" position="absolute 208 0 250 19" anchor="default" onclick="swt_spclmemo_case_judgrmemo_btn_memohistory_exam_onclick"/>
  253. <Button id="btn_memohistory_etc" taborder="6" text="기타" class="btn2" position="absolute 251 0 293 19" anchor="default" onclick="swt_spclmemo_case_judgrmemo_btn_memohistory_etc_onclick"/>
  254. <Button id="btn_savejudgrmemo" taborder="7" text="저장" class="btn5" position="absolute 505 0 558 19" anchor="top right" visible="true" onclick="swt_spclmemo_case_judgrmemo_btn_savejudgrmemo_onclick"/>
  255. <Button id="btn_clearjudgrmemo" taborder="8" text="지우기" class="btn5" position="absolute 451 0 504 19" anchor="top right" onclick="swt_spclmemo_case_judgrmemo_btn_clearjudgrmemo_onclick"/>
  256. <Button id="btn_toclammemo" taborder="9" text="청구메모로 전달" class="btn5" position="absolute 341 0 450 19" anchor="top right" onclick="swt_spclmemo_case_judgrmemo_btn_toclammemo_onclick"/>
  257. <TextArea id="tar_judgrmk" taborder="10" position="absolute 0 20 559 162" anchor="all" wordwrap="word"/>
  258. <TextArea id="tar_dumprmk" taborder="11" visible="false" position="absolute 0 20 559 162" anchor="all" wordwrap="word" oneditclick="swt_spclmemo_case_judgrmemo_tar_dumprmk_oneditclick" selectscrollmode="scroll" scrollbars="autoboth" imemode="hangul"/>
  259. </Layout>
  260. </Layouts>
  261. </Tabpage>
  262. <Tabpage id="case_ediclammemo" text="EDI 메모">
  263. <Layouts>
  264. <Layout>
  265. <Button id="btn_memoedi" taborder="1" text="EDI메모" class="btn2" position="absolute 0 0 78 19" anchor="left top" onclick="swt_spclmemo_case_ediclammemo_btn_memoedi_onclick"/>
  266. <Button id="btn_memoedi_drug" taborder="2" text="약" class="btn2" position="absolute 79 0 121 19" anchor="default" onclick="swt_spclmemo_case_ediclammemo_btn_memoedi_drug_onclick"/>
  267. <Button id="btn_memoedi_injection" taborder="3" text="주사" class="btn2" position="absolute 122 0 164 19" anchor="default" onclick="swt_spclmemo_case_ediclammemo_btn_memoedi_injection_onclick"/>
  268. <Button id="btn_memoedi_treat" taborder="4" text="처치" class="btn2" position="absolute 165 0 207 19" anchor="default" onclick="swt_spclmemo_case_ediclammemo_btn_memoedi_treat_onclick"/>
  269. <Button id="btn_memoedi_exam" taborder="5" text="검사" class="btn2" position="absolute 208 0 250 19" anchor="default" onclick="swt_spclmemo_case_ediclammemo_btn_memoedi_exam_onclick"/>
  270. <Button id="btn_memoedi_etc" taborder="6" text="기타" class="btn2" position="absolute 251 0 293 19" anchor="default" onclick="swt_spclmemo_case_ediclammemo_btn_memoedi_etc_onclick"/>
  271. <Button id="btn_saveedimemo" taborder="7" text="저장" class="btn5" position="absolute 505 0 558 19" anchor="top right" onclick="swt_spclmemo_case_ediclammemo_btn_saveedimemo_onclick"/>
  272. <Button id="button4" taborder="8" text="지우기" class="btn5" position="absolute 451 0 504 19" anchor="top right" onclick="swt_spclmemo_case_ediclammemo_button4_onclick"/>
  273. <TextArea id="tar_edirmk" taborder="9" position="absolute 0 20 559 162" anchor="all" wordwrap="word" scrollbars="autovert" imemode="hangul"/>
  274. </Layout>
  275. </Layouts>
  276. </Tabpage>
  277. <Tabpage id="case_tstmemo" text="평가메모">
  278. <Layouts>
  279. <Layout>
  280. <Button id="btn_memotst" taborder="1" text="평가공통" class="btn2" position="absolute 0 0 64 19" anchor="default" onclick="swt_spclmemo_case_tstmemo_btn_memotst_onclick"/>
  281. <Button id="btn_memotst_ami" taborder="2" text="AMI" class="btn2" position="absolute 65 0 105 19" anchor="default" onclick="swt_spclmemo_case_tstmemo_btn_memotst_ami_onclick"/>
  282. <Button id="button8" taborder="3" text="CABG" class="btn2" position="absolute 106 0 157 19" anchor="default" onclick="swt_spclmemo_case_tstmemo_button8_onclick"/>
  283. <Button id="button9" taborder="4" text="분만" class="btn2" position="absolute 158 0 200 19" anchor="default" onclick="swt_spclmemo_case_tstmemo_button9_onclick"/>
  284. <Button id="button11" taborder="5" text="뇌졸증" class="btn2" position="absolute 201 0 257 19" anchor="default" onclick="swt_spclmemo_case_tstmemo_button11_onclick"/>
  285. <Button id="button12" taborder="6" text="예방항생제" class="btn2" position="absolute 258 0 334 19" anchor="default" onclick="swt_spclmemo_case_tstmemo_button12_onclick"/>
  286. <Button id="button13" taborder="7" text="저장" class="btn5" position="absolute 505 0 558 19" anchor="top right" onclick="swt_spclmemo_case_tstmemo_button13_onclick"/>
  287. <Button id="button14" taborder="8" text="지우기" class="btn5" position="absolute 451 0 504 19" anchor="top right" onclick="swt_spclmemo_case_tstmemo_button14_onclick"/>
  288. <TextArea id="textarea1" taborder="9" position="absolute 0 20 559 162" anchor="all" wordwrap="word" scrollbars="autovert" imemode="hangul"/>
  289. </Layout>
  290. </Layouts>
  291. </Tabpage>
  292. </Tabpages>
  293. </Tab>
  294. <Static id="caption23" class="tit_2" position="absolute 996 116 1011 132" style="align:left top;" anchor="top right" onclick="caption23_onclick"/>
  295. <Static id="caption92" text="Message :" class="tit_2" position="absolute 0 308 98 324" visible="true"/>
  296. <Button id="btn_spclData" taborder="80" text="특정내역" class="btn2" position="absolute 1225 408 1289 427" style="align:left middle;" anchor="top right" visible="false" onclick="btn_spclData_onclick"/>
  297. <Button id="btn_mt004" taborder="81" text="MT004" class="btn2" position="absolute 797 114 861 136" style="align:left middle;" anchor="top right" onclick="btn_mt004_onclick"/>
  298. <Button id="btn_attData" taborder="82" text="소명자료" class="btn2" position="absolute 862 114 930 136" style="align:left middle;" anchor="top right" onclick="btn_attData_onclick"/>
  299. <Button id="button1" taborder="83" text="메모이력" class="btn2" position="absolute 931 114 995 136" style="align:left middle;" anchor="top right" onclick="button1_onclick"/>
  300. <Edit id="output35" taborder="87" readonly="true" position="absolute 96 306 901 325" visible="true" anchor="left top right"/>
  301. <Div position="absolute 1632 367 1794 472" id="grp_taboo" visible="false">
  302. <Layouts>
  303. <Layout>
  304. <Static text="병용금기리스트" position="absolute -1 4 198 18" id="caption38" class="tit_2" anchor="default"/>
  305. <!--
  306. <ImageViewer position="absolute 484 4 500 19" id="img3" image="URL('theme://images/com/commonxp/icon_x.gif')" anchor="default"/>
  307. -->
  308. <ImageViewer position="absolute 484 4 500 19" id="img3" image="" anchor="default"/>
  309. <Grid position="absolute 1377 -230 1880 -61" id="datagrid2" binddataset="ds_datagrid2" anchor="default">
  310. <Formats>
  311. <Format id="default">
  312. <Columns>
  313. <Column size="80"/>
  314. <Column size="80"/>
  315. <Column size="80"/>
  316. <Column size="80"/>
  317. <Column size="80"/>
  318. <Column size="80"/>
  319. </Columns>
  320. <Rows>
  321. <Row size="24" band="head"/>
  322. <Row size="24" band="head"/>
  323. <Row size="24" band="head"/>
  324. <Row size="24" band="head"/>
  325. <Row size="24"/>
  326. </Rows>
  327. <Band id="head">
  328. <Cell text="실시일자"/>
  329. <Cell col="1"/>
  330. <Cell col="2"/>
  331. <Cell col="3"/>
  332. <Cell col="4"/>
  333. <Cell col="5"/>
  334. <Cell row="1"/>
  335. <Cell row="1" col="1" text="코드"/>
  336. <Cell row="1" col="2"/>
  337. <Cell row="1" col="3"/>
  338. <Cell row="1" col="4"/>
  339. <Cell row="1" col="5"/>
  340. <Cell row="2"/>
  341. <Cell row="2" col="1" text="코드명"/>
  342. <Cell row="2" col="2"/>
  343. <Cell row="2" col="3"/>
  344. <Cell row="2" col="4"/>
  345. <Cell row="2" col="5"/>
  346. <Cell row="3"/>
  347. <Cell row="3" col="1" text="실시일자2"/>
  348. <Cell row="3" col="2" text="코드2"/>
  349. <Cell row="3" col="3" text="코드명2"/>
  350. <Cell row="3" col="4"/>
  351. <Cell row="3" col="5"/>
  352. </Band>
  353. <Band id="body">
  354. <Cell text="bind:execdd" edittype="none" displaytype="none" mask="yyyy-mm-dd"/>
  355. <Cell col="1" text="bind:prcpcd" edittype="none" displaytype="none"/>
  356. <Cell col="2" text="bind:prcpnm" edittype="none" displaytype="none"/>
  357. <Cell col="3" text="bind:execdd2" edittype="none" displaytype="none" mask="yyyy-mm-dd"/>
  358. <Cell col="4" text="bind:prcpcd2" edittype="none" displaytype="none"/>
  359. <Cell col="5" text="bind:prcpnm2" edittype="none" displaytype="none"/>
  360. </Band>
  361. </Format>
  362. </Formats>
  363. </Grid>
  364. </Layout>
  365. </Layouts>
  366. </Div>
  367. <!--
  368. <Div id="group6" taborder="1" position="absolute 0 29 1195 800">
  369. <Layouts>
  370. <Layout>
  371. -->
  372. <Static id="caption87" text="상병&#13;&#10; " class="tit_2" position="absolute 0 116 67 132" anchor="default" onclick="caption87_onclick"/>
  373. <Static id="caption103" text="조합명칭" class="cell_2" position="absolute 822 72 881 91" anchor="default" style="padding:0 0 0 3;align:left middle;"/>
  374. <Static id="caption104" text="증번호" class="cell_2" position="absolute 822 92 881 111" anchor="default" style="padding:0 0 0 3;align:left middle;"/>
  375. <Button id="btn_histref" taborder="2" text="이력조회" class="btn2" position="absolute 507 29 571 48" anchor="top right" onclick="btn_histref_onclick" onmouseenter="btn_onmouseenter"/>
  376. <Button id="btn_patinfo" taborder="3" text="환자정보" class="btn2" position="absolute 572 29 636 48" anchor="top right" onclick="btn_patinfo_onmouseenter" onmouseenter="btn_onmouseenter"/>
  377. <Button id="btn_qualinfo" taborder="4" text="자격정보" class="btn2" position="absolute 637 29 701 48" anchor="top right" onclick="btn_qualinfo_onmouseenter" onmouseenter="btn_onmouseenter"/>
  378. <Button id="btn_prcpref" taborder="5" text="처방조회" class="btn2" position="absolute 702 29 766 48" anchor="top right" onclick="btn_prcpref_onmouseenter" onmouseenter="btn_onmouseenter"/>
  379. <Button id="btn_mediinfo" taborder="6" text="투약정보" class="btn2" position="absolute 767 29 831 48" anchor="top right" onclick="btn_mediinfo_onmouseenter" onmouseenter="btn_onmouseenter"/>
  380. <Button id="btn_rsltsrch" taborder="7" text="결과조회" class="btn2" position="absolute 832 29 896 48" anchor="top right" onclick="btn_rsltsrch_onclick"/>
  381. <Button id="btn_ordamt" taborder="8" text="진료비" class="btn2" position="absolute 897 29 950 48" anchor="top right" onclick="btn_ordamt_onmouseenter" onmouseenter="btn_onmouseenter"/>
  382. <Button id="btn_etcref" taborder="9" text="각종조회" class="btn2" position="absolute 951 29 1015 48" anchor="top right" onclick="btn_etcref_onmouseenter" onmouseenter="btn_onmouseenter"/>
  383. <Button id="btn_emr" taborder="10" text="EMR" class="btn2" position="absolute 1016 29 1058 48" anchor="top right" onclick="btn_emr_onmouseenter" onmouseenter="btn_onmouseenter"/>
  384. <Button id="btn_erroomref" taborder="11" text="응급실정보" class="btn2" position="absolute 1059 29 1134 48" anchor="top right" onclick="btn_erroomref_onmouseenter" onmouseenter="btn_onmouseenter"/>
  385. <Button id="btn_careinforef" taborder="12" text="간호정보" class="btn2" visible="false" position="absolute 1135 29 1199 48" anchor="top right"/>
  386. <Button id="btn_trnptinforef" taborder="13" text="이식정보" class="btn2" position="absolute 1135 29 1199 48" anchor="top right" onclick="btn_trnptinforef_onmouseenter" onmouseenter="btn_onmouseenter"/>
  387. <Button id="btn_insuhistoryup" taborder="14" class="icon_top" visible="false" position="absolute 1200 29 1211 48" anchor="top right" onclick="btn_insuhistoryup_onclick"/>
  388. <Button id="btn_insuhistorydown" taborder="15" class="icon_bottom" visible="false" position="absolute 1200 29 1211 48" anchor="top right" onclick="btn_insuhistorydown_onclick"/>
  389. <Edit id="ipt_pid" taborder="17" class="input_default" position="absolute 0 52 86 71" anchor="default" onsetfocus="ipt_pid_onsetfocus" onkeydown="ipt_pid_onkeydown"/>
  390. <Edit id="opt_wardcdnm" taborder="18" readonly="true" position="absolute 0 92 79 111" anchor="default"/>
  391. <Edit id="opt_roomcdnm" taborder="19" readonly="true" position="absolute 81 92 141 111" anchor="default"/>
  392. <Edit id="opt_rrgstno" taborder="20" readonly="true" position="absolute 210 52 323 71" anchor="default"/>
  393. <Edit id="opt_patientage" taborder="21" readonly="true" position="absolute 106 72 141 91" anchor="default"/>
  394. <Edit id="opt_patientsex" taborder="22" readonly="true" position="absolute 324 52 347 71" anchor="default"/>
  395. <Edit id="opt_insukind" taborder="23" readonly="true" position="absolute 210 72 236 91" anchor="default"/>
  396. <Edit id="opt_suppkind" taborder="24" readonly="true" position="absolute 210 92 236 111" anchor="default"/>
  397. <Combo id="cmb_suppkind" taborder="25" innerdataset="@ds_init_cmb_suppkindlist" codecolumn="suppkind" datacolumn="suppratenm" class="combo_default" enable="false" position="absolute 238 92 308 111" anchor="default" visible="true"/>
  398. <Edit id="opt_ownrate" taborder="26" readonly="true" position="absolute 310 92 335 111" anchor="default"/>
  399. <Static id="caption1" text="%" position="absolute 337 92 348 111" anchor="default" onclick="caption1_onclick" style="align:left middle;"/>
  400. <Combo id="cmb_orddeptcd" taborder="27" innerdataset="ds_init_cmb_orddeptcd" codecolumn="deptcd" datacolumn="depthngnm" class="combo_default" enable="true" position="absolute 402 52 493 71" anchor="default" visible="true"/>
  401. <Edit id="opt_medispclnm" taborder="28" readonly="true" position="absolute 410 72 470 91" anchor="default"/>
  402. <Edit id="opt_atdoctnm" taborder="29" readonly="true" position="absolute 402 92 493 111" anchor="default"/>
  403. <Edit id="opt_medispclidyn" taborder="30" readonly="true" position="absolute 471 72 493 91" anchor="default"/>
  404. <Combo id="cmb_indd" taborder="31" innerdataset="ds_init_cmb_indd" codecolumn="indd" datacolumn="indd" class="combo_default" position="absolute 571 52 663 71" anchor="default"/>
  405. <Calendar id="ipt_dschdd" taborder="32" class="input_default" enable="false" position="absolute 574 72 659 91" anchor="default"/>
  406. <Calendar id="ipt_dschnotidt" taborder="33" class="input_default" enable="true" position="absolute 571 72 663 91" anchor="default" visible="true"/>
  407. <Edit id="ipt_indaycnt" taborder="34" class="input_default" position="absolute 571 92 613 111" anchor="default"/>
  408. <Edit id="ipt_meddaycnt" taborder="35" class="input_default" position="absolute 615 92 662 111" anchor="default"/>
  409. <Combo id="cmb_inpath" taborder="36" innerdataset="ds_init_cmb_inpath" codecolumn="cdid" datacolumn="cdnm" class="combo_default" enable="true" position="absolute 730 52 820 71" anchor="default" visible="true"/>
  410. <Combo id="cmb_ordrslt" taborder="37" innerdataset="@ds_init_cmb_ordrslt" codecolumn="cdid" datacolumn="cdnm" class="combo_default" position="absolute 730 92 820 111" anchor="default"/>
  411. <Edit id="ipt_insuno" taborder="38" class="input_default" position="absolute 882 92 974 111" anchor="default"/>
  412. <Combo id="ipt_arvpath" taborder="39" innerdataset="ds_init_ipt_arvpath" codecolumn="cdid" datacolumn="cdnm" class="combo_default" position="absolute 730 72 820 91" anchor="default"/>
  413. <Button id="btn_clamdiag" taborder="44" text="상병이력" class="btn2" position="absolute 319 114 383 133" anchor="top right" onclick="btn_clamdiag_onclick"/>
  414. <Button id="btn_refreshdiag" taborder="45" text="상병조회" class="btn2" position="absolute 384 114 448 133" anchor="top right" onclick="btn_refreshdiag_onclick"/>
  415. <Button id="btn_operdiag" taborder="47" text="수술(유)" class="btn2" position="absolute 254 114 318 133" anchor="top right" onclick="btn_operdiag_onclick"/>
  416. <Button id="btn_babymother" taborder="48" text="애기/엄마" class="btn2" position="absolute 189 114 253 133" anchor="top right" onclick="btn_babymother_onclick"/>
  417. <Combo id="cmb_insukind" taborder="51" innerdataset="@ds_init_cmb_insukind" codecolumn="cdid" datacolumn="cdnm" class="combo_default" enable="false" position="absolute 238 72 347 91" anchor="default" visible="true"/>
  418. <Edit id="ipt_patnm" taborder="53" readonly="true" position="absolute 0 72 104 91" anchor="default"/>
  419. <Edit id="opt_cmpynm" taborder="54" readonly="true" position="absolute 882 72 974 91" anchor="default"/>
  420. <Div id="grp_calc" taborder="68" position="absolute 0 327 1211 827" anchor="all">
  421. <Layouts>
  422. <Layout width="1211" height="440">
  423. <Button id="btn_midcomplete" taborder="44" text="중간청구마감" class="btn2" position="absolute 1122 253 1208 272" anchor="top right" onclick="grp_calc_btn_midcomplete_onclick"/>
  424. <Grid id="grd_ordlist" class="datagrid2" taborder="1" binddataset="ds_grd_ordlist" useinputpanel="false" position="absolute 0 96 1120 500" anchor="all" oncelldblclick="grp_calc_grd_ordlist_oncelldblclick" onlbuttondown="grp_calc_grd_ordlist_onlbuttondown" onrbuttondown="grp_calc_grd_ordlist_onrbuttondown" tooltiptype="inplace" onheadclick="grp_calc_grd_ordlist_onheadclick" oncellclick="grp_calc_grd_ordlist_oncellclick" onexpanddown="grp_calc_grd_ordlist_onexpanddown" onkeydown="grp_calc_grd_ordlist_onkeydown" cellsizingtype="col">
  425. <Formats>
  426. <Format id="default">
  427. <Columns>
  428. <Column size="31"/>
  429. <Column size="0"/>
  430. <Column size="0"/>
  431. <Column size="0"/>
  432. <Column size="0"/>
  433. <Column size="24"/>
  434. <Column size="22"/>
  435. <Column size="0"/>
  436. <Column size="22"/>
  437. <Column size="82"/>
  438. <Column size="79"/>
  439. <Column size="70"/>
  440. <Column size="55"/>
  441. <Column size="35"/>
  442. <Column size="18"/>
  443. <Column size="68"/>
  444. <Column size="197"/>
  445. <Column size="26"/>
  446. <Column size="32"/>
  447. <Column size="26"/>
  448. <Column size="26"/>
  449. <Column size="22"/>
  450. <Column size="64"/>
  451. <Column size="42"/>
  452. <Column size="30"/>
  453. <Column size="45"/>
  454. <Column size="41"/>
  455. <Column size="89"/>
  456. <Column size="60"/>
  457. <Column size="60"/>
  458. <Column size="26"/>
  459. <Column size="51"/>
  460. <Column size="21"/>
  461. <Column size="21"/>
  462. <Column size="66"/>
  463. <Column size="66"/>
  464. <Column size="66"/>
  465. <Column size="66"/>
  466. <Column size="66"/>
  467. <Column size="66"/>
  468. <Column size="66"/>
  469. <Column size="66"/>
  470. <Column size="300"/>
  471. <Column size="0"/>
  472. <Column size="0"/>
  473. <Column size="30"/>
  474. <Column size="22"/>
  475. <Column size="100"/>
  476. <Column size="100"/>
  477. <Column size="30"/>
  478. <Column size="100"/>
  479. <Column size="0"/>
  480. <Column size="57"/>
  481. <Column size="72"/>
  482. <Column size="0"/>
  483. <Column size="67"/>
  484. <Column size="40"/>
  485. <Column size="74"/>
  486. <Column size="0"/>
  487. <Column size="49"/>
  488. <Column size="63"/>
  489. <Column size="40"/>
  490. </Columns>
  491. <Rows>
  492. <Row size="27" band="head"/>
  493. <Row size="24"/>
  494. </Rows>
  495. <Band id="head">
  496. <Cell/>
  497. <Cell col="1" text="선&#13;&#10;별"/>
  498. <Cell col="2" text="문&#13;&#10;제"/>
  499. <Cell col="3" text="기&#13;&#10;왕"/>
  500. <Cell col="4" text="S"/>
  501. <Cell col="5" text="항"/>
  502. <Cell col="6" text="목"/>
  503. <Cell col="7" text="항목"/>
  504. <Cell col="8" text="G"/>
  505. <Cell col="9" text="그룹코드"/>
  506. <Cell col="10" text="수가코드"/>
  507. <Cell col="11" text="EDI코드"/>
  508. <Cell col="12" text="산정&#13;&#10;의미"/>
  509. <Cell col="13" text="산정&#13;&#10;코드"/>
  510. <Cell col="14" text="@"/>
  511. <Cell col="15" text="실시일자"/>
  512. <Cell col="16" text="한글명"/>
  513. <Cell col="17" text="급&#13;&#10;비"/>
  514. <Cell col="18" text="재료&#13;&#10;행위"/>
  515. <Cell col="19" text="시&#13;&#10;행"/>
  516. <Cell col="20" text="요&#13;&#10;율"/>
  517. <Cell col="21" text="퇴"/>
  518. <Cell col="22" text="단가"/>
  519. <Cell col="23" text="1회량"/>
  520. <Cell col="24" text="횟수"/>
  521. <Cell col="25" text="1일량&#13;&#10;(일투)"/>
  522. <Cell col="26" text="일수&#13;&#10;총투"/>
  523. <Cell col="27" text="금액"/>
  524. <Cell col="28" text="약제상한&#13;&#10;차액"/>
  525. <Cell col="29" text="상한가"/>
  526. <Cell col="30" text="선&#13;&#10;택"/>
  527. <Cell col="31" text="확인"/>
  528. <Cell col="32" text="T"/>
  529. <Cell col="33" text="치"/>
  530. <Cell col="34" text="종별가산&#13;&#10;단가"/>
  531. <Cell col="35" text="선택&#13;&#10;단가"/>
  532. <Cell col="36" text="가산&#13;&#10;단가"/>
  533. <Cell col="37" text="총진료비"/>
  534. <Cell col="38" text="본인부담"/>
  535. <Cell col="39" text="종별가산&#13;&#10;SUM"/>
  536. <Cell col="40" text="선택진료&#13;&#10;SUM"/>
  537. <Cell col="41" text="가산&#13;&#10;SUM"/>
  538. <Cell col="42" text="처방명"/>
  539. <Cell col="43" text="그룹항목"/>
  540. <Cell col="44" text="처방계산구분"/>
  541. <Cell col="45" text="수술&#13;&#10;구분"/>
  542. <Cell col="46" text="C&#13;&#10;P"/>
  543. <Cell col="47" text="계산수가코드"/>
  544. <Cell col="48" text="산정분류"/>
  545. <Cell col="49" text="외래필수심사여부"/>
  546. <Cell col="50" text="DRG인정&#13;&#10;비급여구분"/>
  547. <Cell col="51" text="DRG수술구분"/>
  548. <Cell col="52" style="align:center middle;" text="DRG/완화&#13;&#10;인정여부"/>
  549. <Cell col="53" text="실구입가"/>
  550. <Cell col="54" text="caption1"/>
  551. <Cell col="55" text="청구액"/>
  552. <Cell col="56" text="응급&#13;&#10;수가"/>
  553. <Cell col="57" text="수가완화구분"/>
  554. <Cell col="58" text="execddtm"/>
  555. <Cell col="59" text="자보&#13;&#10;처방"/>
  556. <Cell col="60" text="급비&#13;&#10;제어"/>
  557. <Cell col="61" text="중증&#13;&#10;외상"/>
  558. </Band>
  559. <Band id="body">
  560. <Cell celltype="head" expr="currow + 1"/>
  561. <Cell col="1" text="bind:spcljudgyn"/>
  562. <Cell col="2" text="bind:probordyn"/>
  563. <Cell col="3" text="bind:anamneflag"/>
  564. <Cell col="4" text="bind:seq"/>
  565. <Cell col="5" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:item1"/>
  566. <Cell col="6" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:item2"/>
  567. <Cell col="7" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:snglcalcscorcls"/>
  568. <Cell col="8" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:grupflag"/>
  569. <Cell col="9" style="align:left middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:grupcalcscorcd"/>
  570. <Cell col="10" style="align:left middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:snglcalcscorcd"/>
  571. <Cell col="11" style="align:left middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:edicd"/>
  572. <Cell col="12" style="align:left middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : estmmeancd_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : estmmeancd_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:estmmeancd"/>
  573. <Cell col="13" style="align:left middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : estmmeancd_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : estmmeancd_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:estmcd"/>
  574. <Cell col="14" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : drgopyn_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : drgopyn_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:pay100"/>
  575. <Cell col="15" displaytype="expr:getRowLevel(currow) == 1 ? 'none' : 'date'" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:execdd" mask="yyyy-MM-dd"/>
  576. <Cell col="16" style="align:left middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bfjudgyn_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bfjudgyn_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:hngnm"/>
  577. <Cell col="17" displaytype="combo" edittype="combo" style="align:center;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : calcpayflag_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : calcpayflag_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:calcpayflag" combodataset="ds_grd_cmb_calcpayflag" combocodecol="cd" combodatacol="nm" enable="false"/>
  578. <Cell col="18" displaytype="combo" edittype="combo" style="align:center;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:matractflag" combodataset="ds_grd_cmb_matractflag" combocodecol="cd" combodatacol="nm" enable="false"/>
  579. <Cell col="19" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:execprcpstatcd"/>
  580. <Cell col="20" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:payownbrate"/>
  581. <Cell col="21" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:dschdrugflag"/>
  582. <Cell col="22" displaytype="number" style="align:right middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : appunitcost_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : appunitcost_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:appunitcost" mask="#,##0"/>
  583. <Cell col="23" displaytype="number" style="align:right middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:calcqty" mask="#,##0.0#"/>
  584. <Cell col="24" displaytype="number" style="align:right middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:calctims" mask="#,##0"/>
  585. <Cell col="25" displaytype="number" style="align:right middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:daydrugqty" expr="expr:calcqty * calctims" mask="#,##0.0#"/>
  586. <Cell col="26" displaytype="number" style="align:right middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:calcdays" mask="#,##0"/>
  587. <Cell col="27" celltype="none" displaytype="number" style="align:right middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:calcamt" mask="#,##0"/>
  588. <Cell col="28" displaytype="number" style="align:right middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:limitdiffamt" mask="#,##0"/>
  589. <Cell col="29" displaytype="number" style="align:right middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:druglimitamt" mask="#,##0"/>
  590. <Cell col="30" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:specyn"/>
  591. <Cell col="31" displaytype="text" edittype="text" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:cnfmcd" expr="expr:fSetCnfmcdSpclJudgOrder(currow, edicd, cnfmcd)" expandshow="show" expandsize="20"/>
  592. <Cell col="32" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:text" expr="expr:fSetTextSpclJudgOrder(edicd, snglcalcscorcd)"/>
  593. <Cell col="33" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:tootfact"/>
  594. <Cell col="34" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:unithospaddamt" mask="#,##0"/>
  595. <Cell col="35" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:unitspecamt" mask="#,##0"/>
  596. <Cell col="36" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:unitaddamt" mask="#,##0"/>
  597. <Cell col="37" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:totordamt" mask="#,##0"/>
  598. <Cell col="38" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:ownbamt" mask="#,##0"/>
  599. <Cell col="39" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:hospaddamt" mask="#,##0"/>
  600. <Cell col="40" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:specamt" mask="#,##0"/>
  601. <Cell col="41" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:addamt" mask="#,##0"/>
  602. <Cell col="42" style="align:left middle;background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:ordnm"/>
  603. <Cell col="43" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:grupcalcscorcls"/>
  604. <Cell col="44" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:ordcalcflag"/>
  605. <Cell col="45" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:opflag"/>
  606. <Cell col="46" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:cpflag"/>
  607. <Cell col="47" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:snglearncls"/>
  608. <Cell col="48" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:estmcls" enable="false"/>
  609. <Cell col="49" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bfjudgyn_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bfjudgyn_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:bfjudgyn"/>
  610. <Cell col="50" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:drgrcnopyn"/>
  611. <Cell col="51" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:drgopyn"/>
  612. <Cell col="52" displaytype="combo" edittype="combo" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:drgacptflag" combodataset="ds_P0506list" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  613. <Cell col="53" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:accnopyamt" mask="#,##0"/>
  614. <Cell col="54" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:pynpy"/>
  615. <Cell col="55" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:insubamt"/>
  616. <Cell col="56" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : pordarcptyn_bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : pordarcptyn_bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:pordarcptyn"/>
  617. <Cell col="57" displaytype="combo" edittype="combo" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:updgb" combodataset="ds_P0551list" combocodecol="cdid" combodatacol="cdnm"/>
  618. <Cell col="58" text="bind:execddtm"/>
  619. <Cell col="59" displaytype="combo" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:autmbinptflag" combodataset="ds_cmb_autmbinptflag" combocodecol="cdid" combodatacol="cdnm"/>
  620. <Cell col="60" displaytype="combo" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:etcflag5" combodataset="ds_P0556list" combocodecol="cdid" combodatacol="cdnm"/>
  621. <Cell col="61" style="background:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);background2:EXPR(getRowLevel(currow) == 1 ? '#cefcfa' : bgcolor);font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:tr4yn"/>
  622. </Band>
  623. </Format>
  624. </Formats>
  625. </Grid>
  626. <!--
  627. <Div id="group8" taborder="4" position="absolute 0 41 1194 110" anchor="default">
  628. <Layouts>
  629. <Layout>
  630. -->
  631. <!--
  632. </Layout>
  633. </Layouts>
  634. </Div>
  635. -->
  636. <Button id="btn_PreviousPatient" taborder="10" class="icon_left" position="absolute 1122 61 1164 72" anchor="top right"/>
  637. <Button id="btn_NextPatient" taborder="11" class="icon_right" position="absolute 1166 61 1208 72" anchor="top right"/>
  638. <Static id="cap_prcp" text="처방&#13;&#10; model.setFocus(&quot;cap_prcp&quot;);&#13;&#10; fSetOrderControlSize(); &#13;&#10; &#13;&#10; model.setFocus(&quot;cap_prcp&quot;);&#13;&#10; " class="tit_2" position="absolute 0 75 58 94" anchor="default" onclick="grp_calc_cap_prcp_onclick"/>
  639. <Button id="button16" taborder="27" text="정산의뢰" class="btn2" position="absolute 1122 41 1208 60" anchor="top right" onclick="grp_calc_button16_onclick"/>
  640. <Button id="btn_drginfo" taborder="32" text="DRG정보조회" class="btn5" visible="false" position="absolute 1122 1 1208 20" anchor="top right" onclick="grp_calc_btn_drginfo_onclick"/>
  641. <Button id="button18" taborder="33" text="의료질평가서" class="btn2" position="absolute 1122 21 1208 40" anchor="top right" onclick="grp_calc_button18_onclick"/>
  642. <Button id="btn_dclrtclose" taborder="37" text="예고심사" class="btn2" position="absolute 1122 133 1208 152" anchor="top right" onclick="grp_calc_btn_dclrtclose_onclick"/>
  643. <Button id="btn_midcancel" taborder="38" text="중간마감취소" class="btn5" position="absolute 1122 233 1208 252" anchor="top right" onclick="grp_calc_btn_midcancel_onclick"/>
  644. <Button id="btn_sugicalc" taborder="39" text="수기료계산" class="btn2" position="absolute 1122 93 1208 112" anchor="top right" style="align:left middle;" onclick="grp_calc_btn_sugicalc_onclick"/>
  645. <Button id="button7" taborder="41" text="병용금기확인" class="btn5" position="absolute 1122 441 1208 460" anchor="right bottom"/>
  646. <Static id="cap_probpatient" text="문제환자체크" class="cell_1" position="absolute 1122 404 1210 422" anchor="right bottom"/>
  647. <CheckBox id="chk_probpatientgreen" taborder="42" class="checkbox_search" position="absolute 1174 424 1205 438" anchor="right bottom" truevalue="G" style="background:green;" falsevalue="-"/>
  648. <CheckBox id="chk_probpatientred" taborder="43" class="checkbox_search" position="absolute 1126 424 1155 438" anchor="right bottom" truevalue="R" style="background:red;" falsevalue="-"/>
  649. <Button id="btn_clear" taborder="45" text="종료" class="btn5" position="absolute 1122 213 1208 232" anchor="top right" onclick="grp_calc_btn_clear_onclick"/>
  650. <MaskEdit id="opt_paylimamt" taborder="46" readonly="true" mask="#,###" position="absolute 1122 481 1209 500" anchor="right bottom"/>
  651. <Static id="cap_paylimamt" text="자보한도액" position="absolute 1122 461 1188 480" anchor="right bottom" style="font:Dotum,8;" class="cell_1"/>
  652. <Button id="btn_midregistyn" taborder="47" text="청구일자해제" class="btn2" position="absolute 1122 273 1208 292" anchor="top right" onclick="grp_calc_btn_midregistyn_onclick" enable="false" visible="false"/>
  653. <Button id="btn_dschclosecancel" taborder="49" text="퇴원마감취소" class="btn2" position="absolute 1122 193 1208 212" anchor="top right" onclick="grp_calc_btn_dschclosecancel_onclick"/>
  654. <Button id="btn_totjudgclose" taborder="50" text="통합심사마감" class="btn2" position="absolute 1122 173 1208 192" anchor="top right" onclick="grp_calc_btn_totjudgclose_onclick"/>
  655. <Button id="btn_dschclose" taborder="51" text="퇴원마감" class="btn2" position="absolute 1122 153 1208 172" anchor="top right" onclick="grp_calc_btn_dschclose_onclick"/>
  656. <Button id="btn_recalc" taborder="52" text="재계산" class="btn2" position="absolute 1122 113 1208 132" anchor="top right" style="align:left middle;" onclick="grp_calc_btn_recalc_onclick"/>
  657. <Button id="btn_save" taborder="53" text="저장" class="btn5" position="absolute 1122 73 1208 92" anchor="top right" onclick="grp_calc_btn_save_onclick"/>
  658. <Button id="btn_autolimit" taborder="54" position="absolute 1189 461 1208 480" anchor="right bottom" onclick="grp_calc_btn_autolimit_onclick" style="background:@gradation URL('theme://images\icon_btn.png');"/>
  659. <Button id="btn_midregist" taborder="48" text="중간청구등록" class="btn2" position="absolute 1122 233 1208 252" anchor="top right" onclick="grp_calc_btn_midregist_onclick"/>
  660. <Div id="Div00" anchor="left bottom" taborder="64" text="Div00" visible="false" position="absolute 16 434 710 456">
  661. <Layouts>
  662. <Layout width="200" height="150">
  663. <Shape id="roundrect2" type="roundrectangle" onclick="grp_calc_roundrect2_onclick" class="roundrect_example" position="absolute 0 0 676 20" anchor="default"/>
  664. <Static id="caption10" text="범 례" class="cell_2" position="absolute 3 3 43 18" anchor="default"/>
  665. <Static id="caption11" class="color_1" position="absolute 48 3 63 18" style="background:#fcd2c1ff;" anchor="default"/>
  666. <Static id="caption12" text="문제" position="absolute 58 3 88 20" anchor="default"/>
  667. <Static id="caption13" class="color_2" position="absolute 88 3 103 18" anchor="default"/>
  668. <Static id="caption14" text="선별" position="absolute 98 3 128 20" anchor="default"/>
  669. <Static id="caption15" class="color_4" position="absolute 128 3 143 18" anchor="default"/>
  670. <Static id="caption16" text="문제+선별" position="absolute 138 3 198 20" anchor="default"/>
  671. <Static id="caption36" class="color_2" position="absolute 199 3 214 18" anchor="default"/>
  672. <Static id="caption37" text="야간공휴" position="absolute 208 3 258 20" anchor="default"/>
  673. <Static id="caption39" class="color_6" position="absolute 263 3 278 18" anchor="default"/>
  674. <Static id="caption40" text="외래필수" position="absolute 273 3 323 20" anchor="default"/>
  675. <Static id="caption44" class="color_7" position="absolute 329 3 344 18" anchor="default"/>
  676. <Static id="caption43" text="DRG수술" position="absolute 339 3 390 20" anchor="default"/>
  677. <Static id="caption46" position="absolute 439 3 454 18" style="background:#ff99ccff;" anchor="default"/>
  678. <Static id="caption45" text="비급여" position="absolute 449 3 494 20" anchor="default"/>
  679. <Static id="caption48" position="absolute 396 3 411 18" style="background:#00ff00ff;" anchor="default"/>
  680. <Static id="caption47" text="급여" position="absolute 406 3 441 20" anchor="default"/>
  681. <Static id="caption50" position="absolute 494 3 509 18" style="background:#ccccffff;" anchor="default"/>
  682. <Static id="caption49" text="비급여 + 급비변경불가포함" position="absolute 504 3 652 20" anchor="default"/>
  683. </Layout>
  684. </Layouts>
  685. </Div>
  686. <Div id="roundrect3" type="roundrectangle" position="absolute 0 0 1121 71" anchor="left top right" class="div_SA"/>
  687. <Static id="caption78" text="기간 :" class="search_name" position="absolute 10 5 56 24" anchor="left top"/>
  688. <Static id="caption107" text="수가코드 :" class="search_name" position="absolute 269 5 342 24" anchor="left top"/>
  689. <Static id="caption113" text="EDI코드 :" class="search_name" position="absolute 269 28 354 47" anchor="left top" onclick="grp_calc_caption113_onclick"/>
  690. <Static id="caption114" text="심사일자 :" class="search_name" position="absolute 9 27 143 46" anchor="left top" onclick="grp_calc_caption114_onclick"/>
  691. <Static id="caption119" text="항목구분" class="search_name" position="absolute 811 3 900 20" anchor="top right" onclick="grp_calc_caption119_onclick"/>
  692. <Static id="caption97" text="급여구분" class="search_name" position="absolute 488 2 574 21" anchor="top right"/>
  693. <Static id="caption88" text="시행구분" class="search_name" position="absolute 745 2 820 21" anchor="top right" onclick="grp_calc_caption88_onclick"/>
  694. <Radio id="rdo_actmatflag" taborder="1" columncount="1" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 437 18 483 68" anchor="top right" style="font:Dotum,9;background:transparent;border:1 solid #808080ff ;bordertype:round 5 5 ;" onitemchanged="grp_calc_rdo_actmatflag_onitemchanged">
  695. <Dataset id="innerdataset">
  696. <ColumnInfo>
  697. <Column id="codecolumn"/>
  698. <Column id="datacolumn"/>
  699. </ColumnInfo>
  700. <Rows>
  701. <Row>
  702. <Col id="codecolumn">-</Col>
  703. <Col id="datacolumn">전체</Col>
  704. </Row>
  705. <Row>
  706. <Col id="codecolumn">2</Col>
  707. <Col id="datacolumn">행위</Col>
  708. </Row>
  709. <Row>
  710. <Col id="codecolumn">1</Col>
  711. <Col id="datacolumn">재료</Col>
  712. </Row>
  713. </Rows>
  714. </Dataset>
  715. </Radio>
  716. <Static id="caption90" text="CP" class="search_name" position="absolute 1047 0 1110 19" anchor="top right" visible="false"/>
  717. <Radio id="rdo_insuflag" taborder="2" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 488 18 629 68" anchor="top right" style="font:Dotum,9;background:transparent;border:1 solid #808080ff ;bordertype:round 5 5 ;" direction="horizontal" onitemchanged="grp_calc_rdo_insuflag_onitemchanged">
  718. <Dataset id="innerdataset">
  719. <ColumnInfo>
  720. <Column id="codecolumn" size="256"/>
  721. <Column id="datacolumn" size="256"/>
  722. </ColumnInfo>
  723. <Rows>
  724. <Row>
  725. <Col id="codecolumn">-</Col>
  726. <Col id="datacolumn">전체</Col>
  727. </Row>
  728. <Row>
  729. <Col id="codecolumn">1</Col>
  730. <Col id="datacolumn">전액본인</Col>
  731. </Row>
  732. <Row>
  733. <Col id="codecolumn">0</Col>
  734. <Col id="datacolumn">급여</Col>
  735. </Row>
  736. <Row>
  737. <Col id="codecolumn">2</Col>
  738. <Col id="datacolumn">비급여</Col>
  739. </Row>
  740. </Rows>
  741. </Dataset>
  742. </Radio>
  743. <Radio id="rdo_ordfilflag" taborder="3" columncount="5" rowcount="0" codecolumn="cdid" datacolumn="cdnm" class="radio_search" position="absolute 811 18 1118 68" anchor="top right" style="font:BIND(font);background:transparent;border:1 solid #808080ff ;bordertype:round 5 5 ;" direction="horizontal" onitemchanged="grp_calc_rdo_ordfilflag_onitemchanged" innerdataset="@ds_rdo_ordfilflag"/>
  744. <Radio id="rdo_cpflag" taborder="4" columncount="1" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 1047 18 1118 68" anchor="top right" style="font:Dotum,9;background:transparent;border:1 solid #808080ff ;bordertype:round 5 5 ;" onitemchanged="grp_calc_rdo_cpflag_onitemchanged" visible="false">
  745. <Dataset id="innerdataset">
  746. <ColumnInfo>
  747. <Column id="codecolumn"/>
  748. <Column id="datacolumn"/>
  749. </ColumnInfo>
  750. <Rows>
  751. <Row>
  752. <Col id="codecolumn">-</Col>
  753. <Col id="datacolumn">전체</Col>
  754. </Row>
  755. <Row>
  756. <Col id="codecolumn">Y</Col>
  757. <Col id="datacolumn">CP</Col>
  758. </Row>
  759. <Row>
  760. <Col id="codecolumn">N</Col>
  761. <Col id="datacolumn">Non-CP</Col>
  762. </Row>
  763. </Rows>
  764. </Dataset>
  765. </Radio>
  766. <Radio id="rdo_actingflag" taborder="5" columncount="1" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 745 18 804 68" anchor="top right" style="font:Dotum,9;background:transparent;border:1 solid #808080ff ;bordertype:round 5 5 ;" onitemchanged="grp_calc_rdo_actingflag_onitemchanged">
  767. <Dataset id="innerdataset">
  768. <ColumnInfo>
  769. <Column id="codecolumn"/>
  770. <Column id="datacolumn"/>
  771. </ColumnInfo>
  772. <Rows>
  773. <Row>
  774. <Col id="codecolumn">all</Col>
  775. <Col id="datacolumn">전체</Col>
  776. </Row>
  777. <Row>
  778. <Col id="codecolumn">act</Col>
  779. <Col id="datacolumn">시행</Col>
  780. </Row>
  781. <Row>
  782. <Col id="codecolumn">noact</Col>
  783. <Col id="datacolumn">미시행</Col>
  784. </Row>
  785. </Rows>
  786. </Dataset>
  787. </Radio>
  788. <Calendar id="ipt_srchfromdate" taborder="6" class="input_default" position="absolute 59 5 144 24" anchor="left top" autoselect="true"/>
  789. <Calendar id="ipt_srchtodate" taborder="7" class="input_default" position="absolute 145 5 230 24" anchor="left top" autoselect="true"/>
  790. <Button id="button2" taborder="8" position="absolute 247 5 266 24" anchor="left top" style="background:@gradation URL('theme://images\icon_btn.png');" onclick="grp_calc_button2_onclick"/>
  791. <Button id="button3" taborder="9" class="icon_search" position="absolute 231 5 247 24" anchor="left top" onclick="grp_calc_button3_onclick"/>
  792. <Edit id="ipt_calcscorcd" taborder="10" class="input_default" position="absolute 345 5 445 24" anchor="left top" onkeyup="grp_calc_ipt_calcscorcd_onkeyup" inputmode="upper" inputtype="numberandenglish" autoselect="true" imemode="alpha" useime="none"/>
  793. <Edit id="ipt_edicd" taborder="11" class="input_default" position="absolute 345 28 445 47" anchor="left top" onkeyup="grp_calc_ipt_edicd_onkeyup" autoselect="true" inputtype="numberandenglish" inputmode="upper" imemode="alpha" useime="none"/>
  794. <MaskEdit id="ipt_judgdate" taborder="12" readonly="true" mask="####-##-## ##:##:##" class="output_default" position="absolute 139 27 264 46" anchor="left top" type="string"/>
  795. <Static id="caption41" text="0원 수가 제외" class="search_name" position="absolute 636 2 754 21" anchor="top right"/>
  796. <Radio id="rdo_zerofilter" taborder="13" columncount="1" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 636 18 738 68" anchor="top right" style="font:Dotum,9;background:transparent;border:1 solid #808080ff ;bordertype:round 5 5 ;" onitemchanged="grp_calc_rdo_zerofilter_onitemchanged">
  797. <Dataset id="innerdataset">
  798. <ColumnInfo>
  799. <Column id="codecolumn"/>
  800. <Column id="datacolumn"/>
  801. </ColumnInfo>
  802. <Rows>
  803. <Row>
  804. <Col id="codecolumn">-</Col>
  805. <Col id="datacolumn">전체</Col>
  806. </Row>
  807. <Row>
  808. <Col id="codecolumn">0</Col>
  809. <Col id="datacolumn">0원 수가 제외</Col>
  810. </Row>
  811. <Row>
  812. <Col id="codecolumn">1</Col>
  813. <Col id="datacolumn">0원 수가만</Col>
  814. </Row>
  815. </Rows>
  816. </Dataset>
  817. </Radio>
  818. <CheckBox id="chk_showsubtotal" taborder="14" position="absolute 269 49 337 68" anchor="left top" text="소계보기" onchanged="grp_calc_chk_showsubtotal_onchanged" truevalue="Y" falsevalue="N" onclick="grp_calc_chk_showsubtotal_onclick"/>
  819. <Static id="caption00" text="구분" class="search_name" position="absolute 437 2 482 21" anchor="top right"/>
  820. <CheckBox id="chk_showitemcoloryn" taborder="57" text="항목별구분" position="absolute 350 49 440 68" anchor="left top" truevalue="Y" falsevalue="N" onchanged="grp_calc_chk_showitemcoloryn_onchanged" onclick="grp_calc_chk_showitemcoloryn_onclick"/>
  821. <Static id="caption01" text="예고심사일자 :" onclick="grp_calc_caption01_onclick" class="search_name" position="absolute 10 48 136 67" anchor="left top"/>
  822. <MaskEdit id="ipt_judgdate00" taborder="59" readonly="true" type="string" mask="####-##-## ##:##:##" class="output_default" position="absolute 139 47 264 66" anchor="left top"/>
  823. <Shape id="roundrect4" type="roundrectangle" position="absolute 48 73 295 92" anchor="left top"/>
  824. <Button id="btn_iscldetl" taborder="6" text="상세내역" class="btn2" position="absolute 1057 73 1121 92" anchor="top right" onclick="grp_calc_btn_iscldetl_onclick"/>
  825. <Button id="btn_judgtrgtsrch" taborder="9" text="대상자조회" class="btn2" position="absolute 980 73 1056 92" anchor="top right" onclick="grp_calc_btn_judgtrgtsrch_onclick"/>
  826. <Edit id="opt_specordtype" taborder="60" readonly="true" position="absolute 296 73 326 92" style="background:transparent URL('theme://images/bg_edit_N.png') stretch 5,5;border:1 solid #ff0000ff ;color:#ff0000ff;align:center middle;font:Dotum,13,bold;" anchor="left top" tooltiptext="KTAS 등급" tooltiptype="hover"/>
  827. <Static id="caption02" text="응급실재원기간:" class="search_name" position="absolute 330 73 445 92" anchor="top right"/>
  828. <MaskEdit id="ipt_judgdate01" taborder="61" readonly="true" type="string" mask="####-##-## ##:##:##" class="output_default" position="absolute 437 73 552 92" anchor="top right"/>
  829. <MaskEdit id="ipt_judgdate02" taborder="62" readonly="true" type="string" mask="####-##-## ##:##:##" class="output_default" position="absolute 554 73 669 92" anchor="top right"/>
  830. <Static id="caption03" text="중간청구시작일자 :" onclick="grp_calc_caption01_onclick" class="search_name" position="absolute 737 73 863 92" anchor="top right"/>
  831. <MaskEdit id="ipt_judgdate03" taborder="63" readonly="true" type="string" mask="####-##-##" class="output_default" position="absolute 860 73 930 92" anchor="top right"/>
  832. <Button id="btn_kdrg" taborder="65" text="KDRG" class="btn2" position="absolute 931 73 979 92" anchor="top right" onclick="grp_calc_btn_kdrg_onclick"/>
  833. <Shape id="line1" class="line_10" position="absolute 0 93 1120 96" anchor="left top right"/>
  834. <Button id="btn_spcldrug" taborder="28" text="주사무균조제" class="btn2" position="absolute 1122 313 1208 332" anchor="top right" onclick="grp_calc_btn_spcldrug_onclick"/>
  835. <Button id="button17" taborder="31" text="기왕증변경" class="btn2" position="absolute 1122 293 1208 312" anchor="top right" onclick="grp_calc_button17_onclick"/>
  836. <Button id="btn_dump" taborder="40" text="Dump" class="btn5" position="absolute 1122 273 1208 292" anchor="top right" style="font:Dotum,9;" onclick="grp_calc_btn_dump_onclick"/>
  837. <Button id="btn_insukindchg" taborder="66" class="btn2" position="absolute 1122 333 1208 363" anchor="top right" text="청구key해제&#13;&#10;유형변경test" onclick="grp_calc_btn_insukindchg_onclick" visible="false"/>
  838. <Button id="btn_prcpchg" taborder="67" text="청구key해제&#13;&#10;처방변경test" class="btn2" position="absolute 1122 364 1208 394" anchor="top right" onclick="grp_calc_btn_prcpchg_onclick" enable="false" visible="false"/>
  839. <Button id="btn_icdrinfo" taborder="68" text="전과전실" class="btn2" position="absolute 672 73 735 92" anchor="top right" onclick="grp_calc_btn_icdrinfo_onclick"/>
  840. </Layout>
  841. </Layouts>
  842. </Div>
  843. <Static id="cap_rare" text="희귀" visible="false" position="absolute 107 52 147 71" anchor="default" style="color:tomato;font:Dotum,9,bold;"/>
  844. <Static id="cap_tb" text="결핵" visible="false" position="absolute 107 52 147 71" anchor="default" style="color:tomato;font:Dotum,9,bold;"/>
  845. <Static id="cap_g1" text="긴급" visible="false" position="absolute 107 52 147 71" anchor="default" style="color:tomato;font:Dotum,9,bold;"/>
  846. <Static id="cap_c1c" text="C" visible="false" position="absolute 107 52 147 71" anchor="default" style="color:tomato;font:Dotum,9,bold;"/>
  847. <Static id="cap_c2e" text="E" visible="false" position="absolute 107 52 147 71" anchor="default" style="color:tomato;font:Dotum,9,bold;"/>
  848. <Static id="cap_c2f" text="F" visible="false" position="absolute 107 52 147 71" anchor="default" style="color:tomato;font:Dotum,9,bold;"/>
  849. <Button id="btn_patspcfyn" taborder="72" position="absolute 76 30 94 49" anchor="left top" style="background:@gradation URL('theme://images\icon_btn.png');" onclick="btn_patspcfyn_onclick"/>
  850. <ImageViewer id="img_msg" taborder="74" image="URL('theme://images/com/commonxp/icon_input.png')" visible="false" position="absolute 1191 8 1210 27" anchor="top right" onclick="img_msg_onclick"/>
  851. <Grid id="grd_insuhistory" class="datagrid2" taborder="75" binddataset="ds_grd_insuhistory" useinputpanel="false" position="absolute 976 52 1211 111" anchor="left top right" oncelldblclick="grd_insuhistory_oncelldblclick" cellsizingtype="col" autofittype="col">
  852. <Formats>
  853. <Format id="default">
  854. <Columns>
  855. <Column size="20"/>
  856. <Column size="20"/>
  857. <Column size="20"/>
  858. <Column size="20"/>
  859. <Column size="60"/>
  860. <Column size="60"/>
  861. <Column size="20"/>
  862. <Column size="20"/>
  863. <Column size="0"/>
  864. <Column size="0"/>
  865. <Column size="0"/>
  866. <Column size="0"/>
  867. <Column size="0"/>
  868. <Column size="0"/>
  869. <Column size="0"/>
  870. <Column size="0"/>
  871. <Column size="0"/>
  872. <Column size="20"/>
  873. </Columns>
  874. <Rows>
  875. <Row size="16" band="head"/>
  876. <Row size="18"/>
  877. </Rows>
  878. <Band id="head">
  879. <Cell text="유형"/>
  880. <Cell col="1" text="보조"/>
  881. <Cell col="2" text="M"/>
  882. <Cell col="3" text="희귀"/>
  883. <Cell col="4" text="개시일"/>
  884. <Cell col="5" text="종료일"/>
  885. <Cell col="6" text="일수"/>
  886. <Cell col="7" text="cretno"/>
  887. <Cell col="8" text="seqno"/>
  888. <Cell col="9" text="pid"/>
  889. <Cell col="10" text="indd"/>
  890. <Cell col="11" text="퇴원통보일자"/>
  891. <Cell col="12" text="flag"/>
  892. <Cell col="13" text="할인코드"/>
  893. <Cell col="14" text="maxynm"/>
  894. <Cell col="15" text="maxyns"/>
  895. <Cell col="16" text="ownbmaxgradeflag"/>
  896. <Cell col="17" text="희귀난치"/>
  897. </Band>
  898. <Band id="body">
  899. <Cell text="bind:insukind"/>
  900. <Cell col="1" text="bind:suppkind" expandsize="13"/>
  901. <Cell col="2" text="bind:mskind"/>
  902. <Cell col="3" text="bind:rare"/>
  903. <Cell col="4" displaytype="date" edittype="none" text="bind:fromdd" mask="yy/M/d"/>
  904. <Cell col="5" displaytype="date" edittype="none" text="bind:dschnotidt" mask="yy/M/d"/>
  905. <Cell col="6" text="bind:indaycnt"/>
  906. <Cell col="7" text="bind:cretno"/>
  907. <Cell col="8" text="bind:seqno"/>
  908. <Cell col="9" text="bind:pid"/>
  909. <Cell col="10" text="bind:indd"/>
  910. <Cell col="11" text="bind:todd"/>
  911. <Cell col="12" text="bind:flag"/>
  912. <Cell col="13" text="bind:disccd"/>
  913. <Cell col="14" text="bind:maxynm"/>
  914. <Cell col="15" text="bind:maxyns"/>
  915. <Cell col="16" text="bind:ownbmaxgradeflag"/>
  916. <Cell col="17" text="bind:rareobstflag"/>
  917. </Band>
  918. </Format>
  919. </Formats>
  920. </Grid>
  921. <Div id="group9" taborder="76" visible="false" position="absolute 1224 25 1445 502" anchor="default" style="background:white;border:1 solid #808080ff ;">
  922. <Layouts>
  923. <Layout width="453" height="375">
  924. <Static id="caption133" text="이력조회" class="tit_2" position="absolute 2 2 131 18" anchor="default"/>
  925. <Grid id="trv_histref" taborder="1" binddataset="ds_histref" useinputpanel="false" autofittype="col" treeusebutton="no" treeusecheckbox="false" treeinitstatus="expand,null" position="absolute 2 22 216 444" autofit="col" oncellclick="group9_trv_histref_oncellclick" anchor="default">
  926. <Formats>
  927. <Format id="default">
  928. <Columns>
  929. <Column size="165"/>
  930. <Column size="0"/>
  931. </Columns>
  932. <Rows>
  933. <Row size="24"/>
  934. </Rows>
  935. <Band id="body">
  936. <Cell displaytype="tree" edittype="tree" text="bind:label" treestartlevel="1" treelevel="bind:level"/>
  937. <Cell col="1" text="bind:value"/>
  938. </Band>
  939. </Format>
  940. </Formats>
  941. </Grid>
  942. <Button id="btn_menuclose" taborder="2" text="닫기" onclick="group9_btn_menuclose_onclick" class="btn4" position="absolute 160 448 216 470" anchor="default"/>
  943. </Layout>
  944. </Layouts>
  945. </Div>
  946. <Combo id="cmb_itemraremsg" taborder="77" innerdataset="ds_init_cmb_itemraremsg" codecolumn="rgstkindcd" datacolumn="msg" class="combo_default" position="absolute 95 29 506 48" anchor="left top right" style="background:aliceblue URL('theme://images/bg_edit_N.png') stretch 5,5;"/>
  947. <Static id="pm_flag" text="PM" visible="false" position="absolute 47 114 72 133" anchor="default"/>
  948. <Static id="caption98" text="인적사항" class="tit_2" position="absolute 0 32 79 48" anchor="default"/>
  949. <!--
  950. </Layout>
  951. </Layouts>
  952. </Div>
  953. -->
  954. <!--
  955. <Div id="group1" taborder="2" position="absolute 0 0 1194 13">
  956. <Layouts>
  957. <Layout>
  958. -->
  959. <Static id="caption6" text="재원심사" class="tit_1" position="absolute 0 0 95 26" anchor="default"/>
  960. <!--
  961. </Layout>
  962. </Layouts>
  963. </Div>
  964. -->
  965. <Static id="caption32" onclick="grp_calc_caption32_onclick" position="absolute 624 300 918 319"/>
  966. <Static id="cap_cp" text="CP" visible="false" position="absolute 1181 284 1205 300" anchor="top right"/>
  967. <Div id="grp_spcldrug" taborder="88" style="background:#ffffffff;border:2 solid #808080ff ;" visible="false" position="absolute 258 831 718 1171">
  968. <Layouts>
  969. <Layout width="460" height="340">
  970. <Static id="caption22" text="* 항암제 : IJ0041, 소아,조제TPN : IJ0042, 일반주사 : IJ0043" class="tit_2" position="absolute 2 4 424 20" anchor="default"/>
  971. <Shape id="line16" class="line_1" position="absolute 4 20 454 20" anchor="default"/>
  972. <Grid id="datagrid1" taborder="4" binddataset="ds_grd_datagrid1" useinputpanel="false" position="absolute 4 25 454 306" anchor="default" cellsizingtype="col">
  973. <Formats>
  974. <Format id="default">
  975. <Columns>
  976. <Column size="100"/>
  977. <Column size="84"/>
  978. <Column size="86"/>
  979. <Column size="86"/>
  980. <Column size="54"/>
  981. </Columns>
  982. <Rows>
  983. <Row size="24" band="head"/>
  984. <Row size="24"/>
  985. </Rows>
  986. <Band id="head">
  987. <Cell text="무균조제료구분"/>
  988. <Cell col="1" text="처방일자"/>
  989. <Cell col="2" text="실시일자"/>
  990. <Cell col="3" text="수가코드"/>
  991. <Cell col="4" text="약품구분"/>
  992. </Band>
  993. <Band id="body">
  994. <Cell enable="false" text="bind:spcldrug" edittype="combo" displaytype="combo"/>
  995. <Cell col="1" text="bind:prcpdd" mask="@@@@-@@-@@"/>
  996. <Cell col="2" text="bind:execdd" mask="@@@@-@@-@@"/>
  997. <Cell col="3" text="bind:snglcalcscorcd"/>
  998. <Cell col="4" text="bind:spcldrug"/>
  999. </Band>
  1000. </Format>
  1001. </Formats>
  1002. </Grid>
  1003. <Button id="button25" taborder="5" text="닫기" class="btn4" position="absolute 398 311 454 331" anchor="default" onclick="grp_spcldrug_button25_onclick"/>
  1004. </Layout>
  1005. </Layouts>
  1006. </Div>
  1007. <Div id="grp_msg" taborder="89" style="background:#ffffffff;border:2 solid #808080ff ;" visible="false" position="absolute 730 831 1190 1171">
  1008. <Layouts>
  1009. <Layout width="460" height="340">
  1010. <Static id="caption22" text="알림 메시지" class="tit_2" position="absolute 2 4 424 20" anchor="default" onclick="grp_msg_caption22_onclick"/>
  1011. <Grid id="grd_msg" taborder="6" binddataset="ds_grd_msg" useinputpanel="false" position="absolute 4 25 454 306" anchor="default" selecttype="multirow" cellsizingtype="row" autoenter="key" autofittype="col" autosizingtype="row" extendsizetype="row">
  1012. <Formats>
  1013. <Format id="default">
  1014. <Columns>
  1015. <Column size="27"/>
  1016. <Column size="401"/>
  1017. </Columns>
  1018. <Rows>
  1019. <Row size="24" band="head"/>
  1020. <Row size="24"/>
  1021. </Rows>
  1022. <Band id="head">
  1023. <Cell/>
  1024. <Cell col="1" text="메시지 내용"/>
  1025. </Band>
  1026. <Band id="body">
  1027. <Cell celltype="head" text="expr:currow + 1"/>
  1028. <Cell col="1" displaytype="text" edittype="textarea" style="font:arial,9,bold;" text="bind:msg" wordwrap="word" autosizerow="limitmin" enable="false"/>
  1029. </Band>
  1030. </Format>
  1031. </Formats>
  1032. </Grid>
  1033. <Button id="button25" taborder="7" text="닫기" class="btn4" position="absolute 398 311 454 331" anchor="default" onclick="grp_msg_button25_onclick"/>
  1034. </Layout>
  1035. </Layouts>
  1036. </Div>
  1037. <Div position="absolute 1219 840 1525 1155" id="grp_born" visible="false" style="background:#ffffffff;border:2 solid #808080ff ;">
  1038. <Layouts>
  1039. <Layout>
  1040. <Static text="알림" position="absolute 2 3 203 19" id="caption17" class="tit_2" anchor="default"/>
  1041. <Button position="absolute 216 284 296 306" id="btn_no" class="btn4" text="지금확인" anchor="default" onclick="grp_born_btn_no_onclick"/>
  1042. <Button position="absolute 122 284 214 306" id="btn_yes" class="btn4" text="이미기재함" anchor="default" onclick="grp_born_btn_yes_onclick"/>
  1043. <Static text="분만과정 중 다음에 해당되는 위험요인이 있는 경우 &#13;&#10;관련 상병을 기재하시거나 상병 기재가 어려운 경우 &#13;&#10;[심사자메모]에 기입하여 주시기 바랍니다.&#13;&#10;&#13;&#10;1.다태임신(O84)&#13;&#10;2.당뇨(O24)&#13;&#10;3.태아위치이상(O64)&#13;&#10;4.고혈압성장애(O10~O16)&#13;&#10;5.분만전(O46)/중(O67)출혈&#13;&#10;6.고령산모&#13;&#10;7.여성생식기관 암&#13;&#10;8.자궁수술기왕력(O342)&#13;&#10;9.전치태반(O44)&#13;&#10;10.태반조기박리(O45)&#13;&#10;11.거대아&#13;&#10;12.성병 (O981~O983)&#13;&#10;13.제대탈출 및 전치맥관(O69)&#13;&#10;14.조산&#13;&#10;15.태아기형 및 성장이상&#13;&#10;16.해부학적요인에 의한 난산(O64~66)" position="absolute 4 22 297 282" id="caption18" anchor="default" style="border:1 solid #808080ff ;"/>
  1044. </Layout>
  1045. </Layouts>
  1046. </Div>
  1047. <Button id="button27" taborder="91" class="icon_search" position="absolute 88 52 104 71"/>
  1048. <PopupMenu id="diagpMenu" innerdataset="ds_diag_menu" idcolumn="idx" captioncolumn="Caption" levelcolumn="lev" enablecolumn="enable" hotkeycolumn="hotkey" userdatacolumn="UserData" onmenuclick="diagpMenu_onmenuclick" position="absolute 1464 29 1568 180"/>
  1049. <PopupMenu id="clcjlistpMenu" innerdataset="ds_clcjlist_menu" idcolumn="idx" captioncolumn="Caption" levelcolumn="lev" enablecolumn="enable" hotkeycolumn="hotkey" userdatacolumn="UserData" onmenuclick="diagpMenu_onmenuclick" position="absolute 1464 198 1591 246"/>
  1050. <Div id="grp_dnor" taborder="92" style="background:#ffffffff;border:2 solid #808080ff ;color:#444444ff;" visible="false" position="absolute 1237 619 1693 819">
  1051. <Layouts>
  1052. <Layout width="491" height="208">
  1053. <Static id="caption19" text="공여/수혜자 리스트" class="tit_2" position="absolute 2 4 198 20" anchor="default"/>
  1054. <Grid id="grd_dnor" taborder="4" binddataset="ds_init_patdnorinfo" useinputpanel="false" onkeydown="grd_dnor_onkeydown" position="absolute 1 25 451 194" ondbclick="grd_dnor_ondbclick" anchor="default" oncelldblclick="grp_dnor_grd_dnor_oncelldblclick" cellsizingtype="col">
  1055. <Formats>
  1056. <Format id="default">
  1057. <Columns>
  1058. <Column size="48"/>
  1059. <Column size="72"/>
  1060. <Column size="66"/>
  1061. <Column size="100"/>
  1062. <Column size="0"/>
  1063. <Column size="0"/>
  1064. <Column size="32"/>
  1065. <Column size="100"/>
  1066. <Column size="100"/>
  1067. <Column size="100"/>
  1068. <Column size="100"/>
  1069. </Columns>
  1070. <Rows>
  1071. <Row size="24" band="head"/>
  1072. <Row size="24"/>
  1073. </Rows>
  1074. <Band id="head">
  1075. <Cell text="구분"/>
  1076. <Cell col="1" text="등록번호"/>
  1077. <Cell col="2" text="성명"/>
  1078. <Cell col="3" text="입원일자"/>
  1079. <Cell col="4" text="생성번호"/>
  1080. <Cell col="5" text="순번"/>
  1081. <Cell col="6" text="주부"/>
  1082. <Cell col="7" text="보험유형"/>
  1083. <Cell col="8" text="보조유형"/>
  1084. <Cell col="9" text="시작일자"/>
  1085. <Cell col="10" text="종료일자"/>
  1086. </Band>
  1087. <Band id="body">
  1088. <Cell text="bind:patdnorflag" edittype="combo" displaytype="combo"/>
  1089. <Cell col="1" text="bind:patdnorpid"/>
  1090. <Cell col="2" text="bind:patdnorhngnm"/>
  1091. <Cell col="3" text="bind:indd" edittype="date" displaytype="date"/>
  1092. <Cell col="4" text="bind:cretno"/>
  1093. <Cell col="5" text="bind:seqno"/>
  1094. <Cell col="6" text="bind:mskind"/>
  1095. <Cell col="7" text="bind:insukind" edittype="combo" displaytype="combo"/>
  1096. <Cell col="8" text="bind:suppkind" edittype="combo" displaytype="combo"/>
  1097. <Cell col="9" text="bind:fromdd" edittype="date" displaytype="date"/>
  1098. <Cell col="10" text="bind:todd" edittype="date" displaytype="date"/>
  1099. </Band>
  1100. </Format>
  1101. </Formats>
  1102. </Grid>
  1103. <Button id="Button00" taborder="5" onclick="Button00_onclick" class="btn_POP_cls" position="absolute 433 4 447 17" anchor="top right"/>
  1104. </Layout>
  1105. </Layouts>
  1106. </Div>
  1107. <PopupMenu id="pMenu" innerdataset="ds_menu" idcolumn="idx" captioncolumn="Caption" levelcolumn="lev" enablecolumn="enable" hotkeycolumn="hotkey" userdatacolumn="UserData" onmenuclick="pMenu_onmenuclick" position="absolute 1576 25 1896 341"/>
  1108. <Div id="grp_changeownbrate" taborder="93" style="background:#ffffffff;border:2 solid #808080ff ;" visible="false" position="absolute 384 450 644 542">
  1109. <Layouts>
  1110. <Layout>
  1111. <Static id="caption34" text="요율변경" class="tit_2" position="absolute 2 4 198 20" anchor="default"/>
  1112. <Shape id="line14" class="line_1" position="absolute 2 20 252 20" anchor="default"/>
  1113. <Button id="btn_cancel" taborder="7" text="취소" onclick="grp_changeownbrate_btn_cancel_onclick" onlbuttonup="btn_cancel_onlbuttonup" class="btn4" position="absolute 189 59 245 79" anchor="default"/>
  1114. <Button id="btn_accept" taborder="8" text="확인" onclick="grp_changeownbrate_btn_accept_onclick" onlbuttonup="btn_accept_onlbuttonup" class="btn4" position="absolute 129 59 185 79" anchor="default"/>
  1115. <Combo id="cmb_suppkindlist" taborder="9" class="combo_search" position="absolute 89 25 244 45" anchor="default" innerdataset="@ds_init_cmb_suppkindlist" datacolumn="suppratenm" codecolumn="suppkind"/>
  1116. <Static id="caption35" text="보조유형" class="search_name" position="absolute 4 25 88 42" anchor="default"/>
  1117. </Layout>
  1118. </Layouts>
  1119. </Div>
  1120. <Button id="btn_spcldown" taborder="102" position="absolute 772 114 796 136" class="icon_down" onclick="btn_spcldown_onclick" anchor="top right"/>
  1121. <Button id="btn_spclup" taborder="103" class="icon_up" position="absolute 747 114 771 136" onclick="btn_spclup_onclick" anchor="top right"/>
  1122. <Button id="btn_EnvSetup00" taborder="105" text="환경초기화" onclick="btn_EnvSetup00_onclick" class="btn4" position="absolute 1015 8 1103 27" anchor="top right"/>
  1123. <Shape id="line00" class="line_10" position="absolute 0 49 1211 52" anchor="left top right"/>
  1124. <Edit id="opt_batlockid" taborder="106" readonly="true" position="absolute 983 306 1035 325" anchor="top right" tooltiptype="hover" tooltiptext="ISS 점수" style="caretcolor:#6a543aff;background:transparent URL('theme://images/bg_edit_N.png') stretch 5,5;border:1 solid dodgerblue ;color:dodgerblue;align:center middle;font:arial,10,bold;"/>
  1125. <Static id="caption90" text="ISS:" class="search_name" visible="true" position="absolute 948 306 989 325" anchor="top right"/>
  1126. <Edit id="opt_etcordflag" taborder="107" readonly="true" position="absolute 904 306 942 325" anchor="top right" tooltiptype="hover" style="background:transparent URL('theme://images/bg_edit_N.png') stretch 5,5;border:1 solid #ff0000ff ;color:#ff0000ff;align:center middle;font:Dotum,9,bold;" value="외상" visible="false"/>
  1127. <Div id="grp_keycancel" taborder="108" style="background:#ffffffff;border:2 solid #808080ff ;" visible="false" position="absolute 258 1184 789 1364">
  1128. <Layouts>
  1129. <Layout width="460" height="340">
  1130. <Static id="caption24" text="청구key 해제 사유" onclick="grp_msg_caption22_onclick" class="tit_2" position="absolute 8 8 166 24" anchor="default"/>
  1131. <Button id="btn_closekeycancel" taborder="9" text="닫기" class="btn4" position="absolute 465 150 521 170" anchor="default" onclick="grp_keycancel_btn_closekeycancel_onclick"/>
  1132. <Shape id="line1" class="line_10" position="absolute 8 25 176 29" anchor="left top right"/>
  1133. <Radio id="rdo_keycancelrsn" taborder="10" columncount="0" rowcount="0" position="absolute 10 31 110 170" innerdataset="@ds_rdo_keycancelrsn" codecolumn="value" datacolumn="label" anchor="default"/>
  1134. <Edit id="ipt_keycancelrsnetc" taborder="11" position="absolute 58 147 178 167" anchor="default"/>
  1135. <Static id="caption25" text="청구key 해제 사후처리방법" onclick="grp_msg_caption22_onclick" class="tit_2" position="absolute 190 8 516 24" anchor="default"/>
  1136. <Shape id="line00" class="line_10" position="absolute 190 25 518 29" anchor="left top right"/>
  1137. <Radio id="rdo_keycanlaftmth" taborder="13" columncount="0" rowcount="0" innerdataset="@ds_rdo_keycanlaftmth" codecolumn="value" datacolumn="label" position="absolute 192 31 372 122" anchor="default"/>
  1138. <Edit id="ipt_keycancelrsnetc00" taborder="14" position="absolute 268 31 412 51" anchor="default"/>
  1139. <Edit id="ipt_keycancelrsnetc01" taborder="15" position="absolute 356 54 516 74" anchor="default"/>
  1140. <Edit id="ipt_keycancelrsnetc02" taborder="16" position="absolute 241 99 516 119" anchor="default"/>
  1141. <Button id="btn_savekeycancelprcp" taborder="17" text="저장" class="btn4" position="absolute 405 150 461 170" anchor="default" onclick="grp_keycancel_btn_savekeycancelprcp_onclick"/>
  1142. <Button id="btn_savekeycancelinpt" taborder="18" text="저장" class="btn4" position="absolute 405 150 461 170" onclick="grp_keycancel_btn_savekeycancelinpt_onclick"/>
  1143. </Layout>
  1144. </Layouts>
  1145. </Div>
  1146. </Layout>
  1147. </Layouts>
  1148. <Objects>
  1149. <Dataset id="ds_init_cmb_suppkind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1150. <ColumnInfo>
  1151. <Column id="suppratenm" type="STRING"/>
  1152. <Column id="suppkind" type="STRING"/>
  1153. </ColumnInfo>
  1154. </Dataset>
  1155. <Dataset id="ds_init_cmb_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1156. <ColumnInfo>
  1157. <Column id="depthngnm" type="STRING"/>
  1158. <Column id="deptcd" type="STRING"/>
  1159. </ColumnInfo>
  1160. </Dataset>
  1161. <Dataset id="ds_init_cmb_indd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1162. <ColumnInfo>
  1163. <Column id="indd" type="STRING"/>
  1164. <Column id="indd" type="STRING"/>
  1165. </ColumnInfo>
  1166. </Dataset>
  1167. <Dataset id="ds_grd_ordlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1168. <ColumnInfo>
  1169. <Column id="spcljudgyn" type="STRING"/>
  1170. <Column id="probordyn" type="STRING"/>
  1171. <Column id="anamneflag" type="STRING"/>
  1172. <Column id="seq" type="BIGDECIMAL"/>
  1173. <Column id="item1" type="STRING" prop="NONE"/>
  1174. <Column id="item2" type="STRING"/>
  1175. <Column id="snglcalcscorcls" type="STRING"/>
  1176. <Column id="grupflag" type="STRING"/>
  1177. <Column id="grupcalcscorcd" type="STRING"/>
  1178. <Column id="snglcalcscorcd" type="STRING"/>
  1179. <Column id="edicd" type="STRING"/>
  1180. <Column id="estmmeancd" type="STRING"/>
  1181. <Column id="estmcd" type="STRING"/>
  1182. <Column id="pay100" type="STRING"/>
  1183. <Column id="execdd" type="STRING"/>
  1184. <Column id="hngnm" type="STRING" sumtext="소계" prop="TEXT"/>
  1185. <Column id="calcpayflag" type="STRING"/>
  1186. <Column id="matractflag" type="STRING"/>
  1187. <Column id="execprcpstatcd" type="STRING"/>
  1188. <Column id="payownbrate" type="BIGDECIMAL" prop="TEXT"/>
  1189. <Column id="dschdrugflag" type="STRING"/>
  1190. <Column id="appunitcost" type="STRING" prop="NONE"/>
  1191. <Column id="calcqty" type="STRING" prop="NONE"/>
  1192. <Column id="calctims" type="STRING" prop="NONE"/>
  1193. <Column id="daydrugqty" type="STRING" prop="NONE"/>
  1194. <Column id="calcdays" type="STRING" prop="NONE"/>
  1195. <Column id="calcamt" type="BIGDECIMAL" prop="SUM"/>
  1196. <Column id="limitdiffamt" type="BIGDECIMAL"/>
  1197. <Column id="druglimitamt" type="BIGDECIMAL"/>
  1198. <Column id="specyn" type="STRING"/>
  1199. <Column id="cnfmcd" type="STRING"/>
  1200. <Column id="text" type="STRING"/>
  1201. <Column id="tootfact" type="STRING"/>
  1202. <Column id="unithospaddamt" type="BIGDECIMAL"/>
  1203. <Column id="unitspecamt" type="BIGDECIMAL"/>
  1204. <Column id="unitaddamt" type="BIGDECIMAL"/>
  1205. <Column id="totordamt" type="BIGDECIMAL"/>
  1206. <Column id="ownbamt" type="BIGDECIMAL"/>
  1207. <Column id="hospaddamt" type="BIGDECIMAL"/>
  1208. <Column id="specamt" type="BIGDECIMAL"/>
  1209. <Column id="addamt" type="BIGDECIMAL"/>
  1210. <Column id="ordnm" type="STRING"/>
  1211. <Column id="grupcalcscorcls" type="STRING"/>
  1212. <Column id="ordcalcflag" type="STRING"/>
  1213. <Column id="opflag" type="STRING"/>
  1214. <Column id="cpflag" type="STRING"/>
  1215. <Column id="snglearncls" type="STRING"/>
  1216. <Column id="estmcls" type="STRING"/>
  1217. <Column id="bfjudgyn" type="STRING"/>
  1218. <Column id="drgrcnopyn" type="STRING"/>
  1219. <Column id="drgopyn" type="STRING"/>
  1220. <Column id="drgacptflag" type="STRING"/>
  1221. <Column id="accnopyamt" type="BIGDECIMAL"/>
  1222. <Column id="pynpy" type="STRING"/>
  1223. <Column id="pordarcptyn" type="STRING" size="256"/>
  1224. <Column id="execddtm" type="STRING" size="256"/>
  1225. <Column id="updgb" type="STRING" size="256"/>
  1226. <Column id="insubamt" type="BIGDECIMAL" size="256"/>
  1227. <Column id="bgcolor" type="STRING" size="256"/>
  1228. <Column id="estmmeancd_bgcolor" type="STRING" size="256"/>
  1229. <Column id="bfjudgyn_bgcolor" type="STRING" size="256"/>
  1230. <Column id="calcpayflag_bgcolor" type="STRING" size="256"/>
  1231. <Column id="drgopyn_bgcolor" type="STRING" size="256"/>
  1232. <Column id="pordarcptyn_bgcolor" type="STRING" size="256"/>
  1233. <Column id="calcseqno" type="STRING" size="256"/>
  1234. <Column id="calcscorseqno" type="STRING" size="256"/>
  1235. <Column id="autmbinptflag" type="STRING" size="256"/>
  1236. <Column id="toot" type="STRING" size="256"/>
  1237. <Column id="appunitcost_bgcolor" type="STRING" size="256"/>
  1238. <Column id="etcflag5" type="STRING" size="256"/>
  1239. <Column id="earncls1" type="STRING" size="256"/>
  1240. <Column id="prcppayflag" type="STRING" size="256"/>
  1241. <Column id="tr4yn" type="STRING" size="256"/>
  1242. </ColumnInfo>
  1243. </Dataset>
  1244. <Dataset id="ds_init_cmb_suppkindlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1245. <ColumnInfo>
  1246. <Column id="suppratenm" type="STRING"/>
  1247. <Column id="suppkind" type="STRING"/>
  1248. </ColumnInfo>
  1249. </Dataset>
  1250. <Dataset id="ds_grd_clcjlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1251. <ColumnInfo>
  1252. <Column id="unitflag" type="STRING"/>
  1253. <Column id="calcscorcd" type="STRING"/>
  1254. <Column id="edicd" type="STRING"/>
  1255. <Column id="spclcd" type="STRING"/>
  1256. <Column id="spclspec" type="STRING"/>
  1257. <Column id="remfact" type="STRING"/>
  1258. <Column id="detldesc" type="STRING"/>
  1259. <Column id="status" type="STRING"/>
  1260. <Column id="pid" type="STRING"/>
  1261. <Column id="indd" type="STRING"/>
  1262. <Column id="cretno" type="STRING"/>
  1263. <Column id="fromdd" type="STRING"/>
  1264. <Column id="mskind" type="STRING"/>
  1265. <Column id="spclmemoflag" type="STRING"/>
  1266. <Column id="seqno" type="STRING"/>
  1267. <Column id="rowstat" type="STRING" size="256"/>
  1268. <Column id="spclcdnm" type="STRING" size="256"/>
  1269. <Column id="spclformat" type="STRING" size="256"/>
  1270. <Column id="oldspclcd" type="STRING" size="256"/>
  1271. </ColumnInfo>
  1272. </Dataset>
  1273. <Dataset id="ds_grd_diaglist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_diaglist_oncolumnchanged">
  1274. <ColumnInfo>
  1275. <Column id="seqno" type="INT"/>
  1276. <Column id="ruleoutyn" type="STRING"/>
  1277. <Column id="diagcd" type="STRING"/>
  1278. <Column id="diagnm" type="STRING"/>
  1279. <Column id="orddeptcd" type="STRING"/>
  1280. <Column id="ordfromdd" type="STRING"/>
  1281. <Column id="toot" type="STRING"/>
  1282. <Column id="toot1" type="STRING"/>
  1283. <Column id="orddeptnm" type="STRING"/>
  1284. <Column id="diagengnm" type="STRING"/>
  1285. <Column id="pid" type="STRING"/>
  1286. <Column id="indd" type="STRING"/>
  1287. <Column id="cretno" type="STRING"/>
  1288. <Column id="fromdd" type="STRING"/>
  1289. <Column id="mskind" type="STRING"/>
  1290. <Column id="drinptyn" type="STRING"/>
  1291. <Column id="addflag" type="STRING"/>
  1292. <Column id="chkflag" type="STRING"/>
  1293. <Column id="spoint" type="STRING"/>
  1294. <Column id="poaflag" type="STRING"/>
  1295. <Column id="vcode" type="STRING"/>
  1296. <Column id="rowstat" type="STRING" size="256"/>
  1297. <Column id="rowstatus" type="STRING" size="256"/>
  1298. <Column id="diagetcflag" type="STRING" size="256"/>
  1299. <Column id="diagkindcd" type="STRING" size="256"/>
  1300. </ColumnInfo>
  1301. </Dataset>
  1302. <Dataset id="ds_grd_insuhistory" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1303. <ColumnInfo>
  1304. <Column id="insukind" type="STRING"/>
  1305. <Column id="suppkind" type="STRING"/>
  1306. <Column id="mskind" type="STRING"/>
  1307. <Column id="rare" type="STRING"/>
  1308. <Column id="fromdd" type="STRING"/>
  1309. <Column id="dschnotidt" type="STRING"/>
  1310. <Column id="indaycnt" type="STRING"/>
  1311. <Column id="cretno" type="STRING"/>
  1312. <Column id="seqno" type="STRING"/>
  1313. <Column id="pid" type="STRING"/>
  1314. <Column id="indd" type="STRING"/>
  1315. <Column id="todd" type="STRING"/>
  1316. <Column id="flag" type="STRING"/>
  1317. <Column id="disccd" type="STRING"/>
  1318. <Column id="maxynm" type="STRING"/>
  1319. <Column id="maxyns" type="STRING"/>
  1320. <Column id="ownbmaxgradeflag" type="STRING"/>
  1321. <Column id="orgtodd" type="STRING" size="256" sumtext="종료일자"/>
  1322. </ColumnInfo>
  1323. </Dataset>
  1324. <Dataset id="ds_init_cmb_itemraremsg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1325. <ColumnInfo>
  1326. <Column id="nm" type="STRING"/>
  1327. <Column id="cd" type="STRING"/>
  1328. </ColumnInfo>
  1329. </Dataset>
  1330. <Dataset id="ds_grd_dnor" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1331. <ColumnInfo>
  1332. <Column id="patdnorflag" type="STRING"/>
  1333. <Column id="patdnorpid" type="STRING"/>
  1334. <Column id="patdnorhngnm" type="STRING"/>
  1335. <Column id="indd" type="STRING"/>
  1336. <Column id="cretno" type="STRING"/>
  1337. <Column id="seqno" type="STRING"/>
  1338. <Column id="mskind" type="STRING"/>
  1339. <Column id="insukind" type="STRING"/>
  1340. <Column id="suppkind" type="STRING"/>
  1341. <Column id="fromdd" type="STRING"/>
  1342. <Column id="todd" type="STRING"/>
  1343. </ColumnInfo>
  1344. </Dataset>
  1345. <Dataset id="ds_datagrid1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1346. <ColumnInfo>
  1347. <Column id="spcldrug" type="STRING"/>
  1348. <Column id="prcpdd" type="STRING"/>
  1349. <Column id="execdd" type="STRING"/>
  1350. <Column id="snglcalcscorcd" type="STRING"/>
  1351. <Column id="spcldrug" type="STRING"/>
  1352. </ColumnInfo>
  1353. </Dataset>
  1354. <Dataset id="ds_datagrid2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1355. <ColumnInfo>
  1356. <Column id="execdd" type="STRING"/>
  1357. <Column id="prcpcd" type="STRING"/>
  1358. <Column id="prcpnm" type="STRING"/>
  1359. <Column id="execdd2" type="STRING"/>
  1360. <Column id="prcpcd2" type="STRING"/>
  1361. <Column id="prcpnm2" type="STRING"/>
  1362. </ColumnInfo>
  1363. </Dataset>
  1364. <Dataset id="ds_send_listval_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1365. <ColumnInfo>
  1366. <Column id="scrnid" type="STRING" size="256"/>
  1367. </ColumnInfo>
  1368. <Rows>
  1369. <Row>
  1370. <Col id="scrnid">SMPIJ00300</Col>
  1371. </Row>
  1372. </Rows>
  1373. </Dataset>
  1374. <Dataset id="ds_hidden_listval_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1375. <ColumnInfo>
  1376. <Column id="scrnid" type="STRING" size="256" sumtext="화면(xrw)의 ID"/>
  1377. <Column id="compsnm" type="STRING" size="256" sumtext="Grid ID 정보"/>
  1378. <Column id="compscnts" type="STRING" size="256" sumtext="Grid의 칼럼명"/>
  1379. <Column id="compsrefcnts" type="STRING" size="256" sumtext="Grid의 reference명"/>
  1380. <Column id="compssizecnts" type="STRING" size="256" sumtext="Grid의 칼럼Size"/>
  1381. </ColumnInfo>
  1382. </Dataset>
  1383. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1384. <ColumnInfo>
  1385. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  1386. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1387. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  1388. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  1389. <Column id="suppkind" type="STRING" size="256" sumtext="유형보조"/>
  1390. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  1391. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  1392. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  1393. <Column id="cretno" type="INT" size="256" sumtext="cretno"/>
  1394. <Column id="basedd" type="STRING" size="256" sumtext="기준일자"/>
  1395. <Column id="trgt" type="STRING" size="256" sumtext="대상자호출여부"/>
  1396. <Column id="mig" type="STRING" size="256" sumtext="mig"/>
  1397. <Column id="userid" type="STRING" size="256" sumtext="userid"/>
  1398. <Column id="dschmodesrch" type="STRING" size="256" sumtext="userid"/>
  1399. <Column id="paramflag" type="STRING" size="256" sumtext="userid"/>
  1400. <Column id="ordfromdd" type="STRING" size="256" sumtext="userid"/>
  1401. <Column id="ordtodd" type="STRING" size="256" sumtext="userid"/>
  1402. <Column id="totalsumflag" type="STRING" size="256" sumtext="totalsumflag"/>
  1403. <Column id="unitflag" type="STRING" size="256"/>
  1404. <Column id="personflag" type="STRING" size="256"/>
  1405. <Column id="readonly" type="STRING" size="256"/>
  1406. <Column id="dschjudgprcsstat" type="STRING" size="256"/>
  1407. <Column id="brateflag" type="STRING" size="256"/>
  1408. <Column id="rrgstno" type="STRING" size="256"/>
  1409. <Column id="dschdd" type="STRING" size="256"/>
  1410. <Column id="age" type="STRING" size="256"/>
  1411. <Column id="seqno" type="STRING" size="256"/>
  1412. <Column id="calcbasedd" type="STRING" size="256"/>
  1413. <Column id="indd1" type="STRING" size="256"/>
  1414. <Column id="ownbmaxgradeflag" type="STRING" size="256"/>
  1415. <Column id="reptflag" type="STRING" size="256"/>
  1416. <Column id="maxhopedd" type="STRING" size="256"/>
  1417. </ColumnInfo>
  1418. <Rows>
  1419. <Row>
  1420. <Col id="pid"/>
  1421. <Col id="indd"/>
  1422. <Col id="mskind"/>
  1423. <Col id="insukind"/>
  1424. <Col id="suppkind"/>
  1425. <Col id="fromdd"/>
  1426. <Col id="todd"/>
  1427. <Col id="instcd">031</Col>
  1428. <Col id="cretno"/>
  1429. <Col id="basedd"/>
  1430. <Col id="ordfromdd"/>
  1431. <Col id="ordtodd"/>
  1432. <Col id="totalsumflag">Y</Col>
  1433. <Col id="userid"/>
  1434. <Col id="mig">N</Col>
  1435. <Col id="paramflag">N</Col>
  1436. <Col id="trgt">N</Col>
  1437. <Col id="dschmodesrch">1</Col>
  1438. </Row>
  1439. </Rows>
  1440. </Dataset>
  1441. <Dataset id="ds_init_iteminfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1442. <ColumnInfo>
  1443. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  1444. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  1445. <Column id="seqno" type="STRING" size="256" sumtext="순번"/>
  1446. <Column id="rrgstno" type="STRING" size="256" sumtext="주민번호"/>
  1447. <Column id="gender" type="STRING" size="256" sumtext="성별"/>
  1448. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  1449. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1450. <Column id="indd1" type="STRING" size="256" sumtext="입원일자"/>
  1451. <Column id="inpath" type="STRING" size="256" sumtext="입원경로"/>
  1452. <Column id="dschnotiyn" type="STRING" size="256" sumtext="퇴원통보여부"/>
  1453. <Column id="cmpyno" type="STRING" size="256" sumtext="조합기호"/>
  1454. <Column id="patnm" type="STRING" size="256" sumtext="환자이름"/>
  1455. <Column id="age" type="STRING" size="256" sumtext="나이"/>
  1456. <Column id="insukindcd" type="STRING" size="256" sumtext="보험유형코드"/>
  1457. <Column id="insukindnm" type="STRING" size="256" sumtext="보험유형코드명칭"/>
  1458. <Column id="medispclid" type="STRING" size="256" sumtext="전공의명"/>
  1459. <Column id="medispclnm" type="STRING" size="256" sumtext="전공의ID"/>
  1460. <Column id="atdoctnm" type="STRING" size="256" sumtext="주치의명"/>
  1461. <Column id="atdoctid" type="STRING" size="256" sumtext="주치의ID"/>
  1462. <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일자"/>
  1463. <Column id="arvpath" type="STRING" size="256" sumtext="도착경로"/>
  1464. <Column id="cmpynm" type="STRING" size="256" sumtext="조합명칭"/>
  1465. <Column id="wardcdnm" type="STRING" size="256" sumtext="병동이름"/>
  1466. <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
  1467. <Column id="roomcdnm" type="STRING" size="256" sumtext="병실이름"/>
  1468. <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
  1469. <Column id="suppkindcd" type="STRING" size="256" sumtext="유형보조코드"/>
  1470. <Column id="suppkindnm" type="STRING" size="256" sumtext="유형보조코드명칭"/>
  1471. <Column id="ownrate" type="STRING" size="256" sumtext="본인부담율"/>
  1472. <Column id="indaycnt" type="STRING" size="256" sumtext="재원일수"/>
  1473. <Column id="ordrslt" type="STRING" size="256" sumtext="진료결과"/>
  1474. <Column id="insuno" type="STRING" size="256" sumtext="증번호"/>
  1475. <Column id="judgrmk" type="STRING" size="256" sumtext="심사메모"/>
  1476. <Column id="edirmk" type="STRING" size="256" sumtext="EDI메모"/>
  1477. <Column id="tstrmk" type="STRING" size="256" sumtext="평가메모"/>
  1478. <Column id="totordamt" type="STRING" size="256" sumtext="총진료비"/>
  1479. <Column id="medcaretotamt" type="STRING" size="256" sumtext="급여총액"/>
  1480. <Column id="payownbamt" type="STRING" size="256" sumtext="급여본인부담금"/>
  1481. <Column id="payinsubamt" type="STRING" size="256" sumtext="보험자부담금"/>
  1482. <Column id="nopyamt" type="STRING" size="256" sumtext="비급여총액"/>
  1483. <Column id="specamt" type="STRING" size="256" sumtext="선택총액"/>
  1484. <Column id="dschjudgprcsstat" type="STRING" size="256" sumtext="퇴원심사진행상태"/>
  1485. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  1486. <Column id="fromdd" type="STRING" size="256" sumtext="유형시작일"/>
  1487. <Column id="probjudgflag" type="STRING" size="256" sumtext="문제심사여부"/>
  1488. <Column id="lastjudgdt" type="STRING" size="256" sumtext="중간청구등록여부"/>
  1489. <Column id="opflag" type="STRING" size="256" sumtext="수술여부"/>
  1490. <Column id="dschnotidt" type="STRING" size="256" sumtext="퇴원통보일자"/>
  1491. <Column id="dschnotiyn" type="STRING" size="256" sumtext="퇴원통보여부"/>
  1492. <Column id="specordyn" type="STRING" size="256" sumtext="선택진료여부"/>
  1493. <Column id="ordtypemsg" type="STRING" size="256" sumtext="응급낮병동CHEMO시간"/>
  1494. <Column id="medcaredayno" type="STRING" size="256" sumtext="요양일수"/>
  1495. <Column id="dschcalcdaysno" type="STRING" size="256" sumtext="퇴원약 투약일수"/>
  1496. <Column id="brthdd" type="STRING" size="256" sumtext="생년월일"/>
  1497. <Column id="receiptyn" type="STRING" size="256" sumtext="생년월일"/>
  1498. <Column id="lastjudgendid" type="STRING" size="256" sumtext="최종심사 완료자"/>
  1499. <Column id="lastjudgendnm" type="STRING" size="256" sumtext="최종심사 완료자명"/>
  1500. <Column id="ordtype" type="STRING" size="256" sumtext="처방구분"/>
  1501. <Column id="brateflag" type="STRING" size="256" sumtext="응급 입원외래구분"/>
  1502. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  1503. <Column id="dschdclrdt" type="STRING" size="256" sumtext="퇴원예고일"/>
  1504. <Column id="midregistyn" type="STRING" size="256" sumtext="분할예외여부"/>
  1505. <Column id="maxhopedd" type="STRING" size="256" sumtext="최종희망일시"/>
  1506. <Column id="dscharngmnmemo" type="STRING" size="256" sumtext="간호퇴원메모"/>
  1507. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  1508. <Column id="lastmdlclamdd" type="STRING" size="256" sumtext="최종청구일자"/>
  1509. <Column id="sixtimyn" type="STRING" size="256" sumtext="6시간미만여부"/>
  1510. <Column id="rareyn" type="STRING" size="256" sumtext="희귀난치여부"/>
  1511. <Column id="mig" type="STRING" size="256" sumtext="mig"/>
  1512. <Column id="selyn" type="STRING" size="256" sumtext="selyn"/>
  1513. <Column id="futureinsuyn" type="STRING" size="256" sumtext="미래유형여부"/>
  1514. <Column id="trgt" type="STRING" size="256" sumtext="대상자조회여부(N)"/>
  1515. <Column id="indschacptstat" type="STRING" size="256" sumtext="입퇴원접수상태"/>
  1516. <Column id="cpyn" type="STRING" size="256" sumtext="CP여부"/>
  1517. <Column id="msyn" type="STRING" size="256" sumtext="주부동시존재여부"/>
  1518. <Column id="spcdrugyn" type="STRING" size="256" sumtext="무균조제료이상여부"/>
  1519. <Column id="normalownbrate" type="STRING" size="256" sumtext="정상유형요율"/>
  1520. <Column id="cfe" type="STRING" size="256" sumtext="차상위"/>
  1521. <Column id="dethdt" type="STRING" size="256" sumtext="사망시간"/>
  1522. <Column id="maxexecdd" type="STRING" size="256" sumtext="최대실시일자"/>
  1523. <Column id="ownbmaxgradeflag" type="STRING" size="256" sumtext="상한제차등구분"/>
  1524. <Column id="calcscorrecalflag" type="STRING" size="256" sumtext="완화의료정액환자 구분"/>
  1525. <Column id="erorddeptcd" type="STRING" size="256" sumtext="응급주과"/>
  1526. <Column id="dumpexistyn" type="STRING" size="256" sumtext="dump 유무"/>
  1527. <Column id="noactyn" type="STRING" size="256" sumtext="미시행처방 유무"/>
  1528. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  1529. <Column id="recalcyn" type="STRING" size="256" sumtext="재계산여부"/>
  1530. <Column id="dschantichk" type="STRING" size="256" sumtext="수술 예방적 항생제대상자"/>
  1531. <Column id="reqdeptno" type="STRING" size="256" sumtext="부서상세코드"/>
  1532. <Column id="paygrntyn" type="STRING" size="256" sumtext="지급보증번호유무"/>
  1533. <Column id="dschdclrtyn" type="STRING" size="256" sumtext="퇴원예고여부"/>
  1534. <Column id="judgrmk_orign" type="STRING" size="256"/>
  1535. <Column id="edirmk_orign" type="STRING" size="256"/>
  1536. <Column id="tstrmk_orign" type="STRING" size="256"/>
  1537. <Column id="dumprmk" type="STRING" size="256"/>
  1538. <Column id="erindt" type="STRING" size="256"/>
  1539. <Column id="eroutdt" type="STRING" size="256"/>
  1540. <Column id="specordtype" type="STRING" size="256"/>
  1541. <Column id="patunitsrch1" type="STRING" size="256"/>
  1542. <Column id="orgordtype" type="STRING" size="256"/>
  1543. <Column id="realinpath" type="STRING" size="256"/>
  1544. <Column id="clamkey" type="STRING" size="256"/>
  1545. <Column id="ownbmaxgrade" type="STRING" size="256"/>
  1546. <Column id="ownlimmitamt" type="STRING" size="256"/>
  1547. <Column id="batlockid" type="STRING" size="256"/>
  1548. <Column id="etcordflag" type="STRING" size="256"/>
  1549. <Column id="ticuyn" type="STRING" size="256"/>
  1550. </ColumnInfo>
  1551. <Rows>
  1552. <Row/>
  1553. </Rows>
  1554. </Dataset>
  1555. <Dataset id="ds_init_cmb_ordrslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1556. <ColumnInfo>
  1557. <Column id="cdnm" type="STRING"/>
  1558. <Column id="cdid" type="STRING"/>
  1559. </ColumnInfo>
  1560. </Dataset>
  1561. <Dataset id="ds_init_ipt_arvpath" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1562. <ColumnInfo>
  1563. <Column id="cdnm" type="STRING"/>
  1564. <Column id="cdid" type="STRING"/>
  1565. </ColumnInfo>
  1566. </Dataset>
  1567. <Dataset id="ds_init_cmb_inpath" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1568. <ColumnInfo>
  1569. <Column id="cdnm" type="STRING"/>
  1570. <Column id="cdid" type="STRING"/>
  1571. </ColumnInfo>
  1572. </Dataset>
  1573. <Dataset id="ds_init_cmb_insukind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  1574. <ColumnInfo>
  1575. <Column id="cdnm" type="STRING"/>
  1576. <Column id="cdid" type="STRING"/>
  1577. </ColumnInfo>
  1578. </Dataset>
  1579. <Dataset id="ds_hidden_list1_isclcond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1580. <ColumnInfo>
  1581. <Column id="matractflag" type="STRING" size="256"/>
  1582. <Column id="calcpayflag" type="STRING" size="256"/>
  1583. <Column id="snglcalcscorcls" type="STRING" size="256"/>
  1584. <Column id="cpflag" type="STRING" size="256"/>
  1585. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  1586. <Column id="edicd" type="STRING" size="256"/>
  1587. <Column id="actingflag" type="STRING" size="256"/>
  1588. <Column id="calcamtflag" type="STRING" size="256"/>
  1589. <Column id="showsubtotal" type="STRING" size="256"/>
  1590. <Column id="showitemcoloryn" type="STRING" size="256"/>
  1591. <Column id="selectedrdomatract" type="STRING" size="256"/>
  1592. <Column id="selectedRdoPay" type="STRING" size="256"/>
  1593. <Column id="selectedRdoItem" type="STRING" size="256"/>
  1594. <Column id="selectedRdoZero" type="STRING" size="256"/>
  1595. <Column id="actflag" type="STRING" size="256"/>
  1596. <Column id="selectedRdoCp" type="STRING" size="256"/>
  1597. </ColumnInfo>
  1598. <Rows>
  1599. <Row>
  1600. <Col id="calcamtflag">calcamt!='0' or matractflag='0'</Col>
  1601. </Row>
  1602. </Rows>
  1603. </Dataset>
  1604. <Dataset id="ds_cond_smpis00500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1605. <ColumnInfo>
  1606. <Column id="datecond" type="STRING" size="256"/>
  1607. <Column id="fromdd" type="STRING" size="256"/>
  1608. <Column id="todd" type="STRING" size="256"/>
  1609. <Column id="ioflag" type="STRING" size="256"/>
  1610. <Column id="orddeptcd" type="STRING" size="256"/>
  1611. <Column id="orddrid" type="STRING" size="256"/>
  1612. <Column id="codecond" type="STRING" size="256"/>
  1613. <Column id="code" type="STRING" size="256"/>
  1614. <Column id="patunitsrch" type="STRING" size="256"/>
  1615. <Column id="large" type="STRING" size="256"/>
  1616. <Column id="middle" type="STRING" size="256"/>
  1617. <Column id="small" type="STRING" size="256"/>
  1618. <Column id="judgrid" type="STRING" size="256"/>
  1619. <Column id="cancer" type="STRING" size="256"/>
  1620. <Column id="edicd" type="STRING" size="256"/>
  1621. </ColumnInfo>
  1622. <Rows>
  1623. <Row/>
  1624. </Rows>
  1625. </Dataset>
  1626. <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1627. <ColumnInfo>
  1628. <Column id="patunitsrch1" type="STRING" size="256"/>
  1629. </ColumnInfo>
  1630. <Rows>
  1631. <Row>
  1632. <Col id="patunitsrch1">start</Col>
  1633. </Row>
  1634. </Rows>
  1635. </Dataset>
  1636. <Dataset id="ds_hidden_item1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1637. <ColumnInfo>
  1638. <Column id="oldpid" type="STRING" size="256"/>
  1639. <Column id="probpatgreen" type="STRING" size="256"/>
  1640. <Column id="probpatred" type="STRING" size="256"/>
  1641. <Column id="chksave" type="STRING" size="256"/>
  1642. <Column id="vcode" type="STRING" size="256"/>
  1643. <Column id="detlsrchflag" type="STRING" size="256"/>
  1644. </ColumnInfo>
  1645. <Rows>
  1646. <Row/>
  1647. </Rows>
  1648. </Dataset>
  1649. <Dataset id="ds_init_medcaredayno" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1650. <ColumnInfo>
  1651. <Column id="medcaredayno" type="STRING" size="256"/>
  1652. <Column id="combflag" type="STRING" size="256"/>
  1653. </ColumnInfo>
  1654. </Dataset>
  1655. <Dataset id="ds_init_vdiagyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1656. <ColumnInfo>
  1657. <Column id="v191diagyn" type="STRING" size="256"/>
  1658. <Column id="v192diagyn" type="STRING" size="256"/>
  1659. <Column id="v191prcpyn" type="STRING" size="256"/>
  1660. <Column id="v192prcpyn" type="STRING" size="256"/>
  1661. </ColumnInfo>
  1662. </Dataset>
  1663. <Dataset id="ds_init_paylimityn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1664. <ColumnInfo>
  1665. <Column id="paylimityn" type="STRING" size="256"/>
  1666. </ColumnInfo>
  1667. </Dataset>
  1668. <Dataset id="ds_init_dumpclamkeyexistyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1669. <ColumnInfo>
  1670. <Column id="dumpclamkeyexistyn" type="STRING" size="256"/>
  1671. <Column id="dumpexistyn" type="STRING" size="256"/>
  1672. </ColumnInfo>
  1673. </Dataset>
  1674. <Dataset id="ds_init_retcspec" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1675. <Dataset id="ds_init_ownbmaxamt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1676. <Dataset id="ds_init_patdnorinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1677. <ColumnInfo>
  1678. <Column id="pid" type="STRING" size="256" sumtext="환자(수여)등록번호"/>
  1679. <Column id="hngnm" type="STRING" size="256" sumtext="환자(수여)성명"/>
  1680. <Column id="patdnorflag" type="STRING" size="256" sumtext="공여수혜구분"/>
  1681. <Column id="patdnorpid" type="STRING" size="256" sumtext="공여수혜등록번호"/>
  1682. <Column id="patdnorhngnm" type="STRING" size="256" sumtext="공여수혜성명"/>
  1683. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1684. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  1685. <Column id="seqno" type="STRING" size="256" sumtext="순번"/>
  1686. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  1687. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  1688. <Column id="suppkind" type="STRING" size="256" sumtext="보조유형"/>
  1689. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  1690. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  1691. </ColumnInfo>
  1692. </Dataset>
  1693. <Dataset id="ds_rareessc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1694. <Dataset id="ds_grd_datagrid1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1695. <Dataset id="ds_itemcalc" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1696. <ColumnInfo>
  1697. <Column id="payamt" type="BIGDECIMAL" size="255"/>
  1698. <Column id="ownbpayamt" type="BIGDECIMAL" size="255"/>
  1699. <Column id="nopyamt" type="BIGDECIMAL" size="255"/>
  1700. <Column id="ownbnopyamt" type="BIGDECIMAL" size="255"/>
  1701. <Column id="specamt" type="BIGDECIMAL" size="255"/>
  1702. <Column id="ownbspecamt" type="BIGDECIMAL" size="255"/>
  1703. <Column id="totordamt" type="BIGDECIMAL" size="255"/>
  1704. <Column id="ownbtotordamt" type="BIGDECIMAL" size="255"/>
  1705. <Column id="prcptotordamt" type="BIGDECIMAL" size="256"/>
  1706. <Column id="prcpownbamt" type="BIGDECIMAL" size="256"/>
  1707. <Column id="ownbmaxgrade" type="STRING" size="256"/>
  1708. <Column id="totsumamt" type="BIGDECIMAL" size="256"/>
  1709. <Column id="totsumownbamt" type="BIGDECIMAL" size="256"/>
  1710. </ColumnInfo>
  1711. </Dataset>
  1712. <Dataset id="ds_operstat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1713. <ColumnInfo>
  1714. <Column id="cnt1" type="STRING" size="256" sumtext="미심건수"/>
  1715. <Column id="cnt2" type="STRING" size="256" sumtext="보류건수"/>
  1716. <Column id="cnt3" type="STRING" size="256" sumtext="완료건수"/>
  1717. <Column id="nonpijhoper" type="STRING" size="256" sumtext="미포함수술예약여부"/>
  1718. </ColumnInfo>
  1719. </Dataset>
  1720. <Dataset id="ds_msglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1721. <Dataset id="ds_outrateinsusuppflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1722. <Dataset id="ds_vcode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1723. <ColumnInfo>
  1724. <Column id="vcode" type="STRING" size="256" sumtext="vcode"/>
  1725. <Column id="suppkindflag" type="STRING" size="256" sumtext="보조유형"/>
  1726. </ColumnInfo>
  1727. </Dataset>
  1728. <Dataset id="ds_drginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1729. <Dataset id="ds_nbwt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1730. <Dataset id="ds_clcjnbwt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1731. <Dataset id="ds_emrdiagpamdiag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1732. <ColumnInfo>
  1733. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  1734. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1735. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  1736. <Column id="suppkind" type="STRING" size="256" sumtext="보조유형"/>
  1737. <Column id="notsuppkind" type="STRING" size="256" sumtext="입원에만있는보조"/>
  1738. <Column id="emrmaindiag" type="STRING" size="256" sumtext="진료주상병"/>
  1739. <Column id="pammaindiag" type="STRING" size="256" sumtext="심사주상병"/>
  1740. </ColumnInfo>
  1741. </Dataset>
  1742. <Dataset id="ds_rooa" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1743. <Dataset id="ds_hidden_updtchkessc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1744. <ColumnInfo>
  1745. <Column id="esscV193" type="STRING" size="256"/>
  1746. <Column id="esscV191" type="STRING" size="256"/>
  1747. </ColumnInfo>
  1748. <Rows>
  1749. <Row/>
  1750. </Rows>
  1751. </Dataset>
  1752. <Dataset id="ds_hidden_item2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1753. <ColumnInfo>
  1754. <Column id="status" type="STRING" size="256" sumtext="상태"/>
  1755. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  1756. <Column id="indd" type="STRING" size="256" sumtext="입원 일자"/>
  1757. <Column id="cretno" type="INT" size="256" sumtext="환자 일자별 일련번호"/>
  1758. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  1759. <Column id="fromdd" type="STRING" size="256" sumtext="재원이력 시작일자"/>
  1760. <Column id="seqno" type="INT" size="256" sumtext="이력 일련번호"/>
  1761. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  1762. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  1763. <Column id="insukind" type="STRING" size="256" sumtext="환자의 보험유형"/>
  1764. <Column id="suppkind" type="STRING" size="256" sumtext="환자의 보조유형"/>
  1765. <Column id="indschacptstat" type="STRING" size="256" sumtext="환자의 재원상태"/>
  1766. <Column id="dschdd" type="STRING" size="256"/>
  1767. </ColumnInfo>
  1768. <Rows>
  1769. <Row/>
  1770. </Rows>
  1771. </Dataset>
  1772. <Dataset id="ds_send_iteminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1773. <ColumnInfo>
  1774. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  1775. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1776. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  1777. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  1778. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  1779. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  1780. <Column id="inpath" type="STRING" size="256" sumtext="입원경로"/>
  1781. <Column id="arvpath" type="STRING" size="256" sumtext="도착경로"/>
  1782. <Column id="ordrslt" type="STRING" size="256" sumtext="진료결과"/>
  1783. <Column id="probjudgflag" type="STRING" size="256" sumtext="문제환자체크"/>
  1784. <Column id="medcaredayno" type="INT" size="256" sumtext="재원요양일수"/>
  1785. <Column id="dschjudgprcsstat" type="STRING" size="256" sumtext="퇴원심사진행상태"/>
  1786. <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종심사자"/>
  1787. <Column id="judgrmk" type="STRING" size="256" sumtext="최종심사자"/>
  1788. <Column id="edirmk" type="STRING" size="256" sumtext="최종심사자"/>
  1789. <Column id="dschnotiyn" type="STRING" size="256" sumtext="퇴원마감해제"/>
  1790. <Column id="futureinsuyn" type="STRING" size="256" sumtext="미래유형존재여부"/>
  1791. <Column id="trgt" type="STRING" size="256" sumtext="대상자조회호출여부"/>
  1792. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  1793. <Column id="suppkind" type="STRING" size="256" sumtext="보조유형"/>
  1794. <Column id="dschdd" type="STRING" size="256" sumtext="보조유형"/>
  1795. </ColumnInfo>
  1796. <Rows>
  1797. <Row/>
  1798. </Rows>
  1799. </Dataset>
  1800. <Dataset id="ds_send_judgrmk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1801. <ColumnInfo>
  1802. <Column id="status" type="STRING" size="256" sumtext="처리구분"/>
  1803. <Column id="spclspec" type="STRING" size="256" sumtext="특정내역"/>
  1804. <Column id="spclmemoflag" type="STRING" size="256" sumtext="사용자메모여부"/>
  1805. <Column id="unitflag" type="STRING" size="256" sumtext="단위구분"/>
  1806. <Column id="seqno" type="INT" size="256" sumtext="순번"/>
  1807. <Column id="spclcd" type="STRING" size="256" sumtext="특정코드"/>
  1808. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  1809. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1810. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  1811. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  1812. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  1813. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  1814. <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종심사자"/>
  1815. </ColumnInfo>
  1816. </Dataset>
  1817. <Dataset id="ds_grd_msg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1818. <ColumnInfo>
  1819. <Column id="msg" type="STRING" size="256"/>
  1820. </ColumnInfo>
  1821. </Dataset>
  1822. <Dataset id="ds_insulist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1823. <ColumnInfo>
  1824. <Column id="insukind" type="STRING"/>
  1825. <Column id="suppkind" type="STRING"/>
  1826. <Column id="mskind" type="STRING"/>
  1827. <Column id="fromdd" type="STRING"/>
  1828. <Column id="todd" type="STRING"/>
  1829. <Column id="cretno" type="STRING"/>
  1830. <Column id="seqno" type="STRING"/>
  1831. <Column id="pid" type="STRING"/>
  1832. <Column id="indd" type="STRING"/>
  1833. <Column id="dschnotidt" type="STRING"/>
  1834. <Column id="disccd" type="STRING"/>
  1835. <Column id="todd" type="STRING"/>
  1836. <Column id="orgtodd" type="STRING"/>
  1837. <Column id="flag" type="STRING"/>
  1838. <Column id="instcd" type="STRING"/>
  1839. <Column id="ownbmaxgradeflag" type="STRING" size="256"/>
  1840. </ColumnInfo>
  1841. </Dataset>
  1842. <Dataset id="ds_temp_insulist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1843. <Dataset id="ds_cond_sppij01900" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1844. <ColumnInfo>
  1845. <Column id="pid" type="STRING" size="256"/>
  1846. <Column id="indd" type="STRING" size="256"/>
  1847. <Column id="mskind" type="STRING" size="256"/>
  1848. <Column id="brateflag" type="STRING" size="256"/>
  1849. <Column id="brthdd" type="STRING" size="256"/>
  1850. <Column id="vcode" type="STRING" size="256"/>
  1851. <Column id="cretno" type="STRING" size="256"/>
  1852. <Column id="ownbrate" type="STRING" size="256"/>
  1853. <Column id="cfe" type="STRING" size="256"/>
  1854. <Column id="saveyn" type="STRING" size="256"/>
  1855. <Column id="rareessc" type="STRING" size="256"/>
  1856. </ColumnInfo>
  1857. </Dataset>
  1858. <Dataset id="ds_chkesscedi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1859. <Dataset id="ds_recal" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1860. <Dataset id="ds_rtndata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1861. <Dataset id="ds_getdschcalccheck" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1862. <Dataset id="ds_endcnclstat_item11" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1863. <Dataset id="ds_histref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1864. <ColumnInfo>
  1865. <Column id="value" type="STRING" size="256"/>
  1866. <Column id="label" type="STRING" size="256"/>
  1867. <Column id="level" type="STRING" size="256"/>
  1868. </ColumnInfo>
  1869. <Rows>
  1870. <Row>
  1871. <Col id="label">이력조회</Col>
  1872. <Col id="level">1</Col>
  1873. <Col id="value"/>
  1874. </Row>
  1875. <Row>
  1876. <Col id="label">환자진료정보</Col>
  1877. <Col id="value">SMMMO02500</Col>
  1878. <Col id="level">2</Col>
  1879. </Row>
  1880. <Row>
  1881. <Col id="label">환자상세내역</Col>
  1882. <Col id="value">SMPMC01900</Col>
  1883. <Col id="level">2</Col>
  1884. </Row>
  1885. <Row>
  1886. <Col id="label">외래등록조회</Col>
  1887. <Col id="value">SMPMO00600</Col>
  1888. <Col id="level">2</Col>
  1889. </Row>
  1890. <Row>
  1891. <Col id="label">청구및자료수집이력</Col>
  1892. <Col id="value">SMPIS00100</Col>
  1893. <Col id="level">2</Col>
  1894. </Row>
  1895. <Row>
  1896. <Col id="label">계산처방시행조회</Col>
  1897. <Col id="value">SMPIS00500</Col>
  1898. <Col id="level">2</Col>
  1899. </Row>
  1900. <Row>
  1901. <Col id="label">청구삭감조회</Col>
  1902. <Col id="value">SMPIS00600</Col>
  1903. <Col id="level">2</Col>
  1904. </Row>
  1905. </Rows>
  1906. </Dataset>
  1907. <Dataset id="ds_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1908. <ColumnInfo>
  1909. <Column id="value" type="STRING" size="256"/>
  1910. <Column id="label" type="STRING" size="256"/>
  1911. <Column id="level" type="STRING" size="256"/>
  1912. </ColumnInfo>
  1913. <Rows>
  1914. <Row>
  1915. <Col id="label">환자정보</Col>
  1916. <Col id="level">1</Col>
  1917. <Col id="value"/>
  1918. </Row>
  1919. <Row>
  1920. <Col id="label">입원의뢰서</Col>
  1921. <Col id="value">SPMMO00100</Col>
  1922. <Col id="level">2</Col>
  1923. </Row>
  1924. <Row>
  1925. <Col id="label">카덱스조회</Col>
  1926. <Col id="value">SMMNB00200</Col>
  1927. <Col id="level">2</Col>
  1928. </Row>
  1929. <Row>
  1930. <Col id="label">병기분류조회(진료)</Col>
  1931. <Col id="value">SPMMO08500</Col>
  1932. <Col id="level">2</Col>
  1933. </Row>
  1934. <Row>
  1935. <Col id="label">중증등록신청서</Col>
  1936. <Col id="value">SMMRD00200</Col>
  1937. <Col id="level">2</Col>
  1938. </Row>
  1939. <Row>
  1940. <Col id="label">중증등록사항</Col>
  1941. <Col id="value">SPMRD00900</Col>
  1942. <Col id="level">2</Col>
  1943. </Row>
  1944. <Row>
  1945. <Col id="label">희귀난치등록신청서</Col>
  1946. <Col id="value">SMMRD02000</Col>
  1947. <Col id="level">2</Col>
  1948. </Row>
  1949. <Row>
  1950. <Col id="label">희귀난치등록사항</Col>
  1951. <Col id="value">SPMRD02100</Col>
  1952. <Col id="level">2</Col>
  1953. </Row>
  1954. <Row>
  1955. <Col id="label">환자별영양관리</Col>
  1956. <Col id="value">SMANC00300</Col>
  1957. <Col id="level">2</Col>
  1958. </Row>
  1959. <Row>
  1960. <Col id="label">피부욕창기록</Col>
  1961. <Col id="value">SMMNW04700</Col>
  1962. <Col id="level">2</Col>
  1963. </Row>
  1964. <Row>
  1965. <Col id="label">중증도및위험사정</Col>
  1966. <Col id="value">SMMNW04000</Col>
  1967. <Col id="level">2</Col>
  1968. </Row>
  1969. <Row>
  1970. <Col id="label">투석간호정보</Col>
  1971. <Col id="value">SMMND00300</Col>
  1972. <Col id="level">2</Col>
  1973. </Row>
  1974. <Row>
  1975. <Col id="label">사망등록조회</Col>
  1976. <Col id="value">SMMRD01100</Col>
  1977. <Col id="level">2</Col>
  1978. </Row>
  1979. <Row>
  1980. <Col id="label">항암제투여현황</Col>
  1981. <Col id="value">SMPIJ02900</Col>
  1982. <Col id="level">2</Col>
  1983. </Row>
  1984. </Rows>
  1985. </Dataset>
  1986. <Dataset id="ds_qualinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1987. <ColumnInfo>
  1988. <Column id="value" type="STRING" size="256"/>
  1989. <Column id="label" type="STRING" size="256"/>
  1990. <Column id="level" type="STRING" size="256"/>
  1991. </ColumnInfo>
  1992. <Rows>
  1993. <Row>
  1994. <Col id="label">자격정보</Col>
  1995. <Col id="level">1</Col>
  1996. <Col id="value"/>
  1997. </Row>
  1998. <Row>
  1999. <Col id="label">환자기본정보관리</Col>
  2000. <Col id="value">SMPMC01400</Col>
  2001. <Col id="level">2</Col>
  2002. </Row>
  2003. <Row>
  2004. <Col id="label">재원변경관리</Col>
  2005. <Col id="value">SMPMI00400</Col>
  2006. <Col id="level">2</Col>
  2007. </Row>
  2008. <Row>
  2009. <Col id="label">자보환자관리</Col>
  2010. <Col id="value">SMPMC02600</Col>
  2011. <Col id="level">2</Col>
  2012. </Row>
  2013. <Row>
  2014. <Col id="label">산재공상환자관리</Col>
  2015. <Col id="value">SMPMC02700</Col>
  2016. <Col id="level">2</Col>
  2017. </Row>
  2018. <Row>
  2019. <Col id="label">장애인환자관리</Col>
  2020. <Col id="value">SMPMC01700</Col>
  2021. <Col id="level">2</Col>
  2022. </Row>
  2023. </Rows>
  2024. </Dataset>
  2025. <Dataset id="ds_prcpref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2026. <ColumnInfo>
  2027. <Column id="value" type="STRING" size="256"/>
  2028. <Column id="label" type="STRING" size="256"/>
  2029. <Column id="level" type="STRING" size="256"/>
  2030. </ColumnInfo>
  2031. <Rows>
  2032. <Row>
  2033. <Col id="label">처방조회</Col>
  2034. <Col id="level">1</Col>
  2035. <Col id="value"/>
  2036. </Row>
  2037. <Row>
  2038. <Col id="label">처방상태조회</Col>
  2039. <Col id="value">SMPIJ01200</Col>
  2040. <Col id="level">2</Col>
  2041. </Row>
  2042. <Row>
  2043. <Col id="label">식사력조회</Col>
  2044. <Col id="value">SMANT01000</Col>
  2045. <Col id="level">2</Col>
  2046. </Row>
  2047. <Row>
  2048. <Col id="label">수혈조회</Col>
  2049. <Col id="value">SMMNR01000</Col>
  2050. <Col id="level">2</Col>
  2051. </Row>
  2052. <Row>
  2053. <Col id="label">수혈현황조회</Col>
  2054. <Col id="value">SMMNR04600</Col>
  2055. <Col id="level">2</Col>
  2056. </Row>
  2057. <Row>
  2058. <Col id="label">개인별예약현황</Col>
  2059. <Col id="value">SMAEA00300</Col>
  2060. <Col id="level">2</Col>
  2061. </Row>
  2062. <Row>
  2063. <Col id="label">미수행처방관리</Col>
  2064. <Col id="value">SMMNW10700</Col>
  2065. <Col id="level">2</Col>
  2066. </Row>
  2067. <Row>
  2068. <Col id="label">시행부서처방</Col>
  2069. <Col id="value">SMMMO00200</Col>
  2070. <Col id="level">2</Col>
  2071. </Row>
  2072. <Row>
  2073. <Col id="label">판독신청</Col>
  2074. <Col id="value">SMAEF00100</Col>
  2075. <Col id="level">2</Col>
  2076. </Row>
  2077. <Row>
  2078. <Col id="value">SPPIZ01800</Col>
  2079. <Col id="label">수혈심사</Col>
  2080. <Col id="level">2</Col>
  2081. </Row>
  2082. <Row>
  2083. <Col id="value">SPMMO14900</Col>
  2084. <Col id="label">처방조회</Col>
  2085. <Col id="level">2</Col>
  2086. </Row>
  2087. <Row>
  2088. <Col id="label">특수조제실처방조회</Col>
  2089. <Col id="value">SMADT20100</Col>
  2090. <Col id="level">2</Col>
  2091. </Row>
  2092. <Row>
  2093. <Col id="label">병리조직결과조회</Col>
  2094. <Col id="value">SMLPP00500</Col>
  2095. <Col id="level">2</Col>
  2096. </Row>
  2097. <Row>
  2098. <Col id="label">재원미시행처방조회</Col>
  2099. <Col id="value">SPPIJ00900</Col>
  2100. <Col id="level">2</Col>
  2101. </Row>
  2102. </Rows>
  2103. </Dataset>
  2104. <Dataset id="ds_mediinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2105. <ColumnInfo>
  2106. <Column id="value" type="STRING" size="256"/>
  2107. <Column id="label" type="STRING" size="256"/>
  2108. <Column id="level" type="STRING" size="256"/>
  2109. </ColumnInfo>
  2110. <Rows>
  2111. <Row>
  2112. <Col id="label">투약정보</Col>
  2113. <Col id="level">1</Col>
  2114. <Col id="value"/>
  2115. </Row>
  2116. <Row>
  2117. <Col id="label">투약이력</Col>
  2118. <Col id="value">SPMMO02400</Col>
  2119. <Col id="level">2</Col>
  2120. </Row>
  2121. <Row>
  2122. <Col id="label">투약기록</Col>
  2123. <Col id="value">SMMNR04500</Col>
  2124. <Col id="level">2</Col>
  2125. </Row>
  2126. <Row>
  2127. <Col id="label">제한항생제</Col>
  2128. <Col id="value">SMASI00800</Col>
  2129. <Col id="level">2</Col>
  2130. </Row>
  2131. <Row>
  2132. <Col id="label">항암프로토콜</Col>
  2133. <Col id="value">SMADB01020</Col>
  2134. <Col id="level">2</Col>
  2135. </Row>
  2136. <Row>
  2137. <Col id="label">주사실액팅조회</Col>
  2138. <Col id="value">SMMNI00400</Col>
  2139. <Col id="level">2</Col>
  2140. </Row>
  2141. </Rows>
  2142. </Dataset>
  2143. <Dataset id="ds_ordamt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2144. <ColumnInfo>
  2145. <Column id="value" type="STRING" size="256"/>
  2146. <Column id="label" type="STRING" size="256"/>
  2147. <Column id="level" type="STRING" size="256"/>
  2148. </ColumnInfo>
  2149. <Rows>
  2150. <Row>
  2151. <Col id="label">진료비</Col>
  2152. <Col id="level">1</Col>
  2153. <Col id="value"/>
  2154. </Row>
  2155. <Row>
  2156. <Col id="label">수정처방(재원)</Col>
  2157. <Col id="value">SPPIJ02400</Col>
  2158. <Col id="level">2</Col>
  2159. </Row>
  2160. <Row>
  2161. <Col id="label">입원진료비상세</Col>
  2162. <Col id="value">SMPAI00200</Col>
  2163. <Col id="level">2</Col>
  2164. </Row>
  2165. <Row>
  2166. <Col id="label">외래수납조회</Col>
  2167. <Col id="value">SMPAO00300</Col>
  2168. <Col id="level">2</Col>
  2169. </Row>
  2170. <Row>
  2171. <Col id="label">외래처방계산내역조회</Col>
  2172. <Col id="value">SMPMOTMP00</Col>
  2173. <Col id="level">2</Col>
  2174. </Row>
  2175. <Row>
  2176. <Col id="label">예상진료비조회</Col>
  2177. <Col id="value">SMPAI00400</Col>
  2178. <Col id="level">2</Col>
  2179. </Row>
  2180. <Row>
  2181. <Col id="label">급종변경전후금액조회</Col>
  2182. <Col id="value">SMPAI03600</Col>
  2183. <Col id="level">2</Col>
  2184. </Row>
  2185. </Rows>
  2186. </Dataset>
  2187. <Dataset id="ds_emr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2188. <ColumnInfo>
  2189. <Column id="value" type="STRING" size="256"/>
  2190. <Column id="label" type="STRING" size="256"/>
  2191. <Column id="level" type="STRING" size="256"/>
  2192. </ColumnInfo>
  2193. <Rows>
  2194. <Row>
  2195. <Col id="label">EMR</Col>
  2196. <Col id="level">1</Col>
  2197. <Col id="value"/>
  2198. </Row>
  2199. <Row>
  2200. <Col id="label">입퇴원요약기록지</Col>
  2201. <Col id="value">SSMMR01100</Col>
  2202. <Col id="level">2</Col>
  2203. </Row>
  2204. <Row>
  2205. <Col id="label">경과기록지</Col>
  2206. <Col id="value">SSMMR01100</Col>
  2207. <Col id="level">2</Col>
  2208. </Row>
  2209. <Row>
  2210. <Col id="label">CONSULT</Col>
  2211. <Col id="value">SMMMR05000</Col>
  2212. <Col id="level">2</Col>
  2213. </Row>
  2214. <Row>
  2215. <Col id="label">임상관찰기록지</Col>
  2216. <Col id="value">SMMNR00900</Col>
  2217. <Col id="level">2</Col>
  2218. </Row>
  2219. <Row>
  2220. <Col id="label">혈당간호기록</Col>
  2221. <Col id="value">SMMNR02500</Col>
  2222. <Col id="level">2</Col>
  2223. </Row>
  2224. <Row>
  2225. <Col id="label">간호일지</Col>
  2226. <Col id="value">SMMNR00700</Col>
  2227. <Col id="level">2</Col>
  2228. </Row>
  2229. <Row>
  2230. <Col id="label">통합기록전체조회</Col>
  2231. <Col id="value">SMMRI00400</Col>
  2232. <Col id="level">2</Col>
  2233. </Row>
  2234. </Rows>
  2235. </Dataset>
  2236. <Dataset id="ds_erroomref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2237. <ColumnInfo>
  2238. <Column id="value" type="STRING" size="256"/>
  2239. <Column id="label" type="STRING" size="256"/>
  2240. <Column id="level" type="STRING" size="256"/>
  2241. </ColumnInfo>
  2242. <Rows>
  2243. <Row>
  2244. <Col id="label">응급실정보</Col>
  2245. <Col id="level">1</Col>
  2246. <Col id="value"/>
  2247. </Row>
  2248. <Row>
  2249. <Col id="label">ERcensus</Col>
  2250. <Col id="value">SMMNE01300_EMC Daily census</Col>
  2251. <Col id="level">2</Col>
  2252. </Row>
  2253. <Row>
  2254. <Col id="label">응급실triage</Col>
  2255. <Col id="value">SPMNE04400</Col>
  2256. <Col id="level">2</Col>
  2257. </Row>
  2258. <Row>
  2259. <Col id="label">응급의료관리료</Col>
  2260. <Col id="value">SMMMO06300</Col>
  2261. <Col id="level">2</Col>
  2262. </Row>
  2263. <Row>
  2264. <Col id="label">응급간호기록</Col>
  2265. <Col id="value">SMMNE04300</Col>
  2266. <Col id="level">2</Col>
  2267. </Row>
  2268. </Rows>
  2269. </Dataset>
  2270. <Dataset id="ds_trnptinforef" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2271. <ColumnInfo>
  2272. <Column id="value" type="STRING" size="256"/>
  2273. <Column id="label" type="STRING" size="256"/>
  2274. <Column id="level" type="STRING" size="256"/>
  2275. </ColumnInfo>
  2276. <Rows>
  2277. <Row>
  2278. <Col id="label">이식정보</Col>
  2279. <Col id="level">1</Col>
  2280. <Col id="value"/>
  2281. </Row>
  2282. <Row>
  2283. <Col id="label">HSCT원무관리</Col>
  2284. <Col id="value">SMPMC01600</Col>
  2285. <Col id="level">2</Col>
  2286. </Row>
  2287. <Row>
  2288. <Col id="label">HSCT스케줄조회</Col>
  2289. <Col id="value">SMABO00800</Col>
  2290. <Col id="level">2</Col>
  2291. </Row>
  2292. <Row>
  2293. <Col id="label">HSCT환자별스케줄</Col>
  2294. <Col id="value">SMMMR02100</Col>
  2295. <Col id="level">2</Col>
  2296. </Row>
  2297. <Row>
  2298. <Col id="label">조혈모처리현황</Col>
  2299. <Col id="value">SMABC00900</Col>
  2300. <Col id="level">2</Col>
  2301. </Row>
  2302. <Row>
  2303. <Col id="label">HSCT환자관리</Col>
  2304. <Col id="value">SMABO00100</Col>
  2305. <Col id="level">2</Col>
  2306. </Row>
  2307. <Row>
  2308. <Col id="label">조혈모보관해동현황</Col>
  2309. <Col id="value">SMABC00300</Col>
  2310. <Col id="level">2</Col>
  2311. </Row>
  2312. <Row>
  2313. <Col id="label">장기이식</Col>
  2314. <Col id="value">SMPIB02400</Col>
  2315. <Col id="level">2</Col>
  2316. </Row>
  2317. </Rows>
  2318. </Dataset>
  2319. <Dataset id="ds_etcref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2320. <ColumnInfo>
  2321. <Column id="value" type="STRING" size="256"/>
  2322. <Column id="label" type="STRING" size="256"/>
  2323. <Column id="level" type="STRING" size="256"/>
  2324. </ColumnInfo>
  2325. <Rows>
  2326. <Row>
  2327. <Col id="label">각종조회</Col>
  2328. <Col id="level">1</Col>
  2329. <Col id="value"/>
  2330. </Row>
  2331. <Row>
  2332. <Col id="label">약품편람</Col>
  2333. <Col id="value">SMADB01900</Col>
  2334. <Col id="level">2</Col>
  2335. </Row>
  2336. <Row>
  2337. <Col id="label">의약품정보조회</Col>
  2338. <Col id="value">SMADB00100</Col>
  2339. <Col id="level">2</Col>
  2340. </Row>
  2341. <Row>
  2342. <Col id="label">수가관리</Col>
  2343. <Col id="value">SMPIC00100</Col>
  2344. <Col id="level">2</Col>
  2345. </Row>
  2346. <Row>
  2347. <Col id="label">수가세부조회</Col>
  2348. <Col id="value">SMPIC00700</Col>
  2349. <Col id="level">2</Col>
  2350. </Row>
  2351. <Row>
  2352. <Col id="label">보험인정기준</Col>
  2353. <Col id="value">SPPIZ01600</Col>
  2354. <Col id="level">2</Col>
  2355. </Row>
  2356. <Row>
  2357. <Col id="label">격리신청서</Col>
  2358. <Col id="value">SMASB02100</Col>
  2359. <Col id="level">2</Col>
  2360. </Row>
  2361. <Row>
  2362. <Col id="level">2</Col>
  2363. <Col id="label">수술마취스케줄조회</Col>
  2364. <Col id="value">SMMMO05100</Col>
  2365. </Row>
  2366. <Row>
  2367. <Col id="level">2</Col>
  2368. <Col id="label">수술마취의뢰서등록</Col>
  2369. <Col id="value">SPMMO00200</Col>
  2370. </Row>
  2371. <Row>
  2372. <Col id="level">2</Col>
  2373. <Col id="label">입원/퇴원/재원조회</Col>
  2374. <Col id="value">SMPMI00700</Col>
  2375. </Row>
  2376. <Row>
  2377. <Col id="level">2</Col>
  2378. <Col id="label">임상시험약속처방</Col>
  2379. <Col id="value">SMMMB08300</Col>
  2380. </Row>
  2381. <Row>
  2382. <Col id="level">2</Col>
  2383. <Col id="label">신규항암프로토콜조회</Col>
  2384. <Col id="value">SMADB00900</Col>
  2385. </Row>
  2386. <Row>
  2387. <Col id="label">보험유형코드관리</Col>
  2388. <Col id="value">SMPMB00200</Col>
  2389. <Col id="level">2</Col>
  2390. </Row>
  2391. <Row>
  2392. <Col id="label">CP검색</Col>
  2393. <Col id="value">SPMMP01200_CP</Col>
  2394. <Col id="level">2</Col>
  2395. </Row>
  2396. <Row>
  2397. <Col id="label">복잡수술료 사유조회</Col>
  2398. <Col id="value">SPPIJ03800</Col>
  2399. <Col id="level">2</Col>
  2400. </Row>
  2401. </Rows>
  2402. </Dataset>
  2403. <Dataset id="ds_rslt_sppiz00400" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2404. <ColumnInfo>
  2405. <Column id="diagfromdd" type="STRING" size="256"/>
  2406. <Column id="diagtodd" type="STRING" size="256"/>
  2407. <Column id="diagcd" type="STRING" size="256"/>
  2408. <Column id="diaghngnm" type="STRING" size="256"/>
  2409. <Column id="diagengnm" type="STRING" size="256"/>
  2410. </ColumnInfo>
  2411. </Dataset>
  2412. <Dataset id="ds_cond_sppiz00400" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2413. <ColumnInfo>
  2414. <Column id="basedd" type="STRING" size="256"/>
  2415. <Column id="diagcd" type="STRING" size="256"/>
  2416. <Column id="diagnm" type="STRING" size="256"/>
  2417. <Column id="selectedrdodiagkind" type="STRING" size="256"/>
  2418. <Column id="detlsrchflag" type="STRING" size="256"/>
  2419. </ColumnInfo>
  2420. </Dataset>
  2421. <Dataset id="ds_rslt_sppiz00600" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2422. <ColumnInfo>
  2423. <Column id="pid" type="STRING" size="256"/>
  2424. <Column id="toot" type="STRING" size="256"/>
  2425. <Column id="toot1" type="STRING" size="256"/>
  2426. <Column id="clamym" type="STRING" size="256"/>
  2427. <Column id="clamdg" type="STRING" size="256"/>
  2428. <Column id="pidsn" type="STRING" size="256"/>
  2429. <Column id="chos" type="STRING" size="256"/>
  2430. <Column id="flag" type="STRING" size="256"/>
  2431. <Column id="cd" type="STRING" size="256"/>
  2432. <Column id="cdnm" type="STRING" size="256"/>
  2433. <Column id="rightupper" type="STRING" size="256"/>
  2434. <Column id="leftupper" type="STRING" size="256"/>
  2435. <Column id="rightlower" type="STRING" size="256"/>
  2436. <Column id="leftlower" type="STRING" size="256"/>
  2437. <Column id="orddd" type="STRING" size="256"/>
  2438. <Column id="row" type="STRING" size="256"/>
  2439. </ColumnInfo>
  2440. <Rows>
  2441. <Row/>
  2442. </Rows>
  2443. </Dataset>
  2444. <Dataset id="ds_cond_sppiz00600" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2445. <ColumnInfo>
  2446. <Column id="clamym" type="STRING" size="256"/>
  2447. <Column id="clamdg" type="STRING" size="256"/>
  2448. <Column id="pid" type="STRING" size="256"/>
  2449. <Column id="pidsn" type="STRING" size="256"/>
  2450. <Column id="indd" type="STRING" size="256"/>
  2451. <Column id="cretno" type="STRING" size="256"/>
  2452. <Column id="toot" type="STRING" size="256"/>
  2453. <Column id="flag" type="STRING" size="256"/>
  2454. <Column id="list" type="STRING" size="256"/>
  2455. <Column id="chos" type="STRING" size="256"/>
  2456. <Column id="cd" type="STRING" size="256"/>
  2457. <Column id="cdnm" type="STRING" size="256"/>
  2458. <Column id="rightupper" type="STRING" size="256"/>
  2459. <Column id="leftupper" type="STRING" size="256"/>
  2460. <Column id="rightlower" type="STRING" size="256"/>
  2461. <Column id="leftlower" type="STRING" size="256"/>
  2462. <Column id="orddd" type="STRING" size="256"/>
  2463. <Column id="row" type="STRING" size="256"/>
  2464. <Column id="scrnid" type="STRING" size="256"/>
  2465. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  2466. </ColumnInfo>
  2467. <Rows>
  2468. <Row/>
  2469. </Rows>
  2470. </Dataset>
  2471. <Dataset id="ds_cond_sppiz00600_toothapplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2472. <ColumnInfo>
  2473. <Column id="chos" type="STRING" size="256"/>
  2474. <Column id="flag" type="STRING" size="256"/>
  2475. <Column id="cd" type="STRING" size="256"/>
  2476. <Column id="cdnm" type="STRING" size="256"/>
  2477. <Column id="rightupper" type="STRING" size="256"/>
  2478. <Column id="leftupper" type="STRING" size="256"/>
  2479. <Column id="rightlower" type="STRING" size="256"/>
  2480. <Column id="leftlower" type="STRING" size="256"/>
  2481. <Column id="orddd" type="STRING" size="256"/>
  2482. <Column id="toot" type="STRING" size="256"/>
  2483. <Column id="row" type="STRING" size="256"/>
  2484. <Column id="pid" type="STRING" size="256"/>
  2485. <Column id="indd" type="STRING" size="256"/>
  2486. <Column id="cretno" type="STRING" size="256"/>
  2487. <Column id="instcd" type="STRING" size="256"/>
  2488. <Column id="execdd" type="STRING" size="256"/>
  2489. <Column id="calcseqno" type="STRING" size="256"/>
  2490. <Column id="calcscorseqno" type="STRING" size="256"/>
  2491. </ColumnInfo>
  2492. </Dataset>
  2493. <Dataset id="ds_diag_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2494. <ColumnInfo>
  2495. <Column id="idx" type="STRING" size="256"/>
  2496. <Column id="lev" type="STRING" size="256"/>
  2497. <Column id="UserData" type="STRING" size="256"/>
  2498. <Column id="Caption" type="STRING" size="256"/>
  2499. <Column id="enable" type="STRING" size="256"/>
  2500. <Column id="hotkey" type="STRING" size="256"/>
  2501. </ColumnInfo>
  2502. <Rows>
  2503. <Row>
  2504. <Col id="lev">0</Col>
  2505. <Col id="UserData">fDiagSeqUp()</Col>
  2506. <Col id="Caption">상병순서 위로</Col>
  2507. <Col id="enable">1</Col>
  2508. <Col id="idx">1000</Col>
  2509. </Row>
  2510. <Row>
  2511. <Col id="UserData">fDiagSeqDown()</Col>
  2512. <Col id="Caption">상병순서 아래로</Col>
  2513. <Col id="lev">0</Col>
  2514. <Col id="enable">1</Col>
  2515. <Col id="idx">1001</Col>
  2516. </Row>
  2517. <Row>
  2518. <Col id="UserData">-</Col>
  2519. <Col id="Caption">-</Col>
  2520. <Col id="lev">0</Col>
  2521. <Col id="enable">1</Col>
  2522. <Col id="idx">1002</Col>
  2523. </Row>
  2524. <Row>
  2525. <Col id="idx">1003</Col>
  2526. <Col id="lev">0</Col>
  2527. <Col id="UserData">fDiagGridAddRow()</Col>
  2528. <Col id="Caption">행 삽입</Col>
  2529. <Col id="enable">1</Col>
  2530. </Row>
  2531. <Row>
  2532. <Col id="UserData">fDiagGridInsertRow()</Col>
  2533. <Col id="Caption">행 추가</Col>
  2534. <Col id="lev">0</Col>
  2535. <Col id="enable">1</Col>
  2536. <Col id="idx">1003</Col>
  2537. </Row>
  2538. <Row>
  2539. <Col id="UserData">fDiagGridInsertRow()</Col>
  2540. <Col id="Caption">행 추가(5줄)</Col>
  2541. <Col id="lev">0</Col>
  2542. <Col id="enable">1</Col>
  2543. <Col id="idx">1003</Col>
  2544. </Row>
  2545. <Row>
  2546. <Col id="UserData">fDiagGridDeleteRow()</Col>
  2547. <Col id="Caption">행 삭제</Col>
  2548. <Col id="lev">0</Col>
  2549. <Col id="enable">1</Col>
  2550. <Col id="idx">1005</Col>
  2551. </Row>
  2552. <Row>
  2553. <Col id="UserData">-</Col>
  2554. <Col id="Caption">-</Col>
  2555. <Col id="lev">0</Col>
  2556. <Col id="enable">1</Col>
  2557. <Col id="idx">1006</Col>
  2558. </Row>
  2559. <Row>
  2560. <Col id="UserData">fRefreshDiag()</Col>
  2561. <Col id="Caption">상병갱신</Col>
  2562. <Col id="lev">0</Col>
  2563. <Col id="enable">1</Col>
  2564. <Col id="idx">1007</Col>
  2565. </Row>
  2566. <Row>
  2567. <Col id="UserData">fChangeRate()</Col>
  2568. <Col id="Caption">요율변경</Col>
  2569. <Col id="lev">0</Col>
  2570. <Col id="enable">1</Col>
  2571. <Col id="idx">1008</Col>
  2572. </Row>
  2573. </Rows>
  2574. </Dataset>
  2575. <Dataset id="ds_hidden_diag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2576. <ColumnInfo>
  2577. <Column id="oldseq" type="STRING" size="256"/>
  2578. <Column id="olddiagcd" type="STRING" size="256"/>
  2579. <Column id="olddiagnm" type="STRING" size="256"/>
  2580. <Column id="oldengnm" type="STRING" size="256"/>
  2581. <Column id="oldrowstat" type="STRING" size="256"/>
  2582. <Column id="oldordfromdd" type="STRING" size="256"/>
  2583. </ColumnInfo>
  2584. <Rows>
  2585. <Row/>
  2586. </Rows>
  2587. </Dataset>
  2588. <FilteredDataset id="fds_P0117list_M" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" filterstr="minval == 'M' &amp;&amp; cdid != 'MX999'" binddataset="@ds_P0117list"/>
  2589. <FilteredDataset id="fds_P0117list_J" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" filterstr="minval == 'J'" binddataset="@ds_P0117list"/>
  2590. <Dataset id="ds_clcjlist_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2591. <ColumnInfo>
  2592. <Column id="idx" type="STRING" size="256"/>
  2593. <Column id="lev" type="STRING" size="256"/>
  2594. <Column id="UserData" type="STRING" size="256"/>
  2595. <Column id="Caption" type="STRING" size="256"/>
  2596. <Column id="enable" type="STRING" size="256"/>
  2597. <Column id="hotkey" type="STRING" size="256"/>
  2598. </ColumnInfo>
  2599. <Rows>
  2600. <Row>
  2601. <Col id="lev">0</Col>
  2602. <Col id="UserData">fSpclGridInsertRow()</Col>
  2603. <Col id="Caption">행 추가</Col>
  2604. <Col id="enable">1</Col>
  2605. <Col id="idx">1000</Col>
  2606. </Row>
  2607. <Row>
  2608. <Col id="idx">1001</Col>
  2609. <Col id="lev">0</Col>
  2610. <Col id="UserData">-</Col>
  2611. <Col id="Caption">-</Col>
  2612. <Col id="enable">1</Col>
  2613. </Row>
  2614. <Row>
  2615. <Col id="UserData">fSpclGridDeleteRow()</Col>
  2616. <Col id="Caption">행 삭제</Col>
  2617. <Col id="lev">0</Col>
  2618. <Col id="enable">1</Col>
  2619. <Col id="idx">1002</Col>
  2620. </Row>
  2621. </Rows>
  2622. </Dataset>
  2623. <Dataset id="ds_cond_sppij00500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2624. <ColumnInfo>
  2625. <Column id="pid" type="STRING" size="256"/>
  2626. <Column id="indd" type="STRING" size="256"/>
  2627. <Column id="insukind" type="STRING" size="256"/>
  2628. <Column id="ordfildcd" type="STRING" size="256"/>
  2629. <Column id="ioflag" type="STRING" size="256"/>
  2630. <Column id="edicd" type="STRING" size="256"/>
  2631. <Column id="calcscorcd" type="STRING" size="256"/>
  2632. <Column id="calcscorcdnm" type="STRING" size="256"/>
  2633. <Column id="unitflag" type="STRING" size="256"/>
  2634. <Column id="flag" type="STRING" size="256"/>
  2635. <Column id="spclcd" type="STRING" size="256"/>
  2636. <Column id="spclcdnm" type="STRING" size="256"/>
  2637. <Column id="detldesc" type="STRING" size="256"/>
  2638. <Column id="spclspec" type="STRING" size="256"/>
  2639. <Column id="remfact" type="STRING" size="256"/>
  2640. <Column id="rownum" type="STRING" size="256"/>
  2641. <Column id="oldspclcd" type="STRING" size="256"/>
  2642. <Column id="oldspclspec" type="STRING" size="256"/>
  2643. </ColumnInfo>
  2644. </Dataset>
  2645. <Dataset id="ds_rslt_sppij00500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2646. <ColumnInfo>
  2647. <Column id="pid" type="STRING" size="256"/>
  2648. <Column id="indd" type="STRING" size="256"/>
  2649. <Column id="insukind" type="STRING" size="256"/>
  2650. <Column id="ordfildcd" type="STRING" size="256"/>
  2651. <Column id="ioflag" type="STRING" size="256"/>
  2652. <Column id="edicd" type="STRING" size="256"/>
  2653. <Column id="calcscorcd" type="STRING" size="256"/>
  2654. <Column id="calcscorcdnm" type="STRING" size="256"/>
  2655. <Column id="unitflag" type="STRING" size="256"/>
  2656. <Column id="flag" type="STRING" size="256"/>
  2657. <Column id="spclcd" type="STRING" size="256"/>
  2658. <Column id="spclcdnm" type="STRING" size="256"/>
  2659. <Column id="detldesc" type="STRING" size="256"/>
  2660. <Column id="spclspec" type="STRING" size="256"/>
  2661. <Column id="remfact" type="STRING" size="256"/>
  2662. <Column id="rownum" type="STRING" size="256"/>
  2663. <Column id="oldspclcd" type="STRING" size="256"/>
  2664. <Column id="oldspclspec" type="STRING" size="256"/>
  2665. </ColumnInfo>
  2666. </Dataset>
  2667. <Dataset id="ds_cond_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2668. <ColumnInfo>
  2669. <Column id="pid" type="STRING" size="256"/>
  2670. <Column id="indd" type="STRING" size="256"/>
  2671. <Column id="indd1" type="STRING" size="256"/>
  2672. <Column id="mskind" type="STRING" size="256"/>
  2673. <Column id="insukind" type="STRING" size="256"/>
  2674. <Column id="suppkind" type="STRING" size="256"/>
  2675. <Column id="fromdd" type="STRING" size="256"/>
  2676. <Column id="todd" type="STRING" size="256"/>
  2677. <Column id="cretno" type="STRING" size="256"/>
  2678. <Column id="receiptyn" type="STRING" size="256"/>
  2679. <Column id="personflag" type="STRING" size="256"/>
  2680. <Column id="userid" type="STRING" size="256"/>
  2681. <Column id="mainjudgid" type="STRING" size="256"/>
  2682. <Column id="judgmdlid" type="STRING" size="256"/>
  2683. <Column id="orddeptnm" type="STRING" size="256"/>
  2684. <Column id="readonly" type="STRING" size="256"/>
  2685. <Column id="patunitsrch1" type="STRING" size="256"/>
  2686. <Column id="dschmodesrch" type="STRING" size="256"/>
  2687. <Column id="totalsumflag" type="STRING" size="256"/>
  2688. <Column id="calcbasedd" type="STRING" size="256"/>
  2689. <Column id="ordfromdd" type="STRING" size="256"/>
  2690. <Column id="ordtodd" type="STRING" size="256"/>
  2691. <Column id="unitflag" type="STRING" size="256"/>
  2692. <Column id="clamfromdd" type="STRING" size="256"/>
  2693. <Column id="clamtodd" type="STRING" size="256"/>
  2694. <Column id="mig" type="STRING" size="256"/>
  2695. <Column id="orddeptcd" type="STRING" size="256"/>
  2696. <Column id="curdd" type="STRING" size="256"/>
  2697. <Column id="basedd" type="STRING" size="256"/>
  2698. <Column id="rrgstno" type="STRING" size="256"/>
  2699. <Column id="vcode" type="STRING" size="256"/>
  2700. <Column id="dschdd" type="STRING" size="256"/>
  2701. <Column id="ordtype" type="STRING" size="256"/>
  2702. <Column id="brateflag" type="STRING" size="256"/>
  2703. <Column id="sixtimyn" type="STRING" size="256"/>
  2704. <Column id="judgdaycnt" type="STRING" size="256"/>
  2705. <Column id="trgt" type="STRING" size="256"/>
  2706. <Column id="seqno" type="STRING" size="256"/>
  2707. <Column id="acptuniqno" type="STRING" size="256"/>
  2708. <Column id="oldindd" type="STRING" size="256"/>
  2709. <Column id="oldcretno" type="STRING" size="256"/>
  2710. <Column id="addprcp" type="STRING" size="256"/>
  2711. <Column id="kdrgcd" type="STRING" size="256"/>
  2712. <Column id="drgclass" type="STRING" size="256"/>
  2713. <Column id="drgcd" type="STRING" size="256"/>
  2714. <Column id="execstat" type="STRING" size="256"/>
  2715. <Column id="instcd" type="STRING" size="256"/>
  2716. <Column id="drg" type="STRING" size="256"/>
  2717. <Column id="chkamt" type="STRING" size="256"/>
  2718. <Column id="ordfilflag" type="STRING" size="256"/>
  2719. </ColumnInfo>
  2720. </Dataset>
  2721. <Dataset id="ds_rslt_sppiz00200" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  2722. <ColumnInfo>
  2723. <Column id="unitflag" type="STRING" size="256"/>
  2724. <Column id="spclcd" type="STRING" size="256"/>
  2725. <Column id="rowstat" type="STRING" size="256"/>
  2726. <Column id="spclspec" type="STRING" size="256"/>
  2727. </ColumnInfo>
  2728. </Dataset>
  2729. <Dataset id="ds_cond_sppiz00200" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  2730. <ColumnInfo>
  2731. <Column id="rowstat" type="STRING" size="256"/>
  2732. <Column id="unitflag" type="STRING" size="256"/>
  2733. <Column id="spclcd" type="STRING" size="256"/>
  2734. <Column id="spclspec" type="STRING" size="256"/>
  2735. <Column id="initedilnno" type="STRING" size="256"/>
  2736. <Column id="calcscorcd" type="STRING" size="256"/>
  2737. <Column id="seqno" type="STRING" size="256"/>
  2738. <Column id="spclformat" type="STRING" size="256"/>
  2739. </ColumnInfo>
  2740. </Dataset>
  2741. <Dataset id="ds_rslt_sppiz00300" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  2742. <ColumnInfo>
  2743. <Column id="choimemo" type="STRING" size="256"/>
  2744. <Column id="edicd" type="STRING" size="256"/>
  2745. <Column id="destRef" type="STRING" size="256"/>
  2746. </ColumnInfo>
  2747. </Dataset>
  2748. <Dataset id="ds_cond_sppiz00300" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  2749. <ColumnInfo>
  2750. <Column id="pid" type="STRING"/>
  2751. <Column id="indd" type="STRING" size="256"/>
  2752. <Column id="orddeptcd" type="STRING" size="256"/>
  2753. <Column id="cretno" type="STRING" size="256"/>
  2754. <Column id="mskind" type="STRING" size="256"/>
  2755. <Column id="ioflag" type="STRING" size="256"/>
  2756. <Column id="refterm" type="STRING" size="256"/>
  2757. <Column id="anofildinclyn" type="STRING" size="256"/>
  2758. <Column id="fromdd" type="STRING" size="256"/>
  2759. <Column id="todd" type="STRING" size="256"/>
  2760. </ColumnInfo>
  2761. </Dataset>
  2762. <Dataset id="ds_cond_sppiz01200" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  2763. <ColumnInfo>
  2764. <Column id="pid" type="STRING" size="256"/>
  2765. <Column id="indd" type="STRING" size="256"/>
  2766. <Column id="cretno" type="STRING" size="256"/>
  2767. <Column id="mskind" type="STRING" size="256"/>
  2768. <Column id="brateflag" type="STRING" size="256"/>
  2769. <Column id="brthdd" type="STRING" size="256"/>
  2770. <Column id="dschnotidt" type="STRING" size="256"/>
  2771. <Column id="dschnotiyn" type="STRING" size="256"/>
  2772. <Column id="calcbasedd" type="STRING" size="256"/>
  2773. <Column id="seqno" type="STRING" size="256"/>
  2774. <Column id="disyn" type="STRING" size="256"/>
  2775. <Column id="cfe" type="STRING" size="256"/>
  2776. <Column id="saveyn" type="STRING" size="256"/>
  2777. <Column id="fromdd" type="STRING" size="256"/>
  2778. <Column id="todd" type="STRING" size="256"/>
  2779. <Column id="insukind" type="STRING" size="256"/>
  2780. </ColumnInfo>
  2781. <Rows>
  2782. <Row/>
  2783. </Rows>
  2784. </Dataset>
  2785. <Dataset id="ds_cond_sppiz01300" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2786. <ColumnInfo>
  2787. <Column id="pid" type="STRING" size="256"/>
  2788. <Column id="indd" type="STRING" size="256"/>
  2789. <Column id="cretno" type="STRING" size="256"/>
  2790. <Column id="ioflag" type="STRING" size="256"/>
  2791. <Column id="instcd" type="STRING" size="256"/>
  2792. </ColumnInfo>
  2793. <Rows>
  2794. <Row/>
  2795. </Rows>
  2796. </Dataset>
  2797. <Dataset id="ds_cond_smpiz00100" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2798. <ColumnInfo>
  2799. <Column id="pid" type="STRING" size="256"/>
  2800. <Column id="ordfromdd" type="STRING" size="256"/>
  2801. <Column id="ordtodd" type="STRING" size="256"/>
  2802. <Column id="srchflag" type="STRING" size="256"/>
  2803. <Column id="basedd" type="STRING" size="256"/>
  2804. <Column id="diagcd" type="STRING" size="256"/>
  2805. <Column id="diagnm" type="STRING" size="256"/>
  2806. <Column id="selectedrdodiagkind" type="STRING" size="256"/>
  2807. </ColumnInfo>
  2808. </Dataset>
  2809. <Dataset id="ds_rslt_smpiz00100" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2810. <ColumnInfo>
  2811. <Column id="diagcd" type="STRING" size="256"/>
  2812. <Column id="diaghngnm" type="STRING" size="256"/>
  2813. <Column id="diagengnm" type="STRING" size="256"/>
  2814. <Column id="anamneflag" type="STRING" size="256"/>
  2815. <Column id="diagkindcd" type="STRING" size="256"/>
  2816. </ColumnInfo>
  2817. </Dataset>
  2818. <Dataset id="ds_hidden_smpiz00100_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2819. <ColumnInfo>
  2820. <Column id="diagcd" type="STRING" size="256"/>
  2821. <Column id="diagkindcd" type="STRING" size="256"/>
  2822. <Column id="diaghngnm" type="STRING" size="256"/>
  2823. <Column id="diagengnm" type="STRING" size="256"/>
  2824. <Column id="anamneflag" type="STRING" size="256"/>
  2825. </ColumnInfo>
  2826. <Rows>
  2827. <Row/>
  2828. </Rows>
  2829. </Dataset>
  2830. <Dataset id="ds_init_obgydiag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2831. <Dataset id="ds_grd_cmb_calcpayflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2832. <ColumnInfo>
  2833. <Column id="cd" type="STRING" size="256"/>
  2834. <Column id="nm" type="STRING" size="256"/>
  2835. </ColumnInfo>
  2836. <Rows>
  2837. <Row>
  2838. <Col id="cd">0</Col>
  2839. <Col id="nm">급</Col>
  2840. </Row>
  2841. <Row>
  2842. <Col id="cd">1</Col>
  2843. <Col id="nm">100</Col>
  2844. </Row>
  2845. <Row>
  2846. <Col id="cd">2</Col>
  2847. <Col id="nm">비</Col>
  2848. </Row>
  2849. </Rows>
  2850. </Dataset>
  2851. <Dataset id="ds_grd_cmb_matractflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2852. <ColumnInfo>
  2853. <Column id="cd" type="STRING" size="256"/>
  2854. <Column id="nm" type="STRING" size="256"/>
  2855. </ColumnInfo>
  2856. <Rows>
  2857. <Row>
  2858. <Col id="cd">0</Col>
  2859. <Col id="nm">원외</Col>
  2860. </Row>
  2861. <Row>
  2862. <Col id="cd">1</Col>
  2863. <Col id="nm">재료</Col>
  2864. </Row>
  2865. <Row>
  2866. <Col id="cd">2</Col>
  2867. <Col id="nm">가O</Col>
  2868. </Row>
  2869. <Row>
  2870. <Col id="cd">3</Col>
  2871. <Col id="nm">가X</Col>
  2872. </Row>
  2873. <Row>
  2874. <Col id="cd">4</Col>
  2875. <Col id="nm">약제</Col>
  2876. </Row>
  2877. <Row>
  2878. <Col id="cd">5</Col>
  2879. <Col id="nm">위탁</Col>
  2880. </Row>
  2881. <Row>
  2882. <Col id="nm">약제</Col>
  2883. <Col id="cd">6</Col>
  2884. </Row>
  2885. </Rows>
  2886. </Dataset>
  2887. <Dataset id="ds_P0010list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2888. <Dataset id="ds_P0551list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2889. <Dataset id="ds_PK029list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2890. <Dataset id="ds_goso" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  2891. <Dataset id="ds_rdo_ordfilflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2892. <ColumnInfo>
  2893. <Column id="cdid" type="STRING" size="256"/>
  2894. <Column id="cdnm" type="STRING" size="256"/>
  2895. <Column id="font" type="STRING" size="256"/>
  2896. </ColumnInfo>
  2897. <Rows>
  2898. <Row>
  2899. <Col id="cdid">-</Col>
  2900. <Col id="cdnm">전체</Col>
  2901. </Row>
  2902. <Row>
  2903. <Col id="cdid">01</Col>
  2904. <Col id="cdnm">진찰</Col>
  2905. </Row>
  2906. <Row>
  2907. <Col id="cdid">02</Col>
  2908. <Col id="cdnm">입원</Col>
  2909. <Col id="font"/>
  2910. </Row>
  2911. <Row>
  2912. <Col id="cdid">03</Col>
  2913. <Col id="cdnm">투약</Col>
  2914. </Row>
  2915. <Row>
  2916. <Col id="cdid">04</Col>
  2917. <Col id="cdnm">주사</Col>
  2918. </Row>
  2919. <Row>
  2920. <Col id="cdid">05</Col>
  2921. <Col id="cdnm">마취</Col>
  2922. </Row>
  2923. <Row>
  2924. <Col id="cdid">06</Col>
  2925. <Col id="cdnm">이학</Col>
  2926. </Row>
  2927. <Row>
  2928. <Col id="cdid">07</Col>
  2929. <Col id="cdnm">정신</Col>
  2930. </Row>
  2931. <Row>
  2932. <Col id="cdid">08</Col>
  2933. <Col id="cdnm">수술</Col>
  2934. </Row>
  2935. <Row>
  2936. <Col id="cdid">09</Col>
  2937. <Col id="cdnm">검사</Col>
  2938. </Row>
  2939. <Row>
  2940. <Col id="cdid">10</Col>
  2941. <Col id="cdnm">방사선</Col>
  2942. </Row>
  2943. <Row>
  2944. <Col id="cdid">SS</Col>
  2945. <Col id="cdnm">특수</Col>
  2946. </Row>
  2947. <Row>
  2948. <Col id="cdnm">선별</Col>
  2949. <Col id="cdid">AA' || item1=='BB' || item1=='EE' || item1=='DD</Col>
  2950. </Row>
  2951. </Rows>
  2952. </Dataset>
  2953. <Dataset id="ds_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  2954. <ColumnInfo>
  2955. <Column id="idx" type="STRING" size="256"/>
  2956. <Column id="lev" type="STRING" size="256"/>
  2957. <Column id="UserData" type="STRING" size="256"/>
  2958. <Column id="Caption" type="STRING" size="256"/>
  2959. <Column id="enable" type="STRING" size="256"/>
  2960. <Column id="hotkey" type="STRING" size="256"/>
  2961. </ColumnInfo>
  2962. <Rows>
  2963. <Row>
  2964. <Col id="idx">1000</Col>
  2965. <Col id="lev">0</Col>
  2966. <Col id="UserData">fOrderGridInsertCmt()</Col>
  2967. <Col id="Caption">처방주석입력</Col>
  2968. <Col id="enable">1</Col>
  2969. </Row>
  2970. <Row>
  2971. <Col id="idx">1001</Col>
  2972. <Col id="lev">0</Col>
  2973. <Col id="UserData">fCnfmCdInsert()</Col>
  2974. <Col id="Caption">확인코드</Col>
  2975. <Col id="enable">1</Col>
  2976. </Row>
  2977. <Row>
  2978. <Col id="idx">1002</Col>
  2979. <Col id="lev">0</Col>
  2980. <Col id="UserData">-</Col>
  2981. <Col id="Caption">-</Col>
  2982. <Col id="enable">1</Col>
  2983. </Row>
  2984. <Row>
  2985. <Col id="idx">1003</Col>
  2986. <Col id="lev">0</Col>
  2987. <Col id="UserData">fSetSrchCalcScorCdPop()</Col>
  2988. <Col id="Caption">수가조회</Col>
  2989. <Col id="enable">1</Col>
  2990. </Row>
  2991. <Row>
  2992. <Col id="idx">1006</Col>
  2993. <Col id="lev">0</Col>
  2994. <Col id="UserData">fSetSrchInsuRcogBaseMngt()</Col>
  2995. <Col id="Caption">보험인정기준관리</Col>
  2996. <Col id="enable">1</Col>
  2997. </Row>
  2998. <Row>
  2999. <Col id="idx">1007</Col>
  3000. <Col id="lev">0</Col>
  3001. <Col id="UserData">fOpenDrugDic()</Col>
  3002. <Col id="Caption">약품편람</Col>
  3003. <Col id="enable">1</Col>
  3004. </Row>
  3005. <Row>
  3006. <Col id="idx">1008</Col>
  3007. <Col id="lev">0</Col>
  3008. <Col id="UserData">fOpenDruginfo()</Col>
  3009. <Col id="Caption">약제정보</Col>
  3010. <Col id="enable">1</Col>
  3011. </Row>
  3012. <Row>
  3013. <Col id="idx">1010</Col>
  3014. <Col id="lev">0</Col>
  3015. <Col id="UserData">-</Col>
  3016. <Col id="Caption">-</Col>
  3017. <Col id="enable">1</Col>
  3018. </Row>
  3019. <Row>
  3020. <Col id="idx">1011</Col>
  3021. <Col id="lev">0</Col>
  3022. <Col id="UserData">fOpenSMPIS00500Detail()</Col>
  3023. <Col id="Caption">코드별 처방hx.보기</Col>
  3024. <Col id="enable">1</Col>
  3025. </Row>
  3026. <Row>
  3027. <Col id="idx">1012</Col>
  3028. <Col id="lev">0</Col>
  3029. <Col id="UserData">fOpenSMPIS00600Detail()</Col>
  3030. <Col id="Caption">코드별 청구hx.보기</Col>
  3031. <Col id="enable">1</Col>
  3032. </Row>
  3033. <Row>
  3034. <Col id="idx">1013</Col>
  3035. <Col id="lev">0</Col>
  3036. <Col id="UserData">fOpenSMPIS00600Detail2()</Col>
  3037. <Col id="Caption">삭감hx.보기</Col>
  3038. </Row>
  3039. <Row>
  3040. <Col id="idx">1013</Col>
  3041. <Col id="lev">0</Col>
  3042. <Col id="UserData">-</Col>
  3043. <Col id="Caption">-</Col>
  3044. <Col id="enable">1</Col>
  3045. </Row>
  3046. <Row>
  3047. <Col id="UserData">fPatJudgPatMsgTrsm()</Col>
  3048. <Col id="Caption">환자기준 메세지작성</Col>
  3049. <Col id="lev">0</Col>
  3050. <Col id="idx">1014</Col>
  3051. <Col id="enable">1</Col>
  3052. </Row>
  3053. <Row>
  3054. <Col id="UserData">fOrderJudgPatMsgTrsm()</Col>
  3055. <Col id="Caption">처방기준 메세지작성</Col>
  3056. <Col id="lev">0</Col>
  3057. <Col id="idx">1015</Col>
  3058. <Col id="enable">1</Col>
  3059. </Row>
  3060. <Row>
  3061. <Col id="idx">1016</Col>
  3062. <Col id="lev">0</Col>
  3063. <Col id="UserData">fJudgPatMsgTrsmRef()</Col>
  3064. <Col id="Caption">환자 전체메세지 간편보기</Col>
  3065. <Col id="enable">1</Col>
  3066. </Row>
  3067. <Row>
  3068. <Col id="idx">1029</Col>
  3069. <Col id="lev">0</Col>
  3070. <Col id="UserData">-</Col>
  3071. <Col id="Caption">-</Col>
  3072. <Col id="enable">1</Col>
  3073. </Row>
  3074. <Row>
  3075. <Col id="Caption">처방사유조회</Col>
  3076. <Col id="idx">1030</Col>
  3077. <Col id="lev">0</Col>
  3078. <Col id="enable">1</Col>
  3079. <Col id="UserData">fPrcpResnRef()</Col>
  3080. </Row>
  3081. </Rows>
  3082. </Dataset>
  3083. <Dataset id="ds_cond_srch_smpai02900" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3084. <ColumnInfo>
  3085. <Column id="searchdd" type="STRING" size="256"/>
  3086. <Column id="searchflag" type="STRING" size="256"/>
  3087. <Column id="searchcon" type="STRING" size="256"/>
  3088. <Column id="sess_posinstcd" type="STRING" size="256"/>
  3089. <Column id="searchpid" type="STRING" size="256"/>
  3090. </ColumnInfo>
  3091. <Rows>
  3092. <Row>
  3093. <Col id="searchflag">dump</Col>
  3094. <Col id="searchcon">execdd</Col>
  3095. <Col id="sess_posinstcd">031</Col>
  3096. </Row>
  3097. </Rows>
  3098. </Dataset>
  3099. <Dataset id="ds_cond_sppij00400" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3100. <ColumnInfo>
  3101. <Column id="pid" type="STRING" size="256"/>
  3102. <Column id="cretno" type="STRING" size="256"/>
  3103. <Column id="indd" type="STRING" size="256"/>
  3104. <Column id="mskind" type="STRING" size="256"/>
  3105. <Column id="insukind" type="STRING" size="256"/>
  3106. <Column id="insufromdd" type="STRING" size="256"/>
  3107. <Column id="estmcd" type="STRING" size="256"/>
  3108. <Column id="selyn" type="STRING" size="256"/>
  3109. <Column id="selectedRdoItem" type="STRING" size="256"/>
  3110. <Column id="fromdd" type="STRING" size="256"/>
  3111. <Column id="todd" type="STRING" size="256"/>
  3112. <Column id="calcscorcd" type="STRING" size="256"/>
  3113. <Column id="grupsnglflag" type="STRING" size="256"/>
  3114. </ColumnInfo>
  3115. </Dataset>
  3116. <Dataset id="ds_prcpresnref_info" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  3117. <ColumnInfo>
  3118. <Column id="pid" type="STRING" size="256"/>
  3119. <Column id="fromdd" type="STRING" size="256"/>
  3120. <Column id="todd" type="STRING" size="256"/>
  3121. <Column id="orddeptcd" type="STRING" size="256"/>
  3122. <Column id="orddrid" type="STRING" size="256"/>
  3123. <Column id="mainjudgid" type="STRING" size="256"/>
  3124. <Column id="prcpcd" type="STRING" size="256"/>
  3125. <Column id="insukind" type="STRING" size="256"/>
  3126. <Column id="ioflag" type="STRING" size="256"/>
  3127. <Column id="resncd" type="STRING" size="256"/>
  3128. <Column id="popup" type="STRING" size="256"/>
  3129. </ColumnInfo>
  3130. </Dataset>
  3131. <Dataset id="ds_msgtrsm_info" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3132. <ColumnInfo>
  3133. <Column id="instcd" type="STRING" size="256"/>
  3134. <Column id="msgwrtedd" type="STRING" size="256"/>
  3135. <Column id="msgwrteno" type="STRING" size="256"/>
  3136. <Column id="msgwrtehistno" type="STRING" size="256"/>
  3137. <Column id="histstat" type="STRING" size="256"/>
  3138. <Column id="pid" type="STRING" size="256"/>
  3139. <Column id="orddd" type="STRING" size="256"/>
  3140. <Column id="cretno" type="STRING" size="256"/>
  3141. <Column id="mskind" type="STRING" size="256"/>
  3142. <Column id="orddeptcd" type="STRING" size="256"/>
  3143. <Column id="orddrid" type="STRING" size="256"/>
  3144. <Column id="orddrnm" type="STRING" size="256"/>
  3145. <Column id="ordtype" type="STRING" size="256"/>
  3146. <Column id="kindflag" type="STRING" size="256"/>
  3147. <Column id="grupcalcscorcd" type="STRING" size="256"/>
  3148. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  3149. <Column id="ordqty" type="STRING" size="256"/>
  3150. <Column id="ordtims" type="STRING" size="256"/>
  3151. <Column id="orddays" type="STRING" size="256"/>
  3152. <Column id="prcpdd" type="STRING" size="256"/>
  3153. <Column id="prcpno" type="STRING" size="256"/>
  3154. <Column id="prcppayflag" type="STRING" size="256"/>
  3155. <Column id="rgstrid" type="STRING" size="256"/>
  3156. <Column id="rgstdd" type="STRING" size="256"/>
  3157. <Column id="rgsttm" type="STRING" size="256"/>
  3158. <Column id="sendphone" type="STRING" size="256"/>
  3159. <Column id="anybodyyn" type="STRING" size="256"/>
  3160. <Column id="sendflag" type="STRING" size="256"/>
  3161. <Column id="senddate" type="STRING" size="256"/>
  3162. <Column id="sendid" type="STRING" size="256"/>
  3163. <Column id="deliveid" type="STRING" size="256"/>
  3164. <Column id="recvdate" type="STRING" size="256"/>
  3165. <Column id="recvid" type="STRING" size="256"/>
  3166. <Column id="recvcnfmyn" type="STRING" size="256"/>
  3167. <Column id="recvcnfmid" type="STRING" size="256"/>
  3168. <Column id="sendmsg" type="STRING" size="256"/>
  3169. <Column id="recvmsg" type="STRING" size="256"/>
  3170. <Column id="fstrgstrid" type="STRING" size="256"/>
  3171. <Column id="fstrgstdt" type="STRING" size="256"/>
  3172. <Column id="lastupdtrid" type="STRING" size="256"/>
  3173. <Column id="lastupdtdt" type="STRING" size="256"/>
  3174. <Column id="refyn" type="STRING" size="256"/>
  3175. <Column id="addestmcd" type="STRING" size="256"/>
  3176. </ColumnInfo>
  3177. </Dataset>
  3178. <Dataset id="ds_cond_smpis00600" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3179. <ColumnInfo>
  3180. <Column id="patunitsrch" type="STRING" size="256"/>
  3181. <Column id="clamym" type="STRING" size="256"/>
  3182. <Column id="clamymfrom" type="STRING" size="256"/>
  3183. <Column id="clamymto" type="STRING" size="256"/>
  3184. <Column id="clamflag" type="STRING" size="256"/>
  3185. <Column id="ioflag" type="STRING" size="256"/>
  3186. <Column id="insukind" type="STRING" size="256"/>
  3187. <Column id="cutonly" type="STRING" size="256"/>
  3188. <Column id="code" type="STRING" size="256"/>
  3189. <Column id="codecond" type="STRING" size="256"/>
  3190. <Column id="trustinstcd" type="STRING" size="256"/>
  3191. <Column id="clamdgfrom" type="STRING" size="256"/>
  3192. <Column id="clamdgto" type="STRING" size="256"/>
  3193. <Column id="orddeptcd" type="STRING" size="256"/>
  3194. <Column id="orddrid" type="STRING" size="256"/>
  3195. <Column id="openflag" type="STRING" size="256"/>
  3196. </ColumnInfo>
  3197. </Dataset>
  3198. <Dataset id="ds_hidden_midclam" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  3199. <ColumnInfo>
  3200. <Column id="pid" type="STRING" size="256"/>
  3201. <Column id="indd" type="STRING" size="256"/>
  3202. <Column id="clamym" type="STRING" size="256"/>
  3203. <Column id="clamdg" type="STRING" size="256"/>
  3204. <Column id="clamflag" type="STRING" size="256"/>
  3205. <Column id="predata" type="STRING" size="256"/>
  3206. </ColumnInfo>
  3207. </Dataset>
  3208. <Dataset id="ds_cond_smpir31000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3209. <ColumnInfo>
  3210. <Column id="srchflag" type="STRING" size="256"/>
  3211. <Column id="acptno" type="STRING" size="256"/>
  3212. <Column id="judgdg" type="STRING" size="256"/>
  3213. <Column id="docuseqno" type="STRING" size="256"/>
  3214. <Column id="clamno" type="STRING" size="256"/>
  3215. </ColumnInfo>
  3216. </Dataset>
  3217. <Dataset id="ds_cond_sppij02501" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3218. <ColumnInfo>
  3219. <Column id="pid" type="STRING" size="256"/>
  3220. <Column id="indd" type="STRING" size="256"/>
  3221. <Column id="mskind" type="STRING" size="256"/>
  3222. <Column id="cretno" type="STRING" size="256"/>
  3223. <Column id="execfromdd" type="STRING" size="256"/>
  3224. <Column id="exectodd" type="STRING" size="256"/>
  3225. <Column id="prcpfromdd" type="STRING" size="256"/>
  3226. <Column id="prcptodd" type="STRING" size="256"/>
  3227. <Column id="chksave" type="STRING" size="256"/>
  3228. <Column id="dschjudgprcsstat" type="STRING" size="256"/>
  3229. </ColumnInfo>
  3230. </Dataset>
  3231. <Dataset id="ds_cond_list_sppij00500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3232. <ColumnInfo>
  3233. <Column id="pid" type="STRING" size="256"/>
  3234. <Column id="indd" type="STRING" size="256"/>
  3235. <Column id="insukind" type="STRING" size="256"/>
  3236. <Column id="ordfildcd" type="STRING" size="256"/>
  3237. <Column id="ioflag" type="STRING" size="256"/>
  3238. <Column id="edicd" type="STRING" size="256"/>
  3239. <Column id="calcscorcd" type="STRING" size="256"/>
  3240. <Column id="calcscorcdnm" type="STRING" size="256"/>
  3241. <Column id="unitflag" type="STRING" size="256"/>
  3242. <Column id="flag" type="STRING" size="256"/>
  3243. <Column id="spclcd" type="STRING" size="256"/>
  3244. <Column id="spclcdnm" type="STRING" size="256"/>
  3245. <Column id="detldesc" type="STRING" size="256"/>
  3246. <Column id="spclspec" type="STRING" size="256"/>
  3247. <Column id="remfact" type="STRING" size="256"/>
  3248. <Column id="rownum" type="STRING" size="256"/>
  3249. <Column id="oldspclcd" type="STRING" size="256"/>
  3250. <Column id="oldspclspec" type="STRING" size="256"/>
  3251. <Column id="status" type="STRING" size="256"/>
  3252. </ColumnInfo>
  3253. </Dataset>
  3254. <Dataset id="ds_noactyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3255. <Dataset id="ds_cond_smpmc01300" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3256. <Dataset id="ds_rslt_smpmc01300" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3257. <Dataset id="ds_cnstinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3258. <Dataset id="ds_erjininfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3259. <Dataset id="ds_clbsclaminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3260. <Dataset id="ds_send_recal" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3261. <Dataset id="ds_main_prtlhislist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3262. <Dataset id="ds_send_prntlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3263. <ColumnInfo>
  3264. <Column id="pid" type="STRING" size="256"/>
  3265. <Column id="insukindcd" type="STRING" size="256"/>
  3266. <Column id="suppkindcd" type="STRING" size="256"/>
  3267. <Column id="patnm" type="STRING" size="256"/>
  3268. <Column id="indd" type="STRING" size="256"/>
  3269. <Column id="item1" type="STRING" size="256"/>
  3270. <Column id="item2" type="STRING" size="256"/>
  3271. <Column id="item3" type="STRING" size="256"/>
  3272. <Column id="grupflag" type="STRING" size="256"/>
  3273. <Column id="grupcalcscorcd" type="STRING" size="256"/>
  3274. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  3275. <Column id="edicd" type="STRING" size="256"/>
  3276. <Column id="estmcd" type="STRING" size="256"/>
  3277. <Column id="hngnm" type="STRING" size="256"/>
  3278. <Column id="calcpayflag" type="STRING" size="256"/>
  3279. <Column id="execprcpstatcd" type="STRING" size="256"/>
  3280. <Column id="payownbrate" type="STRING" size="256"/>
  3281. <Column id="appunitcost" type="STRING" size="256"/>
  3282. <Column id="calctims" type="STRING" size="256"/>
  3283. <Column id="calcqty" type="STRING" size="256"/>
  3284. <Column id="daydrugqty" type="STRING" size="256"/>
  3285. <Column id="calcdays" type="STRING" size="256"/>
  3286. <Column id="calcamt" type="STRING" size="256"/>
  3287. <Column id="unithospaddamt" type="STRING" size="256"/>
  3288. <Column id="unitspecamt" type="STRING" size="256"/>
  3289. <Column id="unitaddamt" type="STRING" size="256"/>
  3290. <Column id="totordamt" type="STRING" size="256"/>
  3291. </ColumnInfo>
  3292. </Dataset>
  3293. <Dataset id="ds_spcdrugyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3294. <Dataset id="ds_cmb_autmbinptflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3295. <ColumnInfo>
  3296. <Column id="cdid" type="STRING" size="256"/>
  3297. <Column id="cdnm" type="STRING" size="256"/>
  3298. </ColumnInfo>
  3299. <Rows>
  3300. <Row>
  3301. <Col id="cdid">X</Col>
  3302. <Col id="cdnm">처방불가</Col>
  3303. </Row>
  3304. </Rows>
  3305. </Dataset>
  3306. <Dataset id="ds_isclediudiff" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3307. <Dataset id="ds_PK232list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3308. <Dataset id="ds_P0556list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3309. <Dataset id="ds_lglydisinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3310. <Dataset id="ds_getTicuUserInfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3311. <Dataset id="ds_getiscldiffinpt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3312. <Dataset id="ds_grd_keycancelrsn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3313. <Dataset id="keycanlaftmth" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3314. <Dataset id="ds_rdo_keycancelrsn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3315. <ColumnInfo>
  3316. <Column id="label" type="STRING" size="256"/>
  3317. <Column id="value" type="STRING" size="256"/>
  3318. </ColumnInfo>
  3319. <Rows>
  3320. <Row>
  3321. <Col id="label">처방추가</Col>
  3322. <Col id="value">1</Col>
  3323. </Row>
  3324. <Row>
  3325. <Col id="label">처방취소</Col>
  3326. <Col id="value">2</Col>
  3327. </Row>
  3328. <Row>
  3329. <Col id="label">처방변경</Col>
  3330. <Col id="value">3</Col>
  3331. </Row>
  3332. <Row>
  3333. <Col id="label">급비변경</Col>
  3334. <Col id="value">4</Col>
  3335. </Row>
  3336. <Row>
  3337. <Col id="label">자격변경</Col>
  3338. <Col id="value">5</Col>
  3339. </Row>
  3340. <Row>
  3341. <Col id="label">기타</Col>
  3342. <Col id="value">9</Col>
  3343. </Row>
  3344. </Rows>
  3345. </Dataset>
  3346. <Dataset id="ds_rdo_keycanlaftmth" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3347. <ColumnInfo>
  3348. <Column id="label" type="STRING" size="256"/>
  3349. <Column id="value" type="STRING" size="256"/>
  3350. </ColumnInfo>
  3351. <Rows>
  3352. <Row>
  3353. <Col id="label">추가청구</Col>
  3354. <Col id="value">1</Col>
  3355. </Row>
  3356. <Row>
  3357. <Col id="label">환수후 재정산하고 재청구</Col>
  3358. <Col id="value">2</Col>
  3359. </Row>
  3360. <Row>
  3361. <Col id="label">정산의뢰</Col>
  3362. <Col id="value">3</Col>
  3363. </Row>
  3364. <Row>
  3365. <Col id="label">기타</Col>
  3366. <Col id="value">9</Col>
  3367. </Row>
  3368. </Rows>
  3369. </Dataset>
  3370. <Dataset id="ds_clamkey_canceldata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  3371. <ColumnInfo>
  3372. <Column id="cancelrsn" type="STRING" size="256"/>
  3373. <Column id="rsnrem" type="STRING" size="256"/>
  3374. <Column id="cancelresult" type="STRING" size="256"/>
  3375. <Column id="resultrem1" type="STRING" size="256"/>
  3376. <Column id="resultrem2" type="STRING" size="256"/>
  3377. <Column id="resultrem9" type="STRING" size="256"/>
  3378. </ColumnInfo>
  3379. <Rows>
  3380. <Row>
  3381. <Col id="cancelrsn"/>
  3382. <Col id="rsnrem"/>
  3383. <Col id="cancelresult"/>
  3384. <Col id="resultrem1"/>
  3385. </Row>
  3386. </Rows>
  3387. </Dataset>
  3388. <Dataset id="ds_temp_pidhclkl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3389. <Dataset id="ds_temp_suppkindchk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3390. <Dataset id="ds_temp_hiracnfmnochk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  3391. </Objects>
  3392. <Bind>
  3393. <BindItem id="item22" compid="ipt_no" propid="value" datasetid="ds_init_iteminfo" columnid="cmpyno"/>
  3394. <BindItem id="item0" compid="ipt_pid" propid="value" datasetid="ds_init_iteminfo" columnid="pid"/>
  3395. <BindItem id="item1" compid="ipt_patnm" propid="value" datasetid="ds_init_iteminfo" columnid="patnm"/>
  3396. <BindItem id="item2" compid="opt_wardcdnm" propid="value" datasetid="ds_init_iteminfo" columnid="wardcdnm"/>
  3397. <BindItem id="item3" compid="opt_roomcdnm" propid="value" datasetid="ds_init_iteminfo" columnid="roomcdnm"/>
  3398. <BindItem id="item4" compid="opt_rrgstno" propid="value" datasetid="ds_init_iteminfo" columnid="rrgstno"/>
  3399. <BindItem id="item5" compid="opt_insukind" propid="value" datasetid="ds_init_iteminfo" columnid="insukindcd"/>
  3400. <BindItem id="item6" compid="opt_suppkind" propid="value" datasetid="ds_init_iteminfo" columnid="suppkindcd"/>
  3401. <BindItem id="item7" compid="opt_patientsex" propid="value" datasetid="ds_init_iteminfo" columnid="gender"/>
  3402. <BindItem id="item8" compid="cmb_insukind" propid="value" datasetid="ds_init_iteminfo" columnid="insukindcd"/>
  3403. <BindItem id="item9" compid="cmb_suppkind" propid="value" datasetid="ds_init_iteminfo" columnid="suppkindcd"/>
  3404. <BindItem id="item10" compid="opt_ownrate" propid="value" datasetid="ds_init_iteminfo" columnid="ownrate"/>
  3405. <BindItem id="item11" compid="cmb_orddeptcd" propid="value" datasetid="ds_init_iteminfo" columnid="orddeptcd"/>
  3406. <BindItem id="item12" compid="opt_medispclnm" propid="value" datasetid="ds_init_iteminfo" columnid="medispclnm"/>
  3407. <BindItem id="item13" compid="opt_medispclidyn" propid="value" datasetid="ds_init_iteminfo" columnid="specordyn"/>
  3408. <BindItem id="item14" compid="opt_atdoctnm" propid="value" datasetid="ds_init_iteminfo" columnid="atdoctnm"/>
  3409. <BindItem id="item15" compid="cmb_indd" propid="value" datasetid="ds_init_iteminfo" columnid="indd"/>
  3410. <BindItem id="item16" compid="ipt_dschnotidt" propid="value" datasetid="ds_init_iteminfo" columnid="dschnotidt"/>
  3411. <BindItem id="item17" compid="ipt_indaycnt" propid="value" datasetid="ds_init_iteminfo" columnid="indaycnt"/>
  3412. <BindItem id="item18" compid="ipt_meddaycnt" propid="value" datasetid="ds_init_iteminfo" columnid="medcaredayno"/>
  3413. <BindItem id="item19" compid="cmb_inpath" propid="value" datasetid="ds_init_iteminfo" columnid="inpath"/>
  3414. <BindItem id="item20" compid="ipt_arvpath" propid="value" datasetid="ds_init_iteminfo" columnid="arvpath"/>
  3415. <BindItem id="item21" compid="cmb_ordrslt" propid="value" datasetid="ds_init_iteminfo" columnid="ordrslt"/>
  3416. <BindItem id="item23" compid="opt_cmpynm" propid="value" datasetid="ds_init_iteminfo" columnid="cmpynm"/>
  3417. <BindItem id="item24" compid="ipt_insuno" propid="value" datasetid="ds_init_iteminfo" columnid="insuno"/>
  3418. <BindItem id="item25" compid="opt_patientage" propid="value" datasetid="ds_init_iteminfo" columnid="age"/>
  3419. <BindItem id="item26" compid="grp_calc.chk_showsubtotal" propid="value" datasetid="ds_hiddend_list1_isclcond" columnid="showsubtotal"/>
  3420. <BindItem id="item27" compid="grp_calc.rdo_actmatflag" propid="value" datasetid="ds_hidden_list1_isclcond" columnid="selectedrdomatract"/>
  3421. <BindItem id="item28" compid="grp_calc.rdo_insuflag" propid="value" datasetid="ds_hidden_list1_isclcond" columnid="selectedRdoPay"/>
  3422. <BindItem id="item29" compid="grp_calc.rdo_ordfilflag" propid="value" datasetid="ds_hidden_list1_isclcond" columnid="selectedRdoItem"/>
  3423. <BindItem id="item31" compid="grp_calc.rdo_actingflag" propid="value" datasetid="ds_hidden_list1_isclcond" columnid="actflag"/>
  3424. <BindItem id="item32" compid="grp_calc.rdo_cpflag" propid="value" datasetid="ds_hidden_list1_isclcond" columnid="selectedRdoCp"/>
  3425. <BindItem id="item33" compid="grp_calc.chk_probpatientred" propid="value" datasetid="ds_hidden_item1" columnid="probpatred"/>
  3426. <BindItem id="item34" compid="grp_calc.chk_probpatientgreen" propid="value" datasetid="ds_hidden_item1" columnid="probpatgreen"/>
  3427. <BindItem id="item35" compid="group7.opt_sum_payamt" propid="value" datasetid="ds_itemcalc" columnid="payamt"/>
  3428. <BindItem id="item36" compid="group7.opt_sum_ownbpayamt" propid="value" datasetid="ds_itemcalc" columnid="ownbpayamt"/>
  3429. <BindItem id="item37" compid="group7.opt_sum_nopyamt" propid="value" datasetid="ds_itemcalc" columnid="nopyamt"/>
  3430. <BindItem id="item38" compid="group7.opt_sum_ownbnopyamt" propid="value" datasetid="ds_itemcalc" columnid="ownbnopyamt"/>
  3431. <BindItem id="item39" compid="group7.opt_sum_specamt" propid="value" datasetid="ds_itemcalc" columnid="specamt"/>
  3432. <BindItem id="item40" compid="group7.opt_sum_ownbspecamt" propid="value" datasetid="ds_itemcalc" columnid="ownbspecamt"/>
  3433. <BindItem id="item41" compid="swt_spclmemo.case_judgrmemo.tar_judgrmk" propid="value" datasetid="ds_init_iteminfo" columnid="judgrmk"/>
  3434. <BindItem id="item42" compid="swt_spclmemo.case_judgrmemo.tar_dumprmk" propid="value" datasetid="ds_init_iteminfo" columnid="dumprmk"/>
  3435. <BindItem id="item43" compid="swt_spclmemo.case_ediclammemo.tar_edirmk" propid="value" datasetid="ds_init_iteminfo" columnid="edirmk"/>
  3436. <BindItem id="item44" compid="swt_spclmemo.case_tstmemo.textarea1" propid="value" datasetid="ds_init_iteminfo" columnid="tstrmk"/>
  3437. <BindItem id="item45" compid="grp_calc.ipt_srchfromdate" propid="value" datasetid="ds_send" columnid="ordfromdd"/>
  3438. <BindItem id="item46" compid="grp_calc.ipt_srchtodate" propid="value" datasetid="ds_send" columnid="ordtodd"/>
  3439. <BindItem id="item47" compid="swt_spclmemo.case_spclspec.rdo_unitflag" propid="value" datasetid="ds_send" columnid="unitflag"/>
  3440. <BindItem id="item48" compid="group7.chk_totalsum" propid="value" datasetid="ds_send" columnid="totalsumflag"/>
  3441. <BindItem id="item51" compid="group7.opt_sum_owbtotordamt" propid="value" datasetid="ds_itemcalc" columnid="ownbtotordamt"/>
  3442. <BindItem id="item49" compid="group7.opt_sum_totordamt" propid="value" datasetid="ds_itemcalc" columnid="totordamt"/>
  3443. <BindItem id="item50" compid="grp_calc.ipt_judgdate" propid="value" datasetid="ds_init_iteminfo" columnid="lastjudgdt"/>
  3444. <BindItem id="item53" compid="grp_calc.ipt_judgdate00" propid="value" datasetid="ds_erjininfo" columnid="gjudgdt"/>
  3445. <BindItem id="item52" compid="grp_calc.roundrect4" propid="text" datasetid="ds_init_iteminfo" columnid="ordtypemsg"/>
  3446. <BindItem id="item54" compid="grp_calc.opt_specordtype" propid="value" datasetid="ds_init_iteminfo" columnid="specordtype"/>
  3447. <BindItem id="item55" compid="grp_calc.ipt_judgdate01" propid="value" datasetid="ds_init_iteminfo" columnid="erindt"/>
  3448. <BindItem id="item56" compid="grp_calc.ipt_judgdate02" propid="value" datasetid="ds_init_iteminfo" columnid="eroutdt"/>
  3449. <BindItem id="item57" compid="grp_calc.opt_paylimamt" propid="value" datasetid="ds_erjininfo" columnid="paylimamt"/>
  3450. <BindItem id="item58" compid="grp_calc.ipt_judgdate03" propid="value" datasetid="ds_init_iteminfo" columnid="lastmdlclamdd"/>
  3451. <BindItem id="item59" compid="grp_changeownbrate.cmb_suppkindlist" propid="value" datasetid="ds_init_iteminfo" columnid="suppkindcd"/>
  3452. <BindItem id="item60" compid="group7.opt_sum_prcptotordamt" propid="value" datasetid="ds_itemcalc" columnid="prcptotordamt"/>
  3453. <BindItem id="item61" compid="group7.opt_sum_prcpownbamt" propid="value" datasetid="ds_itemcalc" columnid="prcpownbamt"/>
  3454. <BindItem id="item62" compid="group7.opt_sum_totsumamt" propid="value" datasetid="ds_itemcalc" columnid="totsumamt"/>
  3455. <BindItem id="item63" compid="group7.opt_sum_totsumownbamt" propid="value" datasetid="ds_itemcalc" columnid="totsumownbamt"/>
  3456. <BindItem id="item30" compid="opt_batlockid" propid="value" datasetid="ds_init_iteminfo" columnid="batlockid"/>
  3457. <BindItem id="item64" compid="grp_keycancel.rdo_keycancelrsn" propid="value" datasetid="ds_clamkey_canceldata" columnid="cancelrsn"/>
  3458. <BindItem id="item65" compid="grp_keycancel.ipt_keycancelrsnetc" propid="value" datasetid="ds_clamkey_canceldata" columnid="rsnrem"/>
  3459. <BindItem id="item66" compid="grp_keycancel.rdo_keycanlaftmth" propid="value" datasetid="ds_clamkey_canceldata" columnid="cancelresult"/>
  3460. <BindItem id="item67" compid="grp_keycancel.ipt_keycancelrsnetc00" propid="value" datasetid="ds_clamkey_canceldata" columnid="resultrem1"/>
  3461. <BindItem id="item68" compid="grp_keycancel.ipt_keycancelrsnetc01" propid="value" datasetid="ds_clamkey_canceldata" columnid="resultrem2"/>
  3462. <BindItem id="item69" compid="grp_keycancel.ipt_keycancelrsnetc02" propid="value" datasetid="ds_clamkey_canceldata" columnid="resultrem9"/>
  3463. </Bind>
  3464. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  3465. * System Name :
  3466. * Job Name :
  3467. * Creator :
  3468. * Make Date : 2015-05-01
  3469. * Description :
  3470. *---------------------------------------------------------------------------------------
  3471. * Modify Date Modifier Modify Description
  3472. *---------------------------------------------------------------------------------------
  3473. * 2015-05-01 Live Converter TF->XP
  3474. *
  3475. *---------------------------------------------------------------------------------------
  3476. ****************************************************************************************/
  3477. include "com_commonxp::comm_main.xjs";
  3478. include "pam_pamcomnxp::PAM001.xjs";
  3479. include "pam_insucomxp::PAM.xjs";
  3480. include "pam_bfjudgxp::pam_grd.xjs";
  3481. var arErrorCode = new HashArray();
  3482. var gv_today = utlf_getCurrentDate();
  3483. var gv_fromdd = gv_today.toDate().getAddDate(-6,"M").getDateFormat("YYYYMM");
  3484. var gv_userid = sysf_getUserId();
  3485. var gv_usernm = sysf_getUserName();
  3486. //global
  3487. var gv_pid = "";
  3488. var gv_mskind = "";
  3489. var gv_seqno = "";
  3490. var gv_rrgstno = "";
  3491. var gv_gender = "";
  3492. var gv_orddeptcd = "";
  3493. var gv_indd = "";
  3494. var gv_indd1 = "";
  3495. var gv_inpath = "";
  3496. var gv_dschnotiyn = "";
  3497. var gv_cmpyno = "";
  3498. var gv_patnm = "";
  3499. var gv_age = "";
  3500. var gv_insukindcd = "";
  3501. var gv_insukindnm = "";
  3502. var gv_medispclid = "";
  3503. var gv_medispclnm = "";
  3504. var gv_atdoctnm = "";
  3505. var gv_atdoctid = "";
  3506. var gv_dschdd = "";
  3507. var gv_arvpath = "";
  3508. var gv_cmpynm = "";
  3509. var gv_wardcdnm = "";
  3510. var gv_wardcd = "";
  3511. var gv_roomcdnm = "";
  3512. var gv_roomcd = "";
  3513. var gv_suppkindcd = "";
  3514. var gv_suppkindnm = "";
  3515. var gv_ownrate = "";
  3516. var gv_indaycnt = "";
  3517. var gv_ordrslt = "";
  3518. var gv_insuno = "";
  3519. var gv_judgrmk = "";
  3520. var gv_edirmk = "";
  3521. var gv_tstrmk = "";
  3522. var gv_judgrmk = "";
  3523. var gv_edirmk = "";
  3524. var gv_tstrmk = "";
  3525. var gv_totordamt = "";
  3526. var gv_medcaretotamt = "";
  3527. var gv_payownbamt = "";
  3528. var gv_payinsubamt = "";
  3529. var gv_nopyamt = "";
  3530. var gv_specamt = "";
  3531. var gv_dschjudgprcsstat = "";
  3532. var gv_cretno = "";
  3533. var gv_probjudgflag = "";
  3534. var gv_lastjudgdt = "";
  3535. var gv_opflag = "";
  3536. var gv_dschnotidt = "";
  3537. var gv_dschnotiyn = "";
  3538. var gv_specordyn = "";
  3539. var gv_ordtypemsg = "";
  3540. var gv_medcaredayno = "";
  3541. var gv_dschcalcdaysno = "";
  3542. var gv_brthdd = "";
  3543. var gv_receiptyn = "";
  3544. var gv_lastjudgendid = "";
  3545. var gv_lastjudgendnm = "";
  3546. var gv_ordtype = "";
  3547. var gv_brateflag = "";
  3548. var gv_instcd = "";
  3549. var gv_dschdclrdt = "";
  3550. var gv_midregistyn = "";
  3551. var gv_maxhopedd = "";
  3552. var gv_dscharngmnmemo = "";
  3553. var gv_instcd = "";
  3554. var gv_lastmdlclamdd = "";
  3555. var gv_sixtimyn = "";
  3556. var gv_rareyn = "";
  3557. var gv_mig = "";
  3558. var gv_selyn = "";
  3559. var gv_futureinsuyn = "";
  3560. var gv_trgt = "";
  3561. var gv_indschacptstat = "";
  3562. var gv_cpyn = "";
  3563. var gv_msyn = "";
  3564. var gv_spcdrugyn = "";
  3565. var gv_normalownbrate = "";
  3566. var gv_cfe = "";
  3567. var gv_dethdt = "";
  3568. var gv_maxexecdd = "";
  3569. var gv_ownbmaxgradeflag = "";
  3570. var gv_calcscorrecalflag = "";
  3571. var gv_clamkey = "";
  3572. var gv_erorddeptcd = "";
  3573. var gv_dumpexistyn = "";
  3574. var gv_noactyn = "";
  3575. var gv_todd = "";
  3576. var gv_recalcyn = "";
  3577. var gv_dschantichk = "";
  3578. var gv_reqdeptno = "";
  3579. var gv_paygrntyn = "";
  3580. var gv_dschdclrtyn = "";
  3581. var gv_judgrmk_orign = "";
  3582. var gv_edirmk_orign = "";
  3583. var gv_tstrmk_orign = "";
  3584. var gv_eroutdt = "";
  3585. var gv_erindt = "";
  3586. var gv_orgordtype = "";
  3587. var gv_realinpath = "";
  3588. var gv_bornbaby = "";
  3589. var gv_ordrow = "";
  3590. var gv_ownbmaxgrade = "";
  3591. var gv_ownlimmitamt = "";
  3592. var gv_reshowyn = "";
  3593. var gv_batlockid = "";
  3594. var gv_etcordflag = "";
  3595. var grd_diaglist_cheight = grd_diaglist.position.height;
  3596. var swt_spclmemo_cwidth = swt_spclmemo.position.width;
  3597. var grp_calc_ctop = grp_calc.position.top;
  3598. var swt_spclmemo_cheight = swt_spclmemo.position.height;
  3599. function fRefrhVar(obj:Dataset){
  3600. gv_curdd = utlf_getCurrentDate();
  3601. gv_today = utlf_getCurrentDate();
  3602. gv_fromdd = gv_today.toDate().getAddDate(-6,"M").getDateFormat("YYYYMM");
  3603. for (var i=0, colcnt=obj.getColCount(); i < colcnt; i++){
  3604. eval( "gv_"+obj.getColID(i) + " = utlf_transNullToEmpty(obj.getColumn(obj.rowposition == -1 ? 0 : obj.rowposition, obj.getColID(i)));" );
  3605. }
  3606. gv_ordrow = -1;
  3607. }
  3608. function SMPIJ00300_oninit(obj:Form, e:InitEventInfo)
  3609. {
  3610. frmf_initForm(obj);
  3611. }
  3612. function SMPIJ00300_onload(obj:Form, e:LoadEventInfo)
  3613. {
  3614. grd_diaglist.autoenter = "key";
  3615. grd_diaglist.cellmovingtype = "col";
  3616. grd_diaglist.cellsizingtype = "col";
  3617. grd_diaglist.selecttype = "multirow";
  3618. swt_spclmemo.case_spclspec.grd_clcjlist.autoenter = "select";
  3619. swt_spclmemo.case_spclspec.grd_clcjlist.cellmovingtype = "col";
  3620. swt_spclmemo.case_spclspec.grd_clcjlist.cellsizingtype = "col";
  3621. swt_spclmemo.case_spclspec.grd_clcjlist.selecttype = "multirow";
  3622. grp_calc.grd_ordlist.autoenter = "key";
  3623. grp_calc.grd_ordlist.cellmovingtype = "col";
  3624. grp_calc.grd_ordlist.cellsizingtype = "col";
  3625. grp_calc.grd_ordlist.selecttype = "multirow";
  3626. frmf_closeChildPop();
  3627. fInitialize();
  3628. var objArgs = new Object();
  3629. objArgs.arg_ds_temp = ds_temp;
  3630. frmf_open("SMPIJ00200","SMPIJ00200", objArgs, null, 10, 10, null, null, null, null, null, null, "M");
  3631. }
  3632. //화면 open시(와 초기화 버튼 클릭시) 화면 초기화 기능을 수행한다.
  3633. function fInitialize() {
  3634. // 공통코드를 조회한다.
  3635. var arrParam = new Array();
  3636. arrParam = [{dsNm: "ds_init_cmb_inpath", cdGrpId: "P0111", showValue: false}
  3637. , {dsNm: "ds_init_cmb_ordrslt", cdGrpId: "P0110", showValue: false}
  3638. , {dsNm: "ds_init_ipt_arvpath", cdGrpId: "P0112", showValue: false}
  3639. , {dsNm: "ds_init_cmb_insukind", cdGrpId: "P0008", showValue: false}
  3640. , {dsNm: "ds_P0010list", cdGrpId: "P0010", showValue: false}
  3641. , {dsNm: "ds_P0117list", cdGrpId: "P0117", showValue: false}
  3642. , {dsNm: "ds_P0551list", cdGrpId: "P0551", showValue: false}
  3643. , {dsNm: "ds_P0556list", cdGrpId: "P0556", showValue: false}];
  3644. appf_getCodeList(arrParam, false); //비동기
  3645. arrParam = [{dsNm: "ds_PK029list", cdGrpId: "PK029", showValue: true}
  3646. ,{dsNm: "ds_PK232list", cdGrpId: "PK232", showValue: true}];
  3647. // 2013.02.19 - 부가코드 원무공통코드조회
  3648. pamfGetCodeList(arrParam, true); //비동기
  3649. arrParam = [{dsNm: "ds_P0506list", cdGrpId: "P0506", showValue: false}];
  3650. appf_getCodeList(arrParam, false); //비동기
  3651. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  3652. ds_send.setColumn(0,"totalsumflag", "Y");
  3653. ds_send.setColumn(0,"unitflag", "-");
  3654. ds_send.setColumn(0,"trgt", "N");
  3655. ds_send.setColumn(0,"instcd", sysf_getUserInfo("dutplceinstcd"));
  3656. var indd = ds_init_iteminfo.getColumn(0,"indd");
  3657. ds_send.setColumn(0,"indd", indd);
  3658. ds_send.setColumn(0,"basedd", gv_today);
  3659. var oParam = {};
  3660. oParam.id = "TRPIJ00305";
  3661. oParam.service = "bfjudgapp.InHospJudg";
  3662. oParam.method = "reqGetDeptList";
  3663. oParam.inds = "req=ds_send";
  3664. oParam.outds = "ds_init_cmb_orddeptcd=dept";
  3665. oParam.async = true;
  3666. //oParam.callback = "cf_TRPIJ00305";
  3667. tranf_submit(oParam);
  3668. oParam = {};
  3669. oParam.id = "TRASB02301";
  3670. oParam.service = "infcmngtapp.LglyDisMngt";
  3671. oParam.method = "reqGetLglyDisInfo";
  3672. oParam.inds = "req=ds_send";
  3673. oParam.outds = "ds_lglydisinfo=list";
  3674. oParam.async = true;
  3675. oParam.callback = "cf_TRASB02301";
  3676. tranf_submit(oParam);
  3677. }
  3678. function cf_Uuee_SMPIJ00300(sSvcId, nErrorCode, sErrorMsg) {
  3679. if(nErrorCode < 0) return;
  3680. var grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_ordlist","compsnm");
  3681. var refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_ordlist","compscnts");
  3682. var sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_ordlist","compssizecnts");
  3683. var diag_grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_diaglist","compsnm");
  3684. var diag_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_diaglist","compscnts");
  3685. var diag_sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_diaglist","compssizecnts");
  3686. var clcjlist_name = ds_hidden_listval_uuee.lookup("compsnm","grd_clcjlist","compsnm");
  3687. var clcjlist_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_clcjlist","compscnts");
  3688. var clcjlist_sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_clcjlist","compssizecnts");
  3689. if (!utlf_isNull(grd_name)) {
  3690. grdf_SetOrderInfoOfCol_format(grp_calc.grd_ordlist,refdata,sizedata);
  3691. }
  3692. if (!utlf_isNull(diag_grd_name)) {
  3693. grdf_SetOrderInfoOfCol_format(grd_diaglist,diag_refdata,diag_sizedata);
  3694. }
  3695. if (!utlf_isNull(clcjlist_name)) {
  3696. grdf_SetOrderInfoOfCol_format(swt_spclmemo.case_spclspec.grd_clcjlist,clcjlist_refdata,clcjlist_sizedata);
  3697. }
  3698. grdf_initGrid(swt_spclmemo.case_spclspec.grd_clcjlist);
  3699. grdf_setToolTipBind(swt_spclmemo.case_spclspec.grd_clcjlist);
  3700. grdf_initGrid(grd_diaglist);
  3701. grdf_setToolTipBind(grd_diaglist);
  3702. grdf_initGrid(grp_calc.grd_ordlist);
  3703. grdf_setToolTipBind(grp_calc.grd_ordlist);
  3704. grdf_setRowTypeIcon(swt_spclmemo.case_spclspec.grd_clcjlist, 0);
  3705. grdf_setRowTypeIcon(grd_diaglist, 0);
  3706. lf_grid_band_left(grp_calc.grd_ordlist, 10);
  3707. grp_calc.grd_ordlist.setCellProperty("body",grp_calc.grd_ordlist.getBindCellIndex("body","text"),"tooltiptext","expr:fSetSpclTooltipText(currow, edicd)");
  3708. fSetRdoReset();
  3709. }
  3710. function fSetRdoReset(){
  3711. grp_calc.rdo_actmatflag.value = "-";
  3712. grp_calc.rdo_actingflag.value = "all";
  3713. grp_calc.rdo_insuflag.value = "-";
  3714. grp_calc.rdo_ordfilflag.value = "-";
  3715. grp_calc.rdo_cpflag.value = "-";
  3716. cnrlf_setOrderInfoOfCtrl(grp_calc.chk_showsubtotal , ds_hidden_listval_uuee, "N");
  3717. cnrlf_setOrderInfoOfCtrl(grp_calc.chk_showitemcoloryn , ds_hidden_listval_uuee, "N");
  3718. cnrlf_setOrderInfoOfCtrl(grp_calc.rdo_zerofilter , ds_hidden_listval_uuee, "-");
  3719. grp_calc_rdo_zerofilter_onitemchanged(grp_calc.rdo_zerofilter,null);
  3720. ds_hidden_list1_isclcond.setColumn(0,"matractflag","");
  3721. ds_hidden_list1_isclcond.setColumn(0,"calcpayflag","");
  3722. ds_hidden_list1_isclcond.setColumn(0,"snglcalcscorcls","");
  3723. ds_hidden_list1_isclcond.setColumn(0,"cpflag","");
  3724. ds_hidden_list1_isclcond.setColumn(0,"edicd","");
  3725. ds_hidden_list1_isclcond.setColumn(0,"snglcalcscorcd","");
  3726. ds_hidden_list1_isclcond.setColumn(0,"actingflag","");
  3727. }
  3728. function fOpenSMPIS00500Detail() {
  3729. var irow = ds_grd_ordlist.rowcount;
  3730. ds_cond_smpis00500.clearData();
  3731. ds_cond_smpis00500.addRow();
  3732. ds_cond_smpis00500.setColumn(0, "patunitsrch" , gv_pid);
  3733. ds_cond_smpis00500.setColumn(0, "code" , ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd"));
  3734. ds_cond_smpis00500.setColumn(0, "datecond" , "");
  3735. ds_cond_smpis00500.setColumn(0, "fromdd" , gv_indd1);
  3736. ds_cond_smpis00500.setColumn(0, "todd" , gv_todd);
  3737. ds_cond_smpis00500.setColumn(0, "ioflag" , "I");
  3738. ds_cond_smpis00500.setColumn(0, "orddrid" , gv_medispclid);
  3739. ds_cond_smpis00500.setColumn(0, "codecond" , "");
  3740. ds_cond_smpis00500.setColumn(0, "judgrid" , "");
  3741. ds_cond_smpis00500.setColumn(0, "cancer" , "");
  3742. ds_cond_smpis00500.setColumn(0, "large" , "");
  3743. ds_cond_smpis00500.setColumn(0, "middle" , "");
  3744. ds_cond_smpis00500.setColumn(0, "small" , "");
  3745. ds_cond_smpis00500.setColumn(0, "edicd" , "");
  3746. frmf_open("SMPIS00500", "SMPIS00500", {objDs:ds_cond_smpis00500}, "", "", "", "", "", "", "", "", "", "M");
  3747. }
  3748. function img_msg_onclick(obj:ImageViewer, e:ClickEventInfo)
  3749. {
  3750. // 등록번호가 존재하면(환자가 조회되었다는 판단에 의해) 간편조회 열기
  3751. if ( gv_pid != " " && gv_pid != "-" ){
  3752. // SMPIJ00300.js 환자전체 메세지 내용 간편조회
  3753. fJudgPatMsgTrsmRef();
  3754. }
  3755. }
  3756. //심사변경유무 체크 확인
  3757. function fCheckChngStatus() {
  3758. fRefrhVar(ds_init_iteminfo);
  3759. var rslt = true;
  3760. var judgrmk = utlf_transNullToEmpty(gv_judgrmk);
  3761. var edirmk = utlf_transNullToEmpty(gv_edirmk);
  3762. var tstrmk = utlf_transNullToEmpty(gv_tstrmk);
  3763. var judgrmk_orign = utlf_transNullToEmpty(gv_judgrmk_orign);
  3764. var edirmk_orign = utlf_transNullToEmpty(gv_edirmk_orign);
  3765. var tstrmk_orign = utlf_transNullToEmpty(gv_tstrmk_orign);
  3766. for (var i = 0, rowcnt = ds_grd_clcjlist.rowcount; i < rowcnt; i++) {
  3767. if (ds_grd_clcjlist.getRowType(i) > 1
  3768. && !utlf_isNull(ds_grd_clcjlist.getColumn(i,"edicd"))
  3769. && !utlf_isNull(ds_grd_clcjlist.getColumn(i,"spclcd"))) {
  3770. rslt = false;
  3771. }
  3772. }
  3773. if (judgrmk != judgrmk_orign) {
  3774. rslt = false;
  3775. }
  3776. if (edirmk != edirmk_orign) {
  3777. rslt = false;
  3778. }
  3779. if (tstrmk != tstrmk_orign) {
  3780. rslt = false;
  3781. }
  3782. return rslt;
  3783. }
  3784. function fGetItemInfo(paramFlag){
  3785. var wndobj = frmf_findPopup("SPPIZ00400");
  3786. if(!utlf_isNull(wndobj))
  3787. {
  3788. wndobj.close();//초기화함수 호출
  3789. }
  3790. var wndobj = frmf_findPopup("SMPIZ00100");
  3791. if(!utlf_isNull(wndobj))
  3792. {
  3793. wndobj.close();//초기화함수 호출
  3794. }
  3795. gv_reshowyn = "";
  3796. // 검색조건 초기화
  3797. grp_calc.rdo_actmatflag.value = "-";
  3798. grp_calc.rdo_actingflag.value = "all";
  3799. grp_calc.rdo_insuflag.value = "-";
  3800. grp_calc.rdo_ordfilflag.value = "-";
  3801. grp_calc.rdo_cpflag.value = "-";
  3802. //버튼 초기화
  3803. group9.visible = false;
  3804. grp_msg.visible = false;
  3805. opt_etcordflag.visible = false;
  3806. btn_attData.class = "btn2";
  3807. grp_calc.btn_drginfo.visible = false;
  3808. if (utlf_isNull(ipt_pid.value)) {
  3809. sysf_messageBox("환자번호를","C001");
  3810. return;
  3811. }
  3812. appf_delPatientInfos();//상단정보초기화
  3813. ds_hidden_item1.clearData();
  3814. ds_hidden_item1.addRow();
  3815. ds_hidden_item2.clearData();
  3816. ds_hidden_item2.addRow();
  3817. ds_send_iteminfo.clearData();
  3818. ds_send_iteminfo.addRow();
  3819. ds_send_judgrmk.clearData();
  3820. ds_grd_msg.clearData();
  3821. ds_init_cmb_itemraremsg.clearData();
  3822. ds_init_cmb_itemraremsg.clearData();
  3823. ds_rareessc.clearData();
  3824. ds_rooa.clearData();
  3825. ds_vcode.clearData();
  3826. ds_erjininfo.clearData();
  3827. ds_init_medcaredayno.clearData();
  3828. ds_init_dumpclamkeyexistyn.clearData();
  3829. ds_init_cmb_suppkindlist.clearData();
  3830. ds_init_cmb_itemraremsg.clearData();
  3831. ds_init_vdiagyn.clearData();
  3832. ds_init_paylimityn.clearData();
  3833. ds_init_cmb_indd.clearData();
  3834. ds_init_retcspec.clearData();
  3835. ds_init_ownbmaxamt.clearData();
  3836. ds_init_patdnorinfo.clearData();
  3837. ds_grd_insuhistory.clearData();
  3838. ds_grd_diaglist.clearData();
  3839. ds_grd_clcjlist.clearData();
  3840. ds_grd_datagrid1.clearData();
  3841. ds_msglist.clearData();
  3842. ds_outrateinsusuppflag.clearData();
  3843. ds_emrdiagpamdiag.clearData();
  3844. ds_goso.clearData();
  3845. ds_cnstinfo.clearData();
  3846. ds_spcdrugyn.clearData();
  3847. ds_init_obgydiag.clearData();
  3848. ds_grd_ordlist.clearData();
  3849. ds_isclediudiff.clearData();
  3850. dsf_setDefaultVal(ds_send, "trgt:N,totalsumflag:N");
  3851. dsf_setTypeFormat(ds_send, "cretno:INT");
  3852. ds_send.setColumn(0,"basedd",gv_today);
  3853. ds_send.setColumn(0,"paramflag",paramFlag);
  3854. ds_send.setColumn(0,"instcd", sysf_getUserInfo("dutplceinstcd"));
  3855. var oParam = {};
  3856. oParam.id = "TRPIJ00301";
  3857. oParam.service = "bfjudgapp.InHospJudg";
  3858. oParam.method = "reqGetInHospJudgInfo_xp";
  3859. oParam.inds = "req=ds_send";
  3860. oParam.outds = "ds_init_iteminfo=iteminfo";
  3861. oParam.async = false;
  3862. oParam.callback = "cf_TRPIJ00301";
  3863. tranf_submit(oParam);
  3864. fSetOutPatPamInfo(); //상단정보 올리기
  3865. oParam = {};
  3866. oParam.id = "TRPIJ00347";
  3867. oParam.service = "bfjudgapp.InHospJudg";
  3868. oParam.method = "reqGetErJinYn";
  3869. oParam.inds = "req=ds_init_iteminfo";
  3870. oParam.outds = "ds_erjininfo=erjininfo";
  3871. oParam.async = true;
  3872. oParam.progress = false;
  3873. oParam.callback = "cf_TRPIJ00347"; //fGetIsclList
  3874. tranf_submit(oParam);
  3875. oParam = {};
  3876. oParam.id = "TRPIJ00321";
  3877. oParam.service = "bfjudgapp.InHospJudg";
  3878. oParam.method = "reqGetMedcareDayNo_xp";
  3879. oParam.inds = "req=ds_init_iteminfo";
  3880. oParam.outds = "ds_init_medcaredayno=medcaredayno";
  3881. oParam.async = true;
  3882. oParam.progress = false;
  3883. oParam.callback = "cf_TRPIJ00321";
  3884. tranf_submit(oParam);
  3885. oParam = {};
  3886. oParam.id = "TRPIJ00324";
  3887. oParam.service = "bfjudgapp.InHospJudg";
  3888. oParam.method = "reqGetDumpClamkeyExistYn_xp";
  3889. oParam.inds = "req=ds_init_iteminfo";
  3890. oParam.outds = "ds_init_dumpclamkeyexistyn=dumpclamkeyexistyn";
  3891. oParam.async = true;
  3892. oParam.progress = false;
  3893. oParam.callback = "cf_TRPIJ00324";
  3894. tranf_submit(oParam);
  3895. oParam = {};
  3896. oParam.id = "TRPIJ00331";
  3897. oParam.service = "bfjudgapp.InHospJudg";
  3898. oParam.method = "reqGetSuppRate_xp";
  3899. oParam.inds = "req=ds_send";
  3900. oParam.outds = "ds_init_cmb_suppkindlist=insu";
  3901. oParam.async = true;
  3902. oParam.progress = false;
  3903. tranf_submit(oParam);
  3904. oParam = {};
  3905. oParam.id = "TRPIJ00340";
  3906. oParam.service = "bfjudgapp.InHospJudg";
  3907. oParam.method = "reqGetRareCancerMsg_xp";
  3908. oParam.inds = "req=ds_send";
  3909. oParam.outds = "ds_init_cmb_itemraremsg=rarecancermsg";
  3910. oParam.async = true;
  3911. oParam.progress = false;
  3912. oParam.callback = "cf_TRPIJ00340";
  3913. tranf_submit(oParam);
  3914. fGetOperStat();
  3915. oParam = {};
  3916. oParam.id = "TRPIJ00322";
  3917. oParam.service = "bfjudgapp.InHospJudg";
  3918. oParam.method = "reqGetVDiagyn_xp";
  3919. oParam.inds = "req=ds_send";
  3920. oParam.outds = "ds_init_vdiagyn=vdiagyn";
  3921. oParam.async = true;
  3922. oParam.progress = false;
  3923. oParam.callback = "cf_TRPIJ00322";
  3924. tranf_submit(oParam);
  3925. oParam = {};
  3926. oParam.id = "TRPIJ00323";
  3927. oParam.service = "bfjudgapp.InHospJudg";
  3928. oParam.method = "reqGetPayLimitYn_xp";
  3929. oParam.inds = "req=ds_send";
  3930. oParam.outds = "ds_init_paylimityn=paylimityn";
  3931. oParam.async = true;
  3932. oParam.progress = false;
  3933. oParam.callback = "cf_TRPIJ00323";
  3934. tranf_submit(oParam);
  3935. oParam = {};
  3936. oParam.id = "TRPIJ00328";
  3937. oParam.service = "bfjudgapp.InHospJudg";
  3938. oParam.method = "reqGetInHospJudgIndd_xp";
  3939. oParam.inds = "req=ds_send";
  3940. oParam.outds = "ds_init_cmb_indd=inddlist";
  3941. oParam.async = true;
  3942. oParam.progress = false;
  3943. tranf_submit(oParam);
  3944. oParam = {};
  3945. oParam.id = "TRPIJ00325";
  3946. oParam.service = "bfjudgapp.InHospJudg";
  3947. oParam.method = "reqGetRetcSpec_xp";
  3948. oParam.inds = "req=ds_send";
  3949. oParam.outds = "ds_init_retcspec=retcspec";
  3950. oParam.async = true;
  3951. oParam.progress = false;
  3952. oParam.callback = "cf_TRPIJ00325";
  3953. tranf_submit(oParam);
  3954. if (gv_insukindcd == "11")
  3955. {
  3956. oParam = {};
  3957. oParam.id = "TRPIJ00326";
  3958. oParam.service = "bfjudgapp.InHospJudg";
  3959. oParam.method = "reqGetOwnbMaxAmt_xp";
  3960. oParam.inds = "req=ds_send";
  3961. oParam.outds = "ds_init_ownbmaxamt=ownbmaxamt";
  3962. oParam.async = true;
  3963. oParam.progress = false;
  3964. oParam.callback = "cf_TRPIJ00326";
  3965. tranf_submit(oParam);
  3966. }
  3967. oParam = {};
  3968. oParam.id = "TRPIJ00327";
  3969. oParam.service = "bfjudgapp.InHospJudg";
  3970. oParam.method = "reqGetDnorPatInfo_xp";
  3971. oParam.inds = "req=ds_send";
  3972. oParam.outds = "ds_init_patdnorinfo=patdnorinfo";
  3973. oParam.async = true;
  3974. oParam.progress = false;
  3975. oParam.callback = "cf_TRPIJ00327";
  3976. tranf_submit(oParam);
  3977. oParam = {};
  3978. oParam.id = "TRPIJ00330";
  3979. oParam.service = "bfjudgapp.InHospJudg";
  3980. oParam.method = "reqGetInHospJudgInsu_xp";
  3981. oParam.inds = "req=ds_send";
  3982. oParam.outds = "ds_grd_insuhistory=insulist";
  3983. oParam.async = true;
  3984. oParam.progress = false;
  3985. oParam.callback = "cf_TRPIJ00330";
  3986. tranf_submit(oParam);
  3987. oParam = {};
  3988. oParam.id = "TRPIJ00332";
  3989. oParam.service = "bfjudgapp.InHospJudg";
  3990. oParam.method = "reqGetInHospJudgDiag_xp";
  3991. oParam.inds = "req=ds_send";
  3992. oParam.outds = "ds_grd_diaglist=diaglist";
  3993. oParam.async = true;
  3994. oParam.progress = false;
  3995. oParam.callback = "cf_TRPIJ00332";
  3996. tranf_submit(oParam);
  3997. oParam = {};
  3998. oParam.id = "TRPIJ00333";
  3999. oParam.service = "bfjudgapp.InHospJudg";
  4000. oParam.method = "reqGetInHospJudgClcj_xp";
  4001. oParam.inds = "req=ds_send";
  4002. oParam.outds = "ds_grd_clcjlist=clcjlist";
  4003. oParam.async = true;
  4004. oParam.progress = false;
  4005. oParam.callback = "cf_TRPIJ00333";
  4006. tranf_submit(oParam);
  4007. oParam = {};
  4008. oParam.id = "TRPIJ00334";
  4009. oParam.service = "bfjudgapp.InHospJudg";
  4010. oParam.method = "reqGetSpcdrugList_xp";
  4011. oParam.inds = "req=ds_send";
  4012. oParam.outds = "ds_grd_datagrid1=spcldrug";
  4013. oParam.async = true;
  4014. oParam.progress = false;
  4015. tranf_submit(oParam);
  4016. fGetCalc();
  4017. oParam = {};
  4018. oParam.id = "TRPIJ00336";
  4019. oParam.service = "bfjudgapp.InHospJudg";
  4020. oParam.method = "reqGetJudgMainMsgRef_xp";
  4021. oParam.inds = "req=ds_send";
  4022. oParam.outds = "ds_msglist=msglist";
  4023. oParam.async = true;
  4024. oParam.progress = false;
  4025. oParam.callback = "cf_TRPIJ00336";
  4026. tranf_submit(oParam);
  4027. oParam = {};
  4028. oParam.id = "TRPIJ00337";
  4029. oParam.service = "bfjudgapp.InHospJudg";
  4030. oParam.method = "reqOutRateInsuSuppFlag";
  4031. oParam.inds = "req=ds_send";
  4032. oParam.outds = "ds_outrateinsusuppflag=info";
  4033. oParam.async = true;
  4034. oParam.progress = false;
  4035. oParam.callback = "cf_TRPIJ00337";
  4036. tranf_submit(oParam);
  4037. oParam = {};
  4038. oParam.id = "TRPIJ00342";
  4039. oParam.service = "bfjudgapp.InHospJudg";
  4040. oParam.method = "reqGetEmrDiagPamDiag_xp";
  4041. oParam.inds = "req=ds_send";
  4042. oParam.outds = "ds_emrdiagpamdiag=emrdiagpamdiag";
  4043. oParam.async = true;
  4044. oParam.progress = false;
  4045. oParam.callback = "cf_TRPIJ00342";
  4046. tranf_submit(oParam);
  4047. oParam = {};
  4048. oParam.id = "TRPIJ00345";
  4049. oParam.service = "bfjudgapp.InHospJudg";
  4050. oParam.method = "reqGetGosoList";
  4051. oParam.inds = "req=ds_send";
  4052. oParam.outds = "ds_goso=goso";
  4053. oParam.async = true;
  4054. oParam.progress = false;
  4055. oParam.callback = "cf_TRPIJ00345";
  4056. tranf_submit(oParam);
  4057. oParam = {};
  4058. oParam.id = "TRPIJ00346";
  4059. oParam.service = "bfjudgapp.InHospJudg";
  4060. oParam.method = "reqGetNSTInfo";
  4061. oParam.inds = "req=ds_send";
  4062. oParam.outds = "ds_cnstinfo=cnstinfo";
  4063. oParam.async = true;
  4064. oParam.progress = false;
  4065. oParam.callback = "cf_TRPIJ00346";
  4066. tranf_submit(oParam);
  4067. if (gv_dschnotiyn == "Y") {
  4068. oParam = {};
  4069. oParam.id = "TRPIJ00349";
  4070. oParam.service = "bfjudgapp.InHospJudg";
  4071. oParam.method = "reqGetSpcDrugYn_xp";
  4072. oParam.inds = "req=ds_send";
  4073. oParam.outds = "ds_spcdrugyn=spcdrugyn";
  4074. oParam.async = true;
  4075. oParam.progress = false;
  4076. oParam.callback = "cf_TRPIJ00349";
  4077. tranf_submit(oParam);
  4078. }
  4079. fSetRdoReset(); //처방조회조건부분 클리어
  4080. fSetItemInfoSetting();
  4081. ds_hidden_item1.setColumn(0,"chksave","N"); //상세화면 저장버튼 처리를 위해 넣어 놓는다.
  4082. var dethdd = utlf_transNullToEmpty(gv_dethdt).substr(0,8); // 사망환자 메세지
  4083. if (!utlf_isNull(dethdd) && dethdd != '-') {
  4084. if (gv_maxexecdd > dethdd) {
  4085. lf_setAlramMessage("사망일자 이후 실시처방이 있습니다. 정리 후 진행하십시오.");
  4086. } else {
  4087. lf_setAlramMessage("사망환자[사망시간 " + gv_dethdt.substr(0,4) + ":" + gv_dethdt.substr(4,2) + ":" + gv_dethdt.substr(6,2) + " " + gv_dethdt.substr(8,2) + ":" + gv_dethdt.substr(10,2) + "] 환자입니다.");
  4088. // 사망정보 존재하면 진료결과의 값을 사망으로바꾸어서 저장할때 저장되게끔한다..
  4089. // 퇴원일자와 사망일자가 동일할 때만 진료결과 체크한다.
  4090. if(dethdd == gv_dschdd && gv_ordrslt != "4"){
  4091. ds_init_iteminfo.setColumn(0,"ordrslt", "4");
  4092. gv_ordrslt = "4";
  4093. }
  4094. }
  4095. }
  4096. if (gv_orddeptcd == "2100000000" && gv_age >= 35 ){ //35세 이상 고위험 임신부 관련 메세지 (2015.07.29 LEJ)
  4097. var oParam = {};
  4098. oParam.id = "TRPIJ00344";
  4099. oParam.service = "bfjudgapp.InHospJudg";
  4100. oParam.method = "reqGetObgyDiagYn";
  4101. oParam.inds = "req=ds_send";
  4102. oParam.outds = "ds_init_obgydiag=obgydiag";
  4103. oParam.async = true;
  4104. oParam.callback = "cf_TRPIJ00344";
  4105. tranf_submit(oParam);
  4106. }
  4107. var babyyn ="N";
  4108. var canceryn = "N"; // 6세미만과 등록암이 공존하지 못하도록 20090602 박창원
  4109. var chkBtn = "False";
  4110. if (gv_rrgstno.substr(7,1) == "3" || gv_rrgstno.substr(7,1) == "4" || gv_rrgstno.substr(7,1) == "7" || gv_rrgstno.substr(7,1) == "8" && (gv_cfe != "E" && gv_cfe != "F")) {
  4111. if (utlf_getDateInterval(gv_brthdd,gv_indd) < 28) {
  4112. babyyn = "Y";
  4113. }
  4114. }
  4115. if ( (gv_insukindcd == "11" || gv_insukindcd == "21" || gv_insukindcd == "22") && gv_suppkindcd != "31" && !(gv_insukindcd == "22" && gv_suppkindcd == "08") ){ //20100318 정승우 신생아유형은 메세지 뜨지 않도록 적용하고 버튼도 보이지 않도록
  4116. var oParam = {};
  4117. oParam.id = "TRPIJ00343";
  4118. oParam.service = "bfjudgapp.InHospJudg";
  4119. oParam.method = "reqGetRareesscYN";
  4120. oParam.inds = "req=ds_send";
  4121. oParam.outds = "ds_rareessc=rareessc ds_rooa=rooa";
  4122. oParam.async = false;
  4123. oParam.callback = "cf_TRPIJ00343";
  4124. tranf_submit(oParam); //fCheckEssc() 산정특례여부 체크
  4125. var rareesscyn = ds_rareessc.getColumn(0,"rareesscyn");
  4126. if (gv_insukindcd == "11" && gv_suppkindcd != "32" && rareesscyn == "Y" && gv_suppkindcd != "01" && gv_fromdd >= "20090701") {
  4127. var anohosprgstflag = ds_rooa.getColumn(0,"anohosprgstflag"); // 20090930 JHP 희귀난치 등록여부 확인위해 추가함. -- 시작
  4128. var rareobstno = ds_rooa.getColumn(0,"rareobstno");
  4129. var rareobstfromdd = ds_rooa.getColumn(0,"rareobstfromdd");
  4130. var rareobsttodd = ds_rooa.getColumn(0,"rareobsttodd");
  4131. var signyn = ds_rooa.getColumn(0,"signyn");
  4132. var ruleoutyn = ds_grd_diaglist.getColumn(0,"ruleoutyn"); //희귀난치 메세지는 상병에 R/O 상병일 경우는 메세지 제외함.
  4133. if(ruleoutyn == 'true'){ // 주상병 R/O일때에는 희귀난치 메세지 처리 안함.
  4134. }else{
  4135. if (gv_fromdd >= "20091001") { // 10월1일 이후에는 등록번호가 반드시 있어야한다. - 추가코딩필요
  4136. if(anohosprgstflag == "Y"){ // 타병원등록 여부 , Y:타병원,N:우리병원
  4137. // 희귀난치 번호여부
  4138. if(utlf_isNull(rareobstno) || rareobstno == '-'){
  4139. btn_esscdiag.visible = false;
  4140. lf_setAlramMessage("## 희귀난치정보 ## : 타병원등록이나 희귀난치번호가 없습니다.");
  4141. } else {
  4142. chkBtn = "True";
  4143. btn_esscdiag.visible = true;
  4144. btn_esscdiag.class = "btn5"
  4145. btn_esscdiag.style.font = "Dotum,9,bold";
  4146. // return;
  4147. }
  4148. } else if(anohosprgstflag == "N"){
  4149. // 희귀난치 번호여부
  4150. if(utlf_isNull(rareobstno) || rareobstno == '-'){
  4151. if(signyn == "Y"){
  4152. chkBtn = "True";
  4153. btn_esscdiag.visible = true;
  4154. btn_esscdiag.class = "btn5"
  4155. btn_esscdiag.style.font = "Dotum,9,bold";
  4156. // return;
  4157. } else {
  4158. btn_esscdiag.visible = false;
  4159. lf_setAlramMessage("## 희귀난치정보 ## : 재원병원등록이나 등록번호 및 서명정보가 없습니다.");
  4160. }
  4161. } else{
  4162. chkBtn = "True";
  4163. btn_esscdiag.visible = true;
  4164. btn_esscdiag.class = "btn5"
  4165. btn_esscdiag.style.font = "Dotum,9,bold";
  4166. // return;
  4167. }
  4168. } else {
  4169. btn_esscdiag.visible = false;
  4170. lf_setAlramMessage("## 희귀난치정보 ## : 등록번호 및 서명정보가 없습니다.");// 희귀난치 data(mmohrooa)에 정보없음.
  4171. }
  4172. } else {
  4173. chkBtn = "True";
  4174. btn_esscdiag.visible = true;
  4175. btn_esscdiag.class = "btn5"
  4176. btn_esscdiag.style.font = "Dotum,9,bold";
  4177. // return;
  4178. }
  4179. }
  4180. }
  4181. var oParam = {};
  4182. oParam.id = "TRPIJ00338";
  4183. oParam.service = "bfjudgapp.InHospJudg";
  4184. oParam.method = "reqGetEssc";
  4185. oParam.inds = "req=ds_send";
  4186. oParam.outds = "ds_vcode=vcode";
  4187. oParam.async = true;
  4188. oParam.callback = "cf_TRPIJ00338";
  4189. tranf_submit(oParam);
  4190. }
  4191. if (gv_insukindcd == "11" && gv_suppkindcd == "33" && gv_orddeptcd == "2030000000") {
  4192. lf_setAlramMessage("차상위2종 정신과 환자입니다. 요율확인 바랍니다.");
  4193. }
  4194. if(gv_insukindcd == "11" && chkBtn == "True" && gv_suppkindcd != "05" && gv_suppkindcd != "06" && gv_suppkindcd != "32" && gv_suppkindcd != "39" && gv_cfe != "C" && gv_suppkindcd != "40" && gv_suppkindcd != "50" ){ //개심개두는 입원요율만 적용되게 차상위 2종추가
  4195. //lf_setAlramMessage("중증정보가 존재하는 환자입니다.");
  4196. canceryn = "Y";
  4197. }
  4198. // 6시간 미만여부 추가 - 20081105 박창원
  4199. // 진료과 제한 조건 삭제 - 20090219 박창원
  4200. // 조건 삭제 20091008 JHP 박창원 요청.( insukind == "21" || insukind == "22" )
  4201. if (gv_sixtimyn == "N" && babyyn == "Y" && gv_age == 0 && gv_indd >= "20080101" && (gv_insukindcd == "11") && gv_suppkindcd != "31" && gv_cfe != "C" && utlf_transNullToEmpty(ds_send.getColumn(0,"readonly")) != "Y") {
  4202. var msg = sysf_messageBox("입원한 신생아 입니다. 신생아 유형을 적용","S001");
  4203. if (msg == 6) { // 신생아 요율을 적용한다.
  4204. Insuchange("31");
  4205. }
  4206. }
  4207. if (( gv_insukindcd == "21" || gv_insukindcd == "22") // 의료급여 정신과정액인경우 보조유형 메시지 처리
  4208. && (gv_suppkindcd == "00") && (gv_orddeptcd == "2030000000" || gv_erorddeptcd == "2030000000")) {
  4209. lf_setAlramMessage("의료급여 정신과 보조유형 확인 바랍니다.");
  4210. }
  4211. // 6시간 미만여부 추가
  4212. // 희귀난치일때 6세미만 메세지 적용안함
  4213. if (gv_insukindcd == "11") {
  4214. if (gv_sixtimyn == "N" && chkageyn(6) == "N" && canceryn == "N" && babyyn == "N" && gv_cfe != "C"
  4215. && ds_send.getColumn(0,"readonly") != "Y" && gv_dschjudgprcsstat != "C"
  4216. && gv_suppkindcd != "08" && gv_suppkindcd != "41"
  4217. && (((gv_suppkindcd != "06" && gv_suppkindcd != "40" && gv_suppkindcd != "46" && gv_suppkindcd != "50" && gv_suppkindcd != "51") && gv_fromdd < '20171001') || gv_fromdd >= '20171001')
  4218. ) {
  4219. var msg = sysf_messageBox("6세미만 환자입니다. 6세미만 유형을 적용","S001");
  4220. if (msg == 6) { // 6세미만 요율을 적용한다.
  4221. if (gv_cfe == "E" || gv_cfe == "F") {
  4222. var suppkind = "41";
  4223. } else {
  4224. var suppkind = "08";
  4225. }
  4226. Insuchange(suppkind);
  4227. }
  4228. }
  4229. if (gv_sixtimyn == "N" && chkageyn(6) == "Y" && chkageyn2(16) == "N" && canceryn == "N" && babyyn == "N" && gv_cfe != "C"
  4230. && ds_send.getColumn(0,"readonly") != "Y" && gv_dschjudgprcsstat != "C"
  4231. && gv_suppkindcd != "06" && gv_suppkindcd != "08" && gv_suppkindcd != "41" && gv_suppkindcd != "D4" && gv_suppkindcd != "D5"
  4232. && gv_fromdd >= '20171001'
  4233. ) {
  4234. var msg = sysf_messageBox("15세이하 환자입니다. 15세이하 유형을 적용","S001");
  4235. if (msg == 6) { // 6세미만 요율을 적용한다.
  4236. if (gv_cfe == "E" || gv_cfe == "F") {
  4237. var suppkind = "D5";
  4238. } else {
  4239. var suppkind = "D4";
  4240. }
  4241. Insuchange(suppkind);
  4242. }
  4243. }
  4244. }
  4245. if (gv_insukindcd == "22"){
  4246. if (gv_sixtimyn == "N" && chkageyn(6) == "N" && babyyn == "N"
  4247. && ds_send.getColumn(0,"readonly") != "Y"
  4248. && gv_suppkindcd != "08") {
  4249. var msg = sysf_messageBox("6세미만 환자입니다. 6세미만 유형을 적용","S001");
  4250. if (msg == 6) { // 6세미만 요율을 적용한다.
  4251. var suppkind = "08";
  4252. Insuchange(suppkind);
  4253. }
  4254. }
  4255. if (gv_sixtimyn == "N" && chkageyn(6) == "Y" && chkageyn2(16) == "N" && babyyn == "N"
  4256. && ds_send.getColumn(0,"readonly") != "Y"
  4257. && gv_suppkindcd != "D4"
  4258. && gv_fromdd >= '20171001') {
  4259. var msg = sysf_messageBox("15세이하 환자입니다. 15세이하 유형을 적용","S001");
  4260. if (msg == 6) { // 6세미만 요율을 적용한다.
  4261. var suppkind = "D4";
  4262. Insuchange(suppkind);
  4263. }
  4264. }
  4265. }
  4266. if (gv_insukindcd == "31"){
  4267. if (gv_paygrntyn != "Y") {
  4268. lf_setAlramMessage("자동차보험 지급보증번호 누락입니다. 확인하십시오.");
  4269. }
  4270. }
  4271. if(gv_dschnotiyn == "Y"){
  4272. if(utlf_isNull(gv_ordrslt) || gv_ordrslt == "-" || gv_ordrslt == "1"){
  4273. if(gv_ordrslt != "4"){
  4274. ds_init_iteminfo.setColumn(0,"ordrslt", "9");
  4275. gv_ordrslt = "9";
  4276. }
  4277. }
  4278. }else{
  4279. if(gv_ordrslt == "" || gv_ordrslt == "-"){
  4280. ds_init_iteminfo.setColumn(0,"ordrslt", "1");
  4281. gv_ordrslt = "1";
  4282. }
  4283. }
  4284. fds_P0117list_J.binddataset = "";
  4285. fds_P0117list_J.binddataset = ds_P0117list;
  4286. fds_P0117list_M.binddataset = "";
  4287. fds_P0117list_M.binddataset = ds_P0117list;
  4288. if ( gv_etcordflag == "T" ) {
  4289. opt_etcordflag.visible = true;
  4290. if ( parseFloat(gv_batlockid) >= 15) {
  4291. lf_setAlramMessage("ISS점수가 15점 이상으로 산정특례 대상자 확인 바랍니다.");
  4292. }
  4293. }
  4294. }
  4295. function cf_TRPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
  4296. if(nErrorCode < 0) {
  4297. sysf_messageBox("선택된 환자가","I004");
  4298. return;
  4299. }
  4300. fRefrhVar(ds_init_iteminfo);
  4301. ds_init_iteminfo.setColumn(0,"judgrmk_orign",utlf_transNullToEmpty(gv_judgrmk));
  4302. ds_init_iteminfo.setColumn(0,"edirmk_orign",utlf_transNullToEmpty(gv_edirmk));
  4303. ds_init_iteminfo.setColumn(0,"tstrmk_orign",utlf_transNullToEmpty(gv_tstrmk));
  4304. ds_send.setColumn(0,"age",gv_age);
  4305. ds_send.setColumn(0,"brateflag",gv_brateflag); // 외래 필수 심사 품목 조회를 위해 요율 칼럼을 불러온다! (2012.06.01 LEJ)
  4306. ds_send.setColumn(0,"dschdd",gv_dschdd);
  4307. ds_send.setColumn(0,"ownbmaxgradeflag",gv_ownbmaxgradeflag);
  4308. ds_send.setColumn(0,"rrgstno",gv_rrgstno);
  4309. ds_send.setColumn(0,"maxhopedd", gv_dschnotidt.substr(0,8));
  4310. btn_esscdiag.visible = false;
  4311. btn_esscdiag.style.font = '';
  4312. if(ds_init_iteminfo.getColumn(0, "ticuyn") == "Y") {
  4313. lf_setAlramMessage("권역외상 환자가 아니면서 TICU 처방이 존재합니다.","I");
  4314. }
  4315. //clamkey 삭제 사유 초기화
  4316. grp_calc.btn_prcpchg.enable = false;
  4317. fGetPidhclklitem();
  4318. if(ds_temp_pidhclkl.rowcount > 0) {
  4319. sysf_messageBox("[" + ds_temp_pidhclkl.getColumn(0, "canceldd")+ "]일자에 [" + ds_temp_pidhclkl.getColumn(0, "cancelid") + "]심사자에 의해 초기화된 청구건입니다.","I");
  4320. }
  4321. }
  4322. function fSetItemInfoSetting()
  4323. {
  4324. if(gv_dschjudgprcsstat == "C" )
  4325. { //퇴원마감
  4326. grp_calc.btn_dschclose.class = "btn2";
  4327. grp_calc.btn_dschclose.style.font = "";
  4328. grp_calc.btn_totjudgclose.class = "btn2";
  4329. grp_calc.btn_totjudgclose.style.font = "";
  4330. grp_calc.btn_midcancel.visible = true;
  4331. grp_calc.btn_dschclosecancel.class = "btn5"
  4332. grp_calc.btn_dschclosecancel.style.font = "Dotum,8,bold";
  4333. }
  4334. else if(gv_dschjudgprcsstat == "E" )
  4335. { //통합심사마감
  4336. grp_calc.btn_totjudgclose.class = "btn2";
  4337. grp_calc.btn_totjudgclose.style.font = "";
  4338. grp_calc.btn_dschclose.class = "btn2";
  4339. grp_calc.btn_dschclose.style.font = "";
  4340. grp_calc.btn_dschclosecancel.class = "btn5"
  4341. grp_calc.btn_dschclosecancel.style.font = "Dotum,8,bold";
  4342. }
  4343. else
  4344. {
  4345. grp_calc.btn_dschclose.class = "btn5";
  4346. grp_calc.btn_dschclose.style.font = "Dotum,8,bold";
  4347. grp_calc.btn_totjudgclose.class = "btn5";
  4348. grp_calc.btn_totjudgclose.style.font = "Dotum,8,bold";
  4349. grp_calc.btn_midcancel.visible = false;
  4350. grp_calc.btn_dschclosecancel.class = "btn2"
  4351. grp_calc.btn_dschclosecancel.style.font = "";
  4352. }
  4353. if(gv_probjudgflag == "G"){ //문제환자 여부
  4354. ds_hidden_item1.setColumn(0,"probpatgreen", "Y");
  4355. ds_hidden_item1.setColumn(0,"probpatred", "-");
  4356. }else if(gv_probjudgflag == "R"){
  4357. ds_hidden_item1.setColumn(0,"probpatgreen", "-");
  4358. ds_hidden_item1.setColumn(0,"probpatred", "Y");
  4359. }else{
  4360. ds_hidden_item1.setColumn(0,"probpatgreen", "-");
  4361. ds_hidden_item1.setColumn(0,"probpatred", "-");
  4362. }
  4363. }
  4364. function cf_TRPIJ00321(sSvcId, nErrorCode, sErrorMsg) {
  4365. if(nErrorCode < 0) {
  4366. sysf_messageBox("cf_TRPIJ00321]데이터 가","I004");
  4367. return;
  4368. }
  4369. ds_init_iteminfo.setColumn(0,"medcaredayno", ds_init_medcaredayno.getColumn(0,"medcaredayno"));
  4370. if (ds_init_medcaredayno.getColumn(0,"combflag") == "Y")
  4371. {
  4372. lf_setAlramMessage(" 해당 이력 내 간호간병통합서비스 입원료와 다른입원료가 동시에 발생하였습니다. 확인 후 유형 분리 바랍니다.");
  4373. }
  4374. }
  4375. function cf_TRPIJ00332(sSvcId, nErrorCode, sErrorMsg) {
  4376. if(nErrorCode < 0) {
  4377. sysf_messageBox("cf_TRPIJ00332]데이터 가","I004");
  4378. return;
  4379. }
  4380. if(grd_diaglist.rowcount == 0) //상병이 한건도 없는경우 자동으로 처방상병을 갱신한다.
  4381. {
  4382. fRefreshDiag();
  4383. }
  4384. var aRow = ds_grd_diaglist.addRow();
  4385. var fromdd = ds_grd_diaglist.getMax("fromdd") ;
  4386. var seqno = parseInt(ds_grd_diaglist.getMax("seqno")) ;
  4387. ds_grd_diaglist.setColumn(aRow, "seqno", seqno+1);
  4388. ds_grd_diaglist.setColumn(aRow, "ordfromdd", fromdd);
  4389. ds_grd_diaglist.setColumn(aRow, "orddeptcd", gv_orddeptcd);
  4390. ds_grd_diaglist.setColumn(aRow, "pid" , gv_pid);
  4391. ds_grd_diaglist.setColumn(aRow, "indd" , gv_indd1);
  4392. ds_grd_diaglist.setColumn(aRow, "cretno" , gv_cretno);
  4393. ds_grd_diaglist.setColumn(aRow, "fromdd" , gv_fromdd);
  4394. ds_grd_diaglist.setColumn(aRow, "mskind" , gv_mskind);
  4395. ds_grd_diaglist.setColumn(aRow, "toot" , "-");
  4396. ds_grd_diaglist.setColumn(aRow, "toot1" , "-");
  4397. ds_grd_diaglist.setColumn(aRow, "drinptyn" , "N");
  4398. ds_grd_diaglist.setColumn(aRow, "addflag" , "Y");
  4399. ds_grd_diaglist.setColumn(aRow, "diagetcflag" , "0");
  4400. ds_grd_diaglist.setColumn(aRow, "rowstat" , "i");
  4401. ds_grd_diaglist.setColumn(aRow, "rowstatus" , "i");
  4402. //fDiagGridInsertRow();
  4403. //ds_grd_diaglist.keystring = "S:seqno";
  4404. var zdiagcd = ds_grd_diaglist.findRowExpr("diagcd=='Z201'");
  4405. var rdiagcd = ds_grd_diaglist.findRowExpr("diagcd=='R7680'");
  4406. if (gv_insukindcd == "11" && gv_suppkindcd == "00") {
  4407. if ((gv_rareyn == "M" && zdiagcd < 0) || (gv_rareyn != "M" && zdiagcd > -1)){
  4408. lf_setAlramMessage("잠복결핵검진 대상입니다. 확인하세요.");
  4409. }
  4410. if ((gv_rareyn == "N" && rdiagcd < 0) || (gv_rareyn != "N" && rdiagcd > -1)){
  4411. lf_setAlramMessage("잠복결핵치료 대상입니다. 확인하세요.");
  4412. }
  4413. }
  4414. var vcode= ds_grd_diaglist.lookupExpr("seqno=='1' && vcode=='V810' && (ruleoutyn !='true' && ruleoutyn !='1' && ruleoutyn !='R')", "vcode");
  4415. if(vcode == "V810" && gv_suppkindcd != "D7" && gv_suppkindcd != "D8" && gv_suppkindcd != "D9" ){
  4416. lf_setAlramMessage(vcode + " 해당되는 중증치매 상병입니다. 보조유형 확인하세요. ");
  4417. }
  4418. var Mdiagcd= ds_grd_diaglist.lookupExpr("seqno=='1'", "diagcd");
  4419. dsf_createDsRow("ds_tmp_send", [
  4420. {col:"diagcd", type:"STRING", size:256, val:Mdiagcd}
  4421. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  4422. , {col:"userid", type:"STRING", size:256, val:gv_medispclid}
  4423. ]);
  4424. var oParam = {};
  4425. oParam.id = "TRPIJ00351";
  4426. oParam.service = "bfjudgapp.InHospJudg";
  4427. oParam.method = "reqGetTicuUserInfo";
  4428. oParam.inds = "req=ds_tmp_send";
  4429. oParam.outds = "ds_getTicuUserInfo=rsltInfo";
  4430. oParam.async = true;
  4431. oParam.progress = false;
  4432. oParam.callback = "cf_TRPIJ00351";
  4433. tranf_submit(oParam);
  4434. }
  4435. function cf_TRPIJ00333(sSvcId, nErrorCode, sErrorMsg)
  4436. {
  4437. if(nErrorCode < 0)
  4438. {
  4439. sysf_messageBox("cf_TRPIJ00333]데이터 가","I004");
  4440. return;
  4441. }
  4442. fCheckSpclSpecData();
  4443. fSpclGridInsertRow();
  4444. }
  4445. function cf_TRPIJ00322(sSvcId, nErrorCode, sErrorMsg) {
  4446. if(nErrorCode < 0) {
  4447. sysf_messageBox("cf_TRPIJ00322]데이터 가","I004");
  4448. return;
  4449. }
  4450. if ( (gv_insukindcd == "11" || gv_insukindcd == "21" || gv_insukindcd == "22") && gv_suppkindcd != "31" && !(gv_insukindcd == "22" && gv_suppkindcd == "08") ){ //20100318 정승우 신생아유형은 메세지 뜨지 않도록 적용하고 버튼도 보이지 않도록
  4451. var v191prcpyn = ds_init_vdiagyn.getColumn(0,"v191prcpyn"); // 중증수술 처방이 있을경우 상병이 맞지 않으면
  4452. var v192prcpyn = ds_init_vdiagyn.getColumn(0,"v192prcpyn");
  4453. var v191diagyn = ds_init_vdiagyn.getColumn(0,"v191diagyn");
  4454. var v192diagyn = ds_init_vdiagyn.getColumn(0,"v192diagyn");
  4455. if (v191prcpyn == "Y" && gv_suppkindcd != "05" && gv_suppkindcd != "32" && gv_suppkindcd != "34" && gv_sixtimyn == "N") { // 20090325 차상위 2종추가
  4456. lf_setAlramMessage("중증해당 수술이 있습니다. 상병을 확인하십시오.");
  4457. }
  4458. if (v192prcpyn == "Y" && gv_suppkindcd != "05" && gv_suppkindcd != "32" && gv_suppkindcd != "34") { // 20090325 차상위 2종추가
  4459. lf_setAlramMessage("중증해당 수술이 있습니다. 상병을 확인하십시오.");
  4460. }
  4461. if (v191prcpyn == "D" && v191diagyn == "Y" && gv_suppkindcd != "05" && gv_suppkindcd != "39") {
  4462. lf_setAlramMessage("개심/개두 관련 약제가 있습니다. 보조 유형을 확인하십시오.");// 개두술 관련 적용 약제 추가에 따른 재원심사 알림 메세지 [입퇴 + 외퇴] : (해당 약제 + 해당 상병)이면서 보조유형이 개두술이 아닌 경우 메세지 (2015.02.10 LEJ)
  4463. }
  4464. if (v192prcpyn == "D" && v192diagyn == "Y" && gv_suppkindcd != "05" && gv_suppkindcd != "39") {
  4465. lf_setAlramMessage("개심/개두 관련 약제가 있습니다. 보조 유형을 확인하십시오.");// 개두술 관련 적용 약제 추가에 따른 재원심사 알림 메세지 [입퇴 + 외퇴] : (해당 약제 + 해당 상병)이면서 보조유형이 개두술이 아닌 경우 메세지 (2015.02.10 LEJ)
  4466. }
  4467. }
  4468. }
  4469. function cf_TRPIJ00323(sSvcId, nErrorCode, sErrorMsg) {
  4470. if(nErrorCode < 0) {
  4471. sysf_messageBox("cf_TRPIJ00323]데이터 가","I004");
  4472. return;
  4473. }
  4474. if ( gv_insukindcd == "31" && gv_suppkindcd == "18") {
  4475. // 자보발생금액 버튼 설정
  4476. if (ds_init_paylimityn.getColumn(0,"paylimityn") == "Y") {
  4477. grp_calc.btn_autolimit.background.image = "theme://images/com/commonxp/icon_btn_s.png"; // 주황색
  4478. } else {
  4479. grp_calc.btn_autolimit.background.image = "theme://images/com/commonxp/icon_btn.png"; // 주황색
  4480. }
  4481. } else { // 자보자손이 아닐경우 파란색으로
  4482. grp_calc.btn_autolimit.background.image = "theme://images/com/commonxp/icon_btn.png"; // 파란색
  4483. }
  4484. }
  4485. function cf_TRPIJ00330(sSvcId, nErrorCode, sErrorMsg) {
  4486. if(nErrorCode < 0) {
  4487. sysf_messageBox("cf_TRPIJ00330]데이터 가","I004");
  4488. return;
  4489. }
  4490. var rare = ds_grd_insuhistory.findRowExpr("rare=='H'");
  4491. if (rare > -1 && (gv_indschacptstat == 'A' || gv_indschacptstat == 'T') ){
  4492. lf_setAlramMessage("희귀대불 환자입니다. 자격 확인하십시오.");
  4493. }
  4494. if(ds_grd_insuhistory.rowcount < 4) { // 2009.07.27 4건이상이면 안없애고 4건이하면 없앤다.
  4495. grd_insuhistory.setFormatRowProperty(0, "size", 0 );
  4496. } else {
  4497. grd_insuhistory.setFormatRowProperty(0, "size", 20 );
  4498. }
  4499. btn_insuhistoryup.visible = false;
  4500. btn_insuhistorydown.visible = false;
  4501. grd_insuhistory.position.height = "59";
  4502. if(ds_grd_insuhistory.rowcount >= 4) { // 유형갯수에 따라서 버튼보여주고 길이체크한다.
  4503. btn_insuhistorydown.visible = true;
  4504. }
  4505. var row = ds_grd_insuhistory.findRowExpr("fromdd == '"+gv_fromdd+"' && pid == '"+gv_pid+"' && mskind == '"+gv_mskind+"' && indd == '"+gv_indd1+"' && cretno == '"+gv_cretno+"'");
  4506. ds_grd_insuhistory.rowposition = row;
  4507. ds_grd_insuhistory.clearSelect();
  4508. ds_grd_insuhistory.selectRow(row);
  4509. }
  4510. function cf_TRPIJ00324(sSvcId, nErrorCode, sErrorMsg) {
  4511. if(nErrorCode < 0) {
  4512. sysf_messageBox("cf_TRPIJ00324]데이터 가","I004");
  4513. return;
  4514. }
  4515. if (gv_indschacptstat != 'D' && ds_init_dumpclamkeyexistyn.getColumn(0,"dumpclamkeyexistyn") == "Y") {
  4516. lf_setAlramMessage("외래 자료 수집이 된 재원 내 실시처방이 있습니다. 외래 사후 자료를 생성 삭제한 후 Dump처리 하십시오.");
  4517. }
  4518. if(ds_init_dumpclamkeyexistyn.getColumn(0,"dumpexistyn") == "Y")
  4519. {
  4520. grp_calc.btn_dump.class = "btn5";
  4521. grp_calc.btn_dump.style.font = "Dotum,9,bold"
  4522. grp_calc.btn_dump.style.color = "red"
  4523. }
  4524. else
  4525. {
  4526. grp_calc.btn_dump.class = "btn2";
  4527. grp_calc.btn_dump.style.font = "";
  4528. grp_calc.btn_dump.style.color = ""
  4529. }
  4530. }
  4531. function cf_TRPIJ00325(sSvcId, nErrorCode, sErrorMsg) {
  4532. if(nErrorCode < 0) {
  4533. sysf_messageBox("cf_TRPIJ00325]데이터 가","I004");
  4534. return;
  4535. }
  4536. var recalcyn = ds_init_retcspec.rowcount;
  4537. if(recalcyn > 0 && grp_calc.btn_recalc.enable == true)
  4538. {
  4539. grp_calc.btn_recalc.class = "btn5";
  4540. grp_calc.btn_recalc.style.font = "Dotum,9,bold";
  4541. grp_calc.btn_recalc.style.color = "red";
  4542. grp_calc.btn_recalc.visible = true;
  4543. }
  4544. else
  4545. {
  4546. grp_calc.btn_recalc.class = "btn2";
  4547. grp_calc.btn_recalc.style.font = "";
  4548. grp_calc.btn_recalc.style.color = "";
  4549. }
  4550. }
  4551. function cf_TRPIJ00326(sSvcId, nErrorCode, sErrorMsg) {
  4552. if(nErrorCode < 0) {
  4553. sysf_messageBox("cf_TRPIJ00326]데이터 가","I004");
  4554. return;
  4555. }
  4556. if (ds_init_ownbmaxamt.getColumn(0,"ownbmaxyn") == "Y") { // 본인부담상한제 대상자체크 - 200800808 박창원
  4557. lf_setAlramMessage("본인부담상한제 대상 환자입니다.");
  4558. }
  4559. }
  4560. function cf_TRPIJ00327(sSvcId, nErrorCode, sErrorMsg) {
  4561. if(nErrorCode < 0) {
  4562. sysf_messageBox("cf_TRPIJ00327]데이터 가","I004");
  4563. return;
  4564. }
  4565. var cDnorPat = ds_init_patdnorinfo.rowcount;
  4566. if (cDnorPat == 0) {
  4567. btn_patdnor.class = "btn5";
  4568. btn_patdnor.visible = false;
  4569. }else{
  4570. var cPatDnorFlag = ds_init_patdnorinfo.getColumn(0,"patdnorflag");
  4571. if(cPatDnorFlag == "D"){
  4572. btn_patdnor.visible = true;
  4573. btn_patdnor.text = "수혜자"
  4574. btn_patdnor.class = "btn5";
  4575. btn_patdnor.style.color = "#ff0066";
  4576. }else if (cPatDnorFlag == "P"){
  4577. btn_patdnor.visible = true;
  4578. btn_patdnor.text = "공여자"
  4579. btn_patdnor.class = "btn5";
  4580. btn_patdnor.style.color = "#ff0066";
  4581. }else{
  4582. group7.btn_dschmemo.class = "btn5";
  4583. group7.btn_dschmemo.visible = false;
  4584. }
  4585. }
  4586. }
  4587. function cf_TRPIJ00329(sSvcId, nErrorCode, sErrorMsg) {
  4588. if(nErrorCode < 0) {
  4589. sysf_messageBox("cf_TRPIJ00329]데이터 가","I004");
  4590. return;
  4591. }
  4592. grp_calc.grd_ordlist.nodatatext = "";
  4593. ds_grd_ordlist.filter("");
  4594. // SNGLEARNCLS - > 05, 04, 09 (처방분류에서 주사제/내분비대사/ Insulin&Antidiabetics 제외) 구현해야함.
  4595. // 20091130 JHP snglearncls값 확인하여 050409값일때는 메세지 처리 제외한다.
  4596. // 처방for 로직 수정 속도개선 plet2
  4597. var visualcalcscorcd = "-";
  4598. var frow = ds_grd_ordlist.findRowExpr("item1=='04' && item2=='01' && calcqty>= 20 && snglearncls!='050409'", 0);
  4599. while(frow > -1){
  4600. visualcalcscorcd = visualcalcscorcd + ', ' + ds_grd_ordlist.getColumn(frow,"snglcalcscorcd");
  4601. frow = ds_grd_ordlist.findRowExpr("item1=='04' && item2=='01' && calcqty>= 20 && snglearncls!='050409'", frow+1);
  4602. }
  4603. if(visualcalcscorcd != "-"){
  4604. lf_setAlramMessage("1회량 20이상인 주사제가 존재합니다.(인슐린제외) \n\n(" + visualcalcscorcd + ")\n\n 확인하십시오.", gv_reshowyn);
  4605. }
  4606. frow = ds_grd_ordlist.lookupExpr("snglcalcscorcd=='AV7000'", "calcdays");
  4607. if(frow != 1 && gv_orgordtype == "E" && gv_indd1 == gv_fromdd){
  4608. lf_setAlramMessage("AV7000 응급환자 중증도 분류 및 선별료 처방이 없습니다. 확인하십시오.", gv_reshowyn);
  4609. }
  4610. //"유형분리 확인하세요."
  4611. //"자동차보험유형에서 처방불가인 처방이 있습니다. 확인하세요."
  4612. //"미 시행된 처방이 있습니다. 확인하십시오."
  4613. //"치아홈메우기 처방이 있습니다. 본인부담률 확인바랍니다."
  4614. for (var i=0; i < ds_PK232list.rowcount; i++){
  4615. if (ds_grd_ordlist.findRowExpr(eval(ds_PK232list.getColumn(i,"cdnm"))) > -1 )
  4616. {
  4617. lf_setAlramMessage(eval(ds_PK232list.getColumn(i,"detldesc")), gv_reshowyn);
  4618. }
  4619. }
  4620. var oParam = {};
  4621. oParam.id = "TRPIJ00339";
  4622. oParam.service = "bfjudgapp.InHospJudg";
  4623. oParam.method = "reqGetDrgCreateMasterInfoChk_xp";
  4624. oParam.inds = "req=ds_send";
  4625. oParam.outds = "ds_drginfo=drginfo";
  4626. oParam.async = true;
  4627. oParam.progress = false;
  4628. oParam.callback = "cf_TRPIJ00339";
  4629. tranf_submit(oParam);
  4630. if (gv_insukindcd == "11" || gv_insukindcd == "21" || gv_insukindcd == "22" ) {
  4631. oParam = {};
  4632. oParam.id = "TRPIJ00350";
  4633. oParam.service = "bfjudgapp.InHospJudg";
  4634. oParam.method = "reqGetIsclEdiuDiff";
  4635. oParam.inds = "req=ds_send";
  4636. oParam.outds = "ds_isclediudiff=isclediudiff";
  4637. oParam.async = true;
  4638. oParam.progress = false;
  4639. oParam.callback = "cf_TRPIJ00350";
  4640. tranf_submit(oParam);
  4641. }
  4642. //20191021 뇌졸중집중치료실 자격 체크
  4643. frow = ds_grd_ordlist.findRow("edicd", "AC611");
  4644. var frow2 = ds_grd_diaglist.findRowExpr("diagcd >= 'I60' && diagcd <= 'I63' || diagcd == 'G459'");
  4645. var frow3 = ds_grd_ordlist.findRowExpr("edicd == 'AC611' && calcdays > 7");
  4646. if(frow > -1 && frow2 < 0) {
  4647. lf_setAlramMessage("뇌졸중 집중치료실(SU)입원료(AC611) 적용 대상이 아닙니다.");
  4648. }
  4649. if(frow3 > -1) {
  4650. lf_setAlramMessage("뇌졸중 집중치료실(SU)입원료(AC611) 적용 일자(7일)을 초과하였습니다.");
  4651. }
  4652. //20191021 뇌졸중집중치료실 자격 체크
  4653. //20191023 특수병상입원료 보조유형 체크
  4654. ds_temp_suppkindchk.clearData();
  4655. if(gv_insukindcd == "11" && gv_suppkindcd == "00") {
  4656. dsf_createDsRow("ds_req", [ {col:"pid", type:"STRING", size:256, val:ds_send.getColumn(0, "pid")}
  4657. , {col:"indd", type:"STRING", size:256, val:ds_send.getColumn(0, "indd")}
  4658. , {col:"cretno", type:"STRING", size:256, val:ds_send.getColumn(0, "cretno")}
  4659. , {col:"fromdd", type:"STRING", size:256, val:ds_send.getColumn(0, "fromdd")}
  4660. , {col:"todd", type:"STRING", size:256, val:ds_send.getColumn(0, "todd")}
  4661. ]);
  4662. oParam = {};
  4663. oParam.id = "getSpclbedSuppkindChk";
  4664. oParam.service = "bfjudgapp.InHospJudg";
  4665. oParam.method = "reqGetSpclbedSuppkindChk";
  4666. oParam.inds = "req=ds_req";
  4667. oParam.outds = "ds_temp_suppkindchk=item";
  4668. oParam.async = false;
  4669. tranf_submit(oParam);
  4670. if(ds_temp_suppkindchk.getColumn(0, "cnt") > 0) {
  4671. lf_setAlramMessage("보조유형변경 및 재계산이 필요합니다.");
  4672. }
  4673. }
  4674. //20191023 특수병상입원료 보조유형 체크
  4675. //20200313 항암제 임상연구 요양급여 청구 체크
  4676. ds_temp_hiracnfmnochk.clearData();
  4677. dsf_createDsRow("ds_req", [ {col:"pid", type:"STRING", size:256, val:ds_send.getColumn(0, "pid")}
  4678. , {col:"indd", type:"STRING", size:256, val:ds_send.getColumn(0, "indd")}
  4679. , {col:"cretno", type:"STRING", size:256, val:ds_send.getColumn(0, "cretno")}
  4680. ]);
  4681. oParam = {};
  4682. oParam.id = "getHiracnfmnoIngo";
  4683. oParam.service = "bfjudgapp.InHospJudg";
  4684. oParam.method = "reqGetHiracnfmnoIngo";
  4685. oParam.inds = "req=ds_req";
  4686. oParam.outds = "ds_temp_hiracnfmnochk=item";
  4687. oParam.async = false;
  4688. tranf_submit(oParam);
  4689. if(ds_temp_hiracnfmnochk.getColumn(0, "cnt") > 0) {
  4690. lf_setAlramMessage("해당 환자는 임상연구 요양급여 적용 대상입니다. CRIS번호 : " + ds_temp_hiracnfmnochk.getColumn(0, "hiracnfmno"));
  4691. }
  4692. //20200313 항암제 임상연구 요양급여 청구 체크
  4693. fSetColorSpclJudgOrder();
  4694. fSetItemBold();
  4695. fGetSelectedOrderData();
  4696. ds_grd_ordlist.clearSelect();
  4697. ds_grd_ordlist.rowposition = gv_ordrow;
  4698. ds_grd_ordlist.selectRow(gv_ordrow);
  4699. grp_calc.grd_ordlist.vscrollbar.pos = gv_ordrow;
  4700. }
  4701. // 마감 가능 여부 체크(임시적 사용)
  4702. function fChkClose() {
  4703. var flag = true;
  4704. if (ds_grd_ordlist.findRowExpr("execprcpstatcd=='N' || execprcpstatcd=='O'") > -1 ) { // 미시행 처방이 있을 경우
  4705. flag = false;
  4706. }
  4707. return flag;
  4708. }
  4709. function cf_TRPIJ00314(sSvcId, nErrorCode, sErrorMsg) {
  4710. if(nErrorCode < 0) {
  4711. sysf_messageBox("cf_TRPIJ00314]데이터 가","I004");
  4712. return;
  4713. }
  4714. var cOper = gv_opflag;
  4715. if (cOper != "Y") { // 출산정보가 없는경우임.
  4716. btn_operdiag.class = "btn5";
  4717. btn_operdiag.visible = false;
  4718. btn_operdiag.style.color = "";
  4719. } else {
  4720. btn_operdiag.visible = true;
  4721. btn_operdiag.class = "btn5";
  4722. btn_operdiag.style.color = "darkblue";
  4723. var cnt1 = utlf_transNullToEmpty(ds_operstat.getColumn(0,"cnt1")); // 수술심사상태에 따른 캡션변경 //미심
  4724. var cnt2 = utlf_transNullToEmpty(ds_operstat.getColumn(0,"cnt2")); //보류
  4725. var cnt3 = utlf_transNullToEmpty(ds_operstat.getColumn(0,"cnt3")); //완료
  4726. var nonpijhoper = utlf_transNullToEmpty(ds_operstat.getColumn(0,"nonpijhoper")); // 수술이 추가되었을때 - 수술심사테이블에 데이터가 들어가지 않은 경우는 미심이 포함되어 있어 미심이다.
  4727. if (cnt1 > "0" || nonpijhoper == "Y") {
  4728. btn_operdiag.text = "수술(미)";
  4729. return;
  4730. }
  4731. if (cnt1 < "1" && cnt2 > "0") {
  4732. btn_operdiag.text = "수술(보)";
  4733. }
  4734. if (cnt1 < "1" && cnt2 < "1" && cnt3 > "0") {
  4735. btn_operdiag.text = "수술(완)";
  4736. }
  4737. if (cnt1 < "1" && cnt2 < "1" && cnt3 < "1") {
  4738. btn_operdiag.text = "수술(미)";
  4739. }
  4740. }
  4741. }
  4742. function cf_TRPIJ00335(sSvcId, nErrorCode, sErrorMsg) {
  4743. if(nErrorCode < 0) {
  4744. sysf_messageBox("데이터 가","I004");
  4745. return;
  4746. }
  4747. group7.opt_sum_totordamt.value = ds_itemcalc.getColumn(0,"payamt") + ds_itemcalc.getColumn(0,"nopyamt") + ds_itemcalc.getColumn(0,"specamt");
  4748. group7.opt_sum_owbtotordamt.value = ds_itemcalc.getColumn(0,"ownbpayamt") + ds_itemcalc.getColumn(0,"ownbnopyamt") + ds_itemcalc.getColumn(0,"ownbspecamt");
  4749. group7.opt_sum_prcptotordamt.value = ds_grd_ordlist.getCaseSum("execprcpstatcd=='N' || execprcpstatcd=='O'","totordamt");
  4750. group7.opt_sum_prcpownbamt.value = ds_grd_ordlist.getCaseSum("execprcpstatcd=='N' || execprcpstatcd=='O'","ownbamt");
  4751. group7.opt_sum_totsumamt.value = group7.opt_sum_totordamt.value + group7.opt_sum_prcptotordamt.value;
  4752. group7.opt_sum_totsumownbamt.value = group7.opt_sum_owbtotordamt.value + group7.opt_sum_prcpownbamt.value;
  4753. var ownlimmitamt = ds_init_iteminfo.getColumn(0,"ownlimmitamt");
  4754. if (gv_insukindcd == "11") {
  4755. if (gv_ownbmaxgrade == 'Y') {
  4756. lf_setAlramMessage("환자의 본인부담 상한구분이 보험유형 기준자료의 상한구분과 일치하지 않습니다. \n재원 분리 확인하십시오.", gv_reshowyn);
  4757. } else {
  4758. // 연도별 분리 안 된 이력 중 본인부담 상한액 초과 환자 메세지 발생
  4759. var curyear = gv_today.substr(0,4);
  4760. var fromyear = gv_fromdd.substr(0,4);
  4761. var toyear = gv_todd.substr(0,4);
  4762. if ( gv_todd == "99991231" ) {
  4763. if ( gv_dschnotidt.substr(0,8) == "99991231" || utlf_isNull(gv_dschnotidt.substr(0,8)) ) {
  4764. toyear = curyear ;
  4765. }
  4766. else {
  4767. toyear = gv_dschnotidt.substr(0,4) ;
  4768. }
  4769. }
  4770. if ( fromyear != toyear && gv_cfe != 'F' ) {
  4771. if(ds_itemcalc.getColumn(0,"ownbpayamt") > gv_ownlimmitamt) {
  4772. lf_setAlramMessage("연도별 분리 되지 않은 본인부담상한제 환자입니다. \n재원 분리 확인하십시오.", gv_reshowyn);
  4773. }
  4774. }
  4775. else {
  4776. //본임부담상한제 체크 : 기준 금액 이상이면 메시지 발생.
  4777. if ((gv_indschacptstat == 'A' || gv_indschacptstat == 'T')) { //본임부담상한제 체크 400만원 이상이면 메시지 발생.
  4778. if(parseInt(ds_itemcalc.getColumn(0,"ownbpayamt")) > 5000000) {
  4779. lf_setAlramMessage("본인부담상한제 환자 입니다.", gv_reshowyn);
  4780. }
  4781. }
  4782. }
  4783. }
  4784. }
  4785. }
  4786. function cf_TRPIJ00336(sSvcId, nErrorCode, sErrorMsg) {
  4787. if(nErrorCode < 0) {
  4788. sysf_messageBox("데이터 가","I004");
  4789. return;
  4790. }
  4791. if (ds_msglist.rowcount > 0) {
  4792. img_msg.visible = true;
  4793. } else {
  4794. img_msg.visible = false;
  4795. }
  4796. }
  4797. function cf_TRPIJ00337(sSvcId, nErrorCode, sErrorMsg) {
  4798. if(nErrorCode < 0) {
  4799. sysf_messageBox("데이터 가","I004");
  4800. return;
  4801. }
  4802. if(ds_outrateinsusuppflag.getColumn(0,"yn") == "N"){
  4803. lf_setAlramMessage("6시간 미만으로 외래요율 퇴원건입니다. \n환자에게 해당하는 보조유형을 선택하여 변경하시고 재계산 한후 심사 하십시오.");
  4804. }
  4805. }
  4806. function cf_TRPIJ00338(sSvcId, nErrorCode, sErrorMsg) {
  4807. if(nErrorCode < 0) {
  4808. sysf_messageBox("데이터 가","I004");
  4809. return;
  4810. }
  4811. if (gv_insukindcd > "22" || gv_suppkindcd == "01" ) {
  4812. return;
  4813. }
  4814. var isEsscV193 = false;
  4815. var isEsscV191 = false;
  4816. var isEsscVisible = true;
  4817. var rareesscyn = ds_rareessc.getColumn(0,"rareesscyn");
  4818. if (ds_vcode.rowcount == 0 && rareesscyn != "Y" ) { // 특정내역이 없는 경우임
  4819. //return;
  4820. } else {
  4821. var chkspclcd = ds_vcode.findRowExpr("vcode=='V191' || vcode=='V192'");
  4822. var spclcd = ds_vcode.lookup("vcode", "V193", "vcode");
  4823. if (chkspclcd > -1) {
  4824. isEsscV191 = true;
  4825. var chk = ds_hidden_item1.getColumn(0,"vcode"); //이미 체크된건이 V193인경우 V193으로 처리 한다.
  4826. if(chk == "V193"){
  4827. ds_hidden_item1.setColumn(0,"vcode","V193");
  4828. }else{
  4829. ds_hidden_item1.setColumn(0, "vcode", ds_vcode.getColumn(chkspclcd, "vcode"));
  4830. }
  4831. }
  4832. if(spclcd == "V193" && gv_suppkindcd != "32") { // 차상위는 중증등록버튼이 활성화되지 않게한다. 20090227 박창원
  4833. ds_hidden_item1.setColumn(0, "vcode", spclcd);
  4834. isEsscV193 = true;
  4835. }
  4836. }
  4837. ds_hidden_updtchkessc.setColumn(0,"esscV193",isEsscV193);// 데이타 변경 후 중증 질환 체크 변경 유무 확인을 위한 flag 값 추가 : 2007.10.08 김건기 => fUpdtCheckEssc()에서 사용
  4838. ds_hidden_updtchkessc.setColumn(0,"esscV191",isEsscV191);
  4839. if (!btn_esscdiag.visible) {
  4840. if (isEsscV191) {
  4841. if (isEsscVisible) {
  4842. btn_esscdiag.visible = true;
  4843. } else {
  4844. btn_esscdiag.visible = false;
  4845. }
  4846. btn_esscdiag.class = "btn5";
  4847. btn_esscdiag.style.color = "darkblue";
  4848. } else {
  4849. btn_esscdiag.class = "btn2";
  4850. btn_esscdiag.visible = false;
  4851. if (isEsscV193) {
  4852. if (isEsscVisible) {
  4853. btn_esscdiag.visible = true;
  4854. } else {
  4855. btn_esscdiag.visible = false;
  4856. }
  4857. btn_esscdiag.class = "btn5";
  4858. btn_esscdiag.style.color = "darkblue";
  4859. } else {
  4860. btn_esscdiag.class = "btn2";
  4861. btn_esscdiag.visible = false;
  4862. btn_esscdiag.style.color = "";
  4863. }
  4864. }
  4865. }
  4866. var babyyn ="N";
  4867. if(gv_insukindcd == "11" && btn_esscdiag.visible == true
  4868. && gv_cfe != "C"
  4869. && gv_suppkindcd != "05" && gv_suppkindcd != "06" && gv_suppkindcd != "32" && gv_suppkindcd != "39" && gv_suppkindcd != "40" && gv_suppkindcd != "50" ){ //개심개두는 입원요율만 적용되게 차상위 2종추가
  4870. lf_setAlramMessage("중증정보가 존재하는 환자입니다.");
  4871. }
  4872. if (gv_rrgstno.substr(7,1) == "3" || gv_rrgstno.substr(7,1) == "4" || gv_rrgstno.substr(7,1) == "7" || gv_rrgstno.substr(7,1) == "8" && (gv_cfe != "E" && gv_cfe != "F")) {
  4873. if (utlf_getDateInterval(gv_brthdd,gv_indd) < 28) {
  4874. babyyn = "Y";
  4875. }
  4876. }
  4877. if( (gv_insukindcd == "21" || gv_insukindcd == "22") && btn_esscdiag.visible == true
  4878. && gv_cfe != "C"
  4879. && gv_suppkindcd != "05" && gv_suppkindcd != "06" && gv_suppkindcd != "32" && gv_suppkindcd != "39" && gv_suppkindcd != "40" && gv_suppkindcd != "50" ){ //20090325 차상위 2종추가
  4880. if (!(gv_sixtimyn == "N" && chkageyn(6) == "N" && babyyn == "N")) {
  4881. lf_setAlramMessage("중증정보가 존재하는 환자입니다.");
  4882. }
  4883. }
  4884. }
  4885. function cf_TRPIJ00339(sSvcId, nErrorCode, sErrorMsg) {
  4886. if(nErrorCode < 0) {
  4887. sysf_messageBox("데이터 가","I004");
  4888. return;
  4889. }
  4890. var indaycnt = ds_grd_insuhistory.lookupExpr("fromdd=='"+ gv_fromdd +"'","indaycnt");
  4891. if (gv_insukindcd == "11") {
  4892. var opchkyn = ds_drginfo.getColumn(0,"opchkyn");
  4893. var drgfromddchk = ds_drginfo.getColumn(0,"drgfromddchk");
  4894. var drgotptyn = ds_drginfo.getColumn(0,"drgotptyn");
  4895. if (opchkyn == "Y" && indaycnt <= 30 ) {
  4896. grp_calc.btn_drginfo.visible = true;
  4897. } else {
  4898. grp_calc.btn_drginfo.visible = false;
  4899. }
  4900. if (opchkyn == "Y" && (gv_indschacptstat == 'A' || gv_indschacptstat == 'T') && indaycnt <= 30 ) {
  4901. lf_setAlramMessage("DRG 대상입니다.", gv_reshowyn);
  4902. if (ds_grd_ordlist.findRowExpr("edicd=='AV162'") > -1) {
  4903. lf_setAlramMessage("DRG 환자인 경우 간호·간병료(EDI : AV~)는 분리 청구해야 합니다. 내역 확인하십시요.", gv_reshowyn);
  4904. }
  4905. if (drgotptyn=="Y") {
  4906. lf_setAlramMessage("DRG 퇴원 당일 외래 진료예약이 내역 있습니다.", gv_reshowyn);
  4907. }
  4908. } else if ( opchkyn == "Y" && (gv_indschacptstat == 'A' || gv_indschacptstat == 'T') && indaycnt > 30 ) {
  4909. lf_setAlramMessage("DRG 대상입니다만 재원일수 초과 입니다.", gv_reshowyn);
  4910. }
  4911. if (opchkyn == "Y" && drgfromddchk == "Y") {
  4912. lf_setAlramMessage("DRG와 분리된 내역 있습니다. 마감 순서 확인하세요.", gv_reshowyn);
  4913. }
  4914. }
  4915. }
  4916. function cf_TRPIJ00340(sSvcId, nErrorCode, sErrorMsg) {
  4917. if(nErrorCode < 0) {
  4918. sysf_messageBox("데이터 가","I004");
  4919. return;
  4920. }
  4921. // 20091020 JHP 중증번호 희귀번호 동시존재시 설정방법
  4922. // 희귀난치 정보와 중증 번호가 있는 경우 같이 있는 대상자만 콤보로 보이도록 함.
  4923. // DEFAULT로는 중증번호를 먼저 보여주세요. 콤보가 있는 환자는 콤보 누르면 희귀도 하단에 조회되도록..
  4924. var serdiagfromdd = ds_init_cmb_itemraremsg.getCaseMax("rgstkindcd == '00'","rareobstfromdd");
  4925. var serdiagtodd = ds_init_cmb_itemraremsg.getCaseMax("rgstkindcd == '00'","rareobsttodd");
  4926. var itemmsg = ds_init_cmb_itemraremsg.lookupExpr("rgstkindcd=='00' && rareobsttodd=='"+serdiagtodd+"'","msg");
  4927. var rareobstfromdd = ds_init_cmb_itemraremsg.getCaseMax("rgstkindcd != '00'","rareobstfromdd");
  4928. var rareobsttodd = ds_init_cmb_itemraremsg.getCaseMax("rgstkindcd != '00'","rareobsttodd");
  4929. var raremsg = ds_init_cmb_itemraremsg.lookupExpr("rgstkindcd!='00' && rareobsttodd=='"+serdiagtodd+"'","msg");
  4930. if (!utlf_isNull(itemmsg) && raremsg == "-") {
  4931. //중증종료일자가 퇴원일자,입원일자보다 빠를시 색상변경
  4932. // 희귀번호만 존재시.. raremsg
  4933. if ((gv_dschnotidt != "" && (gv_dschnotidt > serdiagtodd )) || (gv_dschnotidt == "" && (gv_today > serdiagtodd))) {
  4934. cmb_itemraremsg.style.background.color = "antiquewhite";
  4935. cmb_itemraremsg.style.background.image = "";
  4936. cmb_itemraremsg.style.background.repeat = "stretch";
  4937. cmb_itemraremsg.style.background.imageedge = "5px,5px";
  4938. cmb_itemraremsg.style.border.style = "solid"
  4939. cmb_itemraremsg.style.border.width = "1";
  4940. cmb_itemraremsg.style.border.color = "#808080ff"
  4941. } else {
  4942. cmb_itemraremsg.style.background.color = "transparent";
  4943. cmb_itemraremsg.style.background.image = "URL('theme://images/bg_edit_N.png')";
  4944. cmb_itemraremsg.style.background.repeat = "stretch";
  4945. cmb_itemraremsg.style.background.imageedge = "5,5";
  4946. cmb_itemraremsg.style.border.style = "none"
  4947. cmb_itemraremsg.style.border.width = "0";
  4948. }
  4949. } else if(utlf_isNull(itemmsg) && raremsg != "-") {
  4950. if ((gv_dschnotidt != "" && (gv_dschnotidt > rareobsttodd )) || (gv_dschnotidt == "" && (gv_today > rareobsttodd ))) {
  4951. cmb_itemraremsg.style.background.color = "antiquewhite";
  4952. cmb_itemraremsg.style.background.image = "";
  4953. cmb_itemraremsg.style.background.repeat = "stretch";
  4954. cmb_itemraremsg.style.background.imageedge = "5px,5px";
  4955. cmb_itemraremsg.style.border.style = "solid"
  4956. cmb_itemraremsg.style.border.width = "1";
  4957. cmb_itemraremsg.style.border.color = "#808080ff"
  4958. } else {
  4959. cmb_itemraremsg.style.background.color = "transparent";
  4960. cmb_itemraremsg.style.background.image = "URL('theme://images/bg_edit_N.png')";
  4961. cmb_itemraremsg.style.background.repeat = "stretch";
  4962. cmb_itemraremsg.style.background.imageedge = "5,5";
  4963. cmb_itemraremsg.style.border.style = "none"
  4964. cmb_itemraremsg.style.border.width = "0";
  4965. }
  4966. } else if(!utlf_isNull(itemmsg) && raremsg != "-") {
  4967. if (
  4968. ((gv_dschnotidt != "" && (gv_dschnotidt > serdiagtodd )) || (gv_dschnotidt == "" && (gv_today > serdiagtodd )) )||
  4969. ((gv_dschnotidt != "" && (gv_dschnotidt > rareobsttodd )) || (gv_dschnotidt == "" && (gv_today> rareobsttodd )))
  4970. ) {
  4971. cmb_itemraremsg.style.background.color = "antiquewhite";
  4972. cmb_itemraremsg.style.background.image = "";
  4973. cmb_itemraremsg.style.background.repeat = "stretch";
  4974. cmb_itemraremsg.style.background.imageedge = "5px,5px";
  4975. cmb_itemraremsg.style.border.style = "solid"
  4976. cmb_itemraremsg.style.border.width = "1";
  4977. cmb_itemraremsg.style.border.color = "#808080ff"
  4978. } else {
  4979. cmb_itemraremsg.style.background.color = "transparent";
  4980. cmb_itemraremsg.style.background.image = "URL('theme://images/bg_edit_N.png')";
  4981. cmb_itemraremsg.style.background.repeat = "stretch";
  4982. cmb_itemraremsg.style.background.imageedge = "5,5";
  4983. cmb_itemraremsg.style.border.style = "none"
  4984. cmb_itemraremsg.style.border.width = "0";
  4985. }
  4986. }
  4987. cmb_itemraremsg.index = 0;
  4988. }
  4989. function cf_TRPIJ00342(sSvcId, nErrorCode, sErrorMsg) {
  4990. if(nErrorCode < 0) {
  4991. sysf_messageBox("데이터 가","I004");
  4992. return;
  4993. }
  4994. var insukind = ds_emrdiagpamdiag.getColumn(0,"insukind");
  4995. var suppkind = ds_emrdiagpamdiag.getColumn(0,"suppkind");
  4996. var notsuppkind = ds_emrdiagpamdiag.getColumn(0,"notsuppkind");
  4997. var emrmaindiag = ds_emrdiagpamdiag.getColumn(0,"emrmaindiag");
  4998. var pammaindiag = ds_emrdiagpamdiag.getColumn(0,"pammaindiag");
  4999. var notsuppkindchk = ds_emrdiagpamdiag.findRowAs("notsuppkind",suppkind);
  5000. var fstemrdiag2 = String(emrmaindiag).substring(0, 3);
  5001. var fstpamdiag2 = String(pammaindiag).substring(0, 3);
  5002. var fstemrdiag3 = String(emrmaindiag).substring(0, 4);
  5003. var fstpamdiag3 = String(pammaindiag).substring(0, 4);
  5004. // 입원제외 보조유형 배열과 보조유형 체크
  5005. var suppchk = "N";
  5006. if(notsuppkindchk != -1){
  5007. suppchk = "Y";
  5008. }
  5009. // 1. 보험유형 11, 21, 22 이면 알럿
  5010. if(insukind == "11" || insukind == "21" || insukind == "22"){
  5011. // 00, 01, suppchk(입원제외보조유형)이 아니면 알럿
  5012. if(suppkind == "00" || suppkind =="01" || suppchk == "Y"){
  5013. }else{
  5014. // 둘다 null 이 아니면 알럿(원래는 NULL인데 글자수로 잘라서 NUL임)
  5015. if(fstemrdiag2 == 'NUL' || fstpamdiag2 == 'NUL'){
  5016. }else{
  5017. // 진료상병 심사상병 다르면 알럿
  5018. if(fstemrdiag2 != fstpamdiag2){
  5019. lf_setAlramMessage("[진료 주상병(" + fstemrdiag2 +"-)과 심사 주상병(" + fstpamdiag2 + "-)이 다릅니다. 확인하시고 진료에 수정요청 하십시요.\n( 퇴원시 외래 FU검사의 요율에 오류가 있을 수 있습니다)]\n 확인하십시오.");
  5020. }
  5021. }
  5022. }
  5023. }
  5024. }
  5025. function cf_TRPIJ00343(sSvcId, nErrorCode, sErrorMsg) {
  5026. if(nErrorCode < 0) {
  5027. sysf_messageBox("데이터 가","I004");
  5028. return;
  5029. }
  5030. }
  5031. // 처방상병을 끌고 온다.
  5032. function fRefreshDiag() {
  5033. var oParam = {};
  5034. oParam.id = "TRPIJ00306";
  5035. oParam.service = "bfjudgapp.InHospJudg";
  5036. oParam.method = "reqGetDiagRefresh";
  5037. oParam.inds = "req=ds_send";
  5038. oParam.outds = "ds_grd_diaglist=diaglist";
  5039. oParam.async = true;
  5040. oParam.callback = "cf_TRPIJ00306";
  5041. tranf_submit(oParam);
  5042. }
  5043. function cf_TRPIJ00306(sSvcId, nErrorCode, sErrorMsg) {
  5044. if(nErrorCode < 0) { sysf_messageBox("데이터 가","I004"); return; };
  5045. for(var i = 0, rowcnt = ds_grd_diaglist.rowcount; i < rowcnt; i++) {
  5046. if(ds_grd_diaglist.getColumn(i,"chkflag") == "2"){
  5047. ds_grd_diaglist.setRowType(i,ds_grd_diaglist.ROWTYPE_INSERT);
  5048. }
  5049. }
  5050. }
  5051. // 상단에 환자정보 기입하기
  5052. // 수정추가 : 20091006 JHP 상단정보로 파라미터 값 넘길때 기존엔 param 에 첫번재 값이 기준없이 무조건 I였는데 .응급기준을 확인하여 응급일때는 E로 나머지는 I로 셋팅한다.
  5053. function fSetOutPatPamInfo() {
  5054. var pid = gv_pid;
  5055. var indd = gv_indd1;
  5056. var cretno = gv_cretno;
  5057. var instcd = gv_instcd;
  5058. var ordtype = gv_ordtype;
  5059. var indschacptstat = gv_indschacptstat;// 수정추가 퇴원환자일경우 상단정보 파라미터에 srchdd를 퇴원일자로 넣어주고 아니면 현재일자를 넣어준다.
  5060. var dschdd = gv_dschdd;
  5061. if(indschacptstat == "D" || indschacptstat == "T"){
  5062. var srchdd = dschdd;
  5063. }else{
  5064. var srchdd = gv_today;
  5065. }
  5066. if(ordtype == "E"){ // param 첫번째 붙는 값은 외래 : O, 입원 : I, 지원부서 : S, 수술 : T, 응급 : E, 의뢰 : C
  5067. var param = "E" + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + srchdd;
  5068. }else{
  5069. var param = "I" + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + srchdd;
  5070. }
  5071. frmf_setParameter("condparam", param);
  5072. frmf_setParameter("errflag", "Y");
  5073. var useyn = appf_initPatientInfo(param);
  5074. if(useyn == "Y") {
  5075. frmf_setParameter("SPMMO08900_rtn_useyn", "");
  5076. }
  5077. }
  5078. // 처방 조회부 - 재행/급여/항목구분 Radio 선택에 따라 처방 내역을 보여준다.
  5079. function fGetSelectedOrderData() {
  5080. var matractflag = ds_hidden_list1_isclcond.getColumn(0,"matractflag");
  5081. var calcpayflag = ds_hidden_list1_isclcond.getColumn(0,"calcpayflag");
  5082. var snglcalcscorcls = ds_hidden_list1_isclcond.getColumn(0,"snglcalcscorcls");
  5083. var cpflag = ds_hidden_list1_isclcond.getColumn(0,"cpflag");
  5084. var edicd = ds_hidden_list1_isclcond.getColumn(0,"edicd");
  5085. var snglcalcscorcd = ds_hidden_list1_isclcond.getColumn(0,"snglcalcscorcd");
  5086. var actingflag = ds_hidden_list1_isclcond.getColumn(0,"actingflag");
  5087. var calcamtflag = ds_hidden_list1_isclcond.getColumn(0,"calcamtflag");
  5088. var tmp = ""
  5089. var chk = "0";
  5090. //재료행위 구분
  5091. if(matractflag){
  5092. tmp = tmp + matractflag;
  5093. chk = "1";
  5094. }
  5095. //급여구분
  5096. if(calcpayflag){
  5097. if(chk == "1"){
  5098. tmp = tmp + " && " + calcpayflag;
  5099. }else{
  5100. tmp = tmp + calcpayflag;
  5101. chk = "1";
  5102. }
  5103. }
  5104. //항목구분
  5105. if(snglcalcscorcls) {
  5106. if(chk == "1"){
  5107. tmp = tmp + " && (" + snglcalcscorcls + ")";
  5108. }else{
  5109. tmp = tmp + "(" + snglcalcscorcls + ")";
  5110. chk = "1";
  5111. }
  5112. }
  5113. // 시행구분 여부
  5114. if(actingflag) {
  5115. if(chk == "1"){
  5116. tmp = tmp + " && " + actingflag;
  5117. }else{
  5118. tmp = tmp + actingflag;
  5119. chk = "1";
  5120. }
  5121. }
  5122. //CP여부
  5123. if(cpflag) {
  5124. if(chk == "1"){
  5125. tmp = tmp + " && " + cpflag;
  5126. }else{
  5127. tmp = tmp + cpflag;
  5128. chk = "1";
  5129. }
  5130. }
  5131. //수가코드
  5132. if(snglcalcscorcd) {
  5133. if(chk == "1"){
  5134. tmp = tmp + " && " + snglcalcscorcd;
  5135. }else{
  5136. tmp = tmp + snglcalcscorcd;
  5137. chk = "1";
  5138. }
  5139. }
  5140. //항목구분
  5141. if(edicd) {
  5142. if(chk == "1"){
  5143. tmp = tmp + " && " + edicd;
  5144. }else{
  5145. tmp = tmp + edicd;
  5146. chk = "1";
  5147. }
  5148. }
  5149. //zero 수가 제외구분
  5150. if(calcamtflag) {
  5151. if(chk == "1"){
  5152. tmp = tmp + " && " + calcamtflag;
  5153. }else{
  5154. tmp = tmp + calcamtflag;
  5155. chk = "1";
  5156. }
  5157. }
  5158. if(chk == "0")
  5159. {
  5160. tmp = "";
  5161. }else{
  5162. tmp = tmp + "";
  5163. }
  5164. ds_grd_ordlist.filter(tmp);
  5165. //ds_grd_ordlist.rowposition = 0; // 그리드의 첫줄부터 표시되도록 포커스를 0으로 설정한다.
  5166. //항목별소계
  5167. //fSetItemSubTotal();
  5168. }
  5169. // 처방내역을 갖고 온다.
  5170. function fGetIsclList(paramFlag, showyn){
  5171. gv_reshowyn = showyn;
  5172. if(gv_patnm){
  5173. ds_send.setColumn(0,"paramflag", paramFlag);
  5174. if(paramFlag == "IPHS"){
  5175. } else if(paramFlag == "Srch"){
  5176. var lastjudgdt2 = "";
  5177. var lastmdlclamdd2 = "";
  5178. var dschmodesrch = ds_send.getColumn(0, "dschmodesrch");
  5179. if (!utlf_isNull(gv_lastjudgdt) && gv_lastjudgdt != "-") {
  5180. // 수정, 최종심사일 다음날이 아니라 해당일부터여서 하루 더하는거 뺌. 20090729 JHP(yyy)요청
  5181. lastjudgdt2 = gv_lastjudgdt.toDate("YYYYMMDD");
  5182. lastjudgdt2 = lastjudgdt2.getDateFormat();
  5183. }
  5184. // lastmdlclamdd 에 하루를 더한다.(중간청구 일자가 있으면)
  5185. if (!utlf_isNull(gv_lastmdlclamdd) && gv_lastmdlclamdd != "-") {
  5186. lastmdlclamdd2 = gv_lastmdlclamdd.toDate("YYYYMMDD");
  5187. lastmdlclamdd2 = lastmdlclamdd2.getAddDate(1);
  5188. lastmdlclamdd2 = lastmdlclamdd2.getDateFormat();
  5189. }
  5190. if(dschmodesrch == "1"){
  5191. // if (!utlf_isNull(gv_lastmdlclamdd) && gv_lastmdlclamdd != "-") {
  5192. // if(lastmdlclamdd2 >= gv_today){
  5193. // grp_calc.ipt_srchfromdate.value = gv_today;
  5194. // } else {
  5195. // grp_calc.ipt_srchfromdate.value = lastmdlclamdd2;
  5196. // }
  5197. // grp_calc.ipt_srchtodate.value = gv_today;
  5198. // } else {
  5199. // grp_calc.ipt_srchfromdate.value = gv_indd;
  5200. // grp_calc.ipt_srchtodate.value = gv_today;
  5201. // }
  5202. }else if(dschmodesrch == "2"){
  5203. if(!utlf_isNull(gv_lastjudgdt) && gv_lastjudgdt != "-"){
  5204. if(lastjudgdt2 >= gv_today){
  5205. grp_calc.ipt_srchfromdate.value = gv_today;
  5206. } else {
  5207. grp_calc.ipt_srchfromdate.value = lastjudgdt2;
  5208. }
  5209. grp_calc.ipt_srchtodate.value = gv_today;
  5210. }else{
  5211. grp_calc.ipt_srchfromdate.value = gv_indd;
  5212. grp_calc.ipt_srchtodate.value = gv_today;
  5213. }
  5214. }else{
  5215. var tmp = gv_lastjudgdt;
  5216. var lastjudgdt = tmp.substr(0,4) + tmp.substr(4,2) + tmp.substr(6,2);
  5217. if (grp_calc.ipt_srchtodate.value == "99991231") {
  5218. grp_calc.ipt_srchtodate.value = gv_today;
  5219. }
  5220. // maxhopedd가 있는 경우에는 ordtodd를 maxhopedd로 set
  5221. if (!utlf_isNull(gv_maxhopedd)) {
  5222. grp_calc.ipt_srchtodate.value = gv_maxhopedd;
  5223. }
  5224. // 최종심사일자가 있는 경우 최종심사일로 부터 시작일을 설정
  5225. if (!utlf_isNull(lastjudgdt) && lastjudgdt != "-") {
  5226. grp_calc.ipt_srchfromdate.value = lastjudgdt;
  5227. }
  5228. // 퇴원환자 처리
  5229. if (gv_indschacptstat == "D") {
  5230. grp_calc.ipt_srchfromdate.value = gv_indd;
  5231. grp_calc.ipt_srchtodate.value = gv_dschdd;
  5232. } else if (gv_dschnotiyn == "Y") { // 퇴원확정환자는 디폴트로 입원일부터 중간청구 발생자는 중간청구 이후로
  5233. grp_calc.ipt_srchfromdate.value = gv_indd;
  5234. if (!utlf_isNull(gv_lastmdlclamdd) && gv_lastmdlclamdd != "-") {
  5235. grp_calc.ipt_srchfromdate.value = gv_lastmdlclamdd;
  5236. }
  5237. }
  5238. // 시작일이 종료일보다 큰경우 종료일을 시작일과 동일하게 맞추어 준다.
  5239. if (grp_calc.ipt_srchfromdate.value > grp_calc.ipt_srchtodate.value) {
  5240. grp_calc.ipt_srchtodate.value = grp_calc.ipt_srchfromdate.value;
  5241. }
  5242. }
  5243. } else {
  5244. var tmp = gv_lastjudgdt;
  5245. var lastjudgdt = tmp.substr(0,4) + tmp.substr(4,2) + tmp.substr(6,2);
  5246. // ordtodd가 99991231이면 현재일로 set
  5247. if (grp_calc.ipt_srchtodate.value == "99991231") {
  5248. grp_calc.ipt_srchtodate.value = gv_today;
  5249. }
  5250. // maxhopedd가 있는 경우에는 ordtodd를 maxhopedd로 set
  5251. if (!utlf_isNull(gv_maxhopedd)) {
  5252. grp_calc.ipt_srchtodate.value = gv_maxhopedd;
  5253. }
  5254. // 최종심사일자가 있는 경우 최종심사일로 부터 시작일을 설정
  5255. if (!utlf_isNull(lastjudgdt) && lastjudgdt != "-") {
  5256. //grp_calc.ipt_srchfromdate.value = lastjudgdt;
  5257. }
  5258. // 퇴원환자 처리
  5259. if (gv_indschacptstat == "D") {
  5260. grp_calc.ipt_srchfromdate.value = gv_indd;
  5261. grp_calc.ipt_srchtodate.value = gv_dschdd;
  5262. } else if (gv_dschnotiyn == "Y") { // 퇴원확정환자는 디폴트로 입원일부터 중간청구 발생자는 중간청구 이후로
  5263. grp_calc.ipt_srchfromdate.value = gv_indd;
  5264. if (!utlf_isNull(gv_lastmdlclamdd) && gv_lastmdlclamdd != "-") {
  5265. grp_calc.ipt_srchfromdate.value = gv_lastmdlclamdd;
  5266. }
  5267. }
  5268. // 시작일이 종료일보다 큰경우 종료일을 시작일과 동일하게 맞추어 준다.
  5269. if (grp_calc.ipt_srchfromdate.value > grp_calc.ipt_srchtodate.value) {
  5270. grp_calc.ipt_srchtodate.value = grp_calc.ipt_srchfromdate.value;
  5271. }
  5272. }
  5273. grp_calc.grd_ordlist.nodatatext = "조회 중입니다...";
  5274. var oParam = {};
  5275. oParam.id = "TRPIJ00329";
  5276. oParam.service = "bfjudgapp.InHospJudg";
  5277. oParam.method = "reqGetInHospJudgIscl";
  5278. oParam.inds = "req=ds_send";
  5279. oParam.outds = "ds_grd_ordlist=iscllist";
  5280. oParam.async = true;
  5281. //oParam.progress = false;
  5282. oParam.callback = "cf_TRPIJ00329";
  5283. tranf_submit(oParam);
  5284. }
  5285. }
  5286. function Insuchange(suppkind)
  5287. { //2013.07.18 이경민 요율변경 공통호출함수 정리
  5288. if (utlf_isNull(gv_seqno))
  5289. {
  5290. gvseqno = "1"
  5291. }
  5292. if (!utlf_isNull(gv_receiptyn)) {
  5293. sysf_messageBox("퇴원(가퇴원) 수납이 되었으므로 유형변경을","E001");
  5294. return false;
  5295. }
  5296. ds_hidden_item2.setColumn(0,"status","B");
  5297. ds_hidden_item2.setColumn(0,"pid", gv_pid);
  5298. ds_hidden_item2.setColumn(0,"indd", gv_indd1);
  5299. ds_hidden_item2.setColumn(0,"cretno", gv_cretno);
  5300. ds_hidden_item2.setColumn(0,"mskind", gv_mskind);
  5301. ds_hidden_item2.setColumn(0,"fromdd", gv_fromdd);
  5302. ds_hidden_item2.setColumn(0,"seqno", gv_seqno);
  5303. ds_hidden_item2.setColumn(0,"todd", gv_todd);
  5304. ds_hidden_item2.setColumn(0,"insukind", gv_insukindcd);
  5305. ds_hidden_item2.setColumn(0,"suppkind", suppkind);
  5306. ds_hidden_item2.setColumn(0,"instcd", gv_instcd);
  5307. ds_hidden_item2.setColumn(0,"indschacptstat", gv_indschacptstat);
  5308. ds_hidden_item2.setColumn(0,"dschdd", gv_dschdd);
  5309. ds_send_recal.clear();
  5310. ds_send_recal.copyData(ds_send);
  5311. var oParam = {};
  5312. oParam.id = "TXPIJ00305";
  5313. oParam.service = "ipatmngtapp.InhospUpdt";
  5314. oParam.method = "reqSetInhospUpdt4";
  5315. oParam.inds = "s_iphs=ds_hidden_item2";
  5316. oParam.outds = "ds_=result";
  5317. oParam.async = false;
  5318. oParam.callback = "cf_TXPIJ00305";
  5319. tranf_submit(oParam);
  5320. }
  5321. function cf_TXPIJ00305(sSvcId, nErrorCode, sErrorMsg) {
  5322. if(nErrorCode < 0) return;
  5323. if(sysf_messageBox("유형변경이 완료 되었습니다. 변경된 내역의 소급처리를", "Q004") == 6){
  5324. fReCalc() ;
  5325. //김주형샘 요청 보이지 않도록.
  5326. //lf_setAlramMessage("소급계산이 처리 중입니다.");
  5327. }
  5328. grp_changeownbrate.visible = false;
  5329. }
  5330. function fReCalc() { //유형적용 완료후 소급처리 한다. - 20080730 수가계산을 날짜별로 loop. - 입원일 부터 현재까지 계산한다(일일단위로 loop)
  5331. ds_send_recal.setColumn(0,"calcbasedd", gv_fromdd);
  5332. var oParam = {};
  5333. oParam.id = "TXPIJ00205";
  5334. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  5335. oParam.method = "reqInCalculation";
  5336. oParam.inds = "req=ds_send_recal";
  5337. oParam.outds = "";
  5338. oParam.async = false;
  5339. oParam.callback = "cf_TXPIJ00205";
  5340. tranf_submit(oParam);
  5341. }
  5342. function cf_TXPIJ00205(sSvcId, nErrorCode, sErrorMsg) {
  5343. if(nErrorCode < 0) {
  5344. alert("[ERROR]" + sSvcId + "_code:" + nErrorCode + "_msg:" + sErrorMsg );
  5345. return;
  5346. }
  5347. var fromdd = ds_send_recal.getColumn(0,"calcbasedd");
  5348. var todd = gv_todd;
  5349. fromdd = fromdd.toDate("YYYYMMDD"); // fromdd를 증가시킨다(하루씩)
  5350. fromdd = fromdd.getAddDate(1);
  5351. fromdd = fromdd.getDateFormat();
  5352. if (todd == "99991231") {
  5353. todd = gv_today;
  5354. }
  5355. if (todd < fromdd) {
  5356. fGetItemInfo();
  5357. //김주형샘요청 메시지 안보이도록.
  5358. //lf_setAlramMessage("소급계산이 처리되었습니다.");
  5359. return false;
  5360. }
  5361. if (todd >= fromdd) {
  5362. ds_send_recal.setColumn(0,"calcbasedd", fromdd);
  5363. var oParam = {};
  5364. oParam.id = "TXPIJ00205";
  5365. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  5366. oParam.method = "reqInCalculation";
  5367. oParam.inds = "req=ds_send_recal";
  5368. oParam.outds = "";
  5369. oParam.async = true;
  5370. oParam.callback = "cf_TXPIJ00205";
  5371. tranf_submit(oParam);
  5372. }
  5373. }
  5374. function grp_calc_btn_save_onclick(obj:Button, e:ClickEventInfo)
  5375. {
  5376. if (ds_init_iteminfo.rowcount > 0) {
  5377. if (fSaveMain("S") == true) {
  5378. // 저장되었다는 메세지 추가 - 20081006 박창원
  5379. lf_setAlramMessage("저장이 완료되었습니다.");
  5380. }
  5381. }
  5382. }
  5383. function fSaveMain(flag){
  5384. fRefrhVar(ds_init_iteminfo);
  5385. // 1. 기본적인 누락정보를 확인한다.
  5386. if (fCheckSave()){
  5387. } else {
  5388. return false;
  5389. }
  5390. fSaveAll(flag);
  5391. if(gv_insukindcd == "11" || gv_insukindcd == "21" || gv_insukindcd == "22"){
  5392. if (flag != "P") {
  5393. //1. 중증, 산정특례 변경 여부 체크
  5394. // 희귀난치 산정특례 추가
  5395. if(gv_suppkindcd == "05" || gv_suppkindcd == "06" || gv_suppkindcd == "39" || gv_suppkindcd == "40" || gv_suppkindcd == "50" || gv_suppkindcd == "31" || (gv_insukindcd == "22" && gv_suppkindcd == "08")){
  5396. } else {
  5397. return fUpdtCheckEssc(flag);
  5398. }
  5399. }
  5400. }
  5401. return true;
  5402. }
  5403. //저장전 데이터 유효성을 점검한다.
  5404. function fCheckSave(){
  5405. var bfmonth6 = gv_today.toDate().getAddDate(-180,'D');
  5406. var brthdd = gv_brthdd.toDate();
  5407. var snglcalcscorcls0210 = ds_grd_ordlist.findRowExpr("snglcalcscorcls=='0210' && calcpayflag=='0' && snglcalcscorcd != 'Z9000' && snglcalcscorcd != 'Z9000-1' && snglcalcscorcd != 'Q9140001' && snglcalcscorcd != 'Q9140002'");
  5408. var snglcalcscorcls0211 = ds_grd_ordlist.findRowExpr("snglcalcscorcls=='0211' && calcpayflag=='0' && snglcalcscorcd != 'Z9000' && snglcalcscorcd != 'Z9000-1' && snglcalcscorcd != 'Q9140001' && snglcalcscorcd != 'Q9140002'");
  5409. var frow = ds_grd_diaglist.findRowExpr("!utlf_isNull(diagcd) && utlf_isNull(diagnm)");
  5410. if (frow > -1){
  5411. sysf_messageBox("상병명이 없습니다. 확인바랍니다.");
  5412. return false;
  5413. }
  5414. if ((bfmonth6 <= brthdd ) && (snglcalcscorcls0210 != -1 || snglcalcscorcls0211 != -1) ) {
  5415. if (sysf_messageBox("6개월 미만 소아환자에게 식이 청구되었습니다. 확인바랍니다. 저장","S001") == 6) {
  5416. return true;
  5417. } else {
  5418. return false;
  5419. }
  5420. } else {
  5421. return true;
  5422. }
  5423. }
  5424. function fSaveAll(flag){
  5425. //상병은 전체 삭제 날리고 다시 insert시킨다.
  5426. //빈데이터를 삭제한다.
  5427. var a = 1;
  5428. var diagcd,ruleoutyn,rowstatus,spclcd;
  5429. var arrPostion = new Array();
  5430. for(var i = 0, rowcnt = ds_grd_diaglist.rowcount; i < rowcnt; i++) { // Grid 필터링 이후 Grid 상에 표시된 처방 개수만큼 돌면서
  5431. diagcd = ds_grd_diaglist.getColumn(i,"diagcd");
  5432. ruleoutyn = ds_grd_diaglist.getColumn(i,"ruleoutyn");
  5433. rowstatus = ds_grd_diaglist.getRowType(i);
  5434. if (ruleoutyn == 1 || ruleoutyn == "true" ){
  5435. ds_grd_diaglist.setColumn(i,"ruleoutyn","true");
  5436. } else {
  5437. ds_grd_diaglist.setColumn(i,"ruleoutyn","false");
  5438. }
  5439. if(utlf_isNull(diagcd) || rowstatus == 8){
  5440. arrPostion[0] = i;
  5441. grdf_setStatus(grd_diaglist, "D", arrPostion);
  5442. }else{
  5443. arrPostion[0] = i;
  5444. ds_grd_diaglist.setColumn(i,"seqno",a++);
  5445. grdf_setStatus(grd_diaglist, "I", arrPostion);
  5446. }
  5447. }
  5448. //빈데이터를 삭제한다.
  5449. for (var i = ds_grd_clcjlist.rowcount-1; i >= 0; i--) { // Grid 필터링 이후 Grid 상에 표시된 특정내역 개수만큼 돌면서
  5450. spclcd = ds_grd_clcjlist.getColumn(i,"spclcd");
  5451. rowstatus = ds_grd_clcjlist.getRowType(i);
  5452. if(utlf_isNull(spclcd)){
  5453. arrPostion[0] = i;
  5454. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, "D", arrPostion); // 8 : delete 상태로 stat를 변경한다.
  5455. ds_grd_clcjlist.deleteRow(i);
  5456. } else {
  5457. if(rowstatus == 8){
  5458. arrPostion[0] = i;
  5459. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, "D", arrPostion); // 8 : delete 상태로 stat를 변경한다.
  5460. ds_grd_clcjlist.deleteRow(i); // 해당 라인을 Grid에서 삭제한다.
  5461. }
  5462. }
  5463. }
  5464. fSaveJudgrmk();
  5465. dsf_createDsRow("ds_tmp_save", [
  5466. {col:"pid", type:"STRING", size:256, val:gv_pid}
  5467. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  5468. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  5469. , {col:"cretno", type:"INT", size:256, val:gv_cretno}
  5470. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  5471. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  5472. , {col:"instcd", type:"STRING", size:256, val:gv_instcd}
  5473. , {col:"inpath", type:"STRING", size:256, val:gv_inpath}
  5474. , {col:"arvpath", type:"STRING", size:256, val:gv_arvpath}
  5475. , {col:"ordrslt", type:"STRING", size:256, val:gv_ordrslt}
  5476. , {col:"probjudgflag", type:"STRING", size:256, val:gv_probjudgflag}
  5477. , {col:"medcaredayno", type:"INT", size:256, val:gv_medcaredayno}
  5478. , {col:"dschjudgprcsstat", type:"STRING", size:256, val:gv_dschjudgprcsstat}
  5479. , {col:"lastupdtrid", type:"STRING", size:256, val:gv_lastjudgendid}
  5480. , {col:"judgrmk", type:"STRING", size:256, val:gv_judgrmk}
  5481. , {col:"edirmk", type:"STRING", size:256, val:gv_edirmk}
  5482. , {col:"dschnotiyn", type:"STRING", size:256, val:gv_dschnotiyn}
  5483. , {col:"futureinsuyn", type:"STRING", size:256, val:gv_futureinsuyn}
  5484. , {col:"trgt", type:"STRING", size:256, val:"N"}
  5485. , {col:"insukind", type:"STRING", size:256, val:gv_insukindcd}
  5486. , {col:"suppkind", type:"STRING", size:256, val:gv_suppkindcd}
  5487. , {col:"dschdd", type:"STRING", size:256, val:gv_dschdd}
  5488. , {col:"flag", type:"STRING", size:256, val:flag}
  5489. , {col:"brateflag", type:"STRING", size:256, val:gv_brateflag}
  5490. ]);
  5491. var oParam = {};
  5492. oParam.id = "TXPIJ00309";
  5493. oParam.service = "bfjudgapp.InHospJudg";
  5494. oParam.method = "reqExeSaveAll";
  5495. oParam.inds = "req=ds_tmp_save diagreq=ds_grd_diaglist:U clcjreq=ds_grd_clcjlist:U spclreq=ds_send_judgrmk";
  5496. oParam.outds = "ds_vcode=vcode ds_rareessc=rareessc ds_chkesscedi=chkesscedi ds_getdschcalccheck=getdschcalccheck";
  5497. oParam.async = false;
  5498. oParam.callback = "cf_TXPIJ00309";
  5499. tranf_submit(oParam);
  5500. if (arErrorCode.pop("TXPIJ00309") > -1){
  5501. oParam = {};
  5502. oParam.id = "TRPIJ00333";
  5503. oParam.service = "bfjudgapp.InHospJudg";
  5504. oParam.method = "reqGetInHospJudgClcj_xp";
  5505. oParam.inds = "req=ds_send";
  5506. oParam.outds = "ds_grd_clcjlist=clcjlist";
  5507. oParam.async = false;
  5508. oParam.callback = "cf_TRPIJ00333";
  5509. tranf_submit(oParam);
  5510. oParam = {};
  5511. oParam.id = "TRPIJ00332";
  5512. oParam.service = "bfjudgapp.InHospJudg";
  5513. oParam.method = "reqGetInHospJudgDiag_xp";
  5514. oParam.inds = "req=ds_send";
  5515. oParam.outds = "ds_grd_diaglist=diaglist";
  5516. oParam.async = false;
  5517. oParam.callback = "cf_TRPIJ00332";
  5518. tranf_submit(oParam);
  5519. return true;
  5520. } else {
  5521. return false;
  5522. }
  5523. }
  5524. function cf_TXPIJ00309(sSvcId, nErrorCode, sErrorMsg) {
  5525. arErrorCode.push(sSvcId, nErrorCode);
  5526. }
  5527. function fSetJudgEDIMemo(spclmemo, usermemoyn) { // 심사자메모, EDI청구메모를 특정내역 형식에 맞춰 설정한다.
  5528. var item5Node = "";
  5529. if (usermemoyn == "Y") {
  5530. item5Node = "U";
  5531. } else if(usermemoyn == "N"){
  5532. item5Node = "E";
  5533. } else if(usermemoyn == "D"){
  5534. item5Node = "D";
  5535. } else{
  5536. item5Node = "T";
  5537. }
  5538. var iSpclCdCnt = ds_send_judgrmk.rowcount;
  5539. var iSpclCdTotLength = utlf_getStringLength(spclmemo); // (stringHelper.js) 문자열의 길이를 구한다.
  5540. // 수정추가 JHP 20090811 심사메모 4000byte초과시 alert메세지 띄우면서 안되게끔... 일단... clob으로 안되기때문에....
  5541. if (iSpclCdTotLength > 4000){
  5542. sysf_messageBox("심사/EDI메모내용이 너무길어 저장을 ","E001");
  5543. return false;
  5544. }
  5545. if (iSpclCdTotLength > 1333) { // 새로 입력된 특정코드가 700byte를 넘는다.
  5546. // 영문(700자), 한글(350자) 길이로 잘라서 n개의 특정코드를 만든다.
  5547. var iLen = 0; // 특정내역 길이가 700 byte가 되었는지 계산
  5548. var iStartInx = 0; // 특정내역 시작 index
  5549. var iCharCnt = 0; // 몇글자로 구성되는지 계산
  5550. for (var i=0, rowcnt=spclmemo.length; i < rowcnt; i++) {
  5551. var sBit = spclmemo.charAt(i);
  5552. iCharCnt++;
  5553. if (escape(sBit).length > 4) {
  5554. iLen = iLen + 2;
  5555. } else {
  5556. iLen = iLen + 1;
  5557. }
  5558. if (iLen == 1333 || iLen > 1333) { // 영문(700자), 한글(350자)
  5559. iSpclCdCnt = ds_send_judgrmk.addRow();
  5560. if (iLen == 350) { // 700byte로 길이가 끝난 경우
  5561. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclspec", spclmemo.substr(iStartInx, iCharCnt));
  5562. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclmemoflag", item5Node);
  5563. ds_send_judgrmk.setColumn(iSpclCdCnt,"status", "i");
  5564. ds_send_judgrmk.setColumn(iSpclCdCnt,"unitflag", "M");
  5565. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclcd", "MX999");
  5566. ds_send_judgrmk.setColumn(iSpclCdCnt,"seqno", iSpclCdCnt);
  5567. ds_send_judgrmk.setColumn(iSpclCdCnt,"pid", gv_pid);
  5568. ds_send_judgrmk.setColumn(iSpclCdCnt,"indd", gv_indd1);
  5569. ds_send_judgrmk.setColumn(iSpclCdCnt,"mskind", gv_mskind);
  5570. ds_send_judgrmk.setColumn(iSpclCdCnt,"cretno", gv_cretno);
  5571. ds_send_judgrmk.setColumn(iSpclCdCnt,"fromdd", gv_fromdd);
  5572. ds_send_judgrmk.setColumn(iSpclCdCnt,"instcd", gv_instcd);
  5573. ds_send_judgrmk.setColumn(iSpclCdCnt,"lastupdtrid", "");
  5574. iStartInx += iCharCnt;
  5575. }
  5576. else if (iLen > 350) { // 영문(700자), 한글(350자)를 넘는 경우
  5577. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclspec", spclmemo.substr(iStartInx, iCharCnt - 1));
  5578. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclmemoflag", item5Node);
  5579. ds_send_judgrmk.setColumn(iSpclCdCnt,"status", "i");
  5580. ds_send_judgrmk.setColumn(iSpclCdCnt,"unitflag", "M");
  5581. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclcd", "MX999");
  5582. ds_send_judgrmk.setColumn(iSpclCdCnt,"seqno", iSpclCdCnt);
  5583. ds_send_judgrmk.setColumn(iSpclCdCnt,"pid", gv_pid);
  5584. ds_send_judgrmk.setColumn(iSpclCdCnt,"indd", gv_indd1);
  5585. ds_send_judgrmk.setColumn(iSpclCdCnt,"mskind", gv_mskind);
  5586. ds_send_judgrmk.setColumn(iSpclCdCnt,"cretno", gv_cretno);
  5587. ds_send_judgrmk.setColumn(iSpclCdCnt,"fromdd", gv_fromdd);
  5588. ds_send_judgrmk.setColumn(iSpclCdCnt,"instcd", gv_instcd);
  5589. ds_send_judgrmk.setColumn(iSpclCdCnt,"lastupdtrid", "");
  5590. iStartInx += (iCharCnt - 1);
  5591. }
  5592. iCharCnt = 0;
  5593. iLen = 0;
  5594. if (parseInt(iSpclCdTotLength / 1333) == iSpclCdCnt) {
  5595. i = spclmemo.length;
  5596. if ((iSpclCdTotLength % 1333) != 0) { // 700Byte 씩 자르고 남은 길이가 있는 경우
  5597. iSpclCdCnt = ds_send_judgrmk.addRow();
  5598. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclspec", String(spclmemo).substring(iStartInx, spclmemo.length));
  5599. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclmemoflag", item5Node);
  5600. ds_send_judgrmk.setColumn(iSpclCdCnt,"status", "i");
  5601. ds_send_judgrmk.setColumn(iSpclCdCnt,"unitflag", "M");
  5602. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclcd", "MX999");
  5603. ds_send_judgrmk.setColumn(iSpclCdCnt,"seqno", iSpclCdCnt);
  5604. ds_send_judgrmk.setColumn(iSpclCdCnt,"pid", gv_pid);
  5605. ds_send_judgrmk.setColumn(iSpclCdCnt,"indd", gv_indd1);
  5606. ds_send_judgrmk.setColumn(iSpclCdCnt,"mskind", gv_mskind);
  5607. ds_send_judgrmk.setColumn(iSpclCdCnt,"cretno", gv_cretno);
  5608. ds_send_judgrmk.setColumn(iSpclCdCnt,"fromdd", gv_fromdd);
  5609. ds_send_judgrmk.setColumn(iSpclCdCnt,"instcd", gv_instcd);
  5610. ds_send_judgrmk.setColumn(iSpclCdCnt,"lastupdtrid", "");
  5611. }
  5612. }
  5613. }
  5614. }
  5615. } else { // 새로 입력된 특정코드는 700byte를 넘지 않는다.
  5616. iSpclCdCnt = ds_send_judgrmk.addRow();
  5617. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclspec", spclmemo);
  5618. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclmemoflag", item5Node);
  5619. ds_send_judgrmk.setColumn(iSpclCdCnt,"status", "i");
  5620. ds_send_judgrmk.setColumn(iSpclCdCnt,"unitflag", "M");
  5621. ds_send_judgrmk.setColumn(iSpclCdCnt,"spclcd", "MX999");
  5622. ds_send_judgrmk.setColumn(iSpclCdCnt,"seqno", "1");
  5623. ds_send_judgrmk.setColumn(iSpclCdCnt,"pid", gv_pid);
  5624. ds_send_judgrmk.setColumn(iSpclCdCnt,"indd", gv_indd1);
  5625. ds_send_judgrmk.setColumn(iSpclCdCnt,"mskind", gv_mskind);
  5626. ds_send_judgrmk.setColumn(iSpclCdCnt,"cretno", gv_cretno);
  5627. ds_send_judgrmk.setColumn(iSpclCdCnt,"fromdd", gv_fromdd);
  5628. ds_send_judgrmk.setColumn(iSpclCdCnt,"instcd", gv_instcd);
  5629. ds_send_judgrmk.setColumn(iSpclCdCnt,"lastupdtrid", "");
  5630. }
  5631. }
  5632. function grp_calc_btn_recalc_onclick(obj:Button, e:ClickEventInfo)
  5633. {
  5634. var objArg = new Object();
  5635. objArg.arg_ds_temp = ds_init_iteminfo;
  5636. gv_ordrow = ds_grd_ordlist.rowposition;
  5637. var trgtManWindow = frmf_findPopup("SMPAI01800");
  5638. if (utlf_isNull(trgtManWindow))
  5639. {
  5640. frmf_modal("SMPAI01800","SMPAI01800", objArg, "", "", "", "", "", "", "", "", "", "M");
  5641. } else {
  5642. frmf_setFocusPop("SMPAI01800");
  5643. }
  5644. var oParam = {};
  5645. oParam.id = "TRPIJ00325";
  5646. oParam.service = "bfjudgapp.InHospJudg";
  5647. oParam.method = "reqGetRetcSpec_xp";
  5648. oParam.inds = "req=ds_send";
  5649. oParam.outds = "ds_init_retcspec=retcspec";
  5650. oParam.async = true;
  5651. oParam.progress = false;
  5652. oParam.callback = "cf_TRPIJ00325";
  5653. tranf_submit(oParam);
  5654. fGetIsclList("IPHS", "Y");
  5655. // 진료비 계산내역을 갖고 온다.
  5656. fGetCalc("Y");
  5657. }
  5658. function grp_msg_caption22_onclick(obj:Static, e:ClickEventInfo)
  5659. {
  5660. }
  5661. function lf_setAlramMessage(msg, showyn){
  5662. if (showyn != "Y"){
  5663. var nrow = ds_grd_msg.addRow();
  5664. ds_grd_msg.setColumn(nrow,"msg", msg);
  5665. grp_msg.position.x = 343;
  5666. grp_msg.position.y = 241;
  5667. grp_msg.visible = true;
  5668. grp_msg.button25.setFocus();
  5669. }
  5670. }
  5671. function grp_spcldrug_button25_onclick(obj:Button, e:ClickEventInfo)
  5672. {
  5673. grp_spcldrug.visible = false;
  5674. ds_grd_datagrid1.clearData();
  5675. }
  5676. function SMPIJ00300_onclose(obj:Form, e:CloseEventInfo)
  5677. {
  5678. appf_delPatientInfos();
  5679. frmf_closeChildPop();
  5680. }
  5681. //심사 완료 처리 //통합심사 완료 처리
  5682. function fJudgEnd(flag){
  5683. ds_init_iteminfo.setColumn(0,"dschjudgprcsstat",flag);
  5684. fRefrhVar(ds_init_iteminfo);
  5685. dsf_createDsRow("ds_tmp_save", [
  5686. {col:"pid", type:"STRING", size:256, val:gv_pid}
  5687. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  5688. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  5689. , {col:"cretno", type:"INT", size:256, val:gv_cretno}
  5690. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  5691. , {col:"instcd", type:"STRING", size:256, val:gv_instcd}
  5692. , {col:"inpath", type:"STRING", size:256, val:gv_inpath}
  5693. , {col:"arvpath", type:"STRING", size:256, val:gv_arvpath}
  5694. , {col:"ordrslt", type:"STRING", size:256, val:gv_ordrslt}
  5695. , {col:"probjudgflag", type:"STRING", size:256, val:gv_probjudgflag}
  5696. , {col:"medcaredayno", type:"INT", size:256, val:gv_medcaredayno}
  5697. , {col:"dschjudgprcsstat", type:"STRING", size:256, val:gv_dschjudgprcsstat}
  5698. , {col:"lastupdtrid", type:"STRING", size:256, val:gv_lastjudgendid}
  5699. , {col:"judgrmk", type:"STRING", size:256, val:gv_judgrmk}
  5700. , {col:"edirmk", type:"STRING", size:256, val:gv_edirmk}
  5701. , {col:"dschnotiyn", type:"STRING", size:256, val:gv_dschnotiyn}
  5702. , {col:"futureinsuyn", type:"STRING", size:256, val:gv_futureinsuyn}
  5703. , {col:"trgt", type:"STRING", size:256, val:"N"}
  5704. , {col:"insukind", type:"STRING", size:256, val:gv_insukindcd}
  5705. , {col:"suppkind", type:"STRING", size:256, val:gv_insukindcd}
  5706. //Message 추가
  5707. , {col:"wardcd", type:"STRING", size:256, val:gv_wardcd}
  5708. , {col:"roomcdnm", type:"STRING", size:256, val:gv_roomcdnm}
  5709. , {col:"patnm", type:"STRING", size:256, val:gv_patnm}
  5710. , {col:"age", type:"STRING", size:256, val:gv_age}
  5711. , {col:"gender", type:"STRING", size:256, val:gv_gender}
  5712. , {col:"ordtype", type:"STRING", size:256, val:gv_ordtype}
  5713. , {col:"orddeptnm", type:"STRING", size:256, val:ds_init_cmb_orddeptcd.lookupExpr("deptcd=='"+gv_orddeptcd+"'","depthngnm") }
  5714. ]);
  5715. var oParam = {};
  5716. oParam.id = "TXPIJ00301";
  5717. oParam.service = "bfjudgapp.InHospJudg";
  5718. oParam.method = "reqExeSaveInpt";
  5719. oParam.inds = "req=ds_tmp_save";
  5720. oParam.outds = "";
  5721. oParam.async = false;
  5722. oParam.callback = "cf_TXPIJ00301";
  5723. tranf_submit(oParam);
  5724. if (arErrorCode.pop("TXPIJ00301") > -1){//심사완료전 저장이 제대로 처리되지 않았을 경우네는 E70을 발생시키지 않게 한다. 20080908 박창원
  5725. //fSaveCalcAmt("I");
  5726. fSetItemInfoSetting();
  5727. return 1;
  5728. } else {
  5729. ds_init_iteminfo.setColumn(0,"dschjudgprcsstat","B");
  5730. fRefrhVar(ds_init_iteminfo);
  5731. fSetItemInfoSetting();
  5732. return 0;
  5733. }
  5734. }
  5735. function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
  5736. arErrorCode.push(sSvcId, nErrorCode);
  5737. }
  5738. //원무 계산서를 작성한다.
  5739. function fSaveCalcAmt(flag){
  5740. ds_insulist.clearData();
  5741. ds_insulist.appendData(ds_grd_insuhistory, true, false);
  5742. // 종료일 기준으로 sort
  5743. var rowcnt=ds_insulist.rowcount;
  5744. for(var i=0; i < rowcnt; i++){
  5745. for(var j = 0; j < rowcnt - 1; j++){
  5746. if(ds_insulist.getColumn(j, "todd") > ds_insulist.getColumn(j+1, "todd")){
  5747. ds_insulist.moveRow(j, j+1);
  5748. }
  5749. }
  5750. ds_insulist.setColumn(i, "flag", flag);
  5751. }
  5752. ds_temp_insulist.clear();
  5753. dsf_copyColInfo(ds_temp_insulist, ds_insulist, true);
  5754. var mskind = ds_send.getColumn(0, "mskind");
  5755. var mskind_calc = "";
  5756. var insuRow = -1;
  5757. rowcnt=ds_insulist.rowcount;
  5758. for(var i = 0; i < rowcnt; i++)
  5759. {
  5760. mskind_calc = ds_insulist.getColumn(i, "mskind");
  5761. if(mskind == mskind_calc){
  5762. insuRow = ds_temp_insulist.addRow();
  5763. ds_temp_insulist.setColumn(insuRow, "insukind", ds_insulist.getColumn(i, "insukind"));
  5764. ds_temp_insulist.setColumn(insuRow, "suppkind", ds_insulist.getColumn(i, "suppkind"));
  5765. ds_temp_insulist.setColumn(insuRow, "mskind", ds_insulist.getColumn(i, "mskind"));
  5766. ds_temp_insulist.setColumn(insuRow, "fromdd", ds_insulist.getColumn(i, "fromdd"));
  5767. if(ds_insulist.getColumn(i, "todd") == "99991231" || utlf_isNull(ds_insulist.getColumn(i, "todd"))){
  5768. ds_temp_insulist.setColumn(insuRow, "todd", ds_insulist.getColumn(i, "dschnotidt"));
  5769. ds_temp_insulist.setColumn(insuRow, "orgtodd", "99991231");
  5770. }
  5771. else{
  5772. // 미래유형이 있는경우 처리한다. 미래유형이 있는경우 마지막 데이터는 종료일이 99991231이 아님
  5773. // 미래유형이 있는 경우 종료일을 퇴원통보일로 맞춰주고 orgtodd는 99991231로 set 한다.
  5774. if(gv_futureinsuyn == "Y" && i == ds_insulist.rowcount){
  5775. ds_temp_insulist.setColumn(insuRow, "todd", ds_insulist.getColumn(i, "dschnotidt"));
  5776. ds_temp_insulist.setColumn(insuRow, "orgtodd", "99991231");
  5777. }
  5778. ds_temp_insulist.setColumn(insuRow, "todd", ds_insulist.getColumn(i, "todd"));
  5779. ds_temp_insulist.setColumn(insuRow, "orgtodd", ds_insulist.getColumn(i, "todd"));
  5780. }
  5781. ds_temp_insulist.setColumn(insuRow, "cretno", ds_insulist.getColumn(i, "cretno"));
  5782. ds_temp_insulist.setColumn(insuRow, "seqno", ds_insulist.getColumn(i, "seqno"));
  5783. ds_temp_insulist.setColumn(insuRow, "pid", ds_insulist.getColumn(i, "pid"));
  5784. ds_temp_insulist.setColumn(insuRow, "indd", ds_insulist.getColumn(i, "indd"));
  5785. ds_temp_insulist.setColumn(insuRow, "dschnotidt", ds_insulist.getColumn(i, "dschnotidt"));
  5786. ds_temp_insulist.setColumn(insuRow, "instcd", gv_instcd);
  5787. ds_temp_insulist.setColumn(insuRow, "flag", ds_insulist.getColumn(i, "flag"));
  5788. ds_temp_insulist.setColumn(insuRow, "disccd", ds_insulist.getColumn(i, "disccd"));
  5789. ds_temp_insulist.setColumn(insuRow, "ownbmaxgradeflag", ds_insulist.getColumn(i, "ownbmaxgradeflag"));
  5790. }
  5791. }
  5792. var oParam = {};
  5793. oParam.id = "TXPIJ00306";
  5794. oParam.service = "inordamtmngtapp.InHospUncoAmt";
  5795. oParam.method = "reqInsOutCalcIss";
  5796. oParam.inds = "insulist=ds_temp_insulist";
  5797. oParam.async = false;
  5798. oParam.callback = "cf_TXPIJ00306";
  5799. tranf_submit(oParam);
  5800. if (arErrorCode.pop("TXPIJ00306") > -1){
  5801. return 1;
  5802. } else {
  5803. return 0;
  5804. }
  5805. }
  5806. function cf_TXPIJ00306(sSvcId, nErrorCode, sErrorMsg) {
  5807. arErrorCode.push(sSvcId, nErrorCode);
  5808. }
  5809. //심사제 메모를 저장한다.
  5810. function fSaveJudgrmk(){
  5811. ds_send_judgrmk.clearData();
  5812. fRefrhVar(ds_init_iteminfo);
  5813. if(!utlf_isNull(gv_judgrmk)){
  5814. fSetJudgEDIMemo(gv_judgrmk, "Y");
  5815. }
  5816. if(!utlf_isNull(gv_edirmk)){
  5817. fSetJudgEDIMemo(gv_edirmk, "N");
  5818. }
  5819. if(!utlf_isNull(gv_tstrmk)){
  5820. fSetJudgEDIMemo(gv_tstrmk, "T");
  5821. }
  5822. ds_init_iteminfo.setColumn(0,"judgrmk_orign", gv_judgrmk);
  5823. ds_init_iteminfo.setColumn(0,"edirmk_orign", gv_edirmk);
  5824. ds_init_iteminfo.setColumn(0,"tstrmk_orign", gv_tstrmk);
  5825. var oParam = {};
  5826. oParam.id = "TXPIJ00304";
  5827. oParam.service = "bfjudgapp.InHospJudg";
  5828. oParam.method = "reqExeSaveJudgrmk";
  5829. oParam.inds = "req=ds_send_judgrmk";
  5830. oParam.async = true;
  5831. oParam.callback = "cf_TXPIJ00304";
  5832. tranf_submit(oParam);
  5833. }
  5834. function cf_TXPIJ00304(sSvcId, nErrorCode, sErrorMsg) {
  5835. if(nErrorCode < 0) {alert('저장에러 cf_TXPIJ00304'); return;}
  5836. }
  5837. function fUpdtCheckEssc(flag) {
  5838. var insuflag = "";
  5839. var isEsscdiag = btn_esscdiag.visible;
  5840. var isEsscdiagUpdt = false;
  5841. var isUpdtEsscV193 = ds_hidden_updtchkessc.getColumn(0, "esscV193");
  5842. var isUpdtEsscV191 = ds_hidden_updtchkessc.getColumn(0, "esscV191");
  5843. ds_hidden_item1.setColumn(0, "vcode", "");
  5844. if(gv_pid){
  5845. var isEsscV193 = false;
  5846. var isEsscV191 = false;
  5847. var isEsscVisible = true;
  5848. var chkspclcd = ds_vcode.lookupExpr("vcode=='V191' || vcode=='V192'", "vcode");
  5849. var spclcd = ds_vcode.lookupExpr("vcode=='V193'", "vcode");
  5850. if (utlf_transNullToEmpty(chkspclcd).length > 0) {
  5851. isEsscV191 = true;
  5852. //이미 체크된건이 V193인경우 V193으로 처리 한다.
  5853. var chk = ds_hidden_item1.getColumn(0, "vcode");
  5854. if(chk == "V193"){
  5855. ds_hidden_item1.setColumn(0, "vcode", "V193");
  5856. }else{
  5857. ds_hidden_item1.setColumn(0, "vcode", chkspclcd);
  5858. }
  5859. }
  5860. if(spclcd == "V193" && gv_suppkindcd != "32") {
  5861. ds_hidden_item1.setColumn(0, "vcode", spclcd);
  5862. isEsscV193 = true;
  5863. }
  5864. if (isEsscV191) {
  5865. if (isEsscVisible) {
  5866. if (isEsscdiag) {
  5867. if (isUpdtEsscV191 == "True") {
  5868. isEsscdiagUpdt = false;
  5869. } else {
  5870. isEsscdiagUpdt = true;
  5871. }
  5872. } else {
  5873. isEsscdiagUpdt = true;
  5874. }
  5875. btn_esscdiag.visible = true;
  5876. } else {
  5877. btn_esscdiag.visible = false;
  5878. isEsscdiagUpdt = false;
  5879. }
  5880. btn_esscdiag.class = "btn5";
  5881. btn_esscdiag.style.font = "Dotum,9,bold";
  5882. } else {
  5883. if (isEsscV193) {
  5884. if (isEsscVisible) {
  5885. if (isEsscdiag) {
  5886. if (isUpdtEsscV193 == "True") {
  5887. isEsscdiagUpdt = false;
  5888. } else {
  5889. isEsscdiagUpdt = true;
  5890. }
  5891. } else {
  5892. isEsscdiagUpdt = true;
  5893. }
  5894. btn_esscdiag.visible = true;
  5895. } else {
  5896. btn_esscdiag.visible = false;
  5897. isEsscdiagUpdt = false;
  5898. }
  5899. btn_esscdiag.class = "btn5";
  5900. btn_esscdiag.style.font = "Dotum,9,bold";
  5901. } else {
  5902. isEsscdiagUpdt = false;
  5903. btn_esscdiag.class = "btn2";
  5904. btn_esscdiag.style.font = "";
  5905. btn_esscdiag.visible = false;
  5906. }
  5907. }
  5908. var trgtManWindow = frmf_findPopup("SPPIJ01900");
  5909. var vcode = ds_hidden_item1.getColumn(0, "vcode");
  5910. ds_cond_sppij01900.addRow();
  5911. ds_cond_sppij01900.setColumn(0, "pid", gv_pid);
  5912. ds_cond_sppij01900.setColumn(0, "indd", gv_indd1);
  5913. ds_cond_sppij01900.setColumn(0, "mskind", gv_mskind);
  5914. ds_cond_sppij01900.setColumn(0, "brateflag", gv_brateflag);
  5915. ds_cond_sppij01900.setColumn(0, "brthdd", gv_brthdd);
  5916. ds_cond_sppij01900.setColumn(0, "vcode", vcode);
  5917. // 희귀난치 산정특례 로직 추가
  5918. var rareesscyn = ds_rareessc.getColumn(0, "rareesscyn");
  5919. var anohosprgstflag = ds_rooa.getColumn(0, "anohosprgstflag");
  5920. var rareobstno = ds_rooa.getColumn(0, "rareobstno");
  5921. var rareobstfromdd = ds_rooa.getColumn(0, "rareobstfromdd");
  5922. var rareobsttodd = ds_rooa.getColumn(0, "rareobsttodd");
  5923. var signyn = ds_rooa.getColumn(0, "signyn");
  5924. if (gv_insukindcd == "11" && gv_suppkindcd != "31" && gv_suppkindcd != "32" && gv_suppkindcd != "01" && rareesscyn == "Y") {
  5925. var ruleoutyn = ds_grd_diaglist.getColumn(0, "ruleoutyn");
  5926. if(ruleoutyn == "Y" || ruleoutyn == "R" || ruleoutyn == "1"){
  5927. // 주상병 R/O일때에는 희귀난치 메세지 처리 안함.
  5928. } else {
  5929. if (gv_fromdd >= "20091001") {
  5930. // 타병원등록 여부 , Y:타병원, N:우리병원
  5931. if(anohosprgstflag == "Y"){
  5932. // 희귀난치 번호여부
  5933. if(utlf_isNull(rareobstno) || rareobstno == "-"){
  5934. lf_setAlramMessage("## 희귀난치정보 ## : 타병원등록이나 희귀난치번호가 없습니다.");
  5935. }
  5936. }else if(anohosprgstflag == "N"){
  5937. // 희귀난치 번호여부
  5938. if(utlf_isNull(rareobstno) || rareobstno == "-"){
  5939. if(signyn == "Y"){
  5940. }else {
  5941. lf_setAlramMessage("## 희귀난치정보 ## : 재원병원등록이나 등록번호 및 서명정보가 없습니다.");
  5942. }
  5943. }
  5944. } else {
  5945. // 희귀난치 data(mmohrooa)에 정보없음.
  5946. lf_setAlramMessage("## 희귀난치정보 ## : 등록번호 및 서명정보가 없습니다.");
  5947. }
  5948. }
  5949. }
  5950. }
  5951. if (gv_insukindcd == "11" && gv_suppkindcd != "32" && rareesscyn == "Y" && gv_suppkindcd != "01" && gv_suppkindcd != "50"
  5952. && ((anohosprgstflag == "N" && signyn == "Y") || (anohosprgstflag == "Y" && rareobstfromdd <= gv_indd1 && rareobsttodd >= gv_indd1))) {
  5953. fesscdiag();
  5954. }else if(vcode == "V193" && gv_suppkindcd != "32" && gv_suppkindcd != "06" && gv_suppkindcd != "40" && gv_suppkindcd != "31" && gv_suppkindcd != "69" && !(gv_insukindcd == "22" && gv_suppkindcd == "08")) {
  5955. var msg = sysf_messageBox("등록암환자입니다. 중증요율 적용","S001");
  5956. if(msg ==6){
  5957. Insuchange("06");
  5958. }else if (msg == 7){
  5959. return true;
  5960. } else {
  5961. return false;
  5962. }
  5963. } else if(vcode == "V191" || vcode == "V192"){
  5964. if (flag == "S") {
  5965. var msg = sysf_messageBox("중증수술 환자입니다. 중증요율 적용","S001");
  5966. if(msg == 6){
  5967. if (utlf_isNull(trgtManWindow))
  5968. {
  5969. var rtn = frmf_modal("SPPIJ01900","SPPIJ01900",ds_cond_sppij01900,"","","","","","","","","","M");
  5970. } else {
  5971. frmf_setFocusPop("SPPIJ01900");
  5972. }
  5973. } else if (msg == 7){
  5974. return true;
  5975. } else {
  5976. return false;
  5977. }
  5978. }
  5979. } else {
  5980. if (flag == "S") {
  5981. }
  5982. fChkEsscEDI();
  5983. }
  5984. }
  5985. return true;
  5986. }
  5987. function fesscdiag() {
  5988. var readonly = ds_send.getColumn(0,"readonly");
  5989. if(gv_patnm){
  5990. var trgtManWindow = frmf_findPopup("SPPIJ01900");
  5991. var vcode = ds_hidden_item1.getColumn(0, "vcode");
  5992. dsf_createDsRow("ds_cond_req", [
  5993. {col:"pid", type:"STRING", size:256, val:gv_pid}
  5994. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  5995. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  5996. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  5997. , {col:"checkyn", type:"STRING", size:256, val:"N"}
  5998. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  5999. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  6000. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  6001. ]);
  6002. var oParam = {};
  6003. oParam.id = "TRPIJ00315";
  6004. oParam.service = "bfjudgapp.InHospJudg";
  6005. oParam.method = "reqNotiDschStat";
  6006. oParam.inds = "req=ds_cond_req";
  6007. oParam.outds = "ds_endcnclstat_item11=endcnclstat ds_recal=recal";
  6008. oParam.async = false;
  6009. oParam.callback = "cf_TRPIJ00315";
  6010. tranf_submit(oParam);
  6011. var cnt = ds_endcnclstat_item11.rowcount;
  6012. if (cnt==0){
  6013. sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
  6014. return;
  6015. }
  6016. var indschacptstat = ds_endcnclstat_item11.getColumn(0, "indschacptstat");
  6017. var dschjudgprcsstat = ds_endcnclstat_item11.getColumn(0, "dschjudgprcsstat");
  6018. ds_cond_sppij01900.setColumn(0, "pid" , gv_pid);
  6019. ds_cond_sppij01900.setColumn(0, "indd" , gv_indd1);
  6020. ds_cond_sppij01900.setColumn(0, "cretno" , gv_cretno);
  6021. ds_cond_sppij01900.setColumn(0, "mskind" , gv_mskind);
  6022. ds_cond_sppij01900.setColumn(0, "brateflag" , gv_brateflag);
  6023. ds_cond_sppij01900.setColumn(0, "brthdd" , gv_brthdd);
  6024. ds_cond_sppij01900.setColumn(0, "vcode" , vcode);
  6025. ds_cond_sppij01900.setColumn(0, "ownbrate" , gv_normalownbrate);
  6026. ds_cond_sppij01900.setColumn(0, "cfe" , gv_cfe);
  6027. if (gv_lastmdlclamdd > gv_fromdd && !utlf_isNull(gv_lastmdlclamdd) ) {
  6028. ds_cond_sppij01900.setColumn(0, "saveyn", "Y");
  6029. }
  6030. if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || indschacptstat == "D" || readonly == "Y" ) {
  6031. ds_cond_sppij01900.setColumn(0, "saveyn", "Y");
  6032. } else {
  6033. ds_cond_sppij01900.setColumn(0, "saveyn", "N");
  6034. }
  6035. // 희귀난치성산정특례
  6036. var rareessc = ds_rareessc.getColumn(0, "rareesscyn");
  6037. if (rareessc == "Y") {
  6038. if (gv_suppkindcd == "50") {
  6039. if (gv_lastmdlclamdd > gv_fromdd && !utlf_isNull(gv_lastmdlclamdd) ) {
  6040. sysf_messageBox("중간청구 등록이 되어있습니다. 요율을 변경","E001");
  6041. return;
  6042. }else if (readonly == "Y") {
  6043. sysf_messageBox("읽기전용 모드입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
  6044. return;
  6045. }else if (indschacptstat == "D") {
  6046. sysf_messageBox("이미 퇴원한 환자입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
  6047. return;
  6048. }else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
  6049. sysf_messageBox("이미 마감된 환자입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
  6050. return;
  6051. }
  6052. var msg = sysf_messageBox("이미 희귀난치성 산정특례 적용이 된 환자입니다. 기존에 적용된 유형을 취소","S001");
  6053. if(msg != 6) {
  6054. return;
  6055. }else{
  6056. if (fSaveMain("P") == true) {
  6057. var suppkind = "00";
  6058. if (gv_cfe == "E" || gv_cfe == "F") {
  6059. suppkind = "33"; //차상위2종정상으로 셋팅
  6060. }
  6061. Insuchange(suppkind);
  6062. }
  6063. }
  6064. }else if (gv_suppkindcd != "50" && gv_suppkindcd != "72" && gv_suppkindcd != "46") {
  6065. if (readonly == "Y") {
  6066. sysf_messageBox("읽기전용 모드입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
  6067. return;
  6068. }
  6069. if (indschacptstat == "D") {
  6070. sysf_messageBox("이미 퇴원한 환자입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
  6071. return;
  6072. }
  6073. if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
  6074. sysf_messageBox("이미 마감된 환자입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
  6075. return;
  6076. }
  6077. var msg = sysf_messageBox("희귀난치성 산정특례 환자입니다. 중증요율 적용","S001");
  6078. if(msg !=6){
  6079. return;
  6080. }else{
  6081. if (fSaveMain("P") == true) {
  6082. var suppkind = "50";
  6083. if (gv_cfe == "E" || gv_cfe == "F") {
  6084. suppkind = "46"; // 차상위2종희귀난치성 산정특례로 셋팅
  6085. } else if (gv_cfe == "C") {
  6086. suppkind = "72";// 차상위1종희귀난치성 희귀로 셋팅
  6087. }
  6088. Insuchange(suppkind);
  6089. }
  6090. }
  6091. }
  6092. }
  6093. if(vcode == "V193"){
  6094. if(gv_suppkindcd == "06" || gv_suppkindcd == "40"){
  6095. if (gv_lastmdlclamdd > gv_fromdd && !utlf_isNull(gv_lastmdlclamdd) ) {
  6096. sysf_messageBox("중간청구 등록이 되어있습니다. 요율을 변경","E001");
  6097. return;
  6098. }else if (readonly == "Y") {
  6099. sysf_messageBox("읽기전용 모드입니다. 등록암 요율을 적용하거나 취소","E001");
  6100. return;
  6101. }else if (indschacptstat == "D") {
  6102. sysf_messageBox("이미 퇴원한 환자입니다. 등록암 요율을 적용하거나 취소","E001");
  6103. return;
  6104. }else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
  6105. sysf_messageBox("이미 마감된 환자입니다. 등록암 요율을 적용하거나 취소","E001");
  6106. return;
  6107. }
  6108. var msg = sysf_messageBox("이미 등록암 적용이 된 환자입니다. 기존에 적용된 유형을 취소","S001");
  6109. if(msg != 6) {
  6110. return;
  6111. }else{
  6112. if (fSaveMain("P") == true) {
  6113. var suppkind = "00";
  6114. if (gv_cfe == "E" || gv_cfe == "F") {
  6115. suppkind = "33"; //차상위2종정상으로 셋팅
  6116. }
  6117. Insuchange(suppkind);
  6118. }
  6119. }
  6120. }else if(gv_suppkindcd != "06" && gv_suppkindcd != "40" && gv_suppkindcd != "31" && !(gv_insukindcd == "22" && gv_suppkindcd == "08") ) { // 신생아유형은 제외추가
  6121. if (readonly == "Y") {
  6122. sysf_messageBox("읽기전용 모드입니다. 등록암 요율을 적용하거나 취소","E001");
  6123. return;
  6124. }
  6125. if (indschacptstat == "D") {
  6126. sysf_messageBox("이미 퇴원한 환자입니다. 등록암 요율을 적용하거나 취소","E001");
  6127. return;
  6128. }
  6129. if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
  6130. sysf_messageBox("이미 마감된 환자입니다. 등록암 요율을 적용하거나 취소","E001");
  6131. return;
  6132. }
  6133. var msg = sysf_messageBox("등록암환자입니다. 중증요율 적용","S001");
  6134. if(msg !=6){
  6135. return;
  6136. }else{
  6137. if (fSaveMain("P") == true) {
  6138. var suppkind = "06";
  6139. if (gv_cfe == "E" || gv_cfe == "F") {
  6140. suppkind = "40"; //차상위2종정상으로 셋팅
  6141. }
  6142. Insuchange(suppkind);
  6143. }
  6144. }
  6145. }
  6146. }else if(vcode == "V191" || vcode == "V192"){
  6147. // 6시간 미만 환자는 화면을 보여주지 않는다.
  6148. if (gv_sixtimyn == "Y") {
  6149. sysf_messageBox("6시간 미만 상태 입니다. 중증수술 요율을 설정(저장) ","E001");
  6150. ds_cond_sppij01900.setColumn(0, "saveyn", "Y");
  6151. }
  6152. if (utlf_isNull(trgtManWindow))
  6153. {
  6154. frmf_modal("SPPIJ01900","SPPIJ01900",ds_cond_sppij01900,"","","","","","","","","","M");
  6155. } else {
  6156. frmf_setFocusPop("SPPIJ01900");
  6157. }
  6158. }
  6159. }
  6160. }
  6161. function fChkEsscEDI(){
  6162. if(gv_suppkindcd == "05" || gv_suppkindcd == "39"){
  6163. return false;
  6164. }
  6165. if(gv_insukindcd != "11" && gv_insukindcd != "21" && gv_insukindcd != "22" ){
  6166. return false;
  6167. }
  6168. var cEssc = ds_chkesscedi.getColumn(0,"chkesscedi");
  6169. if (utlf_isNull(cEssc)) { // 특정내역이 없는 경우임
  6170. return false;
  6171. }else{
  6172. frmf_modal("SPPIJ02100","SPPIJ02100",ds_cond_chkesscedi,"","","","","","","","","","M");
  6173. }
  6174. return true;
  6175. }
  6176. function fSpclGridInsertRow(spclcd) {
  6177. var chk = ds_grd_clcjlist.findRowExpr('utlf_isNull(spclcd)==true');
  6178. if(utlf_isNull(spclcd) && chk > -1 && ds_grd_clcjlist.getRowCount() != 0){
  6179. return chk;
  6180. }
  6181. var aRow = ds_grd_clcjlist.addRow();
  6182. ds_grd_clcjlist.setColumn(aRow, "unitflag" , ds_send.getColumn(0,"unitflag") == "J" ? "J" : "M" );
  6183. ds_grd_clcjlist.setColumn(aRow, "edicd" , "-");
  6184. ds_grd_clcjlist.setColumn(aRow, "spclmemoflag" , "E");
  6185. ds_grd_clcjlist.setColumn(aRow, "pid" , gv_pid );
  6186. ds_grd_clcjlist.setColumn(aRow, "indd" , gv_indd1 );
  6187. ds_grd_clcjlist.setColumn(aRow, "fromdd" , gv_fromdd );
  6188. ds_grd_clcjlist.setColumn(aRow, "mskind" , gv_mskind );
  6189. ds_grd_clcjlist.setColumn(aRow, "cretno" , gv_cretno );
  6190. if (spclcd=="MT004"){
  6191. ds_grd_clcjlist.setColumn(aRow, "spclcd" , "MT004");
  6192. ds_grd_clcjlist.setColumn(aRow, "spclspec" , "Y");
  6193. ds_grd_clcjlist.setColumn(aRow, "remfact" , "X(1)");
  6194. ds_grd_clcjlist.setColumn(aRow, "detldesc" , "소명자료를 첨부하는 경우 'Y'를 기재");
  6195. }
  6196. ds_grd_clcjlist.rowposition = aRow;
  6197. swt_spclmemo.case_spclspec.grd_clcjlist.vscrollbar.pos = aRow;
  6198. return aRow;
  6199. }
  6200. function fSpclGridDeleteRow() {
  6201. var index = grdf_getSelectedRows(swt_spclmemo.case_spclspec.grd_clcjlist);
  6202. var cRrow = -1;
  6203. for ( var k = index.length - 1; k >= 0; k-- ) {
  6204. cRrow = index[k];
  6205. if (ds_grd_clcjlist.getRowType(cRrow) == 2) {
  6206. ds_grd_clcjlist.deleteRow(cRrow);
  6207. } else {
  6208. var arrPostion = new Array();
  6209. arrPostion[0] = cRrow;
  6210. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, "D", arrPostion);
  6211. }
  6212. }
  6213. fCheckSpclSpecData();
  6214. }
  6215. function fDschjudgEndType(dschjudgendtype) { //fDschjudgEndType("")
  6216. if(!fChkSuppkindSave()) return;
  6217. if(!utlf_isNull(gv_patnm)){
  6218. // 퇴원마감시 간호확정이 취소되었는지 실시한 확인 후 진행한다.
  6219. // 타인이 간호 확정을 취소할때 마감되는 상황이 발생되지 않기 위함
  6220. // 간호 확정이 취소된 경우에는 대상자 조회 호면을 refresh 하고
  6221. // 메인화면의 심사상태를 'A' 미심상태로 하고 간호 퇴원통보 여부도 'N'으로 세팅한다.- 20080927 박창원
  6222. dsf_createDsRow("ds_cond_req", [
  6223. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6224. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6225. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  6226. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  6227. , {col:"checkyn", type:"STRING", size:256, val:"Y"}
  6228. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  6229. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  6230. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  6231. , {col:"maxhopedd", type:"STRING", size:256, val:gv_dschnotidt.substr(0,8)}
  6232. ]);
  6233. var oParam = {};
  6234. oParam.id = "TRPIJ00315";
  6235. oParam.service = "bfjudgapp.InHospJudg";
  6236. oParam.method = "reqNotiDschStat";
  6237. oParam.inds = "req=ds_cond_req";
  6238. oParam.outds = "ds_endcnclstat_item11=endcnclstat ds_recal=recal ds_drginfo=drginfo";
  6239. oParam.async = false;
  6240. oParam.callback = "cf_TRPIJ00315";
  6241. tranf_submit(oParam);
  6242. //의료급여 정신과입원 정액 유형(14번유형)에 선별급여 존재 시 blocking 20191014
  6243. if ((gv_insukindcd == "21" || gv_insukindcd == "22") && gv_suppkindcd == "14" ) {
  6244. for(var i = 0; i < ds_grd_ordlist.rowcount ; i++) {
  6245. if( ds_grd_ordlist.getColumn(i, "item1") == "AA" ||
  6246. ds_grd_ordlist.getColumn(i, "item1") == "BB" ||
  6247. ds_grd_ordlist.getColumn(i, "item1") == "DD" ||
  6248. ds_grd_ordlist.getColumn(i, "item1") == "EE" ) {
  6249. sysf_messageBox("선별급여가 존재하여 분리청구 요망", "E");
  6250. return;
  6251. }
  6252. }
  6253. }
  6254. if (gv_insukindcd == "11" || gv_insukindcd == "21" || gv_insukindcd == "22" ) {
  6255. oParam = {};
  6256. oParam.id = "TRPIJ00350";
  6257. oParam.service = "bfjudgapp.InHospJudg";
  6258. oParam.method = "reqGetIsclEdiuDiff";
  6259. oParam.inds = "req=ds_send";
  6260. oParam.outds = "ds_isclediudiff=isclediudiff";
  6261. oParam.async = false;
  6262. tranf_submit(oParam);
  6263. }
  6264. if (ds_isclediudiff.rowcount > 0) {
  6265. var msg = sysf_messageBox("EDI코드,단가가 불일치하는 처방내역이 있습니다. 계속 ", "S001");
  6266. if (msg != "6") {
  6267. return;
  6268. }
  6269. }
  6270. if (ds_grd_ordlist.findRowExpr(eval(ds_PK232list.getColumn(4,"cdnm"))) > -1 )
  6271. {
  6272. var msg = sysf_messageBox(eval(ds_PK232list.getColumn(4,"detldesc")) + "계속 ", "S001");
  6273. if (msg != "6") {
  6274. return;
  6275. }
  6276. }
  6277. // 퇴원마감시 퇴원확정일시 이후 처방이 있으면 alert - 20081112 박창원
  6278. var maxexectm = utlf_transNullToEmpty(ds_endcnclstat_item11.getColumn(0, "maxexectm")).substr(0,8);
  6279. var dschnotidt = utlf_transNullToEmpty(gv_dschnotidt).substr(0,8);
  6280. var dschnotiyn = ds_endcnclstat_item11.getColumn(0, "dschnotiyn");
  6281. var ipscendyn = ds_endcnclstat_item11.getColumn(0, "ipscendyn");
  6282. //var dupexecdd = ds_endcnclstat_item11.getColumn(0, "dupexecdd");
  6283. var paygrntyn = ds_endcnclstat_item11.getColumn(0, "paygrntyn");
  6284. var dschdclrtyn = ds_endcnclstat_item11.getColumn(0, "dschdclrtyn");
  6285. var admamtcalcyn = ds_endcnclstat_item11.getColumn(0, "admamtcalcyn");
  6286. var dschjudgprcsstatyn = ds_endcnclstat_item11.getColumn(0, "dschjudgprcsstatyn");
  6287. if (dschnotiyn != 'N' && maxexectm > dschnotidt) {
  6288. var msg = sysf_messageBox("퇴원확정이후" + maxexectm + "일자 실시처방이 있습니다. 계속 ", "S001");
  6289. if (msg != "6") {
  6290. return;
  6291. }
  6292. }
  6293. if (dschjudgendtype != 'G' && dschnotiyn == 'N') {
  6294. sysf_messageBox("간호 퇴원확정이 취소된 상태 입니다. 마감 ", "E001");
  6295. var trgtManWindow = frmf_findPopup("SMPIJ00200");
  6296. // 입원재원심사대상자 화면을 refresh
  6297. trgtManWindow.fGetInBfJudgTrgtManList();
  6298. ds_init_iteminfo.setColumn(0, "dschnotiyn", "N");
  6299. ds_init_iteminfo.setColumn(0, "dschjudgprcsstat", "A");
  6300. return;
  6301. } else if (dschjudgendtype == 'G' && dschdclrtyn == 'N') {
  6302. sysf_messageBox("의사 퇴원예고가 취소된 상태 입니다. 마감 ", "E001");
  6303. var trgtManWindow = frmf_findPopup("SMPIJ00200");
  6304. // 입원재원심사대상자 화면을 refresh
  6305. trgtManWindow.fGetInBfJudgTrgtManList();
  6306. ds_init_iteminfo.setColumn(0, "dschnotiyn", "N");
  6307. ds_init_iteminfo.setColumn(0, "dschdclrtyn", "N");
  6308. ds_init_iteminfo.setColumn(0, "dschjudgprcsstat", "A");
  6309. return;
  6310. }
  6311. // 입원요율일 경우만 병실료 체크한다.
  6312. if (gv_brateflag == "I") {
  6313. if (admamtcalcyn != "Y") {
  6314. if(gv_mskind != "S"){
  6315. sysf_messageBox("계산되지 않은 병실료가 존재합니다. \n확인후 재계산(전수계산)","I008");
  6316. return;
  6317. }
  6318. }
  6319. }
  6320. // 2011.04.28 syjung 소급계산완료 여부. N이면 소급계산할 데이터가 남아 있으므로 퇴원마감 할 수 없음.
  6321. if (ipscendyn == "N") {
  6322. sysf_messageBox("완료되지 않은 소급계산 내역이 존재합니다. 재계산","I008");
  6323. return;
  6324. }
  6325. ds_init_dumpclamkeyexistyn.clearData();
  6326. var oParam = {};
  6327. oParam.id = "TRPIJ00324";
  6328. oParam.service = "bfjudgapp.InHospJudg";
  6329. oParam.method = "reqGetDumpClamkeyExistYn_xp";
  6330. oParam.inds = "req=ds_init_iteminfo";
  6331. oParam.outds = "ds_init_dumpclamkeyexistyn=dumpclamkeyexistyn";
  6332. oParam.async = false;
  6333. tranf_submit(oParam);
  6334. var dumpexistyn = ds_init_dumpclamkeyexistyn.getColumn(0, "dumpexistyn");
  6335. var dumpclamkeyexistyn = ds_init_dumpclamkeyexistyn.getColumn(0, "dumpclamkeyexistyn");
  6336. // 2011.06.14 syjung 외래에서 덤프되지 않은 처방 존재 여부. Y면 덤프되지 않은 처방이 있으므로 퇴원마감 할 수 없음.
  6337. if (dumpexistyn == "Y") {
  6338. sysf_messageBox("입원 당일 외래에서 덤프되지 않은 처방이 존재합니다. 재원심사 화면에서 [▶Dump] 내역을 ","I007");
  6339. return;
  6340. }
  6341. if (dumpclamkeyexistyn == "Y") {
  6342. if(sysf_messageBox("외래 자료 수집이 된 재원 내 실시처방이 있습니다. 외래 사후 자료를 생성 삭제한 후 Dump처리 하십시오.", "Q003") == 6) {
  6343. var rtnVal = frmf_modal("SPPIJ03500","SPPIJ03500","","","","","","","","","","","M");
  6344. if (utlf_isNull(rtnVal)) {
  6345. sysf_messageBox("사유를", "C001");
  6346. return;
  6347. } else {
  6348. ds_init_iteminfo.setColumn(0,"dumprmk",rtnVal);
  6349. }
  6350. } else {
  6351. return;
  6352. }
  6353. }
  6354. // if (!utlf_isNull(dupexecdd)) {
  6355. // dupexecdd = dupexecdd.toDate().getDateFormat("YYYY/MM/DD")
  6356. // sysf_messageBox(dupexecdd + "중복계산 내역이 존재합니다. " + dupexecdd + "일 재계산","I008");
  6357. // return;
  6358. // }
  6359. if (gv_etcordflag == "T" && (gv_batlockid == "-" || gv_batlockid == "" )) {
  6360. sysf_messageBox("ISS 점수가 확정되지 아니한 경우에는 퇴원마감 할 수","I004");
  6361. //return;
  6362. }
  6363. //기재점검 중증, 산정특례 여부 체크
  6364. if (fGetDiagSpclcdCheck() == false) {
  6365. return false;
  6366. }
  6367. // 주부유형이 함께 있는 환자에 대해서는 퇴원마감시 알럿을 띄워준다.
  6368. if (gv_msyn == "Y") {
  6369. sysf_messageBox("다른 보험 유형정보가 존재하오니 해당건 퇴원마감여부도 확인하여 주세요. 해당건 미마감 시 퇴원수납 할 수","I004");
  6370. }
  6371. // 수술심사 미완료시 응급,chemo,dsc는 알럿만 정규퇴원은 blcok - 20090114 박창원
  6372. if(dschnotiyn == "Y" || (dschjudgendtype == 'G' && dschdclrtyn == 'Y')){
  6373. // 수술심사가 완료되지 않았습니다. - 20080821 박창원
  6374. if ( gv_ordtype != "I" && ((btn_operdiag.text== "수술(미)") ||(btn_operdiag.text== "수술(보)")) && (gv_opflag == "Y" || gv_opflag == "YY" || gv_opflag == "YN") ) {
  6375. var msg = sysf_messageBox("수술심사가 완료되지 않았습니다. 계속","S001");
  6376. if(msg != 6) {
  6377. return;
  6378. }
  6379. }
  6380. if ( gv_ordtype == "I" && ((btn_operdiag.text == "수술(미)") ||(btn_operdiag.text== "수술(보)")) && (gv_opflag == "Y" || gv_opflag == "YY" || gv_opflag == "YN") ) {
  6381. sysf_messageBox("수술심사가 완료되지 않았습니다. 마감","E001");
  6382. return;
  6383. }
  6384. // 소급내역이 존재합니다. 처리후 마감해주세요.
  6385. // 10월3일 이전 소급건은 조건에서 제외한다. - 20081004 박창원
  6386. if (!utlf_isNull(ds_recal.getColumn(0,"recalcdd"))) {
  6387. sysf_messageBox("소급내역이 존재합니다. 마감","E001");
  6388. return;
  6389. }
  6390. //약 반환 확인유무 및 창 호출.
  6391. if (fCheckReturnPrcpExist() == false) {
  6392. return;
  6393. }
  6394. if (gv_insukindcd == "31"){
  6395. if (paygrntyn != "Y") {
  6396. sysf_messageBox("자동차보험 지급보증번호 누락입니다.","I007");
  6397. return;
  6398. }
  6399. }
  6400. if ((dschjudgendtype != 'G' && fChkClose() == true) || dschjudgendtype == 'G') {
  6401. // 예고심사 환자가 미시행처방이 있는 경우 마감 제어는 하지 않는다!
  6402. if (dschjudgendtype == 'G' && fChkClose() == false) {
  6403. var msg = sysf_messageBox("예고심사 환자 미시행 처방 내역이 있습니다. 마감","S001");
  6404. if(msg != 6) {
  6405. return;
  6406. }
  6407. }
  6408. if (fSaveMain("C") == true) {
  6409. //maxexectm 없다는건 iscl이 존재 하지 않는 것임.
  6410. var dschantichk = ds_getdschcalccheck.getColumn(0,"dschantichk");
  6411. if (dschantichk == "Y") {
  6412. var msg = sysf_messageBox("수술 예방적 항생제 평가 대상자입니다.\n항생제 퇴원약 사용 여부를 재확인하시기 바랍니다. \n계속","S001");
  6413. if(msg != 6) {
  6414. return;
  6415. }
  6416. }
  6417. if (utlf_isNull(maxexectm)) {
  6418. if ( sysf_messageBox("유형에 계산된 처방 내역이 하나도 없습니다. 마감","Q004") != 6 ) {
  6419. return false;
  6420. }
  6421. }
  6422. var sameinddyn = ds_getdschcalccheck.getColumn(0, "sameinddyn");
  6423. if (sameinddyn == "Y") {
  6424. sysf_messageBox("입원당일 퇴원건이 ","I010");
  6425. }
  6426. // 입원 계산 자료 검증(2012.11.30 LeeEunJung)
  6427. var check0 = ds_getdschcalccheck.getColumn(0,"check0");
  6428. var check1 = ds_getdschcalccheck.getColumn(0,"check1");
  6429. var check2 = ds_getdschcalccheck.getColumn(0,"check2");
  6430. var check3 = ds_getdschcalccheck.getColumn(0,"check3");
  6431. var check4 = ds_getdschcalccheck.getColumn(0,"check4");
  6432. var check5 = ds_getdschcalccheck.getColumn(0,"check5");
  6433. if (check0 =="Y"||check1 =="Y"||check2 =="Y"||check3 =="Y"||check4 =="Y"||check5 =="Y") {
  6434. sysf_messageBox("계산자료 검증 시 오류가 체크되었습니다. 전체 재계산 후 문제 해결이 안 되면 전산실로 문의","I008");
  6435. return false;
  6436. }
  6437. ds_getiscldiffinpt.clearData();
  6438. dsf_createDsRow("ds_cond_req", [
  6439. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6440. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6441. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  6442. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  6443. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  6444. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  6445. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  6446. , {col:"insukind", type:"STRING", size:256, val:gv_insukindcd}
  6447. , {col:"suppkind", type:"STRING", size:256, val:gv_suppkindcd}
  6448. , {col:"brateflag", type:"STRING", size:256, val:gv_brateflag}
  6449. ]);
  6450. var oParam = {};
  6451. oParam.id = "TRPIJ00352";
  6452. oParam.service = "bfjudgapp.InHospJudg";
  6453. oParam.method = "reqGetIsclDiffInpt";
  6454. oParam.inds = "req=ds_cond_req";
  6455. oParam.outds = "ds_getiscldiffinpt=rsltInfo";
  6456. oParam.async = false;
  6457. //oParam.callback = "cf_TRPIJ00352";
  6458. tranf_submit(oParam);
  6459. var check6 = ds_getiscldiffinpt.getColumn(0,"check6");
  6460. if (check6 == "Y") {
  6461. sysf_messageBox("계산자료 검증 시 오류가 체크되었습니다. 전체 재계산 후 문제 해결이 안 되면 전산실로 문의","I008");
  6462. return;
  6463. }
  6464. // 건강보험 정상 16일 이상 재원환자에 대해 장기재원 불가피 주상병 존재하는 경우 알림
  6465. var longtermchk = ds_getdschcalccheck.getColumn(0, "longtermchk");
  6466. if (longtermchk == "Y") {
  6467. var msg = sysf_messageBox("장기재원 불가피 주상병이 있는 16일 이상 입원료 발생 환자 입니다.\n보조 유형을 확인하시기 바랍니다. \n계속","S001");
  6468. if(msg != 6) {
  6469. return;
  6470. }
  6471. }
  6472. //응급실 관리료 여부 체크
  6473. var nog3reasnyn = ds_getdschcalccheck.getColumn(0,"nog3reasnyn");
  6474. if (nog3reasnyn == "Y") {
  6475. sysf_messageBox("응급 의료관리료 미발생 환자입니다.","I007");
  6476. return false;
  6477. }
  6478. if (fGetDrgOpenPopup("O") == false) {
  6479. return false;
  6480. }
  6481. if (dschjudgendtype == "G" && dschjudgprcsstatyn > 0){
  6482. sysf_messageBox("입원이력 내 미심상태가 있습니다.","I007");
  6483. return false;
  6484. }
  6485. var icdrdept = ds_getdschcalccheck.getColumn(0,"icdrdept");
  6486. var reqdeptno = ds_init_cmb_orddeptcd.lookup("deptcd", icdrdept, "reqdeptno");
  6487. if (reqdeptno == "55" && gv_etcordflag == "T"){
  6488. sysf_messageBox(" 외상치과 환자입니다.","I007");
  6489. return false;
  6490. }
  6491. if (dschjudgendtype == "A") {
  6492. if (fJudgEnd("E")){
  6493. // 2. 화면 클리어 (공통)
  6494. fJudgEndClear();
  6495. //김주형샘 요청 마감시 보이지 않도록.
  6496. //lf_setAlramMessage("통합심사마감 처리가 완료되었습니다.");
  6497. } else {
  6498. sysf_messageBox("마감 처리가 되지","E007");
  6499. }
  6500. } else if (dschjudgendtype == "G") { // 예고심사 추가 (2014.06.19 LEJ)
  6501. if (fJudgEnd("G")){
  6502. // 2. 화면 클리어 (공통)
  6503. fJudgEndClear();
  6504. //김주형샘 요청 마감시 보이지 않도록.
  6505. //lf_setAlramMessage("예고심사마감 처리가 완료되었습니다.");
  6506. } else {
  6507. sysf_messageBox("마감 처리가 되지","E007");
  6508. }
  6509. } else {
  6510. if (fJudgEnd("C")){
  6511. // 2. 화면 클리어 (공통)
  6512. fJudgEndClear();
  6513. //김주형샘 요청 마감시 보이지 않도록.
  6514. //lf_setAlramMessage("퇴원마감 처리가 완료되었습니다.");
  6515. } else {
  6516. sysf_messageBox("마감 처리가 되지","E007");
  6517. }
  6518. }
  6519. }
  6520. } else {
  6521. sysf_messageBox("미시행 처방 내역이 있습니다. 마감","E001");
  6522. }
  6523. }
  6524. else {
  6525. sysf_messageBox("유형에 계산된 처방 내역이 하나도 없습니다. 마감","E001");
  6526. return;
  6527. }
  6528. // if(gv_age < 6) sysf_messageBox("차상위 2종 6세미만 대상여부 확인하세요.","I");
  6529. }
  6530. }
  6531. function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
  6532. if(nErrorCode < 0) {
  6533. sysf_messageBox("실시간 환자상태 체크에 실패 했습니다.기본데이터 이상이나 시스템 오류입니다.관리자 문의 후", "C003");
  6534. return;
  6535. }
  6536. }
  6537. /*
  6538. 심사완료전상병특정내역체크 2013.07.10 plet2
  6539. 16세미만, 35세 이상 초산 산모 필수 진단 체크
  6540. 특정 분만진단에 필수 부진단 유무 체크
  6541. 임신주수별 체중과 진단 체크
  6542. */
  6543. function fGetDiagSpclcdCheck(){
  6544. var oParam = {};
  6545. oParam.id = "TRPIJ00341";
  6546. oParam.service = "bfjudgapp.InHospJudg";
  6547. oParam.method = "reqGetNewBornBabyWeightList_xp";
  6548. oParam.inds = "req=ds_send";
  6549. oParam.outds = "ds_nbwt=nbwt ds_clcjnbwt=clcjnbwt";
  6550. oParam.async = false;
  6551. tranf_submit(oParam);
  6552. var chk_diagcd = ds_grd_diaglist.lookup("seqno","1","diagcd"); //주상병코드
  6553. var chk_O3420 = ds_grd_diaglist.lookup("diagcd","O3420","diagcd");
  6554. var chk_prgweekcnt = ds_clcjnbwt.getColumn(0, "prgweekcnt"); //임신주수
  6555. var chk_weig = ds_clcjnbwt.getColumn(0, "weig"); //신생아체중
  6556. var chk_O365 = ds_grd_diaglist.findRowExpr("diagcd=='O365' || diagcd=='O366'"); //임신주수상병코드
  6557. var chk_poaflag = ds_grd_diaglist.findRowExpr("!utlf_isNull(diagcd) && utlf_isNull(poaflag)"); //poaflag
  6558. //16세미만, 35세 이상 초산 산모 필수 진단 체크
  6559. var chk_R= ds_grd_ordlist.findRowExpr("snglcalcscorcd=='R4351' || snglcalcscorcd=='R3131' || snglcalcscorcd=='R3141' || snglcalcscorcd=='R4361' || snglcalcscorcd=='R4519' || snglcalcscorcd=='R4517'") // 초산 상병체크
  6560. var result = true;
  6561. if (chk_R.length > 0 && (gv_age >= 35 || gv_age < 16) ) {
  6562. if(sysf_messageBox("어린 초임부 또는 고령초임부 환자입니다.", "Q003") == 6) {
  6563. result = true;
  6564. } else {
  6565. result = false;
  6566. }
  6567. }
  6568. //특정 분만진단에 필수 부진단 유무 체크
  6569. //O820이 주상병인 환자가 O3420 상병이 없을 경우 체크
  6570. if (chk_diagcd == 'O820' && utlf_transNullToEmpty(chk_O3420).length == 0 ) {
  6571. if(sysf_messageBox("반복제왕절개 환자입니다.", "Q003") == 6) {
  6572. result = true;
  6573. } else {
  6574. var ans = sysf_messageBox("O3420 상병을 입력" , "S001");
  6575. if (ans==6){
  6576. var maxseq = ds_grd_diaglist.addRow();
  6577. ds_grd_diaglist.setColumn(maxseq, "diagcd", "O3420");
  6578. ds_grd_diaglist.setColumn(maxseq, "diagnm", "이전의 제왕절개로 인한 흉터의 산모 관리");
  6579. result = true;
  6580. } else {
  6581. result = false;
  6582. }
  6583. }
  6584. }
  6585. //임신주수별 체중과 진단 체크
  6586. //신생아 체중관련 상병누락입니다 (O365 or O366)
  6587. if (utlf_transNull(chk_prgweekcnt,0) > 0 && utlf_transNull(chk_weig,0) > 0) {
  6588. var nwbabyweight = parseInt(utlf_transNull(chk_weig,0));
  6589. var minweight = parseInt(utlf_transNull(ds_nbwt.lookup("prgntweek", chk_prgweekcnt, "minweight" ),0));
  6590. var maxweight = parseInt(utlf_transNull(ds_nbwt.lookup("prgntweek", chk_prgweekcnt, "maxweight" ),0));
  6591. if (chk_O365 < 0 && (nwbabyweight <= minweight || nwbabyweight >= maxweight ) ) {
  6592. if(sysf_messageBox("신생아 체중관련 상병누락 환자입니다.", "Q003") == 6) {
  6593. result = true;
  6594. } else {
  6595. result = false;
  6596. }
  6597. }
  6598. }
  6599. var opchkyn = ds_drginfo.getColumn(0,"opchkyn");
  6600. var indaycnt = utlf_transNull(ds_grd_insuhistory.lookup("fromdd", gv_fromdd, "indaycnt"),0);
  6601. var drgfromddchk = ds_drginfo.getColumn(0,"drgfromddchk");
  6602. var drgotptyn = ds_drginfo.getColumn(0,"drgotptyn");
  6603. if (opchkyn=="Y" && indaycnt <= 30) {
  6604. if (chk_poaflag > -1) {
  6605. sysf_messageBox("상병의 POA정보는", "I003");
  6606. return false;
  6607. }
  6608. if (drgotptyn=="Y") {
  6609. sysf_messageBox("DRG 퇴원 당일 외래 진료예약이 내역 있습니다.", "I007");
  6610. }
  6611. }
  6612. if (opchkyn=="Y" && drgfromddchk == "Y") {
  6613. sysf_messageBox("DRG와 분리된 내역 있습니다. 마감 순서", "I007");
  6614. return false;
  6615. }
  6616. return result;
  6617. }
  6618. /**
  6619. * @desc : 퇴원예고일자 이후의 처방 존재 유무 확인(submit)
  6620. * @param :
  6621. * @return : true, false
  6622. * @authur : 이경민 2013. 8. 5
  6623. */
  6624. function fCheckReturnPrcpExist(){
  6625. var bRtn = true;
  6626. dsf_createDsRow("ds_cond_req", [
  6627. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6628. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6629. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  6630. , {col:"orddeptcd", type:"STRING", size:256, val:gv_orddeptcd}
  6631. ]);
  6632. var oParam = {};
  6633. oParam.id = "TRMMO00404";
  6634. oParam.service = "prcpmngtapp.EtcPrcpMngt";
  6635. oParam.method = "reqGetChkDschReturnPrcpCnt";
  6636. oParam.inds = "req=ds_cond_req";
  6637. oParam.outds = "ds_rtndata=rtndata";
  6638. oParam.async = false;
  6639. oParam.callback = "cf_TRMMO00404";
  6640. tranf_submit(oParam);
  6641. if(arErrorCode.pop("TRMMO00404") > -1){
  6642. var nCnt = ds_rtndata.getColumn(0,"cnt");
  6643. if(nCnt > 0) {
  6644. frmf_setParameter("SPMMO50400_pid", gv_pid);
  6645. frmf_setParameter("SPMMO50400_indd", gv_indd1);
  6646. frmf_setParameter("SPMMO50400_cretno", gv_cretno);
  6647. frmf_modal("SPMMO50400","SPMMO50400","","","","","","","","","","","M");
  6648. bRtn = false;
  6649. }
  6650. }
  6651. return bRtn;
  6652. }
  6653. function cf_TRMMO00404(sSvcId, nErrorCode, sErrorMsg) {
  6654. arErrorCode.push(sSvcId, nErrorCode);
  6655. }
  6656. function fJudgAllEnd(flag){ //예고심사 완료 처리 //통합심사 완료 처리
  6657. dsf_createDsRow("ds_cond_req", [
  6658. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6659. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6660. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  6661. , {col:"cretno", type:"INT", size:256, val:gv_cretno}
  6662. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  6663. , {col:"instcd", type:"STRING", size:256, val:gv_instcd}
  6664. , {col:"inpath", type:"STRING", size:256, val:gv_inpath}
  6665. , {col:"arvpath", type:"STRING", size:256, val:gv_arvpath}
  6666. , {col:"ordrslt", type:"STRING", size:256, val:gv_ordrslt}
  6667. , {col:"probjudgflag", type:"STRING", size:256, val:gv_probjudgflag}
  6668. , {col:"medcaredayno", type:"INT", size:256, val:gv_medcaredayno}
  6669. , {col:"dschjudgprcsstat", type:"STRING", size:256, val:flag}
  6670. , {col:"lastupdtrid", type:"STRING", size:256, val:gv_lastjudgendid}
  6671. , {col:"judgrmk", type:"STRING", size:256, val:gv_judgrmk}
  6672. , {col:"edirmk", type:"STRING", size:256, val:gv_edirmk}
  6673. , {col:"dschnotiyn", type:"STRING", size:256, val:gv_dschnotiyn}
  6674. , {col:"futureinsuyn", type:"STRING", size:256, val:gv_futureinsuyn}
  6675. , {col:"trgt", type:"STRING", size:256, val:gv_trgt}
  6676. , {col:"insukind", type:"STRING", size:256, val:gv_insukindcd}
  6677. , {col:"suppkind", type:"STRING", size:256, val:gv_suppkindcd}
  6678. ]);
  6679. var oParam = {};
  6680. oParam.id = "TXPIJ00301";
  6681. oParam.service = "bfjudgapp.InHospJudg";
  6682. oParam.method = "reqExeSaveInpt";
  6683. oParam.inds = "req=ds_cond_req";
  6684. oParam.async = false;
  6685. oParam.callback = "cf_TXPIJ00301";
  6686. tranf_submit(oParam);
  6687. if(arErrorCode.pop("TXPIJ00301") > -1) { //심사완료전 저장이 제대로 처리되지 않았을 경우네는 E70을 발생시키지 않게 한다. 20080908 박창원
  6688. //fSaveCalcAmt("I");
  6689. fSetItemInfoSetting();
  6690. return 1;
  6691. } else {
  6692. ds_init_iteminfo.setColumn(0,"dschjudgprcsstat","B")
  6693. fSetItemInfoSetting();
  6694. return 0;
  6695. }
  6696. }
  6697. function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
  6698. arErrorCode.push(sSvcId, nErrorCode);
  6699. }
  6700. function fGetDrgOpenPopup(flag){
  6701. //DRG 설정..시작
  6702. var opchkyn = ds_drginfo.getColumn(0,"opchkyn");
  6703. var drgmchkyn = ds_drginfo.getColumn(0,"drgmchkyn");
  6704. var indaycnt = utlf_transNull(ds_grd_insuhistory.lookup("fromdd", gv_fromdd, "indaycnt"),0);
  6705. if (opchkyn=="Y" && indaycnt <= 30) {
  6706. // DRG 대상자 중 혈우병 특정기호: V009, HIV 특정기호: V103 존재 시 DRG 제외 대상자 메세지
  6707. var drgexceptyn = ds_endcnclstat_item11.getColumn(0,"drgexceptyn");
  6708. if (drgexceptyn == "Y") {
  6709. if ( sysf_messageBox("DRG 제외 상병(혈우병 또는 HIV)이 존재하는 DRG 대상자 입니다. 마감","Q004") != 6 ) {
  6710. return false;
  6711. }
  6712. }
  6713. if (flag == "O") { openSMMMR06900(); }
  6714. frmf_setParameter("pid", gv_pid);
  6715. frmf_setParameter("indd", gv_indd1);
  6716. frmf_setParameter("ordfromdd", gv_fromdd);
  6717. frmf_setParameter("cretno", gv_cretno);
  6718. frmf_setParameter("drgmstat", flag);
  6719. var rtn = frmf_modal("SPPIJ03200","SPPIJ03200","","","","","","","","","","","M");
  6720. if (rtn != true) {
  6721. return false;
  6722. }
  6723. }
  6724. //DRG완료
  6725. }
  6726. function openSMMMR06900() {
  6727. if(!utlf_isNull(gv_patnm)){
  6728. var trgtManWindow = frmf_findPopup("SMMMR06900");
  6729. if (utlf_isNull(trgtManWindow))
  6730. {
  6731. frmf_modal("SMMMR06900","SMMMR06900","","","","","","","","","","","M");
  6732. }else{
  6733. frmf_setFocusPop("SMMMR06900");
  6734. }
  6735. }
  6736. }
  6737. //퇴원마감 취소 처리
  6738. function fJudgEndCancel(){
  6739. dsf_createDsRow("ds_tmp_save", [
  6740. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6741. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6742. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  6743. , {col:"cretno", type:"INT", size:256, val:gv_cretno}
  6744. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  6745. , {col:"instcd", type:"STRING", size:256, val:gv_instcd}
  6746. , {col:"inpath", type:"STRING", size:256, val:gv_inpath}
  6747. , {col:"arvpath", type:"STRING", size:256, val:gv_arvpath}
  6748. , {col:"ordrslt", type:"STRING", size:256, val:gv_ordrslt}
  6749. , {col:"probjudgflag", type:"STRING", size:256, val:gv_probjudgflag}
  6750. , {col:"medcaredayno", type:"INT", size:256, val:gv_medcaredayno}
  6751. , {col:"dschjudgprcsstat", type:"STRING", size:256, val:"A"}
  6752. , {col:"lastupdtrid", type:"STRING", size:256, val:gv_lastjudgendid}
  6753. , {col:"judgrmk", type:"STRING", size:256, val:gv_judgrmk}
  6754. , {col:"edirmk", type:"STRING", size:256, val:gv_edirmk}
  6755. , {col:"dschnotiyn", type:"STRING", size:256, val:gv_dschnotiyn}
  6756. , {col:"futureinsuyn", type:"STRING", size:256, val:gv_futureinsuyn}
  6757. , {col:"trgt", type:"STRING", size:256, val:"N"}
  6758. , {col:"insukind", type:"STRING", size:256, val:gv_insukindcd}
  6759. , {col:"suppkind", type:"STRING", size:256, val:gv_insukindcd}
  6760. ]);
  6761. var oParam = {};
  6762. oParam.id = "TXPIJ00301";
  6763. oParam.service = "bfjudgapp.InHospJudg";
  6764. oParam.method = "reqExeSaveInpt";
  6765. oParam.inds = "req=ds_tmp_save";
  6766. oParam.async = false;
  6767. oParam.callback = "cf_TXPIJ00301";
  6768. tranf_submit(oParam);
  6769. if (arErrorCode.pop("TXPIJ00301") > -1){//심사완료전 저장이 제대로 처리되지 않았을 경우네는 E70을 발생시키지 않게 한다. 20080908 박창원
  6770. dsf_createDsRow("ds_tmp_save", [
  6771. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6772. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6773. , {col:"instcd", type:"STRING", size:256, val:gv_instcd}
  6774. , {col:"cretno", type:"INT", size:256, val:gv_cretno}
  6775. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  6776. ]);
  6777. var oParam = {};
  6778. oParam.id = "TXPIJ03203";
  6779. oParam.service = "bfjudgapp.DRGJudgList";
  6780. oParam.method = "reqExeDelDrgCreateMasterInfo";
  6781. oParam.inds = "req=ds_tmp_save";
  6782. oParam.async = true;
  6783. oParam.callback = "cf_TXPIJ03203";
  6784. tranf_submit(oParam);
  6785. fSetItemInfoSetting();
  6786. return 1;
  6787. } else {
  6788. ds_init_iteminfo.setColumn(0,"dschjudgprcsstat","B");
  6789. fRefrhVar(ds_init_iteminfo);
  6790. fSetItemInfoSetting();
  6791. return 0;
  6792. }
  6793. }
  6794. function cf_TXPIJ03203(sSvcId, nErrorCode, sErrorMsg) {
  6795. if(nErrorCode < 0) alert("cf_TXPIJ03203"); return;
  6796. }
  6797. function fJudgEndClear() {
  6798. // 2. 화면 클리어 (공통)
  6799. appf_delPatientInfos();
  6800. ds_send.clearData();
  6801. ds_send.addRow();
  6802. fSetRdoReset();
  6803. //btn_judgrmk.selected = true;
  6804. ds_send.setColumn(0,"instcd", sysf_getUserInfo("dutplceinstcd"));
  6805. ds_send.setColumn(0,"totalsumflag", "Y");
  6806. ds_send.setColumn(0,"unitflag", "-");
  6807. ds_send.setColumn(0,"trgt", "N");
  6808. ds_send.setColumn(0,"mig", "N");
  6809. ds_send.setColumn(0,"dschmodesrch", "1");
  6810. ds_send.setColumn(0,"paramflag", "N");
  6811. ds_send.setColumn(0,"totalsumflag", "Y");
  6812. //상세화면 저장버튼 처리를 위해 넣어 놓는다. - 2007-11.29 박도형
  6813. ds_hidden_item1.setColumn(0,"chksave","N");
  6814. btn_esscdiag.class = "btn2";
  6815. btn_esscdiag.style.font = "";
  6816. btn_babymother.class = "btn2";
  6817. btn_operdiag.class = "btn2";
  6818. btn_mt004.class = "btn2";
  6819. btn_attData.class = "btn2";
  6820. btn_operdiag.class = "btn2";
  6821. btn_patdnor.class = "btn";
  6822. btn_esscdiag.visible = false;
  6823. btn_babymother.visible = true;
  6824. btn_operdiag.visible = true;
  6825. btn_mt004.visible = true;
  6826. btn_attData.visible = true;
  6827. btn_operdiag.visible = true;
  6828. btn_patdnor.visible= true;
  6829. opt_etcordflag.visible = false;
  6830. grp_calc.btn_save.enable = true;
  6831. grp_calc.btn_recalc.enable = true;
  6832. grp_calc.btn_recalc.style.font = "";
  6833. grp_calc.btn_recalc.style.color = "";
  6834. grp_calc.btn_sugicalc.enable = true;
  6835. grp_calc.btn_dschclose.enable = true;
  6836. grp_calc.btn_totjudgclose.enable = true;
  6837. grp_calc.btn_dschclosecancel.enable = true;
  6838. grp_calc.btn_midcomplete.enable = true;
  6839. grp_calc.btn_midcancel.enable = true;
  6840. grp_calc.btn_midregist.enable = true;
  6841. grp_calc.btn_midregistyn.enable = true;
  6842. group9.visible = false;
  6843. grp_calc.btn_dschclose.class = "btn2";
  6844. grp_calc.btn_totjudgclose.class = "btn2";
  6845. grp_calc.btn_dschclosecancel.class = "btn2";
  6846. grp_calc.btn_midregist.class = "btn2";
  6847. grp_calc.btn_midregistyn.class = "btn2";
  6848. ds_init_iteminfo.clearData();
  6849. ds_init_iteminfo.addRow();
  6850. ds_itemcalc.clearData();
  6851. ds_init_cmb_itemraremsg.clearData();
  6852. ds_grd_insuhistory.clearData();
  6853. ds_grd_ordlist.clearData();
  6854. ds_grd_diaglist.clearData();
  6855. ds_grd_clcjlist.clearData();
  6856. var trgtManWindow = frmf_findPopup("SMPIJ00200");
  6857. if (!utlf_isNull(trgtManWindow))
  6858. {
  6859. trgtManWindow.fGetInBfJudgTrgtManList();
  6860. }
  6861. }
  6862. function fClear() {
  6863. // 심사상태를 미심상태로 바꾸고 대상자 조회를 리프레쉬 - 20081004 박창원
  6864. // 심사상태를 실시간 체크하여 심사상태가 심사중일때만 업데이트 되게 함 - 20081008 박창원
  6865. fRefrhVar(ds_init_iteminfo);
  6866. dsf_createDsRow("ds_cond_req", [
  6867. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6868. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6869. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  6870. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  6871. , {col:"checkyn", type:"STRING", size:256, val:"N"}
  6872. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  6873. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  6874. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  6875. ]);
  6876. var oParam = {};
  6877. oParam.id = "TRPIJ00315";
  6878. oParam.service = "bfjudgapp.InHospJudg";
  6879. oParam.method = "reqNotiDschStat";
  6880. oParam.inds = "req=ds_cond_req";
  6881. oParam.outds = "ds_endcnclstat_item11=endcnclstat ds_recal=recal";
  6882. oParam.async = false;
  6883. oParam.callback = "cf_TRPIJ00315";
  6884. tranf_submit(oParam);
  6885. // 혹시모르는 종료버튼 클릭시 간호퇴원확정 취소를 막기위해 적용 - 20081008 박창원
  6886. var realnotiyn = ds_endcnclstat_item11.getColumn(0,"dschnotiyn");
  6887. var readonly = ds_send.getColumn(0,"readonly");
  6888. if (gv_dschnotiyn == "Z") {
  6889. gv_dschnotiyn = realnotiyn;
  6890. ds_init_iteminfo.setColumn(0,"dschnotiyn", realnotiyn);
  6891. }
  6892. var dschjudgprcsstat = ds_endcnclstat_item11.getColumn(0,"dschjudgprcsstat");
  6893. if (dschjudgprcsstat == "B" && readonly != "Y") {
  6894. dsf_createDsRow("ds_tmp_save", [
  6895. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6896. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6897. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  6898. , {col:"cretno", type:"INT", size:256, val:gv_cretno}
  6899. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  6900. , {col:"instcd", type:"STRING", size:256, val:gv_instcd}
  6901. , {col:"inpath", type:"STRING", size:256, val:gv_inpath}
  6902. , {col:"arvpath", type:"STRING", size:256, val:gv_arvpath}
  6903. , {col:"ordrslt", type:"STRING", size:256, val:gv_ordrslt}
  6904. , {col:"probjudgflag", type:"STRING", size:256, val:gv_probjudgflag}
  6905. , {col:"medcaredayno", type:"INT", size:256, val:gv_medcaredayno}
  6906. , {col:"dschjudgprcsstat", type:"STRING", size:256, val:"Z"}
  6907. , {col:"lastupdtrid", type:"STRING", size:256, val:gv_lastjudgendid}
  6908. , {col:"judgrmk", type:"STRING", size:256, val:gv_judgrmk}
  6909. , {col:"edirmk", type:"STRING", size:256, val:gv_edirmk}
  6910. , {col:"dschnotiyn", type:"STRING", size:256, val:gv_dschnotiyn}
  6911. , {col:"futureinsuyn", type:"STRING", size:256, val:gv_futureinsuyn}
  6912. , {col:"trgt", type:"STRING", size:256, val:"N"}
  6913. , {col:"insukind", type:"STRING", size:256, val:gv_insukindcd}
  6914. , {col:"suppkind", type:"STRING", size:256, val:gv_insukindcd}
  6915. ]);
  6916. var oParam = {};
  6917. oParam.id = "TXPIJ00301";
  6918. oParam.service = "bfjudgapp.InHospJudg";
  6919. oParam.method = "reqExeSaveInpt";
  6920. oParam.inds = "req=ds_tmp_save";
  6921. oParam.outds = "";
  6922. oParam.async = false;
  6923. oParam.callback = "cf_TXPIJ00301";
  6924. tranf_submit(oParam);
  6925. }
  6926. // 2. 화면 클리어 (공통)
  6927. fJudgEndClear();
  6928. }
  6929. //퇴원마감취소
  6930. function fdschclosecancel() {
  6931. var tmpnotiyn;
  6932. var notichngflag = "N";
  6933. // 퇴원 마감 취소시 퇴원수납이 되었는지 실시한 확인 후 진행한다.
  6934. // 마감에서부터 취소사이에 수납에서 퇴원수납이 되었는데 마감취소가 되는 상황이 발생되지 않기 위함
  6935. // 퇴원수납이 된경우에는 대상자 조회 호면을 refresh 하고
  6936. // 메인화면의 심사상태를 'A' 미심상태로 하고 메인화면을 다시 로드- 20080927 박창원
  6937. dsf_createDsRow("ds_cond_req", [
  6938. {col:"pid", type:"STRING", size:256, val:gv_pid}
  6939. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  6940. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  6941. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  6942. , {col:"checkyn", type:"STRING", size:256, val:"Y"}
  6943. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  6944. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  6945. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  6946. , {col:"maxhopedd", type:"STRING", size:256, val:gv_dschnotidt.substr(0,8)}
  6947. ]);
  6948. var oParam = {};
  6949. oParam.id = "TRPIJ00315";
  6950. oParam.service = "bfjudgapp.InHospJudg";
  6951. oParam.method = "reqNotiDschStat";
  6952. oParam.inds = "req=ds_cond_req";
  6953. oParam.outds = "ds_endcnclstat_item11=endcnclstat ds_recal=recal ds_drginfo=drginfo";
  6954. oParam.async = false;
  6955. oParam.callback = "cf_TRPIJ00315";
  6956. tranf_submit(oParam);
  6957. var indschacptstat = ds_endcnclstat_item11.getColumn(0,"indschacptstat");
  6958. if (indschacptstat == "D") {
  6959. sysf_messageBox("이미 퇴원처리가 된 환자입니다. 마감취소 ", "E001");
  6960. // 무조건 대상자 조회 화면을 refresh
  6961. var trgtManWindow = frmf_findPopup("SMPIJ00200");
  6962. if (!utlf_isNull(trgtManWindow))
  6963. {
  6964. trgtManWindow.fGetInBfJudgTrgtManList();
  6965. }
  6966. fGetItemInfo();
  6967. return;
  6968. }
  6969. if(gv_patnm){
  6970. var dschdclrtyn = ds_endcnclstat_item11.getColumn(0,"dschdclrtyn");
  6971. var dschjudgprcsstat = ds_endcnclstat_item11.getColumn(0,"dschjudgprcsstat");
  6972. if (!utlf_isNull(gv_receiptyn) && gv_dschnotiyn == "Y") {
  6973. sysf_messageBox("퇴원(가퇴원) 수납이 되었으므로 마감취소를","E001");
  6974. } else if (utlf_isNull(gv_receiptyn) && (gv_dschnotiyn == "Y" || ( dschjudgprcsstat == 'G' && dschdclrtyn == 'Y' ))) {
  6975. //DRG 상세 마감 취소 팝업
  6976. if (fGetDrgOpenPopup("O") == false) {
  6977. return false;
  6978. }
  6979. if (fJudgEndCancel()) {
  6980. //if(fSaveCalcAmt("D")) {
  6981. //} else {
  6982. // sysf_messageBox("마감취소 처리가 되지","E007");
  6983. // return 0;
  6984. //}
  6985. } else {
  6986. sysf_messageBox("마감취소 처리가 되지","E007");
  6987. return 0;
  6988. }
  6989. if(gv_dschnotiyn == "Z"){
  6990. ds_init_iteminfo.setColumn(0,"dschnotiyn","N")
  6991. notichngflag = "Y";
  6992. }
  6993. fJudgEndClear();
  6994. }
  6995. }
  6996. }
  6997. // 통합심사마감
  6998. function fDschallEnd() {
  6999. fDschjudgEndType("A");
  7000. }
  7001. // 퇴원마감
  7002. function fDschjudgEnd()
  7003. {
  7004. fDschjudgEndType("");
  7005. }
  7006. // 예고심사 : 2014.06.09 LEJ
  7007. function fDschdclrtEnd() {
  7008. fDschjudgEndType("G");
  7009. }
  7010. function grp_calc_btn_sugicalc_onclick(obj:Button, e:ClickEventInfo)
  7011. {
  7012. var objParam = new Object();
  7013. objParam.args_ds_send = ds_send;
  7014. gv_ordrow = ds_grd_ordlist.rowposition;
  7015. frmf_modal("SPPIJ02601","SPPIJ02601",objParam,"","","","","","","","","","M");
  7016. var oParam = {};
  7017. oParam.id = "TRPIJ00325";
  7018. oParam.service = "bfjudgapp.InHospJudg";
  7019. oParam.method = "reqGetRetcSpec_xp";
  7020. oParam.inds = "req=ds_send";
  7021. oParam.outds = "ds_init_retcspec=retcspec";
  7022. oParam.async = true;
  7023. oParam.progress = false;
  7024. oParam.callback = "cf_TRPIJ00325";
  7025. tranf_submit(oParam);
  7026. //처방내역을 갖고 온다.
  7027. fGetIsclList("IPHS", "Y");
  7028. // 진료비 계산내역을 갖고 온다.
  7029. fGetCalc("Y");
  7030. //항목별소계
  7031. //fSetItemSubTotal();
  7032. }
  7033. function grp_calc_btn_dschclose_onclick(obj:Button, e:ClickEventInfo)
  7034. {
  7035. if (gv_bornbaby == "Y")
  7036. {
  7037. gv_bornbaby = "E";
  7038. //ds_init_iteminfo.setColumn(0,"bornbaby", "E");
  7039. grp_born.position.x = 170;
  7040. grp_born.position.y = 100;
  7041. grp_born.visible= true;
  7042. }
  7043. else
  7044. {
  7045. fDschjudgEnd();
  7046. }
  7047. }
  7048. function grp_calc_btn_totjudgclose_onclick(obj:Button, e:ClickEventInfo)
  7049. {
  7050. if (gv_bornbaby == "Y") {
  7051. gv_bornbaby = "A";
  7052. //ds_init_iteminfo.setColumn(0,"bornbaby", "A");
  7053. grp_born.position.x = 170;
  7054. grp_born.position.y = 100;
  7055. grp_born.visible= true;
  7056. } else {
  7057. fDschallEnd();
  7058. }
  7059. }
  7060. function grp_born_btn_yes_onclick(obj:Button, e:ClickEventInfo)
  7061. {
  7062. if (gv_bornbaby == "E") {
  7063. fDschjudgEnd();
  7064. } else if (gv_bornbaby == "A") {
  7065. fDschallEnd();
  7066. } else if (gv_bornbaby == "G") {
  7067. fDschdclrtEnd();
  7068. }
  7069. gv_bornbaby = "Y";
  7070. //ds_init_iteminfo.setColumn(0,"bornbaby", "Y");
  7071. grp_born.position.x = 170;
  7072. grp_born.position.y = 100;
  7073. grp_born.visible= false;
  7074. }
  7075. function grp_born_btn_no_onclick(obj:Button, e:ClickEventInfo)
  7076. {
  7077. grp_born.visible = false;
  7078. gv_bornbaby = "Y";
  7079. //ds_init_iteminfo.setColumn(0,"bornbaby", "Y");
  7080. return;
  7081. }
  7082. function grp_calc_btn_dclrtclose_onclick(obj:Button, e:ClickEventInfo)
  7083. {
  7084. if (gv_bornbaby == "Y") {
  7085. gv_bornbaby = "G";
  7086. //ds_init_iteminfo.setColumn(0,"bornbaby", "G");
  7087. grp_born.position.x = 170;
  7088. grp_born.position.y = 100;
  7089. grp_born.visible= true;
  7090. } else {
  7091. fDschdclrtEnd();
  7092. }
  7093. }
  7094. function ds_grd_diaglist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  7095. {
  7096. if( e.columnid == "ruleoutyn" ){
  7097. obj.setColumn(e.row, "ruleoutyn", (e.newvalue == "true" || e.newvalue == 1) ? "true" : "false");
  7098. }
  7099. }
  7100. function grp_calc_btn_clear_onclick(obj:Button, e:ClickEventInfo)
  7101. {
  7102. fClear();
  7103. }
  7104. function grp_calc_btn_dschclosecancel_onclick(obj:Button, e:ClickEventInfo)
  7105. {
  7106. fdschclosecancel();
  7107. }
  7108. function grd_insuhistory_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  7109. {
  7110. ds_send.setColumn(0,"mskind", ds_grd_insuhistory.getColumn(obj.currentrow, "mskind"));
  7111. ds_send.setColumn(0,"fromdd", ds_grd_insuhistory.getColumn(obj.currentrow, "fromdd"));
  7112. ds_send.setColumn(0,"todd", ds_grd_insuhistory.getColumn(obj.currentrow, "todd"));
  7113. ds_send.setColumn(0,"insukind", ds_grd_insuhistory.getColumn(obj.currentrow, "insukind"));
  7114. ds_send.setColumn(0,"suppkind", ds_grd_insuhistory.getColumn(obj.currentrow, "suppkind"));
  7115. ds_send.setColumn(0,"cretno", ds_grd_insuhistory.getColumn(obj.currentrow, "cretno"));
  7116. ds_send.setColumn(0,"seqno", ds_grd_insuhistory.getColumn(obj.currentrow, "seqno"));
  7117. ds_send.setColumn(0,"ordfromdd", ds_grd_insuhistory.getColumn(obj.currentrow, "fromdd"));
  7118. ds_send.setColumn(0,"ordtodd", ds_grd_insuhistory.getColumn(obj.currentrow, "todd"));
  7119. // 20090728 JHP, 수정추가 처방조회시 기간이 변경되어 각 파트별로 구분자파라미터 두어서 구분한다.
  7120. fGetItemInfo("IPHS");
  7121. }
  7122. function caption87_onclick(obj:Static, e:ClickEventInfo)
  7123. {
  7124. if (grd_diaglist_cheight == grd_diaglist.position.height){
  7125. grd_diaglist.position.height = 610;
  7126. grd_diaglist.bringToFront();
  7127. } else {
  7128. grd_diaglist.position.height = grd_diaglist_cheight;
  7129. grd_diaglist.sendToBack();
  7130. }
  7131. }
  7132. function btn_histref_onmouseenter(obj:Button, e:MouseEventInfo)
  7133. {
  7134. group9.bringToFront();
  7135. group9.position.x = obj.position.x - 150;
  7136. group9.position.y = 50;
  7137. group9.caption133.text = obj.text;
  7138. group9.trv_histref.binddataset = "ds_"+String(obj.name).split("_")[1];
  7139. group9.visible = true;
  7140. }
  7141. function group9_btn_menuclose_onclick(obj:Button, e:ClickEventInfo)
  7142. {
  7143. group9.visible = false;
  7144. }
  7145. function group9_trv_histref_oncellclick(obj:Grid, e:GridClickEventInfo)
  7146. {
  7147. var trgtWindow = obj.getCellValue(obj.currentrow, 1);
  7148. if (trgtWindow=="SMADB01020"){
  7149. var sInDsnm = dsf_createDsRow("ds_cond_SMADB01020", [
  7150. {col:"pid", type:"STRING", size:256, val:gv_pid}
  7151. ]);
  7152. var oParam = {};
  7153. oParam.id = "TRADB01007";
  7154. oParam.service = "pharmacybaseapp.AnticancerProtocol";
  7155. oParam.method = "reqGetAnticancerProtocolOrderHis";
  7156. oParam.inds = "req="+sInDsnm;
  7157. oParam.outds = "ds_main_prtlhislist=item";
  7158. oParam.async = false;
  7159. tranf_submit(oParam);
  7160. fOpenSMADB01020_2("arg_ds_hidden_antisch", "ds_main_prtlhislist"); //다시변경한것.
  7161. //ds_main_prtlhislist.clearData();
  7162. }
  7163. else if(trgtWindow == "SPPIJ03800")
  7164. {
  7165. frmf_setParameter("pid", gv_pid);
  7166. frmf_setParameter("orddd", ds_send.getColumn(0, "fromdd"));
  7167. frmf_setParameter("ordtodd", ds_send.getColumn(0, "todd"));
  7168. frmf_open("SPPIJ03800", "SPPIJ03800", null, null, null, null, null, null, null, null, null, null, "M");
  7169. }
  7170. else if(trgtWindow == "SMANT01000") // 식사력조회
  7171. {
  7172. var objParam = new Object();
  7173. objParam.pid = gv_pid;
  7174. objParam.hngnm = gv_patnm;
  7175. objParam.patflag = 1;
  7176. objParam.ward = gv_wardcd;
  7177. objParam.room = gv_roomcd;
  7178. objParam.fromdd = gv_indd1;
  7179. objParam.todd = utlf_getCurrentDate();
  7180. frmf_open("SMANT01000", "SMANT01000", objParam, null, null, null, null, null, null, null, null, null, "M");
  7181. }
  7182. else if(trgtWindow == "SMPMI00400")
  7183. {
  7184. frmf_setParameter("pid", gv_pid);
  7185. frmf_open("SMPMI00400", "SMPMI00400", null, null, null, null, null, null, null, null, null, null, "M");
  7186. }
  7187. else if(trgtWindow == "SMMNR02500")
  7188. {
  7189. if(gv_dschdd != "99991231") {
  7190. frmf_setParameter("SMMNR02500_pid", gv_pid);
  7191. frmf_setParameter("SMMNR02500_dschdd", gv_dschdd);
  7192. frmf_setParameter("SMMNR02500_wardcd", gv_wardcd);
  7193. } else {
  7194. frmf_clearParameter("SMMNR02500_pid");
  7195. frmf_clearParameter("SMMNR02500_dschdd");
  7196. frmf_clearParameter("SMMNR02500_wardcd");
  7197. }
  7198. frmf_open("SMMNR02500", "SMMNR02500", null, null, null, null, null, null, null, null, null, null, "M");
  7199. }
  7200. else {
  7201. frmf_open(obj.getCellValue(obj.currentrow, 1), obj.getCellValue(obj.currentrow, 1), null, null, null, null, null, null, null, null, null, null, "M");
  7202. }
  7203. }
  7204. function btn_patinfo_onmouseenter(obj:Button, e:MouseEventInfo)
  7205. {
  7206. btn_histref_onmouseenter(obj, e);
  7207. }
  7208. function btn_qualinfo_onmouseenter(obj:Button, e:MouseEventInfo)
  7209. {
  7210. btn_histref_onmouseenter(obj, e);
  7211. }
  7212. function btn_prcpref_onmouseenter(obj:Button, e:MouseEventInfo)
  7213. {
  7214. btn_histref_onmouseenter(obj, e);
  7215. }
  7216. function btn_mediinfo_onmouseenter(obj:Button, e:MouseEventInfo)
  7217. {
  7218. btn_histref_onmouseenter(obj, e);
  7219. }
  7220. function btn_ordamt_onmouseenter(obj:Button, e:MouseEventInfo)
  7221. {
  7222. btn_histref_onmouseenter(obj, e);
  7223. }
  7224. function btn_emr_onclick(obj:Button, e:ClickEventInfo)
  7225. {
  7226. btn_histref_onmouseenter(obj, e);
  7227. }
  7228. function btn_emr_onmouseenter(obj:Button, e:MouseEventInfo)
  7229. {
  7230. btn_histref_onmouseenter(obj, e);
  7231. }
  7232. function btn_erroomref_onmouseenter(obj:Button, e:MouseEventInfo)
  7233. {
  7234. btn_histref_onmouseenter(obj, e);
  7235. }
  7236. function btn_trnptinforef_onmouseenter(obj:Button, e:MouseEventInfo)
  7237. {
  7238. btn_histref_onmouseenter(obj, e);
  7239. }
  7240. function btn_rsltsrch_onclick(obj:Button, e:ClickEventInfo)
  7241. {
  7242. if (group9.visible == true) {
  7243. group9.visible = false;
  7244. }
  7245. frmf_open("SMMMI00100", "SMMMI00100", null, null, null, null, null, null, null, null, null, null, "M");
  7246. }
  7247. function btn_etcref_onmouseenter(obj:Button, e:MouseEventInfo)
  7248. {
  7249. btn_histref_onmouseenter(obj, e);
  7250. }
  7251. function grd_diaglist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  7252. {
  7253. if (grd_diaglist.currentcol == grd_diaglist.getBindCellIndex("body", "diagnm")) { // '상병명'
  7254. // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xfdl 를 호출한다.
  7255. fSearchSPPIZ00400();
  7256. }
  7257. else if (grd_diaglist.currentcol == grd_diaglist.getBindCellIndex("body", "toot1")) { // 상병 - 치식여부 (Y/N)
  7258. fDiagOrderToothInput();
  7259. }
  7260. }
  7261. function fSearchSPPIZ00400() {
  7262. // SPPIZ00400_상병코드조회
  7263. var cur_row = ds_grd_diaglist.rowposition;
  7264. ds_rslt_sppiz00400.clearData();
  7265. ds_rslt_sppiz00400.addRow();
  7266. var objArg = new Object();
  7267. objArg.sDiagcd = ds_grd_diaglist.getColumn(cur_row, "diagcd");
  7268. objArg.sSelectedrdodiagkind = 1;
  7269. objArg.sSingleFlag = "M";
  7270. var objDs = frmf_modal("SPPIZ00400","SPPIZ00400",objArg,"","","","","","","","","","M");
  7271. ds_rslt_sppiz00400.copyData(objDs);
  7272. var diagcd = ds_rslt_sppiz00400.getColumn(0, "diagcd");
  7273. if (utlf_isNull(diagcd)) { // 선택한 코드가 없는 경우
  7274. sysf_messageBox("상병조회 화면에서 선택한 결과가", "I004"); //상병조회 화면에서 선택한 결과가 없습니다.
  7275. return;
  7276. }
  7277. else {
  7278. var diagcd = ds_rslt_sppiz00400.getColumn(0, "diagcd");
  7279. ds_grd_diaglist.setColumn(cur_row, "diagcd", diagcd);
  7280. ds_grd_diaglist.setColumn(cur_row, "diagnm", ds_rslt_sppiz00400.getColumn(0, "diaghngnm"));
  7281. var frow = ds_lglydisinfo.findRowExpr("fromdiag<='" + diagcd + "' && todiag>='" + diagcd + "'");
  7282. if (frow > -1){
  7283. lf_setAlramMessage("상병코드: " + diagcd + " 법정전염병 상병입니다. 확인하십시오.");
  7284. }
  7285. }
  7286. fDiagGridInsertRow();
  7287. }
  7288. function fDiagOrderToothInput()
  7289. {
  7290. var cur_row = ds_grd_diaglist.rowposition;
  7291. var diagcd = ds_grd_diaglist.getColumn(cur_row, "diagcd");
  7292. if (!utlf_isNull(diagcd)) {
  7293. ds_cond_sppiz00600_toothapplist.clearData();
  7294. ds_cond_sppiz00600.clearData();
  7295. ds_cond_sppiz00600.addRow();
  7296. ds_cond_sppiz00600.setColumn(0, "pid" , gv_pid);
  7297. ds_cond_sppiz00600.setColumn(0, "indd" , gv_indd1);
  7298. ds_cond_sppiz00600.setColumn(0, "cretno" , gv_cretno);
  7299. ds_cond_sppiz00600.setColumn(0, "toot" , ds_grd_diaglist.getColumn(cur_row, "toot"));
  7300. ds_cond_sppiz00600.setColumn(0, "flag" , "AID");
  7301. ds_cond_sppiz00600.setColumn(0, "scrnid" , "SMPIJ00300");
  7302. fSetToothPop(cur_row, "1");
  7303. ds_rslt_sppiz00600.clearData();
  7304. ds_rslt_sppiz00600.addRow();
  7305. var rtn = frmf_modal("SPPIZ00600","SPPIZ00600",{objDs:ds_cond_sppiz00600, objDs2:ds_cond_sppiz00600_toothapplist},"","","","","","","","","","M");// SPPIZ00600_상병및처방별치식
  7306. fGetToothPop();
  7307. }
  7308. }
  7309. function fOrdOrderToothInput()
  7310. {
  7311. var cur_row = ds_grd_ordlist.rowposition;
  7312. var snglcalcscorcd = ds_grd_ordlist.getColumn(cur_row, "snglcalcscorcd");
  7313. if (!utlf_isNull(snglcalcscorcd)) {
  7314. ds_cond_sppiz00600_toothapplist.clearData();
  7315. ds_cond_sppiz00600.clearData();
  7316. ds_cond_sppiz00600.addRow();
  7317. ds_cond_sppiz00600.setColumn(0, "pid" , gv_pid);
  7318. ds_cond_sppiz00600.setColumn(0, "indd" , gv_indd1);
  7319. ds_cond_sppiz00600.setColumn(0, "cretno" , gv_cretno);
  7320. ds_cond_sppiz00600.setColumn(0, "toot" , ds_grd_ordlist.getColumn(cur_row, "tootfact"));
  7321. ds_cond_sppiz00600.setColumn(0, "snglcalcscorcd" , snglcalcscorcd);
  7322. ds_cond_sppiz00600.setColumn(0, "flag" , "AID");
  7323. ds_cond_sppiz00600.setColumn(0, "scrnid" , "SMPIJ00300");
  7324. fSetToothPop(cur_row, "2");
  7325. ds_rslt_sppiz00600.clearData();
  7326. ds_rslt_sppiz00600.addRow();
  7327. var rtn = frmf_modal("SPPIZ00600","SPPIZ00600",{objDs:ds_cond_sppiz00600, objDs2:ds_cond_sppiz00600_toothapplist},"","","","","","","","","","M"); // SPPIZ00600_상병및처방별치식
  7328. fGetToothPop();
  7329. }
  7330. }
  7331. function fSetToothPop(row, flag)
  7332. {
  7333. // ds_cond_sppiz00600.clearData();
  7334. // ds_cond_sppiz00600.addRow();
  7335. // 상병
  7336. var cldiRows = ds_grd_diaglist.rowcount;
  7337. // 처방
  7338. var clodRows = ds_grd_ordlist.rowcount;
  7339. var cd = "";
  7340. var cdnm = "";
  7341. var orddd = "";
  7342. var toot = "";
  7343. var rowcnt = 0;
  7344. var milktoothstr = "";
  7345. var subTootStr = "";
  7346. var tootnum = 0;
  7347. var tmpStr = "";
  7348. for (var i = 0; i < cldiRows; i++) {
  7349. cd = ds_grd_diaglist.getColumn(i, "diagcd");
  7350. cdnm = ds_grd_diaglist.getColumn(i, "diagnm");
  7351. orddd = ds_grd_diaglist.getColumn(i, "ordfromdd");
  7352. toot = ds_grd_diaglist.getColumn(i, "toot");
  7353. if (!utlf_isNull(toot) && toot != "-") {
  7354. milktoothstr = "ABCDE000";
  7355. for (var inx = 0; inx < 32; inx++) {
  7356. tootnum = toot.substr(inx,1);
  7357. if (tootnum == "*"||tootnum == "!") { // 선택된 영구치의 경우 1~8 사이 숫자로 표시한다.
  7358. if (inx < 8) {
  7359. subTootStr += (8 - inx);
  7360. }
  7361. else if (inx > 7 && inx < 16) {
  7362. subTootStr += (inx - 7);
  7363. }
  7364. else if (inx > 15 && inx < 24) {
  7365. subTootStr += (24 - inx);
  7366. }
  7367. else {
  7368. subTootStr += (inx - 23);
  7369. }
  7370. }
  7371. else if (tootnum == "#") { // 선택된 유치의 경우 A~E 사이 알파벳으로 표시한다.
  7372. if (inx < 8) {
  7373. subTootStr += milktoothstr.charAt(7 - inx);
  7374. }
  7375. else if (inx > 7 && inx < 16) {
  7376. subTootStr += milktoothstr.charAt(inx - 8);
  7377. }
  7378. else if (inx > 15 && inx < 24) {
  7379. subTootStr += milktoothstr.charAt(23 - inx);
  7380. }
  7381. else {
  7382. subTootStr += milktoothstr.charAt(inx - 24);
  7383. }
  7384. }
  7385. else { // if (tootnum == "0") 선택되지 않은 경우 공백으로 처리한다.
  7386. subTootStr += " ";
  7387. }
  7388. }
  7389. rowcnt = ds_cond_sppiz00600_toothapplist.addRow();
  7390. //치식 표기를 설정한다.
  7391. if (row == i && flag == 1) {
  7392. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
  7393. }
  7394. else {
  7395. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "false");
  7396. }
  7397. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "상병");
  7398. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
  7399. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
  7400. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", subTootStr.substr(0, 8));
  7401. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", subTootStr.substr(8, 8));
  7402. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", subTootStr.substr(16, 8));
  7403. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", subTootStr.substr(24, 8));
  7404. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
  7405. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", toot);
  7406. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
  7407. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "pid", gv_pid);
  7408. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "indd", gv_indd1);
  7409. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cretno", gv_cretno);
  7410. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "instcd", gv_instcd);
  7411. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "execdd", "");
  7412. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "calcseqno", "");
  7413. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "calcscorseqno", "");
  7414. rowcnt++;
  7415. }
  7416. else {
  7417. if (row == i && flag == 1) {
  7418. rowcnt = ds_cond_sppiz00600_toothapplist.addRow();
  7419. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
  7420. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "상병");
  7421. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
  7422. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
  7423. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", "");
  7424. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", "");
  7425. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", "");
  7426. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", "");
  7427. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
  7428. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", "");
  7429. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
  7430. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "pid", gv_pid);
  7431. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "indd", gv_indd1);
  7432. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cretno", gv_cretno);
  7433. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "instcd", gv_instcd);
  7434. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "execdd", "");
  7435. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "calcseqno", "");
  7436. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "calcscorseqno", "");
  7437. rowcnt++;
  7438. }
  7439. }
  7440. }
  7441. for (var i = 0; i < clodRows; i++) {
  7442. cd = ds_grd_ordlist.getColumn(i, "snglcalcscorcd");
  7443. cdnm = ds_grd_ordlist.getColumn(i, "hngnm");
  7444. orddd = ds_send.getColumn(0,"ordfromdd");
  7445. toot = ds_grd_ordlist.getColumn(i, "tootfact");
  7446. estmcls = ds_grd_ordlist.getColumn(i, "estmcls");
  7447. execdd = ds_grd_ordlist.getColumn(i, "execdd");
  7448. calcseqno = ds_grd_ordlist.getColumn(i, "calcseqno");
  7449. calcscorseqno = ds_grd_ordlist.getColumn(i, "calcscorseqno");
  7450. if ((!utlf_isNull(toot) && toot != "-") || estmcls == "U") {
  7451. milktoothstr = "ABCDE000";
  7452. subTootStr = "";
  7453. for (var inx = 0; inx < 32; inx++) {
  7454. tootnum = toot.substr(inx,1);
  7455. if (tootnum == "*"||tootnum == "!") { // 선택된 영구치의 경우 1~8 사이 숫자로 표시한다.
  7456. if (inx < 8) {
  7457. subTootStr += (8 - inx);
  7458. }
  7459. else if (inx > 7 && inx < 16) {
  7460. subTootStr += (inx - 7);
  7461. }
  7462. else if (inx > 15 && inx < 24) {
  7463. subTootStr += (24 - inx);
  7464. } else {
  7465. subTootStr += (inx - 23);
  7466. }
  7467. }
  7468. else if (tootnum == "#") { // 선택된 유치의 경우 A~E 사이 알파벳으로 표시한다.
  7469. if (inx < 8) {
  7470. subTootStr += milktoothstr.charAt(7 - inx);
  7471. }
  7472. else if (inx > 7 && inx < 16) {
  7473. subTootStr += milktoothstr.charAt(inx - 8);
  7474. }
  7475. else if (inx > 15 && inx < 24) {
  7476. subTootStr += milktoothstr.charAt(23 - inx);
  7477. }
  7478. else {
  7479. subTootStr += milktoothstr.charAt(inx - 24);
  7480. }
  7481. }
  7482. else { // if (tootnum == "0") 선택되지 않은 경우 공백으로 처리한다.
  7483. subTootStr += " ";
  7484. }
  7485. }
  7486. // rowcnt = ds_cond_sppiz00600_toothapplist.addRow();
  7487. // //치식 표기를 설정한다.
  7488. // if (row == i && flag == 2) {
  7489. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
  7490. // }
  7491. // else {
  7492. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "false");
  7493. // }
  7494. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "처방");
  7495. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
  7496. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
  7497. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", subTootStr.substr(0, 8));
  7498. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", subTootStr.substr(8, 8));
  7499. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", subTootStr.substr(16, 8));
  7500. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", subTootStr.substr(24, 8));
  7501. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
  7502. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", toot);
  7503. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
  7504. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "pid", gv_pid);
  7505. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "indd", gv_indd1);
  7506. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cretno", gv_cretno);
  7507. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "instcd", gv_instcd);
  7508. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "execdd", execdd);
  7509. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "calcseqno", calcseqno);
  7510. // ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "calcscorseqno", calcscorseqno);
  7511. }
  7512. else {
  7513. if (row == i && flag == 2) {
  7514. rowcnt = ds_cond_sppiz00600_toothapplist.addRow();
  7515. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "chos", "true");
  7516. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "flag", "처방");
  7517. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cd", cd);
  7518. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cdnm", cdnm);
  7519. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightupper", "");
  7520. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftupper", "");
  7521. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "rightlower", "");
  7522. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "leftlower", "");
  7523. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "orddd", orddd);
  7524. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "toot", "");
  7525. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "row", i);
  7526. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "pid", gv_pid);
  7527. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "indd", gv_indd1);
  7528. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "cretno", gv_cretno);
  7529. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "instcd", gv_instcd);
  7530. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "execdd", execdd);
  7531. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "calcseqno", calcseqno);
  7532. ds_cond_sppiz00600_toothapplist.setColumn(rowcnt, "calcscorseqno", calcscorseqno);
  7533. }
  7534. }
  7535. }
  7536. }
  7537. function fDiagGridAddRow(){
  7538. var fromdd = ds_grd_diaglist.getMax("fromdd") ;
  7539. var currrow = ds_grd_diaglist.rowposition;
  7540. var curseq = ds_grd_diaglist.getColumn(currrow,"seqno");
  7541. if (utlf_isNull(fromdd)) {
  7542. // 중간청구시작일이 없으면 입원일자가 진료개시일이 됨
  7543. var indd = ds_send.getColumn(0,"ordfromdd");
  7544. fromdd = indd;
  7545. }
  7546. //ds_grd_diaglist.setColumn(currrow, "seqno", curseq+1);
  7547. var aRow = ds_grd_diaglist.insertRow(ds_grd_diaglist.rowposition+1);
  7548. ds_grd_diaglist.setColumn(aRow, "seqno", ds_grd_diaglist.rowposition+1);
  7549. ds_grd_diaglist.setColumn(aRow, "ordfromdd", fromdd);
  7550. ds_grd_diaglist.setColumn(aRow, "orddeptcd", gv_orddeptcd);
  7551. ds_grd_diaglist.setColumn(aRow, "pid" , gv_pid);
  7552. ds_grd_diaglist.setColumn(aRow, "indd" , gv_indd1);
  7553. ds_grd_diaglist.setColumn(aRow, "cretno" , gv_cretno);
  7554. ds_grd_diaglist.setColumn(aRow, "fromdd" , gv_fromdd);
  7555. ds_grd_diaglist.setColumn(aRow, "mskind" , gv_mskind);
  7556. ds_grd_diaglist.setColumn(aRow, "toot" , "-");
  7557. ds_grd_diaglist.setColumn(aRow, "toot1" , "-");
  7558. ds_grd_diaglist.setColumn(aRow, "drinptyn" , "N");
  7559. ds_grd_diaglist.setColumn(aRow, "addflag" , "Y");
  7560. ds_grd_diaglist.setColumn(aRow, "diagetcflag" , "0");
  7561. ds_grd_diaglist.setColumn(aRow, "rowstat" , "i");
  7562. ds_grd_diaglist.setColumn(aRow, "rowstatus" , "i");
  7563. ds_grd_diaglist.rowposition= aRow;
  7564. grd_diaglist.setCellPos(grd_diaglist.getBindCellIndex("body", "diagcd"));
  7565. grd_diaglist.showEditor(true);
  7566. fSortDiagNo2(aRow);
  7567. return
  7568. }
  7569. function fSortDiagNo2() {
  7570. ds_grd_diaglist.updatecontrol = false;
  7571. for(var i=0, rowcnt=ds_grd_diaglist.rowcount; i < rowcnt; i++) {
  7572. ds_grd_diaglist.setColumn(i,"seqno",i+1);
  7573. }
  7574. ds_grd_diaglist.updatecontrol = true;
  7575. }
  7576. function fDiagGridInsertRow(iRow) {
  7577. grd_diaglist.showEditor(false);
  7578. var fromdd = ds_grd_diaglist.getMax("fromdd") ;
  7579. var seqno = parseInt(ds_grd_diaglist.getMax("seqno")) ;
  7580. var diagcd = ds_grd_diaglist.findRowExpr("utlf_isNull(diagcd)==true");
  7581. var aRow = -1;
  7582. if (utlf_isNull(fromdd)) {
  7583. // 중간청구시작일이 없으면 입원일자가 진료개시일이 됨
  7584. var indd = ds_send.getColumn(0,"ordfromdd");
  7585. fromdd = indd;
  7586. }
  7587. if (diagcd < 0) {
  7588. aRow = ds_grd_diaglist.addRow();
  7589. ds_grd_diaglist.setColumn(aRow, "seqno", seqno+1);
  7590. ds_grd_diaglist.setColumn(aRow, "ordfromdd", fromdd);
  7591. ds_grd_diaglist.setColumn(aRow, "orddeptcd", gv_orddeptcd);
  7592. ds_grd_diaglist.setColumn(aRow, "pid" , gv_pid);
  7593. ds_grd_diaglist.setColumn(aRow, "indd" , gv_indd1);
  7594. ds_grd_diaglist.setColumn(aRow, "cretno" , gv_cretno);
  7595. ds_grd_diaglist.setColumn(aRow, "fromdd" , gv_fromdd);
  7596. ds_grd_diaglist.setColumn(aRow, "mskind" , gv_mskind);
  7597. ds_grd_diaglist.setColumn(aRow, "toot" , "-");
  7598. ds_grd_diaglist.setColumn(aRow, "toot1" , "-");
  7599. ds_grd_diaglist.setColumn(aRow, "drinptyn" , "N");
  7600. ds_grd_diaglist.setColumn(aRow, "addflag" , "Y");
  7601. ds_grd_diaglist.setColumn(aRow, "diagetcflag" , "0");
  7602. ds_grd_diaglist.setColumn(aRow, "rowstat" , "i");
  7603. ds_grd_diaglist.setColumn(aRow, "rowstatus" , "i");
  7604. ds_grd_diaglist.rowposition= aRow;
  7605. grd_diaglist.vscrollbar.pos = aRow;
  7606. //fSortDiagNo();
  7607. } else {
  7608. ds_grd_diaglist.rowposition = diagcd;
  7609. grd_diaglist.vscrollbar.pos = diagcd;
  7610. aRow = diagcd;
  7611. }
  7612. grd_diaglist.setCellPos(grd_diaglist.getBindCellIndex("body", "diagcd"));
  7613. grd_diaglist.showEditor(true);
  7614. fSortDiagNo2();
  7615. return aRow;
  7616. }
  7617. function fSortDiagNo(isNumbering){
  7618. var delcnt = 0;
  7619. if (isNumbering == false)
  7620. {
  7621. var maxRow = ds_grd_diaglist.rowcount - 1; // rows는 타이틀부분 부터 개수를 센다
  7622. ds_grd_diaglist.keystring = "";
  7623. ds_grd_diaglist.keystring = "S:+seqno";
  7624. grd_diaglist.updateToDataset();
  7625. return;
  7626. }
  7627. var cldino = 1;
  7628. var diagseq = -1;
  7629. for ( var i = 0, rowcnt=ds_grd_diaglist.rowcount; i < rowcnt; i++)
  7630. {
  7631. if (ds_grd_diaglist.getRowType(i) != 8)
  7632. {
  7633. diagseq = ds_grd_diaglist.getColumn(i, "seqno");
  7634. if (ds_grd_diaglist.getRowType(i) == 1 && diagseq != cldino)
  7635. {
  7636. ds_grd_diaglist.enableevent = false;
  7637. ds_grd_diaglist.setRowType(i, 'u'); //update
  7638. ds_grd_diaglist.enableevent = true;
  7639. }
  7640. ds_grd_diaglist.setColumn(i, "seqno", cldino++);
  7641. } else {
  7642. delcnt++;
  7643. }
  7644. }
  7645. ds_grd_diaglist.keystring = "";
  7646. ds_grd_diaglist.keystring = "S:+seqno";
  7647. if (delcnt > 0)
  7648. {
  7649. ds_grd_diaglist.keystring = "";
  7650. ds_grd_diaglist.keystring = "S:+seqno";
  7651. }
  7652. // Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.
  7653. grd_diaglist.updateToDataset();
  7654. }
  7655. function fGetToothPop()
  7656. {
  7657. var tootSelectcnt = ds_rslt_sppiz00600.rowcount;
  7658. var flag = "";
  7659. var row = "";
  7660. var toot = "";
  7661. var snglcalcscorcd = "";
  7662. var rlsttoot, rlsttoot1;
  7663. for (var i=0; i<tootSelectcnt; i++) {
  7664. flag = ds_rslt_sppiz00600.getColumn(i, "flag");
  7665. row = ds_rslt_sppiz00600.getColumn(i, "row");
  7666. rlsttoot = ds_rslt_sppiz00600.getColumn(i, "toot");
  7667. rlsttoot1 = ds_rslt_sppiz00600.getColumn(i, "toot1");
  7668. if (utlf_isNull(rlsttoot)) {
  7669. rlsttoot = "-";
  7670. }
  7671. if (utlf_isNull(rlsttoot1)) {
  7672. rlsttoot1 = "-";
  7673. }
  7674. if (flag == "1") {
  7675. toot = ds_grd_diaglist.getColumn(row, "toot");
  7676. if (rlsttoot != toot) { // 치식번호가 변경된 경우
  7677. ds_grd_diaglist.setColumn(row, "toot", rlsttoot);
  7678. ds_grd_diaglist.setColumn(row, "toot1", rlsttoot1);
  7679. //var diagstatus = grd_diaglist.rowstatus(row);
  7680. //if (diagstatus == 0 || diagstatus == 2) { // 0 : new, 2 : update
  7681. // grd_diaglist.rowstatus(row) = 2; // 2 : update
  7682. //}
  7683. }
  7684. } else if (flag == "2") {
  7685. row = ds_grd_ordlist.findRowExpr("snglcalcscorcd=='"+ds_rslt_sppiz00600.getColumn(i, "cd")+"'");
  7686. toot = ds_grd_ordlist.getColumn(row, "tootfact");
  7687. if (ds_rslt_sppiz00600.getColumn(i, "toot1") != toot && -1 < row) { // 치식번호가 변경된 경우
  7688. ds_grd_ordlist.setColumn(row, "tootfact", ds_rslt_sppiz00600.getColumn(i, "toot1"));
  7689. }
  7690. }
  7691. }
  7692. }
  7693. function grd_diaglist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  7694. {
  7695. grdf_setSelectedCell(obj, e);
  7696. var nX = system.clientToScreenX(obj, e.clientX)-20; // 마우스 위아래 약간의 여유를 둠
  7697. var nY = system.clientToScreenY(obj, e.clientY)-13;
  7698. diagpMenu.trackPopup(nX, nY);
  7699. return true;
  7700. }
  7701. function pMenu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
  7702. {
  7703. var fRow = ds_menu.findRow("idx", e.id); // ds_menu 의 UserData 컬럼에 펑션 세팅된것 찾기
  7704. if ( fRow > -1 ) {
  7705. eval(e.userdata); // 선택된 메뉴에 따라서 자동 펑션 실행되게함
  7706. }
  7707. }
  7708. function pMenu_onmouseleave(obj:PopupMenu, e:MenuMouseEventInfo)
  7709. {
  7710. if ( (e.screenX > grd_diaglist.position.x) && (e.screenY > grd_diaglist.position.y) ) {
  7711. if ( diagpMenu.isPopup() ) {
  7712. diagpMenu.closePopup();
  7713. }
  7714. }
  7715. if ( (e.screenX > swt_spclmemo.case_spclspec.grd_clcjlist.position.x) && (e.screenY > swt_spclmemo.case_spclspec.grd_clcjlist.position.y) ) {
  7716. if ( clcjlistpMenu.isPopup() ) {
  7717. clcjlistpMenu.closePopup();
  7718. }
  7719. }
  7720. }
  7721. function fDiagSeqUp()
  7722. {
  7723. // var currseqno = ds_grd_diaglist.getColumn(ds_grd_diaglist.rowposition, "seqno");
  7724. // var nxseq = ds_grd_diaglist.getCaseMax("seqno < '" + currseqno + "' && ds_grd_diaglist.getRowType(currow) != 8", "seqno");
  7725. // var fseqrow = ds_grd_diaglist.findRowExpr("seqno == '" + nxseq + "' && ds_grd_diaglist.getRowType(currow) != 8");
  7726. // trace(fseqrow +"--" +ds_grd_diaglist.rowposition)
  7727. //
  7728. // if (nxseq > 0) {
  7729. // ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition,"seqno", nxseq);
  7730. // ds_grd_diaglist.setColumn(fseqrow,"seqno", currseqno);
  7731. //
  7732. // var rowchnged = ds_grd_diaglist.exchangeRow(1, 0);
  7733. // }
  7734. var rowstatus = ds_grd_diaglist.getRowType(ds_grd_diaglist.rowposition);
  7735. if (rowstatus == 8)
  7736. {
  7737. // 8 : delete
  7738. return;
  7739. }
  7740. // 선택된 줄의 NO
  7741. var diagseq = parseInt(ds_grd_diaglist.getColumn(ds_grd_diaglist.rowposition, "seqno"));
  7742. if (diagseq > 0)
  7743. {
  7744. // 첫번째 줄이 아닌 경우
  7745. ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition, "seqno", --diagseq);
  7746. if (rowstatus == 1 || rowstatus == 4)
  7747. {
  7748. ds_grd_diaglist.updatecontrol = false;
  7749. ds_grd_diaglist.setRowType(ds_grd_diaglist.rowposition,"u");
  7750. ds_grd_diaglist.updatecontrol = true;
  7751. }
  7752. // 바로 위 상병순서와 중복되는 경우
  7753. var nextrow = ds_grd_diaglist.rowposition-1;
  7754. var nextdiagseq = ds_grd_diaglist.getColumn(nextrow, "seqno");
  7755. if (diagseq == nextdiagseq)
  7756. {
  7757. ds_grd_diaglist.setColumn(nextrow, "seqno", ++diagseq);
  7758. rowstatus = ds_grd_diaglist.getRowType(nextrow);
  7759. if (rowstatus == 1 || rowstatus == 4)
  7760. {
  7761. ds_grd_diaglist.updatecontrol = false;
  7762. ds_grd_diaglist.setRowType(nextrow,"u");
  7763. ds_grd_diaglist.updatecontrol = true;
  7764. }
  7765. }
  7766. fSortDiagNo(false);
  7767. }
  7768. }
  7769. function fDiagSeqDown()
  7770. {
  7771. // var nxseq = ds_grd_diaglist.getColumn(ds_grd_diaglist.rowposition, "seqno")+1;
  7772. // if (nxseq < ds_grd_diaglist.rowcount) {
  7773. // ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition,"seqno", nxseq);
  7774. // ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition+1,"seqno", nxseq-1);
  7775. //
  7776. // var rowchnged = ds_grd_diaglist.exchangeRow(ds_grd_diaglist.rowposition, ds_grd_diaglist.rowposition + 1);
  7777. // }
  7778. var rowstatus = ds_grd_diaglist.getRowType(ds_grd_diaglist.rowposition);
  7779. if (rowstatus == 8)
  7780. {
  7781. // 8 : delete
  7782. return;
  7783. }
  7784. // 삭제 상태가 아닌 마지막 줄을 찾는다.
  7785. var lastRow = ds_grd_diaglist.rowcount;
  7786. // 선택된 줄의 NO
  7787. var diagseq = parseInt(ds_grd_diaglist.getColumn(ds_grd_diaglist.rowposition, "seqno"));
  7788. if (diagseq < lastRow)
  7789. {
  7790. // 마지막 줄이 아닌 경우
  7791. ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition, "seqno", ++diagseq);
  7792. if (rowstatus == 1 || rowstatus == 4)
  7793. {
  7794. ds_grd_diaglist.updatecontrol = false;
  7795. ds_grd_diaglist.setRowType(ds_grd_diaglist.rowposition,"u");
  7796. ds_grd_diaglist.updatecontrol = true;
  7797. }
  7798. // 바로 아래 상병순서와 중복되는 경우
  7799. var nextrow = ds_grd_diaglist.rowposition + 1;
  7800. var nextdiagseq = ds_grd_diaglist.getColumn(nextrow, "seqno");
  7801. if (diagseq == nextdiagseq)
  7802. {
  7803. ds_grd_diaglist.setColumn(nextrow, "seqno", --diagseq);
  7804. rowstatus = ds_grd_diaglist.getRowType(nextrow);
  7805. if (rowstatus == 1 || rowstatus == 4)
  7806. {
  7807. ds_grd_diaglist.updatecontrol = false;
  7808. ds_grd_diaglist.setRowType(nextrow,"u");
  7809. ds_grd_diaglist.updatecontrol = true;
  7810. }
  7811. }
  7812. fSortDiagNo(false);
  7813. }
  7814. }
  7815. function diagpMenu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
  7816. {
  7817. var fRow = ds_diag_menu.findRow("idx", e.id); // ds_menu 의 UserData 컬럼에 펑션 세팅된것 찾기
  7818. if ( fRow > -1 ) {
  7819. eval(e.userdata); // 선택된 메뉴에 따라서 자동 펑션 실행되게함
  7820. }
  7821. }
  7822. function grd_diaglist_onenterdown(obj:Grid, e:GridEditEventInfo)
  7823. {
  7824. var cur_row = obj.currentrow;
  7825. if (e.col == obj.getBindCellIndex("body", "seqno")) { // no (상병순서)
  7826. if (ds_grd_diaglist.getColumn(cur_row, "seqno") != ds_hidden_diag.getColumn(0, "oldseq")) {
  7827. // 사용자가 입력한 숫자를 기준으로 상병순서 부여
  7828. fChangeDiagNo();
  7829. }
  7830. }
  7831. if (obj.currentcol == obj.getBindCellIndex("body", "diagcd")) { // 상병코드
  7832. if (e.value != ds_hidden_diag.getColumn(0, "olddiagcd")) {
  7833. ds_grd_diaglist.setColumn(cur_row, "diagnm", "");
  7834. ds_grd_diaglist.setColumn(cur_row, "diagengnm", "");
  7835. fSearchDiageCode();
  7836. }
  7837. }
  7838. }
  7839. function grd_diaglist_onchar(obj:Grid, e:GridEditCharEventInfo)
  7840. {
  7841. var cur_row = obj.currentrow;
  7842. ds_hidden_diag.setColumn(0, "oldseq", ds_grd_diaglist.getColumn(cur_row, "seqno"));
  7843. ds_hidden_diag.setColumn(0, "olddiagcd", ds_grd_diaglist.getColumn(cur_row, "diagcd"));
  7844. ds_hidden_diag.setColumn(0, "olddiagnm", ds_grd_diaglist.getColumn(cur_row, "diagnm"));
  7845. ds_hidden_diag.setColumn(0, "oldengnm", ds_grd_diaglist.getColumn(cur_row, "diagengnm"));
  7846. ds_hidden_diag.setColumn(0, "oldrowstat", ds_grd_diaglist.getRowType(cur_row));
  7847. ds_hidden_diag.setColumn(0, "oldordfromdd", ds_grd_diaglist.getColumn(cur_row, "ordfromdd"));
  7848. }
  7849. function fChangeDiagNo() {
  7850. var row = ds_grd_diaglist.rowposition;
  7851. var iptseqno = ds_grd_diaglist.getColumn(row, "seqno")
  7852. var destrow = ds_grd_diaglist.findRow("seqno",iptseqno);
  7853. // var iptseq = ds_grd_diaglist.getColumn(row , "seqno");
  7854. //
  7855. // if (iptseq < ds_grd_diaglist.rowcount) {
  7856. // ds_grd_diaglist.setColumn(destrow,"seqno", ds_grd_diaglist.rowposition+1);
  7857. // var rowchnged = ds_grd_diaglist.exchangeRow(row, destrow);
  7858. // }
  7859. //
  7860. if ( ds_grd_diaglist.getRowType(row) != 2 ) { // insert
  7861. ds_grd_diaglist.updatecontrol = false;
  7862. ds_grd_diaglist.setRowType(row, "u"); // update
  7863. ds_grd_diaglist.updatecontrol = true;
  7864. }
  7865. var newseq = ds_grd_diaglist.getColumn(row, "seqno");
  7866. var oldseq = ds_hidden_diag.getColumn(0, "oldseq");
  7867. var diagseq = -1;
  7868. var rowstatus = "";
  7869. if (newseq) {
  7870. // '09' 와 같은 형식으로 입력한 경우 -> 9로 처리
  7871. newseq = parseInt(ds_grd_diaglist.getColumn(row, "seqno"), 10);
  7872. // 삭제상태가 아닌 중복된 번호가 있는지 체크한다.
  7873. var sameRow = -1;
  7874. for (var i = 0, rowcnt=ds_grd_diaglist.rowcount; i < rowcnt; i++) {
  7875. diagseq = ds_grd_diaglist.getColumn(i, "seqno");
  7876. if (row != i && diagseq == newseq) {
  7877. sameRow = i;
  7878. i = ds_grd_diaglist.rowcount;
  7879. }
  7880. }
  7881. if (sameRow > -1) {
  7882. // 중복된 상병순서의 row가 있음
  7883. if (newseq < oldseq) {
  7884. // 이전보다 앞번호를 입력한 경우
  7885. for (var j = sameRow; j < row; j++) {
  7886. rowstatus = ds_grd_diaglist.getRowType(j);
  7887. if ( rowstatus != 8 ) {
  7888. var curseq = parseInt(ds_grd_diaglist.getColumn(j, "seqno"), 10);
  7889. if ( rowstatus != 2 ) {
  7890. if ( ds_grd_diaglist.getColumn(j, "seqno") != (curseq+1)) {
  7891. ds_grd_diaglist.updatecontrol = false;
  7892. ds_grd_diaglist.setRowType(j, "u");
  7893. ds_grd_diaglist.updatecontrol = true;
  7894. }
  7895. }
  7896. ds_grd_diaglist.setColumn(j, "seqno", curseq+1);
  7897. }
  7898. }
  7899. } else {
  7900. // 이전보다 뒷번호를 입력한 경우
  7901. for (var j = row+1; j <= sameRow; j++) {
  7902. rowstatus = ds_grd_diaglist.getRowType(j);
  7903. if (rowstatus != 8) {
  7904. var curseq = parseInt(ds_grd_diaglist.getColumn(j, "seqno"), 10);
  7905. if (rowstatus != 2) {
  7906. if (ds_grd_diaglist.getColumn(j, "seqno") != (curseq-1)) {
  7907. ds_grd_diaglist.updatecontrol = false;
  7908. ds_grd_diaglist.setRowType(j, "u");
  7909. ds_grd_diaglist.updatecontrol = true;
  7910. }
  7911. }
  7912. ds_grd_diaglist.setColumn(j, "seqno", curseq-1);
  7913. }
  7914. }
  7915. }
  7916. fSortDiagNo(false);
  7917. } else {
  7918. // 중복된 상병순서의 row가 없는 경우
  7919. fSortDiagNo(false);
  7920. }
  7921. } else {
  7922. // 순번을 삭제한 경우
  7923. ds_grd_diaglist.setColumn(row, "seqno", oldseq);
  7924. ds_grd_diaglist.updatecontrol = false;
  7925. ds_grd_diaglist.setRowType(row, ds_hidden_diag.getColumn(0, "oldrowstat"));
  7926. ds_grd_diaglist.updatecontrol = true;
  7927. }
  7928. }
  7929. function grd_diaglist_onkeydown(obj:Grid, e:KeyEventInfo)
  7930. {
  7931. if (e.keycode == 13) {
  7932. //obj.updateToDataset();
  7933. }
  7934. }
  7935. function fSearchDiageCode(){
  7936. var row = ds_grd_diaglist.rowposition;
  7937. var diagcd = ds_grd_diaglist.getColumn(row, "diagcd");
  7938. if (!utlf_isNull(diagcd)) {
  7939. var objArg = new Object();
  7940. objArg.sSelectedrdodiagkind = "1";
  7941. objArg.sDiagcd = diagcd;
  7942. objArg.sDiagnm = "";
  7943. ds_rslt_sppiz00400.clearData();
  7944. ds_cond_sppiz00400.clearData();
  7945. ds_cond_sppiz00400.addRow();
  7946. ds_cond_sppiz00400.setColumn(0, "basedd", utlf_getCurrentDate());
  7947. ds_cond_sppiz00400.setColumn(0, "diagcd", diagcd);
  7948. ds_cond_sppiz00400.setColumn(0, "diagnm", "");
  7949. ds_cond_sppiz00400.setColumn(0, "selectedrdodiagkind", "1");
  7950. // 입력된 상병코드로 emr.mrtmicd10 테이블을 조회한다.
  7951. var oParam = {};
  7952. oParam.id = "TRPIJ00308";
  7953. oParam.service = "aftjudgapp.OutAftJudg";
  7954. oParam.method = "reqGetSickAndWounded";
  7955. oParam.inds = "req=ds_cond_sppiz00400";
  7956. oParam.outds = "ds_rslt_sppiz00400=rslt";
  7957. oParam.async = false;
  7958. tranf_submit(oParam);
  7959. var rsltList = ds_rslt_sppiz00400.rowcount;
  7960. if ( rsltList == 1 ) {
  7961. // 조회된 결과가 1건이면
  7962. fSetDiagCdNm();
  7963. // 다음칸에 자동 포커스
  7964. //ds_grd_diaglist.rowposition = row++;
  7965. } else {
  7966. // 조회된 결과가 없거나 여러 건이면
  7967. // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
  7968. fSearchSPPIZ00400();
  7969. if ( utlf_isNull(ds_grd_diaglist.getColumn(row, "diagnm")) && utlf_isNull(ds_hidden_diag.getColumn(row, "diagengnm"))) {
  7970. ds_grd_diaglist.setColumn(row, "diagcd" , ds_hidden_diag.getColumn(0, "olddiagcd"));
  7971. ds_grd_diaglist.setColumn(row, "diagnm" , ds_hidden_diag.getColumn(0, "olddiagnm"));
  7972. ds_grd_diaglist.setColumn(row, "diagengnm", ds_hidden_diag.getColumn(0, "oldengnm"));
  7973. ds_grd_diaglist.setRowType(row, ds_hidden_diag.getColumn(0, "oldrowstat"));
  7974. return;
  7975. } else {
  7976. // 다음칸에 자동 포커스
  7977. row++;
  7978. if ( row < grd_diaglist.rows ) {
  7979. ds_grd_diaglist.rowposition = row;
  7980. grd_diaglist.vscrollbar.pos = row;
  7981. grd_diaglist.setCellPos(grd_diaglist.getBindCellIndex("body", "diagcd"));
  7982. grd_diaglist.showEditor(true);
  7983. }
  7984. }
  7985. }
  7986. } else {
  7987. // 상병 Grid에 상병코드를 입력하지 않고 Enter 친 경우
  7988. // 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
  7989. fSearchSPPIZ00400();
  7990. // 다음칸에 자동 포커스
  7991. ds_grd_diaglist.rowposition = row;
  7992. grd_diaglist.vscrollbar.pos = row;
  7993. if ( utlf_isNull(ds_grd_diaglist.getColumn(row, "diagcd"))) {
  7994. ds_grd_diaglist.setColumn(row, "diagcd", ds_hidden_diag.getColumn(0, "olddiagcd"));
  7995. ds_grd_diaglist.setColumn(row, "diagnm", ds_hidden_diag.getColumn(0, "olddiagnm"));
  7996. ds_grd_diaglist.setColumn(row, "diagengnm", ds_hidden_diag.getColumn(0, "oldengnm"));
  7997. ds_grd_diaglist.setRowType(row, ds_hidden_diag.getColumn(0, "oldrowstat"));
  7998. return;
  7999. }
  8000. }
  8001. }
  8002. function fSetDiagCdNm() {
  8003. var diagcd = ds_rslt_sppiz00400.getColumn(ds_rslt_sppiz00400.rowposition, "diagcd");
  8004. var diaghngnm = ds_rslt_sppiz00400.getColumn(ds_rslt_sppiz00400.rowposition, "diaghngnm");
  8005. var diagengnm = ds_rslt_sppiz00400.getColumn(ds_rslt_sppiz00400.rowposition, "diagengnm");
  8006. var spclcd = ds_rslt_sppiz00400.getColumn(ds_rslt_sppiz00400.rowposition, "spclcd");
  8007. // 상병 조회팝업에서 상병조회 후 적용하려고 할때 인스턴스 증가(행추가)하여 적용시킨다.
  8008. if(ds_grd_diaglist.rowcount <= 0){
  8009. fDiagGridInsertRow();
  8010. //grd_diaglist.showEditor(false);
  8011. }else{
  8012. var chkdiagcd = ds_grd_diaglist.getColumn(ds_grd_diaglist.rowposition, "diagcd");
  8013. var chkdiagnm = ds_grd_diaglist.getColumn(ds_grd_diaglist.rowposition, "diagnm");
  8014. if((!utlf_isNull(chkdiagcd) || chkdiagcd != " ") && (utlf_isNull(chkdiagnm) || chkdiagnm == " ")){
  8015. }else if((!utlf_isNull(chkdiagcd) || chkdiagcd != " ") && (!utlf_isNull(chkdiagnm) || chkdiagnm != " ")){
  8016. }else{
  8017. //fDiagGridInsertRow();
  8018. //grd_diaglist.showEditor(false);
  8019. }
  8020. }
  8021. if (!utlf_isNull(spclcd)) {
  8022. ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition, "vcode", spclcd);
  8023. }
  8024. if (!utlf_isNull(diaghngnm)) {
  8025. ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition, "diagnm", diaghngnm);
  8026. }
  8027. if (!utlf_isNull(diagengnm)) {
  8028. ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition, "diagengnm", diagengnm);
  8029. }
  8030. if (!utlf_isNull(diagcd)) {
  8031. ds_grd_diaglist.setColumn(ds_grd_diaglist.rowposition, "diagcd", diagcd);
  8032. }
  8033. var frow = ds_lglydisinfo.findRowExpr("fromdiag<='" + diagcd + "' && todiag>='" + diagcd + "'");
  8034. if (frow > -1){
  8035. lf_setAlramMessage("상병코드: " + diagcd + " 법정전염병 상병입니다. 확인하십시오.");
  8036. }
  8037. fDiagGridInsertRow();
  8038. }
  8039. function swt_spclmemo_case_spclspec_rdo_unitflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  8040. {
  8041. var unitflag = obj.value;
  8042. if (unitflag == "-") {
  8043. ds_grd_clcjlist.filterstr = "";
  8044. } else if (unitflag == "M") {
  8045. ds_grd_clcjlist.filterstr = "unitflag=='M'";
  8046. } else if (unitflag == "J") {
  8047. ds_grd_clcjlist.filterstr = "unitflag=='J' && spclcd!='JX999'";
  8048. } else if (unitflag == "JX999") {
  8049. ds_grd_clcjlist.filterstr = "spclcd=='JX999'";
  8050. }
  8051. }
  8052. // DB에서 조회한 특정내역 중 MT015, MT016 정보가 입력된 환자인지를 확인한다.
  8053. // 특정내역 MT004가 입력된 환자인지 체크한다.
  8054. function fCheckSpclSpecData()
  8055. {
  8056. var spclcdMT015 = ds_grd_clcjlist.findRowExpr("spclcd=='MT015' || spclcd=='MT016'");
  8057. var spclcdMT004 = ds_grd_clcjlist.findRowExpr("spclcd=='MT004'");
  8058. if (spclcdMT015 > -1)
  8059. {
  8060. btn_attData.class = "btn5";
  8061. btn_attData.color = "darkblue";
  8062. btn_attData.style.font = "Dotum,9,bold";
  8063. }
  8064. else
  8065. {
  8066. btn_attData.class = "btn2";
  8067. btn_attData.color = "";
  8068. btn_attData.style.font = "Dotum,9";
  8069. }
  8070. if(spclcdMT004 > -1)
  8071. {
  8072. btn_mt004.class = "btn5";
  8073. btn_mt004.color = "darkblue";
  8074. btn_mt004.style.font = "Dotum,9,bold";
  8075. }
  8076. else
  8077. {
  8078. btn_mt004.class = "btn2";
  8079. btn_mt004.color = "";
  8080. btn_mt004.style.font = "Dotum,9";
  8081. }
  8082. //fSpclGridInsertRow();
  8083. }
  8084. function swt_spclmemo_case_spclspec_grd_clcjlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  8085. {
  8086. if (e.col != obj.getBindCellIndex("body","spclspec")) {
  8087. grdf_setSelectedCell(obj, e);
  8088. var nX = system.clientToScreenX(obj, e.clientX)-20; // 마우스 위아래 약간의 여유를 둠
  8089. var nY = system.clientToScreenY(obj, e.clientY)-13;
  8090. clcjlistpMenu.trackPopup(nX, nY);
  8091. }
  8092. return true;
  8093. }
  8094. function btn_mt004_onclick(obj:Button, e:ClickEventInfo)
  8095. {
  8096. if(!utlf_isNull(gv_patnm)){
  8097. var spclcdMT004 = ds_grd_clcjlist.findRowExpr("spclcd=='MT004'");
  8098. if (spclcdMT004 > -1) {
  8099. } else {
  8100. var row = fSpclGridInsertRow("MT004");
  8101. // 특정내역 중 MT015, MT016 정보가 입력된 환자인지를 확인한다.
  8102. fCheckSpclSpecData();
  8103. fSpclGridInsertRow();
  8104. }
  8105. }
  8106. }
  8107. function swt_spclmemo_case_spclspec_grd_clcjlist_oncloseup(obj:Grid, e:GridEditEventInfo)
  8108. {
  8109. obj.updateToDataset();
  8110. var row = e.row;
  8111. var unitflag = eval(obj.binddataset).getColumn(obj.currentrow, "unitflag");
  8112. var newspclcd = eval(obj.binddataset).getColumn(obj.currentrow, "spclcd");
  8113. var newspclspec = eval(obj.binddataset).getColumn(obj.currentrow, "spclspec");
  8114. if (unitflag == "M" && !utlf_isNull(newspclcd))
  8115. {
  8116. if (newspclcd == "MT004" || newspclcd == "MT015" || newspclcd == "MT016" || newspclcd == "MX999")
  8117. {
  8118. var oth_spclcd = eval(obj.binddataset).findRowExpr("spclcd=='"+newspclcd+"' ", 0, obj.currentrow);
  8119. if (oth_spclcd > -1)
  8120. {
  8121. sysf_messageBox(unitflag+" 단위 특정코드 '"+ newspclcd +"'가 중복되었습니다.","E");
  8122. eval(obj.binddataset).setColumn(obj.currentrow, "spclcd", "");
  8123. return;
  8124. }
  8125. }
  8126. fCheckSpclSpecData();
  8127. }
  8128. else
  8129. {
  8130. if (newspclcd == "JX999" || newspclcd == "JT001")
  8131. {
  8132. var oth_spclcd = eval(obj.binddataset).findRowExpr("spclcd=='"+newspclcd+"' ", 0, obj.currentrow);
  8133. if (oth_spclcd > -1)
  8134. {
  8135. ds_grd_clcjlist.setColumn(row, "spclcd", "");
  8136. ds_grd_clcjlist.setColumn(row, "spclspec", "");
  8137. ds_grd_clcjlist.setColumn(row, "spclformat", "");
  8138. ds_grd_clcjlist.setColumn(row, "spclcdnm", "");
  8139. ds_grd_clcjlist.setColumn(row, "detldesc", "");
  8140. return;
  8141. }
  8142. }
  8143. }
  8144. var cdid = ds_P0117list.lookup("cdid", newspclcd, "cdid");
  8145. var cdnm = ds_P0117list.lookup("cdid", newspclcd, "cdnm");
  8146. var cdval = ds_P0117list.lookup("cdid", newspclcd, "cdval");
  8147. var detldesc = ds_P0117list.lookup("cdid", newspclcd, "detldesc");
  8148. var p0117list = ds_P0117list.rowcount;
  8149. if (p0117list != 0)
  8150. {
  8151. if (cdid == newspclcd)
  8152. {
  8153. ds_grd_clcjlist.setColumn(row, "remfact", String(cdval).substr(0,50));
  8154. ds_grd_clcjlist.setColumn(row, "detldesc", detldesc);
  8155. }
  8156. }
  8157. var rowstatus = ds_grd_clcjlist.getRowType(row);
  8158. if (rowstatus == 2)
  8159. {
  8160. }
  8161. else
  8162. {
  8163. var arrRow = new Array();
  8164. arrRow[0] = e.row;
  8165. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, "U", arrRow);
  8166. }
  8167. var spclcdnm = ds_grd_clcjlist.getColumn(row, "spclcdnm");
  8168. var spclformat = ds_grd_clcjlist.getColumn(row, "spclformat");
  8169. }
  8170. function swt_spclmemo_case_spclspec_grd_clcjlist_onkeydown(obj:Grid, e:KeyEventInfo)
  8171. {
  8172. if(e.ctrlKey == true && e.keycode == 67) {
  8173. var selectedRows = grdf_getSelectedRows(obj);
  8174. if (selectedRows.length == 1) { // 한줄
  8175. if (obj.currentcol == obj.getBindCellIndex("body", "spclspec") || obj.currentcol == obj.getBindCellIndex("body", "detldesc")) {
  8176. // 등록번호
  8177. var clip = obj.getCellValue(obj.currentrow, obj.currentcol);
  8178. system.setClipboard("CF_TEXT", clip);
  8179. } else {
  8180. grdf_clipboardCopy(obj);
  8181. }
  8182. }
  8183. else if (selectedRows.length > 1) { // 여러줄
  8184. grdf_clipboardCopy(obj);
  8185. }
  8186. }
  8187. }
  8188. function swt_spclmemo_case_spclspec_button5_onclick(obj:Button, e:ClickEventInfo)
  8189. {
  8190. var cur_row = ds_grd_clcjlist.rowposition;
  8191. if (cur_row < 0) {
  8192. cur_row = 0;
  8193. ds_grd_clcjlist.selectRow(cur_row);
  8194. }
  8195. var spclcd = ds_grd_clcjlist.getColumn(cur_row, "spclcd");
  8196. // if( utlf_isNull(spclcd) || cur_row == -1) {
  8197. // sysf_messageBox("특정내역코드를", "C002"); //선택하십시오!
  8198. // return;
  8199. // } else if (spclcd == "MT001" || spclcd == "MT002" || spclcd == "MT018") {
  8200. //
  8201. // } else {
  8202. // alert(spclcd + " = 특정내역코드가 아님");
  8203. // return;
  8204. // }
  8205. var objArg = new Object();
  8206. objArg.sSpclcd = spclcd;
  8207. var objDs = frmf_modal("SPPIZ01400","SPPIZ01400",objArg,"","","","","","","","","","M");
  8208. // 조회된 특정내역을 생성시키기
  8209. if ( objDs.rowcount > 0 ) {
  8210. var spclcd = objDs.getColumn(0, "spclcd"); // ds_hidden_sppiz01400
  8211. var cdnm = objDs.getColumn(0, "cdnm");
  8212. var spclspec = objDs.getColumn(0, "spclspec");
  8213. var spclformat = objDs.getColumn(0, "spclformat");
  8214. var detldesc = objDs.getColumn(0, "detldesc");
  8215. var nRow = ds_grd_clcjlist.addRow();
  8216. ds_grd_clcjlist.setColumn(nRow, "spclcd", spclcd);
  8217. ds_grd_clcjlist.setColumn(nRow, "spclspec", spclspec);
  8218. ds_grd_clcjlist.setColumn(nRow, "remfact", spclformat);
  8219. ds_grd_clcjlist.setColumn(nRow, "detldesc", detldesc);
  8220. ds_grd_clcjlist.setColumn(nRow, "pid" , gv_pid );
  8221. ds_grd_clcjlist.setColumn(nRow, "indd" , gv_indd1 );
  8222. ds_grd_clcjlist.setColumn(nRow, "fromdd" , gv_fromdd );
  8223. ds_grd_clcjlist.setColumn(nRow, "mskind" , gv_mskind );
  8224. ds_grd_clcjlist.setColumn(nRow, "cretno" , gv_cretno );
  8225. ds_grd_clcjlist.setColumn(nRow, "unitflag", "M");
  8226. ds_grd_clcjlist.setColumn(nRow, "edicd", "-");
  8227. ds_grd_clcjlist.setColumn(nRow, "calcscorcd", "-");
  8228. ds_grd_clcjlist.setColumn(nRow, "seqno", "");
  8229. ds_grd_clcjlist.setColumn(nRow, "prcphistno", "");
  8230. ds_grd_clcjlist.setColumn(nRow, "spclmemoflag" , "E");
  8231. //ds_hidden_list3.setColumn(0, "msgspclformat", "특정내역코드: "+ spclcd +" / 특정내역명칭: "+ cdnm +" / 기재내역: "+ spclspec +" / 기재형식: "+ spclformat);
  8232. //fSetClcjRowStatus();
  8233. fSortSpclNo();
  8234. fSpclGridInsertRow();
  8235. }
  8236. }
  8237. function swt_spclmemo_case_spclspec_grd_clcjlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  8238. {
  8239. if (e.col == obj.getBindCellIndex("body","spclcd"))
  8240. {
  8241. fSetDocRefLnSpclSpec();
  8242. }
  8243. }
  8244. function fSetDocRefLnSpclSpec()
  8245. {
  8246. ds_cond_list_sppij00500.clearData();
  8247. ds_cond_sppij00500.clearData();
  8248. ds_cond_sppij00500.addRow();
  8249. ds_rslt_sppij00500.clearData();
  8250. var row = ds_grd_clcjlist.rowposition;
  8251. var rows = ds_grd_clcjlist.rowcount;
  8252. var edicd = ds_grd_clcjlist.getColumn(row, "edicd");
  8253. var oldspclcd = ds_grd_clcjlist.getColumn(row, "spclcd");
  8254. var oldspclcdnm = "";
  8255. var oldspclspec = ds_grd_clcjlist.getColumn(row, "spclspec");
  8256. var oldremfact = ds_grd_clcjlist.getColumn(row, "remfact");
  8257. var olddetldesc = ds_grd_clcjlist.getColumn(row, "detldesc");
  8258. var unitflag = ds_grd_clcjlist.getColumn(row, "unitflag");
  8259. var calcscorcd = ds_grd_clcjlist.getColumn(row, "calcscorcd");
  8260. var flag = "";
  8261. var rownum = "";
  8262. var edicd = "";
  8263. var newspclcd = "";
  8264. var newspclcdnm ="";
  8265. var newspclspec = "";
  8266. var newremfact = "";
  8267. var newdetldesc = "";
  8268. var pid = ds_init_iteminfo.getColumn(0, "pid");
  8269. var indd = ds_init_iteminfo.getColumn(0, "indd1");
  8270. var setrow =0 ;
  8271. if(unitflag == "J")
  8272. {
  8273. if(edicd)
  8274. {
  8275. for(var i = 0; i < rows; i++)
  8276. {
  8277. var grdedicd = ds_grd_clcjlist.getColumn(i, "edicd");
  8278. if(edicd == grdedicd)
  8279. {
  8280. var rowcnt = ds_cond_list_sppij00500.addRow();
  8281. dsf_makeValue(ds_cond_list_sppij00500, "pid", "string", pid, rowcnt);
  8282. dsf_makeValue(ds_cond_list_sppij00500, "indd", "string", indd, rowcnt);
  8283. dsf_makeValue(ds_cond_list_sppij00500, "flag", "string", "U", rowcnt);
  8284. dsf_makeValue(ds_cond_list_sppij00500, "edicd", "string", ds_grd_clcjlist.getColumn(i, "edicd"), rowcnt);
  8285. dsf_makeValue(ds_cond_list_sppij00500, "spclcd", "string", ds_grd_clcjlist.getColumn(i, "spclcd"), rowcnt);
  8286. dsf_makeValue(ds_cond_list_sppij00500, "spclcdnm", "string", "", rowcnt);
  8287. dsf_makeValue(ds_cond_list_sppij00500, "spclspec", "string", ds_grd_clcjlist.getColumn(i, "spclspec"), rowcnt);
  8288. dsf_makeValue(ds_cond_list_sppij00500, "detldesc", "string", ds_P0117list.lookup("cdid",spclcd,"detldesc"), rowcnt);
  8289. dsf_makeValue(ds_cond_list_sppij00500, "remfact", "string", ds_grd_clcjlist.getColumn(i, "remfact"), rowcnt);
  8290. dsf_makeValue(ds_cond_list_sppij00500, "unitflag", "string", ds_grd_clcjlist.getColumn(i, "unitflag"), rowcnt);
  8291. dsf_makeValue(ds_cond_list_sppij00500, "rownum", "string", i, rowcnt);
  8292. dsf_makeValue(ds_cond_list_sppij00500, "oldspclcd", "string", ds_grd_clcjlist.getColumn(i, "spclcd"), rowcnt);
  8293. dsf_makeValue(ds_cond_list_sppij00500, "oldspclspec", "string", ds_grd_clcjlist.getColumn(i, "spclspec"), rowcnt);
  8294. dsf_makeValue(ds_cond_list_sppij00500, "calcscorcd", "string", ds_grd_clcjlist.getColumn(i, "calcscorcd"), rowcnt);
  8295. if(row == i)
  8296. {
  8297. setrow = i;
  8298. }
  8299. }
  8300. }
  8301. dsf_makeValue(ds_cond_sppij00500, "pid", "string", pid, 0);
  8302. dsf_makeValue(ds_cond_sppij00500, "indd", "string", indd, 0);
  8303. dsf_makeValue(ds_cond_sppij00500, "flag", "string", "U", 0);
  8304. dsf_makeValue(ds_cond_sppij00500, "edicd", "string", edicd, 0);
  8305. dsf_makeValue(ds_cond_sppij00500, "spclcd", "string", oldspclcd, 0);
  8306. dsf_makeValue(ds_cond_sppij00500, "spclcdnm", "string", oldspclcdnm, 0);
  8307. dsf_makeValue(ds_cond_sppij00500, "detldesc", "string", olddetldesc, 0);
  8308. dsf_makeValue(ds_cond_sppij00500, "spclspec", "string", oldspclspec, 0);
  8309. dsf_makeValue(ds_cond_sppij00500, "remfact", "string", oldremfact, 0);
  8310. dsf_makeValue(ds_cond_sppij00500, "rownum", "string", setrow, 0);
  8311. dsf_makeValue(ds_cond_sppij00500, "unitflag", "string", "J", 0);
  8312. dsf_makeValue(ds_cond_sppij00500, "calcscorcd", "string", calcscorcd, 0);
  8313. var unitflag = ds_grd_clcjlist.getColumn(row, "unitflag");
  8314. var rowstatus = ds_grd_clcjlist.getRowType(row);
  8315. if(rowstatus == 8)
  8316. {
  8317. sysf_messageBox("삭제된 특정내역은 수정할 수", "I004"); ///삭제된 특정내역은 수정할 수 없습니다.
  8318. return;
  8319. }
  8320. var rtn = frmf_modal("SPPIJ00500","SPPIJ00500",{objDs:ds_cond_sppij00500, objDslist:ds_cond_list_sppij00500},"","","","","","","","","","M");
  8321. ds_rslt_sppij00500.copyData(rtn);
  8322. var rtnrowcnt = rtn.rowcount;
  8323. if (rtnrowcnt > 0)
  8324. {
  8325. for(var i = 0; i < rtnrowcnt; i++)
  8326. {
  8327. flag = rtn.getColumn(i, "flag");
  8328. rownum = rtn.getColumn(i, "rownum");
  8329. edicd = rtn.getColumn(i, "edicd");
  8330. newspclcd = rtn.getColumn(i, "spclcd");
  8331. newspclcdnm = rtn.getColumn(i, "spclcdnm");
  8332. newspclspec = rtn.getColumn(i, "spclspec");
  8333. newremfact = rtn.getColumn(i, "remfact");
  8334. newdetldesc = rtn.getColumn(i, "detldesc");
  8335. oldspclcd = rtn.getColumn(i, "oldspclcd");
  8336. oldspclspec = rtn.getColumn(i, "oldspclspec");
  8337. if(flag == "I")
  8338. {
  8339. var clsprow = ds_grd_clcjlist.addRow();
  8340. ds_grd_clcjlist.setColumn(clsprow, "unitflag", unitflag);
  8341. ds_grd_clcjlist.setColumn(clsprow, "spclcd", newspclcd);
  8342. ds_grd_clcjlist.setColumn(clsprow, "spclspec", newspclspec);
  8343. ds_grd_clcjlist.setColumn(clsprow, "remfact", newremfact);
  8344. ds_grd_clcjlist.setColumn(clsprow, "detldesc", newdetldesc);
  8345. ds_grd_clcjlist.setColumn(clsprow, "edicd", edicd);
  8346. ds_grd_clcjlist.setColumn(clsprow, "status", "2");
  8347. }
  8348. else if(flag == "U")
  8349. {
  8350. ds_grd_clcjlist.setColumn(rownum, "unitflag", unitflag);
  8351. ds_grd_clcjlist.setColumn(rownum, "spclcd", newspclcd);
  8352. ds_grd_clcjlist.setColumn(rownum, "spclspec", newspclspec);
  8353. ds_grd_clcjlist.setColumn(rownum, "remfact", newremfact);
  8354. ds_grd_clcjlist.setColumn(rownum, "detldesc", newdetldesc);
  8355. ds_grd_clcjlist.setColumn(rownum, "edicd", edicd);
  8356. if(ds_grd_clcjlist.getRowType(rownum, "status") != 2)
  8357. {
  8358. ds_grd_clcjlist.setColumn(rownum, "status", "2");
  8359. }
  8360. if(oldspclcd != newspclcd || oldspclspec != newspclspec || ds_grd_clcjlist.getRowType(row) == 8 )
  8361. {
  8362. var rowstatus = ds_grd_clcjlist.getRowType(rownum);
  8363. if(rowstatus == 2)
  8364. {
  8365. }
  8366. else
  8367. {
  8368. var arrRow = new Array();
  8369. arrRow[0] = rownum;
  8370. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, "U", arrRow);
  8371. ds_grd_clcjlist.setColumn(rownum, "status", "4");
  8372. }
  8373. }
  8374. }
  8375. else if(flag == "D" && !utlf_isNull(rownum))
  8376. {
  8377. if(rowstatus == 2)
  8378. {
  8379. ds_grd_clcjlist.deleteRow(rownum);
  8380. }
  8381. else
  8382. {
  8383. var arrRow = new Array();
  8384. arrRow[0] = rownum;
  8385. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, "D", arrRow);
  8386. }
  8387. var clcjedicd = ds_grd_clcjlist.getColumn(rownum, "edicd");
  8388. if(clcjedicd)
  8389. {
  8390. var isSameLn = false;
  8391. for(var j = 0, rowcnt=ds_grd_clcjlist.rowcount; j < rowcnt; j++)
  8392. {
  8393. if(ds_grd_clcjlist.getRowType(j) != 8)
  8394. {
  8395. isSameLn = true;
  8396. }
  8397. }
  8398. }
  8399. if(isSameLn == false)
  8400. {
  8401. var rowcnt = ds_grd_ordlist.rowcount;
  8402. for(var j = 0; j < rowcnt; j++)
  8403. {
  8404. var iscldicd = ds_grd_ordlist.getColumn(j, "edicd");
  8405. if(clcjedicd == iscldicd)
  8406. {
  8407. ds_grd_ordlist.setColumn(j, "text", "");
  8408. }
  8409. }
  8410. }
  8411. }
  8412. }
  8413. var rdounitflag = ds_send.getColumn(0, "unitflag");
  8414. var rowcnt = ds_grd_clcjlist.rowcount;
  8415. if(rdounitflag == "-")
  8416. {
  8417. for(var i = 0; i < rowcnt; i++)
  8418. {
  8419. var delstatus = ds_grd_clcjlist.getRowType(i);
  8420. var delspclspec = ds_grd_clcjlist.getColumn(i, "spclspec");
  8421. if(delstatus == 2)
  8422. {
  8423. if(utlf_isNull(delspclspec))
  8424. {
  8425. ds_grd_clcjlist.deleteRow(i);
  8426. }
  8427. }
  8428. }
  8429. fSpclGridInsertRow();
  8430. }
  8431. else if(rdounitflag == "M")
  8432. {
  8433. ds_grd_clcjlist.filterstr = "unitflag == 'M'";
  8434. }
  8435. else if(rdounitflag == "J")
  8436. {
  8437. ds_grd_clcjlist.filterstr = "unitflag == 'J'";
  8438. }
  8439. rowcnt = ds_grd_clcjlist.rowcount;
  8440. for(var i = 0; i < rowcnt; i++)
  8441. {
  8442. var unitflag = ds_grd_clcjlist.getColumn(i, "unitflag");
  8443. var status = ds_grd_clcjlist.getColumn(i, "status");
  8444. if(!utlf_isNull(status))
  8445. {
  8446. if(status == 2)
  8447. {
  8448. status = "I";
  8449. }
  8450. else if(status == 4)
  8451. {
  8452. status = "U";
  8453. }
  8454. else if(status == 8)
  8455. {
  8456. status = "D";
  8457. }
  8458. else
  8459. {
  8460. status = "";
  8461. }
  8462. var arrRow = new Array();
  8463. arrRow[0] = i;
  8464. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, status, arrRow);
  8465. }
  8466. }
  8467. }
  8468. }
  8469. else
  8470. {
  8471. sysf_messageBox("EDI코드가 없는 경우 해당 줄단위 특정내역이", "I004");
  8472. }
  8473. }
  8474. else
  8475. {
  8476. ds_rslt_sppij00500.clearData();
  8477. ds_cond_sppij00500.clearData();
  8478. ds_cond_sppij00500.addRow();
  8479. ds_cond_list_sppij00500.clearData();
  8480. var edicd = ds_grd_clcjlist.getColumn(row, "edicd");
  8481. var spclcd = ds_grd_clcjlist.getColumn(row, "spclcd");
  8482. var spclcdnm = "";
  8483. var spclspec = ds_grd_clcjlist.getColumn(row, "spclspec");
  8484. var remfact = ds_grd_clcjlist.getColumn(row, "remfact");
  8485. var detldesc = ds_grd_clcjlist.getColumn(row, "detldesc");
  8486. var unitflag = ds_grd_clcjlist.getColumn(row, "unitflag");
  8487. var calcscorcd = ds_grd_clcjlist.getColumn(row, "calcscorcd");
  8488. dsf_makeValue(ds_cond_sppij00500, "pid", "string", pid, 0);
  8489. dsf_makeValue(ds_cond_sppij00500, "indd", "string", indd, 0);
  8490. dsf_makeValue(ds_cond_sppij00500, "edicd", "string", edicd, 0);
  8491. dsf_makeValue(ds_cond_sppij00500, "spclcd", "string", spclcd, 0);
  8492. dsf_makeValue(ds_cond_sppij00500, "spclcdnm", "string", spclcdnm, 0);
  8493. dsf_makeValue(ds_cond_sppij00500, "remfact", "string", remfact, 0);
  8494. dsf_makeValue(ds_cond_sppij00500, "spclspec", "string", spclspec, 0);
  8495. dsf_makeValue(ds_cond_sppij00500, "unitflag", "string", "M", 0);
  8496. dsf_makeValue(ds_cond_sppij00500, "calcscorcd", "string", calcscorcd, 0);
  8497. var rowcnt = ds_grd_clcjlist.rowcount;
  8498. for(var i = 0; i < rowcnt; i++)
  8499. {
  8500. var unitflag = ds_grd_clcjlist.getColumn(i, "unitflag");
  8501. var spclcd = ds_grd_clcjlist.getColumn(i, "spclcd");
  8502. if(unitflag == "M" && ds_grd_clcjlist.getRowType(i) != 8 && !utlf_isNull(spclcd))
  8503. {
  8504. var rowcnt = ds_cond_list_sppij00500.addRow();
  8505. dsf_makeValue(ds_cond_list_sppij00500, "pid", "string", pid, rowcnt);
  8506. dsf_makeValue(ds_cond_list_sppij00500, "indd", "string", indd, rowcnt);
  8507. dsf_makeValue(ds_cond_list_sppij00500, "flag", "string", "U", rowcnt);
  8508. dsf_makeValue(ds_cond_list_sppij00500, "edicd", "string", ds_grd_clcjlist.getColumn(i, "edicd"), rowcnt);
  8509. dsf_makeValue(ds_cond_list_sppij00500, "spclcd", "string", ds_grd_clcjlist.getColumn(i, "spclcd"), rowcnt);
  8510. dsf_makeValue(ds_cond_list_sppij00500, "spclcdnm", "string", ds_grd_clcjlist.getColumn(i, "spclcdnm"), rowcnt);
  8511. dsf_makeValue(ds_cond_list_sppij00500, "spclspec", "string", ds_grd_clcjlist.getColumn(i, "spclspec"), rowcnt);
  8512. dsf_makeValue(ds_cond_list_sppij00500, "detldesc", "string", ds_P0117list.lookup("cdid",spclcd,"detldesc"), rowcnt);
  8513. dsf_makeValue(ds_cond_list_sppij00500, "remfact", "string", ds_grd_clcjlist.getColumn(i, "remfact"), rowcnt);
  8514. dsf_makeValue(ds_cond_list_sppij00500, "unitflag", "string", ds_grd_clcjlist.getColumn(i, "unitflag"), rowcnt);
  8515. dsf_makeValue(ds_cond_list_sppij00500, "rownum", "string", i, rowcnt);
  8516. dsf_makeValue(ds_cond_list_sppij00500, "oldspclcd", "string", ds_grd_clcjlist.getColumn(i, "spclcd"), rowcnt);
  8517. dsf_makeValue(ds_cond_list_sppij00500, "oldspclspec", "string", ds_grd_clcjlist.getColumn(i, "spclspec"), rowcnt);
  8518. dsf_makeValue(ds_cond_list_sppij00500, "calcscorcd", "string", calcscorcd, rowcnt);
  8519. if(row == i)
  8520. {
  8521. setrow = i;
  8522. }
  8523. }
  8524. }
  8525. var rtn = frmf_modal("SPPIJ00500","SPPIJ00500",{objDs:ds_cond_sppij00500, objDslist:ds_cond_list_sppij00500},"","","","","","","","","","M");
  8526. ds_rslt_sppij00500.copyData(rtn)
  8527. var rtnrowcnt = rtn.rowcount;
  8528. if (rtnrowcnt > 0)
  8529. {
  8530. for(var i = 0; i < rtnrowcnt; i++)
  8531. {
  8532. var flag = rtn.getColumn(i, "flag");
  8533. var rownum = rtn.getColumn(i, "rownum");
  8534. var edicd = rtn.getColumn(i, "edicd");
  8535. var newspclcd = rtn.getColumn(i, "spclcd");
  8536. var newspclcdnm = rtn.getColumn(i, "spclcdnm");
  8537. var newspclspec = rtn.getColumn(i, "spclspec");
  8538. var newremfact = rtn.getColumn(i, "remfact");
  8539. var newdetldesc = rtn.getColumn(i, "detldesc");
  8540. if(flag == "I")
  8541. {
  8542. var clsprow = ds_grd_clcjlist.addRow();
  8543. ds_grd_clcjlist.setColumn(clsprow, "unitflag", unitflag);
  8544. ds_grd_clcjlist.setColumn(clsprow, "spclcd", newspclcd);
  8545. ds_grd_clcjlist.setColumn(clsprow, "spclspec", newspclspec);
  8546. ds_grd_clcjlist.setColumn(clsprow, "remfact", newremfact);
  8547. ds_grd_clcjlist.setColumn(clsprow, "detldesc", newdetldesc);
  8548. ds_grd_clcjlist.setColumn(clsprow, "edicd", edicd);
  8549. ds_grd_clcjlist.setColumn(clsprow, "status", "2");
  8550. ds_grd_clcjlist.setColumn(clsprow, "pid", ds_send.getColumn(0, "pid"));
  8551. ds_grd_clcjlist.setColumn(clsprow, "indd", ds_send.getColumn(0, "indd"));
  8552. ds_grd_clcjlist.setColumn(clsprow, "cretno", ds_send.getColumn(0, "cretno"));
  8553. ds_grd_clcjlist.setColumn(clsprow, "fromdd", ds_send.getColumn(0, "fromdd"));
  8554. ds_grd_clcjlist.setColumn(clsprow, "mskind", ds_send.getColumn(0, "mskind"));
  8555. ds_grd_clcjlist.setColumn(clsprow, "spclmemoflag", "E");
  8556. }
  8557. else if(flag == "U")
  8558. {
  8559. ds_grd_clcjlist.setColumn(rownum, "unitflag", unitflag);
  8560. ds_grd_clcjlist.setColumn(rownum, "spclcd", newspclcd);
  8561. ds_grd_clcjlist.setColumn(rownum, "spclspec", newspclspec);
  8562. ds_grd_clcjlist.setColumn(rownum, "remfact", newremfact);
  8563. ds_grd_clcjlist.setColumn(rownum, "detldesc", newdetldesc);
  8564. ds_grd_clcjlist.setColumn(rownum, "edicd", edicd);
  8565. if(ds_grd_clcjlist.getColumn(rownum, "status") != "2")
  8566. {
  8567. var arrRow = new Array();
  8568. arrRow[0] = rownum;
  8569. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, "U", arrRow);
  8570. }
  8571. }
  8572. else if(flag == "D" && !utlf_isNum(rownum))
  8573. {
  8574. if(rowstatus == 2)
  8575. {
  8576. ds_grd_clcjlist.deleteRow(rownum);
  8577. }
  8578. else
  8579. {
  8580. var arrRow = new Array();
  8581. arrRow[0] = rownum;
  8582. grdf_setStatus(swt_spclmemo.case_spclspec.grd_clcjlist, "D", arrRow);
  8583. ds_grd_clcjlist.setColumn(rownum, "status", "8");
  8584. }
  8585. }
  8586. }
  8587. }
  8588. }
  8589. }
  8590. function fOrderGridInsertCmt(obj)
  8591. {
  8592. var rdounitflag = ds_send.getColumn(0, "unitflag");
  8593. var rows = ds_grd_clcjlist.rowcount;
  8594. if (rdounitflag == "M")
  8595. {
  8596. group6.grp_spcl.swt_spclmemo.case_spclspec.rdo_unitflag.value = "J";
  8597. ds_send.setColumn(0, "unitflag", "J");
  8598. ds_grd_clcjlist.filterstr = "unitflag == 'J'";
  8599. // 단위에 따라 해당 행있는 특정코드 콤보 재설정
  8600. var rowcnt = ds_grd_clcjlist.rowcount;
  8601. for (var i=1; i<rowcnt; i++) {
  8602. var unitflag = ds_grd_clcjlist.getColumn(ds_grd_clcjlist.rowposition, "unitflag");
  8603. var status = ds_grd_clcjlist.getColumn(ds_grd_clcjlist.rowposition, "status");
  8604. if (!utlf_isNull(status)) {
  8605. var arrPostion = new Array();
  8606. arrPostion[0] = i;
  8607. grdf_setStatus( swt_spclmemo.case_spclspec.grd_clcjlist, status, arrPostion);
  8608. }
  8609. }
  8610. }
  8611. ds_cond_sppij00500.clearData();
  8612. ds_cond_sppij00500.addRow();
  8613. ds_cond_list_sppij00500.clearData();
  8614. var SelectedRows = grdf_getSelectedRows(utlf_isNull(obj) ? grp_calc.grd_ordlist : obj);
  8615. var rowcount = SelectedRows.length;
  8616. for (var k=0; k < rowcount; k++ ) {
  8617. var row = SelectedRows[k];
  8618. var edicd = ds_grd_ordlist.getColumn(row,"edicd");
  8619. var calcscorcd = ds_grd_ordlist.getColumn(row,"snglcalcscorcd");
  8620. if (!utlf_isNull(edicd)) {
  8621. } else {
  8622. sysf_messageBox("EDI코드가 없는 경우 해당 줄단위 특정내역이", "I004"); ///EDI코드가 없는 경우 해당 줄단위 특정내역이 없습니다.
  8623. return;
  8624. }
  8625. }
  8626. var rowcnt = 1;
  8627. var setrow = 0;
  8628. var objds = utlf_isNull(obj) ? ds_grd_ordlist : ds_grd_clcjlist;
  8629. rowcount = SelectedRows.length;
  8630. for (var k=0; k < rowcount; k++ ) {
  8631. var row = SelectedRows[k];
  8632. var edicd = objds.getColumn(row,"edicd");
  8633. var calcscorcd = objds.getColumn(row, (utlf_isNull(obj) ? "snglcalcscorcd" : "calcscorcd"));
  8634. if (rows == 0) {
  8635. ds_cond_sppij00500.setColumn(0, "pid" , gv_pid);
  8636. ds_cond_sppij00500.setColumn(0, "indd" , gv_indd1);
  8637. ds_cond_sppij00500.setColumn(0, "edicd" , edicd);
  8638. ds_cond_sppij00500.setColumn(0, "unitflag" , "J");
  8639. ds_cond_sppij00500.setColumn(0, "flag" , "I");
  8640. ds_cond_sppij00500.setColumn(0, "spclcd" , "JX999");
  8641. ds_cond_sppij00500.setColumn(0, "spclcdnm" , "");
  8642. ds_cond_sppij00500.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
  8643. ds_cond_sppij00500.setColumn(0, "spclspec" , "");
  8644. ds_cond_sppij00500.setColumn(0, "remfact" , "X(700)");
  8645. ds_cond_sppij00500.setColumn(0, "rownum" , "");
  8646. ds_cond_sppij00500.setColumn(0, "calcscorcd" , calcscorcd);
  8647. } else if (ds_grd_clcjlist.findRowExpr("calcscorcd=='"+calcscorcd+"'") == -1) {
  8648. ds_cond_sppij00500.setColumn(0, "pid" , gv_pid);
  8649. ds_cond_sppij00500.setColumn(0, "indd" , gv_indd1);
  8650. ds_cond_sppij00500.setColumn(0, "edicd" , edicd);
  8651. ds_cond_sppij00500.setColumn(0, "unitflag" , "J");
  8652. ds_cond_sppij00500.setColumn(0, "flag" , "I");
  8653. ds_cond_sppij00500.setColumn(0, "spclcd" , "JX999");
  8654. ds_cond_sppij00500.setColumn(0, "spclcdnm" , "");
  8655. ds_cond_sppij00500.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
  8656. ds_cond_sppij00500.setColumn(0, "spclspec" , "");
  8657. ds_cond_sppij00500.setColumn(0, "remfact" , "X(700)");
  8658. ds_cond_sppij00500.setColumn(0, "rownum" , "");
  8659. ds_cond_sppij00500.setColumn(0, "calcscorcd" , calcscorcd);
  8660. if (SelectedRows.length > 1) {
  8661. var addrow = ds_cond_list_sppij00500.addRow();
  8662. ds_cond_list_sppij00500.setColumn(addrow, "calcscorcd" , calcscorcd);
  8663. ds_cond_list_sppij00500.setColumn(addrow, "pid" , gv_pid);
  8664. ds_cond_list_sppij00500.setColumn(addrow, "indd" , gv_indd1);
  8665. ds_cond_list_sppij00500.setColumn(addrow, "edicd" , edicd);
  8666. ds_cond_list_sppij00500.setColumn(addrow, "unitflag" , "J");
  8667. ds_cond_list_sppij00500.setColumn(addrow, "flag" , "I");
  8668. ds_cond_list_sppij00500.setColumn(addrow, "spclcd" , "JX999");
  8669. ds_cond_list_sppij00500.setColumn(addrow, "spclcdnm" , "");
  8670. ds_cond_list_sppij00500.setColumn(addrow, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
  8671. ds_cond_list_sppij00500.setColumn(addrow, "spclspec" , "");
  8672. ds_cond_list_sppij00500.setColumn(addrow, "remfact" , "X(700)");
  8673. ds_cond_list_sppij00500.setColumn(addrow, "rownum" , "");
  8674. ds_cond_list_sppij00500.setColumn(addrow, "calcscorcd" , calcscorcd);
  8675. }
  8676. } else {
  8677. for (var i=0; i< rows; i++) {
  8678. var clcjedicd = ds_grd_clcjlist.getColumn(i, "edicd");
  8679. var spclcd = ds_grd_clcjlist.getColumn(i, "spclcd");
  8680. if ( edicd == clcjedicd) {
  8681. ds_cond_sppij00500.setColumn(0, "pid" , gv_pid);
  8682. ds_cond_sppij00500.setColumn(0, "indd" , gv_indd1);
  8683. var addrow = ds_cond_list_sppij00500.addRow();
  8684. ds_cond_list_sppij00500.setColumn(addrow, "flag" , "U");
  8685. ds_cond_list_sppij00500.setColumn(addrow, "edicd" , ds_grd_clcjlist.getColumn(i, "edicd"));
  8686. ds_cond_list_sppij00500.setColumn(addrow, "detldesc" , ds_grd_clcjlist.getColumn(i, "detldesc"));
  8687. ds_cond_list_sppij00500.setColumn(addrow, "spclcd" , ds_grd_clcjlist.getColumn(i, "spclcd"));
  8688. ds_cond_list_sppij00500.setColumn(addrow, "spclcdnm" , "");
  8689. ds_cond_list_sppij00500.setColumn(addrow, "spclspec" , ds_grd_clcjlist.getColumn(i, "spclspec"));
  8690. ds_cond_list_sppij00500.setColumn(addrow, "remfact" , ds_grd_clcjlist.getColumn(i, "remfact"));
  8691. ds_cond_list_sppij00500.setColumn(addrow, "rownum" , i);
  8692. ds_cond_list_sppij00500.setColumn(addrow, "unitflag" , "J");
  8693. ds_cond_list_sppij00500.setColumn(addrow, "oldspclcd" , ds_grd_clcjlist.getColumn(i, "spclcd"));
  8694. ds_cond_list_sppij00500.setColumn(addrow, "oldspclspec" , ds_grd_clcjlist.getColumn(i, "spclspec"));
  8695. ds_cond_list_sppij00500.setColumn(addrow, "calcscorcd" , ds_grd_clcjlist.getColumn(i, "calcscorcd"));
  8696. // 특정내역 상세 화면에 보여줄 특정내역 선택
  8697. setrow = i;
  8698. }
  8699. ds_cond_sppij00500.setColumn(0, "edicd" , edicd);
  8700. ds_cond_sppij00500.setColumn(0, "unitflag" , "J");
  8701. if ( ds_grd_clcjlist.getColumn(setrow, "spclcd") == "JX999" ) {
  8702. ds_cond_sppij00500.setColumn(0, "pid" , gv_pid);
  8703. ds_cond_sppij00500.setColumn(0, "indd" , gv_indd1);
  8704. ds_cond_sppij00500.setColumn(0, "flag" , "U");
  8705. ds_cond_sppij00500.setColumn(0, "spclcd" , ds_grd_clcjlist.getColumn(setrow, "spclcd"));
  8706. ds_cond_sppij00500.setColumn(0, "spclcdnm" , "");
  8707. ds_cond_sppij00500.setColumn(0, "detldesc" , ds_grd_clcjlist.getColumn(setrow, "detldesc"));
  8708. ds_cond_sppij00500.setColumn(0, "spclspec" , ds_grd_clcjlist.getColumn(setrow, "spclspec"));
  8709. ds_cond_sppij00500.setColumn(0, "remfact" , ds_grd_clcjlist.getColumn(setrow, "remfact"));
  8710. ds_cond_sppij00500.setColumn(0, "rownum" , setrow);
  8711. ds_cond_sppij00500.setColumn(0, "calcscorcd" , ds_grd_clcjlist.getColumn(setrow, "calcscorcd"));
  8712. } else {
  8713. ds_cond_sppij00500.setColumn(0, "pid" , gv_pid);
  8714. ds_cond_sppij00500.setColumn(0, "indd" , gv_indd1);
  8715. ds_cond_sppij00500.setColumn(0, "flag" , "I");
  8716. ds_cond_sppij00500.setColumn(0, "spclcd" , "JX999");
  8717. ds_cond_sppij00500.setColumn(0, "spclcdnm" , "");
  8718. ds_cond_sppij00500.setColumn(0, "detldesc" , "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
  8719. ds_cond_sppij00500.setColumn(0, "spclspec" , ds_grd_clcjlist.getColumn(setrow, "spclspec"));
  8720. ds_cond_sppij00500.setColumn(0, "remfact" , "X(700)");
  8721. ds_cond_sppij00500.setColumn(0, "rownum" , "");
  8722. ds_cond_sppij00500.setColumn(0, "calcscorcd" , calcscorcd);
  8723. }
  8724. }
  8725. }
  8726. }
  8727. fOpen_SPPIJ00500();
  8728. }
  8729. function fOpen_SPPIJ00500() {
  8730. var rtn = frmf_modal("SPPIJ00500","SPPIJ00500",{objDs:ds_cond_sppij00500, objDslist:ds_cond_list_sppij00500},"","","","","","","","","","M");// SPPIJ00500_특정내역상세관리
  8731. var rtnrowcnt = rtn.rowcount;
  8732. if (rtnrowcnt > 0) {
  8733. for(var i = rtnrowcnt-1; i>=0; i--) {
  8734. var flag = rtn.getColumn(i, "flag");
  8735. var edicd = rtn.getColumn(i, "edicd");
  8736. var newspclcd = rtn.getColumn(i, "spclcd");
  8737. var newspclcdnm = rtn.getColumn(i, "spclcdnm");
  8738. var newspclspec = rtn.getColumn(i, "spclspec");
  8739. var newremfact = rtn.getColumn(i, "remfact");
  8740. var newdetldesc = rtn.getColumn(i, "detldesc");
  8741. var newdcalcscorcd = rtn.getColumn(i, "calcscorcd");
  8742. var oldspclcd = rtn.getColumn(i, "oldspclcd");
  8743. var oldspclspec = rtn.getColumn(i, "oldspclspec");
  8744. var rownum = ds_grd_clcjlist.findRowExpr("edicd =='"+edicd+"' && calcscorcd=='"+newdcalcscorcd+"' && spclcd=='"+newspclcd+"'");
  8745. if (flag == "I") {
  8746. var clcjrow = ds_grd_clcjlist.addRow(); // 특정내역 Grid 가장 마지막 줄에 추가한다.
  8747. ds_grd_clcjlist.setColumn(clcjrow, "pid", gv_pid);
  8748. ds_grd_clcjlist.setColumn(clcjrow, "indd", gv_indd1);
  8749. ds_grd_clcjlist.setColumn(clcjrow, "cretno", gv_cretno);
  8750. ds_grd_clcjlist.setColumn(clcjrow, "fromdd", gv_fromdd);
  8751. ds_grd_clcjlist.setColumn(clcjrow, "mskind", gv_mskind);
  8752. ds_grd_clcjlist.setColumn(clcjrow, "unitflag", "J");
  8753. ds_grd_clcjlist.setColumn(clcjrow, "edicd", edicd);
  8754. ds_grd_clcjlist.setColumn(clcjrow, "spclcd", newspclcd);
  8755. ds_grd_clcjlist.setColumn(clcjrow, "spclspec", newspclspec);
  8756. ds_grd_clcjlist.setColumn(clcjrow, "remfact", newremfact);
  8757. ds_grd_clcjlist.setColumn(clcjrow, "detldesc", newdetldesc);
  8758. ds_grd_clcjlist.setColumn(clcjrow, "calcscorcd", newdcalcscorcd);
  8759. ds_grd_clcjlist.setColumn(clcjrow, "spclmemoflag", "E");
  8760. ds_grd_clcjlist.rowposition = clcjrow;
  8761. swt_spclmemo.case_spclspec.grd_clcjlist.vscrollbar.pos = clcjrow;
  8762. // 특정코드 변경인 경우
  8763. } else if (flag == "U") {
  8764. var frow = 0;
  8765. var rowcnt = ds_grd_clcjlist.getCaseCount("edicd =='"+edicd+"' && calcscorcd=='"+newdcalcscorcd+"' && spclcd=='"+newspclcd+"'");
  8766. for (var k=0; k < rowcnt; k++) {
  8767. rownum = ds_grd_clcjlist.findRowExpr("edicd =='"+edicd+"' && calcscorcd=='"+newdcalcscorcd+"' && spclcd=='"+newspclcd+"'", frow++);
  8768. ds_grd_clcjlist.setColumn(rownum, "spclcd", newspclcd);
  8769. ds_grd_clcjlist.setColumn(rownum, "spclspec", newspclspec);
  8770. ds_grd_clcjlist.setColumn(rownum, "remfact", newremfact);
  8771. ds_grd_clcjlist.setColumn(rownum, "detldesc", newdetldesc);
  8772. ds_grd_clcjlist.setColumn(rownum, "calcscorcd", newdcalcscorcd);
  8773. ds_grd_clcjlist.rowposition = rownum;
  8774. swt_spclmemo.case_spclspec.grd_clcjlist.vscrollbar.pos = rownum;
  8775. if ( ds_grd_clcjlist.getRowType(rownum) != 2) {
  8776. var arrPostion = new Array();
  8777. arrPostion[0] = rownum;
  8778. grdf_setStatus( swt_spclmemo.case_spclspec.grd_clcjlist, "", arrPostion);
  8779. }
  8780. // 특정코드, 특정내역이 변경되었거나 삭제된 특정코드를 조회하여 "확인"을 선택한 경우
  8781. if (oldspclcd != newspclcd || oldspclspec != newspclspec || ds_grd_clcjlist.getRowType(rownum) == 8) {
  8782. var rowstatus = ds_grd_clcjlist.getRowType(rownum)
  8783. if (rowstatus == 2) { // 1 : insert, 3 : insert & new
  8784. } else {
  8785. var arrPostion = new Array();
  8786. arrPostion[0] = rownum;
  8787. grdf_setStatus( swt_spclmemo.case_spclspec.grd_clcjlist, "U", arrPostion);
  8788. }
  8789. }
  8790. frow = rownum + 1
  8791. }
  8792. // 특정코드 삭제인 경우
  8793. } else if (flag == "D" && !utlf_isNull(rownum)) {
  8794. var cnt = 0;
  8795. var rowcnt = ds_grd_clcjlist.rowcount;
  8796. for (var j = 0; j < rowcnt; j++) {
  8797. var clcjedicd = ds_grd_clcjlist.getColumn(j, "edicd");
  8798. if (edicd == clcjedicd) {
  8799. if (ds_grd_clcjlist.getRowType(j) != 8) {
  8800. cnt++;
  8801. }
  8802. }
  8803. }
  8804. // 특정내역 Grid에서 삭제
  8805. var rowstatus = ds_grd_clcjlist.getRowType(rownum);
  8806. if (rowstatus == 2 ) {
  8807. ds_grd_clcjlist.deleteRow(rownum);// 해당 라인을 Grid에서 삭제한다.
  8808. } else { // 0 : new, 2 : update
  8809. var arrPostion = new Array();
  8810. arrPostion[0] = rownum;
  8811. grdf_setStatus( swt_spclmemo.case_spclspec.grd_clcjlist, "D", arrPostion); // 4 : delete 상태로 stat를 변경한다.
  8812. }
  8813. ds_grd_clcjlist.rowposition = rownum;
  8814. swt_spclmemo.case_spclspec.grd_clcjlist.vscrollbar.pos = rownum;
  8815. } // 특정 코드 상태 따른 if end
  8816. }
  8817. }
  8818. }
  8819. function fGetAttachedDataList()
  8820. {
  8821. if (!utlf_isNull(gv_patnm)) {
  8822. // 1. 첨부물자료관리 팝업을 호출한다.
  8823. ds_cond_sppiz00200.clearData();
  8824. var index = -1;
  8825. var spclcd;
  8826. var gridrowstatus;
  8827. var rowcnt = ds_grd_clcjlist.rowcount;
  8828. for (var i = 0 ; i < rowcnt; i++) {
  8829. spclcd = ds_grd_clcjlist.getColumn(i, "spclcd");
  8830. gridrowstatus = ds_grd_clcjlist.getRowType(i);
  8831. if (spclcd == "MT015" || spclcd == "MT016") {
  8832. index = ds_cond_sppiz00200.addRow();
  8833. ds_cond_sppiz00200.setColumn(index, "spclcd", ds_grd_clcjlist.getColumn(i, "spclcd"));
  8834. ds_cond_sppiz00200.setColumn(index, "seqno", ds_grd_clcjlist.getColumn(i, "seqno"));
  8835. ds_cond_sppiz00200.setColumn(index, "spclspec", ds_grd_clcjlist.getColumn(i, "spclspec"));
  8836. // 특정내역 Grid에서 "행 삭제"한 경우 MT015 / MT016 자료를 표시하지 않도록 하도록 rowstatus를 전달함
  8837. ds_cond_sppiz00200.setColumn(index, "rowstat", gridrowstatus);
  8838. }
  8839. }
  8840. var objArg = new Object();
  8841. objArg.sOpenflag = "M";
  8842. objArg.sSpclcd = ds_grd_clcjlist.getColumn(ds_grd_clcjlist.rowposition, "spclcd");
  8843. var rtn = frmf_modal("SPPIZ00200","SPPIZ00200",objArg,"","","","","","","","","","M");
  8844. /* if (rtn > 0) {*/
  8845. // 오프너에서 ds_rslt_sppiz00200 로 넣어줌
  8846. // 2. 넘어온 데이터를 입력한다.
  8847. fDisplayAttachedDataList();
  8848. // } else {
  8849. // //ds_rslt_sppiz00200.clearData();
  8850. // }
  8851. }
  8852. }
  8853. function fDisplayAttachedDataList()
  8854. {
  8855. var cSrcNode = ds_rslt_sppiz00200.rowcount;
  8856. if ( cSrcNode < 1 ) {
  8857. return;
  8858. }
  8859. if ( utlf_isNull(ds_rslt_sppiz00200.getColumn(0, "unitflag")) ) { // "취소" 선택시에 버튼 색이 변경되지 않도록
  8860. return;
  8861. }
  8862. var clsprow = 0;
  8863. var addcnt = 0;
  8864. ds_grd_clcjlist.updatecontrol = false;
  8865. // 1. 소명자료를 추가,수정,삭제한다.
  8866. for (var i=0, rowcnt = ds_rslt_sppiz00200.rowcount; i <rowcnt; i++ ) {
  8867. var spclcd = ds_rslt_sppiz00200.getColumn(i, "spclcd");
  8868. var spclspec = ds_rslt_sppiz00200.getColumn(i, "spclspec");
  8869. if ( spclcd == "MT015" || spclcd == "MT016" ) {
  8870. var rowstat = ds_rslt_sppiz00200.getColumn(i, "rowstat");
  8871. if ( rowstat == "I" ) {
  8872. clsprow = ds_grd_clcjlist.addRow();
  8873. ds_grd_clcjlist.setRowType(clsprow, "I");
  8874. ds_grd_clcjlist.setColumn(clsprow, "rowstat", "I");
  8875. ds_grd_clcjlist.setColumn(clsprow, "unitflag", "M");
  8876. ds_grd_clcjlist.setColumn(clsprow, "edicd", "-");
  8877. ds_grd_clcjlist.setColumn(clsprow, "spclcd", spclcd);
  8878. ds_grd_clcjlist.setColumn(clsprow, "spclspec", spclspec);
  8879. ds_grd_clcjlist.setColumn(clsprow, "spclmemoflag" , "E");
  8880. ds_grd_clcjlist.setColumn(clsprow, "pid" , gv_pid );
  8881. ds_grd_clcjlist.setColumn(clsprow, "indd" , gv_indd1 );
  8882. ds_grd_clcjlist.setColumn(clsprow, "fromdd" , gv_fromdd );
  8883. ds_grd_clcjlist.setColumn(clsprow, "mskind" , gv_mskind );
  8884. ds_grd_clcjlist.setColumn(clsprow, "cretno" , gv_cretno );
  8885. if ( spclcd == "MT015" ) {
  8886. ds_grd_clcjlist.setColumn(clsprow, "detldesc", "제출자료코드/제출자료코드/... 형태로 입력");
  8887. } else {
  8888. ds_grd_clcjlist.setColumn(clsprow, "detldesc", "영문(200자), 한글(100자)");
  8889. }
  8890. ds_grd_clcjlist.setColumn(clsprow, "calcscorcd", "-");
  8891. ds_grd_clcjlist.setColumn(clsprow, "oldspclcd", spclcd);
  8892. ds_grd_clcjlist.setColumn(clsprow, "seqno", "");
  8893. addcnt++;
  8894. } else if ( rowstat == "U" ) {
  8895. for (var j = 0, rowcnt=ds_grd_clcjlist.rowcount; j <rowcnt; j++ ) {
  8896. var gridspclcd = ds_grd_clcjlist.getColumn(j, "spclcd");
  8897. var gridspclspec = ds_grd_clcjlist.getColumn(j, "spclspec");
  8898. var gridrowstatus = ds_grd_clcjlist.getRowType(j);
  8899. if ( gridspclcd == spclcd ) {
  8900. ds_grd_clcjlist.setColumn(j, "spclspec", spclspec);
  8901. if ( gridrowstatus == 2 ) {
  8902. ds_grd_clcjlist.setColumn(j, "rowstat", "I");
  8903. } else {
  8904. ds_grd_clcjlist.setColumn(j, "rowstat", "U");
  8905. ds_grd_clcjlist.setRowType(j, "U");
  8906. }
  8907. }
  8908. }
  8909. // 1-3. 삭제한다.
  8910. } else if ( rowstat == "D" ) {
  8911. for (var j = 0, rowcnt=ds_grd_clcjlist.rowcount; j < rowcnt; j++ ) {
  8912. var gridspclcd = ds_grd_clcjlist.getColumn(j, "spclcd");
  8913. var gridspclspec = ds_grd_clcjlist.getColumn(j, "spclspec");
  8914. var gridrowstatus = ds_grd_clcjlist.getRowType(j);
  8915. if ( gridspclcd == spclcd ) {
  8916. if ( gridrowstatus == 2 ) {
  8917. ds_grd_clcjlist.deleteRow(j);
  8918. ds_grd_clcjlist.setColumn(j, "rowstat", "R");
  8919. } else {
  8920. ds_grd_clcjlist.setRowType(j, "D");
  8921. ds_grd_clcjlist.setColumn(j, "rowstat", "D");
  8922. }
  8923. }
  8924. }
  8925. }
  8926. }
  8927. }
  8928. ds_grd_clcjlist.updatecontrol = true;
  8929. // 2. 소명자료가 추가되었을 경우에만 특정내역을 소트한다.
  8930. if ( addcnt > 0 ) {
  8931. fSortSpclNo();
  8932. // lf_fSpclGridInsertRow();
  8933. }
  8934. // 3. 소명자료 버튼 색을 변경한다.
  8935. var isAttachedDataList = false;
  8936. for (var m=0, rowcnt = ds_grd_clcjlist.rowcount; m<rowcnt && isAttachedDataList != true; m++ ) {
  8937. var spclcd = ds_grd_clcjlist.getColumn(m, "spclcd");
  8938. if ( spclcd == "MT015" || spclcd == "MT016") isAttachedDataList = true;
  8939. }
  8940. if ( isAttachedDataList ) {
  8941. btn_attData.class = "btn5";
  8942. btn_attData.style.color = "#cc3333";
  8943. btn_attData.style.font = "Dotum,9,bold";
  8944. } else {
  8945. btn_attData.class = "btn2";
  8946. btn_attData.style.color = "";
  8947. btn_attData.style.font = "";
  8948. }
  8949. }
  8950. function fSortSpclNo()
  8951. {
  8952. var rowcnt = ds_grd_clcjlist.rowcount;
  8953. if ( rowcnt > 0)
  8954. {
  8955. for ( var j = ds_grd_clcjlist.rowcount-1; j >= 0; j-- )
  8956. {
  8957. var rowstatus = ds_grd_clcjlist.getRowType(j);
  8958. var spclcd = ds_grd_clcjlist.getColumn(j, "spclcd");
  8959. var spclspec = ds_grd_clcjlist.getColumn(j, "spclspec");
  8960. // 특정코드과 특정내역이 입력되지 않은 경우
  8961. if ( rowstatus != 8 && utlf_isNull(spclcd) && utlf_isNull(spclspec))
  8962. {
  8963. // 줄을 삭제한다.
  8964. ds_grd_clcjlist.deleteRow(j);
  8965. j--;
  8966. } else {
  8967. // JS010(특정코드:야간가산)의 hhmm이 야간(18~09시)가 아니면 특정내역 Grid에 빨간색으로 표시
  8968. var cellcnt = swt_spclmemo.case_spclspec.grd_clcjlist.getCellCount('Body');
  8969. for ( var i = 0 ; i < cellcnt; i++ )
  8970. {
  8971. // ff3333=붉은색
  8972. colorExpr = "EXPR( spclcd == 'JS010' && test(spclspec) ? '#ff3333' : 'default'";
  8973. swt_spclmemo.case_spclspec.grd_clcjlist.setCellProperty('Body', i, "color", colorExpr);
  8974. }
  8975. }
  8976. }
  8977. ds_grd_clcjlist.keystring = "S:+clsoyn-unitflag+spclcd+edilnno";
  8978. swt_spclmemo.case_spclspec.grd_clcjlist.updateToDataset();
  8979. //swt_spclmemo_case_spclspec_rdo_unitflag_onitemchanged();
  8980. } else {
  8981. // 타이틀만 있는 경우 grd_clsphist.rows = 1
  8982. var selectedUnitFlag = ds_grd_clcjlist.getColumn(0, "selectedUnitFlag");
  8983. if ( selectedUnitFlag == "-" || selectedUnitFlag == "M" )
  8984. {
  8985. // 특정내역 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
  8986. fSpclGridInsertRow();
  8987. }
  8988. }
  8989. }
  8990. function btn_attData_onclick(obj:Button, e:ClickEventInfo)
  8991. {
  8992. fGetAttachedDataList();
  8993. }
  8994. function button1_onclick(obj:Button, e:ClickEventInfo)
  8995. {
  8996. fGetMemoHistList();
  8997. }
  8998. function fGetMemoHistList(flag)
  8999. {
  9000. if (!utlf_isNull(gv_patnm)) {
  9001. var objArg = new Object();
  9002. objArg.sPid = gv_pid;
  9003. objArg.sOrddeptcd = gv_orddeptcd;
  9004. objArg.sIoflag = "I";
  9005. objArg.sRefterm = "2";
  9006. objArg.sAnofildinclyn = "Y";
  9007. objArg.sFromdd = gv_indd1;
  9008. objArg.sTodd = gv_todd;
  9009. objArg.sOrdfildcd = "";
  9010. objArg.sPidsn = "";
  9011. objArg.sFlag = "Y";
  9012. // SPPIZ00300_메모이력조회.xrw
  9013. if (utlf_isNull(flag)) {
  9014. var rtn = frmf_open("SPPIZ00300","SPPIZ00300",objArg,"","","","","","","","","","M");
  9015. }
  9016. var SelectMemo = ds_rslt_sppiz00300.rowcount;
  9017. if (SelectMemo > 0 ) {
  9018. var choimemo = utlf_trim(ds_rslt_sppiz00300.getColumn(0, "choimemo"));
  9019. var choiedicd = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(0, "edicd"));
  9020. if (!utlf_isNull(choimemo)) {
  9021. ds_rslt_sppiz00300.setColumn(0, "choimemo", choimemo);
  9022. var destRef = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(0, "destRef"));
  9023. if (destRef == "judgmemo") {
  9024. var judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0, "judgrmk"));
  9025. for (var i=0; i < SelectMemo; i++){
  9026. choimemo = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(i, "choimemo"));
  9027. judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0, "judgrmk"));
  9028. ds_init_iteminfo.setColumn(0,"judgrmk", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + choimemo)
  9029. }
  9030. swt_spclmemo.tabindex = 1;
  9031. } else if (destRef == "edimemo") {
  9032. var judgmemo = ds_init_iteminfo.getColumn(0, "edirmk");
  9033. for (var i=0; i < SelectMemo; i++){
  9034. choimemo = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(i, "choimemo"));
  9035. judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0, "edirmk"));
  9036. ds_init_iteminfo.setColumn(0,"edirmk", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + choimemo)
  9037. }
  9038. swt_spclmemo.tabindex = 2;
  9039. } else if (destRef == "prcpmemo") {
  9040. for (var i=0; i < SelectMemo; i++){
  9041. var iscledicd = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(i, "edicd"));
  9042. var frow = ds_grd_ordlist.findRow("edicd", iscledicd, 0);
  9043. while(frow > -1){
  9044. ds_grd_ordlist.setColumn(frow,"text","*");
  9045. frow = ds_grd_ordlist.findRow("edicd", iscledicd, frow+1);
  9046. }
  9047. }
  9048. for (var i=0; i < SelectMemo; i++){
  9049. var edicd = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(i, "edicd"));
  9050. var choimemo = utlf_transNullToEmpty(ds_rslt_sppiz00300.getColumn(i, "choimemo"));
  9051. var frow = ds_grd_clcjlist.findRow("edicd", edicd, 0);
  9052. while(frow > -1){
  9053. var clcjedicd = utlf_transNullToEmpty(ds_grd_clcjlist.getColumn(frow, "edicd"));
  9054. var spclspec = utlf_transNullToEmpty(ds_grd_clcjlist.getColumn(frow, "spclspec"));
  9055. if (clcjedicd == edicd) {
  9056. var ans = sysf_messageBox("등록된 메모가 있습니다. 기존 내역에 추가할 경우 예(Yes) \n 새로운 내역으로 변경하시려면 아니오(No) 선택하여 주십시요", "S003"); ///수정사항이 있습니다. 저장하시려면 예(Yes)\n변경하시려면 아니오(No)
  9057. if (ans == 6) { // 6: yes
  9058. ds_grd_clcjlist.setColumn(frow, "spclspec" ,spclspec + "\n"+ choimemo);
  9059. }else if (ans == 7) { // 7:no
  9060. ds_grd_clcjlist.setColumn(frow, "spclspec" ,choimemo);
  9061. }else if (ans == 2) { // 2:cancel
  9062. }
  9063. }
  9064. frow = ds_grd_clcjlist.findRow("edicd", choimemo, frow+1);
  9065. }
  9066. }
  9067. }
  9068. }
  9069. }
  9070. ds_rslt_sppiz00300.clearData();
  9071. }
  9072. }
  9073. function fGetJudgEdiComment(memoflag, memocls)
  9074. {
  9075. var objArg = new Object();
  9076. objArg.sMemocls = memocls;
  9077. objArg.sMemoflag = memoflag;
  9078. objArg.sEdiitem1 = "";
  9079. var rtnObj = frmf_modal("SPPIZ00700","SPPIZ00700",objArg,"","","","","","","","","","M");
  9080. return rtnObj;
  9081. }
  9082. function swt_spclmemo_case_judgrmemo_btn_memohistory_onclick(obj:Button, e:ClickEventInfo)
  9083. {
  9084. var rtnObj = fGetJudgEdiComment("1", "");
  9085. var rtnrowcnt = rtnObj.rowcount;
  9086. for ( var i = 0; i < rtnrowcnt; i++ )
  9087. {
  9088. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9089. var judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"judgrmk"));
  9090. ds_init_iteminfo.setColumn(0,"judgrmk", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + memo);
  9091. }
  9092. }
  9093. function swt_spclmemo_case_judgrmemo_btn_memohistory_drug_onclick(obj:Button, e:ClickEventInfo)
  9094. {
  9095. var rtnObj = fGetJudgEdiComment("1", "01");
  9096. var rtnrowcnt = rtnObj.rowcount;
  9097. for ( var i = 0; i < rtnrowcnt; i++ )
  9098. {
  9099. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9100. var judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"judgrmk"));
  9101. ds_init_iteminfo.setColumn(0,"judgrmk", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + memo);
  9102. }
  9103. }
  9104. function swt_spclmemo_case_judgrmemo_btn_memohistory_injection_onclick(obj:Button, e:ClickEventInfo)
  9105. {
  9106. var rtnObj = fGetJudgEdiComment("1", "02");
  9107. var rtnrowcnt = rtnObj.rowcount;
  9108. for ( var i = 0; i < rtnrowcnt; i++ )
  9109. {
  9110. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9111. var judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"judgrmk"));
  9112. ds_init_iteminfo.setColumn(0,"judgrmk", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + memo);
  9113. }
  9114. }
  9115. function swt_spclmemo_case_judgrmemo_btn_memohistory_treat_onclick(obj:Button, e:ClickEventInfo)
  9116. {
  9117. var rtnObj = fGetJudgEdiComment("1", "03");
  9118. var rtnrowcnt = rtnObj.rowcount;
  9119. for ( var i = 0; i < rtnrowcnt; i++ )
  9120. {
  9121. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9122. var judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"judgrmk"));
  9123. ds_init_iteminfo.setColumn(0,"judgrmk", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + memo);
  9124. }
  9125. }
  9126. function swt_spclmemo_case_judgrmemo_btn_memohistory_exam_onclick(obj:Button, e:ClickEventInfo)
  9127. {
  9128. var rtnObj = fGetJudgEdiComment("1", "04");
  9129. var rtnrowcnt = rtnObj.rowcount;
  9130. for ( var i = 0; i < rtnrowcnt; i++ )
  9131. {
  9132. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9133. var judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"judgrmk"));
  9134. ds_init_iteminfo.setColumn(0,"judgrmk", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + memo);
  9135. }
  9136. }
  9137. function swt_spclmemo_case_judgrmemo_btn_memohistory_etc_onclick(obj:Button, e:ClickEventInfo)
  9138. {
  9139. var rtnObj = fGetJudgEdiComment("1", "99");
  9140. var rtnrowcnt = rtnObj.rowcount;
  9141. for ( var i = 0; i < rtnrowcnt; i++ )
  9142. {
  9143. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9144. var judgmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"judgrmk"));
  9145. ds_init_iteminfo.setColumn(0,"judgrmk", judgmemo + (utlf_isNull(judgmemo) ? "" : " \n") + memo);
  9146. }
  9147. }
  9148. function swt_spclmemo_case_judgrmemo_btn_toclammemo_onclick(obj:Button, e:ClickEventInfo)
  9149. {
  9150. var edirmk = ds_init_iteminfo.getColumn(0,"edirmk");
  9151. var judgmemo = ds_init_iteminfo.getColumn(0,"judgrmk");
  9152. ds_init_iteminfo.setColumn(0,"edirmk", edirmk + (utlf_isNull(edirmk) ? "" : " \n") + judgmemo)
  9153. swt_spclmemo.tabindex = 2;
  9154. }
  9155. function swt_spclmemo_case_judgrmemo_btn_clearjudgrmemo_onclick(obj:Button, e:ClickEventInfo)
  9156. {
  9157. ds_init_iteminfo.setColumn(0,"judgrmk", "");
  9158. }
  9159. function swt_spclmemo_case_ediclammemo_btn_memoedi_onclick(obj:Button, e:ClickEventInfo)
  9160. {
  9161. var rtnObj = fGetJudgEdiComment("2", "");
  9162. var rtnrowcnt = rtnObj.rowcount;
  9163. for ( var i = 0; i < rtnrowcnt; i++ )
  9164. {
  9165. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9166. var edimemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"edirmk"));
  9167. ds_init_iteminfo.setColumn(0,"edirmk", edimemo + (utlf_isNull(edimemo) ? "" : " \n") + memo);
  9168. }
  9169. }
  9170. function swt_spclmemo_case_ediclammemo_btn_memoedi_drug_onclick(obj:Button, e:ClickEventInfo)
  9171. {
  9172. var rtnObj = fGetJudgEdiComment("2", "01");
  9173. var rtnrowcnt = rtnObj.rowcount;
  9174. for ( var i = 0; i < rtnrowcnt; i++ )
  9175. {
  9176. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9177. var edimemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"edirmk"));
  9178. ds_init_iteminfo.setColumn(0,"edirmk", edimemo + (utlf_isNull(edimemo) ? "" : " \n") + memo);
  9179. }
  9180. }
  9181. function swt_spclmemo_case_ediclammemo_btn_memoedi_injection_onclick(obj:Button, e:ClickEventInfo)
  9182. {
  9183. var rtnObj = fGetJudgEdiComment("2", "02");
  9184. var rtnrowcnt = rtnObj.rowcount;
  9185. for ( var i = 0; i < rtnrowcnt; i++ )
  9186. {
  9187. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9188. var edimemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"edirmk"));
  9189. ds_init_iteminfo.setColumn(0,"edirmk", edimemo + (utlf_isNull(edimemo) ? "" : " \n") + memo);
  9190. }
  9191. }
  9192. function swt_spclmemo_case_ediclammemo_btn_memoedi_treat_onclick(obj:Button, e:ClickEventInfo)
  9193. {
  9194. var rtnObj = fGetJudgEdiComment("2", "03");
  9195. var rtnrowcnt = rtnObj.rowcount;
  9196. for ( var i = 0; i < rtnrowcnt; i++ )
  9197. {
  9198. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9199. var edimemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"edirmk"));
  9200. ds_init_iteminfo.setColumn(0,"edirmk", edimemo + (utlf_isNull(edimemo) ? "" : " \n") + memo);
  9201. }
  9202. }
  9203. function swt_spclmemo_case_ediclammemo_btn_memoedi_exam_onclick(obj:Button, e:ClickEventInfo)
  9204. {
  9205. var rtnObj = fGetJudgEdiComment("2", "04");
  9206. var rtnrowcnt = rtnObj.rowcount;
  9207. for ( var i = 0; i < rtnrowcnt; i++ )
  9208. {
  9209. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9210. var edimemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"edirmk"));
  9211. ds_init_iteminfo.setColumn(0,"edirmk", edimemo + (utlf_isNull(edimemo) ? "" : " \n") + memo);
  9212. }
  9213. }
  9214. function swt_spclmemo_case_ediclammemo_btn_memoedi_etc_onclick(obj:Button, e:ClickEventInfo)
  9215. {
  9216. var rtnObj = fGetJudgEdiComment("2", "99");
  9217. var rtnrowcnt = rtnObj.rowcount;
  9218. for ( var i = 0; i < rtnrowcnt; i++ )
  9219. {
  9220. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9221. var edimemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"edirmk"));
  9222. ds_init_iteminfo.setColumn(0,"edirmk", edimemo + (utlf_isNull(edimemo) ? "" : " \n") + memo);
  9223. }
  9224. }
  9225. function swt_spclmemo_case_ediclammemo_button4_onclick(obj:Button, e:ClickEventInfo)
  9226. {
  9227. ds_init_iteminfo.setColumn(0,"edirmk", "");
  9228. }
  9229. function swt_spclmemo_case_judgrmemo_btn_savejudgrmemo_onclick(obj:Button, e:ClickEventInfo)
  9230. {
  9231. fSaveJudgrmk();
  9232. }
  9233. function swt_spclmemo_case_ediclammemo_btn_saveedimemo_onclick(obj:Button, e:ClickEventInfo)
  9234. {
  9235. fSaveJudgrmk();
  9236. }
  9237. function swt_spclmemo_case_tstmemo_btn_memotst_onclick(obj:Button, e:ClickEventInfo)
  9238. {
  9239. var rtnObj = fGetJudgEdiComment("6", "11");
  9240. var rtnrowcnt = rtnObj.rowcount;
  9241. for ( var i = 0; i < rtnrowcnt; i++ )
  9242. {
  9243. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9244. var tstmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"tstrmk"));
  9245. ds_init_iteminfo.setColumn(0,"tstrmk", tstmemo + (utlf_isNull(tstmemo) ? "" : " \n") + memo);
  9246. }
  9247. }
  9248. function swt_spclmemo_case_tstmemo_btn_memotst_ami_onclick(obj:Button, e:ClickEventInfo)
  9249. {
  9250. var rtnObj = fGetJudgEdiComment("6", "12");
  9251. var rtnrowcnt = rtnObj.rowcount;
  9252. for ( var i = 0; i < rtnrowcnt; i++ )
  9253. {
  9254. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9255. var tstmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"tstrmk"));
  9256. ds_init_iteminfo.setColumn(0,"tstrmk", tstmemo + (utlf_isNull(tstmemo) ? "" : " \n") + memo);
  9257. }
  9258. }
  9259. function swt_spclmemo_case_tstmemo_button8_onclick(obj:Button, e:ClickEventInfo)
  9260. {
  9261. var rtnObj = fGetJudgEdiComment("6", "13");
  9262. var rtnrowcnt = rtnObj.rowcount;
  9263. for ( var i = 0; i < rtnrowcnt; i++ )
  9264. {
  9265. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9266. var tstmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"tstrmk"));
  9267. ds_init_iteminfo.setColumn(0,"tstrmk", tstmemo + (utlf_isNull(tstmemo) ? "" : " \n") + memo);
  9268. }
  9269. }
  9270. function swt_spclmemo_case_tstmemo_button9_onclick(obj:Button, e:ClickEventInfo)
  9271. {
  9272. var rtnObj = fGetJudgEdiComment("6", "14");
  9273. var rtnrowcnt = rtnObj.rowcount;
  9274. for ( var i = 0; i < rtnrowcnt; i++ )
  9275. {
  9276. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9277. var tstmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"tstrmk"));
  9278. ds_init_iteminfo.setColumn(0,"tstrmk", tstmemo + (utlf_isNull(tstmemo) ? "" : " \n") + memo);
  9279. }
  9280. }
  9281. function swt_spclmemo_case_tstmemo_button11_onclick(obj:Button, e:ClickEventInfo)
  9282. {
  9283. var rtnObj = fGetJudgEdiComment("6", "15");
  9284. var rtnrowcnt = rtnObj.rowcount;
  9285. for ( var i = 0; i < rtnrowcnt; i++ )
  9286. {
  9287. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9288. var tstmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"tstrmk"));
  9289. ds_init_iteminfo.setColumn(0,"tstrmk", tstmemo + (utlf_isNull(tstmemo) ? "" : " \n") + memo);
  9290. }
  9291. }
  9292. function swt_spclmemo_case_tstmemo_button12_onclick(obj:Button, e:ClickEventInfo)
  9293. {
  9294. var rtnObj = fGetJudgEdiComment("6", "16");
  9295. var rtnrowcnt = rtnObj.rowcount;
  9296. for ( var i = 0; i < rtnrowcnt; i++ )
  9297. {
  9298. var memo = utlf_transNullToEmpty(rtnObj.getColumn(i, "memo"));
  9299. var tstmemo = utlf_transNullToEmpty(ds_init_iteminfo.getColumn(0,"tstrmk"));
  9300. ds_init_iteminfo.setColumn(0,"tstrmk", tstmemo + (utlf_isNull(tstmemo) ? "" : " \n") + memo);
  9301. }
  9302. }
  9303. function swt_spclmemo_case_tstmemo_button14_onclick(obj:Button, e:ClickEventInfo)
  9304. {
  9305. ds_init_iteminfo.setColumn(0,"tstrmk", "");
  9306. }
  9307. function swt_spclmemo_case_tstmemo_button13_onclick(obj:Button, e:ClickEventInfo)
  9308. {
  9309. fSaveJudgrmk();
  9310. }
  9311. function caption23_onclick(obj:Static, e:ClickEventInfo)
  9312. {
  9313. if (swt_spclmemo_cwidth == swt_spclmemo.position.width){
  9314. swt_spclmemo.position.width = 757;
  9315. caption23.class = "tit_1";
  9316. } else {
  9317. caption23.class = "tit_2";
  9318. swt_spclmemo.position.width = swt_spclmemo_cwidth;
  9319. }
  9320. }
  9321. function swt_spclmemo_case_spclspec_btn_savespcllist_onclick(obj:Button, e:ClickEventInfo)
  9322. {
  9323. }
  9324. function btn_patdnor_onclick(obj:Button, e:ClickEventInfo)
  9325. {
  9326. fChangePatdnor();
  9327. }
  9328. function fChangePatdnor() {
  9329. var nodecnt = ds_init_patdnorinfo.rowcount;
  9330. var currow = ds_init_patdnorinfo.rowposition;
  9331. if (currow == -1) {
  9332. currow == null;
  9333. }
  9334. if(nodecnt > 1){
  9335. grp_dnor.position.x = 150;
  9336. grp_dnor.position.y = 150;
  9337. grp_dnor.visible = true;
  9338. }else{
  9339. // 공여자 수혜자간 조회 전환
  9340. var pid = ds_init_patdnorinfo.getColumn(currow,"pid");
  9341. var hngnm = ds_init_patdnorinfo.getColumn(currow,"hngnm");
  9342. var patdnorflag = ds_init_patdnorinfo.getColumn(currow,"patdnorflag");
  9343. var patdnorpid = ds_init_patdnorinfo.getColumn(currow,"patdnorpid");
  9344. var patdnorhngnm = ds_init_patdnorinfo.getColumn(currow,"patdnorhngnm");
  9345. var indd = ds_init_patdnorinfo.getColumn(currow,"indd");
  9346. var mskind = ds_init_patdnorinfo.getColumn(currow,"mskind");
  9347. var fromdd = ds_init_patdnorinfo.getColumn(currow,"fromdd");
  9348. var todd = ds_init_patdnorinfo.getColumn(currow,"todd");
  9349. var insukind = ds_init_patdnorinfo.getColumn(currow,"insukind");
  9350. var suppkind = ds_init_patdnorinfo.getColumn(currow,"suppkind");
  9351. var cretno = ds_init_patdnorinfo.getColumn(currow,"cretno");
  9352. var seqno = ds_init_patdnorinfo.getColumn(currow,"seqno");
  9353. // 현재 심사 화면의 환자가 수여자면 공여자버튼, 공여자이면 수여자 버튼이 생기는데
  9354. // 수여자는 공여자든 환자기준이면 그환자의 수여,공여번호는 무조건 patdnorpid가 된다.
  9355. // 그래서 무조건 patdnorpid로 조회하면된다.
  9356. ds_init_iteminfo.setColumn(0,"pid", patdnorpid);
  9357. ds_init_iteminfo.setColumn(0,"indd", indd);
  9358. ds_send.setColumn(0, "pid", pid);
  9359. ds_send.setColumn(0, "indd", indd);
  9360. ds_send.setColumn(0, "mskind", mskind);
  9361. ds_send.setColumn(0, "fromdd", fromdd);
  9362. ds_send.setColumn(0, "todd", todd);
  9363. ds_send.setColumn(0, "insukind", insukind);
  9364. ds_send.setColumn(0, "suppkind", suppkind);
  9365. ds_send.setColumn(0, "cretno", cretno);
  9366. ds_send.setColumn(0, "seqno", seqno);
  9367. ds_send.setColumn(0, "ordfromdd", fromdd);
  9368. ds_send.setColumn(0, "ordtodd", todd);
  9369. // 20090728 JHP, 수정추가 처방조회시 기간이 변경되어 각 파트별로 구분자파라미터 두어서 구분한다.
  9370. fGetItemInfo("IPHS");
  9371. }
  9372. }
  9373. function Button00_onclick(obj:Button, e:ClickEventInfo)
  9374. {
  9375. grp_dnor.visible = false;
  9376. }
  9377. function grp_dnor_grd_dnor_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  9378. {
  9379. fChangePatdnor();
  9380. }
  9381. function btn_esscdiag_onclick(obj:Button, e:ClickEventInfo)
  9382. {
  9383. fesscdiag();
  9384. }
  9385. function btn_babymother_onclick(obj:Button, e:ClickEventInfo)
  9386. {
  9387. var readonly = ds_send.getColumn(0, "readonly");
  9388. if(gv_patnm){
  9389. var fromdd = "";
  9390. var todd = ""
  9391. var seqno = gv_seqno;
  9392. var rowcnt = ds_grd_insuhistory.rowcount;
  9393. for (var i = 0; i < rowcnt; i++) {
  9394. var suppkind = ds_grd_insuhistory.getColumn(i, "suppkind");
  9395. if (suppkind == "09" || suppkind == "42") {
  9396. fromdd = ds_grd_insuhistory.getColumn(i, "fromdd");
  9397. todd = ds_grd_insuhistory.getColumn(i, "todd");
  9398. seqno = ds_grd_insuhistory.getColumn(i, "seqno");
  9399. }
  9400. }
  9401. //fromdd 와 todd 에 값이 있으면 면제기간 적용된 환자임을 알려주는 flag 세팅
  9402. if (!utlf_isNull(fromdd) && !utlf_isNull(todd))
  9403. ds_cond_sppiz01200.setColumn(0, "saveyn", "Y");
  9404. } else {
  9405. ds_cond_sppiz01200.setColumn(0, "saveyn", "N");
  9406. }
  9407. ds_cond_sppiz01200.setColumn(0, "pid" , gv_pid);
  9408. ds_cond_sppiz01200.setColumn(0, "indd" , gv_indd1);
  9409. ds_cond_sppiz01200.setColumn(0, "cretno" , gv_cretno);
  9410. ds_cond_sppiz01200.setColumn(0, "mskind" , gv_mskind);
  9411. ds_cond_sppiz01200.setColumn(0, "brateflag" , gv_brateflag);
  9412. ds_cond_sppiz01200.setColumn(0, "brthdd" , gv_brthdd);
  9413. ds_cond_sppiz01200.setColumn(0, "dschnotidt", gv_dschnotidt);
  9414. ds_cond_sppiz01200.setColumn(0, "dschnotiyn", gv_dschnotiyn);
  9415. ds_cond_sppiz01200.setColumn(0, "calcbasedd", "-");
  9416. ds_cond_sppiz01200.setColumn(0, "seqno" , seqno);
  9417. ds_cond_sppiz01200.setColumn(0, "cfe" , gv_cfe);
  9418. ds_cond_sppiz01200.setColumn(0, "insukind" , gv_insukindcd);
  9419. // 심사마감이나 퇴원한 환자는 면제일자적용이나 해제를 시킬 수 없다.
  9420. // 기존에는 심사마감이나 퇴원여부를 인스턴스에서 가져오던 것을 실시간 체크로 변경
  9421. dsf_createDsRow("ds_cond_req", [
  9422. {col:"pid", type:"STRING", size:256, val:gv_pid}
  9423. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  9424. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  9425. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  9426. , {col:"checkyn", type:"STRING", size:256, val:"N"}
  9427. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  9428. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  9429. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  9430. ]);
  9431. var oParam = {};
  9432. oParam.id = "TRPIJ00315";
  9433. oParam.service = "bfjudgapp.InHospJudg";
  9434. oParam.method = "reqNotiDschStat";
  9435. oParam.inds = "req=ds_cond_req";
  9436. oParam.outds = "ds_endcnclstat_item11=endcnclstat ds_recal=recal";
  9437. oParam.async = false;
  9438. oParam.callback = "cf_TRPIJ00315";
  9439. tranf_submit(oParam);
  9440. if (gv_lastmdlclamdd > gv_fromdd && !utlf_isNull(gv_lastmdlclamdd)) {
  9441. ds_cond_sppiz01200.setColumn(0, "saveyn", "Y");
  9442. }
  9443. if (gv_dschjudgprcsstat == "C" || gv_dschjudgprcsstat == "E" || gv_indschacptstat == "D") {
  9444. ds_cond_sppiz01200.setColumn(0, "saveyn", "Y");
  9445. } else {
  9446. ds_cond_sppiz01200.setColumn(0, "saveyn", "n");
  9447. }
  9448. if (gv_sixtimyn == "Y") {
  9449. sysf_messageBox("6시간 미만 상태 입니다. 자연분만 요율을 설정(저장) ","E001");
  9450. ds_cond_sppiz01200.setColumn(0, "readonly", "Y");
  9451. }
  9452. ds_cond_sppiz01200.setColumn(0, "fromdd", gv_fromdd);
  9453. ds_cond_sppiz01200.setColumn(0, "todd", todd);
  9454. var trgtManWindow = frmf_findPopup("SPPIZ01200");
  9455. if (utlf_isNull(trgtManWindow))
  9456. {
  9457. frmf_modal("SPPIZ01200","SPPIZ01200",{objDs:ds_cond_sppiz01200},"","","","","","","","","","M");
  9458. }else {
  9459. frmf_setFocusPop("SPPIZ01200");
  9460. }
  9461. }
  9462. function btn_operdiag_onclick(obj:Button, e:ClickEventInfo)
  9463. {
  9464. if(gv_patnm){
  9465. var trgtManWindow = frmf_findPopup("SPPIZ01300");
  9466. ds_cond_sppiz01300.setColumn(0,"pid", gv_pid);
  9467. ds_cond_sppiz01300.setColumn(0,"indd", gv_indd1);
  9468. ds_cond_sppiz01300.setColumn(0,"cretno", gv_cretno);
  9469. if (utlf_isNull(trgtManWindow))
  9470. {
  9471. frmf_open("SPPIZ01300","SPPIZ01300",{objDs:ds_cond_sppiz01300},"","","","","","","","","","M");
  9472. } else {
  9473. frmf_setFocusPop("SPPIZ01300");
  9474. }
  9475. }
  9476. }
  9477. function btn_clamdiag_onclick(obj:Button, e:ClickEventInfo)
  9478. {
  9479. fGetClamDiagHistList();
  9480. }
  9481. function fGetClamDiagHistList() {
  9482. ds_hidden_smpiz00100_rslt.clearData();
  9483. if(gv_patnm){
  9484. // 심사대상자의 등록번호를 조건으로 하여 전체 청구 상병이력을 조회한다.
  9485. ds_cond_smpiz00100.clearData();
  9486. ds_cond_smpiz00100.addRow();
  9487. ds_cond_smpiz00100.setColumn(0, "pid" , ds_init_iteminfo.getColumn(0, "pid"));
  9488. ds_cond_smpiz00100.setColumn(0, "ordfromdd" , ds_init_iteminfo.getColumn(0, "indd1"));
  9489. ds_cond_smpiz00100.setColumn(0, "ordtodd" , ds_init_iteminfo.getColumn(0, "dschdd"));
  9490. ds_cond_smpiz00100.setColumn(0, "srchflag" , "pam"); // 검색구분 Radio : 청구
  9491. var objArg = new Object();
  9492. objArg.sPid = ds_init_iteminfo.getColumn(0, "pid");
  9493. objArg.sIoflag = "";
  9494. var rtn = frmf_modal("SMPIZ00100","SMPIZ00100", objArg, "", "", "", "", "", "", "", "", "", "M"); // SMPIZ00100_외래입원상병이력조회
  9495. var rsltNode = ds_hidden_smpiz00100_rslt.rowcount;
  9496. if ( rsltNode > 0 ) {
  9497. for (var i = 0; i < rsltNode; i++) {
  9498. var diagcd = ds_hidden_smpiz00100_rslt.getColumn(i, "diagcd");
  9499. var isSame = false;
  9500. var diagorddeptcd;
  9501. var diagseq;
  9502. var rowcnt = ds_grd_diaglist.rowcount;
  9503. for (var j = 0; j < rowcnt; j++) {
  9504. if (diagcd == ds_grd_diaglist.getColumn(j, "diagcd")) {
  9505. // 동일한 상병이 존재하는 경우
  9506. isSame = true;
  9507. j = ds_grd_diaglist.rowcount;
  9508. }
  9509. }
  9510. // 동일한 상병이 없는 경우
  9511. if (isSame == false) {
  9512. var insrow = fDiagGridInsertRow();
  9513. ds_grd_diaglist.setColumn(insrow, "diagcd", diagcd);
  9514. ds_grd_diaglist.setColumn(insrow, "diagnm", ds_hidden_smpiz00100_rslt.getColumn(i, "diaghngnm"));
  9515. ds_grd_diaglist.setColumn(insrow, "diagengnm", ds_hidden_smpiz00100_rslt.getColumn(i, "diagengnm"));
  9516. var ruleoutyn = ds_hidden_smpiz00100_rslt.getColumn(i, "diagkindcd");
  9517. if(ruleoutyn == "C"){
  9518. ds_grd_diaglist.setColumn(insrow, "ruleoutyn", "false");
  9519. }else{
  9520. ds_grd_diaglist.setColumn(insrow, "ruleoutyn", "true");
  9521. }
  9522. diagorddeptcd = ds_grd_diaglist.getColumn(0, "orddeptcd");
  9523. if (utlf_isNull(diagorddeptcd)) {
  9524. diagorddeptcd = ds_init_iteminfo.getColumn(0, "orddeptcd");
  9525. }
  9526. ds_grd_diaglist.setColumn(insrow, "orddeptcd", diagorddeptcd);
  9527. ds_grd_diaglist.setColumn(insrow, "ordfromdd", ds_grd_diaglist.getColumn(0, "ordfromdd"));
  9528. ds_grd_diaglist.setColumn(insrow, "toot", "-");
  9529. ds_grd_diaglist.setColumn(insrow, "toot1", "-");
  9530. var frow = ds_lglydisinfo.findRowExpr("fromdiag<='" + diagcd + "' && todiag>='" + diagcd + "'");
  9531. if (frow > -1){
  9532. lf_setAlramMessage("상병코드: " + diagcd + " 법정전염병 상병입니다. 확인하십시오.");
  9533. }
  9534. }
  9535. }
  9536. }
  9537. fDiagGridInsertRow();
  9538. }
  9539. }
  9540. function fDiagGridDeleteRow()
  9541. {
  9542. // 여러 row를 동시에 선택하고 삭제하는 기능을 부여한다.
  9543. var rowcnt = ds_grd_diaglist.rowcount;
  9544. for ( var i = rowcnt-1; i >= 0; i-- )
  9545. {
  9546. var sRow = ds_grd_diaglist.getSelect(i);
  9547. if ( sRow == true )
  9548. {
  9549. var diagcd = ds_grd_diaglist.getColumn(i,"diagcd");
  9550. var frow = ds_lglydisinfo.findRowExpr("fromdiag<='" + diagcd + "' && todiag>='" + diagcd + "'");
  9551. if (frow > -1){
  9552. lf_setAlramMessage("상병코드: " + diagcd + " 법정전염병 상병입니다. 확인하십시오.");
  9553. }
  9554. var rowstatus = ds_grd_diaglist.getRowType(i);
  9555. if ( rowstatus == 8 ){
  9556. } else if ( rowstatus == 2 ) {
  9557. ds_grd_diaglist.deleteRow(i);
  9558. } else {
  9559. var arrPostion = new Array();
  9560. arrPostion[0] = i;
  9561. grdf_setStatus(grd_diaglist, "D", arrPostion);
  9562. ds_grd_diaglist.deleteRow(i);
  9563. }
  9564. }
  9565. }
  9566. fSortDiagNo2();
  9567. }
  9568. function btn_refreshdiag_onclick(obj:Button, e:ClickEventInfo)
  9569. {
  9570. fSearchDiageCode();
  9571. }
  9572. function cf_TRPIJ00344(sSvcId, nErrorCode, sErrorMsg) {
  9573. if(nErrorCode < 0) {
  9574. sysf_messageBox("데이터 가","I004");
  9575. return;
  9576. }
  9577. if (ds_init_obgydiag.getColumn(0,"obgydiagyn") == "Y"){
  9578. lf_setAlramMessage("35세 이상 고위험 임신부 입원진료 내역입니다!! 확인하십시오.");
  9579. }
  9580. }
  9581. function fSetColorSpclJudgOrder(){
  9582. var ediitem2 = "";
  9583. var color = "#ffffff";
  9584. var outdate = gv_eroutdt.toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm");
  9585. var in24date = gv_erindt.toDate("YYYYMMDDhhmm").getAddDate(24,"h").getDateFormat("YYYYMMDDhhmm");
  9586. var basedate = "";
  9587. var execddtm = "";
  9588. var rowcnt = ds_grd_ordlist.rowcount;
  9589. if (outdate < in24date ) {
  9590. basedate = outdate;
  9591. } else {
  9592. basedate = in24date;
  9593. }
  9594. for (var i = 0; i < rowcnt; i++) { // Grid 필터링 이후 Grid 상에 표시된 처방 개수만큼 돌면서
  9595. var ediitem1 = ds_grd_ordlist.getColumn(i, "item1");
  9596. var execddtm = ds_grd_ordlist.getColumn(i, "execddtm");
  9597. var estmmeancd = utlf_transNullToEmpty(ds_grd_ordlist.getColumn(i, "estmmeancd")).substr(1, 1);
  9598. var calcpayflag = ds_grd_ordlist.getColumn(i, "calcpayflag");
  9599. var pynpy = ds_grd_ordlist.getColumn(i, "pynpy");
  9600. var bfjudgyn = ds_grd_ordlist.getColumn(i, "bfjudgyn");
  9601. var pordarcptyn = ds_grd_ordlist.getColumn(i, "pordarcptyn");
  9602. var drgopyn = ds_grd_ordlist.getColumn(i, "drgopyn");
  9603. var pay100 = ds_grd_ordlist.getColumn(i, "pay100");
  9604. if (ediitem1.length > 0 && grp_calc.chk_showitemcoloryn.value == "Y") {
  9605. if (ediitem1 == ediitem2) {
  9606. ds_grd_ordlist.setColumn(i,"bgcolor", color);
  9607. } else {
  9608. ediitem2 = ediitem1;
  9609. if (color == "#ffffff") {
  9610. ds_grd_ordlist.setColumn(i,"bgcolor", "#f4f4f4");
  9611. color = "#f4f4f4";
  9612. } else {
  9613. ds_grd_ordlist.setColumn(i,"bgcolor", "#ffffff");
  9614. color = "#ffffff";
  9615. }
  9616. }
  9617. } else {
  9618. ds_grd_ordlist.setColumn(i,"bgcolor", color);
  9619. }
  9620. if (estmmeancd == 1
  9621. || estmmeancd == 5
  9622. || (estmmeancd == 2 && execddtm > basedate)
  9623. || (estmmeancd == 3 && execddtm > basedate)
  9624. || (estmmeancd == "P" && execddtm > basedate)
  9625. || (estmmeancd == "Q" && execddtm > basedate)
  9626. ){
  9627. ds_grd_ordlist.setColumn(i,"estmmeancd_bgcolor", "#ffff00");
  9628. } else {
  9629. ds_grd_ordlist.setColumn(i,"estmmeancd_bgcolor", color);
  9630. }
  9631. if (calcpayflag == 1){
  9632. ds_grd_ordlist.setColumn(i,"calcpayflag_bgcolor", "#00ff00");
  9633. } else if (calcpayflag == 2 && pynpy != 0) {
  9634. ds_grd_ordlist.setColumn(i,"calcpayflag_bgcolor", "#ccccff");
  9635. } else if (calcpayflag == 2 && pynpy == 0) {
  9636. ds_grd_ordlist.setColumn(i,"calcpayflag_bgcolor", "#ff99cc");
  9637. } else {
  9638. ds_grd_ordlist.setColumn(i,"calcpayflag_bgcolor", color);
  9639. }
  9640. // 외래 필수심사 품목 표기
  9641. if (bfjudgyn == "Y" ) {
  9642. ds_grd_ordlist.setColumn(i,"bfjudgyn_bgcolor", "#f7a08b");
  9643. } else {
  9644. ds_grd_ordlist.setColumn(i,"bfjudgyn_bgcolor", color);
  9645. }
  9646. // 응급수가 표기 : 별표1 (2015.12.30.LEJ)
  9647. if (pordarcptyn == "1" ) {
  9648. if ( execddtm < outdate) {
  9649. ds_grd_ordlist.setColumn(i,"pordarcptyn_bgcolor", "#46AAFF");
  9650. }
  9651. } else if (pordarcptyn == "2" ) {
  9652. if ( execddtm < basedate && execddtm < outdate) {
  9653. ds_grd_ordlist.setColumn(i,"pordarcptyn_bgcolor", "#FFB4EB");
  9654. }
  9655. } else if (pordarcptyn == "3" ) {
  9656. if ( execddtm < basedate) {
  9657. ds_grd_ordlist.setColumn(i,"pordarcptyn_bgcolor", "#5EC75E");
  9658. }
  9659. } else {
  9660. ds_grd_ordlist.setColumn(i,"pordarcptyn_bgcolor", color);
  9661. }
  9662. //DRG 수술구분
  9663. if (drgopyn == "Y" ) {
  9664. ds_grd_ordlist.setColumn(i,"drgopyn_bgcolor", "#fec34d");
  9665. } else {
  9666. if (pay100=='50' || pay100=='80' || pay100=='30' || pay100=='90'){
  9667. ds_grd_ordlist.setColumn(i,"drgopyn_bgcolor", "#00ff00");
  9668. } else {
  9669. ds_grd_ordlist.setColumn(i,"drgopyn_bgcolor", color);
  9670. }
  9671. }
  9672. }
  9673. }
  9674. function fSetTextSpclJudgOrder(edicd, snglcalcscorcd)
  9675. {
  9676. if (ds_grd_clcjlist.findRowExpr("unitflag=='J' && spclcd!='JT001' && edicd=='"+edicd+"' && calcscorcd=='"+snglcalcscorcd+"'") > -1 )
  9677. {
  9678. return "*";
  9679. }
  9680. else if(ds_grd_clcjlist.findRowExpr("unitflag=='J' && spclcd=='JX999' && edicd=='"+edicd+"' && calcscorcd=='"+snglcalcscorcd+"'") > -1 )
  9681. {
  9682. return "#";
  9683. }
  9684. else {
  9685. return "";
  9686. }
  9687. }
  9688. function fSetCnfmcdSpclJudgOrder(row, edicd, cnfmcd) {
  9689. var spclspec = ds_grd_clcjlist.lookupExpr("unitflag=='J' && spclcd=='JT001' && edicd=='"+edicd+"'","spclspec");
  9690. if (!utlf_isNull(spclspec)) {
  9691. return spclspec;
  9692. } else {
  9693. return utlf_transNullToEmpty(cnfmcd);
  9694. }
  9695. }
  9696. function group7_caption96_onclick(obj:Static, e:ClickEventInfo)
  9697. {
  9698. }
  9699. function grp_calc_button3_onclick(obj:Button, e:ClickEventInfo)
  9700. {
  9701. if(gv_patnm){
  9702. fGetIsclList("IPHS", "Y");
  9703. }
  9704. }
  9705. function fGetCalc(showyn) {
  9706. gv_reshowyn = showyn;
  9707. ds_itemcalc.clearData();
  9708. var oParam = {};
  9709. oParam.id = "TRPIJ00335";
  9710. oParam.service = "bfjudgapp.InHospJudg";
  9711. oParam.method = "reqGetInHospJudgCalc";
  9712. oParam.inds = "req=ds_send";
  9713. oParam.outds = "ds_itemcalc=itemcalc";
  9714. oParam.async = true;
  9715. oParam.callback = "cf_TRPIJ00335";
  9716. tranf_submit(oParam);
  9717. }
  9718. function cf_TRPIJ00345(sSvcId, nErrorCode, sErrorMsg) {
  9719. if(nErrorCode < 0) {alert("에러cf_TRPIJ00345"); return;}
  9720. if (ds_goso.rowcount > 0) {
  9721. lf_setAlramMessage("외출외박 24시간 초과된 완화의료 대상 환자입니다. 해당 일자의 입원료를 확인하십시오.");
  9722. }
  9723. }
  9724. function grp_calc_caption01_onclick(obj:Static, e:ClickEventInfo)
  9725. {
  9726. }
  9727. function grp_calc_rdo_actmatflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  9728. {
  9729. if(gv_patnm){
  9730. if (utlf_isNull(obj.value) || obj.value == "-") { // 전체dml
  9731. ds_hidden_list1_isclcond.setColumn(0,"matractflag","");
  9732. } else if (obj.value == "1") {
  9733. ds_hidden_list1_isclcond.setColumn(0,"matractflag", " (matractflag == '0' || matractflag == '1' || matractflag == '4') ","");
  9734. } else {
  9735. ds_hidden_list1_isclcond.setColumn(0,"matractflag", " (matractflag == '2' || matractflag == '3') ","");
  9736. }
  9737. fGetSelectedOrderData();
  9738. }
  9739. }
  9740. function grp_calc_rdo_insuflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  9741. {
  9742. if(gv_patnm){
  9743. if (utlf_isNull(obj.value) || obj.value == "-") { // 전체
  9744. ds_hidden_list1_isclcond.setColumn(0,"calcpayflag","");
  9745. } else {
  9746. ds_hidden_list1_isclcond.setColumn(0,"calcpayflag", "calcpayflag == '"+obj.value+"'","");
  9747. }
  9748. fGetSelectedOrderData();
  9749. }
  9750. }
  9751. function grp_calc_rdo_zerofilter_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  9752. {
  9753. if(gv_patnm){
  9754. if (utlf_isNull(obj.value) || obj.value == "-") { // 전체
  9755. ds_hidden_list1_isclcond.setColumn(0,"calcamtflag","");
  9756. } else if (obj.value == "1") {
  9757. ds_hidden_list1_isclcond.setColumn(0,"calcamtflag", " calcamt == '0' ","");
  9758. } else {
  9759. ds_hidden_list1_isclcond.setColumn(0,"calcamtflag", " calcamt != '0' || matractflag == '0' ","");
  9760. }
  9761. fGetSelectedOrderData();
  9762. }
  9763. }
  9764. function grp_calc_rdo_actingflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  9765. {
  9766. if(gv_patnm){
  9767. if (utlf_isNull(obj.value) || obj.value == "all") { // 전체
  9768. ds_hidden_list1_isclcond.setColumn(0,"actingflag","");
  9769. } else if (obj.value == "act") {
  9770. ds_hidden_list1_isclcond.setColumn(0, "actingflag"," (execprcpstatcd=='Y' || execprcpstatcd=='O') ");
  9771. } else if (obj.value == "noact") {
  9772. ds_hidden_list1_isclcond.setColumn(0,"actingflag"," execprcpstatcd=='N' ");
  9773. }
  9774. fGetSelectedOrderData();
  9775. }
  9776. }
  9777. function grp_calc_rdo_ordfilflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  9778. {
  9779. if(gv_patnm){
  9780. if (utlf_isNull(obj.value) || obj.value == "-") { // 전체
  9781. ds_hidden_list1_isclcond.setColumn(0,"snglcalcscorcls","");
  9782. } else {
  9783. ds_hidden_list1_isclcond.setColumn(0,"snglcalcscorcls", "item1 == '"+obj.value+"'");
  9784. }
  9785. fGetSelectedOrderData();
  9786. grp_calc.grd_ordlist.vscrollbar.pos = 0;
  9787. }
  9788. }
  9789. function grp_calc_rdo_cpflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  9790. {
  9791. if(gv_patnm){
  9792. if (utlf_isNull(obj.value) || obj.value == "-") { // 전체
  9793. ds_hidden_list1_isclcond.setColumn(0,"cpflag","");
  9794. } else {
  9795. ds_hidden_list1_isclcond.setColumn(0,"cpflag", "cpflag == '"+obj.value+"'");
  9796. }
  9797. fGetSelectedOrderData();
  9798. }
  9799. }
  9800. function grp_calc_ipt_calcscorcd_onkeyup(obj:Edit, e:KeyEventInfo)
  9801. {
  9802. if(e.keycode == 13) {
  9803. if (!utlf_isNull(obj.value)){
  9804. if (String(obj.value).length < 2) { // 전체
  9805. sysf_messageBox("수가코드는 2자리 이상", "C001");
  9806. return ;
  9807. }
  9808. ds_hidden_list1_isclcond.setColumn(0,"snglcalcscorcd", " String(snglcalcscorcd).indexOf('"+obj.value+"') >= 0 ");
  9809. } else {
  9810. ds_hidden_list1_isclcond.setColumn(0,"snglcalcscorcd", "");
  9811. }
  9812. fGetSelectedOrderData();
  9813. }
  9814. }
  9815. function fSetItemBold(){
  9816. for (var i=0,rowcnt=ds_rdo_ordfilflag.rowcount; i < rowcnt; i++) {
  9817. var findstr = ds_rdo_ordfilflag.getColumn(i,"cdid");
  9818. if (!utlf_isNull(ds_grd_ordlist.lookupExpr("item1=='" + findstr + "'","item1"))) {
  9819. ds_rdo_ordfilflag.setColumn(i, "font", "Dotum,9, bold");
  9820. } else {
  9821. ds_rdo_ordfilflag.setColumn(i, "font", "");
  9822. }
  9823. }
  9824. }
  9825. function fChangeRate(){
  9826. grp_changeownbrate.visible = true;
  9827. }
  9828. function grp_calc_btn_midregist_onclick(obj:Button, e:ClickEventInfo)
  9829. {
  9830. frmf_setParameter("iParam_mother_view","SMPIJ00300_입원재원심사관리");
  9831. if(gv_patnm.length > 0){
  9832. if(gv_pid.length > 0) {
  9833. if(gv_indd.length > 1){
  9834. if (fSaveMain("T") == true) {
  9835. // 건강보험 정상 16일 이상 재원환자에 대해 장기재원 불가피 주상병 존재하는 경우 알림
  9836. var longtermchk = ds_getdschcalccheck.getColumn(0, "longtermchk");
  9837. if (longtermchk == "Y") {
  9838. var msg = sysf_messageBox("장기재원 불가피 주상병이 있는 16일 이상 입원료 발생 환자 입니다.\n보조 유형을 확인하시기 바랍니다. \n계속","S001");
  9839. if(msg != 6) {
  9840. return;
  9841. }
  9842. }
  9843. }
  9844. var trgtManWindow = frmf_findPopup("SMPIJ02300");
  9845. ds_hidden_midclam.clearData();
  9846. ds_hidden_midclam.addRow();
  9847. // (중간청구등록화면에 넘겨주는 데이터 추가 - pid, indd)
  9848. ds_hidden_midclam.setColumn(0, "pid" , gv_pid);
  9849. ds_hidden_midclam.setColumn(0, "indd" , gv_indd1);
  9850. if (utlf_isNull(trgtManWindow))
  9851. {
  9852. var objParam = new Object();
  9853. objParam.args_ds_temp_grd_mdiclam = ds_hidden_midclam;
  9854. var rtn = frmf_open("SMPIJ02300","SMPIJ02300", objParam, "", "", "", "", "", "", "", "", "", "M");
  9855. }
  9856. else
  9857. {
  9858. frmf_setFocusPop("SMPIJ02300");
  9859. trgtManWindow.SMPIJ02300_onload();
  9860. }
  9861. }
  9862. }
  9863. }
  9864. }
  9865. function grp_calc_btn_midcomplete_onclick(obj:Button, e:ClickEventInfo)
  9866. {
  9867. fMidcomplete();
  9868. }
  9869. function grp_calc_btn_midregistyn_onclick(obj:Button, e:ClickEventInfo)
  9870. {
  9871. var chk = ds_init_iteminfo.getColumn(ds_init_iteminfo.rowposition, "patnm");
  9872. var indd = ds_init_iteminfo.getColumn(ds_init_iteminfo.rowposition, "indd1");
  9873. var cretno = ds_init_iteminfo.getColumn(ds_init_iteminfo.rowposition, "cretno");
  9874. var pid = ds_init_iteminfo.getColumn(ds_init_iteminfo.rowposition, "pid");
  9875. if(chk){
  9876. var midregistyn = "Y";
  9877. if (midregistyn == "Y") {
  9878. var sInDsName = dsf_createDsRow("ds_search"
  9879. , [{col: "pid" , val: pid}
  9880. , {col: "cretno" , val: cretno}
  9881. , {col: "indd" , val: indd}
  9882. , {col: "instcd" , val: sysf_getUserInfo("dutplceinstcd")}
  9883. , {col: "midregistyn" , val: "Y"}]);
  9884. var oParam = {};
  9885. oParam.id = "TXPIJ00307";
  9886. oParam.service = "bfjudgapp.InHospJudg";
  9887. oParam.method = "reqSetDivClamExpt";
  9888. oParam.inds = "req=" + sInDsName;
  9889. oParam.outds = "ds_temp_result=result";
  9890. oParam.async = false;
  9891. tranf_submit(oParam);
  9892. grp_calc.btn_midregist.class = "btn2";
  9893. grp_calc.btn_midregist.enable = true;
  9894. grp_calc.btn_midregist.style.font = "Dotum,9";
  9895. grp_calc.btn_midregistyn.style.font = "Dotum,9";
  9896. grp_calc.btn_midregistyn.class = "btn2";
  9897. grp_calc.btn_midregistyn.style.font = "Dotum,9";
  9898. ds_init_iteminfo.setColumn(0, "midregistyn", "N");
  9899. sysf_messageBox("청구일자해제가","I002");
  9900. } else {
  9901. var sInDsName = dsf_createDsRow("ds_search"
  9902. , [{col: "pid" , val: pid}
  9903. , {col: "cretno" , val: cretno}
  9904. , {col: "indd" , val: indd}
  9905. , {col: "instcd" , val: sysf_getUserInfo("dutplceinstcd")}
  9906. , {col: "midregistyn" , val: "N"}]);
  9907. var oParam = {};
  9908. oParam.id = "TXPIJ00307";
  9909. oParam.service = "bfjudgapp.InHospJudg";
  9910. oParam.method = "reqSetDivClamExpt";
  9911. oParam.inds = "req=" + sInDsName;
  9912. oParam.outds = "ds_temp_result=result";
  9913. oParam.async = false;
  9914. tranf_submit(oParam);
  9915. grp_calc.btn_midregist.class = "btn2";
  9916. grp_calc.btn_midregist.enable = false;
  9917. grp_calc.btn_midregist.style.font = "";
  9918. grp_calc.btn_midregistyn.class = "btn2";
  9919. grp_calc.btn_midregistyn.style.font = "Dotum,9,bold";
  9920. ds_init_iteminfo.setColumn(0, "midregistyn", "Y");
  9921. sysf_messageBox("분할제외 등록이","I002");
  9922. }
  9923. }
  9924. }
  9925. function grp_calc_btn_dump_onclick(obj:Button, e:ClickEventInfo)
  9926. {
  9927. ds_cond_srch_smpai02900.setColumn(0,"searchdd", gv_indd1);
  9928. ds_cond_srch_smpai02900.setColumn(0,"searchpid", gv_pid);
  9929. ds_cond_srch_smpai02900.setColumn(0,"sess_posinstcd", gv_instcd);
  9930. var objParam = new Object();
  9931. objParam.args_ds_cond_srch_smpai02900 = ds_cond_srch_smpai02900;
  9932. objParam.args_ds_cond_srch_smpai029001 = ds_cond_srch_smpai02900;
  9933. var retVal = frmf_modal("SMPAI02900", "SMPAI02900", objParam, "", "", "", "", "", "", "", "", "", "M");
  9934. var oParam = {};
  9935. oParam.id = "TRPIJ00324";
  9936. oParam.service = "bfjudgapp.InHospJudg";
  9937. oParam.method = "reqGetDumpClamkeyExistYn_xp";
  9938. oParam.inds = "req=ds_init_iteminfo";
  9939. oParam.outds = "ds_init_dumpclamkeyexistyn=dumpclamkeyexistyn";
  9940. oParam.async = true;
  9941. oParam.progress = false;
  9942. oParam.callback = "cf_TRPIJ00324";
  9943. tranf_submit(oParam);
  9944. oParam = {};
  9945. oParam.id = "TRPIJ00325";
  9946. oParam.service = "bfjudgapp.InHospJudg";
  9947. oParam.method = "reqGetRetcSpec_xp";
  9948. oParam.inds = "req=ds_send";
  9949. oParam.outds = "ds_init_retcspec=retcspec";
  9950. oParam.async = true;
  9951. oParam.progress = false;
  9952. oParam.callback = "cf_TRPIJ00325";
  9953. tranf_submit(oParam);
  9954. }
  9955. function grp_calc_btn_spcldrug_onclick(obj:Button, e:ClickEventInfo)
  9956. {
  9957. grp_spcldrug.position.x = 343;
  9958. grp_spcldrug.position.y = 241;
  9959. grp_spcldrug.visible = true;
  9960. }
  9961. function grp_calc_button17_onclick(obj:Button, e:ClickEventInfo)
  9962. {
  9963. if(gv_patnm){
  9964. ds_cond_sppij02501.clearData();
  9965. ds_cond_sppij02501.addRow();
  9966. ds_cond_sppij02501.setColumn(0,"pid", gv_pid);
  9967. ds_cond_sppij02501.setColumn(0,"indd", gv_indd1);
  9968. ds_cond_sppij02501.setColumn(0,"mskind", gv_mskind);
  9969. ds_cond_sppij02501.setColumn(0,"cretno", gv_cretno);
  9970. ds_cond_sppij02501.setColumn(0,"prcpfromdd", gv_indd1);
  9971. ds_cond_sppij02501.setColumn(0,"prcptodd", gv_maxexecdd);
  9972. ds_cond_sppij02501.setColumn(0,"execfromdd", ds_send.getColumn(0,"ordfromdd"));
  9973. ds_cond_sppij02501.setColumn(0,"exectodd", ds_send.getColumn(0,"ordtodd"));
  9974. ds_cond_sppij02501.setColumn(0,"dschjudgprcsstat", gv_dschjudgprcsstat);
  9975. ds_cond_sppij02501.setColumn(0,"chksave", ds_hidden_item1.getColumn(0,"chksave"));
  9976. var trgtManWindow = frmf_findPopup("SPPIJ02501");
  9977. if (utlf_isNull(trgtManWindow))
  9978. {
  9979. frmf_open("SPPIJ02501","SPPIJ02501", {arg_ds_temp:ds_cond_sppij02501}, "", "", "", "", "", "", "", "", "", "M");
  9980. }else{
  9981. frmf_setFocusPop("SPPIJ02501");
  9982. }
  9983. //처방내역을 갖고 온다.
  9984. fGetIsclList("IPHS","Y");
  9985. // 진료비 계산내역을 갖고 온다.
  9986. fGetCalc("Y");
  9987. }
  9988. }
  9989. function grp_calc_btn_exlsave_onclick(obj:Button, e:ClickEventInfo)
  9990. {
  9991. if(ds_grd_ordlist.rowcount > 0) {
  9992. grdf_exportExcel(grp_calc.grd_ordlist,"excel","sheet1");
  9993. sysf_messageBox("저장이 ", "I002");
  9994. } else {
  9995. sysf_messageBox("조회된 데이터가 ", "I004");
  9996. }
  9997. }
  9998. function grp_calc_btn_EnvSetup_onclick(obj:Button, e:ClickEventInfo)
  9999. {
  10000. cnrlf_SaveOrderInfoOfCnrl(grp_calc.chk_showitemcoloryn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  10001. cnrlf_SaveOrderInfoOfCnrl(grp_calc.rdo_zerofilter, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  10002. cnrlf_SaveOrderInfoOfCnrl(grp_calc.chk_showsubtotal, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  10003. grdf_SaveOrderInfoOfCol(grp_calc.grd_ordlist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  10004. grdf_SaveOrderInfoOfCol(grd_diaglist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  10005. grdf_SaveOrderInfoOfCol(swt_spclmemo.case_spclspec.grd_clcjlist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  10006. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  10007. }
  10008. function cf_Cnfm_SMPIJ00300(){
  10009. }
  10010. function grp_calc_btn_print_onclick(obj:Button, e:ClickEventInfo)
  10011. {
  10012. ds_send_prntlist.clearData();
  10013. grp_calc.grd_ordlist.updateToDataset();
  10014. var cretno = ds_init_iteminfo.getColumn(0, "cretno");
  10015. if (cretno)
  10016. {
  10017. var ret = sysf_messageBox("데이터를 부분출력", "S001");
  10018. if (ret == 6)
  10019. {
  10020. var rows = grdf_getSelectedRows(grp_calc.grd_ordlist);
  10021. var rowcnt = rows.length;
  10022. for (var i = 0; i < rowcnt; i++)
  10023. {
  10024. var sel = rows[i];
  10025. var idx = ds_send_prntlist.addRow();
  10026. dsf_makeValue(ds_send_prntlist, "pid", "string", gv_pid, idx);
  10027. dsf_makeValue(ds_send_prntlist, "insukindcd", "string", gv_insukindcd + "(" + ds_init_cmb_insukind.lookup("cdid", gv_insukindcd, "cdnm") + ")", idx);
  10028. dsf_makeValue(ds_send_prntlist, "patnm", "string", gv_patnm, idx);
  10029. dsf_makeValue(ds_send_prntlist, "suppkindcd", "string", gv_suppkindcd + "(" + ds_init_cmb_suppkindlist.lookup("suppkind", gv_suppkindcd, "suppratenm") + ")", idx);
  10030. dsf_makeValue(ds_send_prntlist, "indd", "string", gv_indd, idx);
  10031. dsf_makeValue(ds_send_prntlist, "item1", "string", ds_grd_ordlist.getColumn(sel, "item1"), idx);
  10032. dsf_makeValue(ds_send_prntlist, "item2", "string", ds_grd_ordlist.getColumn(sel, "item2"), idx);
  10033. dsf_makeValue(ds_send_prntlist, "item3", "string", ds_grd_ordlist.getColumn(sel, "item1")+ds_grd_ordlist.getColumn(sel, "item2"), idx);
  10034. dsf_makeValue(ds_send_prntlist, "grupflag", "string", ds_grd_ordlist.getColumn(sel, "grupflag"), idx);
  10035. dsf_makeValue(ds_send_prntlist, "grupcalcscorcd", "string", ds_grd_ordlist.getColumn(sel, "grupcalcscorcd"), idx);
  10036. dsf_makeValue(ds_send_prntlist, "snglcalcscorcd", "string", ds_grd_ordlist.getColumn(sel, "snglcalcscorcd"), idx);
  10037. dsf_makeValue(ds_send_prntlist, "edicd", "string", ds_grd_ordlist.getColumn(sel, "edicd"), idx);
  10038. dsf_makeValue(ds_send_prntlist, "estmcd", "string", ds_grd_ordlist.getColumn(sel, "estmcd"), idx);
  10039. dsf_makeValue(ds_send_prntlist, "hngnm", "string", ds_grd_ordlist.getColumn(sel, "hngnm"), idx);
  10040. dsf_makeValue(ds_send_prntlist, "calcpayflag", "string", ds_grd_ordlist.getColumn(sel, "calcpayflag"), idx);
  10041. dsf_makeValue(ds_send_prntlist, "execprcpstatcd", "string", ds_grd_ordlist.getColumn(sel, "execprcpstatcd"), idx);
  10042. dsf_makeValue(ds_send_prntlist, "payownbrate", "string", ds_grd_ordlist.getColumn(sel, "payownbrate"), idx);
  10043. dsf_makeValue(ds_send_prntlist, "appunitcost", "string", ds_grd_ordlist.getColumn(sel, "appunitcost"), idx);
  10044. dsf_makeValue(ds_send_prntlist, "calcqty", "string", ds_grd_ordlist.getColumn(sel, "calcqty"), idx);
  10045. dsf_makeValue(ds_send_prntlist, "calctims", "string", ds_grd_ordlist.getColumn(sel, "calctims"), idx);
  10046. dsf_makeValue(ds_send_prntlist, "daydrugqty", "int", ds_grd_ordlist.getColumn(sel, "calcqty") * ds_grd_ordlist.getColumn(sel, "calctims"), idx);
  10047. dsf_makeValue(ds_send_prntlist, "calcdays", "string", ds_grd_ordlist.getColumn(sel, "calcdays"), idx);
  10048. dsf_makeValue(ds_send_prntlist, "calcamt", "string", ds_grd_ordlist.getColumn(sel, "calcamt"), idx);
  10049. dsf_makeValue(ds_send_prntlist, "unithospaddamt", "string", ds_grd_ordlist.getColumn(sel, "unithospaddamt"), idx);
  10050. dsf_makeValue(ds_send_prntlist, "unitspecamt", "string", ds_grd_ordlist.getColumn(sel, "unitspecamt"), idx);
  10051. dsf_makeValue(ds_send_prntlist, "unitaddamt", "string", ds_grd_ordlist.getColumn(sel, "unitaddamt"), idx);
  10052. dsf_makeValue(ds_send_prntlist, "totordamt", "string", ds_grd_ordlist.getColumn(sel, "totordamt"), idx);
  10053. }
  10054. var objDOM = rptf_createDOM();
  10055. rptf_setNodeListToDOM(objDOM, "/root/send/prntlist/prntinfo", ds_send_prntlist);
  10056. var objParam = new Object();
  10057. objParam.xml_data_XML1 = objDOM.documentElement.source;
  10058. var option = "open=1;save=0;directprint=0;printdialog=0;print=0;zoom=0;";
  10059. rptf_exeReportPreview30(["RPPIJ00300"],[objParam], option);
  10060. }
  10061. else if (ret == 7)
  10062. {
  10063. var rowcnt = ds_grd_ordlist.rowcount;
  10064. for(var sel = 0; sel < rowcnt; sel++)
  10065. {
  10066. var idx = ds_send_prntlist.addRow();
  10067. dsf_makeValue(ds_send_prntlist, "pid", "string", ds_init_iteminfo.getColumn(0, "pid"), idx);
  10068. dsf_makeValue(ds_send_prntlist, "insukindcd", "string", ds_init_cmb_insukind.lookup("cdid", ds_init_iteminfo.getColumn(0, "insukindcd"), "cdnm"), idx);
  10069. dsf_makeValue(ds_send_prntlist, "patnm", "string", ds_init_iteminfo.getColumn(0, "patnm"), idx);
  10070. dsf_makeValue(ds_send_prntlist, "suppkindcd", "string", ds_init_cmb_suppkindlist.lookup("cdid", ds_init_iteminfo.getColumn(0, "suppkindcd"), "cdnm"), idx);
  10071. dsf_makeValue(ds_send_prntlist, "indd", "string", ds_init_iteminfo.getColumn(0, "indd"), idx);
  10072. dsf_makeValue(ds_send_prntlist, "item1", "string", ds_grd_ordlist.getColumn(sel, "item1"), idx);
  10073. dsf_makeValue(ds_send_prntlist, "item2", "string", ds_grd_ordlist.getColumn(sel, "item2"), idx);
  10074. dsf_makeValue(ds_send_prntlist, "item3", "string", ds_grd_ordlist.getColumn(sel, "item1")+ds_grd_ordlist.getColumn(sel, "item2"), idx);
  10075. dsf_makeValue(ds_send_prntlist, "grupflag", "string", ds_grd_ordlist.getColumn(sel, "grupflag"), idx);
  10076. dsf_makeValue(ds_send_prntlist, "grupcalcscorcd", "string", ds_grd_ordlist.getColumn(sel, "grupcalcscorcd"), idx);
  10077. dsf_makeValue(ds_send_prntlist, "snglcalcscorcd", "string", ds_grd_ordlist.getColumn(sel, "snglcalcscorcd"), idx);
  10078. dsf_makeValue(ds_send_prntlist, "edicd", "string", ds_grd_ordlist.getColumn(sel, "edicd"), idx);
  10079. dsf_makeValue(ds_send_prntlist, "estmcd", "string", ds_grd_ordlist.getColumn(sel, "estmcd"), idx);
  10080. dsf_makeValue(ds_send_prntlist, "hngnm", "string", ds_grd_ordlist.getColumn(sel, "hngnm"), idx);
  10081. dsf_makeValue(ds_send_prntlist, "calcpayflag", "string", ds_grd_ordlist.getColumn(sel, "calcpayflag"), idx);
  10082. dsf_makeValue(ds_send_prntlist, "execprcpstatcd", "string", ds_grd_ordlist.getColumn(sel, "execprcpstatcd"), idx);
  10083. dsf_makeValue(ds_send_prntlist, "payownbrate", "string", ds_grd_ordlist.getColumn(sel, "payownbrate"), idx);
  10084. dsf_makeValue(ds_send_prntlist, "appunitcost", "string", ds_grd_ordlist.getColumn(sel, "appunitcost"), idx);
  10085. dsf_makeValue(ds_send_prntlist, "calcqty", "string", ds_grd_ordlist.getColumn(sel, "calcqty"), idx);
  10086. dsf_makeValue(ds_send_prntlist, "calctims", "string", ds_grd_ordlist.getColumn(sel, "calctims"), idx);
  10087. dsf_makeValue(ds_send_prntlist, "daydrugqty", "string", ds_grd_ordlist.getColumn(sel, "calcqty") * ds_grd_ordlist.getColumn(sel, "calctims"), idx);
  10088. dsf_makeValue(ds_send_prntlist, "calcdays", "string", ds_grd_ordlist.getColumn(sel, "calcdays"), idx);
  10089. dsf_makeValue(ds_send_prntlist, "calcamt", "string", ds_grd_ordlist.getColumn(sel, "calcamt"), idx);
  10090. dsf_makeValue(ds_send_prntlist, "unithospaddamt", "string", ds_grd_ordlist.getColumn(sel, "unithospaddamt"), idx);
  10091. dsf_makeValue(ds_send_prntlist, "unitspecamt", "string", ds_grd_ordlist.getColumn(sel, "unitspecamt"), idx);
  10092. dsf_makeValue(ds_send_prntlist, "unitaddamt", "string", ds_grd_ordlist.getColumn(sel, "unitaddamt"), idx);
  10093. dsf_makeValue(ds_send_prntlist, "totordamt", "string", ds_grd_ordlist.getColumn(sel, "totordamt"), idx);
  10094. }
  10095. var objDOM = rptf_createDOM();
  10096. rptf_setNodeListToDOM(objDOM, "/root/send/prntlist/prntinfo", ds_send_prntlist);
  10097. var objParam = new Object();
  10098. objParam.xml_data_XML1 = objDOM.documentElement.source;
  10099. var option = "open=1;save=0;directprint=0;printdialog=0;print=0;zoom=0;";
  10100. rptf_exeReportPreview30(["RPPIJ00300"],[objParam], option);
  10101. }
  10102. else
  10103. {
  10104. return;
  10105. }
  10106. }
  10107. }
  10108. function grp_calc_btn_iscldetl_onclick(obj:Button, e:ClickEventInfo)
  10109. {
  10110. if(gv_patnm){
  10111. var trgtManWindow = frmf_findPopup("SPPIJ00400");
  10112. if (utlf_isNull(trgtManWindow))
  10113. {
  10114. ds_cond_sppij00400.setColumn(0, "detlsrchflag" , "ALL");
  10115. ds_cond_sppij00400.setColumn(0, "selyn" , "N");
  10116. var rtn = frmf_modal("SPPIJ00400","SPPIJ00400", "", "", "", "", "", "", "", "", "", "", "M");
  10117. } else {
  10118. frmf_getChildWindow("SPPIJ00400");
  10119. }
  10120. }
  10121. }
  10122. function grp_calc_button16_onclick(obj:Button, e:ClickEventInfo)
  10123. {
  10124. var oParam = {};
  10125. oParam.id = "TRPIJ00348";
  10126. oParam.service = "bfjudgapp.InHospJudg";
  10127. oParam.method = "reqGetClbsClamInfo";
  10128. oParam.inds = "req=ds_init_iteminfo";
  10129. oParam.outds = "ds_clbsclaminfo=clbsclaminfo";
  10130. oParam.async = false;
  10131. tranf_submit(oParam);
  10132. if (!utlf_isNull(ds_clbsclaminfo.getColumn(0,"acptno")))
  10133. {
  10134. ds_cond_smpir31000.addRow();
  10135. ds_cond_smpir31000.setColumn(0, "srchflag" , "1");
  10136. ds_cond_smpir31000.setColumn(0, "acptno" , ds_clbsclaminfo.getColumn(0,"acptno"));
  10137. ds_cond_smpir31000.setColumn(0, "judgdg" , ds_clbsclaminfo.getColumn(0,"judgdg"));
  10138. ds_cond_smpir31000.setColumn(0, "docuseqno" , ds_clbsclaminfo.getColumn(0,"docuseqno"));
  10139. ds_cond_smpir31000.setColumn(0, "clamno" , ds_clbsclaminfo.getColumn(0,"clamno"));
  10140. frmf_open("SMPIR31000","SMPIR31000", {objDs:ds_cond_smpir31000}, "", "", "", "", "", "", "", "", "", "M");
  10141. }
  10142. }
  10143. function grp_calc_btn_drginfo_onclick(obj:Button, e:ClickEventInfo)
  10144. {
  10145. fGetDrgOpenPopup();
  10146. }
  10147. function grp_calc_button18_onclick(obj:Button, e:ClickEventInfo)
  10148. {
  10149. openSMMMR06900();
  10150. }
  10151. function grp_calc_btn_judgtrgtsrch_onclick(obj:Button, e:ClickEventInfo)
  10152. {
  10153. var trgtManWindow = frmf_findPopup("SMPIJ00200");
  10154. var oldpid = gv_pid;
  10155. var patunitsrch1 = ipt_pid.value;
  10156. ds_init_iteminfo.setColumn(0, "patunitsrch1", patunitsrch1);
  10157. if (utlf_isNull(trgtManWindow))
  10158. {
  10159. var rtn = frmf_open("SMPIJ00200","SMPIJ00200", {arg_ds_temp:ds_init_iteminfo}, "", "", "", "", "", "", "", "", "", "M"); // SMPIJ00200 조회 호출
  10160. } else {
  10161. if (utlf_isNull(oldpid)) {
  10162. if (utlf_isNull(patunitsrch1)) { // 환자번호 입력 없이 대상자를 조회하는 경우
  10163. frmf_setFocusPop("SMPIJ00200");
  10164. } else { // 기존 심사대상자는 없는데 pid가 입력된 경우 또는 변경된 정보를 저장 후에 조회하는 경우
  10165. trgtManWindow.fSetPatUnitSrch1pidSrch();
  10166. }
  10167. }else {
  10168. if (patunitsrch1 != oldpid) { // 조회된 pid가 변경된 상태에서 조회하는 경우
  10169. ds_init_iteminfo.setColumn(0, "pid", patunitsrch1);
  10170. trgtManWindow.fSetPatUnitSrch1pidSrch();
  10171. } else { // 기존 심사대상자는 있는데 pid가 변경되지 않은 경우
  10172. trgtManWindow.fSetPatUnitSrch1pidSrch();
  10173. frmf_setFocusPop("SMPIJ00200");
  10174. }
  10175. }
  10176. }
  10177. }
  10178. function grp_changeownbrate_btn_accept_onclick(obj:Button, e:ClickEventInfo)
  10179. {
  10180. // 심사마감이나 퇴원한 환자는 요율변경을 할 수 없다.
  10181. // 기존에는 심사마감이나 퇴원여부를 인스턴스에서 가져오던 것을 실시간 체크로 변경
  10182. fRefrhVar(ds_init_iteminfo);
  10183. dsf_createDsRow("ds_cond_req", [
  10184. {col:"pid", type:"STRING", size:256, val:gv_pid}
  10185. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  10186. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  10187. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  10188. , {col:"checkyn", type:"STRING", size:256, val:"N"}
  10189. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  10190. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  10191. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  10192. ]);
  10193. var oParam = {};
  10194. oParam.id = "TRPIJ00315";
  10195. oParam.service = "bfjudgapp.InHospJudg";
  10196. oParam.method = "reqNotiDschStat";
  10197. oParam.inds = "req=ds_cond_req";
  10198. oParam.outds = "ds_endcnclstat_item11=endcnclstat ds_recal=recal";
  10199. oParam.async = false;
  10200. tranf_submit(oParam);
  10201. var cnt = ds_endcnclstat_item11.rowcount;
  10202. if (cnt==0){
  10203. sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
  10204. return;
  10205. }
  10206. var indschacptstat = ds_endcnclstat_item11.getColumn(0, "indschacptstat");
  10207. var dschjudgprcsstat = ds_endcnclstat_item11.getColumn(0, "dschjudgprcsstat");
  10208. // 중간청구, 읽기전옹 여부를 판단해서 블로킹
  10209. var readonly = ds_send.getColumn(0, "readonly");
  10210. if (gv_lastmdlclamdd > gv_fromdd && gv_lastmdlclamdd > "20081003" && !utlf_isNull(gv_lastmdlclamdd) ) {
  10211. sysf_messageBox("중간청구 등록이 되어있습니다. 요율을 변경","E001");
  10212. grp_changeownbrate.visible = false;
  10213. return;
  10214. } else if (readonly == "Y") {
  10215. sysf_messageBox("읽기전용 모드에서는 요율을 변경","E001");
  10216. grp_changeownbrate.visible = false;
  10217. return;
  10218. } else if (indschacptstat == "D") {
  10219. sysf_messageBox("이미 퇴원한 환자입니다. 요율을 변경","E001");
  10220. grp_changeownbrate.visible = false;
  10221. return;
  10222. } else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
  10223. sysf_messageBox("이미 마감된 환자입니다. 요율을 변경","E001");
  10224. grp_changeownbrate.visible = false;
  10225. return;
  10226. }
  10227. fChangeRate1();
  10228. }
  10229. function fChangeRate1() {
  10230. var suppkind = grp_changeownbrate.cmb_suppkindlist.value;
  10231. var sixtimyn = ds_init_iteminfo.getColumn(0, "sixtimyn");
  10232. var suppkindcd = ds_init_iteminfo.getColumn(0, "suppkindcd");
  10233. if (sixtimyn == "Y" && (suppkind == "05" || suppkind == "08" || suppkind == "09" || suppkind == "31" || suppkind == "39" || suppkind == "41" || suppkind == "42" || suppkind == "43")) {
  10234. sysf_messageBox("6시간 미만환자는 입원에만 적용되는 보조유형으로 변경을","E001");
  10235. grp_changeownbrate.visible = false;
  10236. return;
  10237. }
  10238. // 6세미만, 신생아는 조건에 맞지 않으면 Block
  10239. if (suppkind == "08" || suppkind == "31" || suppkind == "41") {
  10240. var babyyn = "N";
  10241. var readonly = ds_send.getColumn(0, "readonly");
  10242. // 신생아를 구별지음
  10243. if (gv_rrgstno.substr(7,1) == "3" || gv_rrgstno.substr(7,1) == "4" || gv_rrgstno.substr(7,1) == "7" || gv_rrgstno.substr(7,1) == "8") {
  10244. var interval = utlf_getDateInterval(gv_brthdd, gv_indd1);
  10245. if (interval < "28") {
  10246. babyyn = "Y";
  10247. }
  10248. }
  10249. var reqdeptno = ds_init_cmb_orddeptcd.lookup("deptcd", gv_orddeptcd, "reqdeptno");
  10250. if (sixtimyn == "N" && babyyn == "Y" && gv_age == 0 && gv_indd1 >= "20080101" && reqdeptno == '11' && (gv_insukindcd == "11" || gv_insukindcd == "21" || gv_insukindcd == "22")) {
  10251. if (suppkind != "31") {
  10252. sysf_messageBox("신생아 조건에 맞지 않아 변경을","E001");
  10253. grp_changeownbrate.visible = false;
  10254. return;
  10255. }
  10256. }
  10257. if (sixtimyn == "N" && (chkageyn(6) == "Y" || chkageyn2(16) == "Y" ) && babyyn == "N" && reqdeptno == '11' && (gv_insukindcd == "11" || gv_insukindcd == "21" || gv_insukindcd == "22")) {
  10258. if (suppkind != "08" && suppkind != "41" && suppkind != "31" && suppkind != "D5" && suppkind != "D4") {
  10259. sysf_messageBox("해당 조건에 맞지 않아 변경을","E001");
  10260. grp_changeownbrate.visible = false;
  10261. return;
  10262. }
  10263. }
  10264. }
  10265. var msg = sysf_messageBox("선택하신 요율을 적용","S001");
  10266. if(msg !=6){
  10267. return;
  10268. }else{
  10269. Insuchange(suppkind);
  10270. }
  10271. }
  10272. function grp_changeownbrate_btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  10273. {
  10274. grp_changeownbrate.visible = false;
  10275. }
  10276. function btn_mou_onclick(obj:Button, e:ClickEventInfo)
  10277. {
  10278. var objArg = new Object();
  10279. objArg.args_ds_send = ds_send;
  10280. var objDs = frmf_modal("SPPIJ04200","SPPIJ04200",objArg,"","","","","","","","","","M");
  10281. }
  10282. function grp_calc_grd_ordlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  10283. {
  10284. if(e.col == grp_calc.grd_ordlist.getBindCellIndex("Body", "text"))
  10285. {
  10286. fOrderGridInsertCmt();
  10287. }
  10288. else if(obj.currentcol == obj.getBindCellIndex("body","tootfact"))
  10289. {
  10290. fOrdOrderToothInput();
  10291. }
  10292. else
  10293. {
  10294. var trgtManWindow = frmf_findPopup("SPPIJ00400");
  10295. var patunitsrch1 = ds_init_iteminfo.getColumn(0, "pid").getTrim();
  10296. var grupcalcscorcd = ds_grd_ordlist.getColumn(e.row, "grupcalcscorcd");
  10297. var snglcalcscorcd = ds_grd_ordlist.getColumn(e.row, "snglcalcscorcd");
  10298. var selectedRdoItem = ds_hidden_list1_isclcond.getColumn(0, "selectedRdoItem");
  10299. gv_ordrow = ds_grd_ordlist.rowposition;
  10300. ds_cond_sppij00400.clearData();
  10301. ds_cond_sppij00400.addRow();
  10302. ds_hidden_item1.setColumn(0, "detlsrchflag", "");
  10303. ds_cond_sppij00400.setColumn(0, "selyn", "N");
  10304. if(utlf_isNull(grupcalcscorcd) || grupcalcscorcd == "-")
  10305. {
  10306. if(utlf_isNull(snglcalcscorcd) || snglcalcscorcd == "-")
  10307. {
  10308. }
  10309. else
  10310. {
  10311. ds_cond_sppij00400.setColumn(0, "calcscorcd", "");
  10312. ds_cond_sppij00400.setColumn(0, "grupsnglflag", "");
  10313. ds_cond_sppij00400.setColumn(0, "selectedRdoItem", "");
  10314. ds_cond_sppij00400.setColumn(0, "calcscorcd", snglcalcscorcd);
  10315. ds_cond_sppij00400.setColumn(0, "grupsnglflag", "S");
  10316. ds_cond_sppij00400.setColumn(0, "selectedRdoItem", selectedRdoItem);
  10317. if (utlf_isNull(trgtManWindow))
  10318. {
  10319. var rtn = frmf_modal("SPPIJ00400", "SPPIJ00400", "", "", "", "", "", "", "", "resize=true", "", "", "M");
  10320. }
  10321. else
  10322. {
  10323. frmf_setFocusPop("SPPIJ00400");
  10324. }
  10325. }
  10326. }
  10327. else
  10328. {
  10329. ds_cond_sppij00400.setColumn(0, "calcscorcd", "");
  10330. ds_cond_sppij00400.setColumn(0, "grupsnglflag", "");
  10331. ds_cond_sppij00400.setColumn(0, "selectedRdoItem", "");
  10332. ds_cond_sppij00400.setColumn(0, "calcscorcd", grupcalcscorcd);
  10333. ds_cond_sppij00400.setColumn(0, "grupsnglflag", "G");
  10334. ds_cond_sppij00400.setColumn(0, "selectedRdoItem", selectedRdoItem);
  10335. if (utlf_isNull(trgtManWindow))
  10336. {
  10337. var rtn = frmf_modal("SPPIJ00400", "SPPIJ00400", "", "", "", "", "", "", "", "resize=true", "", "", "M");
  10338. }
  10339. else
  10340. {
  10341. frmf_setFocusPop("SPPIJ00400");
  10342. }
  10343. }
  10344. var oParam = {};
  10345. oParam.id = "TRPIJ00325";
  10346. oParam.service = "bfjudgapp.InHospJudg";
  10347. oParam.method = "reqGetRetcSpec_xp";
  10348. oParam.inds = "req=ds_send";
  10349. oParam.outds = "ds_init_retcspec=retcspec";
  10350. oParam.async = true;
  10351. oParam.progress = false;
  10352. oParam.callback = "cf_TRPIJ00325";
  10353. tranf_submit(oParam);
  10354. // 20191218 상세내역에서 입력된 주석을 재조회
  10355. // oParam = {};
  10356. // oParam.id = "TRPIJ00333";
  10357. // oParam.service = "bfjudgapp.InHospJudg";
  10358. // oParam.method = "reqGetInHospJudgClcj_xp";
  10359. // oParam.inds = "req=ds_send";
  10360. // oParam.outds = "ds_grd_clcjlist=clcjlist";
  10361. // oParam.async = true;
  10362. // oParam.progress = false;
  10363. // oParam.callback = "cf_TRPIJ00333";
  10364. //
  10365. // tranf_submit(oParam);
  10366. }
  10367. }
  10368. function grp_calc_grd_ordlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  10369. {
  10370. grdf_setSelectedCell(obj, e);
  10371. if ( ds_grd_ordlist.rowposition > -1 ) {
  10372. var nX = system.clientToScreenX(obj, e.clientX)-20; // 마우스 위아래 약간의 여유를 둠
  10373. var nY = system.clientToScreenY(obj, e.clientY)-13;
  10374. pMenu.trackPopup(nX, nY);
  10375. } else {
  10376. trace("row 선택이 안됨 : 마우스 우클릭 grd_ordlist_onrbuttondown ");
  10377. }
  10378. return true;
  10379. }
  10380. function fPrcpResnRef(){
  10381. // 세션값 받기
  10382. var sUserInfosS = sysf_getUserInfo();
  10383. sUserInfosS = sUserInfosS + "|";
  10384. var UserInfosS_Array = sUserInfosS.split("|");
  10385. var userid = UserInfosS_Array[0]; // 사용자번호
  10386. var usernm = UserInfosS_Array[1]; // 사용자이름
  10387. var posinstcd = UserInfosS_Array[6]; // 근무지기관코드
  10388. var posinstnm = UserInfosS_Array[7]; // 근무지기관명
  10389. var posdeptcd = UserInfosS_Array[4]; // 소속부서코드
  10390. var posdeptnm = UserInfosS_Array[5]; // 소속부서명
  10391. ds_prcpresnref_info.addRow();
  10392. ds_prcpresnref_info.setColumn(0, "pid", gv_pid);
  10393. ds_prcpresnref_info.setColumn(0, "fromdd", gv_indd1);
  10394. ds_prcpresnref_info.setColumn(0, "todd", gv_dschdd);
  10395. ds_prcpresnref_info.setColumn(0, "orddeptcd", "-");
  10396. ds_prcpresnref_info.setColumn(0, "orddrid", "-");
  10397. ds_prcpresnref_info.setColumn(0, "mainjudgid", "-");
  10398. ds_prcpresnref_info.setColumn(0, "prcpcd", ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "grupcalcscorcd"));
  10399. ds_prcpresnref_info.setColumn(0, "insukind", gv_insukindcd);
  10400. ds_prcpresnref_info.setColumn(0, "ioflag", "I");
  10401. ds_prcpresnref_info.setColumn(0, "resncd", "FF");
  10402. ds_prcpresnref_info.setColumn(0, "popup", "judg");
  10403. //alert("20140808 현재 XP에 SPMMO19000_중복처방사유조회 화면이 존재하지 않음");
  10404. //return;
  10405. frmf_open("SPMMO19000", "SPMMO19000", {arg_ds_data_prcpresnref:ds_prcpresnref_info}, "", "", "", "", "", "", "", "", "", "M");
  10406. }
  10407. function fJudgPatMsgTrsmRef()
  10408. {
  10409. var pid = gv_pid; // 메세지 현황에 등록번호반환
  10410. var objArg = new Object();
  10411. objArg.sPid = pid;
  10412. frmf_modal("SMPIJ02600","SMPIJ02600",objArg,"","","","","","","","","","M");
  10413. }
  10414. function fOrderJudgPatMsgTrsm()
  10415. {
  10416. if ( !utlf_isNull(gv_pid) ) {
  10417. // 값셋팅
  10418. // 처방이므로 처방row선택여부 확인
  10419. if(ds_grd_ordlist.rowposition == -1){
  10420. return;
  10421. }
  10422. ds_msgtrsm_info.clearData();
  10423. // 세션값 받기
  10424. var userid = gds_userInfo.getColumn(0, "userid"); // 사용자번호
  10425. var usernm = gds_userInfo.getColumn(0, "usernm"); // 사용자이름
  10426. var posinstcd = gds_userInfo.getColumn(0, "posinstcd"); // 근무지기관코드
  10427. var posinstnm = gds_userInfo.getColumn(0, "posinstnm"); // 근무지기관명
  10428. var posdeptcd = gds_userInfo.getColumn(0, "posdeptcd"); // 소속부서코드
  10429. var posdeptnm = gds_userInfo.getColumn(0, "posdeptnm"); // 소속부서명
  10430. if (utlf_isNull(userid) || userid == " " || userid == "-") {
  10431. userid = "pam";
  10432. }
  10433. ds_msgtrsm_info.addRow();
  10434. ds_msgtrsm_info.setColumn(0, "instcd", gv_instcd); // chk
  10435. ds_msgtrsm_info.setColumn(0, "msgwrtedd", utlf_getCurrentDate()); // chk
  10436. ds_msgtrsm_info.setColumn(0, "msgwrteno", ""); // chk
  10437. ds_msgtrsm_info.setColumn(0, "msgwrtehistno", ""); // chk
  10438. ds_msgtrsm_info.setColumn(0, "histstat", "Y"); // chk
  10439. ds_msgtrsm_info.setColumn(0, "pid", gv_pid); // chk
  10440. ds_msgtrsm_info.setColumn(0, "orddd", gv_indd1); // chk
  10441. ds_msgtrsm_info.setColumn(0, "cretno", gv_cretno); // chk
  10442. ds_msgtrsm_info.setColumn(0, "mskind", gv_mskind); // chk
  10443. ds_msgtrsm_info.setColumn(0, "orddeptcd", gv_orddeptcd); // chk
  10444. ds_msgtrsm_info.setColumn(0, "orddrid", gv_medispclid); // chk, TABLE에 적용안함.(값만확인)
  10445. ds_msgtrsm_info.setColumn(0, "orddrnm", gv_medispclnm); // chk, TABLE에 적용안함.(값만확인)
  10446. ds_msgtrsm_info.setColumn(0, "ordtype", "I"); // 입원기본 'I', chk
  10447. ds_msgtrsm_info.setColumn(0, "kindflag", "O"); // 처방기준 'O', chk
  10448. ds_msgtrsm_info.setColumn(0, "grupcalcscorcd", ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "grupcalcscorcd")); // chk
  10449. ds_msgtrsm_info.setColumn(0, "snglcalcscorcd", ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd")); // chk
  10450. ds_msgtrsm_info.setColumn(0, "ordqty", ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "calcqty")); // 화면에서입원재원상세넣어줌. chk(입원만)
  10451. ds_msgtrsm_info.setColumn(0, "ordtims", ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "calctims")); // 화면에서입원재원상세넣어줌. chk(입원만)
  10452. ds_msgtrsm_info.setColumn(0, "orddays", ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "calcdays")); // 화면에서입원재원상세넣어줌. chk(입원만)
  10453. ds_msgtrsm_info.setColumn(0, "prcpdd", ""); // 화면에서입원재원상세넣어줌. chk(입원만)
  10454. ds_msgtrsm_info.setColumn(0, "prcpno", ""); // 화면에서입원재원상세넣어줌. chk(입원만)
  10455. ds_msgtrsm_info.setColumn(0, "prcppayflag", ""); // 화면에서입원재원상세넣어줌. chk (입원만)
  10456. ds_msgtrsm_info.setColumn(0, "rgstrid", "-"); // 서버단에서 조회하여 가져와야함. chk
  10457. ds_msgtrsm_info.setColumn(0, "rgstdd", "-"); // 서버단에서 조회하여 가져와야함. chk
  10458. ds_msgtrsm_info.setColumn(0, "rgsttm", "-"); // 서버단에서 조회하여 가져와야함. chk
  10459. ds_msgtrsm_info.setColumn(0, "sendphone", ""); // 서버단에서 조회하여 가져와야함. chk
  10460. ds_msgtrsm_info.setColumn(0, "anybodyyn", "N"); // 누구나 기본 'N', chk
  10461. ds_msgtrsm_info.setColumn(0, "sendflag", "O"); // 진료기본 'O', chk
  10462. ds_msgtrsm_info.setColumn(0, "senddate", ""); // 쿼리에서 timestamp chk
  10463. ds_msgtrsm_info.setColumn(0, "sendid", userid); // chk
  10464. ds_msgtrsm_info.setColumn(0, "deliveid", "-"); // 화면에서선택. chk
  10465. ds_msgtrsm_info.setColumn(0, "recvdate", ""); // chk
  10466. ds_msgtrsm_info.setColumn(0, "recvid", ""); // chk
  10467. ds_msgtrsm_info.setColumn(0, "recvcnfmyn", "N"); // 기본 비연속 'N', chk
  10468. ds_msgtrsm_info.setColumn(0, "recvcnfmid", userid); //chk
  10469. ds_msgtrsm_info.setColumn(0, "sendmsg", ""); // 기본 처방코드, 처방명값가지고 시작. chk → 변경 화면에서 그룹코드 명 조회하여 넣어줌. chk
  10470. ds_msgtrsm_info.setColumn(0, "recvmsg", ""); // chk
  10471. ds_msgtrsm_info.setColumn(0, "fstrgstrid", ""); // chk
  10472. ds_msgtrsm_info.setColumn(0, "fstrgstdt", ""); // chk
  10473. ds_msgtrsm_info.setColumn(0, "lastupdtrid", ""); // chk
  10474. ds_msgtrsm_info.setColumn(0, "lastupdtdt", ""); // chk
  10475. } else {
  10476. sysf_messageBox("기본정보가 ", "I004");
  10477. }
  10478. var objArg = new Object();
  10479. objArg.sName = this.name;
  10480. var rtn = frmf_open("SPPIZ01900", "SPPIZ01900", objArg, "", "", "", "", "", "", "", "", "", "M");// SPPIZ01900_심사환자메세지작성
  10481. if (!utlf_isNull(rtn)) {
  10482. }
  10483. }
  10484. function fPatJudgPatMsgTrsm()
  10485. {
  10486. if (!utlf_isNull(gv_pid)) {
  10487. ds_msgtrsm_info.clearData();
  10488. var userid = gds_userInfo.getColumn(0, "userid"); // 사용자번호
  10489. var usernm = gds_userInfo.getColumn(0, "usernm"); // 사용자이름
  10490. var posinstcd = gds_userInfo.getColumn(0, "posinstcd"); // 근무지기관코드
  10491. var posinstnm = gds_userInfo.getColumn(0, "posinstnm"); // 근무지기관명
  10492. var posdeptcd = gds_userInfo.getColumn(0, "posdeptcd"); // 소속부서코드
  10493. var posdeptnm = gds_userInfo.getColumn(0, "posdeptnm"); // 소속부서명
  10494. if (utlf_isNull(userid) || userid == " " || userid == "-") {
  10495. userid = "pam";
  10496. }
  10497. ds_msgtrsm_info.addRow();
  10498. ds_msgtrsm_info.setColumn(0, "instcd", gv_instcd); // chk
  10499. ds_msgtrsm_info.setColumn(0, "msgwrtedd", utlf_getCurrentDate()); // chk
  10500. ds_msgtrsm_info.setColumn(0, "msgwrteno", ""); // chk
  10501. ds_msgtrsm_info.setColumn(0, "msgwrtehistno", ""); // chk
  10502. ds_msgtrsm_info.setColumn(0, "histstat", "Y"); // chk
  10503. ds_msgtrsm_info.setColumn(0, "pid", gv_pid); // chk
  10504. ds_msgtrsm_info.setColumn(0, "orddd", gv_indd1); // chk
  10505. ds_msgtrsm_info.setColumn(0, "cretno", gv_cretno); // chk
  10506. ds_msgtrsm_info.setColumn(0, "mskind", gv_mskind); // chk
  10507. ds_msgtrsm_info.setColumn(0, "orddeptcd", gv_orddeptcd); // chk
  10508. ds_msgtrsm_info.setColumn(0, "orddrid", gv_medispclid); // chk, TABLE에 적용안함.(값만확인)
  10509. ds_msgtrsm_info.setColumn(0, "orddrnm", gv_medispclnm); // chk, TABLE에 적용안함.(값만확인)
  10510. ds_msgtrsm_info.setColumn(0, "ordtype", "I"); // 입원기본 'I', chk
  10511. ds_msgtrsm_info.setColumn(0, "kindflag", "P"); // 환자기준 'P', chk
  10512. ds_msgtrsm_info.setColumn(0, "grupcalcscorcd", "-");
  10513. ds_msgtrsm_info.setColumn(0, "snglcalcscorcd", "-");
  10514. ds_msgtrsm_info.setColumn(0, "ordqty", 0);
  10515. ds_msgtrsm_info.setColumn(0, "ordtims", 0);
  10516. ds_msgtrsm_info.setColumn(0, "orddays", 0);
  10517. ds_msgtrsm_info.setColumn(0, "prcpdd", "-");
  10518. ds_msgtrsm_info.setColumn(0, "prcpno", 0);
  10519. ds_msgtrsm_info.setColumn(0, "prcppayflag", "-");
  10520. ds_msgtrsm_info.setColumn(0, "rgstrid", "-"); // 서버단에서 조회하여 가져와야함. chk
  10521. ds_msgtrsm_info.setColumn(0, "rgstdd", "-"); // 서버단에서 조회하여 가져와야함. chk
  10522. ds_msgtrsm_info.setColumn(0, "rgsttm", "-"); // 서버단에서 조회하여 가져와야함. chk
  10523. ds_msgtrsm_info.setColumn(0, "sendphone", ""); // 서버단에서 조회하여 가져와야함. chk
  10524. ds_msgtrsm_info.setColumn(0, "anybodyyn", "N"); // 누구나 기본 'N', chk
  10525. ds_msgtrsm_info.setColumn(0, "sendflag", "O"); // 진료기본 'O', chk
  10526. ds_msgtrsm_info.setColumn(0, "senddate", ""); // 쿼리에서 timestamp chk
  10527. ds_msgtrsm_info.setColumn(0, "sendid", userid);
  10528. ds_msgtrsm_info.setColumn(0, "deliveid", "-"); // 화면에서선택. chk
  10529. ds_msgtrsm_info.setColumn(0, "recvdate", ""); // chk
  10530. ds_msgtrsm_info.setColumn(0, "recvid", ""); // chk
  10531. ds_msgtrsm_info.setColumn(0, "recvcnfmyn", "N"); // 기본 비연속 'N', chk
  10532. ds_msgtrsm_info.setColumn(0, "recvcnfmid", userid); //chk
  10533. ds_msgtrsm_info.setColumn(0, "sendmsg", ""); //sendmsgvalue); // 기본 처방코드, 처방명값가지고 시작. chk
  10534. ds_msgtrsm_info.setColumn(0, "recvmsg", ""); // chk
  10535. ds_msgtrsm_info.setColumn(0, "fstrgstrid", ""); // chk
  10536. ds_msgtrsm_info.setColumn(0, "fstrgstdt", ""); // chk
  10537. ds_msgtrsm_info.setColumn(0, "lastupdtrid", ""); // chk
  10538. ds_msgtrsm_info.setColumn(0, "lastupdtdt", ""); // chk
  10539. } else {
  10540. sysf_messageBox("기본정보가 ", "I004");
  10541. }
  10542. var objArg = new Object();
  10543. objArg.sName = this.name;
  10544. var rtn = frmf_open("SPPIZ01900", "SPPIZ01900", objArg, "", "", "", "", "", "", "", "", "", "M");// SPPIZ01900_심사환자메세지작성
  10545. if (!utlf_isNull(rtn)) {
  10546. }
  10547. }
  10548. function fOpenSMPIS00600Detail() {
  10549. fOpenSMPIS00600Call("false");
  10550. }
  10551. function fOpenSMPIS00600Detail2(){
  10552. fOpenSMPIS00600Call("true");
  10553. }
  10554. function fOpenSMPIS00600Call(cutonly){
  10555. var irow = ds_grd_ordlist.rowcount;
  10556. var todd = utlf_getCurrentDate();
  10557. var fromdd = todd.toDate().getAddDate(-6,"M").getDateFormat("YYYYMM");
  10558. ds_cond_smpis00600.clearData();
  10559. ds_cond_smpis00600.addRow();
  10560. ds_cond_smpis00600.setColumn(0, "patunitsrch" , gv_pid);
  10561. ds_cond_smpis00600.setColumn(0, "code" , ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd"));
  10562. ds_cond_smpis00600.setColumn(0, "clamym" , "");
  10563. ds_cond_smpis00600.setColumn(0, "clamymfrom" , fromdd);
  10564. ds_cond_smpis00600.setColumn(0, "clamdgfrom" , "");
  10565. ds_cond_smpis00600.setColumn(0, "clamymto" , todd);
  10566. ds_cond_smpis00600.setColumn(0, "clamdgto" , "");
  10567. ds_cond_smpis00600.setColumn(0, "clamflag" , "");
  10568. ds_cond_smpis00600.setColumn(0, "ioflag" , "I");
  10569. ds_cond_smpis00600.setColumn(0, "insukind" , gv_insukindcd);
  10570. ds_cond_smpis00600.setColumn(0, "orddeptcd" , gv_orddeptcd);
  10571. ds_cond_smpis00600.setColumn(0, "orddrid" , gv_medispclid);
  10572. ds_cond_smpis00600.setColumn(0, "cutonly" , cutonly);
  10573. frmf_open("SMPIS00600", "SMPIS00600", {args_ds_send:ds_cond_smpis00600}, "", "", "", "", "", "", "", "", "", "M");
  10574. }
  10575. function fOpenSMPIS00500Detail() {
  10576. var irow = ds_grd_ordlist.rowcount;
  10577. ds_cond_smpis00500.clearData();
  10578. ds_cond_smpis00500.addRow();
  10579. ds_cond_smpis00500.setColumn(0, "patunitsrch" , gv_pid);
  10580. ds_cond_smpis00500.setColumn(0, "code" , ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd"));
  10581. ds_cond_smpis00500.setColumn(0, "datecond" , "");
  10582. ds_cond_smpis00500.setColumn(0, "fromdd" , gv_indd1);
  10583. ds_cond_smpis00500.setColumn(0, "todd" , gv_todd);
  10584. ds_cond_smpis00500.setColumn(0, "ioflag" , "I");
  10585. ds_cond_smpis00500.setColumn(0, "orddrid" , gv_medispclid);
  10586. ds_cond_smpis00500.setColumn(0, "codecond" , "calc");
  10587. ds_cond_smpis00500.setColumn(0, "judgrid" , "");
  10588. ds_cond_smpis00500.setColumn(0, "cancer" , "");
  10589. ds_cond_smpis00500.setColumn(0, "large" , "");
  10590. ds_cond_smpis00500.setColumn(0, "middle" , "");
  10591. ds_cond_smpis00500.setColumn(0, "small" , "");
  10592. ds_cond_smpis00500.setColumn(0, "edicd" , "");
  10593. frmf_open("SMPIS00500", "SMPIS00500", {args_ds_send:ds_cond_smpis00500}, "", "", "", "", "", "", "", "", "", "M");
  10594. }
  10595. function fOpenDruginfo()
  10596. {
  10597. frmf_setParameter("calcscorcd", ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd"))
  10598. var rtn = frmf_open("SMADB00100", "SMADB00100", "", "", "", "", "", "", "", "", "", "", "M");
  10599. }
  10600. function fOpenDrugDic()
  10601. {
  10602. var sInDsnm = dsf_createDsRow("ds_cond_SMADB01900", [
  10603. {col:"srchdrugcd", type:"STRING", size:256, val:ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd")}
  10604. ]);
  10605. var objArg = new Object();
  10606. objArg.arg_ds_hidden_receivedata = eval(sInDsnm);
  10607. var rtn = frmf_open("SMADB01900", "SMADB01900", objArg, "", "", "", "", "", "", "", "", "", "M");
  10608. dsf_deleteDs(sInDsnm)
  10609. }
  10610. function fSetSrchInsuRcogBaseMngt()
  10611. {
  10612. var calcscorcd = ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd");
  10613. var calcscornm = ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "hngnm");
  10614. var objArg = new Object();
  10615. objArg.sCalcscorcd = calcscorcd;
  10616. objArg.sCalcscorcdnm = calcscornm;
  10617. objArg.sBhviewyn = "Y";
  10618. objArg.preveiwyn = "Y";
  10619. objArg.sLimtcd = "";
  10620. objArg.sAppdd = "";
  10621. var rtn = frmf_open("SPPIZ01600", "SPPIZ01600", objArg, "", "", "", "", "", "", "", "", "", "M");
  10622. }
  10623. function fSetSrchCalcScorCdPop()
  10624. {
  10625. frmf_setParameter("calcscorcd", ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd"));
  10626. frmf_setParameter("judgflag", "Y" );
  10627. // var objArg = new Object();
  10628. // objArg.sCalcscorcd = ds_grd_ordlist.getColumn(ds_grd_ordlist.rowposition, "snglcalcscorcd");
  10629. // objArg.sjudgflag = "Y";
  10630. //
  10631. var trgtManWindow = frmf_getChildWindow("SMPIC00100");
  10632. if (utlf_isNull(trgtManWindow))
  10633. {
  10634. frmf_open("SMPIC00100", "SMPIC00100", "", "", "", "", "", "", "", "", "", "", "M");
  10635. } else {
  10636. trgtManWindow.fPopupMode();
  10637. }
  10638. }
  10639. function fCnfmCdInsert()
  10640. {
  10641. var cur_row = ds_grd_ordlist.rowposition;
  10642. var edicd = ds_grd_ordlist.getColumn(cur_row, "edicd");
  10643. var selectededicd = "";
  10644. var selectededrow = "";
  10645. if (!utlf_isNull(edicd)) {
  10646. selectededicd = ds_grd_clcjlist.lookupExpr("edicd=='"+ edicd +"' && spclcd=='JT001'","edicd");
  10647. selectededrow = ds_grd_clcjlist.findRowExpr("edicd=='"+ edicd +"' && spclcd=='JT001'");
  10648. }
  10649. if (!utlf_isNull(selectededicd)) {
  10650. var objArg = new Object();
  10651. objArg.sCode = fSetCnfmcdSpclJudgOrder(cur_row, edicd , ds_grd_ordlist.getColumn(cur_row, "cnfmcd"));
  10652. var rtn = frmf_modal("SPPIZ01100","SPPIZ01100",objArg,"","","","","","","","","","M");
  10653. if (!utlf_isNull(rtn)) {
  10654. ds_grd_clcjlist.setColumn(selectededrow, "spclspec", rtn.sCode);
  10655. ds_grd_ordlist.setColumn(cur_row,"cnfmcd",rtn.sCode);
  10656. fSpclGridInsertRow();
  10657. }
  10658. } else {
  10659. var objArg = new Object();
  10660. objArg.sCode = fSetCnfmcdSpclJudgOrder(cur_row, edicd , ds_grd_ordlist.getColumn(cur_row, "cnfmcd"));
  10661. var rtn = frmf_modal("SPPIZ01100","SPPIZ01100",objArg,"","","","","","","","","","M");
  10662. if (!utlf_isNull(rtn)) {
  10663. var sprow = fSpclGridInsertRow();
  10664. ds_grd_clcjlist.setColumn(sprow, "edicd", edicd);
  10665. ds_grd_clcjlist.setColumn(sprow, "spclcd", "JT001");
  10666. ds_grd_clcjlist.setColumn(sprow, "unitflag", "J");
  10667. ds_grd_clcjlist.setColumn(sprow, "spclmemoflag", "E");
  10668. ds_grd_clcjlist.setColumn(sprow, "remfact", "X(5)");
  10669. ds_grd_clcjlist.setColumn(sprow, "spclspec", rtn.sCode);
  10670. ds_grd_ordlist.setColumn(cur_row,"cnfmcd",rtn.sCode);
  10671. fSpclGridInsertRow();
  10672. }
  10673. }
  10674. }
  10675. function group7_chk_totalsum_onclick(obj:CheckBox, e:ClickEventInfo)
  10676. {
  10677. fGetCalc("Y");
  10678. }
  10679. function grp_msg_button25_onclick(obj:Button, e:ClickEventInfo)
  10680. {
  10681. grp_msg.visible = false;
  10682. ds_grd_msg.clearData();
  10683. }
  10684. //중간청구마감
  10685. function fMidcomplete() {
  10686. // 20091126 JHP 수정추가
  10687. var ans = 0;
  10688. if(gv_patnm){
  10689. if(String(ipt_pid.text).length >1){
  10690. if(gv_indd1.length>1){
  10691. var oParam = {};
  10692. oParam.id = "TRPIJ00319";
  10693. oParam.service = "bfjudgapp.InHospJudg";
  10694. oParam.method = "reqNoActYn";
  10695. oParam.inds = "req=ds_send";
  10696. oParam.outds = "ds_noactyn=noactyn";
  10697. oParam.async = false;
  10698. oParam.callback = "cf_TRPIJ00319";
  10699. tranf_submit(oParam);
  10700. }
  10701. }
  10702. }
  10703. }
  10704. function cf_TRPIJ00319(sSvcId, nErrorCode, sErrorMsg) {
  10705. if(nErrorCode < 0) {
  10706. sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
  10707. return;
  10708. }
  10709. var noactyn = ds_noactyn.getColumn(0,"noactyn");
  10710. if (noactyn == 'Y') {
  10711. var objArg = new Object();
  10712. objArg.arg_tmp_pid = gv_pid;
  10713. frmf_modal("SPPIJ00900","SPPIJ00900", objArg, "", "", "", "", "", "", "", "", "", "M");
  10714. }
  10715. ds_hidden_midclam.clearData();
  10716. ds_hidden_midclam.addRow();
  10717. // (중간청구등록화면에 넘겨주는 데이터 추가 - pid, indd)
  10718. ds_hidden_midclam.setColumn(0, "pid" , gv_pid);
  10719. ds_hidden_midclam.setColumn(0, "indd" , gv_indd1);
  10720. ans = sysf_messageBox("심사 마감 할 경우", "S001");
  10721. if (ans == 6) {
  10722. dsf_createDsRow("ds_cond_req", [
  10723. {col:"pid", type:"STRING", size:256, val:gv_pid}
  10724. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  10725. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  10726. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  10727. , {col:"checkyn", type:"STRING", size:256, val:"Y"}
  10728. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  10729. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  10730. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  10731. , {col:"maxhopedd", type:"STRING", size:256, val:gv_dschnotidt.substr(0,8)}
  10732. ]);
  10733. var oParam = {};
  10734. oParam.id = "TRPIJ00315";
  10735. oParam.service = "bfjudgapp.InHospJudg";
  10736. oParam.method = "reqNotiDschStat";
  10737. oParam.inds = "req=ds_cond_req";
  10738. oParam.outds = "ds_endcnclstat_item11=endcnclstat ds_recal=recal ds_drginfo=drginfo";
  10739. oParam.async = false;
  10740. oParam.callback = "cf_TRPIJ00315";
  10741. tranf_submit(oParam);
  10742. if (gv_insukindcd == "11" || gv_insukindcd == "21" || gv_insukindcd == "22" ) {
  10743. oParam = {};
  10744. oParam.id = "TRPIJ00350";
  10745. oParam.service = "bfjudgapp.InHospJudg";
  10746. oParam.method = "reqGetIsclEdiuDiff";
  10747. oParam.inds = "req=ds_send";
  10748. oParam.outds = "ds_isclediudiff=isclediudiff";
  10749. oParam.async = false;
  10750. tranf_submit(oParam);
  10751. }
  10752. if (ds_isclediudiff.rowcount > 0) {
  10753. var msg = sysf_messageBox("EDI코드,단가가 불일치하는 처방내역이 있습니다. 계속 ", "S001");
  10754. if (msg != "6") {
  10755. return;
  10756. }
  10757. }
  10758. ds_getiscldiffinpt.clearData();
  10759. dsf_createDsRow("ds_cond_req", [
  10760. {col:"pid", type:"STRING", size:256, val:gv_pid}
  10761. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  10762. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  10763. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  10764. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  10765. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  10766. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  10767. , {col:"insukind", type:"STRING", size:256, val:gv_insukindcd}
  10768. , {col:"suppkind", type:"STRING", size:256, val:gv_suppkindcd}
  10769. , {col:"brateflag", type:"STRING", size:256, val:gv_brateflag}
  10770. ]);
  10771. var oParam = {};
  10772. oParam.id = "TRPIJ00352";
  10773. oParam.service = "bfjudgapp.InHospJudg";
  10774. oParam.method = "reqGetIsclDiffInpt";
  10775. oParam.inds = "req=ds_cond_req";
  10776. oParam.outds = "ds_getiscldiffinpt=rsltInfo";
  10777. oParam.async = false;
  10778. //oParam.callback = "cf_TRPIJ00352";
  10779. tranf_submit(oParam);
  10780. var check6 = ds_getiscldiffinpt.getColumn(0,"check6");
  10781. if (check6 == "Y") {
  10782. sysf_messageBox("계산자료 검증 시 오류가 체크되었습니다. 전체 재계산 후 문제 해결이 안 되면 전산실로 문의","I008");
  10783. return;
  10784. }
  10785. ds_init_dumpclamkeyexistyn.clearData();
  10786. var oParam = {};
  10787. oParam.id = "TRPIJ00324";
  10788. oParam.service = "bfjudgapp.InHospJudg";
  10789. oParam.method = "reqGetDumpClamkeyExistYn_xp";
  10790. oParam.inds = "req=ds_init_iteminfo";
  10791. oParam.outds = "ds_init_dumpclamkeyexistyn=dumpclamkeyexistyn";
  10792. oParam.async = false;
  10793. tranf_submit(oParam);
  10794. var dumpexistyn = ds_init_dumpclamkeyexistyn.getColumn(0, "dumpexistyn");
  10795. var dumpclamkeyexistyn = ds_init_dumpclamkeyexistyn.getColumn(0, "dumpclamkeyexistyn");
  10796. if (dumpexistyn == "Y") {
  10797. sysf_messageBox("입원 당일 외래에서 덤프되지 않은 처방이 존재합니다. 재원심사 화면에서 [▶Dump] 내역을 ","I007");
  10798. return;
  10799. }
  10800. if (dumpclamkeyexistyn == "Y") {
  10801. if(sysf_messageBox("외래 자료 수집이 된 재원 내 실시처방이 있습니다. 외래 사후 자료를 생성 삭제한 후 Dump처리 하십시오.", "Q003") == 6) {
  10802. var rtnVal = frmf_modal("SPPIJ03500","SPPIJ03500","","","","","","","","","","","M");
  10803. if (utlf_isNull(rtnVal)) {
  10804. sysf_messageBox("사유를", "C001");
  10805. return;
  10806. } else {
  10807. ds_init_iteminfo.setColumn(0,"dumprmk",rtnVal);
  10808. }
  10809. } else {
  10810. return;
  10811. }
  10812. }
  10813. if (fGetDrgOpenPopup("O") == false) {
  10814. return false;
  10815. }
  10816. fJudgAllEnd("C");
  10817. var trgtManWindow = frmf_findPopup("SMPID10100");
  10818. if (utlf_isNull(trgtManWindow))
  10819. {
  10820. var objArg = new Object();
  10821. objArg.arg_ds_temp = ds_hidden_midclam;
  10822. frmf_open("SMPID10100","SMPID10100", objArg, "", "", "", "", "", "", "", "", "", "M");
  10823. } else {
  10824. frmf_setFocusPop("SMPID10100");
  10825. trgtManWindow.fGetMidClamList();
  10826. }
  10827. }
  10828. }
  10829. function grp_calc_btn_midcancel_onclick(obj:Button, e:ClickEventInfo)
  10830. {
  10831. ds_hidden_midclam.clearData();
  10832. ds_hidden_midclam.addRow();
  10833. // (중간청구등록화면에 넘겨주는 데이터 추가 - pid, indd)
  10834. ds_hidden_midclam.setColumn(0, "pid" , gv_pid);
  10835. ds_hidden_midclam.setColumn(0, "indd" , gv_indd1);
  10836. ans = sysf_messageBox("심사 취소 할 경우", "S001");
  10837. if (ans == 6) {
  10838. dsf_createDsRow("ds_cond_req", [
  10839. {col:"pid", type:"STRING", size:256, val:gv_pid}
  10840. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  10841. , {col:"cretno", type:"STRING", size:256, val:gv_cretno}
  10842. , {col:"mskind", type:"STRING", size:256, val:gv_mskind}
  10843. , {col:"checkyn", type:"STRING", size:256, val:"Y"}
  10844. , {col:"ordfromdd", type:"STRING", size:256, val:gv_fromdd}
  10845. , {col:"fromdd", type:"STRING", size:256, val:gv_fromdd}
  10846. , {col:"todd", type:"STRING", size:256, val:gv_todd}
  10847. ]);
  10848. var oParam = {};
  10849. oParam.id = "TRPIJ00315";
  10850. oParam.service = "bfjudgapp.InHospJudg";
  10851. oParam.method = "reqNotiDschStat";
  10852. oParam.inds = "req=ds_cond_req";
  10853. oParam.outds = "ds_endcnclstat_item11=endcnclstat ds_recal=recal";
  10854. oParam.async = false;
  10855. oParam.callback = "cf_TRPIJ00315";
  10856. tranf_submit(oParam);
  10857. if (fGetDrgOpenPopup("O") == false) {
  10858. return false;
  10859. }
  10860. fJudgAllEnd("A");
  10861. }
  10862. }
  10863. function grp_calc_btn_autolimit_onclick(obj:Button, e:ClickEventInfo)
  10864. {
  10865. if (gv_insukindcd == "31" ) {
  10866. if (gv_suppkindcd != "18") {
  10867. sysf_messageBox("자보환자중 자손/책임/무보험만 한도잔액조회","I006");
  10868. return;
  10869. }
  10870. } else {
  10871. sysf_messageBox("자보환자중 자손/책임/무보험만 한도잔액조회","I006");
  10872. return;
  10873. }
  10874. var sppmc04500 = new Object();
  10875. sppmc04500.sPid = gv_pid;
  10876. frmf_modal("SPPMC04500","SPPMC04500", sppmc04500, "", "", "", "", "", "", "", "", "", "M");
  10877. }
  10878. function btn_patspcfyn_onclick(obj:Button, e:ClickEventInfo)
  10879. {
  10880. var inds = dsf_createDsRow("ds_cond_req", [
  10881. {col:"pid", type:"STRING", size:256, val:gv_pid}
  10882. , {col:"indd", type:"STRING", size:256, val:gv_indd1}
  10883. , {col:"srchcond", type:"STRING", size:256, val:"1"}
  10884. ]);
  10885. frmf_setParameter("pid", gv_pid);
  10886. var objArg = new Object();
  10887. objArg.arg_ds_source = ds_cond_req;
  10888. frmf_modal("SMPMC01300","SMPMC01300", objArg, "", "", "", "", "", "", "", "", "", "M");
  10889. var oParam = {};
  10890. oParam.id = "TRPID20308";
  10891. oParam.service = "aftjudgapp.InAftJudg";
  10892. oParam.method = "reqExeProbJudgFlag";
  10893. oParam.inds = "req="+inds;
  10894. oParam.outds = "ds_cond_smpmc01300=cond ds_rslt_smpmc01300=rslt";
  10895. oParam.async = true;
  10896. oParam.progress = false;
  10897. oParam.callback = "cf_TRPID20308";
  10898. tranf_submit(oParam);
  10899. }
  10900. function cf_TRPID20308(sSvcId, nErrorCode, sErrorMsg) {
  10901. if(nErrorCode < 0) return;
  10902. dsf_setDefaultVal(ds_rslt_smpmc01300, "patspcfyn:N");
  10903. var patspcfyn = ds_rslt_smpmc01300.getColumn(0,"patspcfyn");
  10904. ds_init_iteminfo.setColumn(0,"probjudgflag", patspcfyn);
  10905. fRefrhVar(ds_init_iteminfo);
  10906. // 특이환자 버튼 설정
  10907. if (patspcfyn == "Y") { // 특이환자 버튼 설정
  10908. btn_patspcfyn.style.backgroundImage = "URL('theme://images/icon_btn_s.png')"; // 주황색
  10909. } else {
  10910. btn_patspcfyn.style.backgroundImage = "URL('theme://images/icon_btn.png')"; // 파란색
  10911. }
  10912. }
  10913. function grp_calc_chk_showsubtotal_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  10914. {
  10915. if (obj.value != "Y") {
  10916. ds_grd_ordlist.keystring = "";
  10917. } else {
  10918. ds_grd_ordlist.keystring = "G:item1";
  10919. }
  10920. }
  10921. function grp_calc_btn_ave_onclick(obj:Button, e:ClickEventInfo)
  10922. {
  10923. if (grp_calc.Div00.visible == true){
  10924. grp_calc.Div00.visible = false;
  10925. } else {
  10926. grp_calc.Div00.position.x = 0;
  10927. grp_calc.Div00.position.y = obj.position.y;
  10928. grp_calc.Div00.visible = true;
  10929. }
  10930. }
  10931. function cf_TRPIJ00346(sSvcId, nErrorCode, sErrorMsg) {
  10932. if(nErrorCode < 0) {
  10933. sysf_messageBox("cf_TRPIJ00346 데이터 가","I004");
  10934. return;
  10935. }
  10936. btn_nst.enable = false;
  10937. btn_nst.text = "NST";
  10938. var cnststat = ds_cnstinfo.getColumn(0,"cnststat");
  10939. var nstcnt = ds_cnstinfo.getColumn(0,"nstcnt")
  10940. if (cnststat != "-" && !utlf_isNull(cnststat)){
  10941. btn_nst.enable = true;
  10942. if (nstcnt >= "2" && !utlf_isNull(nstcnt)){
  10943. btn_nst.text = "NST : " + cnststat + "(" + nstcnt + ")" ;
  10944. } else {
  10945. btn_nst.text = "NST : " + cnststat;
  10946. }
  10947. if (cnststat == "회신" || cnststat == "회신확정"){
  10948. btn_nst.style.font = "Dotum,9,bold"
  10949. } else {
  10950. btn_nst.style.font = "";
  10951. }
  10952. }
  10953. else
  10954. {
  10955. btn_nst.style.font = "";
  10956. }
  10957. }
  10958. function cf_TRPIJ00347(sSvcId, nErrorCode, sErrorMsg)
  10959. {
  10960. if(nErrorCode < 0)
  10961. {
  10962. sysf_messageBox("cf_TRPIJ00347 데이터 가","I004");
  10963. return;
  10964. }
  10965. var todayoutyn = ds_erjininfo.getColumn(0,"todayoutyn");
  10966. var dumpinyn = ds_erjininfo.getColumn(0,"dumpinyn");
  10967. var dumpoutyn = ds_erjininfo.getColumn(0,"dumpoutyn");
  10968. var dcuc = ds_erjininfo.getColumn(0,"dcuc");
  10969. var erjinyn = ds_erjininfo.getColumn(0,"erjinyn");
  10970. var jinyn = ds_erjininfo.getColumn(0,"jinyn");
  10971. var nog3reasnyn = ds_erjininfo.getColumn(0,"nog3reasnyn");
  10972. var pamprobjudgflag = ds_erjininfo.getColumn(0,"pamprobjudgflag");
  10973. var midcflag = ds_erjininfo.getColumn(0,"midcflag");
  10974. var bornbaby = ds_erjininfo.getColumn(0,"bornbaby");
  10975. var msyn = ds_erjininfo.getColumn(0,"msyn");
  10976. var receiptyn = ds_erjininfo.getColumn(0,"receiptyn");
  10977. var futureinsuyn = ds_erjininfo.getColumn(0,"futureinsuyn");
  10978. var maxhopedd = ds_erjininfo.getColumn(0,"maxhopedd");
  10979. // KTAS 4,5등급 환자에 응급 전문의진찰료 발생 시 메세지 (2016.01.14 LEJ)
  10980. if (erjinyn == "Y")
  10981. {
  10982. lf_setAlramMessage("KTAS 4,5등급 환자에 응급 전문의진찰료가 발생했습니다. 확인하십시오.");
  10983. }
  10984. if (jinyn == "Y")
  10985. {
  10986. lf_setAlramMessage("동일과 내 1회 이상 진찰료(응급 전문의진찰료 포함)가 발생했습니다. 확인하십시오.");
  10987. }
  10988. if (nog3reasnyn == "Y")
  10989. { //응급실 관리료 여부 체크
  10990. lf_setAlramMessage("응급 의료관리료 미발생 환자입니다. 확인하십시오.");
  10991. }
  10992. if (todayoutyn == "Y" && gv_lastjudgdt == "-")
  10993. { // 당일외래진료후 입원환자 및 덤프된 원내,원외 약제 체크 알럿
  10994. if (dumpinyn == "N" && dumpoutyn == "N")
  10995. {
  10996. lf_setAlramMessage("당일 외래진료 후 입원처리된 환자입니다.");
  10997. }
  10998. else if (dumpinyn == "Y" && dumpoutyn == "N")
  10999. {
  11000. lf_setAlramMessage("당일 외래진료 후 입원처리되고 원내 약제 덤프처방이 있는 환자입니다.");
  11001. }
  11002. else if (dumpinyn == "N" &&dumpoutyn == "Y")
  11003. {
  11004. lf_setAlramMessage("당일 외래진료 후 입원처리되고 원외 약제 덤프처방이 있는 환자입니다.");
  11005. }
  11006. else if (dumpinyn == "Y" && dumpoutyn == "Y")
  11007. {
  11008. lf_setAlramMessage("당일 외래진료 후 입원처리되고 원내/원외 약제 덤프처방이 있는 환자입니다.");
  11009. }
  11010. }
  11011. if ((gv_insukindcd != "21" && gv_insukindcd != "22") && (gv_cfe != "C" && gv_cfe != "E" && gv_cfe != "F") && dcuc == "G")
  11012. {
  11013. lf_setAlramMessage("긴급지원 대상자 입니다. 확인하십시오.");
  11014. cap_g1.visible = true;
  11015. }
  11016. else
  11017. {
  11018. cap_g1.visible = false;
  11019. }
  11020. if (pamprobjudgflag == "Y")
  11021. { // 특이환자 버튼 설정
  11022. btn_patspcfyn.style.backgroundImage = "URL('theme://images\\icon_btn_s.png')"; // 주황색
  11023. }
  11024. else
  11025. {
  11026. btn_patspcfyn.style.backgroundImage = "URL('theme://images\\icon_btn.png')"; // 파란색
  11027. }
  11028. //
  11029. if(midcflag == "Y")
  11030. {
  11031. grp_calc.btn_midregist.class = "btn2";
  11032. grp_calc.btn_midregist.enable = true;
  11033. //grp_calc.btn_midregistyn.enable = false;
  11034. grp_calc.btn_midregistyn.style.font = ""
  11035. grp_calc.btn_midcomplete.enable = true;
  11036. grp_calc.btn_midcancel.enable = true;
  11037. grp_calc.btn_midcancel.style.font = "Dotum,9,bold"
  11038. }
  11039. else
  11040. {
  11041. grp_calc.btn_midregist.class = "btn2";
  11042. //grp_calc.btn_midregistyn.enable = true;
  11043. grp_calc.btn_midregistyn.style.font = ""
  11044. grp_calc.btn_midcomplete.enable = false;
  11045. grp_calc.btn_midcomplete.style.font = ""
  11046. grp_calc.btn_midcancel.enable = false;
  11047. grp_calc.btn_midcancel.style.font = ""
  11048. if (gv_midregistyn == "Y")
  11049. { //분할 제외 대상자 여부
  11050. grp_calc.btn_midregistyn.class = "btn2";
  11051. grp_calc.btn_midregistyn.style.font = "";
  11052. grp_calc.btn_midregist.enable = false;
  11053. grp_calc.btn_midregist.style.font = "";
  11054. }
  11055. else
  11056. {
  11057. grp_calc.btn_midregistyn.class = "btn2";
  11058. grp_calc.btn_midregistyn.style.font = ""
  11059. grp_calc.btn_midregist.enable = true;
  11060. grp_calc.btn_midregist.style.font = "Dotum,9,bold";
  11061. grp_calc.btn_midregist.class = "btn5";
  11062. }
  11063. }
  11064. gv_bornbaby = bornbaby;
  11065. if(bornbaby == "Y")
  11066. {
  11067. gv_bornbaby = "Y";
  11068. btn_babymother.visible = true;
  11069. btn_babymother.class = "btn5";
  11070. btn_babymother.style.font = "Dotum,9,bold"
  11071. //btn_babymother.style.color = "darkblue";
  11072. }
  11073. else
  11074. {
  11075. btn_babymother.class = "btn5";
  11076. btn_babymother.visible = false;
  11077. btn_babymother.style.font = ""
  11078. }
  11079. gv_msyn = msyn;
  11080. ds_init_iteminfo.setColumn(0, "msyn", msyn);
  11081. gv_receiptyn = receiptyn;
  11082. ds_init_iteminfo.setColumn(0, "receiptyn", receiptyn);
  11083. gv_futureinsuyn = futureinsuyn;
  11084. ds_init_iteminfo.setColumn(0, "futureinsuyn", futureinsuyn);
  11085. gv_maxhopedd = maxhopedd;
  11086. ds_init_iteminfo.setColumn(0, "maxhopedd", maxhopedd);
  11087. grp_calc.btn_save.enable = true;
  11088. grp_calc.btn_recalc.enable = true;
  11089. grp_calc.btn_sugicalc.enable = true;
  11090. grp_calc.btn_dclrtclose.enable = true;
  11091. grp_calc.btn_dschclose.enable = true;
  11092. grp_calc.btn_totjudgclose.enable = true;
  11093. grp_calc.btn_dschclosecancel.enable = true;
  11094. grp_calc.btn_dschclosecancel.style.font = "";
  11095. cap_rare.visible= false;
  11096. cap_tb.visible= false;
  11097. cap_c1c.visible= false;
  11098. cap_c2e.visible= false;
  11099. cap_c2f.visible= false;
  11100. cap_cp.visible= false;
  11101. // 심사중
  11102. if (ds_send.getColumn(0,"readonly") == "Y")
  11103. {
  11104. grp_calc.btn_save.enable = false;
  11105. grp_calc.btn_recalc.enable = false;
  11106. grp_calc.btn_recalc.style.font = "";
  11107. grp_calc.btn_recalc.style.color = "";
  11108. grp_calc.btn_sugicalc.enable = false;
  11109. grp_calc.btn_dclrtclose.enable = false;
  11110. grp_calc.btn_dschclose.enable = false;
  11111. grp_calc.btn_dschclose.class = "btn2";
  11112. grp_calc.btn_dschclose.style.font = "";
  11113. grp_calc.btn_totjudgclose.enable = false;
  11114. grp_calc.btn_totjudgclose.class = "btn2";
  11115. grp_calc.btn_totjudgclose.style.font = "";
  11116. grp_calc.btn_dschclosecancel.enable = false;
  11117. grp_calc.btn_dschclosecancel.style.font = "";
  11118. grp_calc.btn_midregist.enable = false;
  11119. grp_calc.btn_midregist.style.font = "";
  11120. //grp_calc.btn_midregistyn.enable = false;
  11121. ds_hidden_item1.setColumn(0,"chksave", "Y"); //상세화면 저장버튼 처리를 위해 넣어 놓는다.
  11122. }
  11123. else if (gv_indschacptstat == "D")
  11124. { // 퇴원이 완료되면 세부계산내역 저장이 안되게 20080911
  11125. lf_setAlramMessage("퇴원 처리된 환자입니다. 요율변경 및 계산내역 수정은 할 수 없습니다.");
  11126. grp_calc.btn_save.enable = false;
  11127. grp_calc.btn_recalc.enable = false;
  11128. grp_calc.btn_recalc.style.font = "";
  11129. grp_calc.btn_recalc.style.color = "";
  11130. grp_calc.btn_sugicalc.enable = false;
  11131. grp_calc.btn_dclrtclose.enable = false;
  11132. grp_calc.btn_dschclose.enable = false;
  11133. grp_calc.btn_dschclose.class = "btn2";
  11134. grp_calc.btn_dschclose.style.font = "";
  11135. grp_calc.btn_totjudgclose.enable = false;
  11136. grp_calc.btn_totjudgclose.class = "btn2";
  11137. grp_calc.btn_totjudgclose.style.font = "";
  11138. grp_calc.btn_dschclosecancel.enable =false;
  11139. grp_calc.btn_dschclosecancel.style.font = "";
  11140. grp_calc.btn_midregist.enable = false;
  11141. grp_calc.btn_midregist.style.font = "";
  11142. //grp_calc.btn_midregistyn.enable = false;
  11143. ds_hidden_item1.setColumn(0,"chksave", "Y"); //상세화면 저장버튼 처리를 위해 넣어 놓는다.
  11144. }
  11145. else if (gv_indschacptstat == "T" && (gv_dschjudgprcsstat == "C" || gv_dschjudgprcsstat == "E" || gv_dschjudgprcsstat == "G" ) )
  11146. {
  11147. //심사상태
  11148. lf_setAlramMessage("가퇴원 처리가된 마감 환자입니다. 요율변경 및 계산내역 수정은 할 수 없습니다.");
  11149. grp_calc.btn_save.enable = false;
  11150. grp_calc.btn_recalc.enable = false;
  11151. grp_calc.btn_recalc.style.font = "";
  11152. grp_calc.btn_recalc.style.color = "";
  11153. grp_calc.btn_sugicalc.enable = false;
  11154. grp_calc.btn_dclrtclose.enable = false;
  11155. grp_calc.btn_dschclose.enable = false;
  11156. grp_calc.btn_dschclose.class = "btn2";
  11157. grp_calc.btn_dschclose.style.font = "";
  11158. grp_calc.btn_totjudgclose.enable = false;
  11159. grp_calc.btn_totjudgclose.class = "btn2";
  11160. grp_calc.btn_totjudgclose.style.font = "";
  11161. grp_calc.btn_dschclosecancel.enable = true;
  11162. grp_calc.btn_dschclosecancel.style.font = "Dotum,9,bold";
  11163. grp_calc.btn_midregist.enable = false;
  11164. grp_calc.btn_midregist.style.font = "";
  11165. //grp_calc.btn_midregistyn.enable = false;
  11166. ds_hidden_item1.setColumn(0,"chksave", "Y"); //상세화면 저장버튼 처리를 위해 넣어 놓는다.
  11167. }
  11168. else if (gv_dschjudgprcsstat == "B" )
  11169. {
  11170. if ( gv_lastjudgendid != gv_userid )
  11171. {
  11172. lf_setAlramMessage(gv_lastjudgendnm+ "님이 퇴원심사 진행중입니다. 저장은 할 수 없습니다.");
  11173. grp_calc.btn_save.enable = false;
  11174. grp_calc.btn_recalc.enable = false;
  11175. grp_calc.btn_recalc.style.font = "";
  11176. grp_calc.btn_recalc.style.color = "";
  11177. grp_calc.btn_sugicalc.enable =false;
  11178. grp_calc.btn_dclrtclose.enable =false;
  11179. grp_calc.btn_dschclose.enable = false;
  11180. grp_calc.btn_dschclose.class = "btn2";
  11181. grp_calc.btn_dschclose.style.font = "";
  11182. grp_calc.btn_totjudgclose.enable = false;
  11183. grp_calc.btn_totjudgclose.class = "btn2";
  11184. grp_calc.btn_totjudgclose.style.font = "";
  11185. grp_calc.btn_dschclosecancel.enable = false;
  11186. grp_calc.btn_dschclosecancel.style.font = "";
  11187. grp_calc.btn_midregist.enable = false;
  11188. grp_calc.btn_midregist.style.font = "";
  11189. //grp_calc.btn_midregistyn.enable = false;
  11190. ds_hidden_item1.setColumn(0,"chksave", "Y"); //상세화면 저장버튼 처리를 위해 넣어 놓는다.
  11191. ds_send.setColumn(0,"readonly","Y")
  11192. }
  11193. else
  11194. {
  11195. grp_calc.btn_dschclosecancel.enable = false;
  11196. grp_calc.btn_dschclosecancel.style.font = "";
  11197. if(gv_brateflag == "O"){
  11198. grp_calc.btn_midregist.class = "btn2";
  11199. grp_calc.btn_midregist.enable = false;
  11200. grp_calc.btn_midregist.style.font = "";
  11201. grp_calc.btn_midregistyn.class = "btn2";
  11202. //grp_calc.btn_midregistyn.enable = false;
  11203. grp_calc.btn_midregistyn.style.font = "";
  11204. }
  11205. if (gv_dschnotiyn == "Y")
  11206. { // 퇴원확정인 경우 예고 심사 비활성
  11207. grp_calc.btn_dclrtclose.enable = false;
  11208. }
  11209. else if (gv_dschdclrtyn == "Y" && gv_dschnotiyn == "N")
  11210. { // 퇴원예고인 경우 퇴원마감, 통합마감 비활성
  11211. grp_calc.btn_dschclose.enable = false;
  11212. grp_calc.btn_dschclose.class = "btn2";
  11213. grp_calc.btn_dschclose.style.font = "";
  11214. grp_calc.btn_totjudgclose.enable = false;
  11215. grp_calc.btn_totjudgclose.class = "btn2";
  11216. grp_calc.btn_totjudgclose.style.font = "";
  11217. }
  11218. }
  11219. // 심사완료, 통합심사완료
  11220. }
  11221. else if (gv_dschjudgprcsstat == "C" || gv_dschjudgprcsstat == "E" || gv_dschjudgprcsstat == "G" )
  11222. {
  11223. lf_setAlramMessage("퇴원마감이나 통합심사마감 처리가된 환자입니다. 요율변경 및 계산내역 수정은 할 수 없습니다.");
  11224. grp_calc.btn_save.enable = false;
  11225. grp_calc.btn_recalc.enable = false;
  11226. grp_calc.btn_recalc.style.font = "";
  11227. grp_calc.btn_recalc.style.color = "";
  11228. grp_calc.btn_sugicalc.enable = false;
  11229. grp_calc.btn_dclrtclose.enable = false;
  11230. grp_calc.btn_dschclose.enable = false;
  11231. grp_calc.btn_dschclose.class = "btn2";
  11232. grp_calc.btn_dschclose.style.font = "";
  11233. grp_calc.btn_totjudgclose.enable = false;
  11234. grp_calc.btn_totjudgclose.class = "btn2";
  11235. grp_calc.btn_totjudgclose.style.font = "";
  11236. grp_calc.btn_midregist.enable = false;
  11237. grp_calc.btn_midregist.style.font = "";
  11238. grp_calc.btn_dschclose.style.font = "";
  11239. //grp_calc.btn_midregistyn.enable = false;
  11240. grp_calc.btn_dschclosecancel.enable = true;
  11241. grp_calc.btn_dschclosecancel.style.font = "Dotum,9,bold";
  11242. ds_hidden_item1.setColumn(0,"chksave", "Y"); //상세화면 저장버튼 처리를 위해 넣어 놓는다.
  11243. }
  11244. else if (gv_dschjudgprcsstat == "A" && gv_dschnotiyn == "N")
  11245. {
  11246. grp_calc.btn_dschclose.enable = false;
  11247. grp_calc.btn_dschclose.class = "btn2";
  11248. grp_calc.btn_dschclose.style.font = "";
  11249. grp_calc.btn_totjudgclose.enable = false;
  11250. grp_calc.btn_totjudgclose.class = "btn2";
  11251. grp_calc.btn_totjudgclose.style.font = "";
  11252. grp_calc.btn_dschclosecancel.enable = false;
  11253. grp_calc.btn_dschclosecancel.style.font = "";
  11254. if(gv_brateflag == "I"){
  11255. grp_calc.btn_midregist.class = "btn5";
  11256. grp_calc.btn_midregist.enable = true;
  11257. grp_calc.btn_midregist.style.font = "Dotum,9,bold";
  11258. } else {
  11259. grp_calc.btn_midregist.class = "btn2";
  11260. grp_calc.btn_midregist.enable = false;
  11261. grp_calc.btn_midregist.style.font = "";
  11262. }
  11263. if (gv_dschdclrtyn == "N")
  11264. { // 퇴원예고 안 된 경우 예고심사 비활성
  11265. grp_calc.btn_dclrtclose.enable = false;
  11266. }
  11267. }
  11268. else if (gv_dschjudgprcsstat == "A" && gv_dschnotiyn == "Y")
  11269. {
  11270. grp_calc.btn_dschclosecancel.enable = false;
  11271. grp_calc.btn_dschclosecancel.style.font = "";
  11272. grp_calc.btn_dclrtclose.enable = false;
  11273. }
  11274. if (gv_rareyn == "Y")
  11275. {
  11276. cap_rare.visible= true;
  11277. }
  11278. else if(gv_rareyn == "T")
  11279. {
  11280. cap_tb.visible= true;
  11281. }
  11282. if (gv_cfe == "C")
  11283. { // 차상위 표시
  11284. cap_c1c.visible= true;
  11285. }
  11286. else if (gv_cfe == "E")
  11287. {
  11288. cap_c2e.visible= true;
  11289. }
  11290. else if (gv_cfe == "F")
  11291. {
  11292. cap_c2f.visible= true;
  11293. }
  11294. pm_flag.visible=false; // 완화의료 시범사업...
  11295. if (gv_calcscorrecalflag == "7" || gv_calcscorrecalflag == "8")
  11296. {
  11297. pm_flag.visible=true;
  11298. }
  11299. if (gv_cpyn == "Y")
  11300. {
  11301. cap_cp.visible=true;
  11302. }
  11303. if (gv_sixtimyn == "Y")
  11304. {
  11305. swt_spclmemo.tabindex = 0;
  11306. }
  11307. else
  11308. {
  11309. swt_spclmemo.tabindex = 1;
  11310. }
  11311. if(gv_dschnotiyn == "Y")
  11312. {
  11313. //group7.btn_dschmemo.visible = true;
  11314. group7.btn_dschmemo.class = "btn5";
  11315. group7.btn_dschmemo.style.color = "#ff0066";
  11316. }
  11317. else
  11318. {
  11319. group7.btn_dschmemo.class = "btn5";
  11320. group7.btn_dschmemo.visible = false;
  11321. }
  11322. if(gv_insukindcd == "11")
  11323. {
  11324. if(gv_ownrate == "20")
  11325. {
  11326. opt_suppkind.class = "output_fix";
  11327. opt_ownrate.class = "output_fix";
  11328. }
  11329. else
  11330. {
  11331. opt_suppkind.style.color = "#ff0066";
  11332. opt_ownrate.style.color = "#ff0066";
  11333. }
  11334. //보호 2종인경우 본인부담율 15%가 아니면 붉은색으로 표시해준다.
  11335. }
  11336. else if(gv_insukindcd == "22")
  11337. {
  11338. if(gv_ownrate == "15")
  11339. {
  11340. opt_suppkind.class = "output_fix";
  11341. opt_ownrate.class = "output_fix";
  11342. }
  11343. else
  11344. {
  11345. opt_suppkind.style.color = "#ff0066";
  11346. opt_ownrate.style.color = "#ff0066";
  11347. }
  11348. //나머지는 정상 색깔로 표시해 준다.
  11349. }
  11350. else
  11351. {
  11352. opt_suppkind.class = "output_fix";
  11353. opt_ownrate.class = "output_fix";
  11354. }
  11355. fGetIsclList(ds_send.getColumn(0,"paramflag"), "");
  11356. }
  11357. // 중간청구등록 화면에서 조회된 환자가 중간 청구 등록이 된 경우.
  11358. function fSetMidregist(midcflag) {
  11359. grp_calc.btn_midregist.enable = true;
  11360. if(midcflag == "Y")
  11361. {
  11362. grp_calc.btn_midregist.class = "btn5";
  11363. grp_calc.btn_midregist.style.font = "Dotum,9,bold"
  11364. //grp_calc.btn_midregistyn.enable = false;
  11365. grp_calc.btn_midregistyn.style.font = ""
  11366. grp_calc.btn_midcomplete.enable = true;
  11367. grp_calc.btn_midcomplete.style.font = "Dotum,9,bold"
  11368. grp_calc.btn_midcancel.enable = true;
  11369. grp_calc.btn_midcancel.style.font = "Dotum,9,bold"
  11370. }
  11371. else
  11372. {
  11373. grp_calc.btn_midregist.class = "btn2";
  11374. grp_calc.btn_midregist.style.font = ""
  11375. grp_calc.btn_midregistyn.class = "btn2";
  11376. grp_calc.btn_midregistyn.style.font = "Dotum,9,bold"
  11377. //grp_calc.btn_midregistyn.enable = true;
  11378. grp_calc.btn_midcomplete.enable = false;
  11379. grp_calc.btn_midcomplete.style.font = ""
  11380. grp_calc.btn_midcancel.enable = false;
  11381. grp_calc.btn_midcancel.style.font = ""
  11382. }
  11383. }
  11384. function fGetKDrgOpenPopup(flag){
  11385. frmf_setParameter("pid", gv_pid);
  11386. frmf_setParameter("indd", gv_indd1);
  11387. frmf_setParameter("ordfromdd", gv_fromdd);
  11388. frmf_setParameter("cretno", gv_cretno);
  11389. frmf_setParameter("drgmstat", flag);
  11390. frmf_open("SPPIJ04000","SPPIJ04000", "", "", "", "", "", "", "", "", "", "", "M");
  11391. }
  11392. function grp_calc_btn_kdrg_onclick(obj:Button, e:ClickEventInfo)
  11393. {
  11394. fGetKDrgOpenPopup();
  11395. }
  11396. function btn_histref_onclick(obj:Button, e:ClickEventInfo)
  11397. {
  11398. btn_histref_onmouseenter(obj, e);
  11399. }
  11400. function grp_calc_button2_onclick(obj:Button, e:ClickEventInfo)
  11401. {
  11402. var ordfromdd;
  11403. var ordtodd;
  11404. ordfromdd = gv_indd1;
  11405. if (!utlf_isNull(gv_lastmdlclamdd) && gv_lastmdlclamdd != "-") {
  11406. ordfromdd = gv_lastmdlclamdd;
  11407. }
  11408. ordtodd = gv_today;
  11409. if (!utlf_isNull(gv_maxhopedd))
  11410. {
  11411. ordtodd = gv_maxhopedd;
  11412. }
  11413. if (gv_indschacptstat == "D") {
  11414. ordtodd = gv_dschdd;
  11415. }
  11416. ds_send.setColumn(0, "ordfromdd", ordfromdd);
  11417. ds_send.setColumn(0, "ordtodd", ordtodd);
  11418. if(gv_patnm){
  11419. //처방내역을 갖고 온다.
  11420. fGetIsclList("IPHS", "Y");
  11421. }
  11422. }
  11423. function grp_calc_chk_showitemcoloryn_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  11424. {
  11425. fGetIsclList("IPHS","Y")
  11426. }
  11427. function fGetOperStat() {
  11428. ds_operstat.clearData();
  11429. var oParam = {};
  11430. oParam.id = "TRPIJ00314";
  11431. oParam.service = "bfjudgapp.InHospJudg";
  11432. oParam.method = "reqGetOperStat";
  11433. oParam.inds = "req=ds_send";
  11434. oParam.outds = "ds_operstat=operstat";
  11435. oParam.async = true;
  11436. oParam.progress = false;
  11437. oParam.callback = "cf_TRPIJ00314";
  11438. tranf_submit(oParam);
  11439. }
  11440. function swt_spclmemo_case_spclspec_grd_clcjlist_ondropdown(obj:Grid, e:GridEditEventInfo)
  11441. {
  11442. fds_P0117list_J.binddataset = "";
  11443. fds_P0117list_J.binddataset = ds_P0117list;
  11444. fds_P0117list_M.binddataset = "";
  11445. fds_P0117list_M.binddataset = ds_P0117list;
  11446. }
  11447. function grp_calc_ipt_edicd_onkeyup(obj:Edit, e:KeyEventInfo)
  11448. {
  11449. if(e.keycode == 13) {
  11450. if (!utlf_isNull(obj.value)){
  11451. if (String(obj.value).length < 2) { // 전체
  11452. sysf_messageBox("edi코드는 2자리 이상", "C001");
  11453. return ;
  11454. }
  11455. ds_hidden_list1_isclcond.setColumn(0,"edicd", " String(edicd).indexOf('"+obj.value+"') >= 0 ");
  11456. } else {
  11457. ds_hidden_list1_isclcond.setColumn(0,"edicd", "");
  11458. }
  11459. fGetSelectedOrderData();
  11460. }
  11461. }
  11462. function grp_calc_grd_ordlist_onheadclick(obj:Grid, e:GridClickEventInfo)
  11463. {
  11464. if (grp_calc.chk_showsubtotal.value == 'Y'){
  11465. sysf_messageBox("소계보기 상태에서는 정렬을", "E001");
  11466. }
  11467. // grdf_setGridSort(obj);
  11468. // obj.updateToDataset();
  11469. //alert(0)
  11470. //grdf_gridSort(grp_calc.grd_ordlist, e);
  11471. }
  11472. function btn_nst_onclick(obj:Button, e:ClickEventInfo)
  11473. {
  11474. var objArg = new Object();
  11475. objArg.arg_ds_temp_cnstinfo = ds_cnstinfo;
  11476. frmf_modal("SMADC02600", "SMADC02600", objArg, null, 1, 0, 0, null, null, null, null, null, "M");
  11477. }
  11478. function btn_no_onclick(obj:Button, e:ClickEventInfo)
  11479. {
  11480. var parm = gv_rrgstno.substr(0,6) +
  11481. gv_rrgstno.substr(7,7) + "▦" + //주민번호
  11482. gv_patnm + "▦" + //이름
  11483. utlf_getCurrentDate() + "▦" + //입원일
  11484. gv_cretno + "▦" + //생성번호
  11485. gv_ordtype + "▦" + //진료형태
  11486. gv_dschdd + "▦" + //퇴원일자
  11487. "" + "▦" + //본인일부부담금
  11488. "" + "▦" + //기관부담금
  11489. gv_pid + "▦" + //등록번호
  11490. gv_orddeptcd + "▦" ; //진료과
  11491. frmf_setParameter("SPPMC03900_PARM",parm);
  11492. frmf_modal("SPPMC03900", "SPPMC03900", "" ,"","", 10, 10, "","","","","","M");
  11493. var oParam = {};
  11494. oParam.id = "TRPIJ00340";
  11495. oParam.service = "bfjudgapp.InHospJudg";
  11496. oParam.method = "reqGetRareCancerMsg_xp";
  11497. oParam.inds = "req=ds_send";
  11498. oParam.outds = "ds_init_cmb_itemraremsg=rarecancermsg";
  11499. oParam.async = true;
  11500. oParam.progress = false;
  11501. oParam.callback = "cf_TRPIJ00340";
  11502. tranf_submit(oParam);
  11503. }
  11504. function group7_btn_dschmemo_onclick(obj:Button, e:ClickEventInfo)
  11505. {
  11506. }
  11507. function swt_spclmemo_case_judgrmemo_tar_dumprmk_oneditclick(obj:TextArea, e:EditClickEventInfo)
  11508. {
  11509. }
  11510. function ipt_pid_onsetfocus(obj:Edit, e:SetFocusEventInfo)
  11511. {
  11512. obj.autoselect = true;
  11513. }
  11514. function grp_calc_cap_prcp_onclick(obj:Static, e:ClickEventInfo)
  11515. {
  11516. if (grp_calc.position.top != "112"){
  11517. btn_mt004.sendToBack();
  11518. btn_attData.sendToBack();
  11519. button1.sendToBack();
  11520. grp_calc.position.top = 112;
  11521. } else {
  11522. btn_mt004.bringToFront();
  11523. btn_attData.bringToFront();
  11524. button1.bringToFront();
  11525. grp_calc.position.top = grp_calc_ctop;
  11526. }
  11527. }
  11528. function grp_calc_grd_ordlist_oncellclick(obj:Grid, e:GridClickEventInfo)
  11529. {
  11530. if (obj.currentcell == obj.getBindCellIndex("body","cnfmcd")){
  11531. fCnfmCdInsert();
  11532. }
  11533. }
  11534. function grp_calc_grd_ordlist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
  11535. {
  11536. if (obj.currentcell == obj.getBindCellIndex("body","cnfmcd")){
  11537. fCnfmCdInsert();
  11538. }
  11539. }
  11540. function swt_spclmemo_ondevicebuttonup(obj:Tab, e:DeviceButtonEventInfo)
  11541. {
  11542. }
  11543. function btn_spclup_onclick(obj:Button, e:ClickEventInfo)
  11544. {
  11545. btn_spclup.sendToBack();
  11546. btn_spcldown.sendToBack();
  11547. swt_spclmemo.sendToBack();
  11548. btn_mt004.bringToFront();
  11549. btn_attData.bringToFront();
  11550. button1.bringToFront();
  11551. swt_spclmemo.position.height = swt_spclmemo_cheight;
  11552. }
  11553. function btn_spcldown_onclick(obj:Button, e:ClickEventInfo)
  11554. {
  11555. swt_spclmemo.bringToFront();
  11556. swt_spclmemo.position.height = 500;
  11557. btn_spclup.bringToFront();
  11558. btn_spcldown.bringToFront();
  11559. btn_mt004.bringToFront();
  11560. btn_attData.bringToFront();
  11561. button1.bringToFront();
  11562. }
  11563. function btn_insuhistorydown_onclick(obj:Button, e:ClickEventInfo)
  11564. {
  11565. grd_insuhistory.bringToFront();
  11566. grd_insuhistory.position.height = 200;
  11567. obj.visible = false;
  11568. btn_insuhistoryup.visible = true;
  11569. }
  11570. function btn_insuhistoryup_onclick(obj:Button, e:ClickEventInfo)
  11571. {
  11572. grd_insuhistory.bringToFront();
  11573. grd_insuhistory.position.height = 59;
  11574. obj.visible = false;
  11575. btn_insuhistorydown.visible = true;
  11576. }
  11577. function grp_calc_grd_ordlist_onkeydown(obj:Grid, e:KeyEventInfo)
  11578. {
  11579. if (e.ctrlKey && e.keycode == 67 ) {
  11580. system.setClipboard("CF_TEXT", obj.getCellText(obj.currentrow, obj.currentcol));
  11581. }
  11582. }
  11583. function ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  11584. {
  11585. if (e.keycode == "13") { // Enter 입력 시에
  11586. var trgtManWindow = frmf_findPopup("SMPIJ00200"); // SMPIJ00600_입원재원심사대상자조회.xrw
  11587. obj.updateToDataset();
  11588. var patunitsrch1 = obj.value.getTrim(); // (stringHelper.js) 문자열 앞뒤에 있는 공백 제거
  11589. var oldPid = gv_pid;
  11590. if (utlf_isNull(trgtManWindow)) {
  11591. var rtn = frmf_open("SMPIJ00200","SMPIJ00200", {arg_ds_temp:ds_init_iteminfo}, "", "", "", "", "", "", "", "", "", "M"); // SMPIJ00200 조회 호출
  11592. } else {
  11593. if (utlf_isNull(oldPid)) {
  11594. if (utlf_isNull(patunitsrch1 )) { // 환자번호 입력 없이 대상자를 조회하는 경우
  11595. frmf_setFocusPop("SMPIJ00200");
  11596. } else { // 기존 심사대상자는 없는데 pid가 입력된 경우 또는 변경된 정보를 저장 후에 조회하는 경우
  11597. trgtManWindow.fSetPatUnitSrch1pidSrch();
  11598. }
  11599. } else {
  11600. if (patunitsrch1 != oldPid) { // 조회된 pid가 변경된 상태에서 조회하는 경우
  11601. //fInitSrchData();
  11602. trgtManWindow.fSetPatUnitSrch1pidSrch();
  11603. } else { // 기존 심사대상자는 있는데 pid가 변경되지 않은 경우
  11604. frmf_setFocusPop("SMPIJ00200");
  11605. }
  11606. }
  11607. }
  11608. }
  11609. }
  11610. function btn_onmouseenter(obj:Button, e:MouseEventInfo)
  11611. {
  11612. if(group9.visible == true)
  11613. {
  11614. obj.click();
  11615. }
  11616. }
  11617. function grd_diaglist_oncellclick(obj:Grid, e:GridClickEventInfo)
  11618. {
  11619. var diagengnm = utlf_transNullToEmpty(obj.getCellValue(e.row, obj.getBindCellIndex("body","diagnm"))) + '/' + utlf_transNullToEmpty(obj.getCellValue(e.row, obj.getBindCellIndex("body","diagengnm")));
  11620. diagengnm = diagengnm + ' - ' + utlf_transNullToEmpty(ds_grd_diaglist.getColumn(e.row, "orddeptnm"));
  11621. output35.value = diagengnm;
  11622. if (obj.currentcol == obj.getBindCellIndex("body", "diagcd")) {
  11623. obj.showEditor(true);
  11624. }
  11625. }
  11626. function cf_TRPIJ00349(sSvcId, nErrorCode, sErrorMsg) {
  11627. if(nErrorCode < 0) {alert("에러cf_TRPIJ00349"); return;}
  11628. if (ds_spcdrugyn.getColumn(0,"spcdrugyn") == "Y") { // 특수조제료 발생 처방이 있는데 주사제무균조제료가 발생하지 않았을 경우 메세지 - 20081108
  11629. lf_setAlramMessage("주사제 무균조제료 발생 오류입니다. 확인하십시오.");
  11630. }
  11631. }
  11632. function cf_TRPIJ00350(sSvcId, nErrorCode, sErrorMsg) {
  11633. if(nErrorCode < 0) {alert("에러cf_TRPIJ00350"); return;}
  11634. if (ds_isclediudiff.rowcount > 0) {
  11635. lf_setAlramMessage("EDI코드,단가가 불일치하는 처방내역이 있습니다.");
  11636. }
  11637. var frow = -1;
  11638. var rowcnt = ds_isclediudiff.rowcount;
  11639. for (var i=0; i < rowcnt; i++) {
  11640. frow = ds_grd_ordlist.findRowExpr("grupcalcscorcd=='" + ds_isclediudiff.getColumn(i,"grupcalcscorcd") + "' " +
  11641. " && snglcalcscorcd=='" + ds_isclediudiff.getColumn(i,"snglcalcscorcd") + "'" +
  11642. " && calcpayflag=='" + ds_isclediudiff.getColumn(i,"calcpayflag") + "'" +
  11643. " && matractflag=='" + ds_isclediudiff.getColumn(i,"matractflag") + "'");
  11644. if (frow > -1) {
  11645. ds_grd_ordlist.setColumn(frow,"appunitcost_bgcolor", "#FF5A5A");
  11646. }
  11647. }
  11648. }
  11649. function chkageyn(age){
  11650. var endyn ="Y";
  11651. if ((gv_rrgstno.substr(7,1) == "3" || gv_rrgstno.substr(7,1) == "4" || gv_rrgstno.substr(7,1) == "7" || gv_rrgstno.substr(7,1) == "8")) {// age세미만 생일 여부를 판단함
  11652. if (gv_age == age) {
  11653. if (gv_brthdd >= gv_today) {
  11654. endyn = "N";
  11655. } else if (gv_brthdd < gv_today) {
  11656. endyn = "Y";
  11657. }
  11658. } else if(gv_age < age) {
  11659. endyn = "N";
  11660. } else if (gv_age > age) {
  11661. endyn ="Y";
  11662. }
  11663. }
  11664. return endyn;
  11665. }
  11666. function chkageyn2(age){
  11667. var endyn ="Y";
  11668. if(utlf_getAge(gv_brthdd, (gv_todd == '99991231' ? gv_today : gv_todd)) < age) {
  11669. endyn = "N";
  11670. } else if (utlf_getAge(gv_brthdd, (gv_todd == '99991231' ? gv_today : gv_todd)) > age) {
  11671. endyn ="Y";
  11672. }
  11673. return endyn;
  11674. }
  11675. function btn_EnvSetup00_onclick(obj:Button, e:ClickEventInfo)
  11676. {
  11677. var msg = sysf_messageBox("환경저장 데이터가 모두 삭제 됩니다.","Q003");
  11678. if (msg == 6) { // 6세미만 요율을 적용한다.
  11679. grdf_DelUuee(grp_calc.chk_showitemcoloryn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  11680. grdf_DelUuee(grp_calc.rdo_zerofilter, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  11681. grdf_DelUuee(grp_calc.chk_showsubtotal, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  11682. grdf_DelUuee(grp_calc.grd_ordlist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  11683. grp_calc.grd_ordlist.formatid = "default";
  11684. grdf_DelUuee(grd_diaglist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  11685. grd_diaglist.formatid = "default";
  11686. grdf_DelUuee(swt_spclmemo.case_spclspec.grd_clcjlist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  11687. swt_spclmemo.case_spclspec.grd_clcjlist.formatid = "default";
  11688. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  11689. }
  11690. }
  11691. function cf_TRASB02301(sSvcId, nErrorCode, sErrorMsg) {
  11692. if(nErrorCode < 0) return;
  11693. ds_lglydisinfo.addColumn("fromdiag","string");
  11694. ds_lglydisinfo.addColumn("todiag","string");
  11695. var fromicd10cd = "";
  11696. var toicd10cd = "";
  11697. for (var i=0,rcount = ds_lglydisinfo.rowcount; i < rcount; i++){
  11698. var fromicd10cd = String(ds_lglydisinfo.getColumn(i,"fromicd10cd"));
  11699. var toicd10cd = String(ds_lglydisinfo.getColumn(i,"toicd10cd"));
  11700. ds_lglydisinfo.setColumn(i,"fromdiag", fromicd10cd.indexOf(".") > -1 ? fromicd10cd.split(".")[0] : fromicd10cd )
  11701. ds_lglydisinfo.setColumn(i,"todiag", toicd10cd.indexOf(".") > -1 ? toicd10cd.split(".")[0] : toicd10cd )
  11702. }
  11703. // ipt_pid.setSelectedText
  11704. }
  11705. function cf_TRPIJ00351(sSvcId, nErrorCode, sErrorMsg)
  11706. {
  11707. if(nErrorCode < 0)
  11708. {
  11709. sysf_messageBox(sSvcId+"]데이터 가","I004");
  11710. return;
  11711. }
  11712. if (ds_getTicuUserInfo.getColumn(0,"truseryn") == "Y"){
  11713. if (ds_getTicuUserInfo.getColumn(0,"trdiagyn") != "Y"){
  11714. lf_setAlramMessage("외상환자가 맞는지 확인 하세요.");
  11715. }
  11716. }
  11717. }
  11718. function fSetSpclTooltipText(row, edicd) {
  11719. var cnt = ds_grd_clcjlist.getCaseCount("unitflag=='J' && spclcd=='JX999' && edicd=='"+edicd+"'");
  11720. var spclspec = "";
  11721. if (cnt > 0) {
  11722. var frow = ds_grd_clcjlist.findRowExpr("unitflag=='J' && spclcd=='JX999' && edicd=='"+edicd+"'", 0);
  11723. while(frow > -1){
  11724. spclspec = spclspec + (!utlf_isNull(spclspec) ? '\r\n' : "") + utlf_transNullToEmpty(ds_grd_clcjlist.getColumn(frow,"spclspec"));
  11725. frow = ds_grd_clcjlist.findRowExpr("unitflag=='J' && spclcd=='JX999' && edicd=='"+edicd+"'", frow+1);
  11726. }
  11727. return spclspec;
  11728. } else {
  11729. return "";
  11730. }
  11731. }
  11732. // 청구키 삭제 관련 추가 20191108
  11733. function grp_calc_btn_insukindchg_onclick(obj:Button, e:ClickEventInfo)
  11734. {
  11735. if(ds_temp_pidhclkl.rowcount > 0) {
  11736. if(sysf_messageBox("이미 청구key가 해제된 건입니다. 사유 및 처리방법을 수정하시겠습니까?", "Q") == 7){
  11737. return;
  11738. }
  11739. } else {
  11740. if(utlf_isNull(ds_init_iteminfo.getColumn(0, "clamkey")) || ds_init_iteminfo.getColumn(0, "clamkey") == "-") {
  11741. sysf_messageBox("청구key가 존재하지 않습니다.","I");
  11742. return;
  11743. } else if(sysf_messageBox("유형변경을 위해 청구일자를", "Q010") == 7) {
  11744. return;
  11745. }
  11746. }
  11747. grp_keycancel.position.x = 586;
  11748. grp_keycancel.position.y = 541;
  11749. grp_keycancel.visible = true;
  11750. grp_keycancel.btn_savekeycancelinpt.visible = true;
  11751. grp_keycancel.btn_savekeycancelprcp.visible = false;
  11752. }
  11753. function fGetPidhclklitem() {
  11754. ds_clamkey_canceldata.clearData();
  11755. ds_clamkey_canceldata.addRow();
  11756. dsf_createDsRow("ds_req", [
  11757. {col:"pid", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "pid")}
  11758. , {col:"instcd", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "instcd")}
  11759. , {col:"indd", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "indd1")}
  11760. , {col:"cretno", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "cretno")}
  11761. , {col:"fromdd", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "fromdd")}
  11762. , {col:"todd", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "todd")}
  11763. ]);
  11764. var oParam = {};
  11765. oParam.id = "getPidhclklitem";
  11766. oParam.service = "bfjudgapp.InHospJudg";
  11767. oParam.method = "reqGetPidhclklitem";
  11768. oParam.inds = "req=ds_req";
  11769. oParam.outds = "ds_temp_pidhclkl=item";
  11770. oParam.async = false;
  11771. oParam.callback = "cf_getPidhclklitem";
  11772. tranf_submit(oParam);
  11773. }
  11774. function cf_getPidhclklitem(sSvcId, nErrorCode, sErrorMsg) {
  11775. if(nErrorCode < 0) return;
  11776. if(ds_temp_pidhclkl.rowcount > 0) {
  11777. ds_clamkey_canceldata.setColumn(0, "cancelrsn", ds_temp_pidhclkl.getColumn(0, "cancelrsn"));
  11778. ds_clamkey_canceldata.setColumn(0, "rsnrem", ds_temp_pidhclkl.getColumn(0, "rsnrem"));
  11779. ds_clamkey_canceldata.setColumn(0, "cancelresult", ds_temp_pidhclkl.getColumn(0, "cancelresult"));
  11780. var resultrem = "resultrem" + ds_temp_pidhclkl.getColumn(0, "cancelresult");
  11781. ds_clamkey_canceldata.setColumn(0, resultrem, ds_temp_pidhclkl.getColumn(0, "resultrem"));
  11782. grp_calc.btn_prcpchg.enable = true;
  11783. } else {
  11784. grp_calc.btn_prcpchg.enable = false;
  11785. }
  11786. }
  11787. function grp_calc_btn_prcpchg_onclick(obj:Button, e:ClickEventInfo)
  11788. {
  11789. var cRow = ds_grd_ordlist.rowposition;
  11790. if(cRow < 0) {
  11791. sysf_messageBox("선택된 처방이 없습니다.","I");
  11792. return;
  11793. } else if(sysf_messageBox("처방변경을 위해 청구key를", "Q010") == 7) {
  11794. return;
  11795. }
  11796. grp_keycancel.btn_savekeycancelprcp.click();
  11797. // grp_keycancel.position.x = 586;
  11798. // grp_keycancel.position.y = 541;
  11799. // grp_keycancel.visible = true;
  11800. // grp_keycancel.btn_savekeycancelinpt.visible = false;
  11801. // grp_keycancel.btn_savekeycancelprcp.visible = true;
  11802. fGetPidhclklitem();
  11803. }
  11804. function grp_keycancel_btn_closekeycancel_onclick(obj:Button, e:ClickEventInfo)
  11805. {
  11806. grp_keycancel.visible = false;
  11807. }
  11808. function fMakeKeyCancelDs() {
  11809. if(ds_temp_pidhclkl.rowcount > 0) {
  11810. dsf_createDs("ds_req_save_keycancel");
  11811. ds_req_save_keycancel.copyData(ds_temp_pidhclkl);
  11812. } else {
  11813. var cRow = ds_init_cmb_indd.findRow("indd",ds_init_iteminfo.getColumn(0,"indd"));
  11814. var fromdd = ds_init_cmb_indd.getColumn(cRow, "fromdd");
  11815. var todd = ds_init_cmb_indd.getColumn(cRow, "todd");
  11816. dsf_createDsRow("ds_req_save_keycancel", [
  11817. {col:"pid", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "pid")}
  11818. , {col:"instcd", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "instcd")}
  11819. , {col:"indd", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "indd1")}
  11820. , {col:"cretno", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "cretno")}
  11821. , {col:"fromdd", type:"STRING", size:256, val:fromdd}
  11822. , {col:"todd", type:"STRING", size:256, val:todd}
  11823. , {col:"canceldd", type:"STRING", size:256, val:utlf_getCurrentDate()}
  11824. , {col:"cancelid", type:"STRING", size:256, val:sysf_getUserId()}
  11825. , {col:"lastmdlclamdd", type:"STRING", size:256, val:""}
  11826. , {col:"clamkey", type:"STRING", size:256, val:""}
  11827. , {col:"hiraordtodd", type:"STRING", size:256, val:""}
  11828. ]);
  11829. }
  11830. var cancelresult = ds_clamkey_canceldata.getColumn(0, "cancelresult");
  11831. var resultrem = "";
  11832. if(cancelresult == "1") resultrem = ds_clamkey_canceldata.getColumn(0, "resultrem1");
  11833. if(cancelresult == "2") resultrem = ds_clamkey_canceldata.getColumn(0, "resultrem2");
  11834. if(cancelresult == "9") resultrem = ds_clamkey_canceldata.getColumn(0, "resultrem9");
  11835. dsf_makeValue(ds_req_save_keycancel, "cancelrsn", "string", ds_clamkey_canceldata.getColumn(0, "cancelrsn"));
  11836. dsf_makeValue(ds_req_save_keycancel, "rsnrem", "string", ds_clamkey_canceldata.getColumn(0, "rsnrem"));
  11837. dsf_makeValue(ds_req_save_keycancel, "cancelresult", "string", cancelresult);
  11838. dsf_makeValue(ds_req_save_keycancel, "resultrem", "string", resultrem);
  11839. dsf_makeValue(ds_req_save_keycancel, "restoreyn", "string", "N");
  11840. }
  11841. function grp_keycancel_btn_savekeycancelinpt_onclick(obj:Button, e:ClickEventInfo)
  11842. {
  11843. fMakeKeyCancelDs();
  11844. dsf_createDsRow("ds_req_send", [
  11845. {col:"pid", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "pid")}
  11846. , {col:"indd", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "indd1")}
  11847. , {col:"cretno", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "cretno")}
  11848. ]);
  11849. dsf_createDs("ds_temp_result");
  11850. var oParam = {};
  11851. oParam.id = "setInsukindKeyCancel";
  11852. oParam.service = "bfjudgapp.InHospJudg";
  11853. oParam.method = "reqSetInsukindKeyCancel";
  11854. oParam.inds = "req=ds_req_send reqdata=ds_req_save_keycancel";
  11855. oParam.outds = "ds_temp_result=result";
  11856. oParam.async = false;
  11857. oParam.callback = "cf_setInsukindKeyCancel";
  11858. tranf_submit(oParam);
  11859. grp_calc.btn_prcpchg.enable = true;
  11860. grp_keycancel.visible = false;
  11861. fGetPidhclklitem();
  11862. }
  11863. function cf_setInsukindKeyCancel(sSvcId, nErrorCode, sErrorMsg) {
  11864. if(nErrorCode < 0) return;
  11865. sysf_messageBox("처리 되었습니다.","I");
  11866. // if(utlf_isNull(ds_temp_result.getColumn(0,"lastmdlclamdd")) || ds_temp_result.getColumn(0,"lastmdlclamdd") == "-") {
  11867. // sysf_messageBox("이미 초기화된 청구건입니다.","I");
  11868. // }
  11869. }
  11870. function grp_keycancel_btn_savekeycancelprcp_onclick(obj:Button, e:ClickEventInfo)
  11871. {
  11872. fMakeKeyCancelDs();
  11873. var cRow = ds_grd_ordlist.rowposition;
  11874. dsf_createDsRow("ds_req_send", [
  11875. {col:"pid", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "pid")}
  11876. , {col:"orddd", type:"STRING", size:256, val:ds_init_iteminfo.getColumn(0, "indd1")}
  11877. , {col:"calcscorcd", type:"STRING", size:256, val:ds_grd_ordlist.getColumn(cRow, "snglcalcscorcd")}
  11878. , {col:"fromdd", type:"STRING", size:256, val:ds_req_save_keycancel.getColumn(0, "fromdd")}
  11879. , {col:"todd", type:"STRING", size:256, val:ds_req_save_keycancel.getColumn(0, "todd")}
  11880. ]);
  11881. dsf_createDs("ds_temp_result");
  11882. var oParam = {};
  11883. oParam.id = "setPrcpKeyCancel";
  11884. oParam.service = "bfjudgapp.InHospJudg";
  11885. oParam.method = "reqSetPrcpKeyCancel";
  11886. oParam.inds = "req=ds_req_send reqdata=ds_req_save_keycancel";
  11887. oParam.outds = "ds_temp_result=result";
  11888. oParam.async = false;
  11889. oParam.callback = "cf_setPrcpKeyCancel";
  11890. tranf_submit(oParam);
  11891. grp_keycancel.visible = false;
  11892. }
  11893. function cf_setPrcpKeyCancel(sSvcId, nErrorCode, sErrorMsg) {
  11894. if(nErrorCode < 0) return;
  11895. if(ds_temp_result.rowcount == 0) {
  11896. sysf_messageBox("청구key가 생성되어 있지 않습니다.","I");
  11897. return;
  11898. }
  11899. if(utlf_isNull(ds_temp_result.getColumn(0,"clamkey")) || ds_temp_result.getColumn(0,"clamkey") == "-") {
  11900. sysf_messageBox("이미 초기화된 청구건입니다.","I");
  11901. } else {
  11902. sysf_messageBox("처리 되었습니다.","I");
  11903. }
  11904. }
  11905. function fChkSuppkindSave() {
  11906. if(!utlf_isNull(ds_temp_suppkindchk.getColumn(0, "cnt")) && ds_temp_suppkindchk.getColumn(0, "cnt") > 0) {
  11907. if(sysf_messageBox("보조유형변경 및 재계산이 필요합니다. 계속하시겠습니까?","S") != 6) {
  11908. return false;
  11909. } else return true;
  11910. }
  11911. return true;
  11912. }
  11913. function grp_calc_btn_icdrinfo_onclick(obj:Button, e:ClickEventInfo)
  11914. {
  11915. var trgtManWindow = frmf_findPopup("SPPIJ00600");
  11916. if (utlf_isNull(trgtManWindow))
  11917. {
  11918. var rtn = frmf_open("SPPIJ00600","SPPIJ00600", {arg_ds_temp:ds_init_iteminfo}, "", "", "", "", "", "", "", "", "", "M"); // SMPIJ00200 조회 호출
  11919. }
  11920. }
  11921. ]]></Script>
  11922. </Form>
  11923. </FDL>