CREATE OR REPLACE VIEW SD_HOSPITAL.VW_ZS_YPSRF0 ( YPNM00, YKBMBH, YPBM00, BMPYSM, BMWBSM, BMMC00, YPMC00, EYPMC0, PYSM00, WBSM00, NSBL00, YPSPMC, YPGG00, KCDW00, JLDW00, ZYFYDW, MZFYDW, K2J000, Z2J000, M2J000, LSJ000, FYDJ00, GJJ000, CYJL00, SFKYYY, SFPSYY, CFJB00, GZDJ00, MZDJ00, DPDJ00, SJDJ00, LBBH00, YLBH00, JXBH00, ZFBL00, FBBH00, YBLB00, YBZXLB, YBLBMC, YFID00, YPYFMC, PCID00, ZQCD00, ZQDW00, CYL000, ZQS000, YPSYSM, BZ0000, JXMC00, YPMC02, YPMCLB, F2J000, YPBZ00, YPCZFL, ZJJLDW, ZJJL2J, MZKFDW, KSSJB0, HXMC00, ZJMZCF, QZFS00, ZDXL00, PSLX00, PSMC00, MAXTS0, MAXZL0, TSYBMC, ZJBZ00, BYFL00, YFBMBH, YKKCSL, ZJZYCF, DXSYBZ, XYKC00, YPXZZD, YDYPMC, YPPZBH, YB2J00, YBDW00, GJBZBM, GJBZMC, YPDJ00, ZLDJMC, BZCZ00, YKKC00 ) AS select K.YPNM00, --药品内码,机器内码 K.YKBMBH, --药库部门编号,区分药品所属的药库 K.YPBM00, --药品编码,院内码 B.PYSM00 BMPYSM, --别名拼音首码 B.WBSM00 BMWBSM, --别名五笔首码 B.BMMC00, --编码名称 decode((select nvl(max(trim(VALUE0)),'0') from xt_xtcs00 where name00='ZS_YPMCSFXSGJBZMC' and rownum=1),'Y',K.GJBZMC,K.YPMC00) YPMC00, --药品名称 k.EYPMC0, --英文名 K.PYSM00, --拼音首码 K.WBSM00, --五笔首码 K.NSBL00, --数量 DECODE(K.LBBH00,'0','[西药]','1','[中成药]')||K.YPMC00 YPSPMC, --药品商品名称 K.YPGG00, --规格 K.KCDW00, --库存单位(K) nvl(trim(K.MZKFDW),K.JLDW00) JLDW00, --剂量单位改为门诊开方单位 K.ZYFYDW, --住院发药单位(Z)(住院药房维护) K.MZFYDW, --门诊发药单位(M)(门诊药房维护) K.K2J000, --K/J转换率 K.Z2J000, --Z/J转换率 K.M2J000, --M/J转换率 K.LSJ000, --零售价(库存单位) round(F.LSDJ00/(K.K2J000*K.NSBL00)*K.M2J000,4)||'/'||K.MZFYDW FYDJ00,--发药单价(门诊发药单位) round(K.GJJ000/K.NSBL00,4) GJJ000, --购进价(库存单位,最近一批) round(K.CYJL00/K.F2J000,4) CYJL00, --常用剂量 K.SFKYYY, --是否科研用药 'Y':科研用药,单价数量均为0 K.SFPSYY, --是否皮试用药'N'-否,'Y'-是 K.CFJB00, --处方级别 K.GZDJ00, --贵重等级 K.MZDJ00, --麻醉等级 K.DPDJ00, --毒品等级 K.SJDJ00, --神经等级 K.LBBH00, --药品类号 K.YLBH00, --药理编号 K.JXBH00, --剂型编号 1 ZFBL00, --自付比率 1 FBBH00, --费别编号 '7' YBLB00, --医保项目类别 '0' YBZXLB, --医保中心类别 '自付' YBLBMC, --医保项目类别名称 K.YFID00, --药品用法 (select YPYFMC from BM_YPYF00 Y where Y.YFID00=K.YFID00) YPYFMC, --药品用法名称 K.PCID00, --服用频次 G.ZQCD00, --周期长度 G.ZQDW00, --周期单位 round(K.CYL000/K.F2J000,4)*K.NSBL00 CYL000, --次用量 K.ZQS000, --周期数 K.YPSYSM, --药品使用说明 '' BZ0000, --备注 (select JXMC00 from BM_YPJX00 where LBBH00=K.LBBH00 and JXBH00=K.JXBH00) JXMC00, --剂型名称 K.YPTYM0 YPMC02,--药品名称2 K.YPMCLB, --ypmc00字段代表的名称 0: 通用名 1:商品名 2: 别名 K.F2J000, --门诊开方单位转换率 K.BZ0000 YPBZ00, K.YPCZFL, --药品材质分类 0:中草药 1:颗粒药 2:全成分 K.ZJJLDW, --中间计量单位(J) K.ZJJL2J, --中间计量/剂量 转换率 K.MZKFDW, --门诊开方单位 K.KSSJB0, --抗生素级别 K.HXMC00, --rbh 20120908 药品化学名称 k.ZJMZCF, --中间门诊拆分 0:不拆分 1:拆分 K.QZFS00, --取整方式 k.ZDXL00, --最大剂量 k.PSLX00, --皮试id BM_PS0000.psid00 (select PSMC00 from BM_PS0000 where PSID00=K.PSLX00) PSMC00,--皮试名称 BM_PS0000.psmc00 k.maxts0, --最大天数 k.maxzl0, --最大总量 (select MC0000 from BM_TYZD00 where ZDMC00 ='药典维护-特殊医保类别' and NBBH00=K.TSYBLB) TSYBMC, K.ZJBZ00, K.BYFL00,--摆药分类 0,针剂;1,口服 F.YFBMBH,--药房部门编号 F.YKKCSL,--预扣库存数量 K.ZJZYCF,--中间住院拆分 0:不拆分 1:拆分 K.DXSYBZ, --大型输液标志 decode((select trim(VALUE0) from XT_XTCS00 where NAME00='XT_SFXSKC'),'N', decode(sign(decode((select trim(VALUE0) from XT_XTCS00 where NAME00='XT_bsdjkc'),'Y',(F.YKKCSL-F.YCKCSL)*K.NSBL00 ,(F.SJKCSL-F.YCKCSL)*K.NSBL00 ) ),1,null,0), Round(decode((select trim(VALUE0) from XT_XTCS00 where NAME00='XT_bsdjkc'),'Y',(F.YKKCSL-F.YCKCSL)*K.NSBL00 ,(F.SJKCSL-F.YCKCSL)*K.NSBL00 ) /DECODE((Select nvl(trim(value0),'Y') from xt_xtcs00 where name00='YF_SFABYFFYDWFY'),'Y',F.F2J000,K.M2J000),3) ||DECODE((Select nvl(trim(value0),'Y') from xt_xtcs00 where name00='YF_SFABYFFYDWFY'),'Y',F.FYDW00,K.MZFYDW)) XYKC00, --库存 t.MC0000 YPXZZD, K.YPMC00 YDYPMC, K.YPPZBH, K.YB2J00, --医保单位转换率 K.YBDW00, --医保单位 k.GJBZBM, --国家标准编码 k.GJBZMC, --国家标准名称 trim(nvl(decode(k.GZDJ00, 0, '', ' 贵重')||decode(k.MZDJ00, 0, '', ' 麻醉') ||decode(k.DPDJ00, 0, '', ' 毒品')||decode(k.SJDJ00, 0, '', ' 精神')|| decode(k.KSSJB0, 0, '', ' 抗生素')|| decode(k.WZDJ00, '0', '', ' 高危'),'普通')) YPDJ00 ,(select MC0000 from BM_TYZD00 X where X.ZDMC00='抗肿瘤等级分类维护' and X.BH0000=K.ZLDJ00 and rownum=1) ZLDJMC,--抗肿瘤药物等级(BM_TYZD00.ZDMC00=抗肿瘤等级分类维护).MC0000 nvl(K.BZCZ00,'0') BZCZ00, --包装材质0通用,1大规格 2小规格 decode((select trim(VALUE0) from XT_XTCS00 where NAME00='XT_SFXSKC'),'N', decode(sign(decode((select trim(VALUE0) from XT_XTCS00 where NAME00='XT_bsdjkc'),'Y',(F.YKKCSL-F.YCKCSL)*K.NSBL00 ,(F.SJKCSL-F.YCKCSL)*K.NSBL00 ) ),1,null,0), Round(decode((select trim(VALUE0) from XT_XTCS00 where NAME00='XT_bsdjkc'),'Y',(F.YKKCSL-F.YCKCSL)*K.NSBL00 ,(F.SJKCSL-F.YCKCSL)*K.NSBL00 ) /DECODE((Select nvl(trim(value0),'Y') from xt_xtcs00 where name00='YF_SFABYFFYDWFY'),'Y',F.F2J000,K.M2J000),3) ||DECODE((Select nvl(trim(value0),'Y') from xt_xtcs00 where name00='YF_SFABYFFYDWFY'),'Y',F.FYDW00,K.MZFYDW)) YKKC00 --预扣库存数量 --round((select nvl(sum(YKKCSL),0) from YF_PCKCMX where YFBMBH=F.YFBMBH and YPNM00=K.YPNM00 and YKKCSL>0)*K.NSBL00/K.M2J000,3)||K.MZFYDW YKKC00 --预扣库存数量 from BM_YD0000 K,BM_PC0000 G,VW_ZS_YPBM00_DZBL B,YF_YPKCXX F,bm_tyzd00 t where K.YPNM00=B.YPNM00(+) and G.PCID00(+)=K.PCID00 and K.TZRQ00 is null --and K.YPNM00 not in (select YPNM00 from VW_YS_TSXZYP) --AND K.YPNM00 not in(select XDYPNM from bm_xdcfwh) and F.YPNM00=K.YPNM00 and F.PDXH00<>'0' and NVL(F.ZTBZ00,'0')='0' and k.ypxz00=t.bh0000 and t.zdmc00='药品性质' AND F.MZZYBZ<>'0' /