-- Start of DDL Script for View SD_HOSPITAL.VW_YS_FDMYPSR_MZDZBL -- Generated 2020-12-04 17:36:02 from SD_HOSPITAL@30 CREATE OR REPLACE VIEW vw_ys_fdmypsr_mzdzbl ( ypnm00, ykbmbh, yfbmbh, ypbm00, bmpysm, bmwbsm, bmmc00, ypmc00, eypmc0, pysm00, wbsm00, nsbl00, ypspmc, ypgg00, kcdw00, jldw00, zyfydw, mzfydw, k2j000, z2j000, m2j000, lsdj00, fydj00, gjj000, cyjl00, sjkcsl, ykkcsl, xykc00, kcsx00, kcxx00, sfkyyy, sfpsyy, cfjb00, gzdj00, mzdj00, dpdj00, sjdj00, lbbh00, ylbh00, jxbh00, zfbl00, fbbh00, yblb00, ybzxlb, yblbmc, yfid00, ypyfmc, pcid00, zqcd00, yysjdw, cyl000, zqs000, colour, ypsysm, bz0000, jxmc00, ypmc02, ypmclb, f2j000, ypbz00, ypczfl, zjjldw, zjjl2j, mzkfdw, kssjb0, hxmc00, zjmzcf, qzfs00, zdxl00, pslx00, psmc00, maxts0, maxzl0, tsybmc, pcmc00, zqcs00, gxytnb, jldw01, jbyyml, sfjbyy, ykyyid, yfyyid, ydypmc, yppzbh, yb2j00, ybdw00, ypxzmc, sftdfb, xgcfzl, sjq000 ) AS select K.YPNM00, --药品内码，机器内码 K.YKBMBH, --药库部门编号，区分药品所属的药库 F.YFBMBH, --药房部门编号，区分药品所属的药房 K.YPBM00, --药品编码，院内码 B.PYSM00 BMPYSM, --别名拼音首码 B.WBSM00 BMWBSM, --别名五笔首码 B.BMMC00, --药品名称 K.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)（门诊药房维护） trim(decode((select nvl(trim(VALUE0),'Y') from XT_XTCS00 where NAME00='YF_SFABYFFYDWFY'),'Y',F.FYDW00,K.MZFYDW)) MZFYDW,--门诊发药单位(M)（门诊药房维护） K.K2J000, --K/J转换率 K.Z2J000, --Z/J转换率 --K.M2J000, --M/J转换率 decode((select nvl(trim(VALUE0),'Y') from XT_XTCS00 where NAME00='YF_SFABYFFYDWFY'),'Y',F.F2J000,K.M2J000) M2J000,--门诊发药单位转换率（门诊药房维护?? round(F.LSDJ00/K.NSBL00,4) LSDJ00, --零售价(库存单位) --round(F.LSDJ00/(K.K2J000*K.NSBL00)*K.M2J000,4)||'/'||K.MZFYDW,--发药单价(门诊发药单位) decode((select nvl(trim(VALUE0),'Y') from XT_XTCS00 where NAME00='YF_SFABYFFYDWFY'),'Y',to_char(round(F.LSDJ00/(K.K2J000*K.NSBL00)*F.F2J000*1.00,2),'FM99999990.00'),to_char(round(F.LSDJ00/(K.K2J000*K.NSBL00)*K.M2J000*1.00,2),'FM99999990.00')) FYDJ00, --发药单价(门诊发药单位) round(K.GJJ000/K.NSBL00,4) GJJ000, --购进价(库存单位,最近一批) round(K.CYJL00/K.F2J000,4) CYJL00, --常用剂量 (F.SJKCSL-F.YCKCSL)*K.NSBL00 SJKCSL, --实际库存数量(剂量单位) (F.YKKCSL-F.YCKCSL)*K.NSBL00 YKKCSL, --预扣库存数量(剂量单位) --F.SJKCSL/K.M2J000||K.MZFYDW, --现有库存(门诊发药单位) --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*K.NSBL00 ,F.SJKCSL*K.NSBL00 ) ),1,NULL,0), round(decode((select trim(VALUE0) from XT_XTCS00 where NAME00='XT_BSDJKC'),'Y',F.YKKCSL*K.NSBL00 ,F.SJKCSL*K.NSBL00 ) /K.M2J000,3)||K.MZFYDW), --现有库存(门诊发药单位) 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, --现有库存(门诊发药单位), --现有库存(门诊发药单位) F.KCSX00*K.NSBL00 KCSX00, --库存上限(库存单位) F.KCXX00*K.NSBL00 KCXX00, --库存下限(库存单位) 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, --周期长度 decode(sign(G.ZQCD00-1),1,'*'||to_char(G.ZQCD00)||G.ZQDW00,G.ZQDW00) YYSJDW, --周期单位 round(K.CYL000/K.F2J000,4)*K.NSBL00 CYL000, --次用量 K.ZQS000, --周期数 decode(SIGN(F.YKKCSL), 1,'0', (decode(nvl((select trim(VALUE0) VALUE0 from XT_XTCS00 E where NAME00='YS_YPKCWLXXYS'),'0'), '0','0', nvl((select trim(VALUE0) VALUE0 from XT_XTCS00 E where NAME00='YS_YPKCWLXXYS'),'0') ) ) ) COLOUR, 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, G.PCMC00, --频次名称 G.ZQCS00, --周期次数 K.GXYTNB,--高血压糖尿病类别0普通药1高血压药2糖尿病药3高血压糖尿病药 K.JLDW00 JLDW01, K.JBYYML, --decode(K.JBYYML,'Y','是','否') SFJBYY, --是否基本用药 decode(K.ypxz00,'1','是','否') SFJBYY, (select YYID00 from BM_BMBM00 where BMBH00 = K.YKBMBH) YKYYID, --药库医院ID (select YYID00 from BM_BMBM00 where BMBH00 = F.YFBMBH) YFYYID, --药库医院ID K.YPMC00 YDYPMC, K.YPPZBH, K.YB2J00,--医保单位转换率 K.YBDW00,--医保单位 (select MC0000 from BM_TYZD00 where ZDMC00 ='药品性质' and NBBH00=K.YPXZ00) YPXZMC, --药品性质 (select decode(count(1),0,'0','1') rn from BM_TYZD00 a where ZDMC00='特定费别限制药品目录' and DJ0000=B.YPNM00) SFTDFB, --是否特定费别限制药品目录1是0否 K.XGCFZL, --是否允许修改门诊处方总剂量:0不根据此值控制,1有根据此值控制 (select decode(count(1),0,'','4+7') from BM_YDTSSX X where X.YPNM00=K.YPNM00 and X.SXBH00='02') SJQ000--4+7药品 from YF_YPKCXX F,BM_YD0000 K,BM_PC0000 G,VW_YS_YPBM00_MZDZBL B where F.YPNM00=K.YPNM00 and K.YPNM00=B.YPNM00(+) and G.PCID00(+)=K.PCID00 and F.PDXH00<>'0' and nvl(F.ZTBZ00,'0')='0' and K.TZRQ00 IS NULL / -- End of DDL Script for View SD_HOSPITAL.VW_YS_FDMYPSR_MZDZBL