CREATE OR REPLACE VIEW SD_HOSPITAL.VW_YS_BRZDXX_HTBL
 (
 OUTHOSP_INDEX_NO, VISIT_CARD_NO, OUTHOSP_NO, PAT_INDEX_NO, INHOSP_INDEX_NO, 
MR_NO, INHOSP_NUM, INHOSP_NO, VISIT_DEPT_CODE, VISIT_DEPT_NAME, OI_IND, 
PAT_CHIEF_DESCR, UNDETERMINED_FLAG, DIAGNOSIS_CLASS_CODE, DIAGNOSIS_CLASS_NAME, 
OPER_TYPE, DIAG_CODE, DIAG_NAME, DS_OUTCOME_CODE, DS_OUTCOME_NAME, DIAG_ATTACHED_CODE, 
DIAG_ATTACHED_NAME, CW_MEDICINE_DIAG_FLAG, BASE_AUX_DIAG_DISCR, AUXI_DIAG_CODE, 
AUXI_DIAG_NAME, OPER_STAFF_INDEX_NO, OPER_STAFF_CODE, OPER_STAFF_NAME, 
NOTE, DIAG_DATE, RECORD_DATE, UPDATE_DATE

 )
 AS 
select
-- person      date            comments
-- ruanbh      2023.01.03      create 海泰电子病历接口_门诊诊断视图
-- cyf          2023.02.24     调整工号字段
  B.GHH000 OUTHOSP_INDEX_NO       ,--门诊索引号  
  (select ICKH00 from IC_YHXX00 X where X.BRID00=B.BRID00 and X.ZT0000='1' and rownum=1) VISIT_CARD_NO          ,--就诊卡号    
  B.GHH000 OUTHOSP_NO             ,--门诊流水号  
  B.BRID00 PAT_INDEX_NO           ,--患者索引号
  '' INHOSP_INDEX_NO        ,--住院索引号  
  '' MR_NO                  ,--病案号      
  '' INHOSP_NUM             ,--住院次数    
  '' INHOSP_NO              ,--住院流水号  
  B.JZKS00 VISIT_DEPT_CODE             ,--就诊科室代码
 (SELECT BMMC00 FROM BM_BMBM00 WHERE BMBH00=B.JZKS00) VISIT_DEPT_NAME ,--就诊科室名称

  '0' OI_IND                 ,--门诊住院标识
  '' PAT_CHIEF_DESCR        ,--患者主诉    
  '' UNDETERMINED_FLAG      ,--待查标志    
  '1' DIAGNOSIS_CLASS_CODE   ,--诊断类别代码
  '门诊诊断' DIAGNOSIS_CLASS_NAME   ,--诊断类别名称
  '1' OPER_TYPE              ,--操作类型    
  A.ICD900 DIAG_CODE              ,--诊断代码      
  A.ZDMC00 DIAG_NAME              ,--诊断名称      
  '' DS_OUTCOME_CODE        ,--病情转归代码  
  '' DS_OUTCOME_NAME        ,--病情转归名称  
  '' DIAG_ATTACHED_CODE     ,--诊断附加码    
  '' DIAG_ATTACHED_NAME     ,--诊断附加码名称
  decode(A.SFXYZD,'1','0','1') CW_MEDICINE_DIAG_FLAG  ,--中西医诊断标志
  decode(A.ZZDBZ0,'3','0','1') BASE_AUX_DIAG_DISCR    ,--主副诊断判别  
  '' AUXI_DIAG_CODE         ,--辅助诊断代码  
  '' AUXI_DIAG_NAME         ,--辅助诊断名称  
  A.JZYS00 OPER_STAFF_INDEX_NO    ,--操作职工索引号
  A.JZYS00 OPER_STAFF_CODE        ,--操作职工工号   (select X.ZWXM00 from BM_YGBM00 X where X.YGBH00=A.JZYS00)
  A.JZYSXM OPER_STAFF_NAME        ,--操作职工姓名
  A.ZDMSMC NOTE                   ,--备注          
  A.ZDRQ00||replace(A.ZDSJ00,':','') DIAG_DATE              ,--诊断日期      
  A.ZDRQ00||replace(A.ZDSJ00,':','') RECORD_DATE            ,--录入日期      
  A.ZDRQ00||replace(A.ZDSJ00,':','') UPDATE_DATE             --更新日期      
  from YS_BRZDXX A,SF_BRXXB0 B
  where A.GHID00=B.GHID00
/