SMMNS00500.xjs 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <Script type="xscript4.0"><![CDATA[/*
  3. 전문간호 관리환자목록 (SMMNS00500.xrw - JScript )
  4. - Version :
  5. 1) : Ver.1.00.01
  6. */
  7. var xEdupatInfoPath = ds_main_edupatinfo_edupatlist; //관리환자목록 정보
  8. var s1="";
  9. var suppdeptcd = '';//메뉴그룹에 등록된 사용부서코드
  10. //20090617 dhkim
  11. var suppdeptnm = '';//메뉴그룹에 등록된 사용부서명
  12. // emr.mnwmcode
  13. // cdgrupid 022, 023, 024
  14. // 022 : 전문분야리스트 (grupdetldesc : R <- 의뢰데이터구분)
  15. // 023 : 전문간호팀코드
  16. // 024 : 전문간호겸업부서 (상처/장요루)
  17. /**
  18. * 화면 초기화
  19. */
  20. function fInit(){
  21. //20090205 dhkim
  22. //전문간호/BMT전문간호 로 나눠지게 되면서 사용부서에 해당하는 분야로 각각 등록됨.
  23. suppdeptcd = lf_aezfSetSuppDeptcd();//메뉴그룹에 등록된 사용부서코드
  24. //20090522 dhkim 메뉴사용처명 조회
  25. suppdeptnm = getMenuDeptnm(ds_send, "deptcd", suppdeptcd, 'TRMNI02031', ds_temp_menudeptinfo, 'deptnm');
  26. fSpclCareSearch(suppdeptcd);//전문분야 코드및 명칭을 조회한다.
  27. fSpclNursDeptSearch();//간호에 등록된 전문분야 정보를 임시노드에 조회해 온다.
  28. fSpcltemCodeSearch(); //간호에 등록된 전문간호팀코드 정보를 임시노드에 조회해 온다.
  29. fSpclSideJobSearch(); //간호에 등록된 전문간호겸업부서 정보를 임시노드에 조회해 온다.
  30. // 일자 Setting
  31. select_Date();
  32. grp_biz.grp_sea.cmb_spcl.index = 0;//전문분야의 콤보 제일 첫번째로 선택된 상태
  33. }
  34. /**
  35. * 전문분야 코드및 명칭을 조회한다.
  36. */
  37. function fSpclCareSearch(suppdeptcd){
  38. //20090205 dhkim
  39. //전문간호/BMT전문간호 로 나눠지게 되면서 사용부서에 해당하는 분야로 각각 등록됨.
  40. ds_send.setColumn(0, "suppdeptcd",suppdeptcd );
  41. ds_hidden_spclcarefildflaginfo_spclcarefildflaginfolist.clearData();
  42. var oParam = {};
  43. oParam.id = "TRMNS00107";
  44. oParam.service = "spclcareapp.SpclCarePatMngt";
  45. oParam.method = "reqGetSpclCareFild";
  46. oParam.inds = "req=ds_send";
  47. oParam.outds = "ds_hidden_spclcarefildflaginfo_spclcarefildflaginfolist=spclcarefildflaginfolist";
  48. oParam.async = false;
  49. oParam.callback = "cf_TRMNS00107";
  50. tranf_submit(oParam);
  51. if(arErrorCode.pop("TRMNS00107") < 0){
  52. sysf_messageBox('전문분야기준자료 조회를 실패하였습니다.', 'E999');
  53. }
  54. }
  55. function cf_TRMNS00107(sSvcId, nErrorCode, sErrorMsg) {
  56. arErrorCode.push(sSvcId, nErrorCode);
  57. }
  58. /***********************************************************************************************************************************************************
  59. * @author : dhkim
  60. * @desc : 간호에 등록된 전문분야 정보
  61. ***********************************************************************************************************************************************************/
  62. function fSpclNursDeptSearch(){
  63. //20090116 dhkim
  64. //간호에 등록된 전문분야 정보를 임시노드에 조회해 온다.
  65. //간호 테이블에 등록된 조회정보
  66. //전문분야코드 : 022, 전문간호팀코드 : 023
  67. ds_send.setColumn(0, "cdgrupid", "022");
  68. ds_hidden_nursdeptinfo_nursdeptlist.clearData();
  69. var oParam = {};
  70. oParam.id = "TRMNS00108";
  71. oParam.service = "spclcareapp.SpclCarePatMngt";
  72. oParam.method = "reqGetNursDeptInfo";
  73. oParam.inds = "req=ds_send";
  74. oParam.outds = "ds_hidden_nursdeptinfo_nursdeptlist=nursdeptlist";
  75. oParam.async = false;
  76. oParam.callback = "cf_TRMNS00108";
  77. tranf_submit(oParam);
  78. if(arErrorCode.pop("TRMNS00108") < 0){
  79. sysf_messageBox('간호에 등록된 전문분야정보를 조회를 실패하였습니다.', 'E999');
  80. return false;
  81. }
  82. }
  83. function cf_TRMNS00108(sSvcId, nErrorCode, sErrorMsg) {
  84. arErrorCode.push(sSvcId, nErrorCode);
  85. }
  86. /***********************************************************************************************************************************************************
  87. * @author : dhkim
  88. * @desc : 전문간호팀코드 정보
  89. ***********************************************************************************************************************************************************/
  90. function fSpcltemCodeSearch(){
  91. //20090119 dhkim
  92. //간호에 등록된 전문간호팀코드 정보를 임시노드에 조회해 온다.
  93. //간호 테이블에 등록된 조회정보
  94. //전문분야코드 : 022, 전문간호팀코드 : 023
  95. ds_send.setColumn(0, "cdgrupid", "023");
  96. ds_hidden_spclteaminfo_spclteamlist.clearData();
  97. var oParam = {};
  98. oParam.id = "TRMNS00109";
  99. oParam.service = "spclcareapp.SpclCarePatMngt";
  100. oParam.method = "reqGetNursDeptInfo";
  101. oParam.inds = "req=ds_send";
  102. oParam.outds = "ds_hidden_spclteaminfo_spclteamlist=spclteamlist";
  103. oParam.async = false;
  104. oParam.callback = "cf_TRMNS00109";
  105. tranf_submit(oParam);
  106. if(arErrorCode.pop("TRMNS00109") < 0){
  107. sysf_messageBox('간호에 등록된 전문분야정보를 조회를 실패하였습니다.', 'E999');
  108. }
  109. }
  110. function cf_TRMNS00109(sSvcId, nErrorCode, sErrorMsg) {
  111. arErrorCode.push(sSvcId, nErrorCode);
  112. }
  113. /***********************************************************************************************************************************************************
  114. * @author : dhkim
  115. * @desc : 전문간호겸업부서 정보
  116. ***********************************************************************************************************************************************************/
  117. function fSpclSideJobSearch(){
  118. //20090128 dhkim
  119. //간호에 등록된 전문간호겸업부서 정보를 임시노드에 조회해 온다.
  120. //간호 테이블에 등록된 조회정보
  121. //전문분야코드 : 022, 전문간호팀코드 : 023, 전문간호겸업부서코드 : 024
  122. ds_send.setColumn(0, "cdgrupid", "024");
  123. ds_hidden_spclsideinfo_spclsidelist.clearData();
  124. var oParam = {};
  125. oParam.id = "TRMNS00110";
  126. oParam.service = "spclcareapp.SpclCarePatMngt";
  127. oParam.method = "reqGetNursDeptInfo";
  128. oParam.inds = "req=ds_send";
  129. oParam.outds = "ds_hidden_spclsideinfo_spclsidelist=spclsidelist";
  130. oParam.async = false;
  131. oParam.callback = "cf_TRMNS00110";
  132. tranf_submit(oParam);
  133. if(arErrorCode.pop("TRMNS00110") < 0){
  134. sysf_messageBox('간호에 등록된 전문분야겸업부서정보 조회를 실패하였습니다.', 'E999');
  135. return false;
  136. }
  137. }
  138. function cf_TRMNS00110(sSvcId, nErrorCode, sErrorMsg) {
  139. arErrorCode.push(sSvcId, nErrorCode);
  140. }
  141. /**
  142. * @group :
  143. * @ver : 2007.05.16
  144. * @by : 정경화
  145. * @---------------------------------------------------
  146. * @type : function
  147. * @access : public
  148. * @desc : 조회일자 Setting
  149. * @param :
  150. * @return :
  151. * @---------------------------------------------------
  152. */
  153. function select_Date(){
  154. /*if(rdo_ddflag.value == 'O'){
  155. ipt_Fromdd.value = ((getCurrentDate().toDate()).getAddDate(-15, "D")).getDateFormat();//보름
  156. ipt_Enddd.value = getCurrentDate();
  157. }else{*/
  158. grp_biz.grp_sea.ipt_Fromdd.value = ((utlf_getCurrentDate().toDate()).getAddDate(-3, "M")).getDateFormat();//세달전
  159. grp_biz.grp_sea.ipt_Enddd.value = utlf_getCurrentDate();
  160. //}
  161. }
  162. /***********************************************************************************************************************************************************
  163. * @group :
  164. * @ver : 2007.02.28
  165. * @by : dhkim
  166. * @---------------------------------------------------------------------------------------------------------------------------------------------------------
  167. * @type : function
  168. * @access : public
  169. * @desc : 환자 등록번호 조회를 위한 팝업화면 호출
  170. * @param :
  171. * @return :
  172. ************************************************************************************************************************************************************/
  173. function fPopPatient2(){
  174. //조회조건의 등록번호 팝업 호출 이벤트 발생시
  175. frmf_setParameter("pid",ds_cond.getColumn(0, "pid"));
  176. frmf_setParameter("flg","1");
  177. frmf_setParameter("xpath","ds_cond");
  178. var left = system.clientToScreenX(this, this.position.left)-330;
  179. var top = system.clientToScreenY(this, this.position.top);
  180. frmf_modal("SMMNS03100","SMMNS03100","","",1,left,top,"","","","","","M");
  181. grp_biz.grp_sea.btn_select.setFocus();
  182. }
  183. /**
  184. * @group :
  185. * @ver : 2007.06.26
  186. * @by : 정경화
  187. * @---------------------------------------------------
  188. * @type : function
  189. * @access : public
  190. * @desc : 전문간호 관리환자목록조회
  191. * @param :
  192. * @return :
  193. * @---------------------------------------------------
  194. */
  195. function select_reqlist(){
  196. fSetGridColText();
  197. var fromdd = grp_biz.grp_sea.ipt_Fromdd.value;
  198. var todd = grp_biz.grp_sea.ipt_Enddd.value;
  199. if(grp_biz.grp_sea.rdo_ddflag.value == 'O'){
  200. if(utlf_isNull(fromdd) && utlf_isNull(todd)){
  201. select_Date();
  202. }
  203. }
  204. ds_main_edupatinfo_edupatlist.clearData();
  205. //20090617 dhkim
  206. var spcl = ds_cond.getColumn(0, "spcl");
  207. var rgstflag = '';
  208. var deptflag = '';
  209. var deptcd = '';
  210. var reqyn = 'f';
  211. var nodesetCnt = ds_hidden_nursdeptinfo_nursdeptlist.rowcount;
  212. for(var i = 0; i < nodesetCnt; i++){
  213. deptflag = ds_hidden_nursdeptinfo_nursdeptlist.getColumn(i, "deptflag");
  214. deptcd = ds_hidden_nursdeptinfo_nursdeptlist.getColumn(i, "deptcd");
  215. if(deptflag == 'R' && deptcd == spcl){
  216. reqyn = 't';
  217. break;
  218. }
  219. }
  220. if(reqyn == 't'){
  221. rgstflag = 'R';
  222. }else{
  223. rgstflag = 'E';
  224. }
  225. //20090128 전문분야중 겸업인 부서를 찾는다.
  226. spcl = fMakeSpclSideQuery(spcl);
  227. ds_send.setColumn(0, "spcl", spcl);
  228. ds_send.setColumn(0, "ddflag", ds_cond.getColumn(0, "ddflag"));
  229. ds_send.setColumn(0, "fromdd", ds_cond.getColumn(0, "fromdd"));
  230. ds_send.setColumn(0, "enddd", ds_cond.getColumn(0, "enddd"));
  231. ds_send.setColumn(0, "stat", ds_cond.getColumn(0, "stat"));
  232. ds_send.setColumn(0, "patfg", ds_cond.getColumn(0, "patfg"));
  233. ds_send.setColumn(0, "pid", ds_cond.getColumn(0, "pid"));
  234. ds_send.setColumn(0, "patnm", ds_cond.getColumn(0, "patnm"));
  235. ds_send.setColumn(0, "rgstflag", rgstflag);
  236. //20090121 dhkim
  237. //전문간호팀 코드
  238. //model.makeValue("/root/send/spclteamcd", model.getValue("/root/hidden/spclteaminfo/spclteamlist/deptcd"));
  239. //20090205 dhkim
  240. //전문간호/BMT전문간호 로 나눠지게 되면서 사용부서에 해당하는 분야로 각각 등록됨.
  241. ds_send.setColumn(0, "spclteamcd", suppdeptcd);
  242. var oParam = {};
  243. oParam.id = "TRMNS00501";
  244. oParam.service = "spclcareapp.SpclCarePatMngt";
  245. oParam.method = "reqGetSpclCarePatInfo";
  246. oParam.inds = "req=ds_send";
  247. oParam.outds = "ds_main_edupatinfo_edupatlist=edupatlist";
  248. oParam.async = false;
  249. oParam.callback = "cf_TRMNS00501";
  250. tranf_submit(oParam);
  251. if(arErrorCode.pop("TRMNS00501") > -1){
  252. }else{
  253. sysf_messageBox('조회를', 'E009');
  254. return false;
  255. }
  256. }
  257. function cf_TRMNS00501(sSvcId, nErrorCode, sErrorMsg) {
  258. arErrorCode.push(sSvcId, nErrorCode);
  259. }
  260. function fSetGridColText(){
  261. //전문분야에 해당하는 default 조회구간을 설정한다.
  262. //ddflag (의뢰일:R, 처방일 : O, 예약일 : S, 수행일 : A)
  263. //정맥, 상처, 장요루 default : 의뢰일기준
  264. //신경, 유방센터 default : 처방일기준
  265. if(grp_biz.grp_sea.rdo_ddflag.value == "R"){
  266. grp_biz.grd_edulist.setCellProperty("Head", 8, "text", "의뢰일");
  267. }else if(grp_biz.grp_sea.rdo_ddflag.value == "O"){
  268. grp_biz.grd_edulist.setCellProperty("Head", 8, "text", "처방일");
  269. }else if(grp_biz.grp_sea.rdo_ddflag.value == "S"){
  270. grp_biz.grd_edulist.setCellProperty("Head", 8, "text", "예약일");
  271. }else if(grp_biz.grp_sea.rdo_ddflag.value == "A"){
  272. grp_biz.grd_edulist.setCellProperty("Head", 8, "text", "수행일");
  273. }
  274. }
  275. /**
  276. * @group :
  277. * @ver : 2007.07.04
  278. * @by : 정경화
  279. * @---------------------------------------------------
  280. * @type : function
  281. * @access : public
  282. * @desc : Excel파일로 저장
  283. * @param :
  284. * @param :
  285. * @return :
  286. * @---------------------------------------------------
  287. */
  288. function fSaveExcel(){
  289. //if( grp_biz.grd_edulist.rowcount > 0 ){
  290. grdf_exportExcel(grp_biz.grd_edulist, "관리환자목록", "관리환자목록", false, "", "user", false);
  291. // } else {
  292. // sysf_messageBox("조회된 데이터가 ", "I004");
  293. // return;
  294. // }
  295. }
  296. /**
  297. * @group :
  298. * @ver : 2007.07.04
  299. * @by : 정경화
  300. * @---------------------------------------------------
  301. * @type : function
  302. * @access : SMS 전송 화면 팝업
  303. * @desc :
  304. * @param :
  305. * @return :
  306. * @---------------------------------------------------
  307. */
  308. function fPopUpCall(pFlag){
  309. var xpos = system.clientToScreenX(this, this.position.left)-550;
  310. var ypos = system.clientToScreenY(this, this.position.top)+60;
  311. var sParam_Data = "";
  312. if(pFlag == "SMSTrsm"){
  313. var xpos = system.clientToScreenX(this, this.position.left)-550;
  314. var ypos = system.clientToScreenY(this, this.position.top)+60;
  315. var sParam_Data = "";
  316. var sCheck = ''; var _sCheck = '';
  317. var pid = ''; var _pid = '';
  318. var hpno = ''; var cretno = 0;
  319. var _hpno = '';
  320. for(var i = 0; i < ds_main_edupatinfo_edupatlist.rowcount; i++) {
  321. pid = utlf_transNullToEmpty(ds_main_edupatinfo_edupatlist.getColumn(i, "pid"));
  322. sCheck = ds_main_edupatinfo_edupatlist.getColumn(i, "chk");
  323. if(sCheck == "Y") {
  324. hpno = utlf_transNullToEmpty(ds_main_edupatinfo_edupatlist.getColumn(i, "mpphontel"));
  325. cretno = ds_main_edupatinfo_edupatlist.getColumn(i, "cretno");
  326. //if( pid != '' && pid != _pid){
  327. sParam_Data += pid+"▦"
  328. + utlf_transNullToEmpty(ds_main_edupatinfo_edupatlist.getColumn(i, "cretno"))+"▦"
  329. + utlf_transNullToEmpty(ds_main_edupatinfo_edupatlist.getColumn(i, "pidnm"))+"▦"
  330. + hpno+"▩";
  331. //}
  332. //_pid = model.getValue(xEdupatInfoPath + "[" + i + "]/pid");
  333. //동일 환자에 대한 리스트를 필터링 없이 모두 보여줌.
  334. }
  335. }
  336. if(utlf_isNull(sParam_Data)){
  337. //messageBox("SMS 전송할 대상자가","I004");
  338. return;
  339. }
  340. frmf_setParameter("SMMNS02000_Param",sParam_Data);
  341. frmf_modal("SMMNS02000","SMMNS02000","","",1,xpos,ypos,"","","","","","M"); //yjh1
  342. if(utlf_isNull(frmf_getParameter("SMMNS02000_ReturnFlag"))) return;
  343. select_reqlist();
  344. }
  345. }
  346. /**
  347. * @group :
  348. * @ver : 2008.01.25
  349. * @by : dhkim
  350. * @---------------------------------------------------
  351. * @type : function
  352. * @access : public
  353. * @desc : 라벨출력
  354. * @param :
  355. * @return :
  356. * @---------------------------------------------------
  357. */
  358. function fPrintLabel(){
  359. var xGridPath = ds_main_edupatinfo_edupatlist;
  360. ds_hidden_labeldata_edupatlist.clearData();
  361. var labelcnt = 0;
  362. var addr = '';
  363. for(var i = 0; i < ds_main_edupatinfo_edupatlist.rowcount; i++){
  364. if(ds_main_edupatinfo_edupatlist.getColumn(i, "chk") == 'Y'){
  365. addr = ds_main_edupatinfo_edupatlist.getColumn(i, "address");
  366. if(utlf_isNull(addr) ){
  367. labelcnt = eval(ds_hidden_labeldata_edupatlist.rowcount);
  368. ds_hidden_labeldata_edupatlist.addRow();
  369. ds_hidden_labeldata_edupatlist.copyRow(labelcnt, ds_main_edupatinfo_edupatlist, i);
  370. }
  371. }
  372. }
  373. labelcnt = eval(ds_hidden_labeldata_edupatlist.rowcount);
  374. if(labelcnt > 0){
  375. var objDOM = rptf_createDOM(); // DOM 객체 설정
  376. rptf_setNodeListToDOM(objDOM, "/root/hidden/labeldata/edupatlist", ds_hidden_labeldata_edupatlist); // 데이터셋 1
  377. var objParam = new Object();
  378. objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  379. var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
  380. rptf_exeReportPreview30(["RMMNS01900"],[objParam], option);
  381. }
  382. }
  383. /*********************************************************************************************************************************
  384. * @author : dhkim
  385. * @create : 20090119
  386. * @desc : 전문분야콤보 change event
  387. **********************************************************************************************************************************/
  388. function fSpclComboChanged(){
  389. //전문분야에 해당하는 default 조회구간을 설정한다.
  390. //정맥, 상처, 장요루 default : 의뢰일기준
  391. //신경, 유방센터 default : 처방일기준
  392. var spcl = ds_cond.getColumn(0, "spcl");
  393. var deptflag = '';
  394. var deptcd = '';
  395. var reqyn = 'f';
  396. var nodesetCnt = ds_hidden_nursdeptinfo_nursdeptlist.rowcount;
  397. for(var i = 0; i < nodesetCnt; i++){
  398. deptflag = ds_hidden_nursdeptinfo_nursdeptlist.getColumn(i, "deptflag");
  399. deptcd = ds_hidden_nursdeptinfo_nursdeptlist.getColumn(i, "deptcd");
  400. //alert('deptflag '+deptflag + ' deptcd ' + deptcd + ' spcl ' + spcl);
  401. if(deptflag == 'R' && deptcd == spcl){
  402. reqyn = 't';
  403. break;
  404. }
  405. }
  406. //alert('reqyn ' + reqyn);
  407. if(reqyn == 't'){//의뢰
  408. grp_biz.grd_edulist.setRealColSize(8, 0);
  409. grp_biz.grd_edulist.setRealColSize(11, 100);
  410. grp_biz.grd_edulist.setRealColSize(5, 90);
  411. ds_cond.setColumn(0, "ddflag","R");
  412. grp_biz.grd_edulist.setCellProperty("Head", 7, "text", "의뢰일");
  413. grp_biz.grd_edulist.setCellProperty("Head", 9, "text", "의뢰명");
  414. }else{
  415. grp_biz.grd_edulist.setRealColSize(8, 71);
  416. grp_biz.grd_edulist.setRealColSize(11, 79);
  417. grp_biz.grd_edulist.setRealColSize(5, 56);
  418. ds_cond.setColumn(0, "ddflag","O");
  419. grp_biz.grd_edulist.setCellProperty("Head", 7, "text", "처방일");
  420. grp_biz.grd_edulist.setCellProperty("Head", 9, "text", "처방명");
  421. }
  422. }
  423. /***********************************************************************************************************************************************************
  424. * @author : dhkim
  425. * @create : 20090128
  426. * @desc : 상처/장요루 분야의 경우 상처, 장요루 코드를 함께 조회하도록 쿼리를 만들어서 조회한다.
  427. ***********************************************************************************************************************************************************/
  428. function fMakeSpclSideQuery(spclFildCd){
  429. var nodesetCnt = ds_hidden_spclsideinfo_spclsidelist.rowcount;
  430. var deptcd = "";
  431. var qryStr = "";
  432. var sideYn = "f";
  433. var retSpclCd = '';
  434. for(var i = 0; i < nodesetCnt; i++){
  435. deptcd = ds_hidden_spclsideinfo_spclsidelist.getColumn(i, "deptcd");
  436. if(i == (nodesetCnt-1)){
  437. qryStr += deptcd;
  438. }else{
  439. qryStr += deptcd + "|";
  440. }
  441. if(spclFildCd == deptcd){
  442. sideYn = "t";
  443. break;
  444. }
  445. }
  446. if(sideYn == "t"){
  447. retSpclCd = qryStr;
  448. }else{
  449. retSpclCd = spclFildCd;
  450. }
  451. //alert(retSpclCd);
  452. return retSpclCd;
  453. }
  454. ]]></Script>