YNU_JEUS/app_home/himed/xpapps/ast/hsctstemcellxp/xp/SMABC00100_조혈모세포처리실처방관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMABC00100" position="absolute 0 0 1201 767" titletext="조혈모세포처리실 처방관리" oninit="SMABC00100_oninit" onload="SMABC00100_onload">
    <Layouts>
      <Layout>
        <Shape id="roundrect2" type="roundrectangle" position="absolute 450 724 783 754" anchor="right bottom"/>
        <Static id="caption6" text="조혈모세포처리실 처방관리" class="tit_1" position="absolute 0 0 256 25"/>
        <Div id="grp_sea" anchor="left top right" taborder="1" class="div_SA" position="absolute 0 25 1195 65">
          <Layouts>
            <Layout>
              <Shape id="line10" linetype="vertical" class="line_4" position="absolute 1104 11 1110 33" anchor="top right"/>
              <Static id="caption42" text="등록번호 :" class="search_name" position="absolute 350 12 436 29"/>
              <Button id="btn_sea" taborder="7" text="조회" class="btn1" position="absolute 1123 11 1179 33" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
              <Button id="btn_srchpat" taborder="8" class="icon_search" position="absolute 522 12 538 28" onclick="grp_sea_btn_srchpat_onclick"/>
              <Edit id="input30" taborder="9" autoselect="true" autoskip="true" class="input_search" position="absolute 439 11 519 30" onkeydown="grp_sea_input30_onkeydown"/>
              <Radio id="radio2" taborder="10" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 551 9 725 32">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">Y</Col>
                      <Col id="datacolumn">미시행처방</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">시행처방</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption8" text="적용일자 :" class="search_name" position="absolute 15 12 106 29"/>
              <Static id="caption9" text="~" class="search_n_b" position="absolute 211 13 223 30"/>
              <Calendar id="ipt_prcphopefromdd" taborder="11" autoselect="true" autoskip="true" class="input_s_essential" position="absolute 107 12 207 31"/>
              <Calendar id="ipt_prcphopetodd" taborder="12" autoselect="true" autoskip="true" class="input_s_essential" position="absolute 227 12 327 31"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_deldetlinfo" taborder="2" text="상세정보삭제" class="btn5" position="absolute 1108 222 1194 241" anchor="top right" onclick="btn_deldetlinfo_onclick"/>
        <Button id="button4" taborder="3" text="타기관이식스케쥴" class="btn2" position="absolute 961 72 1077 91" anchor="top right" onclick="button4_onclick"/>
        <Button id="btn_appdetl" taborder="4" text="추가상세정보저장" class="btn5" enable="false" position="absolute 910 222 1018 241" anchor="top right" onclick="btn_appdetl_onclick"/>
        <Shape id="line5" class="line_3" position="absolute 940 268 1195 274" anchor="top right"/>
        <Button id="button6" taborder="5" text="반환요청" class="btn5" position="absolute 1064 298 1128 317" anchor="top right" onclick="button6_onclick"/>
        <Button id="button5" taborder="6" text="시행취소" class="btn5" enable="false" visible="false" position="absolute 953 298 1017 317" anchor="top right" onclick="button5_onclick"/>
        <Grid id="grd_direcprcp" taborder="7" binddataset="ds_main_prcpdirecinfo_direcprcpinfo" autoenter="select" useinputpanel="false" autofittype="col" position="absolute 450 96 1194 216" anchor="top right" oncellclick="grd_direcprcp_oncellclick" onrbuttondown="grd_direcprcp_onrbuttondown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="21"/>
                <Column size="55"/>
                <Column size="76"/>
                <Column size="267"/>
                <Column size="64"/>
                <Column size="64"/>
                <Column size="64"/>
                <Column size="125"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="상태"/>
                <Cell col="2" text="적용일자"/>
                <Cell col="3" text="지시처방명"/>
                <Cell col="4" text="처방의명"/>
                <Cell col="5" text="주치의명"/>
                <Cell col="6" text="담당의명"/>
                <Cell col="7" text="처방입력일시"/>
                <Cell col="8" text="detlflag"/>
                <Cell col="9" text="addtetlflag"/>
                <Cell col="10" text="stm"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="combo" edittype="combo" text="bind:execprcpstatcd" combodataset="ds_init_cmbinfo_execprcpstatcd_M0011" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="2" displaytype="date" text="bind:prcphopedd" calendardisplaynulltype="nulltext"/>
                <Cell col="3" text="bind:prcpnm"/>
                <Cell col="4" text="bind:orddrnm"/>
                <Cell col="5" text="bind:atdoctid"/>
                <Cell col="6" text="bind:medispclid"/>
                <Cell col="7" text="bind:fstrgstdt" mask="####-##-## ##:##" maskchar=" "/>
                <Cell col="8" text="bind:detlflag"/>
                <Cell col="9" text="bind:adddetlflag"/>
                <Cell col="10" text="bind:stemcellflag"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption49" class="color_5" position="absolute 565 731 580 746" anchor="right bottom"/>
        <Static id="caption47" text="범     례" class="cell_2" position="absolute 455 729 525 749" anchor="right bottom"/>
        <Static id="caption55" text="시행처방" position="absolute 673 732 723 746" anchor="right bottom"/>
        <Static id="caption53" class="color_2" position="absolute 655 731 670 746" anchor="right bottom"/>
        <Static id="caption51" text="미시행처방" position="absolute 583 732 645 746" anchor="right bottom"/>
        <Grid id="grd_calcscorlist" taborder="8" binddataset="ds_main_prcpinfo_calcscorinfo" useinputpanel="false" position="absolute 450 322 1194 722" anchor="top right bottom" autoenter="select" cellsizingtype="col" oncellclick="grd_calcscorlist_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="29"/>
                <Column size="58"/>
                <Column size="76"/>
                <Column size="293"/>
                <Column size="65"/>
                <Column size="34"/>
                <Column size="169"/>
                <Column size="89"/>
                <Column size="44"/>
                <Column size="36"/>
                <Column size="37"/>
                <Column size="31"/>
                <Column size="48"/>
                <Column size="39"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox"/>
                <Cell col="2" text="상태"/>
                <Cell col="3" text="적용일자"/>
                <Cell col="4" text="처방내역"/>
                <Cell col="5" text="처방코드"/>
                <Cell col="6" text="횟수"/>
                <Cell col="7" text="전달사항"/>
                <Cell col="8" text="시행일자"/>
                <Cell col="9" text="용량"/>
                <Cell col="10" text="수량"/>
                <Cell col="11" text="일수"/>
                <Cell col="12" text="MIx"/>
                <Cell col="13" text="급비"/>
                <Cell col="14" text="응급"/>
                <Cell col="15" text="caption1"/>
                <Cell col="16" text="caption2"/>
                <Cell col="17" text="caption3"/>
                <Cell col="18"/>
                <Cell col="19"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="expr:chk == 'Y' ? 1 : 0"/>
                <Cell col="2" displaytype="combo" text="bind:execprcpstatcd" combodataset="ds_init_cmbinfo_execprcpstatcd_M0011" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="3" displaytype="date" text="bind:prcphopedd" calendardisplaynulltype="nulltext"/>
                <Cell col="4" text="bind:prcpnm"/>
                <Cell col="5" text="bind:prcpcd"/>
                <Cell col="6" text="bind:prcptims"/>
                <Cell col="7" text="bind:prcpdelivefact"/>
                <Cell col="8" displaytype="date" text="bind:execdd" calendardisplaynulltype="nulltext"/>
                <Cell col="9" text="bind:prcpvol"/>
                <Cell col="10" text="bind:prcpqty"/>
                <Cell col="11" text="bind:prcpdayno"/>
                <Cell col="12" text="bind:prcpmixno"/>
                <Cell col="13" displaytype="combo" style="align:center middle;" text="bind:payflagcd" combodataset="ds_init_cmbinfo_payflagcd_M0029" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="14" displaytype="checkbox" edittype="checkbox" text="bind:erprcpflag" expr="expr:erprcpflag == 'Y' ?  1 : 0"/>
                <Cell col="15" text="bind:hscttempprcpflag" enable="false"/>
                <Cell col="16" text="bind:prcpflag" enable="false"/>
                <Cell col="17" text="bind:execdeptyn" enable="false"/>
                <Cell col="18" text="bind:prcpdd"/>
                <Cell col="19" text="bind:prcpno"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_patlist" taborder="9" binddataset="ds_main_patinfo_direcprcplist_item" autoenter="select" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 96 445 761" anchor="all" oncellclick="grd_patlist_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="22"/>
                <Column size="30"/>
                <Column size="72"/>
                <Column size="74"/>
                <Column size="50"/>
                <Column size="60"/>
                <Column size="42"/>
                <Column size="94"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="선택"/>
                <Cell col="2" text="적용일자"/>
                <Cell col="3" text="등록번호"/>
                <Cell col="4" text="환자명"/>
                <Cell col="5" text="병동"/>
                <Cell col="6" text="병실"/>
                <Cell col="7" text="진료과"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                <Cell col="2" displaytype="date" text="bind:prcphopedd" calendardisplaynulltype="nulltext"/>
                <Cell col="3" text="bind:pid"/>
                <Cell col="4" text="bind:hngnm"/>
                <Cell col="5" text="bind:wardnm"/>
                <Cell col="6" text="bind:roomcd"/>
                <Cell col="7" text="bind:deptnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Combo id="combo4" taborder="10" innerdataset="@ds_init_cmbinfo_stemcellsource_A0159" codecolumn="cdid" datacolumn="cdnm" class="combo_default" position="absolute 819 248 939 267" anchor="top right"/>
        <Static id="caption7" text="Stem Cell Source" class="cell_1" position="absolute 696 246 816 269" anchor="top right"/>
        <Button id="button2" taborder="11" text="처방시행" class="btn5" position="absolute 1130 298 1194 317" anchor="top right" onclick="button2_onclick"/>
        <Button id="button1" taborder="12" text="상세정보저장" class="btn5" position="absolute 1020 222 1106 241" anchor="top right" onclick="button1_onclick"/>
        <Shape id="line4" class="line_3" position="absolute 450 292 939 298" anchor="top right"/>
        <Static id="caption16" text="이식형태" class="cell_1" position="absolute 450 246 570 269" anchor="top right"/>
        <Static id="caption5" text="CD34 채집여부" class="cell_1" position="absolute 450 270 570 293" anchor="top right"/>
        <Static id="caption4" text="해동여부" class="cell_1" position="absolute 696 270 816 293" anchor="top right"/>
        <Static id="caption1" text="Cryo여부" class="cell_1" position="absolute 942 246 1062 269" anchor="top right"/>
        <Shape id="line3" class="line_2" position="absolute 450 267 939 273" anchor="top right"/>
        <Combo id="combo3" taborder="13" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_default" position="absolute 573 272 693 291" anchor="top right">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">Y</Col>
                <Col id="datacolumn">Y</Col>
              </Row>
              <Row>
                <Col id="codecolumn">N</Col>
                <Col id="datacolumn">N</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Combo id="combo2" taborder="14" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_default" position="absolute 819 272 939 291" anchor="top right">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">Y</Col>
                <Col id="datacolumn">Y</Col>
              </Row>
              <Row>
                <Col id="codecolumn">N</Col>
                <Col id="datacolumn">N</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Combo id="combo1" taborder="15" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_default" position="absolute 1065 248 1189 267" anchor="top right">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">Y</Col>
                <Col id="datacolumn">Y</Col>
              </Row>
              <Row>
                <Col id="codecolumn">N</Col>
                <Col id="datacolumn">N</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Combo id="combo7" taborder="16" innerdataset="@ds_init_cmbinfo_trnpttype_A0158" codecolumn="cdid" datacolumn="cdnm" class="combo_default" position="absolute 573 248 693 267" anchor="top right"/>
        <Button id="button22" taborder="17" text="전체이식스케쥴" class="btn2" position="absolute 855 72 960 91" anchor="top right" onclick="button22_onclick"/>
        <Button id="button20" taborder="18" text="BMT환자정보조회" class="btn2" position="absolute 738 72 854 91" anchor="top right" onclick="button20_onclick"/>
        <Button id="button3" taborder="19" text="환자별이식스케쥴" class="btn2" position="absolute 1078 72 1194 91" anchor="top right" onclick="button3_onclick"/>
        <Shape id="line7" class="line_10" position="absolute 450 317 1194 323" anchor="top right"/>
        <Static id="caption11" text="수가처방" class="tit_2" position="absolute 450 301 538 322" anchor="top right"/>
        <Shape id="line2" class="line_10" position="absolute 450 241 1194 247" anchor="top right"/>
        <Static id="caption3" text="조혈모세포처리실 처방상세정보" class="tit_2" position="absolute 450 225 700 245" anchor="top right"/>
        <Static id="caption2" text="지시처방" class="tit_2" position="absolute 450 75 530 96" anchor="top right"/>
        <Shape id="line1" class="line_10" position="absolute 450 91 1194 97" anchor="top right"/>
        <Shape id="line9" class="line_10" position="absolute 0 91 445 97" anchor="left top right"/>
        <Static id="caption41" text="지시처방리스트" class="tit_2" position="absolute 0 75 120 96"/>
        <Button id="btn_cle" taborder="20" text="오늘" class="btn4" position="absolute 1139 2 1195 24" anchor="top right" onclick="btn_cle_onclick"/>
        <Div id="group4" taborder="21" position="absolute 0 778 1195 805" anchor="top right"/>
        <PopupMenu id="pmn_menu1" position="absolute 1228 47 1334 174" innerdataset="@ds_menu" idcolumn="func" captioncolumn="label" levelcolumn="level" onmenuclick="pmn_menu1_onmenuclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_baseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="prcphopedd" type="STRING" size="256"/>
          <Column id="prcphopefromdd" type="STRING" size="256"/>
          <Column id="prcphopetodd" type="STRING" size="256"/>
          <Column id="srchflag" type="STRING" size="256"/>
          <Column id="prcpdetlinfo" type="STRING" size="256"/>
          <Column id="direcprcpno" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="prcpno" type="STRING" size="256"/>
          <Column id="prcphistno" type="STRING" size="256"/>
          <Column id="prcpexecdeptcd" type="STRING" size="256"/>
          <Column id="prcpgenrflag" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="trnpttype" type="STRING" size="256"/>
          <Column id="scs" type="STRING" size="256"/>
          <Column id="cryoyn" type="STRING" size="256"/>
          <Column id="cd34collyn" type="STRING" size="256"/>
          <Column id="thawyn" type="STRING" size="256"/>
          <Column id="stemcellflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="prcphopedd"/>
            <Col id="prcphopefromdd"/>
            <Col id="prcphopetodd"/>
            <Col id="srchflag">Y</Col>
            <Col id="prcpdetlinfo"/>
            <Col id="direcprcpno"/>
            <Col id="prcpdd"/>
            <Col id="prcpno"/>
            <Col id="prcphistno"/>
            <Col id="prcpexecdeptcd"/>
            <Col id="prcpgenrflag"/>
            <Col id="indd"/>
            <Col id="cretno"/>
            <Col id="orddeptcd"/>
            <Col id="orddrid"/>
            <Col id="execprcpuniqno"/>
            <Col id="trnpttype"/>
            <Col id="scs"/>
            <Col id="cryoyn"/>
            <Col id="cd34collyn"/>
            <Col id="thawyn"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_patinfo_direcprcplist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_patinfo_direcprcplist_item_oncolumnchanged">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256" sumtext="check"/>
          <Column id="prcphopedd" type="STRING" size="256" sumtext="적용(처방희망)일자"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="wardnm" type="STRING" size="256" sumtext="병동"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실"/>
          <Column id="deptnm" type="STRING" size="256" sumtext="진료과"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="cretno" type="INT" size="256" sumtext="입원일련번호"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_prcpdirecinfo_direcprcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256" sumtext="check"/>
          <Column id="execprcpstatcd" type="STRING" size="256" sumtext="처방상태"/>
          <Column id="prcphopedd" type="STRING" size="256" sumtext="적용(처방희망)일자"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="처방의명"/>
          <Column id="fstrgstdt" type="STRING" size="256" sumtext="최초처방입력일시"/>
          <Column id="stemcellflag" type="STRING" size="256" sumtext="조혈모세포구분"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="prcpno" type="INT" size="256" sumtext="처방번호"/>
          <Column id="prcphistno" type="INT" size="256" sumtext="처방이력번호"/>
          <Column id="execprcpuniqno" type="INT" size="256" sumtext="처방유일번호"/>
          <Column id="prcpgenrflag" type="STRING" size="256" sumtext="발생구분"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="cretno" type="INT" size="256" sumtext="원무키"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="원무진료과"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="원무진료의"/>
          <Column id="atdoctid" type="STRING" size="256" sumtext="원무주치의"/>
          <Column id="medispclid" type="STRING" size="256" sumtext="원무지정의"/>
          <Column id="detlflag" type="STRING" size="256" sumtext="정보존재여부"/>
          <Column id="adddetlflag" type="STRING" size="256" sumtext="정보존재여부"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_prcpinfo_calcscorinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_prcpinfo_calcscorinfo_oncolumnchanged">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256" sumtext="check"/>
          <Column id="prcphopedd" type="STRING" size="256" sumtext="적용(처방희망)일자"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="prcpvol" type="STRING" size="256" sumtext="용량"/>
          <Column id="prcpqty" type="STRING" size="256" sumtext="수량"/>
          <Column id="prcptims" type="STRING" size="256" sumtext="횟수"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="일수"/>
          <Column id="prcpmixno" type="STRING" size="256" sumtext="MixNo"/>
          <Column id="payflagcd" type="STRING" size="256" sumtext="급여구분"/>
          <Column id="erprcpflag" type="STRING" size="256" sumtext="응급여부"/>
          <Column id="prcpdelivefact" type="STRING" size="256" sumtext="처방전달사항"/>
          <Column id="prcpno" type="INT" size="256" sumtext="처방번호"/>
          <Column id="prcphistno" type="INT" size="256" sumtext="처방이력번호"/>
          <Column id="hscttempprcpflag" type="STRING" size="256" sumtext="HSCT임시구분"/>
          <Column id="execprcpuniqno" type="INT" size="256" sumtext="실시처방유일번호"/>
          <Column id="hsctlnkno" type="STRING" size="256" sumtext="HSCT연계번호"/>
          <Column id="execdd" type="STRING" size="256" sumtext="실시일자"/>
          <Column id="rcptdd" type="STRING" size="256" sumtext="수납일자"/>
          <Column id="rcptyn" type="STRING" size="256" sumtext="수납여부"/>
          <Column id="execprcpstatcd" type="STRING" size="256" sumtext="처방상태"/>
          <Column id="prcpflag" type="STRING" size="256" sumtext="시행미시행구분"/>
          <Column id="execdeptyn" type="STRING" size="256" sumtext="시행부서여부"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="rsrvflag" type="STRING" size="256" sumtext="반환구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmbinfo_execprcpstatcd_M0011" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmbinfo_trnpttype_A0158" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmbinfo_stemcellsource_A0159" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_prcpdetlinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="trnpttype" type="STRING" size="256"/>
          <Column id="scs" type="STRING" size="256"/>
          <Column id="cryoyn" type="STRING" size="256"/>
          <Column id="cd34yn" type="STRING" size="256"/>
          <Column id="thawingyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="trnpttype"/>
            <Col id="scs"/>
            <Col id="cryoyn">Y</Col>
            <Col id="cd34yn">N</Col>
            <Col id="thawingyn">N</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_cmbinfo_payflagcd_M0029" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_hsctinfo_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호1"/>
          <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호2"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="cntctel" type="STRING" size="256" sumtext="연락처"/>
          <Column id="mpphontel" type="STRING" size="256" sumtext="휴대폰"/>
          <Column id="zipcd1" type="STRING" size="256" sumtext="우편번호1"/>
          <Column id="zipcd2" type="STRING" size="256" sumtext="우편번호2"/>
          <Column id="zipcdseq" type="INT" size="256" sumtext="우편번호일련번호"/>
          <Column id="cntcaddr" type="STRING" size="256" sumtext="상세주소"/>
          <Column id="email" type="STRING" size="256" sumtext="EMail"/>
          <Column id="dethresn" type="STRING" size="256" sumtext="사망사유"/>
          <Column id="age" type="STRING" size="256" sumtext="나이"/>
          <Column id="addr" type="STRING" size="256" sumtext="주소"/>
          <Column id="dethdd" type="STRING" size="256" sumtext="사망일자"/>
          <Column id="indschacptstat" type="STRING" size="256" sumtext="현재재원여부"/>
          <Column id="dethrgstyn" type="STRING" size="256" sumtext="사망정보기등록여부"/>
          <Column id="procernm" type="STRING" size="256" sumtext="보호자명"/>
          <Column id="pcntctel" type="STRING" size="256" sumtext="보호자연락처"/>
          <Column id="cibmtrid" type="STRING" size="256" sumtext="CIBMTR ID"/>
          <Column id="resrchyn" type="STRING" size="256" sumtext="Research 여부"/>
          <Column id="lostfudd" type="STRING" size="256" sumtext="Lost F/U 일자"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
            <Col id="sex"/>
            <Col id="cntctel"/>
            <Col id="mpphontel"/>
            <Col id="zipcd1"/>
            <Col id="zipcd2"/>
            <Col id="zipcdseq"/>
            <Col id="cntcaddr"/>
            <Col id="email"/>
            <Col id="age"/>
            <Col id="addr"/>
            <Col id="dethdd"/>
            <Col id="indschacptstat"/>
            <Col id="dethrgstyn"/>
            <Col id="procernm"/>
            <Col id="pcntctel"/>
            <Col id="cibmtrid"/>
            <Col id="resrchyn"/>
            <Col id="lostfudd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_addprcpdetlinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="addseqno" type="STRING" size="256"/>
          <Column id="trnpttype" type="STRING" size="256"/>
          <Column id="scs" type="STRING" size="256"/>
          <Column id="cryoyn" type="STRING" size="256"/>
          <Column id="cd34collyn" type="STRING" size="256"/>
          <Column id="thawyn" type="STRING" size="256"/>
          <Column id="iudgb" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="prcpdd"/>
            <Col id="execprcpuniqno"/>
            <Col id="addseqno"/>
            <Col id="trnpttype"/>
            <Col id="scs"/>
            <Col id="cryoyn"/>
            <Col id="cd34collyn"/>
            <Col id="thawyn"/>
            <Col id="iudgb"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_prcpinfo_addprcpdetlinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_req_data_calcscorinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_properties_error" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="msg" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="func" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">조혈모세포입고관리</Col>
            <Col id="func">fOpenPopupCellWlnMngt</Col>
          </Row>
          <Row>
            <Col id="label">세포처리 Result입력</Col>
            <Col id="func">fOpenPopupCellTretRsltInpt</Col>
          </Row>
          <Row>
            <Col id="label">세포보관 및 해동 Result입력</Col>
            <Col id="func">fOpenPopupCellKeepThawRsltInpt</Col>
          </Row>
          <Row>
            <Col id="label">조혈모세포보관위치관리</Col>
            <Col id="func">fOpenPopupCellKeepPosMngt</Col>
          </Row>
          <Row>
            <Col id="label">환자진료정보조회</Col>
            <Col id="func">fOpenPopupPatOrdInfo</Col>
          </Row>
          <Row>
            <Col id="label">시행부서처방</Col>
            <Col id="func">fOpenPopupExecDeptPrcp</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_prcphopefromdd" propid="value" datasetid="ds_send_baseinfo" columnid="prcphopefromdd"/>
      <BindItem id="item1" compid="grp_sea.ipt_prcphopetodd" propid="value" datasetid="ds_send_baseinfo" columnid="prcphopetodd"/>
      <BindItem id="item2" compid="grp_sea.input30" propid="value" datasetid="ds_send_baseinfo" columnid="pid"/>
      <BindItem id="item3" compid="grp_sea.radio2" propid="value" datasetid="ds_send_baseinfo" columnid="srchflag"/>
      <BindItem id="item4" compid="combo7" propid="value" datasetid="ds_main_prcpdetlinfo" columnid="trnpttype"/>
      <BindItem id="item5" compid="combo4" propid="value" datasetid="ds_main_prcpdetlinfo" columnid="scs"/>
      <BindItem id="item6" compid="combo2" propid="value" datasetid="ds_main_prcpdetlinfo" columnid="thawingyn"/>
      <BindItem id="item7" compid="combo3" propid="value" datasetid="ds_main_prcpdetlinfo" columnid="cd34yn"/>
      <BindItem id="item8" compid="combo1" propid="value" datasetid="ds_main_prcpdetlinfo" columnid="cryoyn"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "ast_examcurexp::AEZ0001.xjs";
