123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302 |
- <?xml version="1.0" encoding="utf-8"?>
- <FDL version="1.5">
- <TypeDefinition url="..\..\..\default_typedef.xml"/>
- <Form id="SMMMR07000" position="absolute 0 0 595 684" titletext="Untitle" oninit="SMMMR07000_oninit" onload="SMMMR07000_onload">
- <Layouts>
- <Layout>
- <Div position="absolute 0 0 595 684" id="grup_base" anchor="all" scrollbars="autovert">
- <Layouts>
- <Layout>
- <Shape position="absolute 0 253 593 259" linetype="horizontal" id="line1" class="line_2" anchor="left top right"/>
- <Shape position="absolute 0 571 593 577" linetype="horizontal" id="line2" class="line_2" anchor="left right bottom"/>
- <Shape position="absolute 0 64 593 70" linetype="horizontal" id="line3" class="line_2" anchor="left top right"/>
- <Shape position="absolute 0 465 593 471" linetype="horizontal" id="line8" class="line_2" anchor="left right bottom"/>
- <Shape position="absolute 0 306 593 312" linetype="horizontal" id="line5" class="line_2" anchor="left top right"/>
- <Shape position="absolute 0 518 593 524" linetype="horizontal" id="line6" class="line_2" anchor="left right bottom"/>
- <Shape position="absolute 0 132 593 138" linetype="horizontal" id="line4" class="line_2" anchor="left top right"/>
- <Shape position="absolute 0 200 593 206" linetype="horizontal" id="line7" class="line_2" anchor="left top right"/>
- <Shape position="absolute 0 629 593 635" linetype="horizontal" id="line9" class="line_2" anchor="left right bottom"/>
- <Shape id="line00" class="line_2" position="absolute 0 359 593 365" anchor="left top right"/>
- <Shape id="line10" class="line_2" position="absolute 0 412 593 418" anchor="left top right"/>
- <Static text="치료과정 " position="absolute 0 416 65 466" align="align:center top;" id="lbl_0001052001" class="cell_1" style="font:Dotum,9,bold;" anchor="left top bottom" onclick="Static_onclick"/>
- <Static text="진단명 " position="absolute 0 0 65 65" align="align:center middle;" id="lbl_0001013001" class="cell_1" style="font:Dotum,9,bold;" anchor="left top" onclick="Static_onclick"/>
- <Static text="현병력 " position="absolute 0 204 65 254" align="align:center top;" id="lbl_0001173001" class="cell_1" style="font:Dotum,9,bold;" anchor="left top" onclick="Static_onclick"/>
- <Static text="과거력 " position="absolute 0 257 65 307" align="align:center top;" id="lbl_0000098001" class="cell_1" style="font:Dotum,9,bold;" anchor="left top" onclick="Static_onclick"/>
- <Static id="lbl_0000079001" text="계통문진 " onclick="Static_onclick" class="cell_1" position="absolute 0 310 65 360" anchor="left top" style="font:Dotum,9,bold;"/>
- <Static id="lbl_0000570001" text="신체검진 " onclick="Static_onclick" class="cell_1" position="absolute 0 363 65 413" anchor="left top" style="font:Dotum,9,bold;"/>
- <Static text="검사결과 " position="absolute 0 469 65 519" align="align:center top;" id="lbl_0000053001" class="cell_1" style="font:Dotum,9,bold;" anchor="left bottom" onclick="Static_onclick"/>
- <Static text="퇴원처방 " position="absolute 0 522 65 572" align="align:center middle;" id="lbl_0001106001" class="cell_1" style="font:Dotum,9,bold;" anchor="left bottom" onclick="Static_onclick"/>
- <Static text="추후계획 " position="absolute 0 575 65 630" align="align:center top;" id="lbl_0000080001" class="cell_1" style="font:Dotum,9,bold;" anchor="left bottom" onclick="Static_onclick"/>
- <Static text="수술 및 처치명 " position="absolute 0 68 65 133" align="align:center middle;" id="lbl_0000933001" class="cell_1" style="font:Dotum,9,bold;" anchor="left top" onclick="Static_onclick"/>
- <Static text="주호소 " position="absolute 0 136 65 201" align="align:center middle;" id="lbl_0000931001" class="cell_1" style="font:Dotum,9,bold;" anchor="left top" onclick="Static_onclick"/>
- <Static text="기타 " position="absolute 0 633 65 684" align="align:center middle;" id="lbl_0000146001" class="cell_1" style="font:Dotum,9,bold;" anchor="left bottom"/>
- <Button position="absolute 22 232 42 252" id="btn_comn_0001173001" class="btn_list" visible="false" text="" tooltiptext="상용구관리 열기"/>
- <Button position="absolute 22 285 42 305" id="btn_comn_0000098001" class="btn_list" visible="false" text="" tooltiptext="상용구관리 열기"/>
- <Button position="absolute 22 497 42 517" id="btn_comn_0000053001" class="btn_list" visible="false" text="" tooltiptext="상용구관리 열기" anchor="left bottom"/>
- <Button position="absolute 43 550 63 570" id="btn_comn_0001106001" class="btn_list" visible="false" text="" tooltiptext="상용구관리 열기" anchor="left bottom"/>
- <Button position="absolute 43 607 63 627" id="btn_comn_0000080001" class="btn_list" visible="false" text="" tooltiptext="상용구관리 열기" anchor="left bottom"/>
- <Button position="absolute 22 444 42 464" id="btn_comn_0001052001" class="btn_list" visible="false" text="" tooltiptext="상용구관리 열기" anchor="left bottom"/>
- <Div position="absolute 67 68 593 133" id="ivw_0000933001" class="div_DA_cell" anchor="left top right"/>
- <Div position="absolute 67 0 593 65" id="ivw_0001013001" class="div_DA_cell" anchor="left top right"/>
- <Div position="absolute 67 204 593 254" id="ivw_0001173001" visible="false" class="div_DA_cell" anchor="left top right"/>
- <Div position="absolute 67 257 593 307" id="ivw_0000098001" visible="false" class="div_DA_cell" anchor="left top right"/>
- <Div position="absolute 67 416 593 466" id="ivw_0001052001" visible="false" class="div_DA_cell" anchor="all"/>
- <Div position="absolute 67 469 593 519" id="ivw_0000053001" visible="false" class="div_DA_cell" anchor="left right bottom"/>
- <Div position="absolute 67 522 593 572" id="ivw_0001106001" visible="false" class="div_DA_cell" anchor="left right bottom"/>
- <Div position="absolute 67 575 593 630" id="ivw_0000080001" visible="false" class="div_DA_cell" anchor="left right bottom"/>
- <Div position="absolute 67 136 593 201" id="ivw_0000931001" class="div_DA_cell" anchor="left top right"/>
- <Div id="ivw_0000079001" anchor="left top right" class="div_DA_cell" visible="false" position="absolute 67 310 593 360"/>
- <Div id="ivw_0000570001" anchor="left top right" class="div_DA_cell" visible="false" position="absolute 67 363 593 413"/>
- <Static position="absolute 67 204 593 254" align="align:center middle;" id="cap_0001173001" class="sta_DA_Imgcaption" anchor="left top right"/>
- <Static position="absolute 67 257 593 307" align="align:center middle;" id="cap_0000098001" class="sta_DA_Imgcaption" anchor="left top right"/>
- <Static position="absolute 67 416 593 466" align="align:center middle;" id="cap_0001052001" class="sta_DA_Imgcaption" anchor="all"/>
- <Static position="absolute 67 469 593 519" align="align:center middle;" id="cap_0000053001" class="sta_DA_Imgcaption" anchor="left right bottom"/>
- <Static position="absolute 67 522 593 572" align="align:center middle;" id="cap_0001106001" class="sta_DA_Imgcaption" anchor="left right bottom"/>
- <Static position="absolute 67 575 593 630" align="align:center middle;" id="cap_0000080001" class="sta_DA_Imgcaption" anchor="left right bottom"/>
- <Static align="align:center middle;" id="cap_0000079001" class="sta_DA_Imgcaption" position="absolute 67 310 593 360" anchor="left top right"/>
- <Static align="align:center middle;" id="cap_0000570001" class="sta_DA_Imgcaption" position="absolute 67 363 593 413" anchor="left top right"/>
- <TextArea position="absolute 67 416 593 466" id="tar_0001052001" ontextchanged="fComnFormMtxChanged" anchor="all"/>
- <TextArea position="absolute 67 204 593 254" id="tar_0001173001" ontextchanged="fComnFormMtxChanged" anchor="left top right"/>
- <TextArea position="absolute 67 257 593 307" id="tar_0000098001" ontextchanged="fComnFormMtxChanged" anchor="left top right"/>
- <TextArea position="absolute 67 469 593 519" id="tar_0000053001" ontextchanged="fComnFormMtxChanged" anchor="left right bottom"/>
- <TextArea position="absolute 67 575 593 630" id="tar_0000080001" ontextchanged="fComnFormMtxChanged" anchor="left right bottom"/>
- <TextArea position="absolute 67 522 593 572" id="tar_0001106001" ontextchanged="fComnFormMtxChanged" anchor="left right bottom"/>
- <TextArea position="absolute 67 0 593 65" id="tar_0001013001" ontextchanged="fComnFormMtxChanged" anchor="left top right"/>
- <TextArea position="absolute 67 68 593 133" id="tar_0000933001" ontextchanged="fComnFormMtxChanged" anchor="left top right"/>
- <TextArea position="absolute 67 136 593 201" id="tar_0000931001" ontextchanged="fComnFormMtxChanged" anchor="left top right"/>
- <TextArea id="tar_0000079001" ontextchanged="fComnFormMtxChanged" position="absolute 67 310 593 360" anchor="left top right"/>
- <TextArea id="tar_0000570001" ontextchanged="fComnFormMtxChanged" position="absolute 67 363 593 413" anchor="left top right"/>
- <Button position="absolute 5 608 47 627" id="btn_resv_0000080001" class="btn2" text="예약" tooltiptext="예약정보가져오기" anchor="left bottom"/>
- <Button position="absolute 5 551 47 570" id="btn_outprcp_0001106001" class="btn2" text="처방" tooltiptext="퇴원처방가져오기" anchor="left bottom"/>
- <Button position="absolute 43 497 63 517" id="btn_imge_0000053001" class="btn_picture" text="" tooltiptext="이미지편집창 열기" anchor="left bottom"/>
- <Button position="absolute 43 232 63 252" id="btn_imge_0001173001" class="btn_picture" text="" tooltiptext="이미지편집창 열기"/>
- <Button position="absolute 43 444 63 464" id="btn_imge_0001052001" class="btn_picture" text="" tooltiptext="이미지편집창 열기" anchor="left bottom"/>
- <Static id="caption30" text="치료결과" class="cell_1" position="absolute 67 633 142 656" anchor="left bottom"/>
- <Shape id="line19" class="line_2" position="absolute 67 655 593 661" anchor="left right bottom"/>
- <Static id="caption29" text="생검여부" class="cell_1" position="absolute 67 659 142 682" anchor="left bottom"/>
- <Combo id="cbo_outtype" taborder="6" innerdataset="ds_init_cbo_outtype" codecolumn="valcd" datacolumn="valitemnm" onitemchanged="fRadioYN" class="combo_default" position="absolute 406 635 591 654" anchor="left right bottom" degnitemno="12" degnitemlevlcd="0000146.0001107"/>
- <Radio id="rdo_sang" taborder="7" columncount="2" rowcount="1" innerdataset="ds_init_rdo_sang" codecolumn="valcd" datacolumn="valitemnm" onrbuttondown="fCnclMicroTest" onitemchanged="fRadioYN" position="absolute 144 661 234 681" anchor="left bottom" degnitemno="14" degnitemlevlcd="0000146.0008331"/>
- <Static id="caption6" text="퇴원형태" class="cell_1" position="absolute 329 633 404 656" anchor="left bottom"/>
- <Combo id="cbo_carerslt" taborder="8" innerdataset="ds_init_cbo_carerslt" codecolumn="valcd" datacolumn="valitemnm" onitemchanged="fRadioYN" class="combo_default" position="absolute 145 635 326 654" anchor="left bottom" degnitemno="11" degnitemlevlcd="0000146.0001048"/>
- <TextArea id="textarea8" taborder="9" scrollbars="autovert" usecontextmenu="false" ontextchanged="lf_setrecitem" position="absolute 237 660 591 681" anchor="left right bottom" style="padding:3 5 3 5;" degnitemno="14" degnitemlevlcd="0000146.0008331"/>
- </Layout>
- </Layouts>
- </Div>
- </Layout>
- </Layouts>
- <Objects>
- <Dataset id="ds_init_cbo_outtype" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="valitemnm" type="STRING"/>
- <Column id="valcd" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_rdo_sang" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="valitemnm" type="STRING"/>
- <Column id="valcd" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_cbo_carerslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="valitemnm" type="STRING"/>
- <Column id="valcd" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_cbo_0000098001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="formnminfo" type="STRING"/>
- <Column id="formdegnseq" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_cbo_0001173001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="formnminfo" type="STRING"/>
- <Column id="formdegnseq" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_cbo_0001052001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="formnminfo" type="STRING"/>
- <Column id="formdegnseq" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_cbo_0000053001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="formnminfo" type="STRING"/>
- <Column id="formdegnseq" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_cbo_0000080001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="formnminfo" type="STRING"/>
- <Column id="formdegnseq" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_data_fmyrecItemRef" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="fstlevlitemcd" type="STRING" size="256"/>
- <Column id="formcd" type="STRING" size="256"/>
- <Column id="reccnts" type="STRING" size="256"/>
- <Column id="recimge" type="STRING" size="256"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_temp_unitrecitem" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="instcd" type="STRING" size="256"/>
- <Column id="rechistseq" type="STRING" size="256"/>
- <Column id="recitemno" type="STRING" size="256"/>
- <Column id="fstlevlitemcd" type="STRING" size="256"/>
- <Column id="formcd" type="STRING" size="256"/>
- <Column id="formdegnseq" type="STRING" size="256"/>
- <Column id="degnitemno" type="STRING" size="256"/>
- <Column id="degnitemcd" type="STRING" size="256"/>
- <Column id="degnitemkind" type="STRING" size="256"/>
- <Column id="degnitemlevlno" type="STRING" size="256"/>
- <Column id="degnitemnm" type="STRING" size="256"/>
- <Column id="degnitemlevlcd" type="STRING" size="256"/>
- <Column id="rectermcd" type="STRING" size="256"/>
- <Column id="rectermnm" type="STRING" size="256"/>
- <Column id="recrefcd" type="STRING" size="256"/>
- <Column id="recitemnm" type="STRING" size="256"/>
- <Column id="reccnts" type="STRING" size="256"/>
- <Column id="unitnm" type="STRING" size="256"/>
- <Column id="recimge" type="BLOB"/>
- <Column id="srcimge" type="BLOB"/>
- <Column id="rowno" type="STRING" size="256"/>
- <Column id="colno" type="STRING" size="256"/>
- <Column id="supdegnitemno" type="STRING" size="256"/>
- <Column id="extdegnitemlevlcd" type="STRING" size="256"/>
- <Column id="rectermflag" type="STRING" size="256"/>
- <Column id="degnunitcd" type="STRING" size="256"/>
- </ColumnInfo>
- </Dataset>
- <Dataset firefirstcount="0" firenextcount="0" id="ds_data_recitem">
- <ColumnInfo>
- <Column id="instcd" type="STRING" size="256"/>
- <Column id="rechistseq" type="STRING" size="256"/>
- <Column id="recitemno" type="STRING" size="256"/>
- <Column id="fstlevlitemcd" type="STRING" size="256"/>
- <Column id="formcd" type="STRING" size="256"/>
- <Column id="formdegnseq" type="STRING" size="256"/>
- <Column id="degnitemno" type="STRING" size="256"/>
- <Column id="degnitemcd" type="STRING" size="256"/>
- <Column id="degnitemkind" type="STRING" size="256"/>
- <Column id="degnitemlevlno" type="STRING" size="256"/>
- <Column id="degnitemnm" type="STRING" size="256"/>
- <Column id="degnitemlevlcd" type="STRING" size="256"/>
- <Column id="rectermcd" type="STRING" size="256"/>
- <Column id="rectermnm" type="STRING" size="256"/>
- <Column id="recrefcd" type="STRING" size="256"/>
- <Column id="recitemnm" type="STRING" size="256"/>
- <Column id="reccnts" type="STRING" size="256"/>
- <Column id="unitnm" type="STRING" size="256"/>
- <Column id="recimge" type="BLOB"/>
- <Column id="srcimge" type="BLOB"/>
- <Column id="rowno" type="STRING" size="256"/>
- <Column id="colno" type="STRING" size="256"/>
- <Column id="supdegnitemno" type="STRING" size="256"/>
- <Column id="extdegnitemlevlcd" type="STRING" size="256"/>
- <Column id="rectermflag" type="STRING" size="256"/>
- <Column id="degnunitcd" type="STRING" size="256"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_send_extninfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="infoflag" type="STRING" size="256" sumtext=""/>
- <Column id="formrecseq" type="BIGDECIMAL" size="256" sumtext=""/>
- <!-- 수술정보 -->
- <Column id="oprsrvno" type="STRING" size="256" sumtext=""/>
- <Column id="opendyn" type="STRING" size="256" sumtext=""/>
- <Column id="skinprepyn" type="STRING" size="256" sumtext=""/>
- <!-- 기록연동 -->
- <Column id="pid" type="STRING" size="256" sumtext=""/>
- <Column id="orddd" type="STRING" size="256" sumtext=""/>
- <Column id="cretno" type="STRING" size="256" sumtext=""/>
- <Column id="fromsrcformcd" type="STRING" size="256" sumtext=""/>
- <Column id="toformcd" type="STRING" size="256" sumtext=""/>
- <!-- 수술리스트 -->
- <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
- <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일자"/>
- <!-- 의사리스트 -->
- <Column id="standd" type="STRING" size="256" sumtext="기준일"/>
- <Column id="deptcd" type="STRING" size="256" sumtext="진료과"/>
- <Column id="jobkindcd" type="STRING" size="256" sumtext="직종"/>
- <!-- text기록 -->
- <Column id="fstlevlitembasecds" type="STRING" size="256" sumtext=""/>
- <Column id="srcformcd" type="STRING" size="256" sumtext=""/>
- <Column id="formrecdd" type="STRING" size="256" sumtext=""/>
- <!-- 2010.01.25 dhkim 추가 - 마취과의사, 수술방리스트 -->
- <Column id="anstdeptcd" type="STRING" size="256" sumtext="마취과의사리스트조회param"/>
- <Column id="opdd" type="STRING" size="256" sumtext="수술방리스트조회param"/>
- <Column id="recdataflag" type="STRING" size="256" sumtext=""/>
- <Column id="formrecdeptcd" type="STRING" size="256" sumtext=""/>
- <Column id="condflag" type="STRING" size="256"/>
- <Column id="orddeptcd" type="STRING" size="256" sumtext="환자과"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_resultinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="infoflag" type="STRING" size="256" sumtext="수행된 infoflag"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_staffauthinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="authyn" type="STRING" size="256" sumtext="staff-sing권한여부"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_oprinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="oprsrvno" type="STRING" size="256" sumtext=""/>
- <Column id="opcnfmdd" type="STRING" size="256" sumtext="수술확정일자"/>
- <!-- 2010.01.11 dhkim - 수술시작시간추가 -->
- <Column id="opcnfmhm" type="STRING" size="256" sumtext="수술시작시간"/>
- <Column id="perfdeptcd" type="STRING" size="256" sumtext="집도의 부서"/>
- <Column id="perfdrid" type="STRING" size="256" sumtext="집도의 id"/>
- <Column id="perfdrnm" type="STRING" size="256" sumtext="집도의 이름"/>
- <Column id="assdrid" type="STRING" size="256" sumtext="보조의 id"/>
- <Column id="assdrnm" type="STRING" size="256" sumtext="보조의 이름"/>
- <Column id="oproomcd" type="STRING" size="256" sumtext="수술방"/>
- <Column id="anstdrid" type="STRING" size="256" sumtext="마취의 id"/>
- <Column id="anstdrnm" type="STRING" size="256" sumtext="마위의 이름"/>
- <Column id="anstmthdcd" type="STRING" size="256" sumtext="마취방법(주)"/>
- <Column id="anstmthdnm" type="STRING" size="256" sumtext="마취방법(주)"/>
- <Column id="anstmthdcdsub" type="STRING" size="256" sumtext="마취방법(부)"/>
- <Column id="anstmthdcdsubnm" type="STRING" size="256" sumtext="마취방법(부)"/>
- <Column id="skinprepcc" type="STRING" size="256" sumtext="피부준비"/>
- <Column id="perfdrnm2" type="STRING" size="256" sumtext="집도의2 이름"/>
- <Column id="perfdrnm3" type="STRING" size="256" sumtext="집도의3 이름"/>
- <Column id="assdrnm2" type="STRING" size="256" sumtext="보조의2 이름"/>
- <Column id="assdrnm3" type="STRING" size="256" sumtext="보조의3 이름"/>
- <Column id="assdrnm4" type="STRING" size="256" sumtext="보조의4 이름"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_oplistinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="opinfo" type="STRING" size="256" sumtext="수술정보"/>
- <Column id="oprsrvno" type="STRING" size="256" sumtext="수술예약번호"/>
- <Column id="deptcd" type="STRING" size="256" sumtext="집도과코드"/>
- <Column id="depthngnm" type="STRING" size="256" sumtext="집도과명"/>
- <Column id="opcnfmdd" type="STRING" size="256" sumtext="수술예약일자"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_recitem" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
- <Column id="rechistseq" type="BIGDECIMAL" size="256" sumtext="기록이력순번"/>
- <Column id="recitemno" type="INT" size="256" sumtext="기록항목번호"/>
- <Column id="fstlevlitemcd" type="STRING" size="256" sumtext="1레벨항목코드"/>
- <Column id="formcd" type="STRING" size="256" sumtext="서식코드"/>
- <Column id="formdegnseq" type="BIGDECIMAL" size="256" sumtext="서식디자인순번"/>
- <Column id="degnitemno" type="INT" size="256" sumtext="디자인항목번호"/>
- <Column id="degnitemcd" type="STRING" size="256" sumtext="디자인항목코드"/>
- <Column id="degnitemkind" type="STRING" size="256" sumtext="디자인항목유형"/>
- <Column id="degnitemlevlno" type="STRING" size="256" sumtext="디자인항목레벨번호"/>
- <Column id="degnitemnm" type="STRING" size="256" sumtext="디자인항목명"/>
- <Column id="degnitemlevlcd" type="STRING" size="256" sumtext="디자인항목레벨코드"/>
- <Column id="rectermcd" type="STRING" size="256" sumtext="기록용어코드"/>
- <Column id="rectermnm" type="STRING" size="256" sumtext="기록용어이름"/>
- <Column id="recrefcd" type="STRING" size="256" sumtext="수술, 진단, 주호소 코드"/>
- <Column id="recitemnm" type="STRING" size="256" sumtext="수술, 진단, 주호소 명"/>
- <Column id="reccnts" type="STRING" size="256" sumtext="기록내용"/>
- <Column id="unitnm" type="STRING" size="256" sumtext="단위명"/>
- <Column id="recimge" type="BLOB" size="0" encript="base64" sumtext="기록이미지"/>
- <Column id="srcimge" type="BLOB" size="0" encript="base64" sumtext="원본이미지"/>
- <Column id="rowno" type="STRING" size="256" sumtext="그리드데이타 행번호"/>
- <Column id="colno" type="STRING" size="256" sumtext="그리드데이타 열번호"/>
- <Column id="supdegnitemno" type="INT" size="256" sumtext="상위디자인항목번호"/>
- <Column id="extdegnitemlevlcd" type="STRING" size="256" sumtext="확장디자인항목레벨코드"/>
- <Column id="rectermflag" type="STRING" size="256" sumtext="기록용어코드구분"/>
- <Column id="degnunitcd" type="STRING" size="256" sumtext="단위코드"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_drlistinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="userid" type="STRING" size="256" sumtext="사용자 id"/>
- <Column id="usernm" type="STRING" size="256" sumtext="사용자명"/>
- <Column id="mpphonno" type="STRING" size="256" sumtext="핸드폰번호"/>
- <Column id="refseq" type="STRING" size="256" sumtext="특진의여부"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_diagcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="diagkindcd" type="STRING" size="256" sumtext="주/부"/>
- <Column id="diagkindcdflag" type="STRING" size="256" sumtext="R/O"/>
- <Column id="icd10cd" type="STRING" size="256" sumtext="진단코드"/>
- <Column id="icd10cd" type="STRING" size="256" sumtext="진단코드"/>
- <Column id="diagengnm" type="STRING" size="256" sumtext="진단영문명"/>
- <Column id="termhngnm" type="STRING" size="256" sumtext="진단한글명"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_selectoplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="opcd" type="STRING" size="256" sumtext="수술코드"/>
- <Column id="opengnm" type="STRING" size="256" sumtext="수술명"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_dscinoutinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="nurin" type="STRING" size="256" sumtext="dsc입실시간"/>
- <Column id="nurout" type="STRING" size="256" sumtext="dsc퇴실시간"/>
- <Column id="oprin" type="STRING" size="256" sumtext="or도착시간"/>
- <Column id="oprout" type="STRING" size="256" sumtext="or퇴실시간"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_rectextinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="fstlevlitembasecd" type="STRING" size="256" sumtext=""/>
- <Column id="viewcnts" type="STRING" size="256" sumtext=""/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_anstdrlistinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="userid" type="STRING" size="256" sumtext="사용자id"/>
- <Column id="usernm" type="STRING" size="256" sumtext="사용자명"/>
- <Column id="mpphonno" type="STRING" size="256" sumtext="핸드폰번호"/>
- <Column id="refseq" type="STRING" size="256" sumtext="특진의여부"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_oproomlistinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="oproomcd" type="STRING" size="256" sumtext="수술방코드"/>
- <Column id="oproomnm" type="STRING" size="256" sumtext="수술방명"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_recseqinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="formrecseq" type="STRING" size="256" sumtext=""/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_extninfo_etcinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="col0" type="STRING" size="256" sumtext=""/>
- <Column id="col1" type="STRING" size="256" sumtext=""/>
- <Column id="col2" type="STRING" size="256" sumtext=""/>
- <Column id="col3" type="STRING" size="256" sumtext=""/>
- <Column id="col4" type="STRING" size="256" sumtext=""/>
- <Column id="col5" type="STRING" size="256" sumtext=""/>
- <Column id="col6" type="STRING" size="256" sumtext=""/>
- <Column id="col7" type="STRING" size="256" sumtext=""/>
- <Column id="col8" type="STRING" size="256" sumtext=""/>
- <Column id="col9" type="STRING" size="256" sumtext=""/>
- </ColumnInfo>
- </Dataset>
- </Objects>
- <Script type="xscript4.0"><![CDATA[/***************************************************************************************
- * System Name :
- * Job Name :
- * Creator :
- * Make Date : 2015-04-13
- * Description :
- *---------------------------------------------------------------------------------------
- * Modify Date Modifier Modify Description
- *---------------------------------------------------------------------------------------
- * 2015-04-13 Live Converter TF->XP
- *
- *---------------------------------------------------------------------------------------
- ****************************************************************************************/
- //=======================================================================================
- // Lib Include
- //---------------------------------------------------------------------------------------
- include "com_commonxp::comm_main.xjs"
- include "emr_commonxp::EMRCommon.xjs"
- include "emr_prcpmngtxp::MMO001.xjs"
- include "emr_medirecxp::MMRCommon.xjs"
- include "emr_medirecxp::MMRBind.xjs"
- //=======================================================================================
- // Global Form Variable
- //---------------------------------------------------------------------------------------
- var arErrorCode = new HashArray();
- var gItemCds = new Array("0001013001" //진단명
- , "0000933001" //수술및처치명
- , "0000931001" //주호소
- , "0001173001" //현병력
- , "0000098001" //과거력
- , "0000079001" //계통문진
- , "0000570001" //신체검진
- , "0001052001" //치료과정
- , "0000053001" //검사결과
- , "0001106001" //퇴원처방
- , "0000080001" //추후계획
- );
- var gItemCdsTextArea = new Array("0001173001", "0000098001", "0000079001", "0000570001", "0001052001", "0000053001", "0001106001", "0000080001");
- var gItemImgCds = new Array("0001173001", "0001052001", "0000053001");
- var arrItemCds = new Array("0001013001"
- , "0000933001"
- , "0000931001"
- , "0001173001"
- , "0000098001"
- , "0000079001" //계통문진
- , "0000570001" //신체검진
- , "0001052001"
- , "0000053001"
- , "0001106001"
- , "0000080001"
- , "0000146001"
- , "0001048001" //치료결과
- , "0001107001" //퇴원형태
- , "0008331001" //생검여부
- , "0000735001" //선행사인
- );
- var rSang = grup_base.rdo_sang.degnitemno;
- var cOtype = grup_base.cbo_outtype.degnitemno;
- var cCrslt = grup_base.cbo_carerslt.degnitemno;
- var g_hidden_dschordcnts = "";
- /**
- * @desc : 확장버튼(이미지,가계도,추가기록)을 기록여부에 따라 표시를 위한 버튼목록
- * @id :
- * @authur : 안치원
- * @history : 2009.09.09 신규 안치원 ACW_090909A
- : 2010-03-31 오전 9:46:59 강지훈 수정 : 최종진단명 버튼 추가
- */
- var gExtnBtnIds = new Array("btn_imge_0001173001", "btn_imge_0001052001", "btn_imge_0000053001", "btn_lastdiag_0001013001");
-
- //=======================================================================================
- // Function
- //---------------------------------------------------------------------------------------
- /****************************************************************************************
- * Argument : N/A
- * Description : 부분서식 완료시 fOnLoadComplete 호출
- ****************************************************************************************/
- function lf_onloadcomplete(){
- fOnLoadComplete();
- }
- /****************************************************************************************
- * Function : lf_getUnitFormRecData
- * Description : 기록정보 조합
- ****************************************************************************************/
- function lf_getUnitFormRecData(mode, tmp)
- {
- // MMRcommon.xjs
- return lf_getRecDS(arrItemCds, mode, tmp);
- }
- /****************************************************************************************
- * Components : Radio
- * Components ID : Common Radio
- * Event : onitemchange
- * Argument : 01.obj : Object Event has occurred
- * : 02.e : Event Object
- * Description : 라디오버튼(콤보박스) 선택에 따른 reccnts셋팅
- ****************************************************************************************/
- function fRadioYN(obj, e:ItemChangeEventInfo)
- {
- var sDegnitemlevlcd = obj.degnitemlevlcd;
- var nFindRow = ds_data_recitem.findRow("degnitemlevlcd", sDegnitemlevlcd);
-
- if(nFindRow == -1)
- {
- nFindRow = ds_data_recitem.addRow();
- var insRow = ds_temp_mainrecitem.findRow("degnitemlevlcd", sDegnitemlevlcd);
- ds_data_recitem.copyRow(nFindRow, ds_temp_mainrecitem, insRow);
- }
-
- ds_data_recitem.setColumn(nFindRow, "rectermcd", e.postvalue);
- ds_data_recitem.setColumn(nFindRow, "rectermnm", e.posttext);
- }
- /****************************************************************************************
- * Components : Radio
- * Components ID : Common Radio
- * Event : onrbuttondown
- * Argument : 01.obj : Object Event has occurred
- * : 02.e : Event Object
- * Description : 라디오버튼(콤보박스) 선택 초기화
- ****************************************************************************************/
- function fCnclMicroTest(obj:Radio, e:MouseEventInfo)
- {
-
- var sDegnitemno = obj.degnitemno;
- var nFindRow = ds_data_recitem.findRow("degnitemno", sDegnitemno);
- ds_data_recitem.setColumn(nFindRow, "rectermcd", "");
- ds_data_recitem.setColumn(nFindRow, "rectermnm", "");
- obj.value = "";
-
- return true;
- }
- /****************************************************************************************
- * Function : fChkPreSave
- * Description : 기록 인스턴스 연결
- * retrun type :
- * Creator :
- ****************************************************************************************/
- function fChkPreSave(signedYn)
- {
- var rtnVal = true;
- var itemNm = "";
-
- if( signedYn == "N" )
- return true;
-
- rtnVal = refreshDschOrd_MMR00800("CHK_PRE_SAVE");
-
- if(rtnVal == false){
- return false;
- }else{
- // if( grup_base.ivw_0001013001.fChkGrdPreSave_MMR00800(true, itemNm) == false ){
- // return false;
- // }
- return grup_base.ivw_0000931001.fChkGrdPreSave(true, itemNm);//주호소
- }
- }
- /****************************************************************************************
- * Function : fExtnInitFormRec
- * Description : 확장서식 기록 초기 설정
- * retrun type :
- * Creator :
- ****************************************************************************************/
- function fExtnInitFormRec()
- {
-
- if (parent.fGetFormRec("status") == "C")
- {
- //debugger;
- // grup_base.ivw_0001013001.fGetDiagNm(parent.ds_data_formrec); //환자정보로 진단명 조회
- // grup_base.ivw_0000933001.fSrchOprlist(parent.ds_data_formrec); //환자정보로 수술명 조회
- var sSendDsNm = dsf_createDsRow("ds_send_reqinfstrec", [{col:"pid", type:"string", size:256, val:parent.fGetFormRec("pid")}
- , {col:"orddd", type:"string", size:256, val:parent.fGetFormRec("orddd")}
- , {col:"cretno", type:"INT" , size:256, val:parent.fGetFormRec("cretno")}]);
- var objSandDS:Dataset = new Dataset;
- objSendDS = this.objects[sSendDsNm];
-
-
- var sRtnDsNm = dsf_createDs("ds_data_infstrec", [{col:"instcd", type:"STRING", size:256}
- , {col:"rechistseq", type:"BIGDECIMAL", size:256}
- , {col:"recitemno", type:"INT", size:256}
- , {col:"fstlevlitemcd", type:"STRING", size:256}
- , {col:"formcd", type:"STRING", size:256}
- , {col:"formdegnseq", type:"BIGDECIMAL", size:256}
- , {col:"degnitemno", type:"INT", size:256}
- , {col:"degnitemcd", type:"STRING", size:256}
- , {col:"degnitemkind", type:"STRING", size:256}
- , {col:"degnitemlevlno", type:"INT", size:256}
- , {col:"degnitemnm", type:"STRING", size:256}
- , {col:"degnitemlevlcd", type:"STRING", size:256}
- , {col:"rectermcd", type:"STRING", size:256}
- , {col:"rectermnm", type:"STRING", size:256}
- , {col:"recrefcd", type:"STRING", size:256}
- , {col:"recitemnm", type:"STRING", size:256}
- , {col:"reccnts", type:"STRING", size:256}
- , {col:"unitnm", type:"STRING", size:256}
- , {col:"recimge", type:"BLOB", size:0}
- , {col:"srcimge", type:"BLOB", size:0}
- , {col:"rowno", type:"STRING", size:256}
- , {col:"colno", type:"STRING", size:256}
- , {col:"supdegnitemno", type:"STRING", size:256}
- , {col:"extdegnitemlevlcd", type:"STRING", size:256}
- , {col:"rectermflag", type:"STRING", size:256}
- , {col:"degnunitcd", type:"STRING", size:256}], true);
- var objRtnDS:Dataset = new Dataset;
- objRtnDS = this.objects[sRtnDsNm];
-
- var oParam = {};
- oParam.id = "TRMMR00801";
- oParam.service = "formmngtapp.FormIfMngt";
- oParam.method = "reqGetDschSmmIf";
- oParam.inds = "req="+sSendDsNm;
- oParam.outds = sRtnDsNm+"=recitem";
- oParam.async = false;
- oParam.callback = "cf_TRMMR00801";
- tranf_submit(oParam);
-
- if(arErrorCode.pop("TRMMR00801") > -1)
- {
- // sysf_trace(objRtnDS.saveXML());
- /* SSMRF04100_서식주호소 유입
- var filterStr = "fstlevlitemcd=='0000931001' && formcd == '0000000901'";
- if( objRtnDS.getCaseCount(filterStr) > 0 ){
-
- objRtnDS.filter(filterStr);
- grup_base.ivw_0000931001.fSetCCInfo(objRtnDS);
- grup_base.ivw_0000931001.fAddrow();
- objRtnDS.filter("");
- }
- */
-
- //현병력
- var nFindRow = objRtnDS.findRow("degnitemlevlcd", "0001173");
- var fstlevlitemcd = objRtnDS.getColumn(nFindRow, "fstlevlitemcd");
- var tarObj = ComnFormObj.components["tar_" + fstlevlitemcd];
- if( !utlf_isNull(tarObj) ){
- var sValue = objRtnDS.getColumn(nFindRow, "reccnts");
- var nRow = ds_data_recitem.findRow("degnitemno", "4");
- ds_data_recitem.setColumn(nRow, "reccnts", sValue);
- tarObj.value = sValue;
- }
-
- //과거력
- var arrAnstnodeList = objExt.findRows(objRtnDS, "fstlevlitemcd", "0000098001");
- var degnitemlevlcd = "";
- var rectermcd = "";
- var rectermnm = "";
- var reccnts = "";
- var degnitemnm = "";
- var degnitemkind = "";
- var recrslt = "";
-
- for(var i = 0; i < arrAnstnodeList.length; i++)
- {
- degnitemlevlcd = objRtnDS.getColumn(arrAnstnodeList[i], "degnitemlevlcd");
- rectermcd = objRtnDS.getColumn(arrAnstnodeList[i], "rectermcd");
- rectermnm = objRtnDS.getColumn(arrAnstnodeList[i], "rectermnm");
- reccnts = objRtnDS.getColumn(arrAnstnodeList[i], "reccnts");
- degnitemnm = objRtnDS.getColumn(arrAnstnodeList[i], "degnitemnm");
- degnitemkind = objRtnDS.getColumn(arrAnstnodeList[i], "degnitemkind");
-
- if(degnitemkind == "IMG" || degnitemkind == "FDG")
- continue;
-
- degnitemlevlcd = degnitemlevlcd.split(".");
- if (degnitemlevlcd.length > 1){
- if (!utlf_isNull(rectermnm) && !utlf_isNull(reccnts)){
- recrslt += degnitemnm + rectermnm + " ※ " + reccnts + "\n";
- }else if (!utlf_isNull(rectermnm)){
- recrslt += degnitemnm + rectermnm + "\n";
- }else if (!utlf_isNull(reccnts)){
- recrslt += degnitemnm + " ※ " + reccnts + "\n";
- }
- }else{
- recrslt = reccnts + "\n";
- }
- }
-
- var tarObj = ComnFormObj.components["tar_0000098001"];
- if( !utlf_isNull(tarObj) ){
- var nRow = ds_data_recitem.findRow("degnitemno", "5");
- ds_data_recitem.setColumn(nRow, "reccnts", recrslt);
- tarObj.value = recrslt;
- }
- }
- }
-
-
-
- var dschdd = parent.fGetPamInfo("dschdd");
- var indschacptstat = parent.fGetPamInfo("indschacptstat");
-
- //sysf_trace(" dschdd : " + dschdd + " || indschacptstat : " + indschacptstat + " || indschacptstat : " + indschacptstat );
-
- if (dschdd == "99991231" && indschacptstat != "D" && indschacptstat != "T")
- {
- if (grup_base.btn_outprcp_0001106001.enable && grup_base.btn_resv_0000080001.enable)
- {
- //퇴원처방, 예약버튼 비활성화
- grup_base.btn_outprcp_0001106001.enable = false;
-
- grup_base.ivw_0001106001.enable = false;
- grup_base.tar_0001106001.enable = false;
- }
- }
- else
- {
- if (!grup_base.btn_outprcp_0001106001.enable && !grup_base.btn_resv_0000080001.enable)
- {
- //퇴원처방, 예약버튼 활성화
- grup_base.btn_outprcp_0001106001.enable = true;
- grup_base.ivw_0001106001.enable = true;
- grup_base.tar_0001106001.enable = true;
- }
-
- fGetAutoPatOutPrcpList("0001106001");
- }
- }
- function cf_TRMMR00801(sSvcId, nErrorCode, sErrorMsg) {
- arErrorCode.push(sSvcId, nErrorCode);
- }
- /****************************************************************************************
- * Function : fGetAutoPatOutPrcpList
- * Description : 환자퇴원처방정보 가져오기
- * 2010.04.14 dhkim 퇴원처방자동저장 플래그추가
- * Argument : 01. itemCd
- * 02. autoSaveYn
- * retrun type :
- * Creator :
- ****************************************************************************************/
- function fGetAutoPatOutPrcpList(itemCd, autoSaveYn)
- {
- var prcpdd = "";
- var bfflag = "bfprcp";
- var flag = "-";
- var todd = "";
- var nRow = parent.ds_data_formrec.rowposition;
- var pid = parent.ds_data_formrec.getColumn(nRow, "pid");
- var orddd = parent.ds_data_formrec.getColumn(nRow, "orddd");
- var cretno = parent.ds_data_formrec.getColumn(nRow, "cretno");
- var orddrid = "";
- var orddeptcd = parent.ds_data_formrec.getColumn(nRow, "orddeptcd");
- var prcpgenrflag = parent.ds_data_formrec.getColumn(nRow, "chosflag");
- //2010.03.17 dhkim 퇴원처방 구분자 변경됨
- prcpdd = "recbfsrch"; // 입퇴원 요약지의 퇴원처방 날짜조건 변경을 위한 구분자
-
- sysf_trace("==fGetAutoPatOutPrcpList 입퇴원요약 처음로딩시 : prcpdd ::" + prcpdd);
- //처방정보 가져오기(퇴원처방 prcpkindcd = 60)
- //if(fBfPrcpSrchCom(pid, orddd, prcpdd, bfflag, flag, orddrid, todd, prcpgenrflag, orddeptcd, cretno, "TRMMO00100", true))
- var prcplistCnt = 0;
- var expr = "prcpkindcd == 60 && prcphistcd != 'C' && prcphistcd != 'L' && prcphistcd != 'E'";
- if(lf_bfPrcpSrchCom(pid, orddd, prcpdd, bfflag, flag, orddrid, todd, prcpgenrflag, orddeptcd, cretno, "TRMMO00100", "", "", ""))
- {
- //var nodelistPrcpinfo = model.instances(0).selectNodes("/root/prcpsrch/prcplist[prcpkindcd = 60 and prcphistcd != 'C' and prcphistcd != 'L' and prcphistcd != 'E']");
- prcplistCnt = ds_prcpsrch_prcplist.getCaseCount(expr);
- }
-
- var prcpkind = ""; //처방종류
- var orgprcpnm = ""; //처방명
- var drugmthdspccdnm = ""; //용법
- var prcpdelivefact = ""; //전달사항
- var prcplist = "";
-
- var prcpclscd = "";
-
- var tmpdrugmthdspccdnm = "";
- if(prcplistCnt >= 1){
- ds_prcpsrch_prcplist.filter(expr);
- for(var i = 0; i < prcplistCnt; i++)
- {
- tmpdrugmthdspccdnm = ds_prcpsrch_prcplist.getColumn(i, "drugmthdspccdnm");
- prcpkind = ds_prcpsrch_prcplist.getColumn(i, "tempcol13");
- orgprcpnm = ds_prcpsrch_prcplist.getColumn(i, "tempcol6");
- drugmthdspccdnm = utlf_transNullToEmpty(ds_prcpsrch_prcplist.getColumn(i, "tempcol7"));
- prcpclscd = ds_prcpsrch_prcplist.getColumn(i, "prcpclscd");
-
- drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
-
- drugmthdspccdnm = drugmthdspccdnm.replace("[급]", "");
- drugmthdspccdnm = drugmthdspccdnm.replace("[일]", "");
- drugmthdspccdnm = drugmthdspccdnm.replace("[본]", "");
- drugmthdspccdnm = drugmthdspccdnm.replace("(집)", "");
- drugmthdspccdnm = drugmthdspccdnm.replace("[home]", "");
- drugmthdspccdnm = drugmthdspccdnm.replace("[임상]", "");
- drugmthdspccdnm = drugmthdspccdnm.replace("[prn]", "");
- var prcpdelivefact = ds_prcpsrch_prcplist.getColumn(i, "prcpdelivefact");
- if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6")
- {
- prcplist += orgprcpnm + " " + drugmthdspccdnm + "\n"
- }
- else
- {
- prcplist += orgprcpnm + "\n"
- }
- }
- ds_prcpsrch_prcplist.filter("");
- }
- else
- {
- prcplist = "No medication";
- }
-
- var nFindRow = ds_data_recitem.findRow("fstlevlitemcd", itemCd);
- var prerec = ds_data_recitem.getColumn(nFindRow, "reccnts");
-
- if (utlf_isNull(prerec))
- {
- prerec = prcplist + "\n";
- }
-
- //2010.04.14 dhkim 퇴원처방자동저장의 경우 기존의 값이 있어도 새로 세팅한다.
- if(autoSaveYn == "SET_DSCHORD"){
- prerec = prcplist + "\n";
- }
-
- if(!utlf_isNull(prerec))
- {
- var objTextArea = ComnFormObj.components["tar_" + itemCd];
- // var objDivArea = ComnFormObj.components["ivw_" + itemCd];
-
- if(nFindRow == -1)
- {
- var nTmpPrntRow = ds_temp_mainrecitem.findRowExpr("fstlevlitemcd == '" + itemCd + "' && degnitemlevlno == '1' && degnitemkind == 'MTX'");
- if(nTmpPrntRow != -1)
- {
- nFindRow = ds_data_recitem.addRow();
- ds_data_recitem.copyRow(ds_data_recitem.rowcount - 1, ds_temp_mainrecitem, nTmpPrntRow);
-
- }
- }
- ds_data_recitem.setColumn(nFindRow, "reccnts", prerec);
- objTextArea.value = prerec;
- }
- //model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts", prerec);
- return prcplistCnt;
- }
- /****************************************************************************************
- * Function : fSetDataValItem
- * Description : Value List데이터 아이템 값 매핑
- * retrun type :
- * Creator :
- ****************************************************************************************/
- function fSetDataValItem()
- {
- //치료결과 Vallist Setting
- var carersltgpcd = ds_data_formdegn.lookup("degnitemno", cCrslt, "valgrupcd");
- ds_data_vallist.filter("grupcd=='"+carersltgpcd+"'");
- ds_init_cbo_carerslt.copyData(ds_data_vallist, true);
- //ds_data_vallist.filter("");
- //퇴원형태 Vallist Setting
- var dschtypegpcd = ds_data_formdegn.lookup("degnitemno", cOtype, "valgrupcd");
- ds_data_vallist.filter("grupcd=='"+dschtypegpcd+"'");
- ds_init_cbo_outtype.copyData(ds_data_vallist, true);
- //ds_data_vallist.filter("");
-
- //생검여부 Vallist Setting
- var sanggpcd = ds_data_formdegn.lookup("degnitemno", rSang, "valgrupcd");
- ds_data_vallist.filter("grupcd=='"+sanggpcd+"'");
- ds_init_rdo_sang.copyData(ds_data_vallist, true);
- ds_data_vallist.filter("");
-
- }
- var gLoadFormCnts = 0;
- /*******************************************************************
- * Function : fFormReady
- * Description : 화면 로드시 초기화 작업을 수행
- *******************************************************************/
- function fFormReady()
- {
- this.ComnFormObj = this.grup_base;
- dsf_createDsRow("ds_temp_mainrecitem",
- [{col:"formxrw", val:""}]);
- // 공통서식의 초기 recitem 정보. 기록 데이터 조합시 사용
- ds_temp_mainrecitem.assign(ds_data_recitem);
-
- lf_setSectionSize(gItemCds, "grup_base.tar_0001013001", "grup_base.tar_0000080001");
- // lf_checkUnitForm(gItemCds); // 부분서식 로딩
- lf_AllLoadUnitFormExpand(gItemCds); // 전체 로딩
- InitBtnImge(gItemImgCds);
- InitBtnOutPrcp("0001106001"); //환자퇴원처방정보
- InitBtnResv("0000080001"); //환자예약정보
-
- //2010-03-31 오전 9:47:21 강지훈 추가 : 최종진단명 요약지 추가
- InitBtnLastDiag("0001013001");
-
- fSetDataValItem(); // combo, radio valuelist 맵핑
-
- lf_setRecData(arrItemCds);
-
- var sStatus = fGetFormRec("status");
- fSetBasicInfo(sStatus);
-
-
- /*
- if (parent.fGetFormRec("status") == "C")
- {
- //2010-03-11 오후 8:06:14 강지훈 수정 : 최종진단명 요약지 최초작성시 disable처리
- grup_base.btn_lastdiag_0001013001.enable = false;
- SetDefFocusMTX(gItemCds);
- }
- else if (parent.fGetFormRec("status") == "U" && parent.fGetFormRec("espiyn") == "Y")
- {
-
- //2010.04.20 dhkim Staff-Sign권한체크로직 펑션으로 분리
- fCosignCheck();
-
- }
-
- //2010.02.25 안치원 - 입퇴원요약기록 - 퇴원처방 입력방법 변경(팝업)
- refreshDschOrd_MMR00800("SET_DSCHORD");
-
- // ivw_loder onloadcomplete
- if(lf_getHardCDList("Y", 9926, 3) == "Y"){
- grup_base.btn_lastdiag_0001013001.visible = true;
- }
- else{
- grup_base.btn_lastdiag_0001013001.visible = false;
- }
- */
- }
- function fSaveAfter()
- {
- //refreshDschOrd_MMR00800("SAVE_AFTER");
- }
- /****************************************************************************************
- * Function : refreshDschOrd_MMR00800
- * Description :
- * Argument : 01.flag - 구분
- ****************************************************************************************/
- function refreshDschOrd_MMR00800(flag)
- {
- sysf_trace(">> refreshDschOrd_MMR00800 "+flag);
- var enabled = false;
- if (parent.getInitInfo_MMR01100("openExtnFlag") == "DisChargeSummaryNote_ReDschOrd") {
- enabled = true;
- }
-
- sysf_trace(" enabled >>>>>>>>>>>>>>>> " + enabled );
-
- if (flag == "ENABLED") {
- //*****************************************************************
- //퇴원처방 자동저장 기능 수행여부
- //*****************************************************************
- return enabled;
- }
- else if (flag == "CHK_PRE_SAVE") {
- if (enabled) {
- //*****************************************************************
- //퇴원처방내역이 갱신되었는지를 검사하여, 변경되지 않으면 저장이 되지 않는다.
- //*****************************************************************
- var oldCnts = g_hidden_dschordcnts;
- var newCnts = ds_data_recitem.lookup("degnitemlevlcd", "0001106", "reccnts");
-
- if (oldCnts == newCnts) {
- return false;
- } else {
- return true;
- }
- }
- else {
- return true;
- }
- }
- else {
- if (enabled) {
- if (flag == "SET_DSCHORD") {
- //*****************************************************************
- //퇴원처방을 설정한다.
- //*****************************************************************
- var oldCnts = ds_data_recitem.lookup("degnitemlevlcd", "0001106", "reccnts");
- g_hidden_dschordcnts = oldCnts;
- fGetAutoPatOutPrcpList("0001106001", flag);
-
- if (parent.fClickSave("Y") == false) {
- refreshDschOrd_MMR00800("CLOSE_AUTOSAVE_FORM");
- }
- }
- else if (flag == "SAVE_AFTER") {
- //*****************************************************************
- //저장후에 진료기록메인이 있다면 갱신한다.
- //*****************************************************************
- var mainWnd = frmf_getMainViewer();
- if (!utlf_isNull(mainWnd) && mainWnd.frmf_getScreenID() == "SMMMR00100") {
- mainWnd.reload();
- }
- refreshDschOrd_MMR00800("CLOSE_AUTOSAVE_FORM");
- }
- else if (flag == "CLOSE_AUTOSAVE_FORM") {
- //*****************************************************************
- //서식자동저장 창을 닫는다.
- //*****************************************************************
- var wnd = frmf_findPopup("SPMMR07300");
- if (!utlf_isNull(wnd)) {
- wnd.close();
- }
- }
- }
- }
- }
- /**
- * 2010.03.17 dhkim 추가
- */
- function initFormAtLast_MMR01100I(){
- //fExtnInitFormRec();//확장서식 기록 초기 설정(initFormAtLast이후에 퇴원처방로딩되어야함)
- }
- function fCosignCheck(){
- //코사인 권한 관련 처리
- ds_send_extninfo.clearData();
- var nRow = ds_send_extninfo.addRow();
- ds_send_extninfo.setColumn(nRow, "infoflag", "staffauth");
- ds_send_extninfo.setColumn(nRow, "formrecseq", parent.fGetFormRec("formrecseq"));
-
- dsf_setDefaultVal(ds_send_extninfo, "dschdd:99991231");
-
- var oParam = {};
- oParam.id = "TRMMR01302";
- oParam.service = "medirecapp.RecIf";
- oParam.method = "reqGetFormRecExtnInfo";
- oParam.inds = "req=ds_send_extninfo";
- oParam.outds = "ds_main_extninfo_resultinfo=resultinfo ds_main_extninfo_staffauthinfo=staffauthinfo ds_main_extninfo_oprinfo=oprinfo "
- + "ds_main_extninfo_oplistinfo=oplistinfo ds_main_extninfo_recitem=recitem ds_main_extninfo_drlistinfo=drlistinfo "
- + "ds_data_diagcdlist=diagcdlist ds_main_extninfo_selectoplist=selectoplist ds_main_extninfo_dscinoutinfo=dscinoutinfo "
- + "ds_main_extninfo_rectextinfo=rectextinfo ds_main_extninfo_anstdrlistinfo=anstdrlistinfo ds_main_extninfo_oproomlistinfo=oproomlistinfo "
- + "ds_main_extninfo_recseqinfo=recseqinfo ds_main_extninfo_etcinfo=etcinfo";
- oParam.async = false;
- oParam.callback = "cf_TRMMR01302";
- tranf_submit(oParam);
-
- if(arErrorCode.pop("TRMMR01302") > -1)
- {
- var nRow = ds_main_extninfo_staffauthinfo.rowposition;
- var authyn = ds_main_extninfo_staffauthinfo.getColumn(nRow, "authyn");
- if(authyn == "Y")
- {
- //인증저장버튼과 코사인버튼처리
- parent.grup_btn.btn_cosign.position.x = parent.grup_btn.btn_signsave.position.x;
- parent.grup_btn.btn_signsave.visible = false;
- parent.grup_btn.btn_cosign.visible = true;
- // parent.grup_btn.btn_cosign.enable = true;
- //임시저장버튼과 기록반려버튼처리
- parent.grup_btn.btn_resend.position.x = parent.grup_btn.btn_tmpsave.position.x;
- parent.grup_btn.btn_tmpsave.visible = false;
- parent.grup_btn.btn_resend.visible = true;
- //parent.grup_btn.btn_resend.enable = true;
-
- //기타버튼 disable처리
- parent.grup_btn.btn_init.enable = false;
- parent.grup_btn.btn_preview.enable = false;
- parent.grup_btn.btn_signsaveasnew.enable = false;
- parent.grup_btn.btn_del.enable = false;
- if (parent.fGetFormRec("cosign") == "Y")
- {
- parent.grup_btn.btn_cosign.enable = false;
-
-
- //2010-03-31 오전 9:49:07 강지훈 추가 : 최종진단명 요약지 버튼설정, Staffsign이 완료된이후에만 사용
- var childrenObj = grup_base.components;
- for(i=0; i< childrenObj.length; i++)
- {
- childObj = childrenObj[i];
- if(childObj.name == "btn_lastdiag_0001013001"){
- childObj.enable = true;
- }
- else{
- childObj.enable = false;
- childObj.orgEnable = "Y";
- }
- }
- }
- else
- {
- parent.grup_btn.btn_cosign.enable = true;
- grup_base.enable = true;
- }
- }
- else
- {
- //인증저장버튼과 코사인버튼처리
- parent.grup_btn.btn_signsave.visible = true;
- parent.grup_btn.btn_cosign.visible = false;
- //임시저장버튼과 기록반려버튼처리
- parent.grup_btn.btn_tmpsave.visible = true;
- parent.grup_btn.btn_resend.visible = false;
-
- //기타버튼 enable처리
- parent.grup_btn.btn_init.enable = true;
- parent.grup_btn.btn_preview.enable = true;
- parent.grup_btn.btn_signsaveasnew.enable = true;
- parent.grup_btn.btn_del.enable = true;
- }
- }
- }
- function cf_TRMMR01302(sSvcId, nErrorCode, sErrorMsg) {
- arErrorCode.push(sSvcId, nErrorCode);
- if(nErrorCode < 0) return;
- dsf_setDefaultVal(ds_main_extninfo_recitem, "recitemno:'',degnitemno:'',supdegnitemno:''");
- dsf_setTypeFormat(ds_main_extninfo_recitem, "recitemno:INT^degnitemno:INT^supdegnitemno:INT");
- }
- /****************************************************************************************
- * Function : fChngDoct
- * Description : 치료결과, 퇴원형태에 따른 reccnts셋팅
- ****************************************************************************************/
- function fChngDoct(obj:Combo, e:ItemChangeEventInfo)
- {
- var sDrnm, sDrcd;
- var sDegnitemlevlcd = obj.degnitemlevlcd;
- var nFindRow = ds_data_recitem.findRow("degnitemlevlcd", sDegnitemlevlcd);
-
- if(nFindRow == -1)
- {
- nFindRow = ds_data_recitem.addRow();
- var insRow = ds_temp_mainrecitem.findRow("degnitemlevlcd", sDegnitemlevlcd);
- ds_data_recitem.copyRow(nFindRow, ds_temp_mainrecitem, insRow);
- }
-
- sDrnm = e.posttext;
- sDrcd = e.postvalue;
-
- if( utlf_isNull(e.posttext) ){
- sDrnm = "";
- sDrcd = "";
- obj.value = "";
- }
- ds_data_recitem.setColumn(nFindRow, "rectermcd", sDrcd);
- ds_data_recitem.setColumn(nFindRow, "rectermnm", sDrnm);
- }
- //=======================================================================================
- // Transaction Callback
- //---------------------------------------------------------------------------------------
- /****************************************************************************************
- * Argument : 01.sSvcId : 서비스 ID
- * : 02.nErrorCode : 에러코드
- * : 03.sErrorMsg : 에러메시지
- * Description : cf_의 콜백함수
- ****************************************************************************************/
- function cf_(sSvcId, nErrorCode, sErrorMsg) {
- if(nErrorCode < 0) return;
- //sysf_trace("***** cf_ *****");
- }
- //=======================================================================================
- // Event
- //---------------------------------------------------------------------------------------
- /****************************************************************************************
- * Components : Form
- * Components ID : SMMMR07000
- * Event : oninit
- * Argument : 01.obj : Object Event has occurred
- * : 02.e : Event Object
- * Description : 화면 초기화
- ****************************************************************************************/
- function SMMMR07000_oninit(obj:Form, e:InitEventInfo)
- {
- frmf_initForm(obj);
- }
- /****************************************************************************************
- * Components : Form
- * Components ID : SMMMR07000
- * Event : onload
- * Argument : 01.obj : Object Event has occurred
- * : 02.e : Event Object
- * Description : 화면 초기화
- ****************************************************************************************/
- function SMMMR07000_onload(obj:Form, e:LoadEventInfo)
- {
- lf_makeRecitem();
-
- fFormReady();
-
- initFormAtLast_MMR01100I();
-
- //우클릭 메뉴보이기 기능(Grid인 경우는 해당 Form OnLoad에 선언한다.)
- fCompRightMenuInit(grup_base.tar_0001173001);
- fCompRightMenuInit(grup_base.tar_0000098001);
- fCompRightMenuInit(grup_base.tar_0000079001);
- fCompRightMenuInit(grup_base.tar_0000570001);
- fCompRightMenuInit(grup_base.tar_0001052001);
- fCompRightMenuInit(grup_base.tar_0000053001);
- fCompRightMenuInit(grup_base.tar_0001106001);
- fCompRightMenuInit(grup_base.tar_0000080001);
- }
- /****************************************************************************************
- * Components : Static
- * Components ID : Common Static
- * Event : onclick
- * Argument : 01.obj : Object Event has occurred
- * : 02.e : Event Object
- * Description : 선택된 Label의 부분서식을 로드하고 펼치거나 접는다.
- ****************************************************************************************/
- function Static_onclick(obj:Static, e:ClickEventInfo)
- {
- expandSection(gItemCds, obj);
- }
- /****************************************************************************************
- * Components : TextArea
- * Components ID : Common TextArea
- * Event : ontextchanged
- * Argument : 01.obj : Object Event has occurred
- * : 02.e : Event Object
- * Description : TextArea 변경에 따른 recitem 데이터 설정
- ****************************************************************************************/
- function lf_setrecitem(obj, e:TextChangedEventInfo)
- {
- //var sDegnitemno = obj.degnitemno;
- //var nFindRow = ds_data_recitem.findRow("degnitemno", sDegnitemno);
- var sDegnitemlevlcd = obj.degnitemlevlcd;
- var nFindRow = ds_data_recitem.findRow("degnitemlevlcd", sDegnitemlevlcd);
- if(nFindRow == -1)
- {
- nFindRow = ds_data_recitem.addRow();
- var insRow = ds_temp_mainrecitem.findRow("degnitemlevlcd", sDegnitemlevlcd);
- ds_data_recitem.copyRow(nFindRow, ds_temp_mainrecitem, insRow);
- }
-
- ds_data_recitem.setColumn(nFindRow, "reccnts", e.posttext);
-
- }
- /****************************************************************************************
- * Description : group1 그룹내 데이터 설정
- * Argument : 01. status - 새글/수정
- * retrun type :
- * Creator :
- ****************************************************************************************/
- function fSetBasicInfo(status)
- {
- var recDS;
- if(status == "C")
- return;
- else if(status == "U")
- recDS = parent.ds_data_recitem;
- for(var i = 0; i < grup_base.components.length; i++)
- {
- var ctrlObj = grup_base.components[i];
- var ctrlNm = ctrlObj.name;
- var degnitemlevlcd = ctrlObj.degnitemlevlcd;
- var degnitemno = ctrlObj.degnitemno;
- if(!utlf_isNull(degnitemlevlcd))
- {
- //var nRow = recDS.findRow("degnitemlevlcd", degnitemlevlcd);
- var nRow = recDS.findRow("degnitemno", degnitemno);
- if(nRow > -1)
- {
- //var recIndex = ds_data_recitem.findRow("degnitemlevlcd", degnitemlevlcd);
- var recIndex = ds_data_recitem.findRow("degnitemno", degnitemno);
- if(ctrlObj instanceof Edit || ctrlObj instanceof Calendar || ctrlObj instanceof TextArea)
- {
- ctrlObj.value = recDS.getColumn(nRow, "reccnts");
- ds_data_recitem.setColumn(recIndex, "reccnts", recDS.getColumn(nRow, "reccnts"));
- }
- else
- {
- if(recIndex > -1)
- {
- ctrlObj.value = recDS.getColumn(nRow, "rectermcd");
- ds_data_recitem.setColumn(recIndex, "rectermnm", recDS.getColumn(nRow, "rectermnm"));
- ds_data_recitem.setColumn(recIndex, "rectermcd", recDS.getColumn(nRow, "rectermcd"));
- }
- }
- }
- }
- }
- }
- ]]></Script>
- </Form>
- </FDL>
|