SMPIJ00200_입원재원심사대상자조회.xfdl 174 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPIJ00200" position="absolute 0 0 1211 810" titletext="재원심사 대상자 조회" oninit="SMPIJ00200_oninit" onload="SMPIJ00200_onload">
  5. <Layouts>
  6. <Layout>
  7. <!--
  8. <Div position="absolute 0 0 1159 727" id="group3" scrollbars="autoboth">
  9. <Layouts>
  10. <Layout>
  11. -->
  12. <Div position="absolute 0 0 1211 119" align="align:center top;" id="group2" anchor="left top right" class="div_SA">
  13. <Layouts>
  14. <Layout width="1211" height="110">
  15. <Static text="기준일자:" position="absolute 7 27 73 43" id="caption2" class="search_name" anchor="default"/>
  16. <Static text="심사구분:" position="absolute 7 3 73 22" id="caption3" class="search_name" anchor="default"/>
  17. <Static text="유형보조:" position="absolute 7 74 73 91" id="caption19" class="search_name" anchor="default"/>
  18. <Static text="병동:" position="absolute 452 74 518 91" id="caption5" class="search_name" anchor="default"/>
  19. <Static text="진료분야:" position="absolute 292 3 358 20" id="caption7" class="search_name" anchor="default"/>
  20. <Static text="진료의사:" position="absolute 292 50 358 67" id="caption8" class="search_name" anchor="default"/>
  21. <Static text="진료과:" position="absolute 292 27 358 44" id="caption9" class="search_name" anchor="default"/>
  22. <Static text="심사자:" position="absolute 292 97 358 114" id="caption11" class="search_name" anchor="default"/>
  23. <Div position="absolute 829 95 1172 114" id="group1" anchor="default">
  24. <Layouts>
  25. <Layout>
  26. <Edit position="absolute 145 0 320 19" id="ipt_spclsearch" class="input_search" anchor="default"/>
  27. <Radio position="absolute 0 0 145 19" id="rdo_mchrgcode" class="radio_search" columncount="3" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" direction="vertical" style="textpadding:0 0 0 3;">
  28. <Dataset id="innerdataset">
  29. <ColumnInfo>
  30. <Column id="codecolumn" size="256"/>
  31. <Column id="datacolumn" size="256"/>
  32. </ColumnInfo>
  33. <Rows>
  34. <Row>
  35. <Col id="codecolumn">1</Col>
  36. <Col id="datacolumn">수가</Col>
  37. </Row>
  38. <Row>
  39. <Col id="codecolumn">2</Col>
  40. <Col id="datacolumn">EDI</Col>
  41. </Row>
  42. <Row>
  43. <Col id="codecolumn">4</Col>
  44. <Col id="datacolumn">List</Col>
  45. </Row>
  46. </Rows>
  47. </Dataset>
  48. </Radio>
  49. </Layout>
  50. </Layouts>
  51. </Div>
  52. <Static text="총진료비:" position="absolute 452 3 518 20" id="caption12" class="search_name" anchor="default"/>
  53. <Static text="본인부담:" position="absolute 452 27 518 44" id="caption13" class="search_name" anchor="default"/>
  54. <Static text="재원일수:" position="absolute 452 50 518 67" id="caption14" class="search_name" anchor="default"/>
  55. <Static text="처방구분:" position="absolute 679 97 745 114" id="caption16" class="search_name" anchor="default" onclick="group2_caption16_onclick"/>
  56. <Static text="환자단위:" position="absolute 7 97 73 114" id="caption17" class="search_name" anchor="default" onclick="group2_caption17_onclick"/>
  57. <Static text="~" position="absolute 169 27 188 46" id="caption18" anchor="default" style="align:center middle;"/>
  58. <Calendar position="absolute 76 27 166 46" id="ipt_fromdate" class="input_search" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
  59. <Calendar position="absolute 191 27 281 46" id="ipt_todate" class="input_search" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd"/>
  60. <Combo position="absolute 103 50 281 69" id="cmb_insukind" class="combo_search" innerdataset="ds_init_cmb_insukind" datacolumn="cdnm" codecolumn="cdid" anchor="default" onitemchanged="group2_cmb_insukind_onitemchanged"/>
  61. <Combo position="absolute 361 3 441 22" id="cmb_ordfildcd" class="combo_search" innerdataset="ds_init_cmb_ordfildcd" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
  62. <Combo position="absolute 361 27 441 46" id="cmb_orddeptcd" class="combo_search" innerdataset="ds_init_cmb_orddeptcd" datacolumn="depthngnm" codecolumn="deptcd" anchor="default" onitemchanged="group2_cmb_orddeptcd_onitemchanged"/>
  63. <Combo position="absolute 103 74 281 93" id="cmb_suppkind" class="combo_search" innerdataset="ds_init_cmb_suppkind" datacolumn="suppkindnm" codecolumn="suppkind" anchor="default" onitemchanged="group2_cmb_suppkind_onitemchanged"/>
  64. <Combo position="absolute 361 50 441 69" id="cmb_orddrid" class="combo_search" innerdataset="ds_init_cmb_orddrid" datacolumn="atdocthngnm" codecolumn="atdoctid" anchor="default"/>
  65. <Div position="absolute 821 95 1148 114" id="group5" anchor="default">
  66. <Layouts>
  67. <Layout width="335" height="30">
  68. <Button position="absolute 292 0 308 19" id="btn_tstlist" class="icon_search" text="" anchor="default"/>
  69. <Edit readonly="true" position="absolute 49 0 327 19" id="opt_tstlist" class="output_search" anchor="default" taborder="1"/>
  70. </Layout>
  71. </Layouts>
  72. </Div>
  73. <MaskEdit position="absolute 522 3 612 22" align="align:right middle;" id="ipt_totordamt" class="input_search" mask="#,###" anchor="default"/>
  74. <MaskEdit position="absolute 522 27 612 46" align="align:right middle;" id="ipt_ownbamt" class="input_search" mask="#,###" anchor="default"/>
  75. <MaskEdit position="absolute 522 50 612 69" align="align:right middle;" id="ipt_indays" class="input_search" mask="#,###" anchor="default"/>
  76. <Edit position="absolute 76 97 166 116" id="ipt_personalsearch" class="input_search" anchor="default" onkeyup="group2_ipt_personalsearch_onkeyup" inputfilter="alpha" inputtype="digit"/>
  77. <Combo position="absolute 76 3 166 22" id="cmb_judgendyn" class="combo_search" innerdataset="ds_init_cmb_judgendyn" datacolumn="cdnm" codecolumn="cdid" anchor="default" onitemchanged="group2_cmb_judgendyn_onitemchanged"/>
  78. <Combo position="absolute 580 74 663 93" id="cmb_wardcd" class="combo_search" innerdataset="ds_init_cmb_wardcd" datacolumn="wardnm" codecolumn="wardcd" anchor="default"/>
  79. <Combo position="absolute 361 97 441 116" id="cmb_judgmdlid" class="combo_search" innerdataset="ds_init_cmb_judgmdlid" datacolumn="usernm" codecolumn="userid" anchor="default"/>
  80. <Edit readonly="true" position="absolute 76 50 101 69" id="opt_insukind" anchor="default"/>
  81. <Edit readonly="true" position="absolute 76 74 101 93" id="opt_suppkind" anchor="default"/>
  82. <CheckBox position="absolute 168 3 254 22" id="chk_judgstat" class="checkbox_search" anchor="default" onclick="group2_chk_judgstat_onclick" text="완료제외" truevalue="Y" falsevalue="N"/>
  83. <Combo position="absolute 758 95 823 114" id="combo1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="group2_combo1_onitemchanged">
  84. <Dataset id="innerdataset">
  85. <ColumnInfo>
  86. <Column id="codecolumn"/>
  87. <Column id="datacolumn"/>
  88. </ColumnInfo>
  89. <Rows>
  90. <Row>
  91. <Col id="codecolumn">1</Col>
  92. <Col id="datacolumn">처방별</Col>
  93. </Row>
  94. <Row>
  95. <Col id="codecolumn">2</Col>
  96. <Col id="datacolumn">평가별</Col>
  97. </Row>
  98. </Rows>
  99. </Dataset>
  100. </Combo>
  101. <Combo id="cmb_drgyn" taborder="1" innerdataset="ds_init_cmb_drgyn" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 361 74 441 93" anchor="default"/>
  102. <Static id="caption32" text="DRG:" class="search_name" position="absolute 292 75 358 92" anchor="default"/>
  103. <Static text="보험유형:" position="absolute 7 50 73 69" id="caption4" class="search_name" anchor="default"/>
  104. <Static id="caption48" text="상병:" class="search_name" position="absolute 452 97 503 116" anchor="default"/>
  105. <Edit id="ipt_diagfrom" taborder="2" class="input_search" position="absolute 496 97 547 116" anchor="default" inputmode="normal" onkeyup="group2_ipt_diagfrom_onkeyup"/>
  106. <Static id="caption45" text="~" position="absolute 573 98 586 117" anchor="default"/>
  107. <Edit id="ipt_diagto" taborder="3" class="input_search" position="absolute 586 97 643 116" anchor="default" onkeyup="group2_ipt_diagto_onkeyup"/>
  108. <Button id="btn_search" taborder="4" text="조회" class="btn1" position="absolute 1151 93 1207 115" anchor="top right" onclick="group2_btn_search_onclick"/>
  109. <CheckBox id="chk_v191" taborder="5" text="개두술" onclick="chk_v191_onclick" class="checkbox_search" position="absolute 849 3 909 22" anchor="default" truevalue="Y"/>
  110. <CheckBox id="chk_v192" taborder="6" text="개심술" class="checkbox_search" position="absolute 849 20 909 39" anchor="default" truevalue="Y"/>
  111. <CheckBox id="chk_v193" taborder="7" text="등록암" class="checkbox_search" position="absolute 763 37 833 56" anchor="default" truevalue="Y"/>
  112. <CheckBox id="checkbox1" taborder="8" text="항암제2군" class="checkbox_search" position="absolute 671 54 751 73" anchor="default" truevalue="Y"/>
  113. <CheckBox id="chk_6petmri" taborder="9" text="PET/MRI" class="checkbox_search" position="absolute 763 54 834 73" anchor="default" truevalue="Y"/>
  114. <CheckBox id="chk_5divclam" taborder="10" text="분할청구" class="checkbox_search" position="absolute 849 54 919 73" anchor="default" truevalue="Y"/>
  115. <CheckBox id="chk_spcl" taborder="11" text="선별심사" class="checkbox_search" position="absolute 763 20 833 39" anchor="default" truevalue="Y"/>
  116. <CheckBox id="chk_Angio1" taborder="12" text="혈관조영술" class="checkbox_search" position="absolute 671 20 751 39" anchor="default" truevalue="Y"/>
  117. <CheckBox id="chk_Angio2" taborder="13" text="중재적시술" class="checkbox_search" position="absolute 671 3 751 22" anchor="default" truevalue="Y"/>
  118. <CheckBox id="chk_anst" taborder="14" text="수술예약" class="checkbox_search" position="absolute 763 3 833 22" anchor="default" truevalue="Y"/>
  119. <CheckBox id="chk_cp" taborder="15" text="CP" class="checkbox_search" position="absolute 934 37 989 56" anchor="default" truevalue="Y"/>
  120. <CheckBox id="chk_drg" taborder="16" text="항암제전체" class="checkbox_search" position="absolute 671 37 751 56" anchor="default" truevalue="Y"/>
  121. <Radio id="rdo_period" taborder="17" columncount="1" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 1046 3 1154 74" anchor="default">
  122. <Dataset id="innerdataset">
  123. <ColumnInfo>
  124. <Column id="codecolumn"/>
  125. <Column id="datacolumn"/>
  126. </ColumnInfo>
  127. <Rows>
  128. <Row>
  129. <Col id="codecolumn">3</Col>
  130. <Col id="datacolumn">최종심사일이후</Col>
  131. </Row>
  132. <Row>
  133. <Col id="codecolumn">1</Col>
  134. <Col id="datacolumn">전체</Col>
  135. </Row>
  136. <Row>
  137. <Col id="codecolumn">2</Col>
  138. <Col id="datacolumn">기준일자</Col>
  139. </Row>
  140. </Rows>
  141. </Dataset>
  142. </Radio>
  143. <CheckBox id="chk_sixyn" taborder="18" text="6시간미만조회" class="checkbox_search" position="absolute 934 54 1044 73" anchor="default" truevalue="Y"/>
  144. <CheckBox id="checkbox3" taborder="19" text="분할제외" class="checkbox_search" position="absolute 849 37 924 56" anchor="default" truevalue="Y" falsevalue="N"/>
  145. <CheckBox id="checkbox2" taborder="20" text="입/외전체" class="checkbox_search" position="absolute 934 20 1014 39" anchor="default" truevalue="A"/>
  146. <CheckBox id="checkbox4" taborder="21" text="Dump" class="checkbox_search" position="absolute 934 3 1014 22" anchor="default" truevalue="A"/>
  147. <Combo id="cmb_totordamt" taborder="22" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" visible="true" position="absolute 614 3 663 22" anchor="default" onitemchanged="group2_cmb_totordamt_onitemchanged">
  148. <Dataset id="innerdataset">
  149. <ColumnInfo>
  150. <Column id="codecolumn"/>
  151. <Column id="datacolumn"/>
  152. </ColumnInfo>
  153. <Rows>
  154. <Row>
  155. <Col id="codecolumn">1</Col>
  156. <Col id="datacolumn">원 이상</Col>
  157. </Row>
  158. <Row>
  159. <Col id="codecolumn">2</Col>
  160. <Col id="datacolumn">원 미만</Col>
  161. </Row>
  162. </Rows>
  163. </Dataset>
  164. </Combo>
  165. <Combo id="cmb_indays" taborder="23" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" visible="true" position="absolute 614 27 663 46" anchor="default">
  166. <Dataset id="innerdataset">
  167. <ColumnInfo>
  168. <Column id="codecolumn"/>
  169. <Column id="datacolumn"/>
  170. </ColumnInfo>
  171. <Rows>
  172. <Row>
  173. <Col id="codecolumn">1</Col>
  174. <Col id="datacolumn">일 이상</Col>
  175. </Row>
  176. <Row>
  177. <Col id="codecolumn">2</Col>
  178. <Col id="datacolumn">일 미만</Col>
  179. </Row>
  180. </Rows>
  181. </Dataset>
  182. </Combo>
  183. <Combo id="cmb_ownbamt" taborder="24" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" visible="true" position="absolute 614 50 663 69" anchor="default">
  184. <Dataset id="innerdataset">
  185. <ColumnInfo>
  186. <Column id="codecolumn"/>
  187. <Column id="datacolumn"/>
  188. </ColumnInfo>
  189. <Rows>
  190. <Row>
  191. <Col id="codecolumn">1</Col>
  192. <Col id="datacolumn">원 이상</Col>
  193. </Row>
  194. <Row>
  195. <Col id="codecolumn">2</Col>
  196. <Col id="datacolumn">원 미만</Col>
  197. </Row>
  198. </Rows>
  199. </Dataset>
  200. </Combo>
  201. <Button id="btn_pidsrch" taborder="25" class="icon_search" position="absolute 168 97 184 116" onclick="group2_btn_pidsrch_onclick" anchor="default"/>
  202. <Button id="Button00" taborder="26" position="absolute 550 97 569 116" style="image:URL('theme://images/com/commonxp/icon_btn.png');" onclick="group2_Button00_onclick" anchor="default"/>
  203. <Button id="Button01" taborder="27" position="absolute 644 97 663 116" style="image:URL('theme://images/com/commonxp/icon_btn.png');" onclick="group2_Button01_onclick" anchor="default"/>
  204. <CheckBox id="checkbox00" taborder="28" text="외상" truevalue="Y" class="checkbox_search" position="absolute 671 71 751 90" anchor="default"/>
  205. </Layout>
  206. </Layouts>
  207. </Div>
  208. <Static text="심사 대상자" position="absolute 0 122 102 141" id="caption1" class="tit_2" anchor="left top" onclick="caption1_onclick"/>
  209. <Shape position="absolute 7 167 1199 173" linetype="vertical" id="line1" class="line_1" anchor="default"/>
  210. <Button position="absolute 1086 122 1137 141" id="btn_print" class="btn6" enable="false" text="출력" anchor="top right" onclick="btn_print_onclick"/>
  211. <Button position="absolute 1138 122 1211 141" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="btn_excelsave_onclick"/>
  212. <Grid position="absolute 0 143 1211 764" id="grd_inptmast" class="datagrid2" binddataset="ds_grd_inptmast" anchor="all" autosizingtype="none" cellsizingtype="col" oncellclick="grd_inptmast_oncellclick" onkeydown="grd_inptmast_onkeydown" onmousedown="grd_inptmast_onmousedown" onrbuttondown="grd_inptmast_onrbuttondown" autoenter="select" tooltiptype="default" cellmovingtype="col" onmousemove="grd_inptmast_onmousemove" onheadclick="grd_inptmast_onheadclick" oncelldblclick="grd_inptmast_oncelldblclick">
  213. <Formats>
  214. <Format id="default">
  215. <Columns>
  216. <Column size="31"/>
  217. <Column size="22"/>
  218. <Column size="22"/>
  219. <Column size="22"/>
  220. <Column size="21"/>
  221. <Column size="43"/>
  222. <Column size="43"/>
  223. <Column size="35"/>
  224. <Column size="37"/>
  225. <Column size="55"/>
  226. <Column size="55"/>
  227. <Column size="22"/>
  228. <Column size="29"/>
  229. <Column size="30"/>
  230. <Column size="70"/>
  231. <Column size="22"/>
  232. <Column size="25"/>
  233. <Column size="25"/>
  234. <Column size="25"/>
  235. <Column size="25"/>
  236. <Column size="25"/>
  237. <Column size="21"/>
  238. <Column size="22"/>
  239. <Column size="19"/>
  240. <Column size="50"/>
  241. <Column size="70"/>
  242. <Column size="70"/>
  243. <Column size="34"/>
  244. <Column size="45"/>
  245. <Column size="70"/>
  246. <Column size="22"/>
  247. <Column size="40"/>
  248. <Column size="65"/>
  249. <Column size="47"/>
  250. <Column size="47"/>
  251. <Column size="116"/>
  252. <Column size="75"/>
  253. <Column size="33"/>
  254. <Column size="33"/>
  255. <Column size="31"/>
  256. <Column size="25"/>
  257. <Column size="70"/>
  258. <Column size="121"/>
  259. <Column size="116"/>
  260. <Column size="0"/>
  261. <Column size="116"/>
  262. <Column size="32"/>
  263. <Column size="80"/>
  264. <Column size="66"/>
  265. <Column size="140"/>
  266. <Column size="34"/>
  267. <Column size="42"/>
  268. <Column size="35"/>
  269. <Column size="35"/>
  270. <Column size="70"/>
  271. <Column size="70"/>
  272. <Column size="80"/>
  273. <Column size="75"/>
  274. <Column size="0"/>
  275. <Column size="0"/>
  276. <Column size="0"/>
  277. <Column size="0"/>
  278. <Column size="39"/>
  279. <Column size="50"/>
  280. <Column size="100"/>
  281. <Column size="125"/>
  282. <Column size="40"/>
  283. <Column size="145"/>
  284. <Column size="40"/>
  285. <Column size="40"/>
  286. <Column size="58"/>
  287. <Column size="30"/>
  288. </Columns>
  289. <Rows>
  290. <Row size="30" band="head"/>
  291. <Row size="24"/>
  292. </Rows>
  293. <Band id="head">
  294. <Cell/>
  295. <Cell col="1" text="예&#13;&#10;고"/>
  296. <Cell col="2" text="확&#13;&#10;정"/>
  297. <Cell col="3" text="상&#13;&#10;태"/>
  298. <Cell col="4" text="@"/>
  299. <Cell col="5" text="진료과"/>
  300. <Cell col="6" text="응급&#13;&#10;진료과"/>
  301. <Cell col="7" text="병동"/>
  302. <Cell col="8" text="병실"/>
  303. <Cell col="9" text="등록번호"/>
  304. <Cell col="10" text="환자명"/>
  305. <Cell col="11" text="성&#13;&#10;별"/>
  306. <Cell col="12" text="나&#13;&#10;이"/>
  307. <Cell col="13" text="재원&#13;&#10;일수"/>
  308. <Cell col="14" text="입원일자"/>
  309. <Cell col="15" text="주"/>
  310. <Cell col="16" text="유&#13;&#10;형"/>
  311. <Cell col="17" text="보&#13;&#10;조"/>
  312. <Cell col="18" text="자&#13;&#10;격"/>
  313. <Cell col="19" text="H"/>
  314. <Cell col="20" text="희&#13;&#10;귀"/>
  315. <Cell col="21" text="암"/>
  316. <Cell col="22" text="전&#13;&#10;과"/>
  317. <Cell col="23" text="긴&#13;&#10;급"/>
  318. <Cell col="24" text="평가"/>
  319. <Cell col="25" text="유형시작"/>
  320. <Cell col="26" text="유형종료"/>
  321. <Cell col="27" text="생성"/>
  322. <Cell col="28" text="주상병"/>
  323. <Cell col="29" text="담당교수"/>
  324. <Cell col="30" text="선&#13;&#10;택"/>
  325. <Cell col="31" text="메모"/>
  326. <Cell col="32" text="심사&#13;&#10;상태"/>
  327. <Cell col="33" text="심사자"/>
  328. <Cell col="34" text="최종&#13;&#10;심사자"/>
  329. <Cell col="35" text="심사일자"/>
  330. <Cell col="36" text="수술&#13;&#10;스케쥴"/>
  331. <Cell col="37" text="수술&#13;&#10;처방"/>
  332. <Cell col="38" text="수술&#13;&#10;심사"/>
  333. <Cell col="39" text="선별"/>
  334. <Cell col="40" text="CP"/>
  335. <Cell col="41" text="퇴원예정일"/>
  336. <Cell col="42" text="간호퇴원확정시간"/>
  337. <Cell col="43" text="수납일시"/>
  338. <Cell col="44" text="최종담당자"/>
  339. <Cell col="45" displaytype="normal" text="사망일시"/>
  340. <Cell col="46" text="분할&#13;&#10;청구"/>
  341. <Cell col="47" text="상한초과금"/>
  342. <Cell col="48" text="처방코드"/>
  343. <Cell col="49" text="처방명"/>
  344. <Cell col="50" text="급비"/>
  345. <Cell col="51" text="수량"/>
  346. <Cell col="52" text="횟수"/>
  347. <Cell col="53" text="일수"/>
  348. <Cell col="54" text="처방일"/>
  349. <Cell col="55" text="시행일"/>
  350. <Cell col="56" text="총진료비"/>
  351. <Cell col="57" text="Cretno"/>
  352. <Cell col="58" text="문제환자&#13;&#10;여부"/>
  353. <Cell col="59" text="기관코드"/>
  354. <Cell col="60" text="입퇴원접수상태"/>
  355. <Cell col="61" text="유형종료일"/>
  356. <Cell col="62" text="DRG"/>
  357. <Cell col="63" text="항암&#13;&#10;Dump"/>
  358. <Cell col="64" text="퇴원예고등록일시"/>
  359. <Cell col="65" text="간호퇴원확정&#13;&#10;등록시간"/>
  360. <Cell col="66" text="완화&#13;&#10;의료"/>
  361. <Cell col="67" text="예고심사&#13;&#10;완료일시"/>
  362. <Cell col="68" text="MDC"/>
  363. <Cell col="69" text="ADRG"/>
  364. <Cell col="70" text="DRG&#13;&#10;분류구분"/>
  365. <Cell col="71" displaytype="normal" text="외&#13;&#10;상"/>
  366. </Band>
  367. <Band id="body">
  368. <Cell celltype="head" expr="expr:currow+1"/>
  369. <Cell col="1" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dschdclrtyn"/>
  370. <Cell col="2" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dschnotiyn"/>
  371. <Cell col="3" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:indschstat"/>
  372. <Cell col="4" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:sixtimyn"/>
  373. <Cell col="5" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:orddeptnm"/>
  374. <Cell col="6" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:erorddeptnm"/>
  375. <Cell col="7" style="align:left middle;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:wardnm"/>
  376. <Cell col="8" style="align:left middle;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:roomnm"/>
  377. <Cell col="9" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:pid"/>
  378. <Cell col="10" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:hngnm"/>
  379. <Cell col="11" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:gender"/>
  380. <Cell col="12" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:age"/>
  381. <Cell col="13" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:indaycnt"/>
  382. <Cell col="14" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" edittype="none" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:indd" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd'" tooltiptext="expr:grd_inptmast.getCellText(currow,self.col)"/>
  383. <Cell col="15" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:mskind"/>
  384. <Cell col="16" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:insukind"/>
  385. <Cell col="17" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:suppkind"/>
  386. <Cell col="18" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:rareobstflag"/>
  387. <Cell col="19" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:hflag"/>
  388. <Cell col="20" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:rareobstyn"/>
  389. <Cell col="21" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:cancer"/>
  390. <Cell col="22" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:change"/>
  391. <Cell col="23" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dcuc"/>
  392. <Cell col="24" style="align:left top;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:testgrup"/>
  393. <Cell col="25" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:fromdd" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd'"/>
  394. <Cell col="26" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" edittype="none" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:disptodd" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd'"/>
  395. <Cell col="27" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:cretyn"/>
  396. <Cell col="28" style="align:left middle;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:diag"/>
  397. <Cell col="29" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:atdoctid"/>
  398. <Cell col="30" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:specordyn"/>
  399. <Cell col="31" style="align:left top;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:judgrmk"/>
  400. <Cell col="32" displaytype="combo" edittype="none" style="align:center;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dschjudgprcsstat" combodataset="ds_P0363list" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  401. <Cell col="33" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:judgmdlid"/>
  402. <Cell col="34" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:lastjudgendid"/>
  403. <Cell col="35" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="align:left middle;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:lastjudgdt" mask="expr:expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd HH:mm:ss'"/>
  404. <Cell col="36" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true || getColumn(currow, self.text.replace('bind:','') ) == '-' ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:operationyn" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true || getColumn(currow, self.text.replace('bind:','') ) == '-' ? '' : 'yyyy-MM-dd'"/>
  405. <Cell col="37" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:opprcpyn"/>
  406. <Cell col="38" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:opprcpjudgyn"/>
  407. <Cell col="39" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:spcljudgflag"/>
  408. <Cell col="40" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:cpyn"/>
  409. <Cell col="41" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dschdclrdt" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd'"/>
  410. <Cell col="42" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true || getColumn(currow, self.text.replace('bind:','')) == '-' ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dschrgstacptdt" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true || getColumn(currow, self.text.replace('bind:','')) == '-' ? '' : 'yyyy-MM-dd HH:mm:ss'"/>
  411. <Cell col="43" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:receiptyn" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd HH:mm:ss'"/>
  412. <Cell col="44" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:judgid"/>
  413. <Cell col="45" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true || getColumn(currow, self.text.replace('bind:','') ) == '-' ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dethdt" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true || getColumn(currow, self.text.replace('bind:','') ) == '-' ? '' : 'yyyy-MM-dd HH:mm:ss'"/>
  414. <Cell col="46" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:midcyn"/>
  415. <Cell col="47" displaytype="number" style="align:right middle;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:ownbmaxexamt" mask="#,##0"/>
  416. <Cell col="48" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:calcscorcd"/>
  417. <Cell col="49" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:ordhngnm"/>
  418. <Cell col="50" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:calcpayflag"/>
  419. <Cell col="51" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:calcqty"/>
  420. <Cell col="52" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:calctims"/>
  421. <Cell col="53" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:calcdays"/>
  422. <Cell col="54" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:orddd" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd'"/>
  423. <Cell col="55" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:execdd" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd'"/>
  424. <Cell col="56" displaytype="number" style="align:right middle;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:totordamt" mask="#,##0"/>
  425. <Cell col="57" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:cretno"/>
  426. <Cell col="58" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:probjudgflag"/>
  427. <Cell col="59" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:instcd"/>
  428. <Cell col="60" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:indschacptstat"/>
  429. <Cell col="61" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:todd" mask="yyyy-mm-dd"/>
  430. <Cell col="62" displaytype="combo" edittype="combo" style="align:center;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:drgyn" combodataset="ds_init_cmb_drgyn" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  431. <Cell col="63" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dumpexistyn"/>
  432. <Cell col="64" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="align:left middle;background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dschdclrtrgstdt" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd HH:mm:ss'"/>
  433. <Cell col="65" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:dschnotirgstdt" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd HH:mm:ss'"/>
  434. <Cell col="66" displaytype="combo" edittype="combo" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:calcscorrecalflag" combodataset="ds_grd_cmb_calcscorrecalflag" combocodecol="cdid" combodatacol="cdnm"/>
  435. <Cell col="67" displaytype="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? 'nomal' : 'date'" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:gjudgdt" mask="expr:utlf_isNull(getColumn(currow, self.text.replace('bind:','') )) == true ? '' : 'yyyy-MM-dd HH:mm:ss'"/>
  436. <Cell col="68" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:mdcno"/>
  437. <Cell col="69" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:adrg"/>
  438. <Cell col="70" style="background:EXPR(setGrdRowColorExpr(currow,self.col));background2:EXPR(setGrdRowColorExpr(currow,self.col));" text="bind:drgtype"/>
  439. <Cell col="71" text="bind:etcordflag"/>
  440. </Band>
  441. </Format>
  442. </Formats>
  443. </Grid>
  444. <Button position="absolute 885 122 998 141" id="btn_dschjudgprcscncl" class="btn2" text="퇴원심사진행취소" anchor="top right" onclick="btn_dschjudgprcscncl_onclick"/>
  445. <Button position="absolute 579 122 633 141" id="btn_recalc" class="btn2" text="재계산" anchor="top right" onclick="btn_recalc_onclick"/>
  446. <Button position="absolute 999 122 1085 141" id="btn_dschclosecancel" class="btn2" text="퇴원마감취소" anchor="top right" onclick="btn_dschclosecancel_onclick"/>
  447. <Calendar position="absolute 401 122 491 141" id="ipt_mdlcalcend" class="input_search" mask="yyyy-mm-dd" anchor="top right"/>
  448. <Button position="absolute 492 122 578 141" id="btn_mdlcalcend" class="btn2" text="중간계산마감" anchor="top right" onclick="btn_mdlcalcend_onclick"/>
  449. <Button position="absolute 102 122 210 141" id="btn_srchindsch" class="btn2" text="입원재원퇴원조회" anchor="top right" onclick="btn_srchindsch_onclick"/>
  450. <Button position="absolute 211 122 276 141" id="btn_isolationbed" class="btn2" text="격리병실" anchor="top right" onclick="btn_isolationbed_onclick"/>
  451. <CheckBox position="absolute 705 122 797 141" id="chk_dschnoticnclyn" class="checkbox_search" visible="false" anchor="top right" text="간호확정취소"/>
  452. <Button position="absolute 277 122 400 141" id="btn_srchopshe" class="btn2" text="수술마취스케쥴조회" anchor="top right" onclick="btn_srchopshe_onclick"/>
  453. <Button position="absolute 798 122 884 141" id="btn_dschnotiyn" class="btn2" visible="true" text="퇴원확정변경" anchor="top right" onclick="btn_dschnotiyn_onclick"/>
  454. <!--
  455. </Layout>
  456. </Layouts>
  457. </Div>
  458. -->
  459. <Static text="실제환자수" position="absolute 988 768 1060 787" align="align:center middle;" id="caption10" class="cell_1" anchor="right bottom"/>
  460. <Static text="미심환자수" position="absolute 1100 768 1172 787" align="align:center middle;" id="caption15" class="cell_1" anchor="right bottom"/>
  461. <Static text="조회건수" position="absolute 886 768 948 787" align="align:center middle;" id="caption6" class="cell_1" anchor="right bottom"/>
  462. <CheckBox position="absolute 634 122 704 141" id="chk_readonly" class="checkbox_search" falsevalue="N" truevalue="Y" text="읽기전용" onchanged="chk_readonly_onchanged" anchor="top right"/>
  463. <Edit readonly="true" position="absolute 949 768 987 787" id="opt_totcnt" anchor="right bottom"/>
  464. <Edit readonly="true" position="absolute 1061 768 1099 787" id="opt_realpatient" anchor="right bottom"/>
  465. <Edit readonly="true" position="absolute 1173 768 1211 787" id="opt_unjudgcnt" anchor="right bottom"/>
  466. <Button position="absolute 1153 789 1209 808" id="btn_cancel" class="btn4" text="취소" onclick="btn_cancel_onclick" anchor="right bottom"/>
  467. <Button position="absolute 1096 789 1152 808" id="btn_confirm" class="btn4" text="확인" onclick="btn_confirm_onclick" anchor="right bottom"/>
  468. <Div position="absolute 1220 421 1840 792" id="grp_edimemo" visible="false" style="background:white;border:2 solid #808080ff ;">
  469. <Layouts>
  470. <Layout>
  471. <Static text="EDI 메모상세" position="absolute 5 5 123 19" id="cpt_detail" class="tit_2" anchor="default"/>
  472. <TextArea position="absolute 5 23 610 337" align="align:center top;" id="txt_judgrmk" anchor="default" maxlength="1750" scrollbars="autovert" wordwrap="word"/>
  473. <Button position="absolute 554 342 610 364" id="btn_closememot" class="btn4" text="닫기" anchor="default" onclick="grp_edimemo_btn_closememot_onclick"/>
  474. <Button position="absolute 497 342 553 364" id="btn_savememo" class="btn4" visible="true" text="저장" anchor="default" onclick="grp_edimemo_btn_savememo_onclick"/>
  475. </Layout>
  476. </Layouts>
  477. </Div>
  478. <Button position="absolute 1027 789 1095 808" id="btn_init" class="btn4" taborder="6" text="초기화" onclick="btn_init_onclick" anchor="right bottom"/>
  479. <Button position="absolute 946 789 1026 808" id="btn_EnvSetup" class="btn4" visible="true" text="환경저장" onclick="btn_EnvSetup_onclick" anchor="right bottom"/>
  480. <Button position="absolute 595 789 687 808" id="button2" class="btn4" visible="false" text="다음페이지" onclick="button2_onclick" anchor="right bottom"/>
  481. <MaskEdit readonly="true" position="absolute 765 768 885 787" id="output1" mask="####-##-## ##:##:##" anchor="right bottom" type="string"/>
  482. <Static text="퇴원확정(간호)" position="absolute 666 769 763 788" align="align:center middle;" id="caption26" class="cell_1" anchor="right bottom"/>
  483. <CheckBox position="absolute 493 72 575 91" id="chk_emg" class="checkbox_search" text="응급실포함"/>
  484. <MaskEdit readonly="true" position="absolute 545 769 665 788" id="output2" mask="####-##-## ##:##:##" anchor="right bottom" type="string"/>
  485. <Static text="퇴원예고(진료)" position="absolute 446 769 543 788" align="align:center middle;" id="caption28" class="cell_1" anchor="right bottom"/>
  486. <Shape position="absolute 1 769 126 789" id="rdt_rcpt" type="roundrectangle" anchor="left bottom"/>
  487. <CheckBox position="absolute 106 772 123 787" id="chk_rcpt" onclick="chk_rcpt_onclick" falsevalue="0" truevalue="1" anchor="left bottom"/>
  488. <Static position="absolute 8 774 109 787" align="align:center middle;" id="caption57" onclick="caption57_onclick" text="범례 및 코드보기" anchor="left bottom"/>
  489. <Static text="퇴원모드시 조회조건:" position="absolute 4 789 155 808" id="caption30" class="search_name" anchor="left bottom"/>
  490. <Radio position="absolute 157 789 531 808" id="rdo_dschmodesrch" class="radio_search" columncount="4" codecolumn="codecolumn" datacolumn="datacolumn" anchor="left bottom">
  491. <Dataset id="innerdataset">
  492. <ColumnInfo>
  493. <Column id="codecolumn"/>
  494. <Column id="datacolumn"/>
  495. </ColumnInfo>
  496. <Rows>
  497. <Row>
  498. <Col id="codecolumn">1</Col>
  499. <Col id="datacolumn">전체(입원전체/분할이후 전체)</Col>
  500. </Row>
  501. <Row>
  502. <Col id="codecolumn">2</Col>
  503. <Col id="datacolumn">최종심사일이후부터</Col>
  504. </Row>
  505. </Rows>
  506. </Dataset>
  507. </Radio>
  508. <Button position="absolute 688 789 780 808" id="btn_sljgtotordamt" class="btn5" text="총진료비 생성" onclick="btn_sljgtotordamt_onclick" anchor="right bottom"/>
  509. <CheckBox position="absolute 1425 205 1615 224" id="chk_tstlist" class="checkbox_search" visible="false"/>
  510. <Edit position="absolute 1416 171 1561 190" id="input1" visible="false"/>
  511. <Button position="absolute 781 789 856 808" id="btn_dump" class="btn5" text="Dump시행" onclick="btn_dump_onclick" anchor="right bottom"/>
  512. <Div id="Div00" taborder="13" text="Div00" position="absolute 1600 108 2626 456" visible="false">
  513. <Layouts>
  514. <Layout width="1080" height="348"/>
  515. </Layouts>
  516. </Div>
  517. <PopupMenu id="pmn_menu1" innerdataset="ds_menu" idcolumn="func" captioncolumn="label" levelcolumn="level" onmenuclick="pmn_menu1_onmenuclick" position="absolute 1219 3 1392 258" visible="false" onmouseleave="pmn_menu1_onmouseleave"/>
  518. <Div id="grp_skindfromddchange" taborder="14" style="background:white;border:2 solid #808080ff ;" visible="false" position="absolute 1023 528 1199 637">
  519. <Layouts>
  520. <Layout>
  521. <Static id="caption34" text="부유형 시작일 설정" class="tit_2" position="absolute 4 4 149 17" anchor="default"/>
  522. <Shape id="line14" linetype="descent" class="line_1" position="absolute 5 21 167 22" anchor="default"/>
  523. <Button id="button1" taborder="4" text="취소" onclick="button1_onclick" onlbuttonup="button1_onlbuttonup" class="btn4" position="absolute 89 79 145 99" anchor="default"/>
  524. <Button id="btn_accept" taborder="5" text="확인" onclick="btn_accept_onclick" onlbuttonup="btn_accept_onlbuttonup" class="btn4" position="absolute 29 79 85 99" anchor="default"/>
  525. <Static id="caption35" text="실제 부유형 시작일:" class="search_name" position="absolute 5 28 155 45" anchor="default"/>
  526. <Calendar id="ipt_sfromdd" taborder="6" class="input_search" position="absolute 43 51 133 71" mask="####-##-##" anchor="default"/>
  527. </Layout>
  528. </Layouts>
  529. </Div>
  530. <Div position="absolute 592 813 1212 1182" id="grp_tstmemo" visible="false" anchor="default" style="background:white;border:2 solid #808080ff ;">
  531. <Layouts>
  532. <Layout>
  533. <Static text="평가메모상세" position="absolute 5 5 123 24" id="caption31" class="tit_2" anchor="default"/>
  534. <TextArea position="absolute 5 25 609 334" align="align:center top;" id="txt_tstrmk" anchor="default" scrollbars="autovert" wordwrap="word"/>
  535. <Button position="absolute 554 338 610 360" id="button3" class="btn4" text="닫기" anchor="default" onclick="grp_tstmemo_button3_onclick"/>
  536. <Shape id="line5" linetype="vertical" class="line_1" position="absolute 0 12 602 18" anchor="default"/>
  537. </Layout>
  538. </Layouts>
  539. </Div>
  540. <Div id="grp_intdtry" taborder="15" position="absolute 2 665 291 769" style="background:white;border:2 solid #808080ff ;" visible="false">
  541. <Layouts>
  542. <Layout width="425" height="197">
  543. <Static id="cpt_rcpt" text="H 희귀&#13;&#10;C 차상위 희귀&#13;&#10;E 차상위 만성 / 18세미만&#13;&#10;F 차상위장애인만성/ 18세 미만&#13;&#10;@ 6시간 미만 외래 요율 퇴원건" onclick="cpt_rcpt_onclick" visible="true" position="absolute 6 12 281 78" anchor="default"/>
  544. <Shape id="roundrect2" type="roundrectangle" class="roundrect_example" position="absolute 2 76 283 97" anchor="default"/>
  545. <Static id="caption29" text="범 례" class="cell_2" position="absolute 4 79 44 94" anchor="default"/>
  546. <Static id="caption20" class="color_1" position="absolute 200 79 215 94" style="background:#fcd2c1ff;" anchor="default"/>
  547. <Static id="caption21" text="문제환자(R)" position="absolute 207 79 277 94" anchor="default"/>
  548. <Static id="caption22" class="color_2" position="absolute 48 79 63 94" style="background:#ffe79dff;" anchor="default"/>
  549. <Static id="caption23" text="선별심사" position="absolute 57 79 107 94" anchor="default"/>
  550. <Static id="caption24" class="color_4" position="absolute 115 79 130 94" style="background:#7be6b7ff;" anchor="default"/>
  551. <Static id="caption25" text="문제환자(G)" position="absolute 122 79 197 94" anchor="default"/>
  552. </Layout>
  553. </Layouts>
  554. </Div>
  555. <Button id="btn_EnvSetup00" taborder="16" text="환경초기화" onclick="btn_EnvSetup00_onclick" class="btn4" position="absolute 857 789 945 808" anchor="right bottom"/>
  556. <Shape id="line00" class="line_10" position="absolute 0 142 1211 145" anchor="left top right"/>
  557. </Layout>
  558. </Layouts>
  559. <Objects>
  560. <Dataset id="ds_init_cmb_drgyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  561. <ColumnInfo>
  562. <Column id="cdnm" type="STRING"/>
  563. <Column id="cdid" type="STRING"/>
  564. </ColumnInfo>
  565. </Dataset>
  566. <Dataset id="ds_init_cmb_insukind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  567. <ColumnInfo>
  568. <Column id="cdnm" type="STRING"/>
  569. <Column id="cdid" type="STRING"/>
  570. </ColumnInfo>
  571. </Dataset>
  572. <Dataset id="ds_init_cmb_ordfildcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  573. <ColumnInfo>
  574. <Column id="cdnm" type="STRING"/>
  575. <Column id="cdid" type="STRING"/>
  576. </ColumnInfo>
  577. </Dataset>
  578. <Dataset id="ds_init_cmb_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  579. <ColumnInfo>
  580. <Column id="depthngnm" type="STRING"/>
  581. <Column id="deptcd" type="STRING"/>
  582. </ColumnInfo>
  583. </Dataset>
  584. <Dataset id="ds_init_cmb_suppkind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  585. <ColumnInfo>
  586. <Column id="suppkindnm" type="STRING"/>
  587. <Column id="suppkind" type="STRING"/>
  588. </ColumnInfo>
  589. </Dataset>
  590. <Dataset id="ds_init_cmb_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  591. <ColumnInfo>
  592. <Column id="atdocthngnm" type="STRING"/>
  593. <Column id="atdoctid" type="STRING"/>
  594. </ColumnInfo>
  595. </Dataset>
  596. <Dataset id="ds_init_cmb_judgendyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  597. <ColumnInfo>
  598. <Column id="cdnm" type="STRING"/>
  599. <Column id="cdid" type="STRING"/>
  600. </ColumnInfo>
  601. </Dataset>
  602. <Dataset id="ds_init_cmb_wardcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  603. <ColumnInfo>
  604. <Column id="wardnm" type="STRING"/>
  605. <Column id="wardcd" type="STRING"/>
  606. </ColumnInfo>
  607. </Dataset>
  608. <Dataset id="ds_init_cmb_judgmdlid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  609. <ColumnInfo>
  610. <Column id="judgnm" type="STRING"/>
  611. <Column id="judgid" type="STRING"/>
  612. </ColumnInfo>
  613. </Dataset>
  614. <Dataset id="ds_grd_inptmast" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  615. <ColumnInfo>
  616. <Column id="dschdclrtyn" type="STRING" size="256" sumtext="퇴원예고여부"/>
  617. <Column id="dschnotiyn" type="STRING" size="256" sumtext="퇴원통보여부"/>
  618. <Column id="indschstat" type="STRING" size="256" sumtext="입퇴원상태"/>
  619. <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명칭"/>
  620. <Column id="wardnm" type="STRING" size="256" sumtext="병동명칭"/>
  621. <Column id="roomnm" type="STRING" size="256" sumtext="병실명칭"/>
  622. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  623. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  624. <Column id="gender" type="STRING" size="256" sumtext="성별"/>
  625. <Column id="age" type="STRING" size="256" sumtext="나이"/>
  626. <Column id="indaycnt" type="BIGDECIMAL" size="256" sumtext="재원일수"/>
  627. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  628. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  629. <Column id="insukind" type="STRING" size="256" sumtext="유형"/>
  630. <Column id="suppkind" type="STRING" size="256" sumtext="유형보조"/>
  631. <Column id="rareobstflag" type="STRING" size="256" sumtext="희귀난치,차상위"/>
  632. <Column id="hflag" type="STRING" size="256" sumtext="희귀난치"/>
  633. <Column id="rareobstyn" type="STRING" size="256" sumtext="희귀여부"/>
  634. <Column id="cancer" type="STRING" size="256" sumtext="암"/>
  635. <Column id="change" type="STRING" size="256" sumtext="변경여부"/>
  636. <Column id="diag" type="STRING" size="256" sumtext="주상병"/>
  637. <Column id="atdoctid" type="STRING" size="256" sumtext="주치의"/>
  638. <Column id="specordyn" type="STRING" size="256" sumtext="선택진료여부"/>
  639. <Column id="judgrmk" type="STRING" size="256" sumtext="원무메모"/>
  640. <Column id="dschjudgprcsstat" type="STRING" size="256" sumtext="심사상태"/>
  641. <Column id="lastjudgendid" type="STRING" size="256" sumtext="심사자"/>
  642. <Column id="lastjudgdt" type="STRING" size="256" sumtext="심사일자"/>
  643. <Column id="operationyn" type="STRING" size="256" sumtext="수술스케쥴여부"/>
  644. <Column id="opprcpyn" type="STRING" size="256" sumtext="수술처방여부"/>
  645. <Column id="opprcpjudgyn" type="STRING" size="256" sumtext="수술심사완료여부"/>
  646. <Column id="spcljudgflag" type="STRING" size="256" sumtext="선별심사여부"/>
  647. <Column id="cpyn" type="STRING" size="256" sumtext="CP여부"/>
  648. <Column id="probjudgflag" type="STRING" size="256" sumtext="문제환자여부"/>
  649. <Column id="totordamt" type="STRING" size="256" sumtext="총진료비"/>
  650. <Column id="erorddeptnm" type="STRING" size="256" sumtext="응급실주진료과"/>
  651. <Column id="dschdclrdt" type="STRING" size="256" sumtext="퇴원예정일"/>
  652. <Column id="rrgstno" type="STRING" size="256" sumtext="주민등록번호"/>
  653. <Column id="dispfromdd" type="STRING" size="256" sumtext="시작일자"/>
  654. <Column id="disptodd" type="STRING" size="256" sumtext="종료일자"/>
  655. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  656. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  657. <Column id="receiptyn" type="STRING" size="256" sumtext="계산서발행여부"/>
  658. <Column id="judgid" type="STRING" size="256" sumtext="심사자id"/>
  659. <Column id="judgmdlid" type="STRING" size="256" sumtext="담당자"/>
  660. <Column id="dethdt" type="STRING" size="256" sumtext="사망여부"/>
  661. <Column id="midcyn" type="STRING" size="256" sumtext="중간청구등록여부"/>
  662. <Column id="ownbmaxexamt" type="STRING" size="256" sumtext="자보한도액"/>
  663. <Column id="calcscorcd" type="STRING" size="256" sumtext="처방코드"/>
  664. <Column id="ordhngnm" type="STRING" size="256" sumtext="처방명"/>
  665. <Column id="calcpayflag" type="STRING" size="256" sumtext="급비"/>
  666. <Column id="calcqty" type="BIGDECIMAL" size="256" sumtext="수량"/>
  667. <Column id="calctims" type="BIGDECIMAL" size="256" sumtext="횟수"/>
  668. <Column id="calcdays" type="BIGDECIMAL" size="256" sumtext="일수"/>
  669. <Column id="orddd" type="STRING" size="256" sumtext="처방일자"/>
  670. <Column id="execdd" type="STRING" size="256" sumtext="실시알자"/>
  671. <Column id="cretno" type="BIGDECIMAL" size="256" sumtext="생성번호"/>
  672. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  673. <Column id="dschrgstacptdt" type="STRING" size="256" sumtext="퇴원접수일시"/>
  674. <Column id="dschdclrtrgstdt" type="STRING" size="256" sumtext="퇴원예고등록일시"/>
  675. <Column id="indschacptstat" type="STRING" size="256" sumtext="입퇴원접수상태"/>
  676. <Column id="sixtimyn" type="STRING" size="256" sumtext="6시간미만여부"/>
  677. <Column id="cretyn" type="STRING" size="256" sumtext="생성여부"/>
  678. <Column id="esrareyn" type="STRING" size="256" sumtext="희귀난치산특등록여부"/>
  679. <Column id="testgrup" type="STRING" size="256" sumtext="평가코드"/>
  680. <Column id="drgyn" type="STRING" size="256" sumtext="DRG여부"/>
  681. <Column id="dcuc" type="STRING" size="256" sumtext="긴급지원여부"/>
  682. <Column id="dumpexistyn" type="STRING" size="256" sumtext="Dump 여부"/>
  683. <Column id="dschnotirgstdt" type="STRING" size="256" sumtext="퇴원확정등록일시"/>
  684. <Column id="calcscorrecalflag" type="STRING" size="256" sumtext="완화구분"/>
  685. <Column id="personflag" type="STRING" size="256"/>
  686. <Column id="seqno" type="BIGDECIMAL" size="256"/>
  687. <Column id="subkindfromdd" type="STRING" size="256"/>
  688. <Column id="gjudgdt" type="STRING" size="256"/>
  689. <Column id="mdcno" type="STRING" size="256"/>
  690. <Column id="adrg" type="STRING" size="256"/>
  691. <Column id="drgtype" type="STRING" size="256"/>
  692. <Column id="etcordflag" type="STRING" size="256"/>
  693. </ColumnInfo>
  694. </Dataset>
  695. <Dataset id="ds_grd_insuhistory" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  696. <ColumnInfo>
  697. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  698. <Column id="suppkind" type="STRING" size="256" sumtext="유형보조"/>
  699. <Column id="mskind" type="STRING" size="256" sumtext="시작일자"/>
  700. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  701. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  702. <Column id="cretno" type="STRING" size="256" sumtext="cretno"/>
  703. <Column id="seqno" type="STRING" size="256" sumtext="seqno"/>
  704. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  705. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  706. <Column id="dschnotidt" type="STRING" size="256" sumtext="퇴원확정일자"/>
  707. <Column id="flag" type="STRING" size="256" sumtext="flag"/>
  708. <Column id="indaycnt" type="STRING" size="256" sumtext="재원일수"/>
  709. <Column id="disccd" type="STRING" size="256" sumtext="할인코드"/>
  710. <Column id="rare" type="STRING" size="256" sumtext="희귀"/>
  711. </ColumnInfo>
  712. </Dataset>
  713. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_send_oncolumnchanged">
  714. <ColumnInfo>
  715. <Column id="fromdate" type="STRING" size="256" sumtext="기준시작일자"/>
  716. <Column id="todate" type="STRING" size="256" sumtext="기준종료일자"/>
  717. <Column id="dschjudgprcsstat" type="STRING" size="256" sumtext="심사구분"/>
  718. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  719. <Column id="suppkind" type="STRING" size="256" sumtext="보험유형"/>
  720. <Column id="wardcd" type="STRING" size="256" sumtext="병동"/>
  721. <Column id="judgmdlid" type="STRING" size="256" sumtext="심사자id"/>
  722. <Column id="ordfildcd" type="STRING" size="256" sumtext="진료분야"/>
  723. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  724. <Column id="atdoctid" type="STRING" size="256" sumtext="진료의id"/>
  725. <Column id="totordamt" type="STRING" size="256" sumtext="총진료비"/>
  726. <Column id="cmbtotordamt" type="STRING" size="256" sumtext="총진료비구분"/>
  727. <Column id="ownbamt" type="STRING" size="256" sumtext="본인부담금"/>
  728. <Column id="cmbownbamt" type="STRING" size="256" sumtext="본인부담금구분"/>
  729. <Column id="indaycnt" type="STRING" size="256" sumtext="재원일수"/>
  730. <Column id="cmbindaycnt" type="STRING" size="256" sumtext="재원일수구분"/>
  731. <Column id="choicdsrch1" type="STRING" size="256" sumtext="처방별조건구분"/>
  732. <Column id="choicdsrch2" type="STRING" size="256" sumtext="선별심사코드"/>
  733. <Column id="patunitsrch1" type="STRING" size="256" sumtext="환자단위조회"/>
  734. <Column id="patunitsrch2" type="STRING" size="256" sumtext="환자단위조회구분"/>
  735. <Column id="caneryn" type="STRING" size="256" sumtext="암환자"/>
  736. <Column id="anticanceryn" type="STRING" size="256" sumtext="항암제전체"/>
  737. <Column id="anticancer2yn" type="STRING" size="256" sumtext="항암제2군"/>
  738. <Column id="mriyn" type="STRING" size="256" sumtext="MRI/PET"/>
  739. <Column id="brainheartyn" type="STRING" size="256" sumtext="개심개두술"/>
  740. <Column id="midclaimyn" type="STRING" size="256" sumtext="중간청구여부"/>
  741. <Column id="operationyn" type="STRING" size="256" sumtext="수술스케쥴여부"/>
  742. <Column id="spcljudg" type="STRING" size="256" sumtext="선별심사여부"/>
  743. <Column id="angioyn" type="STRING" size="256" sumtext="혈관조영술"/>
  744. <Column id="angio2yn" type="STRING" size="256" sumtext="중제적시술"/>
  745. <Column id="cpyn" type="STRING" size="256" sumtext="CP여부"/>
  746. <Column id="drgyn" type="STRING" size="256" sumtext="DRG여부"/>
  747. <Column id="v191" type="STRING" size="256" sumtext="개두술"/>
  748. <Column id="v192" type="STRING" size="256" sumtext="개심술"/>
  749. <Column id="v193" type="STRING" size="256" sumtext="등록암"/>
  750. <Column id="lastpid" type="STRING" size="256" sumtext="최종환자번호"/>
  751. <Column id="lastindd" type="STRING" size="256" sumtext="최종입원일자"/>
  752. <Column id="lastcretno" type="STRING" size="256" sumtext="최종생성번호"/>
  753. <Column id="choiperiod" type="STRING" size="256" sumtext="전체/기준일자기간여부"/>
  754. <Column id="diagfrom" type="STRING" size="256" sumtext="시작상병코드"/>
  755. <Column id="diagto" type="STRING" size="256" sumtext="종료상병코드"/>
  756. <Column id="basedd" type="STRING" size="256" sumtext="기준일자"/>
  757. <Column id="emg" type="STRING" size="256" sumtext="응급실"/>
  758. <Column id="judgstat" type="STRING" size="256" sumtext="심사완료제외"/>
  759. <Column id="sixyn" type="STRING" size="256" sumtext="6시간미만포함여부"/>
  760. <Column id="tststndrdcdnm" type="STRING" size="256" sumtext="평가종류"/>
  761. <Column id="tststndrdcdlist" type="STRING" size="256" sumtext="평가종류멀티선택"/>
  762. <Column id="cgubun" type="STRING" size="256" sumtext="평가조회 여부"/>
  763. <Column id="showone" type="STRING" size="256" sumtext="분할제외 여부"/>
  764. <Column id="sixall" type="STRING" size="256" sumtext="6시간미만포함여부"/>
  765. <Column id="chemodump" type="STRING" size="256" sumtext="항암환자 Dump조회 유무"/>
  766. <Column id="ordflag" type="STRING" size="256"/>
  767. <Column id="tststndrdcd" type="STRING" size="256"/>
  768. <Column id="tststndrdnm" type="STRING" size="256"/>
  769. <Column id="mdlcalcenddd" type="STRING" size="256"/>
  770. <Column id="chktryn" type="STRING" size="256"/>
  771. </ColumnInfo>
  772. <Rows>
  773. <Row>
  774. <Col id="ordflag">J</Col>
  775. <Col id="showone">Y</Col>
  776. </Row>
  777. </Rows>
  778. </Dataset>
  779. <Dataset id="ds_init_chk_tstlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  780. <Dataset id="ds_P0022list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  781. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  782. <ColumnInfo>
  783. <Column id="dschmodesrch" type="STRING" size="256"/>
  784. <Column id="totcnt" type="STRING" size="256"/>
  785. <Column id="realpatientcnt" type="STRING" size="256"/>
  786. <Column id="unjudgcnt" type="STRING" size="256"/>
  787. <Column id="selectedRow" type="STRING" size="256"/>
  788. <Column id="userid" type="STRING" size="256"/>
  789. <Column id="judgrmk" type="STRING" size="256"/>
  790. <Column id="judgflag" type="STRING" size="256"/>
  791. <Column id="dschrgstacptdt" type="STRING" size="256"/>
  792. <Column id="testgrup" type="STRING" size="256"/>
  793. <Column id="dschdclrtrgstdt" type="STRING" size="256"/>
  794. </ColumnInfo>
  795. <Rows>
  796. <Row/>
  797. </Rows>
  798. </Dataset>
  799. <Dataset id="ds_grd_cmb_calcscorrecalflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  800. <ColumnInfo>
  801. <Column id="cdid" type="STRING" size="256"/>
  802. <Column id="cdnm" type="STRING" size="256"/>
  803. </ColumnInfo>
  804. <Rows>
  805. <Row>
  806. <Col id="cdid">9</Col>
  807. <Col id="cdnm">완화</Col>
  808. </Row>
  809. <Row>
  810. <Col id="cdnm">-</Col>
  811. </Row>
  812. </Rows>
  813. </Dataset>
  814. <Dataset id="ds_P0363list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  815. <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  816. <ColumnInfo>
  817. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  818. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  819. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  820. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  821. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  822. <Column id="checkyn" type="STRING" size="256" sumtext="입원계산자료검증유무"/>
  823. <Column id="ordfromdd" type="STRING" size="256" sumtext="계산시작일자"/>
  824. <Column id="todd" type="STRING" size="256" sumtext="계산시작일자"/>
  825. <Column id="dschjudgprcsstat" type="STRING" size="256"/>
  826. <Column id="indschacptstat" type="STRING" size="256"/>
  827. <Column id="dschnoticnclyn" type="STRING" size="256"/>
  828. </ColumnInfo>
  829. <Rows>
  830. <Row>
  831. <Col id="dschjudgprcsstat">1</Col>
  832. </Row>
  833. </Rows>
  834. </Dataset>
  835. <Dataset id="ds_endcnclstat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  836. <ColumnInfo>
  837. <Column id="dschnotiyn" type="STRING" size="256" sumtext="퇴원확정여부"/>
  838. <Column id="indschacptstat" type="STRING" size="256" sumtext="입퇴원접수상태"/>
  839. <Column id="dschjudgprcsstat" type="STRING" size="256" sumtext="심사상태"/>
  840. <Column id="maxexectm" type="STRING" size="256" sumtext="마지막실시일자"/>
  841. <Column id="admamtcalcyn" type="STRING" size="256" sumtext="병실료계산확인"/>
  842. <Column id="calcmissyn" type="STRING" size="256" sumtext="처방계산확인"/>
  843. <Column id="ipscendyn" type="STRING" size="256" sumtext="소급계산완료"/>
  844. <Column id="dumpexistyn" type="STRING" size="256" sumtext="외래덤프데이터존재"/>
  845. <Column id="dupexecdd" type="STRING" size="256" sumtext="중복계산일자"/>
  846. <Column id="check0" type="STRING" size="256" sumtext="check0"/>
  847. <Column id="check1" type="STRING" size="256" sumtext="check1"/>
  848. <Column id="check2" type="STRING" size="256" sumtext="check2"/>
  849. <Column id="check3" type="STRING" size="256" sumtext="check3"/>
  850. <Column id="check4" type="STRING" size="256" sumtext="check4"/>
  851. <Column id="check5" type="STRING" size="256" sumtext="check5"/>
  852. <Column id="nog3reasnyn" type="STRING" size="256" sumtext="nog3reasnyn"/>
  853. <Column id="dumpclamkeyexistyn" type="STRING" size="256" sumtext="dumpclamkeyexistyn"/>
  854. <Column id="dschantichk" type="STRING" size="256" sumtext="dschantichk"/>
  855. </ColumnInfo>
  856. </Dataset>
  857. <Dataset id="ds_recal" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  858. <ColumnInfo>
  859. <Column id="recalcdd" type="STRING" size="256" sumtext="재계산일자"/>
  860. </ColumnInfo>
  861. </Dataset>
  862. <Dataset id="ds_drginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  863. <ColumnInfo>
  864. <Column id="opchkyn" type="STRING" size="256" sumtext="opchkyn"/>
  865. <Column id="drgmchkyn" type="STRING" size="256" sumtext="drgmchkyn"/>
  866. <Column id="rslt" type="STRING" size="256" sumtext="rslt"/>
  867. </ColumnInfo>
  868. </Dataset>
  869. <Dataset id="ds_send_data4" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  870. <ColumnInfo>
  871. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  872. <Column id="indd" type="STRING" size="256" sumtext="입원일"/>
  873. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  874. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  875. <Column id="cretno" type="STRING" size="256" sumtext="cretno"/>
  876. <Column id="calcbasedd" type="STRING" size="256" sumtext="계산기준일"/>
  877. <Column id="fromdd" type="STRING" size="256"/>
  878. <Column id="todd" type="STRING" size="256"/>
  879. </ColumnInfo>
  880. <Rows>
  881. <Row/>
  882. </Rows>
  883. </Dataset>
  884. <Dataset id="ds_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  885. <ColumnInfo>
  886. <Column id="label" type="STRING" size="256"/>
  887. <Column id="func" type="STRING" size="256"/>
  888. <Column id="level" type="STRING" size="256"/>
  889. </ColumnInfo>
  890. <Rows>
  891. <Row>
  892. <Col id="label">퇴실정보</Col>
  893. <Col id="func">fOpenDschMemo</Col>
  894. <Col id="level">0</Col>
  895. </Row>
  896. <Row>
  897. <Col id="label">시행부서처방</Col>
  898. <Col id="func">fExecDeptPrcp</Col>
  899. </Row>
  900. <Row>
  901. <Col id="label">결과조회</Col>
  902. <Col id="func">fSrchResult</Col>
  903. </Row>
  904. <Row>
  905. <Col id="label">약제누적조회</Col>
  906. <Col id="func">fGetDurginfo</Col>
  907. </Row>
  908. <Row>
  909. <Col id="label">진료정보조회</Col>
  910. <Col id="func">fSrchOrdInfo</Col>
  911. </Row>
  912. <Row>
  913. <Col id="label">CONSULT</Col>
  914. <Col id="func">fSrchConsult</Col>
  915. </Row>
  916. <Row>
  917. <Col id="label">통합기록조회</Col>
  918. <Col id="func">fSrchAllForm</Col>
  919. </Row>
  920. <Row>
  921. <Col id="label">DRG정보조회</Col>
  922. <Col id="func">fSrchDrgInfo</Col>
  923. </Row>
  924. <Row>
  925. <Col id="label">KDRG정보조회</Col>
  926. <Col id="func">fSrchKDrgInfo</Col>
  927. </Row>
  928. <Row>
  929. <Col id="label">--------------</Col>
  930. </Row>
  931. <Row>
  932. <Col id="label">환자기준 메세지작성</Col>
  933. <Col id="func">fPatJudgPatMsgTrsm</Col>
  934. </Row>
  935. <Row>
  936. <Col id="label">환자 전체메세지 간편보기</Col>
  937. <Col id="func">fJudgPatMsgTrsmRef</Col>
  938. </Row>
  939. <Row>
  940. <Col id="label">부유형 시작일 변경</Col>
  941. <Col id="func">fSkindFromddChange</Col>
  942. </Row>
  943. </Rows>
  944. </Dataset>
  945. <Dataset id="ds_hidden_sppij02000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  946. <ColumnInfo>
  947. <Column id="pid" type="STRING" size="256"/>
  948. <Column id="orddd" type="STRING" size="256"/>
  949. <Column id="dschdclrdt" type="STRING" size="256"/>
  950. <Column id="cretno" type="STRING" size="256"/>
  951. <Column id="seqno" type="STRING" size="256"/>
  952. </ColumnInfo>
  953. <Rows>
  954. <Row/>
  955. </Rows>
  956. </Dataset>
  957. <Dataset id="ds_hidden_smaer00800" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  958. <ColumnInfo>
  959. <Column id="srchdate1" type="STRING" size="256"/>
  960. <Column id="srchdate2" type="STRING" size="256"/>
  961. <Column id="srchpid" type="STRING" size="256"/>
  962. <Column id="wardcd" type="STRING" size="256"/>
  963. <Column id="roomcd" type="STRING" size="256"/>
  964. <Column id="listflag" type="STRING" size="256"/>
  965. <Column id="deptcd" type="STRING" size="256"/>
  966. <Column id="drid" type="STRING" size="256"/>
  967. <Column id="chkcheck" type="STRING" size="256"/>
  968. <Column id="chkcheck1" type="STRING" size="256"/>
  969. <Column id="chkcheck2" type="STRING" size="256"/>
  970. <Column id="chkcheck3" type="STRING" size="256"/>
  971. <Column id="chkcheck4" type="STRING" size="256"/>
  972. <Column id="chkcheck5" type="STRING" size="256"/>
  973. <Column id="chkcheck6" type="STRING" size="256"/>
  974. <Column id="chkcheck7" type="STRING" size="256"/>
  975. <Column id="chkcheck8" type="STRING" size="256"/>
  976. <Column id="tabflag" type="STRING" size="256"/>
  977. <Column id="mdlcd" type="STRING" size="256"/>
  978. <Column id="examgubun" type="STRING" size="256"/>
  979. <Column id="srchflag" type="STRING" size="256"/>
  980. <Column id="hlaflag" type="STRING" size="256"/>
  981. <Column id="prntfrmflag" type="STRING" size="256"/>
  982. </ColumnInfo>
  983. <Rows>
  984. <Row/>
  985. </Rows>
  986. </Dataset>
  987. <Dataset id="ds_hidden_sppij03200" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  988. <ColumnInfo>
  989. <Column id="pid" type="STRING" size="256"/>
  990. <Column id="indd" type="STRING" size="256"/>
  991. <Column id="ordfromdd" type="STRING" size="256"/>
  992. <Column id="cretno" type="STRING" size="256"/>
  993. </ColumnInfo>
  994. <Rows>
  995. <Row/>
  996. </Rows>
  997. </Dataset>
  998. <Dataset id="ds_tmp_msgtrsm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  999. <ColumnInfo>
  1000. <Column id="instcd" type="STRING" size="256"/>
  1001. <Column id="msgwrtedd" type="STRING" size="256"/>
  1002. <Column id="msgwrteno" type="STRING" size="256"/>
  1003. <Column id="msgwrtehistno" type="STRING" size="256"/>
  1004. <Column id="histstat" type="STRING" size="256"/>
  1005. <Column id="pid" type="STRING" size="256"/>
  1006. <Column id="orddd" type="STRING" size="256"/>
  1007. <Column id="cretno" type="STRING" size="256"/>
  1008. <Column id="mskind" type="STRING" size="256"/>
  1009. <Column id="orddeptcd" type="STRING" size="256"/>
  1010. <Column id="orddrid" type="STRING" size="256"/>
  1011. <Column id="orddrnm" type="STRING" size="256"/>
  1012. <Column id="ordtype" type="STRING" size="256"/>
  1013. <Column id="kindflag" type="STRING" size="256"/>
  1014. <Column id="grupcalcscorcd" type="STRING" size="256"/>
  1015. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  1016. <Column id="ordqty" type="STRING" size="256"/>
  1017. <Column id="ordtims" type="STRING" size="256"/>
  1018. <Column id="orddays" type="STRING" size="256"/>
  1019. <Column id="prcpdd" type="STRING" size="256"/>
  1020. <Column id="prcpno" type="STRING" size="256"/>
  1021. <Column id="prcppayflag" type="STRING" size="256"/>
  1022. <Column id="rgstrid" type="STRING" size="256"/>
  1023. <Column id="rgstdd" type="STRING" size="256"/>
  1024. <Column id="rgsttm" type="STRING" size="256"/>
  1025. <Column id="sendphone" type="STRING" size="256"/>
  1026. <Column id="anybodyyn" type="STRING" size="256"/>
  1027. <Column id="sendflag" type="STRING" size="256"/>
  1028. <Column id="senddate" type="STRING" size="256"/>
  1029. <Column id="sendid" type="STRING" size="256"/>
  1030. <Column id="deliveid" type="STRING" size="256"/>
  1031. <Column id="recvdate" type="STRING" size="256"/>
  1032. <Column id="recvid" type="STRING" size="256"/>
  1033. <Column id="recvcnfmyn" type="STRING" size="256"/>
  1034. <Column id="recvcnfmid" type="STRING" size="256"/>
  1035. <Column id="sendmsg" type="STRING" size="256"/>
  1036. <Column id="recvmsg" type="STRING" size="256"/>
  1037. <Column id="fstrgstrid" type="STRING" size="256"/>
  1038. <Column id="fstrgstdt" type="STRING" size="256"/>
  1039. <Column id="lastupdtrid" type="STRING" size="256"/>
  1040. <Column id="lastupdtdt" type="STRING" size="256"/>
  1041. <Column id="refyn" type="STRING" size="256"/>
  1042. </ColumnInfo>
  1043. <Rows>
  1044. <Row/>
  1045. </Rows>
  1046. </Dataset>
  1047. <Dataset id="ds_hidden_suppkindlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1048. <ColumnInfo>
  1049. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  1050. <Column id="indd" type="STRING" size="256" sumtext="입원일"/>
  1051. <Column id="cretno" type="STRING" size="256" sumtext="cretno"/>
  1052. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  1053. <Column id="insukind" type="STRING" size="256" sumtext="보험요형"/>
  1054. <Column id="suppkind" type="STRING" size="256" sumtext="보조유형"/>
  1055. <Column id="fromdd" type="STRING" size="256" sumtext="시작일"/>
  1056. <Column id="todd" type="STRING" size="256" sumtext="종료일"/>
  1057. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  1058. <Column id="subkindfromdd" type="STRING" size="256" sumtext="부유형시작일"/>
  1059. </ColumnInfo>
  1060. <Rows>
  1061. <Row/>
  1062. </Rows>
  1063. </Dataset>
  1064. <Dataset id="ds_hidden_maketoa" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1065. <ColumnInfo>
  1066. <Column id="pid" type="STRING" size="256"/>
  1067. <Column id="indd" type="STRING" size="256"/>
  1068. <Column id="cretno" type="STRING" size="256"/>
  1069. <Column id="mskind" type="STRING" size="256"/>
  1070. <Column id="instcd" type="STRING" size="256"/>
  1071. </ColumnInfo>
  1072. </Dataset>
  1073. <Dataset id="ds_send_savememo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1074. <ColumnInfo>
  1075. <Column id="status" type="STRING" size="256" sumtext="처리구분"/>
  1076. <Column id="spclspec" type="STRING" size="256" sumtext="특정내역"/>
  1077. <Column id="spclmemoflag" type="STRING" size="256" sumtext="사용자메모여부"/>
  1078. <Column id="unitflag" type="STRING" size="256" sumtext="단위구분"/>
  1079. <Column id="seqno" type="INT" size="256" sumtext="순번"/>
  1080. <Column id="spclcd" type="STRING" size="256" sumtext="특정코드"/>
  1081. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  1082. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1083. <Column id="mskind" type="STRING" size="256" sumtext="주부유형"/>
  1084. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  1085. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  1086. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  1087. <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종심사자"/>
  1088. </ColumnInfo>
  1089. </Dataset>
  1090. <Dataset id="ds_hidden_sppmc02500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1091. <ColumnInfo>
  1092. <Column id="srchcond" type="STRING" size="256"/>
  1093. <Column id="pid" type="STRING" size="256"/>
  1094. </ColumnInfo>
  1095. <Rows>
  1096. <Row/>
  1097. </Rows>
  1098. </Dataset>
  1099. <Dataset id="ds_tmp_calc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1100. <ColumnInfo>
  1101. <Column id="pid" type="STRING" size="256"/>
  1102. <Column id="indschacptstat" type="STRING" size="256"/>
  1103. <Column id="indd" type="STRING" size="256"/>
  1104. </ColumnInfo>
  1105. <Rows>
  1106. <Row/>
  1107. </Rows>
  1108. </Dataset>
  1109. <Dataset id="ds_saend_data5" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1110. <ColumnInfo>
  1111. <Column id="pid" type="STRING" size="256"/>
  1112. <Column id="indd" type="STRING" size="256"/>
  1113. <Column id="trgt" type="STRING" size="256"/>
  1114. </ColumnInfo>
  1115. <Rows>
  1116. <Row/>
  1117. </Rows>
  1118. </Dataset>
  1119. <Dataset id="ds_send_insu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1120. <ColumnInfo>
  1121. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  1122. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  1123. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  1124. <Column id="mskind" type="STRING" size="256" sumtext="주/부유형"/>
  1125. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  1126. <Column id="suppkind" type="STRING" size="256" sumtext="유형보조"/>
  1127. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  1128. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  1129. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  1130. <Column id="flag" type="STRING" size="256" sumtext="flag"/>
  1131. <Column id="disccd" type="STRING" size="256" sumtext="할인코드"/>
  1132. <Column id="orgtodd" type="STRING" size="256" sumtext="실제종료일자"/>
  1133. <Column id="ownbmaxgradeflag" type="STRING" size="256" sumtext="본인부담상한구분"/>
  1134. </ColumnInfo>
  1135. <Rows>
  1136. <Row/>
  1137. </Rows>
  1138. </Dataset>
  1139. <Dataset id="ds_hidden_sppiz00400" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1140. <ColumnInfo>
  1141. <Column id="diagcd" type="STRING" size="256"/>
  1142. <Column id="diagnm" type="STRING" size="256"/>
  1143. <Column id="basedd" type="STRING" size="256"/>
  1144. <Column id="selectedrdodiagkind" type="STRING" size="256"/>
  1145. </ColumnInfo>
  1146. <Rows>
  1147. <Row/>
  1148. </Rows>
  1149. </Dataset>
  1150. <Dataset id="ds_temp_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  1151. <ColumnInfo>
  1152. <Column id="pid" type="STRING" size="256"/>
  1153. <Column id="indd" type="STRING" size="256"/>
  1154. <Column id="fromdd" type="STRING" size="256"/>
  1155. <Column id="mskind" type="STRING" size="256"/>
  1156. </ColumnInfo>
  1157. <Rows>
  1158. <Row/>
  1159. </Rows>
  1160. </Dataset>
  1161. <Dataset id="ds_hidden_listval_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  1162. </Objects>
  1163. <Bind>
  1164. <BindItem id="item0" compid="group2.cmb_judgendyn" propid="value" datasetid="ds_send" columnid="dschjudgprcsstat"/>
  1165. <BindItem id="item1" compid="group2.ipt_fromdate" propid="value" datasetid="ds_send" columnid="fromdate"/>
  1166. <BindItem id="item2" compid="group2.ipt_todate" propid="value" datasetid="ds_send" columnid="todate"/>
  1167. <BindItem id="item3" compid="group2.cmb_insukind" propid="value" datasetid="ds_send" columnid="insukind"/>
  1168. <BindItem id="item4" compid="group2.cmb_suppkind" propid="value" datasetid="ds_send" columnid="suppkind"/>
  1169. <BindItem id="item5" compid="group2.cmb_wardcd" propid="value" datasetid="ds_send" columnid="wardcd"/>
  1170. <BindItem id="item6" compid="group2.ipt_diagfrom" propid="value" datasetid="ds_send" columnid="diagfrom"/>
  1171. <BindItem id="item7" compid="group2.ipt_diagto" propid="value" datasetid="ds_send" columnid="diagto"/>
  1172. <BindItem id="item8" compid="group2.cmb_ordfildcd" propid="value" datasetid="ds_send" columnid="ordfildcd"/>
  1173. <BindItem id="item9" compid="group2.cmb_orddeptcd" propid="value" datasetid="ds_send" columnid="orddeptcd"/>
  1174. <BindItem id="item10" compid="group2.cmb_orddrid" propid="value" datasetid="ds_send" columnid="atdoctid"/>
  1175. <BindItem id="item11" compid="group2.cmb_judgmdlid" propid="value" datasetid="ds_send" columnid="judgmdlid"/>
  1176. <BindItem id="item12" compid="group2.cmb_drgyn" propid="value" datasetid="ds_send" columnid="drgyn"/>
  1177. <BindItem id="item13" compid="group2.ipt_totordamt" propid="value" datasetid="ds_send" columnid="totordamt"/>
  1178. <BindItem id="item14" compid="group2.ipt_ownbamt" propid="value" datasetid="ds_send" columnid="ownbamt"/>
  1179. <BindItem id="item15" compid="group2.ipt_indays" propid="value" datasetid="ds_send" columnid="indaycnt"/>
  1180. <BindItem id="item16" compid="group2.ipt_personalsearch" propid="value" datasetid="ds_send" columnid="patunitsrch1"/>
  1181. <BindItem id="item17" compid="group2.cmb_totordamt" propid="value" datasetid="ds_send" columnid="cmbtotordamt"/>
  1182. <BindItem id="item18" compid="group2.cmb_indays" propid="value" datasetid="ds_send" columnid="cmbownbamt"/>
  1183. <BindItem id="item19" compid="group2.cmb_ownbamt" propid="value" datasetid="ds_send" columnid="cmbindaycnt"/>
  1184. <BindItem id="item20" compid="group2.chk_Angio2" propid="value" datasetid="ds_send" columnid="angio2yn"/>
  1185. <BindItem id="item21" compid="group2.chk_Angio1" propid="value" datasetid="ds_send" columnid="angioyn"/>
  1186. <BindItem id="item22" compid="group2.chk_drg" propid="value" datasetid="ds_send" columnid="anticanceryn"/>
  1187. <BindItem id="item23" compid="group2.checkbox1" propid="value" datasetid="ds_send" columnid="anticancer2yn"/>
  1188. <BindItem id="item24" compid="group2.chk_anst" propid="value" datasetid="ds_send" columnid="operationyn"/>
  1189. <BindItem id="item25" compid="group2.chk_spcl" propid="value" datasetid="ds_send" columnid="spcljudg"/>
  1190. <BindItem id="item26" compid="group2.chk_v193" propid="value" datasetid="ds_send" columnid="v193"/>
  1191. <BindItem id="item27" compid="group2.chk_5divclam" propid="value" datasetid="ds_send" columnid="midclaimyn"/>
  1192. <BindItem id="item28" compid="group2.chk_v191" propid="value" datasetid="ds_send" columnid="v191"/>
  1193. <BindItem id="item29" compid="group2.chk_v192" propid="value" datasetid="ds_send" columnid="v192"/>
  1194. <BindItem id="item30" compid="group2.checkbox3" propid="value" datasetid="ds_send" columnid="showone"/>
  1195. <BindItem id="item31" compid="group2.chk_6petmri" propid="value" datasetid="ds_send" columnid="mriyn"/>
  1196. <BindItem id="item32" compid="group2.checkbox4" propid="value" datasetid="ds_send" columnid="chemodump"/>
  1197. <BindItem id="item33" compid="group2.checkbox2" propid="value" datasetid="ds_send" columnid="sixall"/>
  1198. <BindItem id="item34" compid="group2.chk_cp" propid="value" datasetid="ds_send" columnid="cpyn"/>
  1199. <BindItem id="item35" compid="group2.chk_sixyn" propid="value" datasetid="ds_send" columnid="sixyn"/>
  1200. <BindItem id="item36" compid="group2.rdo_period" propid="value" datasetid="ds_send" columnid="choiperiod"/>
  1201. <BindItem id="item37" compid="opt_totcnt" propid="value" datasetid="ds_hidden" columnid="totcnt"/>
  1202. <BindItem id="item38" compid="opt_realpatient" propid="value" datasetid="ds_hidden" columnid="realpatientcnt"/>
  1203. <BindItem id="item39" compid="opt_unjudgcnt" propid="value" datasetid="ds_hidden" columnid="unjudgcnt"/>
  1204. <BindItem id="item40" compid="rdo_dschmodesrch" propid="value" datasetid="ds_hidden" columnid="dschmodesrch"/>
  1205. <BindItem id="item41" compid="grp_edimemo.txt_judgrmk" propid="value" datasetid="ds_hidden" columnid="judgrmk"/>
  1206. <BindItem id="item42" compid="ipt_mdlcalcend" propid="value" datasetid="ds_send" columnid="mdlcalcenddd"/>
  1207. <BindItem id="item43" compid="group2.chk_judgstat" propid="value" datasetid="ds_send" columnid="judgstat"/>
  1208. <BindItem id="item44" compid="output2" propid="value" datasetid="ds_hidden" columnid="dschdclrtrgstdt"/>
  1209. <BindItem id="item45" compid="output1" propid="value" datasetid="ds_hidden" columnid="dschrgstacptdt"/>
  1210. <BindItem id="item46" compid="grp_tstmemo.txt_tstrmk" propid="value" datasetid="ds_hidden" columnid="testgrup"/>
  1211. <BindItem id="item47" compid="group2.checkbox00" propid="value" datasetid="ds_send" columnid="chktryn"/>
  1212. </Bind>
  1213. <InitValue/>
  1214. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  1215. * System Name :
  1216. * Job Name :
  1217. * Creator :
  1218. * Make Date : 2015-05-01
  1219. * Description :
  1220. *---------------------------------------------------------------------------------------
  1221. * Modify Date Modifier Modify Description
  1222. *---------------------------------------------------------------------------------------
  1223. * 2015-05-01 Live Converter TF->XP
  1224. *
  1225. *---------------------------------------------------------------------------------------
  1226. ****************************************************************************************/
  1227. include "com_commonxp::comm_main.xjs";
  1228. include "pam_pamcomnxp::PAM001.xjs";
  1229. include "pam_bfjudgxp::pam_grd.xjs";
  1230. include "pam_insucomxp::PAM.xjs";
  1231. include "emr_prcpmngtxp::MMOCommon.xjs";
  1232. var gv_dschdclrtyn = "";
  1233. var gv_dschnotiyn = "";
  1234. var gv_indschstat = "";
  1235. var gv_orddeptnm = "";
  1236. var gv_wardnm = "";
  1237. var gv_roomnm = "";
  1238. var gv_pid = "";
  1239. var gv_hngnm = "";
  1240. var gv_gender = "";
  1241. var gv_age = "";
  1242. var gv_indaycnt = "";
  1243. var gv_indd = "";
  1244. var gv_mskind = "";
  1245. var gv_insukind = "";
  1246. var gv_suppkind = "";
  1247. var gv_rareobstflag = "";
  1248. var gv_hflag = "";
  1249. var gv_rareobstyn = "";
  1250. var gv_cancer = "";
  1251. var gv_change = "";
  1252. var gv_diag = "";
  1253. var gv_atdoctid = "";
  1254. var gv_specordyn = "";
  1255. var gv_judgrmk = "";
  1256. var gv_dschjudgprcsstat = "";
  1257. var gv_lastjudgendid = "";
  1258. var gv_lastjudgdt = "";
  1259. var gv_operationyn = "";
  1260. var gv_opprcpyn = "";
  1261. var gv_opprcpjudgyn = "";
  1262. var gv_spcljudgflag = "";
  1263. var gv_cpyn = "";
  1264. var gv_probjudgflag = "";
  1265. var gv_totordamt = "";
  1266. var gv_erorddeptnm = "";
  1267. var gv_dschdclrdt = "";
  1268. var gv_rrgstno = "";
  1269. var gv_dispfromdd = "";
  1270. var gv_disptodd = "";
  1271. var gv_fromdd = "";
  1272. var gv_todd = "";
  1273. var gv_receiptyn = "";
  1274. var gv_judgid = "";
  1275. var gv_judgmdlid = "";
  1276. var gv_dethdt = "";
  1277. var gv_midcyn = "";
  1278. var gv_ownbmaxexamt = "";
  1279. var gv_calcscorcd = "";
  1280. var gv_ordhngnm = "";
  1281. var gv_calcpayflag = "";
  1282. var gv_calcqty = "";
  1283. var gv_calctims = "";
  1284. var gv_calcdays = "";
  1285. var gv_orddd = "";
  1286. var gv_execdd = "";
  1287. var gv_cretno = "";
  1288. var gv_instcd = "";
  1289. var gv_dschrgstacptdt = "";
  1290. var gv_dschdclrtrgstdt = "";
  1291. var gv_indschacptstat = "";
  1292. var gv_sixtimyn = "";
  1293. var gv_cretyn = "";
  1294. var gv_esrareyn = "";
  1295. var gv_testgrup = "";
  1296. var gv_drgyn = "";
  1297. var gv_dcuc = "";
  1298. var gv_dumpexistyn = "";
  1299. var gv_dschnotirgstdt = "";
  1300. var gv_calcscorrecalflag = "";
  1301. var gv_personflag = "";
  1302. var gv_seqno = "";
  1303. var gv_subkindfromdd = "";
  1304. var gv_curdd = utlf_getCurrentDate();
  1305. function fRefrhVar(obj:Dataset){
  1306. gv_curdd = utlf_getCurrentDate();
  1307. for (var i=0; i < obj.getColCount(); i++){
  1308. eval( "gv_"+obj.getColID(i) + " = obj.getColumn(obj.rowposition == -1 ? 0 : obj.rowposition, obj.getColID(i));" );
  1309. }
  1310. }
  1311. function SMPIJ00200_oninit(obj:Form, e:InitEventInfo)
  1312. {
  1313. frmf_initForm(obj);
  1314. }
  1315. function SMPIJ00200_onload(obj:Form, e:LoadEventInfo)
  1316. {
  1317. grdf_initGrid(grd_inptmast);
  1318. //grdf_setToolTipBind(grd_inptmast);
  1319. ds_send.setColumn(0,"patunitsrch1",arg_ds_temp.getColumn(0,"patunitsrch1"));
  1320. // 공통코드를 조회한다.
  1321. var arrParam = new Array();
  1322. arrParam = [{dsNm: "ds_P0008list", cdGrpId: "P0008", showValue: false}
  1323. , {dsNm: "ds_P0010list", cdGrpId: "P0010", showValue: false}
  1324. , {dsNm: "ds_P0149ist", cdGrpId: "P0149", showValue: false}
  1325. , {dsNm: "ds_init_cmb_ordfildcd", cdGrpId: "P0291", showValue: false}
  1326. , {dsNm: "ds_P0160list", cdGrpId: "P0160", showValue: false}
  1327. , {dsNm: "ds_init_cmb_judgendyn", cdGrpId: "P0109", showValue: false}
  1328. , {dsNm: "ds_P0363list", cdGrpId: "P0363", showValue: false}
  1329. , {dsNm: "ds_init_cmb_insukind", cdGrpId: "P0398", showValue: false}];
  1330. appf_getCodeList(arrParam, true, true, "cf_appf_getCodeList"); //비동기
  1331. var arrParam1 = new Array();
  1332. arrParam1 = [{dsNm: "ds_P0022list", cdGrpId: "P0022", showValue: false}
  1333. , {dsNm: "ds_init_cmb_drgyn", cdGrpId: "PK020", showValue: false}
  1334. ];
  1335. pamfGetCodeList(arrParam1, true, "cf_pamfGetCodeList"); //비동기
  1336. //진료과.
  1337. var oParam = {};
  1338. oParam.id = "TRPIJ00203";
  1339. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  1340. oParam.method = "reqGetDeptList";
  1341. oParam.inds = "req=ds_send";
  1342. oParam.outds = "ds_init_cmb_orddeptcd=deptlist";
  1343. oParam.async = true;
  1344. tranf_submit(oParam);
  1345. oParam = {};
  1346. oParam.id = "TRPIJ00202";
  1347. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  1348. oParam.method = "reqGetJudgList";
  1349. oParam.inds = "req=ds_send"
  1350. oParam.outds = "ds_init_cmb_judgmdlid=judglist ds_init_cmb_wardcd=wardlist ds_init_cmb_suppkind=suppkindlist";
  1351. oParam.async = true;
  1352. oParam.callback = "cf_TRPIJ00202";
  1353. tranf_submit(oParam);
  1354. oParam = {};
  1355. oParam.id = "TRPIJ00208";
  1356. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  1357. oParam.method = "reqGetTstSortList";
  1358. oParam.inds = "req=ds_send";
  1359. oParam.outds = "ds_init_chk_tstlist=tststndrdlist";
  1360. oParam.callback = "cf_TRPIJ00208";
  1361. oParam.async = true;
  1362. tranf_submit(oParam);
  1363. oParam = {};
  1364. oParam.id = "TRPIJ00204";
  1365. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  1366. oParam.method = "reqGetAtdoctList";
  1367. oParam.inds = "req=ds_send";
  1368. oParam.outds = "ds_init_cmb_orddrid=atdoctlist";
  1369. oParam.async = true;
  1370. //oParam.callback = "cf_TRPIJ00204";
  1371. tranf_submit(oParam);
  1372. }
  1373. // 화면 open시(와 초기화 버튼 클릭시) 화면 초기화 기능을 수행한다.
  1374. function fInitialize() {
  1375. grp_edimemo.visible = false;
  1376. grp_skindfromddchange.visible = false;
  1377. group2.group1.visible = true;
  1378. group2.group5.visible = false;
  1379. btn_recalc.enable = false; // 로딩시 기본적으로 재계산, 퇴원심사진행취소, 퇴원마감취소 버튼 비활성화 - 입력자 오류를 줄이기 위해
  1380. btn_dschjudgprcscncl.enable = false;
  1381. btn_dschclosecancel.enable = false;
  1382. frmf_addComboItem( "group2.cmb_insukind", "전체", "", "above" );
  1383. frmf_addComboItem( "group2.cmb_ordfildcd", "전체", "", "above" );
  1384. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  1385. // 해당년도로 청구년월을 표시한다.
  1386. //model.setValue("/root/hidden/today", new Date());
  1387. // 조회 조건을 초기화한다.
  1388. group2.group1.ipt_spclsearch.inputmode = "upper";
  1389. group2.ipt_diagfrom.inputmode = "upper";
  1390. group2.ipt_diagto.inputmode = "upper";
  1391. group2.group1.rdo_mchrgcode.value = "1";//선별심사대상에서 코드는 기본적으로 수가코드를 선택한다.
  1392. group2.combo1.value = "1";// 평가종류조회
  1393. group2.cmb_totordamt.value = "1"; //금액관련 사항은 default로 '원이상'으로한다.
  1394. group2.cmb_ownbamt.value = "1";
  1395. group2.cmb_indays.value = "1";
  1396. group2.cmb_judgendyn.value = "1"; //기본으로 재원심사 대상자로 선택
  1397. group2.ipt_todate.value = utlf_getCurrentDate();
  1398. group2.ipt_fromdate.value = utlf_getCurrentDate();
  1399. ipt_mdlcalcend.value = utlf_getCurrentDate();
  1400. group2.rdo_period.value = "3";// 전체기간, 기준일자기간 중 전체기간 라디오버튼 선택
  1401. var patunitsrch1 = utlf_transNullToEmpty(ds_send.getColumn(0,"patunitsrch1")).trim();
  1402. if (!utlf_isNull(patunitsrch1)) { // 대상자 화면을 취소하고 닫은 후 다시 열때 기존에 심사하던 환자 정보로 다시 조회하지 않도록
  1403. fSetPatUnitSrch1pidSrch();
  1404. }
  1405. var userid = sysf_getUserId(); //로그인한 심사자를 Default로 선택한다.
  1406. ds_hidden.setColumn(0,"userid", userid); // 2011.01.17 경북대 김순애샘요청 : 과별로 심사하기 우해서 막음
  1407. ds_send.setColumn(0,"judgmdlid", userid);
  1408. if (patunitsrch1 == "start") { // 초기 조회(대상자조회 프로그램을 처음 실행했을때 적용
  1409. ds_send.setColumn(0,"patunitsrch1", "");
  1410. group2.cmb_judgendyn.value = "3";
  1411. fGetInBfJudgTrgtManList();
  1412. }
  1413. }
  1414. function cf_appf_getCodeList(sSvcId, nErrorCode, sErrorMsg){
  1415. fInitialize();
  1416. }
  1417. function cf_pamfGetCodeList(){
  1418. ds_P0022list.filterstr = "cdid == '152'";
  1419. var sDschModeSrchYN = ds_P0022list.getColumn(0,"cdnm");
  1420. ds_P0022list.filterstr = "";
  1421. ds_hidden.setColumn(0,"dschmodesrch", sDschModeSrchYN);// 퇴원모드시 조회조건 원무공통코드 추가
  1422. frmf_addComboItem("group2.cmb_drgyn", " ", "", "above" );
  1423. }
  1424. function cf_TRPIJ00208(sSvcId, nErrorCode, sErrorMsg) {
  1425. if(nErrorCode < 0) return;
  1426. ds_send.setColumn(0,"tststndrdcd", ds_init_chk_tstlist.getColumn(0,"tststndrdcd"));
  1427. ds_send.setColumn(0,"tststndrdnm", ds_init_chk_tstlist.getColumn(0,"tststndrdnm"));
  1428. }
  1429. function cf_Uuee_SMPIJ00200(sSvcId, nErrorCode, sErrorMsg) {
  1430. if(nErrorCode < 0) return;
  1431. ds_hidden_listval_uuee.filterstr = "compsnm == 'grd_inptmast'";
  1432. var grd_name = ds_hidden_listval_uuee.getColumn(0,"compsnm");
  1433. var refdata = ds_hidden_listval_uuee.getColumn(0,"compscnts");
  1434. var sizedata = ds_hidden_listval_uuee.getColumn(0,"compssizecnts");
  1435. ds_hidden_listval_uuee.filterstr = "";
  1436. if (!utlf_isNull(grd_name)) {
  1437. grdf_SetOrderInfoOfCol_format(grd_inptmast, refdata, sizedata);
  1438. }
  1439. cnrlf_setOrderInfoOfCtrl(group2.chk_sixyn, ds_hidden_listval_uuee, "");
  1440. cnrlf_setOrderInfoOfCtrl(group2.chk_judgstat, ds_hidden_listval_uuee, "N");
  1441. cnrlf_setOrderInfoOfCtrl(group2.cmb_insukind, ds_hidden_listval_uuee, "");
  1442. cnrlf_setOrderInfoOfCtrl(group2.opt_insukind, ds_hidden_listval_uuee, "");
  1443. //cnrlf_setOrderInfoOfCtrl(group2.cmb_judgmdlid, ds_hidden_listval_uuee, "");
  1444. }
  1445. function fSetPatUnitSrch1pidSrch(){
  1446. var patunitsrch1 = opener.ds_init_iteminfo.getColumn(0,"pid");
  1447. if (!utlf_isNull(patunitsrch1)) {
  1448. ds_send.setColumn(0,"patunitsrch1",patunitsrch1);
  1449. ds_send.setColumn(0,"patunitsrch2","pidSrch");
  1450. ds_send.setColumn(0,"dschjudgprcsstat","9");
  1451. ds_grd_inptmast.clearData();
  1452. ds_send.setColumn(0,"basedd",gv_curdd);
  1453. var oParam = {};
  1454. oParam.id = "TRPIJ00201";
  1455. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  1456. oParam.method = "reqGetInbfJudgTrgtManList";
  1457. oParam.inds = "req=ds_send";
  1458. oParam.outds = "ds_grd_inptmast=gridinpt";
  1459. oParam.async = true;
  1460. oParam.callback = "cf_TRPIJ00201";
  1461. tranf_submit(oParam);
  1462. //grd_inptmast.resizeCells();
  1463. group2.ipt_personalsearch.setFocus();
  1464. opener.ds_hidden_item1.setColumn(0,"oldpid", patunitsrch1);// 현재 조회된 환자의 등록번호를 저장
  1465. }
  1466. }
  1467. function cf_TRPIJ00201(sSvcId, nErrorCode, sErrorMsg) {
  1468. if(nErrorCode < 0) return;
  1469. dsf_setDefaultVal(ds_grd_inptmast, "emg:N,judgstat:N");
  1470. // 20080728 선별심사 조회 문제가 해결될때까지 막아놈 - 박창원
  1471. // 2008. 01. 18 박지욱 추가 (선별심사 체크리스트 적용한 조회인 경우 그리드의 컬럼 순서를 변경한다.)
  1472. var choicdsrch2 = group2.group1.ipt_spclsearch.value;
  1473. if (choicdsrch2 == "Y") {
  1474. // 선별심사 체크리스트 적용된 조회일 경우 그리드 순서를 변경한다.
  1475. var refdata = "^dschdclrtyn^dschnotiyn^orddeptnm^wardnm^roomnm^pid^hngnm^gender^age^indaycnt^indd^mskind^insukind^esrareyn^cancer^change^fromdd^todd^diag^atdoctid^specordyn^judgrmk^dschjudgprcsstat^lastjudgendid^lastjudgdt^operationyn^spcljudgflag^dschdclrdt^receiptyn^judgid^judgmdlid^calcscorcd^ordhngnm^calcpayflag^calcqty^calctims^calcdays^orddd^execdd^totordamt^cretno^probjudgflag^instcd^dethdt^midcyn^ownbmaxexamt";
  1476. var sizedata = "^22^22^43^35^37^55^54^22^32^30^67^22^35^25^33^22^67^67^45^60^22^42^32^47^67^31^31^75^67^80^80^100^140^34^34^45^35^67^68^90^0^0^0^116^77^81";
  1477. grdf_SetOrderInfoOfCol_format(grd_inptmast, refdata, sizedata);
  1478. } else {
  1479. ds_hidden_listval_uuee.filterstr = "compsnm == 'grd_inptmast'";
  1480. var refdata = ds_hidden_listval_uuee.getColumn(0,"compscnts");
  1481. var sizedata = ds_hidden_listval_uuee.getColumn(0,"compssizecnts");
  1482. ds_hidden_listval_uuee.filterstr = "";
  1483. grdf_SetOrderInfoOfCol_format(grd_inptmast, refdata, sizedata);// 사용자 환경저장된 그리드 순서를 보여준다.
  1484. }
  1485. ds_hidden_listval_uuee.filterstr = "compsnm == 'grd_inptmast_sort'";
  1486. var grd_col_id = ds_hidden_listval_uuee.getColumn(0,"compscnts");
  1487. var grd_col_sort = ds_hidden_listval_uuee.getColumn(0,"compsrefcnts");
  1488. ds_hidden_listval_uuee.filterstr = "";
  1489. if (!utlf_isNull(grd_col_id)) {
  1490. ds_grd_inptmast.keystring = "S:"+ ( grd_col_sort == "desc" ? "-" : "+" ) + grd_col_id
  1491. //realSort(grd_col_sort, grd_col_id, ds_grd_inptmast);
  1492. }
  1493. if(!utlf_isNull(ds_temp_patinfo.getColumn(0, "pid")))
  1494. {
  1495. var pid = ds_temp_patinfo.getColumn(0, "pid");
  1496. var indd = ds_temp_patinfo.getColumn(0, "indd");
  1497. var fromdd = ds_temp_patinfo.getColumn(0, "fromdd");
  1498. var mskind = ds_temp_patinfo.getColumn(0, "mskind");
  1499. var row = ds_grd_inptmast.findRowExpr("pid == '"+pid+"' && indd == '"+indd+"' && fromdd == '"+fromdd+"' && mskind == '"+mskind+"'");
  1500. ds_grd_inptmast.rowposition = row;
  1501. ds_grd_inptmast.clearSelect();
  1502. ds_grd_inptmast.selectRow(row);
  1503. grd_inptmast.vscrollbar.pos = row;
  1504. grd_inptmast_oncellclick(grd_inptmast);
  1505. }
  1506. fCountPat();
  1507. }
  1508. function fGetInBfJudgTrgtManList()
  1509. {
  1510. // 총진료비, 본인부담금 입력값이 숫자인지를 확인한다.
  1511. var totordamt = group2.ipt_totordamt.value;
  1512. var ownbamt = group2.ipt_ownbamt.value;
  1513. var indaycnt = group2.ipt_indays.value;
  1514. var dschjudgprcsstat = group2.cmb_judgendyn.value;
  1515. var patunitsrch1 = utlf_transNullToEmpty(group2.ipt_personalsearch.value).trim();
  1516. var diagto = group2.ipt_diagto.value; // 종료상병 처리를 위해서
  1517. ds_send.setColumn(0,"patunitsrch1", patunitsrch1);
  1518. // 상병조회 관련 체크 루틴 추가 - 20080522 박창원
  1519. if (utlf_isNull(diagto)) {
  1520. group2.ipt_diagto.value = group2.ipt_diagfrom.value;
  1521. }
  1522. if (dschjudgprcsstat == "9") {
  1523. if (utlf_isNull(group2.ipt_personalsearch.value)) { // 값이 없으면
  1524. sysf_messageBox("환자단위를", "C001"); ////환자단위를 입력하십시오.
  1525. return;
  1526. } else if (group2.ipt_personalsearch.value.length < 2 ) { // 2글자 이상이면
  1527. sysf_messageBox("환자단위는 2글자 이상", "C001"); ////환자단위는 2글자 이상 입력하십시오.
  1528. return;
  1529. }
  1530. }
  1531. if (!utlf_isNull(totordamt)) {
  1532. if ( !utlf_isNum(totordamt)) { //숫자가 아니면
  1533. group2.ipt_totordamt.value = "";
  1534. sysf_messageBox("총진료비는 숫자만", "C001"); ////총진료비는 숫자만 입력하십시오.
  1535. return;
  1536. }
  1537. }
  1538. if (!utlf_isNull(ownbamt)) {
  1539. if ( !utlf_isNum(ownbamt) ) { //숫자가 아니면
  1540. group2.ipt_ownbamt.value = "";
  1541. sysf_messageBox("본인부담금은 숫자만", "C001"); ////본인부담금은 숫자만 입력하십시오.
  1542. return;
  1543. }
  1544. }
  1545. if (!utlf_isNull(indaycnt)) {
  1546. if ( !utlf_isNum(indaycnt) ) { //숫자가 아니면
  1547. group2.ipt_indays.value = "";
  1548. sysf_messageBox("재원일수는 숫자만", "C001"); ////본인부담금은 숫자만 입력하십시오.
  1549. return;
  1550. }
  1551. }
  1552. //환자단위조회를 설정한다.
  1553. if (utlf_isNull(patunitsrch1)) {
  1554. ds_send.setColumn(0,"patunitsrch2", "");
  1555. }
  1556. else if (utlf_isNum(patunitsrch1)) { //숫자가 입력된 경우 환자번호로 조회한다.
  1557. ds_send.setColumn(0,"patunitsrch2", "pidSrch");
  1558. ds_send.setColumn(0,"dschjudgprcsstat", "9");
  1559. }
  1560. // 수정추가 : 20090813 JHP 성가에서 환자번호에 문자가들어있는경우 있음(ex : A108) 하여 각 문자 판단하여 앞두자리 판단하여 조회 여부 결정 -- 시작
  1561. else if (fChkPidWordNumber(patunitsrch1) == true) {
  1562. ds_send.setColumn(0,"patunitsrch2", "pidSrch");
  1563. ds_send.setColumn(0,"dschjudgprcsstat", "9");
  1564. }
  1565. // 수정추가 : 20090813 JHP 성가에서 환자번호에 문자가들어있는경우 있음(ex : A108) 하여 각 문자 판단하여 앞두자리 판단하여 조회 여부 결정 -- 끝
  1566. else { //문자가 입력된 경우 환자이름으로 조회한다.
  1567. if (group2.ipt_personalsearch.text.length > 1) {
  1568. ds_send.setColumn(0,"patunitsrch2", "nmSrch");
  1569. ds_send.setColumn(0,"dschjudgprcsstat", "9");
  1570. }
  1571. else {
  1572. ds_send.setColumn(0,"patunitsrch2", "");
  1573. sysf_messageBox("환자단위조회시 검색할 환자이름은 2글자 이상", "C001"); ///환자단위조회시 검색할 환자이름은 2글자 이상 입력하십시오.
  1574. return;
  1575. }
  1576. }
  1577. // 선별심사대상을 설정한다.
  1578. var choicdsrch2 = utlf_transNullToEmpty(group2.group1.ipt_spclsearch.value).trim();
  1579. ds_send.setColumn(0,"choicdsrch2", choicdsrch2);
  1580. if (!utlf_isNull(choicdsrch2)) {
  1581. ds_send.setColumn(0,"choicdsrch1", group2.group1.rdo_mchrgcode.value);
  1582. if ( utlf_isNull(group2.group1.rdo_mchrgcode.value)) {
  1583. sysf_messageBox("선별심사 조건을 수가, EDI, 명칭 중에", "C002"); ///선별심사 조건을 수가 와 EDI 중에 선택하십시오.
  1584. return;
  1585. }
  1586. }
  1587. ds_grd_inptmast.clearData();
  1588. ds_send.setColumn(0,"basedd", gv_curdd);
  1589. var oParam = {};
  1590. oParam.id = "TRPIJ00201";
  1591. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  1592. oParam.method = "reqGetInbfJudgTrgtManList";
  1593. oParam.inds = "req=ds_send";
  1594. oParam.outds = "ds_grd_inptmast=gridinpt";
  1595. oParam.async = true;
  1596. oParam.callback = "cf_TRPIJ00201";
  1597. tranf_submit(oParam);
  1598. }
  1599. function fCountPat(){
  1600. var totcnt = ds_grd_inptmast.rowcount;
  1601. var realpatientcnt = 0;
  1602. var unjudgcnt = 0;
  1603. var pid = "";
  1604. var dschjudgprcsstat = "";
  1605. var chkpid = "";
  1606. var chkdschjudgprcsstat = "";
  1607. for (var i=0; i < totcnt ; i++) {
  1608. chkpid = ds_grd_inptmast.getColumn(i,"pid");
  1609. if(pid != chkpid){
  1610. realpatientcnt = realpatientcnt + 1;
  1611. chkdschjudgprcsstat = ds_grd_inptmast.getColumn(i,"dschjudgprcsstat");
  1612. if(chkdschjudgprcsstat == "A"){
  1613. unjudgcnt = unjudgcnt + 1;
  1614. }
  1615. }
  1616. pid = chkpid;
  1617. dschjudgprcsstat = chkdschjudgprcsstat;
  1618. var spcljudgflag = ds_grd_inptmast.getColumn(i,"spcljudgflag");
  1619. var probjudgflag = ds_grd_inptmast.getColumn(i,"probjudgflag");
  1620. var indschacptstat = ds_grd_inptmast.getColumn(i,"indschacptstat");
  1621. var todd = ds_grd_inptmast.getColumn(i,"todd");
  1622. var dschdclrtyn = ds_grd_inptmast.getColumn(i,"dschdclrtyn");
  1623. var dschnotiyn = ds_grd_inptmast.getColumn(i,"dschnotiyn");
  1624. var insukind = ds_grd_inptmast.getColumn(i,"insukind");
  1625. var lastjudgdt = ds_grd_inptmast.getColumn(i,"lastjudgdt");
  1626. var tdschjudgprcsstat = ds_grd_inptmast.getColumn(i,"dschjudgprcsstat");
  1627. // if(spcljudgflag == "A" ){
  1628. // grd_inptmast.rowStyle(i,"data","background-color") = "#ffe79d";
  1629. // }
  1630. //
  1631. // if(probjudgflag == "G" ){
  1632. // grd_inptmast.rowStyle(i,"data","background-color") = "#7BE6B7";
  1633. // }else if(probjudgflag == "R"){
  1634. // grd_inptmast.rowStyle(i,"data","background-color") = "#fcd2c1";
  1635. // }else if(spcljudgflag != "A") {
  1636. // var chk_digit = i % 2; //2로 나눠서 나머지가 0 이면 짝수줄 이란 소리
  1637. // if(chk_digit != 0){
  1638. // grd_inptmast.rowStyle(i, "data", "background-color") = "#ffffff"; //짝수는 연한 회식
  1639. // }else{
  1640. // grd_inptmast.rowStyle(i, "data", "background-color") = "#f4f4f4"; //홀수는 그냥 힌색
  1641. // }
  1642. // }
  1643. //
  1644. // if(tdschjudgprcsstat == "G" && dschdclrtyn == "Y" && insukind != "71" ){
  1645. // grd_inptmast.cellStyle("background-color", i,grd_inptmast.colRef("lastjudgdt")) = "#ffffcc";
  1646. // }
  1647. }
  1648. ds_hidden.setColumn(0,"totcnt",totcnt);
  1649. ds_hidden.setColumn(0,"realpatientcnt",realpatientcnt);
  1650. ds_hidden.setColumn(0,"unjudgcnt",unjudgcnt);
  1651. if ( totcnt == "0") { // 조회된 대상자가 없는 경우
  1652. sysf_messageBox("검색된 심사대상자가", "I004"); ///검색된 심사대상자가 없습니다.
  1653. return;
  1654. }
  1655. }
  1656. function grd_inptmast_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  1657. {
  1658. fRefrhVar(ds_grd_inptmast);
  1659. if(gv_dschdclrtyn == "N" && gv_dschnotiyn == "Y") {
  1660. sysf_messageBox("퇴원예고, 확정 상태값이 비정상입니다. 확인후 ","C003");
  1661. return;
  1662. }
  1663. if (!opener.fCheckChngStatus()) {
  1664. var ans = sysf_messageBox("수정사항이 있습니다. 계속 진행", "S003", "중지"); ///수정사항이 있습니다. 저장하시려면 예(Yes)\n변경하시려면 아니오(No)
  1665. if (ans == 6) { // 6: yes
  1666. } else {
  1667. return;
  1668. }
  1669. }
  1670. if (!(gv_dschjudgprcsstat == "C" || gv_dschjudgprcsstat == "E" || gv_indschacptstat == "D" || gv_indschacptstat == "T" ) && utlf_isNull(gv_receiptyn)) {
  1671. fCalculation();
  1672. }
  1673. // 상위 화면으로 입원재원심사대상자 전달
  1674. fSetInsulist("cf_TRPIJ00207");
  1675. ds_temp_patinfo.setColumn(0, "pid", ds_grd_inptmast.getColumn(e.row, "pid"));
  1676. ds_temp_patinfo.setColumn(0, "indd", ds_grd_inptmast.getColumn(e.row, "indd"));
  1677. ds_temp_patinfo.setColumn(0, "fromdd", ds_grd_inptmast.getColumn(e.row, "fromdd"));
  1678. ds_temp_patinfo.setColumn(0, "mskind", ds_grd_inptmast.getColumn(e.row, "mskind"));
  1679. ds_hidden.setColumn(0,"selectedRow", obj.currentrow);// 선택된 row 값 기억 심사화면에서 저장,심사완료, 마감취소 등 이벤트 발생시 조회화면에도 반영시켜주기 위함)
  1680. }
  1681. function fSetInsulist(callback) {
  1682. fRefrhVar(ds_grd_inptmast);
  1683. ds_send_data1.setColumn(0,"pid", gv_pid); // 실시간 상태를 체크하여 이미 마감이나 퇴원이 된 환자는 심사중으로 변경이 안되게 한다.
  1684. ds_send_data1.setColumn(0,"indd", gv_indd); // 블로킹을 위하여 실시간체크 - 심사상태, 입퇴원접수상태, 간호퇴원확정취소여부 판단
  1685. ds_send_data1.setColumn(0,"cretno", gv_cretno);
  1686. ds_send_data1.setColumn(0,"mskind", gv_mskind);
  1687. ds_send_data1.setColumn(0,"fromdd", gv_fromdd);
  1688. ds_send_data1.setColumn(0,"ordfromdd", gv_fromdd);
  1689. dsf_setDefaultVal(ds_send_data1, "checkyn:N");
  1690. var oParam = {};
  1691. oParam.id = "TRPIJ00207";
  1692. oParam.service = "bfjudgapp.InHospJudg";
  1693. oParam.method = "reqNotiDschStat2";
  1694. oParam.inds = "req=ds_send_data1";
  1695. oParam.outds = "ds_endcnclstat=endcnclstat ds_recal=recal ds_drginfo=drginfo";
  1696. oParam.async = (utlf_isNull(callback) ? false : true);
  1697. oParam.callback = callback;
  1698. tranf_submit(oParam);
  1699. }
  1700. function cf_TRPIJ00207(sSvcId, nErrorCode, sErrorMsg) {
  1701. if(nErrorCode < 0) return;
  1702. fRefrhVar(ds_grd_inptmast);
  1703. var indschacptstat = ds_endcnclstat.getColumn(0,"indschacptstat");
  1704. var dschjudgprcsstat = ds_endcnclstat.getColumn(0,"dschjudgprcsstat");
  1705. var dschnotiyn = ds_endcnclstat.getColumn(0,"dschnotiyn");
  1706. var readonly = chk_readonly.value;
  1707. var userid = ds_hidden.getColumn(0,"userid");
  1708. var dschmodesrch = ds_hidden.getColumn(0,"dschmodesrch");
  1709. if (!utlf_isNull(gv_pid)) {
  1710. opener.ds_init_iteminfo.setColumn(0,"pid", gv_pid);
  1711. opener.ds_init_iteminfo.setColumn(0,"indd", gv_indd);
  1712. opener.ds_send.setColumn(0,"pid", gv_pid);
  1713. opener.ds_send.setColumn(0,"indd", gv_indd);
  1714. opener.ds_send.setColumn(0,"indd1", gv_indd);
  1715. opener.ds_send.setColumn(0,"mskind", gv_mskind);
  1716. opener.ds_send.setColumn(0,"cretno", gv_cretno);
  1717. opener.ds_send.setColumn(0,"seqno", gv_seqno);
  1718. opener.ds_send.setColumn(0,"fromdd", gv_fromdd);
  1719. opener.ds_send.setColumn(0,"ordfromdd", gv_fromdd);
  1720. opener.ds_send.setColumn(0,"ordtodd", gv_todd);
  1721. opener.ds_send.setColumn(0,"personflag", gv_personflag);
  1722. opener.ds_send.setColumn(0,"todd", gv_todd);
  1723. opener.ds_send.setColumn(0,"insukind", gv_insukind);
  1724. opener.ds_send.setColumn(0,"suppkind", gv_suppkind);
  1725. opener.ds_send.setColumn(0,"userid", userid);
  1726. opener.ds_send.setColumn(0,"dschmodesrch", dschmodesrch);
  1727. // 읽기전용 선택시 - 20081010 박창원
  1728. if (readonly == "Y"){
  1729. opener.ds_send.setColumn(0,"readonly", "Y");
  1730. } else {
  1731. opener.ds_send.setColumn(0,"readonly", "N");
  1732. }
  1733. ds_send_data1.setColumn(0,"dschjudgprcsstat","B")
  1734. if ( frmf_checkOpener() ) {
  1735. // 조건추가 응급실은 심사상태 변경에서 제외한다.
  1736. // 블로킹을 위하여 실시간 재원상태도 조건에 반영
  1737. if (gv_dschnotiyn == "Y" && gv_dschjudgprcsstat == "A" && gv_indschacptstat == "A" && utlf_isNull(gv_receiptyn) && gv_orddeptnm != "ED" && chk_readonly.value != "Y") {
  1738. ds_send_data1.setColumn(0,"dschnoticnclyn","N");
  1739. var oParam = {};
  1740. oParam.id = "TXPIJ00202";
  1741. oParam.service = "bfjudgapp.InHospJudg";
  1742. oParam.method = "reqSetDschJudgPrcsStat";
  1743. oParam.inds = "req=ds_send_data1";
  1744. oParam.outds = "";
  1745. oParam.async = false;
  1746. //oParam.callback = "cf_TXPIJ00202";
  1747. tranf_submit(oParam);
  1748. ds_grd_inptmast.setColumn(ds_grd_inptmast.rowposition, "dschjudgprcsstat", "B");
  1749. }
  1750. if(gv_dschdclrtyn == "Y" && gv_dschnotiyn == "Y"){
  1751. opener.fGetItemInfo("Srch");
  1752. }else{
  1753. opener.fGetItemInfo();
  1754. }
  1755. setPopupRefresh();
  1756. frmf_setFocusOpener(); // (common.js)에서 제공하는 함수로 opener를 activate한다.
  1757. } else {
  1758. sysf_messageBox("상위화면이 변경되어 데이터를 전달할 수", "I004"); ///상위화면이 변경되어 데이터를 전달할 수 없습니다.
  1759. }
  1760. }
  1761. else {
  1762. sysf_messageBox("조회된 대상자가", "I004"); ///조회된 대상자가 없습니다.
  1763. }
  1764. }
  1765. function cf_TRPIJ00207_JudgCncl(sSvcId, nErrorCode, sErrorMsg) {
  1766. if(nErrorCode < 0) return;
  1767. var openerpid = opener.ds_init_iteminfo.getColumn(0,"pid");
  1768. var userid = ds_hidden.getColumn(0,"userid");
  1769. var dschnoticnclyn = chk_dschnoticnclyn.value;
  1770. var indschacptstat = ds_endcnclstat.getColumn(0,"indschacptstat");
  1771. var judgprcsstat = ds_endcnclstat.getColumn(0,"dschjudgprcsstat");
  1772. if (indschacptstat == "D" ) { // 가퇴원 블로킹 추가
  1773. sysf_messageBox("이미 퇴원처리가 된 환자입니다. 심사취소 ", "E001");
  1774. fGetInBfJudgTrgtManList();
  1775. return;
  1776. } else if (dschnoticnclyn == "Y" && indschacptstat == "T") { // 가퇴원 블로킹 추가
  1777. sysf_messageBox("가퇴원 환자입니다. 간호확정 체크박스 해제 확인후 ", "C003");
  1778. fGetInBfJudgTrgtManList();
  1779. return;
  1780. } else if (judgprcsstat == "C" || judgprcsstat == "E") {
  1781. sysf_messageBox("이미 마감처리가 된 환자입니다. 심사취소 ", "E001");
  1782. fGetInBfJudgTrgtManList();
  1783. return;
  1784. }
  1785. if (gv_pid == openerpid) { // 화면에 열려있을때 싱크가 안 맞을 수도 있으므로 추가
  1786. sysf_messageBox("심사메인화면에서 심사 진행중인 환자이므로 마감취소를","E001");
  1787. return;
  1788. }
  1789. if (judgprcsstat == "B" && gv_lastjudgendid != userid) { // 다른심사자가 심사중일때 알럿을 띄워 준다. 오류 감소차원
  1790. var msg = sysf_messageBox ("다른심사자가 퇴원심사 진행중입니다. 계속" ,"S001");
  1791. if(msg != 6){
  1792. return;
  1793. }
  1794. }
  1795. if ( gv_dschnotiyn == "Y" && ( gv_dschjudgprcsstat == "A" || gv_dschjudgprcsstat == "B") ) { // 간호 퇴원확정여부 취소가 체크되었는지 판단 하여 값을 세팅
  1796. if (gv_dschnotiyn == "Y") {
  1797. if(dschnoticnclyn == "Y") {
  1798. ds_send_data1.setColumn(0, "dschnoticnclyn", "Y");
  1799. }
  1800. }
  1801. var oParam = {};
  1802. oParam.id = "TXPIJ00202";
  1803. oParam.service = "bfjudgapp.InHospJudg";
  1804. oParam.method = "reqSetDschJudgPrcsStat";
  1805. oParam.inds = "req=ds_send_data1";
  1806. oParam.outds = "";
  1807. oParam.async = false;
  1808. //oParam.callback = "cf_TXPIJ00202";
  1809. tranf_submit(oParam);
  1810. fGetInBfJudgTrgtManList();
  1811. ds_hidden.setColumn(0,"selectedRow", ""); // 선택된 row 값 기억 심사화면에서 저장,심사완료, 마감취소 등 이벤트 발생시 조회화면에도 반영시켜주기 위함)
  1812. } else if(gv_dschdclrtyn == "Y" && gv_dschnotiyn == "N" && gv_dschjudgprcsstat == "B"){
  1813. var oParam = {};
  1814. oParam.id = "TXPIJ00202";
  1815. oParam.service = "bfjudgapp.InHospJudg";
  1816. oParam.method = "reqSetDschJudgPrcsStat";
  1817. oParam.inds = "req=ds_send_data1";
  1818. oParam.outds = "";
  1819. oParam.async = false;
  1820. //oParam.callback = "cf_TXPIJ00202";
  1821. tranf_submit(oParam); // 혹시나 모르는 예고상태 Y 확정상태 N 일때 심사상태를 미심으로만 바꾼다.
  1822. fGetInBfJudgTrgtManList();
  1823. ds_hidden.setColumn(0,"selectedRow", "");
  1824. }
  1825. }
  1826. function setPopupRefresh() {
  1827. var sChildSMMRI00400 = frmf_findPopup("SMMRI00400");
  1828. if (!utlf_isNull(sChildSMMRI00400))
  1829. {
  1830. var wndobj = frmf_findPopup("SMMRI00400");
  1831. if(!utlf_isNull(wndobj))
  1832. {
  1833. frmf_setParameter("SMMRI00400_param_pid", gv_pid);
  1834. wndobj.fInitalize();//초기화함수 호출
  1835. }
  1836. }
  1837. var sChildSMPPI00700 = frmf_findPopup("SMPPI00700");
  1838. if (!utlf_isNull(sChildSMPPI00700))
  1839. {
  1840. var wndobj = frmf_findPopup("SMPPI00700");
  1841. if(!utlf_isNull(wndobj))
  1842. {
  1843. fGetDurginfo(wndobj);
  1844. }
  1845. }
  1846. var sChildSMMMI00100 = frmf_findPopup("SMMMI00100");
  1847. if(!utlf_isNull(sChildSMMMI00100))
  1848. {
  1849. sChildSMMMI00100.ds_singdata.setColumn(0, "srchpid", gv_pid);
  1850. sChildSMMMI00100.group3.grp_sea.btn_srch.click();
  1851. }
  1852. var sChildSMMMO00200 = frmf_findPopup("SMMMO00200");
  1853. if (!utlf_isNull(sChildSMMMO00200))
  1854. {
  1855. var wndobj = frmf_findPopup("SMMMO00200");
  1856. if(!utlf_isNull(wndobj))
  1857. {
  1858. //if (gv_indschacptstat != 'A') {
  1859. wndobj.close();//초기화함수 호출
  1860. //} else {
  1861. // wndobj.SMMMO00200_onload();//초기화함수 호출
  1862. //}
  1863. }
  1864. }
  1865. var sChildSMPIJ02900 = frmf_findPopup("SMPIJ02900");
  1866. if(!utlf_isNull(sChildSMPIJ02900)){
  1867. sChildSMPIJ02900.SMPIJ02900_onload();
  1868. }
  1869. }
  1870. function fCalculation(){
  1871. fRefrhVar(ds_grd_inptmast);
  1872. ds_send_data1.setColumn(0,"pid", gv_pid); // 가퇴원 환자의 최종날짜 계산을 위하여
  1873. ds_send_data1.setColumn(0,"indd", gv_indd);
  1874. ds_send_data1.setColumn(0,"cretno", gv_cretno);
  1875. ds_send_data1.setColumn(0,"mskind", gv_mskind);
  1876. ds_send_data1.setColumn(0,"fromdd", gv_fromdd);
  1877. ds_send_data1.setColumn(0,"ordfromdd", gv_fromdd);
  1878. dsf_setDefaultVal(ds_send_data1, "checkyn:N");
  1879. var oParam = {};
  1880. oParam.id = "TRPIJ00207";
  1881. oParam.service = "bfjudgapp.InHospJudg";
  1882. oParam.method = "reqNotiDschStat";
  1883. oParam.inds = "req=ds_send_data1";
  1884. oParam.outds = "ds_endcnclstat=endcnclstat ds_recal=recal ds_drginfo=drginfo";
  1885. oParam.async = true;
  1886. oParam.callback = "cf_TRPIJ00207_1";
  1887. // 퇴원마감 취소시에는 실시간 퇴원여부를 체크하여 블로킹한다.
  1888. tranf_submit(oParam); // 블로킹되면 대상자 조회를 다시 로드한다 - 20080927 박창원
  1889. }
  1890. function cf_TRPIJ00207_1(sSvcId, nErrorCode, sErrorMsg) {
  1891. var indschacptstat = ds_endcnclstat.getColumn(0,"indschacptstat");
  1892. // 소급할 내역이 있는지 판단하여 소급일자도 계산을 돌려준다. 20080901 박창원
  1893. ds_send_data4.clearData();
  1894. ds_send_data4.addRow();
  1895. ds_send_data4.setColumn(0,"pid", gv_pid);
  1896. ds_send_data4.setColumn(0,"indd", gv_indd);
  1897. ds_send_data4.setColumn(0,"mskind", gv_mskind);
  1898. ds_send_data4.setColumn(0,"calcbasedd", gv_curdd);
  1899. ds_send_data4.setColumn(0,"cretno", gv_cretno);
  1900. ds_send_data4.setColumn(0,"fromdd", gv_fromdd);
  1901. ds_send_data4.setColumn(0,"todd", gv_todd);
  1902. var recalcnt = ds_recal.rowcount
  1903. var curddcalcyn = "N";
  1904. if (recalcnt > 0) {
  1905. // for (var i = 0; i <= recalcnt; i++) {
  1906. // var curdd = ds_recal.getColumn(i, "recalcdd");
  1907. // ds_send_data4.setColumn(0,"calcbasedd", curdd);
  1908. //
  1909. // if (curdd == utlf_getCurrentDate()) {
  1910. // curddcalcyn = "Y"
  1911. // } else {
  1912. // curddcalcyn = "N";
  1913. // }
  1914. // if (curddcalcyn == "N") {
  1915. // fSubmit_TXPIJ00205();
  1916. //
  1917. // } else if (curddcalcyn == "Y") {
  1918. // fSubmit_TXPIJ00205();
  1919. // }
  1920. // }
  1921. ds_send_data4.setColumn(0,"calcbasedd", gv_curdd);
  1922. }
  1923. if (indschacptstat == "T") { // 가퇴원환자 최종일 계산
  1924. ds_send_data4.setColumn(0,"calcbasedd", gv_todd);
  1925. fSubmit_TXPIJ00205();
  1926. } else if (curddcalcyn != "Y") {
  1927. ds_send_data4.setColumn(0,"calcbasedd", gv_curdd);
  1928. fSubmit_TXPIJ00205();
  1929. }
  1930. }
  1931. function fSubmit_TXPIJ00205() {
  1932. var oParam = {};
  1933. oParam.id = "TXPIJ00205";
  1934. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  1935. oParam.method = "reqInCalculation";
  1936. oParam.inds = "req=ds_send_data4";
  1937. oParam.outds = "";
  1938. oParam.async = true;
  1939. oParam.callback = "cf_TXPIJ00205";
  1940. tranf_submit(oParam);
  1941. }
  1942. function cf_TXPIJ00205(sSvcId, nErrorCode, sErrorMsg) {
  1943. if(nErrorCode < 0) {
  1944. sysf_messageBox( sErrorMsg+"-"+nErrorCode+"수가계산이 정상적으로 처리되지 못했습니다. 확인하세요!!!", "I999");
  1945. return;
  1946. }
  1947. }
  1948. function fSaveJudgrmk(){
  1949. //특정내역 처리
  1950. var judgrmk = ds_hidden.getColumn(0,"judgrmk");
  1951. ds_send_savememo.clearData();
  1952. if(!utlf_isNull(judgrmk)){
  1953. fSetJudgEDIMemo(judgrmk, "Y");
  1954. } else {
  1955. fSetJudgEDIMemo("", "Y");
  1956. }
  1957. var oParam = {};
  1958. oParam.id = "TXPIJ00201";
  1959. oParam.service = "bfjudgapp.InHospJudg";
  1960. oParam.method = "reqExeSaveJudgrmk";
  1961. oParam.inds = "req=ds_send_savememo";
  1962. oParam.outds = "";
  1963. oParam.async = true;
  1964. oParam.callback = "cf_TXPIJ00201";
  1965. tranf_submit(oParam);
  1966. }
  1967. function cf_TXPIJ00201(sSvcId, nErrorCode, sErrorMsg) {
  1968. if(nErrorCode < 0) { return; }
  1969. sysf_messageBox("저장이","I002");
  1970. ds_grd_inptmast.setColumn(ds_grd_inptmast.rowposition, "judgrmk", grp_edimemo.txt_judgrmk.value);
  1971. grp_edimemo.visible = false;
  1972. }
  1973. // 심사자메모, EDI청구메모를 특정내역 형식에 맞춰 설정한다.
  1974. function fSetJudgEDIMemo(spclmemo, usermemoyn) {
  1975. fRefrhVar(ds_grd_inptmast);
  1976. var item5Node = "";
  1977. if (usermemoyn == "Y") {
  1978. item5Node = "U";
  1979. }
  1980. var iSpclCdCnt = 0;
  1981. var spclcnt = null;//instance1.selectSingleNode("/root/send");
  1982. if(!utlf_isNull(spclcnt))
  1983. {
  1984. var spcllist = spclcnt.childNodes;
  1985. iSpclCdCnt = spcllist.length ; // DB에 저장될 MX999 코드 개수
  1986. }
  1987. var iSpclCdTotLength = utlf_getStringLength(spclmemo); // (stringHelper.js) 문자열의 길이를 구한다.
  1988. if (iSpclCdTotLength > 4000){ //심사메모 4000byte초과시 alert메세지 띄우면서 안되게끔... 일단... clob으로 안되기때문에....
  1989. sysf_messageBox("심사/EDI메모내용이 너무길어 저장을 ","E001");
  1990. return false;
  1991. }
  1992. if (iSpclCdTotLength > 1333) { // 새로 입력된 특정코드가 700byte를 넘는다.
  1993. // 영문(700자), 한글(350자) 길이로 잘라서 n개의 특정코드를 만든다.
  1994. var iLen = 0; // 특정내역 길이가 700 byte가 되었는지 계산
  1995. var iStartInx = 0; // 특정내역 시작 index
  1996. var iCharCnt = 0; // 몇글자로 구성되는지 계산
  1997. for (var i=0; i < spclmemo.length; i++) {
  1998. var sBit = spclmemo.charAt(i);
  1999. iCharCnt++;
  2000. if (escape(sBit).length > 4) {
  2001. iLen = iLen + 2;
  2002. } else {
  2003. iLen = iLen + 1;
  2004. }
  2005. if (iLen == 1333 || iLen > 1333) { // 영문(700자), 한글(350자)
  2006. iSpclCdCnt++;
  2007. if (iLen == 350) { // 700byte로 길이가 끝난 경우
  2008. ds_send_savememo.addRow();
  2009. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclspec", spclmemo.substr(iStartInx, iCharCnt));
  2010. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclmemoflag", item5Node);
  2011. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "status", "i");
  2012. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "unitflag", "M");
  2013. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclcd", "MX999");
  2014. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "seqno", ds_send_savememo.rowcount);
  2015. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "pid", gv_pid);
  2016. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "indd", gv_indd);
  2017. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "mskind", gv_mskind);
  2018. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "cretno", gv_cretno);
  2019. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "fromdd", gv_fromdd);
  2020. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "instcd", gv_instcd);
  2021. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "lastupdtrid", "");
  2022. iStartInx += iCharCnt;
  2023. } else if (iLen > 350) { // 영문(700자), 한글(350자)를 넘는 경우
  2024. ds_send_savememo.addRow();
  2025. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclspec", spclmemo.substr(iStartInx, iCharCnt - 1));
  2026. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclmemoflag", item5Node);
  2027. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "status", "i");
  2028. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "unitflag", "M");
  2029. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclcd", "MX999");
  2030. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "seqno", ds_send_savememo.rowcount);
  2031. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "pid", gv_pid);
  2032. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "indd", gv_indd);
  2033. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "mskind", gv_mskind);
  2034. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "cretno", gv_cretno);
  2035. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "fromdd", gv_fromdd);
  2036. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "instcd", gv_instcd);
  2037. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "lastupdtrid", "");
  2038. iStartInx += (iCharCnt - 1);
  2039. }
  2040. iCharCnt = 0;
  2041. iLen = 0;
  2042. if (parseInt(iSpclCdTotLength / 1333) == iSpclCdCnt) {
  2043. i = spclmemo.length;
  2044. if ((iSpclCdTotLength % 1333) != 0) { // 700Byte 씩 자르고 남은 길이가 있는 경우
  2045. ds_send_savememo.addRow();
  2046. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclspec", spclmemo.substring(iStartInx, spclmemo.length));
  2047. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclmemoflag", item5Node);
  2048. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "status", "i");
  2049. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "unitflag", "M");
  2050. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclcd", "MX999");
  2051. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "seqno", ds_send_savememo.rowcount);
  2052. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "pid", gv_pid);
  2053. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "indd", gv_indd);
  2054. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "mskind", gv_mskind);
  2055. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "cretno", gv_cretno);
  2056. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "fromdd", gv_fromdd);
  2057. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "instcd", gv_instcd);
  2058. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "lastupdtrid", "");
  2059. }
  2060. }
  2061. }
  2062. }
  2063. } else { // 새로 입력된 특정코드는 700byte를 넘지 않는다.
  2064. ds_send_savememo.addRow();
  2065. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclspec", spclmemo);
  2066. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclmemoflag", item5Node);
  2067. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "status", "i");
  2068. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "unitflag", "M");
  2069. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "spclcd", "MX999");
  2070. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "seqno", ds_send_savememo.rowcount);
  2071. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "pid", gv_pid);
  2072. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "indd", gv_indd);
  2073. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "mskind", gv_mskind);
  2074. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "cretno", gv_cretno);
  2075. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "fromdd", gv_fromdd);
  2076. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "instcd", gv_instcd);
  2077. ds_send_savememo.setColumn(ds_send_savememo.rowcount-1, "lastupdtrid", "");
  2078. }
  2079. }
  2080. function grd_inptmast_oncellclick(obj:Grid, e:GridClickEventInfo)
  2081. {
  2082. fRefrhVar(ds_grd_inptmast);
  2083. var col = obj.currentcol;
  2084. // 퇴원환자이면 재계산,퇴원심사진행취소,퇴원마감취소 버튼 비활성화
  2085. // 퇴원마감 환자 이면 퇴원심사진행취소 버튼을 비활성화
  2086. // 마감환자가 아닌경우 퇴원마감취소 버튼을 비활성화
  2087. // 마감환자이면 졔계산 버튼을 비활성화 한다.
  2088. if (gv_dschdclrtyn == "Y" && gv_dschnotiyn == "N" && (gv_dschjudgprcsstat == "A" || utlf_isNull(gv_dschjudgprcsstat))) {
  2089. btn_recalc.enable = true;
  2090. btn_dschjudgprcscncl.enable = true;
  2091. btn_dschclosecancel.enable = false;
  2092. } else if (gv_dschdclrtyn == "N" && gv_dschnotiyn == "N" && (gv_dschjudgprcsstat == "A" || utlf_isNull(gv_dschjudgprcsstat))) {
  2093. btn_recalc.enable = true;
  2094. btn_dschjudgprcscncl.enable = false;
  2095. btn_dschclosecancel.enable = false;
  2096. } else if (gv_indschacptstat == "D") {
  2097. btn_recalc.enable = false;
  2098. btn_dschjudgprcscncl.enable = false;
  2099. btn_dschclosecancel.enable = false;
  2100. } else if(gv_dschjudgprcsstat == "C" || gv_dschjudgprcsstat == "E" || gv_dschjudgprcsstat == "G") {
  2101. btn_recalc.enable = false;
  2102. btn_dschjudgprcscncl.enable = false;
  2103. btn_dschclosecancel.enable = true;
  2104. } else if(gv_dschjudgprcsstat == "B" || gv_dschjudgprcsstat == "A") {
  2105. btn_recalc.enable = true;
  2106. btn_dschjudgprcscncl.enable = true;
  2107. btn_dschclosecancel.enable = false;
  2108. }
  2109. //메모 란을 클릭하면 메모의 상세 내역을 보여준다.
  2110. // 20091109 JHP 소팅시에 메모로 소팅을 하면 메모창이 열리는데 그걸 막는거 조건 추가
  2111. if (col == obj.getBindCellIndex("body", "judgrmk")) { // 메모
  2112. ds_hidden.setColumn(0,"judgrmk", gv_judgrmk);
  2113. ds_hidden.setColumn(0,"judgflag", "memo");
  2114. grp_edimemo.position = "absolute 248 215 868 586"
  2115. grp_edimemo.visible = true;
  2116. grp_edimemo.cpt_detail.text = '심사 메모';
  2117. }
  2118. //평가메모란을 클릭하면 평가메모의 상세 내역을 보여줌 - 20100223 추가
  2119. if (col == obj.getBindCellIndex("body", "testgrup")) { // 메모
  2120. ds_hidden.setColumn(0,"testgrup", gv_testgrup);
  2121. grp_tstmemo.position = "absolute 4 176 624 545"
  2122. grp_tstmemo.visible = true;
  2123. }
  2124. // 공통 - 대상자 선택하면 하단 퇴원통보등록시간 보여주도록 한다. ( 2008.01.28 박지욱 추가)
  2125. // 대상자 선택하면 퇴원예고시긴도 보여준다 - 20080922 박창원
  2126. if (gv_dschrgstacptdt == "-" || gv_dschrgstacptdt == "19000101000000") {
  2127. ds_hidden.setColumn(0,"dschrgstacptdt", "00000000000000");
  2128. } else {
  2129. ds_hidden.setColumn(0,"dschrgstacptdt", gv_dschrgstacptdt);
  2130. }
  2131. if (gv_dschdclrtrgstdt == "-" || gv_dschdclrtrgstdt == "19000101000000") {
  2132. ds_hidden.setColumn(0,"dschdclrtrgstdt", "00000000000000");
  2133. } else {
  2134. ds_hidden.setColumn(0,"dschdclrtrgstdt", gv_dschdclrtrgstdt);
  2135. }
  2136. if (chk_readonly.value== "Y") {
  2137. btn_dschjudgprcscncl.enable = false;
  2138. btn_dschclosecancel.enable = false;
  2139. btn_recalc.enable = false;
  2140. }
  2141. // if (e.ctrlKey && e.button) {
  2142. // //setOrderInfoOfColSort("grd_inptmast");
  2143. // }
  2144. }
  2145. function grd_inptmast_onkeydown(obj:Grid, e:KeyEventInfo)
  2146. {
  2147. if(e.ctrlKey == true && e.keycode == 67) {
  2148. var selectedRows = grdf_getSelectedRows(obj);
  2149. if (selectedRows.length == 1) { // 한줄
  2150. if (obj.currentcol == obj.getBindCellIndex("body", "pid") ) {
  2151. // 등록번호
  2152. var clip = obj.getCellValue(obj.currentrow, obj.getBindCellIndex("body", "pid"));
  2153. system.setClipboard("CF_TEXT", clip);
  2154. } else {
  2155. grdf_clipboardCopy(obj);
  2156. }
  2157. }
  2158. else if (electedRows.length > 1) { // 여러줄
  2159. grdf_clipboardCopy(obj);
  2160. }
  2161. }
  2162. }
  2163. function grd_inptmast_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  2164. {
  2165. grdf_setSelectedCell(obj, e)
  2166. pmn_menu1.trackPopup(e.screenX,e.screenY);
  2167. }
  2168. function pmn_menu1_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
  2169. {
  2170. eval(e.id +"();");
  2171. }
  2172. function pmn_menu1_onmouseleave(obj:PopupMenu, e:MenuMouseEventInfo)
  2173. {
  2174. obj.closePopup();
  2175. }
  2176. function fOpenDschMemo() { // 퇴실정리화면조회
  2177. fRefrhVar(ds_grd_inptmast);
  2178. ds_hidden_sppij02000.clearData();
  2179. ds_hidden_sppij02000.addRow();
  2180. if(gv_dschnotiyn == "N"){
  2181. return;
  2182. }
  2183. ds_hidden_sppij02000.setColumn(0, "pid", gv_pid);
  2184. ds_hidden_sppij02000.setColumn(0, "orddd", gv_orddd);
  2185. ds_hidden_sppij02000.setColumn(0, "dschdclrdt", gv_dschrgstacptdt);
  2186. ds_hidden_sppij02000.setColumn(0, "cretno", gv_cretno);
  2187. ds_hidden_sppij02000.setColumn(0, "seqno", gv_seqno);
  2188. var objArg = new Object();
  2189. objArg.arg_ds_hidden_sppij02000 = ds_hidden_sppij02000;
  2190. frmf_modal("SPPIJ02000","SPPIJ02000",objArg,"","","","","","","","","","M");
  2191. }
  2192. function fExecDeptPrcp() { // 시행부서처방
  2193. fRefrhVar(ds_grd_inptmast);
  2194. fOpenSMMMO00200( gv_pid, gv_indd, gv_cretno, gv_instcd, "I", "");
  2195. }
  2196. function fSrchResult() { // 결과조회
  2197. fRefrhVar(ds_grd_inptmast);
  2198. var pid = gv_pid;
  2199. if (!utlf_isNull(pid)) {
  2200. ds_hidden_smaer00800.setColumn(0, "srchdate1", gv_indd);
  2201. ds_hidden_smaer00800.setColumn(0, "srchdate2", gv_curdd);
  2202. ds_hidden_smaer00800.setColumn(0, "srchpid", gv_pid);
  2203. ds_hidden_smaer00800.setColumn(0, "wardcd", "");
  2204. ds_hidden_smaer00800.setColumn(0, "roomcd", "");
  2205. ds_hidden_smaer00800.setColumn(0, "listflag", "P");
  2206. ds_hidden_smaer00800.setColumn(0, "deptcd", "");
  2207. ds_hidden_smaer00800.setColumn(0, "drid", "");
  2208. ds_hidden_smaer00800.setColumn(0, "chkcheck", "");
  2209. ds_hidden_smaer00800.setColumn(0, "chkcheck1", "A");
  2210. ds_hidden_smaer00800.setColumn(0, "chkcheck2", "B");
  2211. ds_hidden_smaer00800.setColumn(0, "chkcheck3", "C");
  2212. ds_hidden_smaer00800.setColumn(0, "chkcheck4", "D");
  2213. ds_hidden_smaer00800.setColumn(0, "chkcheck5", "E");
  2214. ds_hidden_smaer00800.setColumn(0, "chkcheck6", "F");
  2215. ds_hidden_smaer00800.setColumn(0, "chkcheck7", "G");
  2216. ds_hidden_smaer00800.setColumn(0, "chkcheck8", "");
  2217. ds_hidden_smaer00800.setColumn(0, "tabflag", "");
  2218. ds_hidden_smaer00800.setColumn(0, "mdlcd", "");
  2219. ds_hidden_smaer00800.setColumn(0, "examgubun", "");
  2220. ds_hidden_smaer00800.setColumn(0, "srchflag", "B");
  2221. ds_hidden_smaer00800.setColumn(0, "hlaflag", "N");
  2222. ds_hidden_smaer00800.setColumn(0, "prntfrmflag", "");
  2223. var objArg = new Object();
  2224. objArg.arg_ds_send_singdata = ds_hidden_smaer00800;
  2225. frmf_open("SMMMI00100","SMMMI00100",objArg,"","","","","","","","","","M");
  2226. }
  2227. }
  2228. function fGetDurginfo(wndobj) {
  2229. fRefrhVar(ds_grd_inptmast);
  2230. frmf_setParameter("pid", gv_pid);
  2231. frmf_setParameter("hngnm", gv_hngnm);
  2232. frmf_setParameter("prcpdd", gv_curdd);
  2233. frmf_setParameter("prcpcd", "");
  2234. if (!utlf_isNull(wndobj))
  2235. {
  2236. wndobj.fInitalize();
  2237. } else {
  2238. frmf_open("SMPPI00700","SMPPI00700","","","","","","","","","","","M");
  2239. }
  2240. }
  2241. function fSrchOrdInfo() { // 환자진료정보
  2242. fRefrhVar(ds_grd_inptmast);
  2243. fOpenSMMMO02500_1(gv_pid);
  2244. }
  2245. function fSrchConsult() { // 컨설트조회
  2246. fOpenSMMMR05000();
  2247. }
  2248. function fSrchAllForm() { // 통합기록조회
  2249. fRefrhVar(ds_grd_inptmast);
  2250. fOpenSMMRI00400(gv_pid);
  2251. }
  2252. function fSrchDrgInfo() { // DRG조회
  2253. fRefrhVar(ds_grd_inptmast);
  2254. if ( parseInt(gv_indaycnt) <= 30 ) {
  2255. ds_hidden_sppij03200.setColumn(0,"pid", gv_pid);
  2256. ds_hidden_sppij03200.setColumn(0,"indd", gv_indd);
  2257. ds_hidden_sppij03200.setColumn(0,"ordfromdd", gv_fromdd);
  2258. ds_hidden_sppij03200.setColumn(0,"cretno", gv_cretno);
  2259. frmf_setParameter("pid", gv_pid);
  2260. frmf_setParameter("indd", gv_indd);
  2261. frmf_setParameter("ordfromdd", gv_fromdd);
  2262. frmf_setParameter("cretno", gv_cretno);
  2263. var objArg = new Object();
  2264. objArg.arg_ds_send_sppij03200 = ds_hidden_sppij03200;
  2265. var wndobj = frmf_findPopup("SPPIJ03200");
  2266. if (!utlf_isNull(wndobj))
  2267. {
  2268. wndobj.fInitialize();
  2269. } else {
  2270. frmf_modal("SPPIJ03200","SPPIJ03200",objArg,"","","","","","","","","","M");
  2271. }
  2272. } else {
  2273. sysf_messageBox("입원 일수 초과 DRG 대상자가 아닙니다.","E")
  2274. }
  2275. }
  2276. function fSrchKDrgInfo() { // DRG조회
  2277. fRefrhVar(ds_grd_inptmast);
  2278. frmf_setParameter("pid", gv_pid);
  2279. frmf_setParameter("indd", gv_indd);
  2280. frmf_setParameter("ordfromdd", gv_fromdd);
  2281. frmf_setParameter("cretno", gv_cretno);
  2282. var objArg = new Object();
  2283. objArg.arg_ds_send_sppij03200 = ds_hidden_sppij03200;
  2284. var wndobj = frmf_findPopup("SPPIJ04000");
  2285. if (!utlf_isNull(wndobj))
  2286. {
  2287. wndobj.fInitialize();
  2288. } else {
  2289. frmf_open("SPPIJ04000","SPPIJ04000",objArg,"","","","","","","","","","M");
  2290. }
  2291. }
  2292. function fPatJudgPatMsgTrsm() {
  2293. fRefrhVar(ds_grd_inptmast);
  2294. if (!utlf_isNull(gv_pid)) {
  2295. // 값셋팅
  2296. // 세션값 받기
  2297. var sUserInfosS = sysf_getUserInfo();
  2298. sUserInfosS = sUserInfosS + "|";
  2299. var UserInfosS_Array = sUserInfosS.split("|");
  2300. var userid = UserInfosS_Array[0]; //사용자번호
  2301. var usernm = UserInfosS_Array[1]; //사용자이름
  2302. var posinstcd = UserInfosS_Array[6]; //근무지기관코드 2009.04.15
  2303. var posinstnm = UserInfosS_Array[7]; //근무지기관명 2009.04.15
  2304. var posdeptcd = UserInfosS_Array[4]; //소속부서코드
  2305. var posdeptnm = UserInfosS_Array[5]; //소속부서명
  2306. if (utlf_isNull(userid) || utlf_isNull(userid) || userid == " " || userid == "-") {userid = "pam"};
  2307. ds_tmp_msgtrsm.setColumn(0, "instcd", "");
  2308. ds_tmp_msgtrsm.setColumn(0, "msgwrtedd", gv_curdd);
  2309. ds_tmp_msgtrsm.setColumn(0, "histstat", "Y");
  2310. ds_tmp_msgtrsm.setColumn(0, "pid", gv_pid);
  2311. ds_tmp_msgtrsm.setColumn(0, "orddd", gv_indd);
  2312. ds_tmp_msgtrsm.setColumn(0, "cretno", gv_cretno);
  2313. ds_tmp_msgtrsm.setColumn(0, "mskind", gv_mskind);
  2314. ds_tmp_msgtrsm.setColumn(0, "orddeptcd", "-");
  2315. ds_tmp_msgtrsm.setColumn(0, "orddrid", "-");
  2316. ds_tmp_msgtrsm.setColumn(0, "orddrnm", "-");
  2317. ds_tmp_msgtrsm.setColumn(0, "ordtype", "I");
  2318. ds_tmp_msgtrsm.setColumn(0, "kindflag", "P");
  2319. ds_tmp_msgtrsm.setColumn(0, "grupcalcscorcd", "-");
  2320. ds_tmp_msgtrsm.setColumn(0, "snglcalcscorcd", "-");
  2321. ds_tmp_msgtrsm.setColumn(0, "ordqty", 0);
  2322. ds_tmp_msgtrsm.setColumn(0, "ordtims", 0);
  2323. ds_tmp_msgtrsm.setColumn(0, "orddays", 0);
  2324. ds_tmp_msgtrsm.setColumn(0, "prcpdd", "-");
  2325. ds_tmp_msgtrsm.setColumn(0, "prcpno", 0);
  2326. ds_tmp_msgtrsm.setColumn(0, "prcppayflag", "-");
  2327. ds_tmp_msgtrsm.setColumn(0, "rgstrid", "-");
  2328. ds_tmp_msgtrsm.setColumn(0, "rgstdd", "-");
  2329. ds_tmp_msgtrsm.setColumn(0, "rgsttm", "-");
  2330. ds_tmp_msgtrsm.setColumn(0, "sendphone", "");
  2331. ds_tmp_msgtrsm.setColumn(0, "anybodyyn", "N");
  2332. ds_tmp_msgtrsm.setColumn(0, "sendflag", "0");
  2333. ds_tmp_msgtrsm.setColumn(0, "senddate", "");
  2334. ds_tmp_msgtrsm.setColumn(0, "sendid", userid);
  2335. ds_tmp_msgtrsm.setColumn(0, "deliveid", "-");
  2336. ds_tmp_msgtrsm.setColumn(0, "recvdate", "");
  2337. ds_tmp_msgtrsm.setColumn(0, "recvid", "");
  2338. ds_tmp_msgtrsm.setColumn(0, "recvcnfmyn", "N");
  2339. ds_tmp_msgtrsm.setColumn(0, "recvcnfmid", userid);
  2340. } else {
  2341. sysf_messageBox("기본정보가 ", "I004");
  2342. }
  2343. var objArg = new Object();
  2344. objArg.arg_ds_send_sppiz01900 = ds_tmp_msgtrsm;
  2345. frmf_modal("SPPIZ01900","SPPIZ01900",objArg,"","","","","","","","","","M");
  2346. ds_tmp_msgtrsm.clearData();
  2347. ds_tmp_msgtrsm.addRow();
  2348. }
  2349. // 환자 전체 메세지 내용 조회하여 하나씩 보기.
  2350. function fJudgPatMsgTrsmRef(){
  2351. fRefrhVar(ds_grd_inptmast);
  2352. ds_tmp_msgtrsm.clearData();
  2353. ds_tmp_msgtrsm.addRow();
  2354. ds_tmp_msgtrsm.setColumn(0, "refyn", "Y");
  2355. ds_tmp_msgtrsm.setColumn(0, "pid", gv_pid);
  2356. ds_tmp_msgtrsm.setColumn(0, "orddd", gv_indd);
  2357. ds_tmp_msgtrsm.setColumn(0, "cretno", gv_cretno);
  2358. ds_tmp_msgtrsm.setColumn(0, "mskind", gv_mskind);
  2359. ds_tmp_msgtrsm.setColumn(0, "orddeptcd", "-");
  2360. ds_tmp_msgtrsm.setColumn(0, "orddrid", "-");
  2361. ds_tmp_msgtrsm.setColumn(0, "ordtype", "I");
  2362. var objArg = new Object();
  2363. objArg.arg_ds_send_sppiz01900 = ds_tmp_msgtrsm;
  2364. frmf_modal("SPPIZ01900","SPPIZ01900",objArg,"","","","","","","","","","M");
  2365. ds_tmp_msgtrsm.clearData();
  2366. ds_tmp_msgtrsm.addRow();
  2367. }
  2368. function fSkindFromddChange() {
  2369. fRefrhVar(ds_grd_inptmast);
  2370. if (gv_mskind == "S") {
  2371. grp_skindfromddchange.visible = true;
  2372. if (!gv_subkindfromdd == "-") {
  2373. grp_skindfromddchange.ipt_sfromdd.value = gv_subkindfromdd
  2374. } else {
  2375. grp_skindfromddchange.ipt_sfromdd.value = gv_fromdd
  2376. }
  2377. } else {
  2378. sysf_messageBox("부유형에 대해서만 선택할 수","I010");
  2379. }
  2380. }
  2381. function btn_accept_onclick(obj:Button, e:ClickEventInfo)
  2382. {
  2383. fRefrhVar(ds_grd_inptmast);
  2384. if(grd_inptmast.rowcount == "1") {
  2385. return;
  2386. }
  2387. ds_hidden_suppkindlist.clearData();
  2388. ds_hidden_suppkindlist.addRow();
  2389. var subkindfromdd = utlf_transNullToEmpty(grp_skindfromddchange.ipt_sfromdd.value);
  2390. ds_hidden_suppkindlist.setColumn(0, "pid", gv_pid);
  2391. ds_hidden_suppkindlist.setColumn(0, "indd", gv_indd);
  2392. ds_hidden_suppkindlist.setColumn(0, "mskind", gv_mskind);
  2393. ds_hidden_suppkindlist.setColumn(0, "insukind", gv_insukind);
  2394. ds_hidden_suppkindlist.setColumn(0, "suppkind", gv_suppkind);
  2395. ds_hidden_suppkindlist.setColumn(0, "fromdd", gv_fromdd);
  2396. ds_hidden_suppkindlist.setColumn(0, "todd", gv_todd);
  2397. ds_hidden_suppkindlist.setColumn(0, "cretno", gv_cretno);
  2398. ds_hidden_suppkindlist.setColumn(0, "instcd", gv_instcd);
  2399. ds_hidden_suppkindlist.setColumn(0, "subkindfromdd", subkindfromdd);
  2400. // submit호출
  2401. var oParam = {};
  2402. oParam.id = "TXPIJ00206";
  2403. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  2404. oParam.method = "reqSetSubKindFromDD";
  2405. oParam.inds = "req=ds_hidden_suppkindlist";
  2406. oParam.outds = "";
  2407. oParam.async = true;
  2408. //oParam.callback = "cf_TXPIJ00206";
  2409. tranf_submit(oParam);
  2410. grp_skindfromddchange.visible = false;
  2411. group2_btn_search_onclick();
  2412. }
  2413. function button1_onclick(obj:Button, e:ClickEventInfo)
  2414. {
  2415. grp_skindfromddchange.visible = false;
  2416. }
  2417. function group2_btn_search_onclick(obj:Button, e:ClickEventInfo)
  2418. {
  2419. var cgubun = ds_send.getColumn(0,"cgubun");
  2420. if (cgubun == 2 )
  2421. {
  2422. chk_tstlist.visible = false;
  2423. group2.group5.opt_tstlist.value = chk_tstlist.text;
  2424. input1.value = chk_tstlist.value;
  2425. var cdlist = ds_send.getColumn(0,"tststndrdcdlist");
  2426. if (utlf_isNull(cdlist))
  2427. {
  2428. sysf_messageBox("평가대상 조회 시에는 하나 이상의 평가를 선택","I008");
  2429. return;
  2430. }
  2431. var af = ds_send.getColumn(0,"tststndrdcdlist");
  2432. var bf = "";
  2433. var cnt = af.length;
  2434. if(utlf_transNullToEmpty(ds_send.getColumn(0,"tststndrdcdlist")) != " " || utlf_transNullToEmpty(ds_send.getColumn(0,"tststndrdcdlist")) != "" ) {
  2435. bf = af.replace(" ", "','");
  2436. for(var i=1; i < cnt; i++){
  2437. bf = bf.replace(" ", "','");
  2438. if(bf.substr(0,1) != "'"){
  2439. bf = "'" + bf + "'";
  2440. }
  2441. }
  2442. }
  2443. ds_send.setColumn(0,"tststndrdcdlist", bf);
  2444. }
  2445. fGetInBfJudgTrgtManList();
  2446. ds_hidden.setColumn(0,"selectedRow", ""); // 조회후 재계산, 퇴원심사진행취소,퇴원마감취소 버튼 비활성화 // 선택된 row 값 기억 심사화면에서 저장,심사완료, 마감취소 등 이벤트 발생시 조회화면에도 반영시켜주기 위함)
  2447. btn_recalc.enable = false;
  2448. btn_dschjudgprcscncl.enable = false;
  2449. btn_dschclosecancel.enable = false;
  2450. }
  2451. function btn_dump_onclick(obj:Button, e:ClickEventInfo)
  2452. {
  2453. frmf_open("SMPAI02900","SMPAI02900","","","","","","","","","","","M");
  2454. }
  2455. function btn_sljgtotordamt_onclick(obj:Button, e:ClickEventInfo)
  2456. {
  2457. fRefrhVar(ds_grd_inptmast);
  2458. if (utlf_isNull(gv_pid)) {
  2459. return;
  2460. }
  2461. ds_hidden_maketoa.clearData();
  2462. ds_hidden_maketoa.addRow();
  2463. ds_hidden_maketoa.setColumn(0,"pid", gv_pid);
  2464. ds_hidden_maketoa.setColumn(0,"indd", gv_indd);
  2465. ds_hidden_maketoa.setColumn(0,"cretno", gv_cretno);
  2466. ds_hidden_maketoa.setColumn(0,"mskind", gv_mskind);
  2467. ds_hidden_maketoa.setColumn(0,"instcd", gv_instcd);
  2468. var oParam = {};
  2469. oParam.id = "TXPIJ00206";
  2470. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  2471. oParam.method = "reqSetSljgTotordamt";
  2472. oParam.inds = "req=ds_hidden_maketoa";
  2473. oParam.outds = "";
  2474. oParam.async = true;
  2475. //oParam.callback = "cf_TXPIJ00206";
  2476. tranf_submit(oParam);
  2477. }
  2478. function cf_TXPIJ00206(sSvcId, nErrorCode, sErrorMsg) {
  2479. if(nErrorCode < 0) return;
  2480. group2_btn_search_onclick(); // 재조회하여 총진료비 내용 확인
  2481. }
  2482. function grp_edimemo_btn_closememot_onclick(obj:Button, e:ClickEventInfo)
  2483. {
  2484. grp_edimemo.visible = false;
  2485. }
  2486. function grp_tstmemo_button3_onclick(obj:Button, e:ClickEventInfo)
  2487. {
  2488. grp_tstmemo.visible = false;
  2489. }
  2490. function button2_onclick(obj:Button, e:ClickEventInfo)
  2491. {
  2492. var chkstat = group2.cmb_judgendyn.value; //개인별 조회가 아닌경우에만 실행한다.
  2493. if(chkstat != "9"){
  2494. fSubmitOnScroll();
  2495. }
  2496. }
  2497. function fSubmitOnScroll() {//페이지 처리를 위한 함수
  2498. fRefrhVar(ds_grd_inptmast);
  2499. var rows = ds_grd_inptmast.rowcount;
  2500. ds_send.setColumn(0,"lastpid", "");
  2501. ds_send.setColumn(0,"lastindd", "");
  2502. ds_send.setColumn(0,"lastcretno", "");
  2503. if(rows > 1){
  2504. ds_send.setColumn(0,"lastpid", gv_pid);
  2505. ds_send.setColumn(0,"lastindd", gv_indd);
  2506. ds_send.setColumn(0,"lastcretno", gv_cretno);
  2507. }else{
  2508. return;
  2509. }
  2510. ds_send.setColumn(0,"basedd", gv_curdd);
  2511. var oParam = {};
  2512. oParam.id = "TRPIJ00201";
  2513. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  2514. oParam.method = "reqGetInbfJudgTrgtManList";
  2515. oParam.inds = "req=ds_send";
  2516. oParam.outds = "ds_grd_inptmast=gridinpt";
  2517. oParam.async = true;
  2518. oParam.callback = "cf_TRPIJ00201";
  2519. tranf_submit(oParam);
  2520. var choicdsrch2 = group2.group1.ipt_spclsearch.value; // (선별심사 체크리스트 적용한 조회인 경우 그리드의 컬럼 순서를 변경한다.)
  2521. if (utlf_isNulls(choicdsrch2)) {
  2522. var refdata = "^dschdclrtyn^dschnotiyn^orddeptnm^wardnm^roomnm^pid^hngnm^gender^age^indaycnt^indd^mskind^insukind^cancer^change^fromdd^todd^diag^atdoctid^specordyn^judgrmk^dschjudgprcsstat^lastjudgendid^lastjudgdt^operationyn^spcljudgflag^dschdclrdt^receiptyn^judgid^judgmdlid^calcscorcd^ordhngnm^calcpayflag^calcqty^calctims^calcdays^orddd^execdd^totordamt^cretno^probjudgflag^instcd^dethdt^midcyn^ownbmaxexamt";
  2523. var sizedata = "22^22^43^35^37^55^54^22^32^30^67^22^35^25^22^67^67^45^60^22^42^32^47^67^31^31^75^67^80^80^100^140^34^34^45^35^67^68^90^0^0^0^116^77^81";
  2524. grdf_SetOrderInfoOfCol_format(grd_inptmast,refdata,sizedata); // 선별심사 체크리스트 적용된 조회일 경우 그리드 순서를 변경한다.
  2525. } else {
  2526. // 사용자 환경저장된 그리드 순서를 보여준다.
  2527. var refdata = model.getValue("/root/hidden/listval/uuee[compsnm='grd_inptmast']/compscnts");
  2528. var sizedata = model.getValue("/root/hidden/listval/uuee[compsnm='grd_inptmast']/compssizecnts");
  2529. grdf_SetOrderInfoOfCol_format(grd_inptmast,refdata,sizedata);
  2530. }
  2531. }
  2532. function btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  2533. {
  2534. this.close();
  2535. }
  2536. function btn_confirm_onclick(obj:Button, e:ClickEventInfo)
  2537. {
  2538. fSetInsulist("cf_TRPIJ00207");
  2539. }
  2540. function btn_init_onclick(obj:Button, e:ClickEventInfo)
  2541. {
  2542. fInitialize();
  2543. }
  2544. function cf_Cnfm_SMPIJ00200 (sSvcId, nErrorCode, sErrorMsg) {
  2545. //if(nErrorCode < 0) return;
  2546. //sysf_messageBox("사용자 환경 저장이","I002");
  2547. }
  2548. function btn_EnvSetup_onclick(obj:Button, e:ClickEventInfo)
  2549. {
  2550. grdf_SaveOrderInfoOfCol(grd_inptmast, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  2551. cnrlf_SaveOrderInfoOfCnrl(group2.cmb_judgendyn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  2552. cnrlf_SaveOrderInfoOfCnrl(group2.cmb_judgmdlid, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  2553. cnrlf_SaveOrderInfoOfCnrl(group2.chk_sixyn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  2554. cnrlf_SaveOrderInfoOfCnrl(group2.chk_judgstat, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  2555. cnrlf_SaveOrderInfoOfCnrl(group2.cmb_insukind, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  2556. cnrlf_SaveOrderInfoOfCnrl(group2.opt_insukind, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  2557. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  2558. }
  2559. function grp_edimemo_btn_savememo_onclick(obj:Button, e:ClickEventInfo)
  2560. {
  2561. fSaveJudgrmk();
  2562. }
  2563. function group2_cmb_insukind_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  2564. {
  2565. group2.opt_insukind.value = obj.value;
  2566. ds_init_cmb_suppkind.filter("insukind == '"+obj.value +"'");
  2567. group2.opt_suppkind.value = "";
  2568. group2.cmb_suppkind.value = "";
  2569. }
  2570. function fGetDrgOpenPopup(flag){
  2571. //DRG 설정..시작
  2572. var opchkyn = ds_drginfo.getColumn(0,"opchkyn");
  2573. var drgmchkyn = ds_drginfo.getColumn(0,"drgmchkyn");
  2574. if (opchkyn=="Y" && gv_indaycnt <= 30) {
  2575. frmf_setParameter("pid", gv_pid);
  2576. frmf_setParameter("indd", gv_indd);
  2577. frmf_setParameter("ordfromdd", gv_fromdd);
  2578. frmf_setParameter("cretno", gv_cretno);
  2579. frmf_setParameter("drgmstat", flag);
  2580. var rtn = frmf_modal("SPPIJ03200","SPPIJ03200","","","","","","","","","","","M");
  2581. if (rtn != true) {
  2582. return false;
  2583. }
  2584. }
  2585. //DRG완료
  2586. }
  2587. function openSMMMR06900() {
  2588. if(!utlf_isNull(gv_hngnm)){
  2589. var trgtManWindow = frmf_findPopup("SMMMR06900");
  2590. if (utlf_isNull(trgtManWindow))
  2591. {
  2592. frmf_modal("SMMMR06900","SMMMR06900","","","","","","","","","","","M");
  2593. }else{
  2594. frmf_setFocusPop("SMMMR06900");
  2595. }
  2596. }
  2597. }
  2598. function fCheckList(chkbox){
  2599. var chk = eval(chkbox);
  2600. var cnt = 0;
  2601. var canceryn = ds_send.getColumn(0,"canceryn");
  2602. var anticanceryn = ds_send.getColumn(0,"anticanceryn");
  2603. var anticancer2yn = ds_send.getColumn(0,"anticancer2yn");
  2604. var mriyn = ds_send.getColumn(0,"mriyn");
  2605. var midclaimyn = ds_send.getColumn(0,"midclaimyn");
  2606. var operationyn = ds_send.getColumn(0,"operationyn");
  2607. var spcljudg = ds_send.getColumn(0,"spcljudg");
  2608. var angioyn = ds_send.getColumn(0,"angioyn");
  2609. var angio2yn = ds_send.getColumn(0,"angio2yn");
  2610. var cpyn = ds_send.getColumn(0,"cpyn");
  2611. var drgyn = ds_send.getColumn(0,"drgyn");
  2612. var v191 = ds_send.getColumn(0,"v191");
  2613. var v192 = ds_send.getColumn(0,"v192");
  2614. var v193 = ds_send.getColumn(0,"v193");
  2615. var emg = ds_send.getColumn(0,"/emg");
  2616. if(canceryn){
  2617. cnt = cnt + 1;
  2618. }
  2619. if(anticanceryn){
  2620. cnt = cnt + 1;
  2621. }
  2622. if(anticancer2yn){
  2623. cnt = cnt + 1;
  2624. }
  2625. if(mriyn){
  2626. cnt = cnt + 1;
  2627. }
  2628. if(midclaimyn){
  2629. cnt = cnt + 1;
  2630. }
  2631. if(operationyn){
  2632. cnt = cnt + 1;
  2633. }
  2634. if(spcljudg){
  2635. cnt = cnt + 1;
  2636. }
  2637. if(angioyn){
  2638. cnt = cnt + 1;
  2639. }
  2640. if(angio2yn){
  2641. cnt = cnt + 1;
  2642. }
  2643. if(cpyn){
  2644. cnt = cnt + 1;
  2645. }
  2646. if(drgyn){
  2647. cnt = cnt + 1;
  2648. }
  2649. if(v191){
  2650. cnt = cnt + 1;
  2651. }
  2652. if(v192){
  2653. cnt = cnt + 1;
  2654. }
  2655. if(v193){
  2656. cnt = cnt + 1;
  2657. }
  2658. if(emg){
  2659. cnt = cnt + 1;
  2660. }
  2661. if(cnt > 2){
  2662. sysf_messageBox("체크 조건은 2개 이상 선택","E001");
  2663. chk.value = "";
  2664. }
  2665. }
  2666. function fGetPreviousPatient(){ // 이전 행으로 이동
  2667. var row = ds_grd_inptmast.rowposition;
  2668. var rows = ds_grd_inptmast.rowcount;
  2669. if (row == -1) {
  2670. row = 0;
  2671. } else {
  2672. row = eval(row) - 1;
  2673. }
  2674. rows = eval(rows) ;
  2675. if (rows > row) {
  2676. ds_grd_inptmast.rowposition = row;
  2677. //grd_inptmast.select(row, grd_inptmast.colRef("dschdclrtyn"), row, grd_inptmast.colRef("probjudgflag")) = true;
  2678. grd_inptmast.oncelldblclick.fireEvent(grd_inptmast, new GridClickEventInfo());
  2679. } else {
  2680. sysf_messageBox("이전 대상자가", "I004"); ///이전 대상자가 없습니다
  2681. frmf_setFocusOpener(); // (common.js)에서 제공하는 함수로 opener를 activate한다.
  2682. }
  2683. }
  2684. function fGetNextPatient(){ // 다음 행으로 이동
  2685. var row = ds_grd_inptmast.rowposition;
  2686. var rows = ds_grd_inptmast.rowcount;
  2687. if (row == -1) {
  2688. row = 0;
  2689. } else {
  2690. row = eval(row) + 1;
  2691. }
  2692. rows = eval(rows) ;
  2693. if (rows > row) {
  2694. ds_grd_inptmast.rowposition = row;
  2695. //grd_inptmast.select(row, grd_inptmast.colRef("dschdclrtyn"), row, grd_inptmast.colRef("probjudgflag")) = true;
  2696. grd_inptmast.oncelldblclick.fireEvent(grd_inptmast, new GridClickEventInfo());
  2697. } else {
  2698. sysf_messageBox("다음 대상자가", "I004"); ///다음 대상자가 없습니다
  2699. frmf_setFocusOpener(); // (common.js)에서 제공하는 함수로 opener를 activate한다.
  2700. }
  2701. }
  2702. // 퇴원심사진행취소
  2703. function fDschJudgCncl() {
  2704. var row = ds_grd_inptmast.rowposition
  2705. if (row > -1) {
  2706. ds_send_data1.setColumn(0,"dschjudgprcsstat", "Z");
  2707. ds_send_data1.setColumn(0,"dschnoticnclyn", "N")
  2708. fSetInsulist("cf_TRPIJ00207_JudgCncl"); // 퇴원심사 취소시에는 실시간 퇴원여부를 체크하여 블로킹한다. // 퇴원마감이 비정상적인 이유(타인 개입)로 되었다면 블로킹한다.
  2709. }
  2710. }
  2711. function fChkPidWordNumber(pid) // 수정추가 : 20090813 JHP 성가에서 환자번호에 문자가들어있는경우 있음(ex : A108) 하여 각 문자 판단하여 앞두자리 판단하여 조회 여부 결정
  2712. { // 환자번호 문자 숫자 여부 판단. (isNaN 숫자가아닐경우 true, isFinite 숫자일경우 true)
  2713. if( typeof( this ) == "undefined" ) return false;
  2714. if( this.length == 0 ) return false;
  2715. var thisSting = pid.toString();
  2716. var firstpid = "";
  2717. for( var i=0; i < thisSting.length; i++ ){
  2718. var thisNumber = thisSting.substring( i, i+1 );
  2719. if( isNaN( thisNumber ) ) firstpid = firstpid + 'W'; // 숫자가 아니면
  2720. if( isNaN( thisNumber ) == false ) firstpid = firstpid + 'N'; // 숫자면
  2721. if( " " == thisNumber ) firstpid = firstpid + 'L'; // 공백이면 FALSE 리턴
  2722. }
  2723. var firstpidYN = firstpid.substring( 0, 2 );
  2724. if ( firstpidYN == "WN"){ return true} // 첫번째 두번째 글자 여부
  2725. else if ( firstpidYN == "NN"){ return true} // 문자숫자, 숫자숫자 : pid로 판단 : true
  2726. else if ( firstpidYN == "WW"){ return false} // 문자문자, 숫자문자 : 글자로 판단 : false
  2727. else if ( firstpidYN == "NW"){ return false} // 그외 : 글자로 판단 : false
  2728. else { return false }
  2729. }
  2730. function group2_cmb_suppkind_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  2731. {
  2732. group2.opt_suppkind.value = obj.value;
  2733. }
  2734. function group2_cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  2735. {
  2736. ds_init_cmb_orddrid.clearData();
  2737. var oParam = {};
  2738. oParam.id = "TRPIJ00204";
  2739. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  2740. oParam.method = "reqGetAtdoctList";
  2741. oParam.inds = "req=ds_send";
  2742. oParam.outds = "ds_init_cmb_orddrid=atdoctlist";
  2743. oParam.async = true;
  2744. //oParam.callback = "cf_TRPIJ00204";
  2745. tranf_submit(oParam);
  2746. }
  2747. function group2_ipt_personalsearch_onkeyup(obj:Edit, e:KeyEventInfo)
  2748. {
  2749. if (e.keycode == 13) { // Enter 입력 시에
  2750. if (group2.ipt_personalsearch.value.length > 1) { // 2글자 이상이면
  2751. fGetInBfJudgTrgtManList(); // 조회후 재계산, 퇴원심사진행취소,퇴원마감취소 버튼 비활성화
  2752. btn_recalc.enable = false;
  2753. btn_dschjudgprcscncl.enable = false;
  2754. btn_dschclosecancel.enable = false;
  2755. }
  2756. }
  2757. }
  2758. function group2_btn_pidsrch_onclick(obj:Button, e:ClickEventInfo)
  2759. {
  2760. var ipt_pid = ds_send.getColumn(0,"patunitsrch1");
  2761. if (!utlf_isNull(ipt_pid)) {
  2762. ds_hidden_sppmc02500.setColumn(0,"srchcond", "1");// 검색조건 : 등록번호로 설정
  2763. ds_hidden_sppmc02500.setColumn(0,"pid", ipt_pid);
  2764. } else {
  2765. ds_hidden_sppmc02500.clearData();
  2766. ds_hidden_sppmc02500.addRow();
  2767. }
  2768. var objArg = new Object();
  2769. objArg.arg_ds_send = ds_hidden_sppmc02500;
  2770. frmf_modal("SPPMC02500", "SPPMC02500", objArg, null, 1, 150, 150, null, null, null, null, null, "M");
  2771. if(!utlf_isNull(this.objects["ds_patinfolist"])) {
  2772. var srch_pid = ds_patinfolist.getColumn(0, "pid");
  2773. var srch_hngnm = ds_patinfolist.getColumn(0, "hngnm");
  2774. ds_send.setColumn(0, "patunitsrch1", srch_pid);
  2775. }
  2776. }
  2777. function group2_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  2778. {
  2779. var cgubun = ds_send.getColumn(0,"cgubun");
  2780. if (cgubun == "2" ) {
  2781. group2.group1.visible= false;
  2782. group2.group5.visible=true;
  2783. } else {
  2784. group2.group1.visible= true;
  2785. group2.group5.visible=false;
  2786. group2.group5.opt_tstlist.value = "";
  2787. ds_send.setColumn(0,"tststndrdcdlist","");
  2788. ds_send.setColumn(0,"selectetstlist","");
  2789. }
  2790. }
  2791. function btn_print_onclick(obj:Button, e:ClickEventInfo)
  2792. {
  2793. exeReportPreview("RPPIJ00200", "XML", "/root/send/prntinfo","", "false","","","","","false");
  2794. }
  2795. function btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
  2796. {
  2797. if(ds_grd_inptmast.rowcount > 0) {
  2798. grdf_exportExcel(grd_inptmast,"excel","sheet1");
  2799. sysf_messageBox("저장이 ", "I002");
  2800. } else {
  2801. sysf_messageBox("조회된 데이터가 ", "I004");
  2802. }
  2803. }
  2804. function btn_dschjudgprcscncl_onclick(obj:Button, e:ClickEventInfo)
  2805. {
  2806. var msg = sysf_messageBox("퇴원심사진행을 취소","S001"); // 비정상적인 간호확정취소를 막기위해 알럿
  2807. if (msg == 6) {
  2808. fDschJudgCncl(); // 퇴원심사진행취소후에 간호퇴원확정여부 선택을 무조건 해제한다
  2809. chk_dschnoticnclyn.value = "";
  2810. } else {
  2811. chk_dschnoticnclyn.value = "";
  2812. return;
  2813. }
  2814. }
  2815. function btn_recalc_onclick(obj:Button, e:ClickEventInfo)
  2816. {
  2817. fRefrhVar(ds_grd_inptmast);
  2818. if(!utlf_isNull(gv_pid)){
  2819. ds_tmp_calc.setColumn(0,"pid", gv_pid);
  2820. ds_tmp_calc.setColumn(0,"indschacptstat", gv_indschacptstat);
  2821. ds_tmp_calc.setColumn(0,"indd", gv_indd);
  2822. var trgtManWindow = frmf_getChildWindow("SMPAI01800");
  2823. if (utlf_isNull(trgtManWindow))
  2824. {
  2825. frmf_open("SMPAI01800","SMPAI01800","","","","","","","","","","","M");
  2826. } else {
  2827. frmf_setFocusPop("SMPAI01800");
  2828. }
  2829. }
  2830. }
  2831. function btn_dschclosecancel_onclick(obj:Button, e:ClickEventInfo)
  2832. {
  2833. fRefrhVar(ds_grd_inptmast);
  2834. var msg = sysf_messageBox("퇴원마감취소를 진행","S001"); // 비정상적인 간호확정취소를 막기위해 알럿
  2835. if (msg != 6) {
  2836. chk_dschnoticnclyn.value = "";
  2837. return;
  2838. }
  2839. var openerpid = opener.ds_init_iteminfo.getColumn(0,"pid");
  2840. ds_send_data1.setColumn(0,"dschjudgprcsstat", "Z");
  2841. ds_send_data1.setColumn(0,"dschnoticnclyn", "N");
  2842. ds_send_data1.setColumn(0,"checkyn", "Y");
  2843. fSetInsulist();
  2844. var indschacptstat = ds_endcnclstat.getColumn(0,"indschacptstat");
  2845. if (indschacptstat == "D" ) {
  2846. sysf_messageBox("이미 퇴원처리가 된 환자입니다. 마감취소 ", "E001");
  2847. fGetInBfJudgTrgtManList();
  2848. chk_dschnoticnclyn.value = "";
  2849. return;
  2850. }
  2851. if(gv_pid) {
  2852. if (gv_pid == openerpid){
  2853. sysf_messageBox("심사메인화면에서 심사 진행중인 환자이므로 마감취소를","E001");
  2854. chk_dschnoticnclyn.value = "N";
  2855. return;
  2856. }
  2857. if (gv_dschjudgprcsstat == "C" || gv_dschjudgprcsstat == "E" || gv_dschjudgprcsstat == "G") { // 심사완료, 통합심사완료
  2858. if (gv_dschnotiyn == "Y") { // 간호 퇴원확정여부 취소가 체크되었는지 판단 하여 값을 세팅
  2859. var dschnoticnclyn = chk_dschnoticnclyn.value;
  2860. if(dschnoticnclyn == "Y"){
  2861. if (indschacptstat == "T") { // 가퇴원 블로킹 추가
  2862. sysf_messageBox("가퇴원 환자입니다. 간호확정 체크박스 해제 확인후 ", "C003");
  2863. // 무조건 대상자 조회 화면을 refresh
  2864. fGetInBfJudgTrgtManList();
  2865. chk_dschnoticnclyn.value = "";
  2866. return;
  2867. }
  2868. ds_send_data1.setColumn(0,"dschnoticnclyn", "Y");
  2869. }
  2870. }
  2871. // 퇴원수납이 되었으면 취소를 할 수 없다
  2872. if (utlf_isNull(gv_receiptyn)) {// 퇴원마감취소시 E70을 취소하기 위해 대상자의 보험유형을 가져온다
  2873. if (fGetDrgOpenPopup("O") == false) {
  2874. return false;
  2875. }
  2876. var oParam = {};
  2877. oParam.id = "TXPIJ00202";
  2878. oParam.service = "bfjudgapp.InHospJudg";
  2879. oParam.method = "reqSetDschJudgPrcsStat";
  2880. oParam.inds = "req=ds_send_data1";
  2881. oParam.outds = "";
  2882. oParam.async = true;
  2883. oParam.callback = "cf_TXPIJ00202";
  2884. tranf_submit(oParam);
  2885. } else {
  2886. sysf_messageBox("퇴원 수납이 되었으므로 마감취소를","E001"); // 퇴원심사진행취소후에 간호퇴원확정여부 선택을 무조건 해제한다.
  2887. chk_dschnoticnclyn.value = "";
  2888. }
  2889. } else {
  2890. sysf_messageBox("퇴원 마감이 되지 않은 환자 ", "E008"); // 퇴원심사진행취소후에 간호퇴원확정여부 선택을 무조건 해제한다.
  2891. chk_dschnoticnclyn.value = "";
  2892. }
  2893. }
  2894. }
  2895. function cf_TXPIJ00202(sSvcId, nErrorCode, sErrorMsg) {
  2896. if(nErrorCode < 0) {
  2897. sysf_messageBox("마감취소 처리가 되지","E007"); // 퇴원심사진행취소후에 간호퇴원확정여부 선택을 무조건 해제한다
  2898. chk_dschnoticnclyn.value = "";
  2899. return;
  2900. }
  2901. var oParam = {};
  2902. oParam.id = "TXPIJ03203";
  2903. oParam.service = "bfjudgapp.DRGJudgList";
  2904. oParam.method = "reqExeDelDrgCreateMasterInfo";
  2905. oParam.inds = "req=ds_send_data1";
  2906. oParam.outds = "";
  2907. oParam.async = true;
  2908. //oParam.callback = "cf_TXPIJ03203";
  2909. tranf_submit(oParam);
  2910. fSaveCalcAmt();
  2911. fGetInBfJudgTrgtManList();
  2912. sysf_messageBox("마감취소 처리가","I002"); // 퇴원심사진행취소후에 간호퇴원확정여부 선택을 무조건 해제한다.
  2913. chk_dschnoticnclyn.value = "";
  2914. }
  2915. function fSaveCalcAmt(){ // 원무 계산서를 취소 한다. - 대폭개정(보험정보를 가지고 삭제루틴을 호출한다.) - 20080908 박창원
  2916. ds_saend_data5.setColumn(0, "pid", gv_pid);
  2917. ds_saend_data5.setColumn(0, "indd", gv_indd);
  2918. ds_saend_data5.setColumn(0, "trgt", "Y");
  2919. var oParam = {};
  2920. oParam.id = "TRPIJ00206";
  2921. oParam.service = "bfjudgapp.InHospJudg";
  2922. oParam.method = "reqGetInHospJudgInfo";
  2923. oParam.inds = "req=ds_saend_data5";
  2924. oParam.outds = "ds_grd_insuhistory=grdinsulist";
  2925. oParam.async = true;
  2926. oParam.callback = "cf_TRPIJ00206";
  2927. tranf_submit(oParam);
  2928. }
  2929. function cf_TRPIJ00206(sSvcId, nErrorCode, sErrorMsg) {
  2930. if(nErrorCode < 0) {
  2931. sysf_messageBox("마감취소 처리가 되지","E007"); // 퇴원심사진행취소후에 간호퇴원확정여부 선택을 무조건 해제한다
  2932. chk_dschnoticnclyn.value = "";
  2933. return;
  2934. }
  2935. ds_send_insu.clearData();
  2936. ds_send_insu.addRow();
  2937. for(i=0; i < ds_grd_insuhistory.rowcount; i++) { // 유형이력을 한줄씩 체크하면서 유형별 E70을 삭제한다
  2938. var dschnotidt = ds_grd_insuhistory.getColumn(i,"dschnotidt");
  2939. ds_send_insu.setColumn(0, "pid", ds_grd_insuhistory.getColumn(i,"pid"));
  2940. ds_send_insu.setColumn(0, "indd", ds_grd_insuhistory.getColumn(i,"indd"));
  2941. ds_send_insu.setColumn(0, "cretno", ds_grd_insuhistory.getColumn(i,"cretno"));
  2942. ds_send_insu.setColumn(0, "mskind", ds_grd_insuhistory.getColumn(i,"mskind"));
  2943. ds_send_insu.setColumn(0, "insukind", ds_grd_insuhistory.getColumn(i,"insukind"));
  2944. ds_send_insu.setColumn(0, "suppkind", ds_grd_insuhistory.getColumn(i,"suppkind"));
  2945. ds_send_insu.setColumn(0, "fromdd", ds_grd_insuhistory.getColumn(i,"fromdd"));
  2946. ds_send_insu.setColumn(0, "todd", ds_grd_insuhistory.getColumn(i,"todd"));
  2947. ds_send_insu.setColumn(0, "flag", "D");
  2948. ds_send_insu.setColumn(0, "disccd", ds_grd_insuhistory.getColumn(i,"disccd"));
  2949. if (ds_grd_insuhistory.getColumn(i,"fromdd") == "99991231" || utlf_isNull(ds_grd_insuhistory.getColumn(i,"fromdd"))) {
  2950. ds_send_insu.setColumn(0, "todd", dschnotidt); // 마지막 데이타의 종료일자가 '99991231'일 경우 퇴원 통보일시로 변경
  2951. ds_send_insu.setColumn(0, "orgtodd", "99991231"); // 종료일자만 체크
  2952. } else {
  2953. ds_send_insu.setColumn(0, "todd", ds_grd_insuhistory.getColumn(i,"todd"));
  2954. ds_send_insu.setColumn(0, "orgtodd", ds_grd_insuhistory.getColumn(i,"todd"));
  2955. }
  2956. var oParam = {};
  2957. oParam.id = "TXPIJ00306";
  2958. oParam.service = "inordamtmngtapp.InHospUncoAmt";
  2959. oParam.method = "reqInsOutCalcIss";
  2960. oParam.inds = "insulist=ds_send_insu";
  2961. oParam.outds = "";
  2962. oParam.async = true;
  2963. //oParam.callback = "cf_TXPIJ00306";
  2964. tranf_submit(oParam);
  2965. }
  2966. }
  2967. function group2_ipt_diagfrom_onkeyup(obj:Edit, e:KeyEventInfo)
  2968. {
  2969. if (e.keycode == 13) { // Enter 입력 시에
  2970. if (obj.value.length > 1) { // 2글자 이상이면
  2971. fGetInBfJudgTrgtManList();
  2972. }
  2973. }
  2974. }
  2975. function group2_ipt_diagto_onkeyup(obj:Edit, e:KeyEventInfo)
  2976. {
  2977. if (e.keycode == 13) { // Enter 입력 시에
  2978. if (obj.value.length > 1) { // 2글자 이상이면
  2979. fGetInBfJudgTrgtManList();
  2980. }
  2981. }
  2982. }
  2983. function group2_Button00_onclick(obj:Button, e:ClickEventInfo)
  2984. {
  2985. ds_hidden_sppiz00400.clearData();
  2986. ds_hidden_sppiz00400.addRow();
  2987. ds_hidden_sppiz00400.setColumn(0,"basedd", gv_curdd);
  2988. ds_hidden_sppiz00400.setColumn(0,"diagcd", group2.ipt_diagfrom.value);
  2989. ds_hidden_sppiz00400.setColumn(0,"diagnm", "");
  2990. ds_hidden_sppiz00400.setColumn(0,"selectedrdodiagkind", "3"); // 사용자가 직접검색하여 입력 할수 있도록 임의의 값(3)을 넣어줌
  2991. var objArg = new Object();
  2992. objArg.arg_ds_hidden_sppiz00400 = ds_hidden_sppiz00400;
  2993. frmf_modal("SPPIZ00400","SPPIZ00400",objArg,"","","","","","","","","","M");
  2994. }
  2995. function group2_Button01_onclick(obj:Button, e:ClickEventInfo)
  2996. {
  2997. ds_hidden_sppiz00400.clearData();
  2998. ds_hidden_sppiz00400.addRow();
  2999. ds_hidden_sppiz00400.setColumn(0,"basedd", gv_curdd);
  3000. ds_hidden_sppiz00400.setColumn(0,"diagcd", group2.ipt_diagto.value);
  3001. ds_hidden_sppiz00400.setColumn(0,"diagnm", "");
  3002. ds_hidden_sppiz00400.setColumn(0,"selectedrdodiagkind", "3"); // 사용자가 직접검색하여 입력 할수 있도록 임의의 값(3)을 넣어줌
  3003. var objArg = new Object();
  3004. objArg.arg_ds_hidden_sppiz00400 = ds_hidden_sppiz00400;
  3005. frmf_modal("SPPIZ00400","SPPIZ00400",objArg,"","","","","","","","","","M");
  3006. }
  3007. function btn_mdlcalcend_onclick(obj:Button, e:ClickEventInfo)
  3008. {
  3009. var inday = group2.ipt_indays.value;
  3010. if(utlf_isNull(inday)) {
  3011. sysf_messageBox("재원일수 기준을","C001");
  3012. return;
  3013. }
  3014. var oParam = {};
  3015. oParam.id = "TRPIJ00205";
  3016. oParam.service = "bfjudgapp.InHospJudgTrgtMan";
  3017. oParam.method = "reqGetInbfJudgTrgtManMdlCalcEndList";
  3018. oParam.inds = "req=ds_send";
  3019. oParam.outds = "ds_grd_inptmast=gridinpt";
  3020. oParam.async = false;
  3021. oParam.callback = "cf_TRPIJ00201";
  3022. tranf_submit(oParam);
  3023. ds_hidden.setColumn(0,"selectedRow", ""); // 선택된 row 값 기억 (심사화면에서 저장,심사완료, 마감취소 등 이벤트 발생시 조회화면에도 반영시켜주기 위함)
  3024. }
  3025. function btn_srchindsch_onclick(obj:Button, e:ClickEventInfo)
  3026. {
  3027. fOpenSMPMI00700("1"
  3028. , "1"
  3029. , ""
  3030. , gv_curdd
  3031. , gv_curdd
  3032. , gv_instcd
  3033. ,""
  3034. ,""
  3035. ,""
  3036. ,""
  3037. ,""
  3038. ,""
  3039. ,""
  3040. );
  3041. }
  3042. function btn_isolationbed_onclick(obj:Button, e:ClickEventInfo)
  3043. {
  3044. fRefrhVar(ds_grd_inptmast);
  3045. fOpenSMASB02100(gv_pid);
  3046. }
  3047. function btn_srchopshe_onclick(obj:Button, e:ClickEventInfo)
  3048. {
  3049. fRefrhVar(ds_grd_inptmast);
  3050. fOpenSMMMO05100(gv_fromdd, gv_todd, gv_hngnm, gv_pid, "", "", "", "I", "00", "-", "", "", "I", "", "");
  3051. }
  3052. function btn_dschnotiyn_onclick(obj:Button, e:ClickEventInfo)
  3053. {
  3054. fRefrhVar(ds_grd_inptmast);
  3055. if(!utlf_isNull(gv_pid)){
  3056. frmf_open("SPPIJ00800","SPPIJ00800",{spid:gv_pid},"","","","","","","","","","M");
  3057. }
  3058. }
  3059. function chk_readonly_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  3060. {
  3061. btn_dschjudgprcscncl.enable = false;
  3062. btn_dschclosecancel.enable = false;
  3063. btn_recalc.enable = false;
  3064. }
  3065. function cpt_rcpt_onclick(obj:Static, e:ClickEventInfo)
  3066. {
  3067. }
  3068. function caption27_onclick(obj:Static, e:ClickEventInfo)
  3069. {
  3070. }
  3071. function chk_rcpt_onclick(obj:CheckBox, e:ClickEventInfo)
  3072. {
  3073. if (obj.value == 1) {
  3074. grp_intdtry.visible = true;
  3075. grp_intdtry.position = "absolute 2 "+ (chk_rcpt.position.top - 104) +" 291 " + chk_rcpt.position.top ;
  3076. } else {
  3077. grp_intdtry.visible = false;
  3078. }
  3079. }
  3080. function ds_send_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  3081. {
  3082. if( e.columnid == "showone" ){
  3083. obj.setColumn(e.row, e.columnid, e.newvalue == "N" || e.newvalue == null ? null : "Y" );
  3084. }
  3085. if( e.columnid == "sixall" ){
  3086. obj.setColumn(e.row, e.columnid, e.newvalue == "A" ? "A" : "" );
  3087. }
  3088. }
  3089. function setGrdRowColorExpr(currow, col){
  3090. var spcljudgflag = ds_grd_inptmast.getColumn(currow, "spcljudgflag");
  3091. var probjudgflag = ds_grd_inptmast.getColumn(currow, "probjudgflag");
  3092. var dschjudgprcsstat = ds_grd_inptmast.getColumn(currow, "dschjudgprcsstat");
  3093. var dschdclrtyn = ds_grd_inptmast.getColumn(currow, "dschdclrtyn");
  3094. var insukind = ds_grd_inptmast.getColumn(currow, "insukind");
  3095. var grd_color = "";
  3096. if (spcljudgflag == "A"){
  3097. grd_color = "#ffe79d";
  3098. }
  3099. if(probjudgflag == "G" ){
  3100. grd_color = "#7BE6B7";
  3101. }else if(probjudgflag == "R"){
  3102. grd_color = "#fcd2c1";
  3103. }else if(spcljudgflag != "A") {
  3104. // // var chk_digit = i % 2; //2로 나눠서 나머지가 0 이면 짝수줄 이란 소리
  3105. // // if(chk_digit != 0){
  3106. // // grd_inptmast.rowStyle(i, "data", "background-color") = "#ffffff"; //짝수는 연한 회식
  3107. // // }else{
  3108. // // grd_inptmast.rowStyle(i, "data", "background-color") = "#f4f4f4"; //홀수는 그냥 힌색
  3109. // // }
  3110. }
  3111. if(dschjudgprcsstat == "G" && dschdclrtyn == "Y" && insukind != "71" && col == grd_inptmast.getBindCellIndex("body", "lastjudgdt") ){
  3112. grd_color = "#ffffcc";
  3113. }
  3114. return grd_color;
  3115. }
  3116. function group2_cmb_totordamt_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  3117. {
  3118. }
  3119. function grd_inptmast_onmousemove(obj:Grid, e:GridMouseEventInfo)
  3120. {
  3121. lf_tooltipSet(obj, e.row, e.cell);
  3122. }
  3123. function lf_tooltipSet(grdObj, currow, curcell)
  3124. {
  3125. if(currow > -1 )
  3126. {
  3127. grdObj.tooltiptext = grdObj.getCellText(currow, curcell);
  3128. }
  3129. else
  3130. {
  3131. grdObj.tooltiptext = "";
  3132. }
  3133. }
  3134. function grd_inptmast_onheadclick(obj:Grid, e:GridClickEventInfo)
  3135. {
  3136. }
  3137. function btn_EnvSetup00_onclick(obj:Button, e:ClickEventInfo)
  3138. {
  3139. var msg = sysf_messageBox("환경저장 데이터가 모두 삭제 됩니다.","Q003");
  3140. if (msg == 6) { // 6세미만 요율을 적용한다.
  3141. grdf_DelUuee(grd_inptmast, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  3142. grd_inptmast.formatid = "default";
  3143. grdf_DelUuee(group2.cmb_judgendyn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  3144. grdf_DelUuee(group2.cmb_judgmdlid, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  3145. grdf_DelUuee(group2.chk_sixyn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  3146. grdf_DelUuee(group2.chk_sixyn, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  3147. grdf_DelUuee(group2.chk_judgstat, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  3148. grdf_DelUuee(group2.cmb_insukind, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  3149. grdf_DelUuee(group2.opt_insukind, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  3150. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  3151. }
  3152. }
  3153. function cf_TRPIJ00202(sSvcId, nErrorCode, sErrorMsg) {
  3154. if(nErrorCode < 0) return;
  3155. var userid = sysf_getUserId();
  3156. var usernm = sysf_getUserName();
  3157. var frowCnt = ds_init_cmb_judgmdlid.findRow("userid",userid);
  3158. if (frowCnt < 0) {
  3159. var arow = ds_init_cmb_judgmdlid.addRow()
  3160. ds_init_cmb_judgmdlid.setColumn(arow, "userid",userid);
  3161. ds_init_cmb_judgmdlid.setColumn(arow, "usernm",usernm);
  3162. }
  3163. }]]></Script>
  3164. </Form>
  3165. </FDL>