include "ast_hsctxp::bmtcommon.xjs";

var vSuppdeptcd ;
function SMABC00100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMABC00100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_patlist);
	grdf_initGrid(grd_direcprcp);
	grdf_initGrid(grd_calcscorlist);
	
	lf_aezfSetSuppDeptcd();
	vSuppdeptcd = frmf_getPrestDeptCd();
	
	ds_send_baseinfo.setColumn(0, "prcpexecdeptcd", vSuppdeptcd);
	
	var arrParam = [{dsNm: "ds_init_cmbinfo_trnpttype_A0158", cdGrpId: "A0158"}
				  , {dsNm: "ds_init_cmbinfo_stemcellsource_A0159", cdGrpId: "A0159"}
				  , {dsNm: "ds_init_cmbinfo_trnpttype_M0029", cdGrpId: "M0029"}
				  , {dsNm: "ds_init_cmbinfo_execprcpstatcd_M0011", cdGrpId: "M0011"}]
	appf_getCodeList(arrParam); 
	
// 	var nodelist = ds_init_cmbinfo_execprcpstatcd_M0011
// 	var newNode  = instance1.createNode("element", "M0011", "");
// 	var childnode1 = instance1.createNode("element", "cdnm", "");
// 	var childnode2 = instance1.createNode("element", "cdid", "");
// 	newNode.appendChild(childnode1);
// 	newNode.appendChild(childnode2);
// 	
// 	var newNode2  = instance1.createNode("element", "M0011", "");
// 	var childnode12 = instance1.createNode("element", "cdnm", "");
// 	var childnode22 = instance1.createNode("element", "cdid", "");
// 	newNode2.appendChild(childnode12);
// 	newNode2.appendChild(childnode22);
// 	
// 	var newNode3  = instance1.createNode("element", "M0011", "");
// 	var childnode13 = instance1.createNode("element", "cdnm", "");
// 	var childnode23 = instance1.createNode("element", "cdid", "");
// 	newNode3.appendChild(childnode13);
// 	newNode3.appendChild(childnode23);

	if (ds_init_cmbinfo_execprcpstatcd_M0011.rowcount > 0) 
	{
		ds_init_cmbinfo_execprcpstatcd_M0011.insertRow(0);
		ds_init_cmbinfo_execprcpstatcd_M0011.insertRow(0);
		ds_init_cmbinfo_execprcpstatcd_M0011.insertRow(0);
		
		ds_init_cmbinfo_execprcpstatcd_M0011.setColumn(0,  "cdnm", "반환요청");
		ds_init_cmbinfo_execprcpstatcd_M0011.setColumn(0,  "cdid", "reqdc");
		ds_init_cmbinfo_execprcpstatcd_M0011.setColumn(1,  "cdnm", "반환완료");
		ds_init_cmbinfo_execprcpstatcd_M0011.setColumn(1,  "cdid", "cnfmdc");
		ds_init_cmbinfo_execprcpstatcd_M0011.setColumn(2,  "cdnm", "지시");
		ds_init_cmbinfo_execprcpstatcd_M0011.setColumn(2,  "cdid", "direc");
	}

	ds_send_baseinfo.setColumn(0, "prcphopefromdd", utlf_getCurrentDate().toDate().getAddDate(-1,"D").getDateFormat("YYYYMMDD"));
	ds_send_baseinfo.setColumn(0, "prcphopetodd", utlf_getCurrentDate());
}

function grp_sea_input30_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		grp_sea.btn_sea.click();
	}
}

function grp_sea_btn_srchpat_onclick(obj:Button,  e:ClickEventInfo)
{
	abofGetPamPatientSearch("ds_main_hsctinfo_patinfolist", "ds_patinfolist", "P")
}

function grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRABC00101";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqGetStemCellPrcpList";
		oParam.inds        = "req=ds_send_baseinfo";
		oParam.outds       = "ds_main_patinfo_direcprcplist_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRABC00101";

	tranf_submit(oParam);
}

function btn_cle_onclick(obj:Button,  e:ClickEventInfo)
{
	grd_calcscorlist.setCellProperty("Head", 1, "text", 0);
	
	ds_send_baseinfo.setColumn(0, "prcphopefromdd", utlf_getCurrentDate());
	ds_send_baseinfo.setColumn(0, "prcphopetodd", utlf_getCurrentDate());
	ds_send_baseinfo.setColumn(0, "pid", "");
	
	ds_main_prcpinfo_calcscorinfo.clearData();
	ds_main_prcpdirecinfo_direcprcpinfo.clearData();
	ds_send_addprcpdetlinfo.clearData();
	
	var oParam = {};
		oParam.id          = "TRABC00101";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqGetStemCellPrcpList";
		oParam.inds        = "req=ds_send_baseinfo";
		oParam.outds       = "ds_main_patinfo_direcprcplist_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRABC00101";

	tranf_submit(oParam);
}

function button20_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SMABO00100", "SMABO00100", "", "", "", "", "", "", "", "", "", "", "M");
}

function button22_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SMABO00800", "SMABO00800", "", "", "", "", "", "", "", "", "", "", "M");
}

function button4_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SMABO02000", "SMABO02000", "", "", "", "", "", "", "", "", "", "", "M");
}

function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SMMMR02100", "SMMMR02100", "", "", "", "", "", "", "", "", "", "", "M");
}

function btn_appdetl_onclick(obj:Button,  e:ClickEventInfo)
{
	if(utlf_isNull(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "execprcpstatcd")))
	{
		sysf_messageBox("지시처방이 선택되지", "E007");
		return false;
	}
	if(!utlf_isNull(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "adddetlflag")))
	{
		sysf_messageBox("이미 추가처리결과가 등록 되어 추가상세정보를 수정", "E001");
		return;
	}

	var flag = "";

	flag =  ds_main_prcpinfo_addprcpdetlinfo.getColumn(0, "trnpttype");
	flag = flag+ ds_main_prcpinfo_addprcpdetlinfo.getColumn(0, "scs");
	flag = flag+ ds_main_prcpinfo_addprcpdetlinfo.getColumn(0, "cryoyn");
	flag = flag+ ds_main_prcpinfo_addprcpdetlinfo.getColumn(0, "cd34collyn");
	flag = flag+ ds_main_prcpinfo_addprcpdetlinfo.getColumn(0, "thawyn");

	if ( (flag != "00NNN") && !utlf_isNull(ds_main_prcpinfo_addprcpdetlinfo.getColumn(0, "iudgb")))
	{
		if (sysf_messageBox("이미 추가상세정보가 저장되어 있습니다. 다시", "Q002") != 6 ) 
		{
			return false;
		}
	}
	
	ds_send_addprcpdetlinfo.setColumn(0, "trnpttype", ds_main_prcpdetlinfo.getColumn(0, "trnpttype"));
	ds_send_addprcpdetlinfo.setColumn(0, "scs", ds_main_prcpdetlinfo.getColumn(0, "scs"));
	ds_send_addprcpdetlinfo.setColumn(0, "cryoyn", ds_main_prcpdetlinfo.getColumn(0, "cryoyn"));
	ds_send_addprcpdetlinfo.setColumn(0, "cd34collyn", ds_main_prcpdetlinfo.getColumn(0, "cd34yn"));
	ds_send_addprcpdetlinfo.setColumn(0, "thawyn", ds_main_prcpdetlinfo.getColumn(0, "thawingyn"));
	ds_send_addprcpdetlinfo.setColumn(0, "addseqno", ds_main_prcpinfo_addprcpdetlinfo.getColumn(0, "addseqno"));
	
	if(ds_main_prcpinfo_addprcpdetlinfo.getColumn(0, "iudgb") == "U") 
	{
		ds_send_addprcpdetlinfo.setColumn(0, "iudgb", "U");
	} 
	else 
	{
		ds_send_addprcpdetlinfo.setColumn(0, "iudgb", "I");
	}
	
	var oParam = {};
		oParam.id          = "TXABC00103";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqExeAddPrcpDetlInfo";
		oParam.inds        = "baseinfo=ds_send_addprcpdetlinfo";
		oParam.outds       = "ds_=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXABC00103";

	tranf_submit(oParam);
}

function cf_TXABC00103(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0)
    {
		return;
	}
	else
	{
		dsf_setFixVal(ds_send_baseinfo, "prcpflag:1,hsctdelivepos:3");
		var oParam = {};
			oParam.id          = "TRABC00103";
			oParam.service     = "hsctstemcellapp.StemCellTreat";
			oParam.method      = "reqGetStemCellPrcp";
			oParam.inds        = "req=ds_send_baseinfo";
			oParam.outds       = "ds_main_prcpinfo_calcscorinfo=calcscorinfo ds_main_prcpinfo_addprcpdetlinfo=addprcpdetlinfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TRABC00103";

		tranf_submit(oParam);
		
		dsf_setFixVal(ds_main_prcpinfo_calcscorinfo, "chk:N");
	}	
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	if(utlf_isNull(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "execprcpstatcd")))
	{
		sysf_messageBox("지시처방이 선택되지", "E007");
		return false;
	}
	if(!utlf_isNull(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "detlflag")))
	{
		sysf_messageBox("이미 처리결과가 등록 되어 상세정보를 수정", "E001");
		return;
	}

	var flag = "";

	flag =  ds_main_prcpdetlinfo.getColumn(0, "trnpttype");
	flag = flag+ ds_main_prcpdetlinfo.getColumn(0, "scs");
	flag = flag+ ds_main_prcpdetlinfo.getColumn(0, "cryoyn");
	flag = flag+ ds_main_prcpdetlinfo.getColumn(0, "cd34yn");
	flag = flag+ ds_main_prcpdetlinfo.getColumn(0, "thawingyn");

	ds_send_baseinfo.setColumn(0, "prcpdetlinfo", flag);
	ds_send_baseinfo.setColumn(0, "trnpttype", ds_main_prcpdetlinfo.getColumn(0, "trnpttype"));
	ds_send_baseinfo.setColumn(0, "scs", ds_main_prcpdetlinfo.getColumn(0, "scs"));
	ds_send_baseinfo.setColumn(0, "cryoyn", ds_main_prcpdetlinfo.getColumn(0, "cryoyn"));
	ds_send_baseinfo.setColumn(0, "cd34collyn", ds_main_prcpdetlinfo.getColumn(0, "cd34yn"));
	ds_send_baseinfo.setColumn(0, "thawyn", ds_main_prcpdetlinfo.getColumn(0, "thawingyn"));

	if ( ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "stemcellflag") != "00NNN" ) 
	{
		if(sysf_messageBox("이미 상세정보가 저장되어 있습니다. 다시", "Q002") != 6 ) 
		{
			return false;
		}
		var oParam = {};
			oParam.id          = "TXABC00103";
			oParam.service     = "hsctstemcellapp.StemCellTreat";
			oParam.method      = "reqSetPrcpDetlInfo";
			oParam.inds        = "baseinfo=ds_send_addprcpdetlinfo";
			oParam.outds       = "ds_=item";
			oParam.async       = false;
			//oParam.callback    = "cf_TXABC00103";

		tranf_submit(oParam);
	}
	
	ds_send_baseinfo.setColumn(0, "stemcellflag", ds_send_baseinfo.getColumn(0, "prcpdetlinfo"));
	dsf_setFixVal(ds_send_baseinfo, "prcpstatcd:600");
	
	var oParam = {};
		oParam.id          = "TXABC00102";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqSetDirecPrcpStat";
		oParam.inds        = "baseinfo=ds_send_baseinfo";
		oParam.outds       = "ds_=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXABC00102";

	tranf_submit(oParam);
}

function cf_TXABC00102(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0) 
    {
		return;
	}
	else
	{
		dsf_setFixVal(ds_send_baseinfo, "prcpflag:2,hsctdelivepos:0");
		var oParam = {};
			oParam.id          = "TRABC00102";
			oParam.service     = "hsctstemcellapp.StemCellTreat";
			oParam.method      = "reqGetStemCellPrcp";
			oParam.inds        = "req=ds_send_baseinfo";
			oParam.outds       = "ds_main_prcpdirecinfo_direcprcpinfo=direcprcpinfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TRABC00102";

		tranf_submit(oParam);
		dsf_setTypeFormat(ds_main_prcpdirecinfo_direcprcpinfo, "prcpno:INT^prcphistno:INT^execprcpuniqno:INT^cretno:INT");
		dsf_setFixVal(ds_main_prcpdirecinfo_direcprcpinfo, "chk:N");
	}
}

function btn_deldetlinfo_onclick(obj:Button,  e:ClickEventInfo)
{
	if(utlf_isNull(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "execprcpstatcd")))
	{	
		sysf_messageBox("지시처방이 선택되지", "E007");
		return false;
	}
	if(!utlf_isNull(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "adddetlflag")))
	{
		sysf_messageBox("추가 처리결과를 먼저 삭제하여 주세요.", "E999");
		return;
	}
	if(!utlf_isNull(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "detlflag")))
	{
		sysf_messageBox("셀처리 처리결과를 먼저 삭제하여 주세요.", "E999");
		return;
	}
	
	var Count = ds_main_prcpinfo_calcscorinfo.findRow("execprcpstatcd", "610");
	
	if(Count > 0) 
	{
		sysf_messageBox("수가처방을 먼저 반환하여 주세요.", "E999");
		return;
	}
	
	dsf_setFixVal(ds_send_baseinfo, "stemcellflag:00NNN,prcpstatcd:000");
	var oParam = {};
		oParam.id          = "TXABC00102";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqDelPrcpDetlInfo";
		oParam.inds        = "baseinfo=ds_send_baseinfo";
		oParam.outds       = "ds_=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXABC00102";

	tranf_submit(oParam);
}

function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetExecStatus("Y");
}

function fSetExecStatus(sExecStatus)
{
	var iSelect = 0;

	for (var i = 0; i < ds_main_prcpinfo_calcscorinfo.rowcount; i++) 
	{
		var sChk              = utlf_transNullToEmpty(ds_main_prcpinfo_calcscorinfo.getColumn(i, "chk"));
		var sRcptYN           = utlf_transNullToEmpty(ds_main_prcpinfo_calcscorinfo.getColumn(i, "rcptyn"));
		var sPrcpNm           = utlf_transNullToEmpty(ds_main_prcpinfo_calcscorinfo.getColumn(i, "prcpnm"));
		var sHsctTempPrcpFlag = utlf_transNullToEmpty(ds_main_prcpinfo_calcscorinfo.getColumn(i, "hscttempprcpflag"));

		if ( sChk == "Y" )
		{
			if ( sExecStatus == "N" ) 
			{
				if ( sRcptYN == "P" ) 
				{
					sysf_messageBox(sPrcpNm + " 처방은 반환된 처방입니다. 시행내용을 확인하시기 바랍니다", "E999", "");
					return false;
				}
				if ( sHsctTempPrcpFlag == "N" &&  ds_main_prcpinfo_calcscorinfo.getColumn(i, "execprcpstatcd") >= "610") 
				{
					sysf_messageBox(sPrcpNm + " 처방은 시행된 처방입니다. 시행내용을 확인하시기 바랍니다", "E999", "");
					return false;
				}
			} 
			else if ( sExecStatus == "Y" ) 
			{
				if ( sHsctTempPrcpFlag == "Y" ) 
				{
					sysf_messageBox(sPrcpNm + " 처방은 미시행처방입니댜. 시행취소할 내용을 확인하시기 바랍니다", "E999", "");
					return false;
				}
				if ( sRcptYN == "Y" ) 
				{
					sysf_messageBox(sPrcpNm + " 처방은 이미 수납되어 시행취소를 할 수 없습니다. 반환요청하시기 바랍니다", "E999", "");
					return false;
				}
				if ( sRcptYN == "P" ) 
				{
					sysf_messageBox(sPrcpNm + " 처방은 반환된 처방입니다. 시행취소할 내용을 확인하시기 바랍니다", "E999", "");
					return false;
				}
			} 
			else if ( sExecStatus == "D" ) 
			{
				if ( sRcptYN == "P" ) 
				{
					sysf_messageBox(sPrcpNm + " 처방은 반환된 처방입니다. 반환요청할 내용을 확인하시기 바랍니다", "E999", "");
					return false;
				}
				if ( sHsctTempPrcpFlag == "Y" ) 
				{
					sysf_messageBox(sPrcpNm + " 처방은 미시행처방입니댜. 반환요청할 내용을 확인하시기 바랍니다", "E999", "");
					return false;
				}
				else if ( sHsctTempPrcpFlag == "N" ) 
				{
					if ( sRcptYN != "Y" ) 
					{
					}
				}
			}
			ds_main_prcpinfo_calcscorinfo.setColumn(i, "prcpflag", sExecStatus);
			iSelect ++;
		}
	}

	if ( iSelect == 0 ) 
	{
		sysf_messageBox("선택한 처방이 없습니다.  처방을 선택하시기 바랍니다", "E999", "");
		return false;
	}

	var nodeList = ds_main_prcpinfo_calcscorinfo.getCaseCount("chk == 'Y'");
	
	if ( nodeList == 0 ) 
	{
		sysf_messageBox("처방내역을 선택해 주십시오.","I999");
		return "0";
	}
	
	ds_main_prcpinfo_calcscorinfo.filterstr = "chk == 'Y'";
	ds_send_req_data_calcscorinfo.copyData(ds_main_prcpinfo_calcscorinfo, true);
	ds_main_prcpinfo_calcscorinfo.filterstr = "";
	
	var oParam = {};
		oParam.id          = "TXABC00101";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqSetPrcpStat";
		oParam.inds        = "baseinfo=ds_send_baseinfo calcscorinfo=ds_send_req_data_calcscorinfo";
		oParam.outds       = "ds_=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TXABC00101";

	tranf_submit(oParam);
	
	dsf_setFixVal(oDataset, "prcpflag:1,hsctdelivepos:3");

	dsf_setFixVal(ds_send_baseinfo, "prcpflag:1,hsctdelivepos:3");
	var oParam = {};
		oParam.id          = "TRABC00103";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqGetStemCellPrcp";
		oParam.inds        = "req=ds_send_baseinfo";
		oParam.outds       = "ds_main_prcpinfo_calcscorinfo=calcscorinfo ds_main_prcpinfo_addprcpdetlinfo=addprcpdetlinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRABC00103";

	tranf_submit(oParam);
	
	dsf_setFixVal(ds_main_prcpinfo_calcscorinfo, "chk:N");
	
	lf_aezfSetRowStyle(grd_calcscorlist, "1^4" , "N^Y" , "hscttempprcpflag");
}

function button6_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetExecStatus("D");
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetExecStatus("N");
}

function ds_main_patinfo_direcprcplist_item_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "chk")
	{
		obj.setColumn(e.row, "chk", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}

function ds_main_prcpinfo_calcscorinfo_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "chk")
	{
		obj.setColumn(e.row, "chk", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
	
	if(e.columnid == "erprcpflag")
	{
		obj.setColumn(e.row, "erprcpflag", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}

function grd_patlist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var spid = ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "pid");
						
	if (utlf_isNull(spid) || spid == " " ) 
	{
		return false;
	}
	
	ds_main_prcpinfo_calcscorinfo.clearData();
	ds_send_baseinfo.setColumn(0, "pid", ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "pid"));
	ds_send_baseinfo.setColumn(0, "prcpdd", ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "prcpdd"));
	
	dsf_setFixVal(ds_send_baseinfo, "prcpflag:2,hsctdelivepos:0");
	
	var oParam = {};
		oParam.id          = "TRABC00102";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqGetStemCellPrcp";
		oParam.inds        = "req=ds_send_baseinfo";
		oParam.outds       = "ds_main_prcpdirecinfo_direcprcpinfo=direcprcpinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRABC00102";

	tranf_submit(oParam);

	if ( ds_main_prcpdirecinfo_direcprcpinfo.rowcount > 0)
	{
		ds_send_baseinfo.setColumn(0, "direcprcpno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(0, "prcpno"));
		
		var flag = String(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(0, "stemcellflag"));

		ds_main_prcpdetlinfo.setColumn(0, "trnpttype", flag.substring(0,1));
		ds_main_prcpdetlinfo.setColumn(0, "scs", flag.substring(1,2));
		ds_main_prcpdetlinfo.setColumn(0, "cryoyn", flag.substring(2,3));
		ds_main_prcpdetlinfo.setColumn(0, "cd34yn", flag.substring(3,4));
		ds_main_prcpdetlinfo.setColumn(0, "thawingyn", flag.substring(4,5));
	}
	
	ds_send_addprcpdetlinfo.clearData();
	ds_send_addprcpdetlinfo.addRow();
	
	var pat_info =  "I▦"+ ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "pid")+"▦"+
					ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition,  "indd")+"▦"+ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "cretno")+
					"▦"+sysf_getUserInfo("dutplcecd")+"▦"+ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "prcpdd");
	frmf_setParameter("condparam", pat_info);

	appf_initPatientInfo(pat_info);
	//frmf_modal("SPMMO08900", "SPMMO08900", "", "", "", "", "", "", "", "", "", "", "M");
	
	if(ds_properties_error.getColumn(0, "msg") == "이식차수가 2차 이상인 Multiple myeloma환자입니다.")
	{
		sysf_messageBox(ds_properties_error.getColumn(0, "msg"), "I999");
	}
}

function grd_direcprcp_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if ( (ds_main_prcpdirecinfo_direcprcpinfo.rowposition >= 0))
	{
		if( ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "stemcellflag") == "00NNN" )
		{
			btn_appdetl.enable = false;
			btn_deldetlinfo.enable = false;
		}
		else 
		{
			btn_appdetl.enable = true;
			btn_deldetlinfo.enable = true;
		}
		
		var sflag = String(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "stemcellflag"));

		if (utlf_isNull(sflag) || sflag == " " )
		{
			return false;
		}

		ds_main_prcpdetlinfo.setColumn(0, "trnpttype", sflag.substring(0,1));
		ds_main_prcpdetlinfo.setColumn(0, "scs", sflag.substring(1,2));
		ds_main_prcpdetlinfo.setColumn(0, "cryoyn", sflag.substring(2,3));
		ds_main_prcpdetlinfo.setColumn(0, "cd34yn", sflag.substring(3,4));
		ds_main_prcpdetlinfo.setColumn(0, "thawingyn", sflag.substring(4,5));
		
		ds_send_baseinfo.setColumn(0, "direcprcpno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpno"));
		ds_send_baseinfo.setColumn(0, "prcpno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpno"));
		ds_send_baseinfo.setColumn(0, "prcphistno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcphistno"));
		ds_send_baseinfo.setColumn(0, "prcpgenrflag", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpgenrflag"));
		ds_send_baseinfo.setColumn(0, "indd", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "indd"));
		ds_send_baseinfo.setColumn(0, "cretno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "cretno"));
		ds_send_baseinfo.setColumn(0, "orddeptcd", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "orddeptcd"));
		ds_send_baseinfo.setColumn(0, "orddrid", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "orddrid"));
		ds_send_baseinfo.setColumn(0, "execprcpuniqno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "execprcpuniqno"));
		ds_send_baseinfo.setColumn(0, "prcpdd", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpdd"));
		ds_send_addprcpdetlinfo.setColumn(0, "execprcpuniqno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "execprcpuniqno"));
		ds_send_addprcpdetlinfo.setColumn(0, "prcpdd", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpdd"));
		
		var oParam = {};
			oParam.id          = "TRABC00103";
			oParam.service     = "hsctstemcellapp.StemCellTreat";
			oParam.method      = "reqGetStemCellPrcp";
			oParam.inds        = "req=ds_send_baseinfo";
			oParam.outds       = "ds_main_prcpinfo_calcscorinfo=calcscorinfo ds_main_prcpinfo_addprcpdetlinfo=addprcpdetlinfo";
			oParam.async       = false;
			oParam.callback    = "cf_TRABC00103";

		tranf_submit(oParam);

		lf_aezfSetRowStyle(grd_calcscorlist, "1^4" , "N^Y" , "hscttempprcpflag");
	}
}

function grd_calcscorlist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if ( (ds_main_prcpdirecinfo_direcprcpinfo.rowposition.row >= 0))
	{
		if( ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "stemcellflag") == "00NNN" )
		{
			btn_appdetl.enable = false;
			btn_deldetlinfo.enable = false;
		}
		else 
		{
			btn_appdetl.enable = true;
			btn_deldetlinfo.enable = true;
		}
		
		var sflag = String(ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "stemcellflag"));

		if (utlf_isNull(sflag) || sflag == " " ) 
		{
			return false;
		}

		ds_main_prcpdetlinfo.setColumn(0, "trnpttype", sflag.substring(0,1));
		ds_main_prcpdetlinfo.setColumn(0, "scs", sflag.substring(1,2));
		ds_main_prcpdetlinfo.setColumn(0, "cryoyn", sflag.substring(2,3));
		ds_main_prcpdetlinfo.setColumn(0, "cd34yn", sflag.substring(3,4));
		ds_main_prcpdetlinfo.setColumn(0, "thawingyn", sflag.substring(4,5));
		
		ds_send_baseinfo.setColumn(0, "direcprcpno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpno"));
		ds_send_baseinfo.setColumn(0, "prcpno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpno"));

		ds_send_baseinfo.setColumn(0, "prcphistno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcphistno"));
		ds_send_baseinfo.setColumn(0, "prcpgenrflag", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpgenrflag"));
		ds_send_baseinfo.setColumn(0, "indd", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "indd"));
		ds_send_baseinfo.setColumn(0, "cretno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "cretno"));
		ds_send_baseinfo.setColumn(0, "orddeptcd", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "orddeptcd"));
		ds_send_baseinfo.setColumn(0, "orddrid", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "orddrid"));
		ds_send_baseinfo.setColumn(0, "execprcpuniqno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "execprcpuniqno"));
		ds_send_baseinfo.setColumn(0, "prcpdd", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpdd"));
		ds_send_addprcpdetlinfo.setColumn(0, "execprcpuniqno", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "execprcpuniqno"));
		ds_send_addprcpdetlinfo.setColumn(0, "prcpdd", ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpdd"));
		
		dsf_setFixVal(ds_send_baseinfo, "prcpflag:1,hsctdelivepos:3");
		var oParam = {};
			oParam.id          = "TRABC00103";
			oParam.service     = "hsctstemcellapp.StemCellTreat";
			oParam.method      = "reqGetStemCellPrcp";
			oParam.inds        = "req=ds_send_baseinfo";
			oParam.outds       = "ds_main_prcpinfo_calcscorinfo=calcscorinfo ds_main_prcpinfo_addprcpdetlinfo=addprcpdetlinfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TRABC00103";

		tranf_submit(oParam);
		
		dsf_setFixVal(ds_main_prcpinfo_calcscorinfo, "chk:N");
		lf_aezfSetRowStyle(grd_calcscorlist, "1^4" , "N^Y" , "hscttempprcpflag");
	}
}

function grd_direcprcp_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	pmn_menu1.trackPopup(e.screenX,e.screenY);
}

function pmn_menu1_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id +"();");
}

function fOpenPopupCellWlnMngt()
{
	if ( ds_main_prcpdirecinfo_direcprcpinfo.rowposition < 0)
	{
		return;
	}
	frmf_modal("SMABC00500", "SMABC00500", "", "", "", "", "", "", "", "", "", "", "M");
}

function fOpenPopupCellTretRsltInpt() 
{
	if ( ds_main_prcpdirecinfo_direcprcpinfo.rowposition < 0)
	{
		return;
	}

	var pid        = ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "pid");
	var prcphopedd = ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcphopedd");
	var prcpdd     = ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpdd");
	var indd       = ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "indd");
	var cretno     = ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "cretno");
	var sflag = pid + "▦" + prcphopedd + "▦" + prcpdd + "▦" + indd + "▦" + cretno;

	frmf_setParameter("opener_parameter_id", sflag);
	frmf_modal("SMABC00200", "SMABC00200", "", "", "", "", "", "", "", "", "", "", "M");
	
	dsf_setFixVal(ds_send_baseinfo, "prcpflag:2,hsctdelivepos:0");
	var oParam = {};
		oParam.id          = "TRABC00102";
		oParam.service     = "hsctstemcellapp.StemCellTreat";
		oParam.method      = "reqGetStemCellPrcp";
		oParam.inds        = "req=ds_send_baseinfo";
		oParam.outds       = "ds_main_prcpdirecinfo_direcprcpinfo=direcprcpinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRABC00102";

	tranf_submit(oParam);
	dsf_setTypeFormat(ds_main_prcpdirecinfo_direcprcpinfo, "prcpno:INT^prcphistno:INT^execprcpuniqno:INT^cretno:INT");
	dsf_setFixVal(ds_main_prcpdirecinfo_direcprcpinfo, "chk:N");
}

function fOpenPopupCellKeepThawRsltInpt()
{
	if ( ds_main_prcpdirecinfo_direcprcpinfo.rowposition < 0)
	{
		return;
	}
	
	var thawingyn = ds_main_prcpdetlinfo.getColumn(0, "thawingyn");

	var pid = ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "pid");
	var prcpdd = ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcpdd");
	var execprcpuniqno = ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "execprcpuniqno");
	var prcphopedd = ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "prcphopedd");
	var fstrgstdt = ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "fstrgstdt")
	fstrgstdt = String(fstrgstdt).substr(0, 8);

	var vStemCellFlag = ds_main_prcpdirecinfo_direcprcpinfo.getColumn(ds_main_prcpdirecinfo_direcprcpinfo.rowposition, "stemcellflag");
	vStemCellFlag = String(vStemCellFlag).substring(4, 5);						
	if(vStemCellFlag == "Y") 
	{
		var sflag = pid + "▦" + prcpdd + "▦" + execprcpuniqno + "▦" + prcphopedd + "▦" + fstrgstdt;
	} 
	else 
	{
		var sflag = pid
	}

	frmf_setParameter("opener_parameter_id", sflag);
	frmf_modal("SMABC00300", "SMABC00300", "", "", "", "", "", "", "", "", "", "", "M");
}

function fOpenPopupCellKeepPosMngt()
{
	if ( ds_main_prcpdirecinfo_direcprcpinfo.rowposition < 0)
	{
		return;
	}

	var pid = ds_main_patinfo_direcprcplist_item.getColumn(ds_main_patinfo_direcprcplist_item.rowposition, "pid");

	var sflag = pid;
	frmf_setParameter("opener_parameter_id", sflag);
	frmf_modal("SMABC00400", "SMABC00400", "", "", "", "", "", "", "", "", "", "", "M");	
}

function fOpenPopupPatOrdInfo()
{
	if ( ds_main_prcpdirecinfo_direcprcpinfo.rowposition < 0)
	{
		return;
	}
	frmf_open("SMMMO02500", "SMMMO02500", "", "", "", "", "", "", "", "", "", "", "M");	;
}

function fOpenPopupPatOrdInfo()
{
	if ( ds_main_prcpdirecinfo_direcprcpinfo.rowposition < 0)
	{
		return;
	}
	frmf_open("SMMMO00200", "SMMMO00200", "", "", "", "", "", "", "", "", "", "", "M");	;
}]]></Script>
  </Form>
</FDL>