kljk
/
klhis
5
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

develop/hrl_20241226_bjhzcrb

Browse Source 
就诊患者艾滋/梅毒/乙肝记录
门诊日志统计,艾滋/梅毒/乙肝 阳性变红
住院退药单查询页面 病区过滤不生效
release/20241225_1153
Xiao Ye 4 weeks ago
parent 6767e89ab7
commit 53914e1437
8 changed files with 100 additions and 6 deletions
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Show Stats Download Patch File Download Diff File
  1. 7
      WEB-INF/conf/sysds_his.xml
  2. 4
      WEB-INF/conf/sysds_his_gzz.xml
  3. 49
      WEB-INF/src/com/his/mz/gzzmanage/HisMzJbzdForm.java
  4. 33
      WEB-INF/src/com/his/mz/gzzmanage/HisMzJbzdForm.xml
  5. 2
      WEB-INF/src/com/his/zy/zyyfcxmanage/ZyTydFindForm.xml
  6. 2
      WEB-INF/src/com/openIntegratedQuery/normalQuery/mzsr/MzrzCountForm.java
  7. 2
      WEB-INF/src/com/openIntegratedQuery/normalQuery/mzsr/MzrzCountForm.xml
  8. 5
      release/20241225_1153.text

7
WEB-INF/conf/sysds_his.xml
Unescape View File

@ -4970,7 +4970,7 @@
bl.XBS ,
bl.CLCS,
sum(decode(l.XH, null, 0, 1)) jcgs,
nvl(SUBSTR(a.JZNL, 1, INSTR(a.JZNL, '岁') - 1),a.JZNL) nl
nvl(SUBSTR(a.JZNL, 1, INSTR(a.JZNL, '岁') - 1),a.JZNL) nl,nvl(a.IFYG,0) IFYG,nvl(a.IFMD,0) IFMD ,nvl(a.IFAZ,0) IFAZ
FROM
HIS_JZ_BASEINFO a
LEFT JOIN HIS_HZINFO b ON
@ -5015,7 +5015,7 @@
bl.XT ,
bl.ZS ,
bl.XBS ,
bl.CLCS
bl.CLCS,nvl(a.IFYG,0),nvl(a.IFMD,0) ,nvl(a.IFAZ,0)
]]></sql>
//JJRQ,JJYS,XM,XB,JZNL,ZJHM,ZY,PHONE,XZDZ,MZNO,JYJG,JBBM,JBMC,JZZT,JZZB,FPRQ,SSY,SZY,XT,ZS,XBS,CLCS
<fields>
@ -5044,6 +5044,9 @@
<f name="CLCS" type="12" />
<f name="jcgs" type="12" />
<f name="nl" type="12" />
<f name="IFYG" type="12" table="HIS_JZ_BASEINFO" />
<f name="IFMD" type="12" table="HIS_JZ_BASEINFO" />
<f name="IFAZ" type="12" table="HIS_JZ_BASEINFO" />
</fields>
<parameter>
<p>12</p>

4
WEB-INF/conf/sysds_his_gzz.xml
Unescape View File

@ -2711,6 +2711,7 @@ SELECT JGID,BM,MC,YZDL,YZZL,ISDDYZ,ISXSYZ,ISMZSY,ISJZSY,ISZYSY,DCZDJL,MTZDJL,ZDL
<sql>
select
a.PKEY,a.HZPKEY,a.GHPKEY,a.JZLX,a.JZZT,a.JZZB,a.HZFB,a.JZJS,a.ISYB,a.ISZZ,a.YYLX,a.ISLG,a.ISGSSJJ,a.HZYBLX,a.JJKS,a.JJRQ,a.JJYS,a.FBRQ,a.ZYNUM,a.WARD,a.ROOM,a.BED,a.KZRQ,a.JSRQ,a.THRY,a.HDYY,a.HDRQ,a.MZNUM,a.CJR,a.CJRQ,a.JGID,a.JZNO,a.MZNO,a.ZYNO,a.JZKH,a.CARDPKEY,a.JZNL,a.ISJZ,a.ZYLX,a.ZYHZLY,a.ZYYYRQ,a.CYRQ,a.CYYS,a.ZYNOOLD,a.SCZYRQ,a.ISGL,a.ISSJ,b.HZLX,a.GRLX,a.QTGRLX,a.CWFJLX,a.YSLX,a.MQJZINFO,a.ZKRQ,a.RYTJ,a.RYBQ,a.RYJZINFO,a.RYYS,a.RYQK,a.JZZL,a.JYYJ,a.ZYBZ,a.RYZD,a.RYZDMS,a.ZYBAH,a.RYNL,a.RYXSENLD,a.RYXSENLH,a.RYXSENLS,a.ZYZH,a.JZKLX,a.CRFS,a.OTHERCRFS,a.MAINBLYS,a.MAINBLXS,a.MOTHERJZPKEY,a.ZKDATE,a.RQDATE,b.XM,b.XB,b.CSRQ,b.SFZH,b.ZJLX,b.ZJHM,b.TEL,b.EMAIL,b.PIC,b.SIGNPIC,b.ZT,b.MZ,b.NL,b.HYZK,b.YBKH,b.ZY,b.GZDW,b.PHONE,b.BGDH,b.ZGGH,b.HZMJ,b.HZJB,b.LXRGX,b.LXR,b.LXRDH,b.LXRZJLX,b.LXRZJHM,b.GJ,b.XZDZ,b.XZDZJGH,b.JGDZ,b.JGDZJGH,b.CSDZ,b.CSDZJGH,b.YBLX,a.CYBED,a.JZZDNAMELIST,a.JZZDBMLIST
,IFYG,IFMD,IFAZ
from HIS_JZ_BASEINFO a left join HIS_HZINFO b on a.hzpkey=b.pkey and
a.JGID=b.JGID where a.JGID=? and a.pkey=? and a.hzpkey=?
@ -2841,6 +2842,9 @@ SELECT JGID,BM,MC,YZDL,YZZL,ISDDYZ,ISXSYZ,ISMZSY,ISJZSY,ISZYSY,DCZDJL,MTZDJL,ZDL
<f name="CYBED" type="12" table="HIS_JZ_BASEINFO" />
<f name="JZZDNAMELIST" type="12" table="HIS_JZ_BASEINFO" />
<f name="JZZDBMLIST" type="12" table="HIS_JZ_BASEINFO" />
<f name="IFYG" type="12" table="HIS_JZ_BASEINFO" />
<f name="IFMD" type="12" table="HIS_JZ_BASEINFO" />
<f name="IFAZ" type="12" table="HIS_JZ_BASEINFO" />
</fields>
<parameter>
<p>12</p>

49
WEB-INF/src/com/his/mz/gzzmanage/HisMzJbzdForm.java
Unescape View File

@ -53,6 +53,9 @@ public class HisMzJbzdForm extends WatWebForm implements IJbMbContainer{
private DxTitlePanel titlePanel4;
private DxTitlePanel titlePanel5;
private DxDataRadioGroup dbradio1;
private DxDataRadioGroup dbradio2;
private DxDataRadioGroup dbradio3;
private DxDataRadioGroup dbradio4;
private DxDataGrid dbgrid2;
private DxPopGridText dbedit1;
private DxCoolDataTextField dbedit2;
@ -742,6 +745,33 @@ public class HisMzJbzdForm extends WatWebForm implements IJbMbContainer{
}
}
private void dbradio2Action() {
DxNormalDataManager mzjzBaseInfoDao = DaoCreator.getNormalDao(getWindow(),"mzjzBaseInfoDao");
if(!mzjzBaseInfoDao.commit()) {
setLabelShow("提示:记录保存失败");
}else {
setLabelShow("提示:记录保存成功");
}
}
private void dbradio3Action() {
DxNormalDataManager mzjzBaseInfoDao = DaoCreator.getNormalDao(getWindow(),"mzjzBaseInfoDao");
if(!mzjzBaseInfoDao.commit()) {
setLabelShow("提示:记录保存失败");
}else {
setLabelShow("提示:记录保存成功");
}
}
private void dbradio4Action() {
DxNormalDataManager mzjzBaseInfoDao = DaoCreator.getNormalDao(getWindow(),"mzjzBaseInfoDao");
if(!mzjzBaseInfoDao.commit()) {
setLabelShow("提示:记录保存失败");
}else {
setLabelShow("提示:记录保存成功");
}
}
private void dbcheckbox1Action() {
if(dbcheckbox1.isSelected()) {
@ -874,6 +904,25 @@ public class HisMzJbzdForm extends WatWebForm implements IJbMbContainer{
}
});
dbradio2.addActionListener(new ActionListener(){
public void actionPerformed(ActionEvent actionevent) {
dbradio2Action();
}
});
dbradio3.addActionListener(new ActionListener(){
public void actionPerformed(ActionEvent actionevent) {
dbradio3Action();
}
});
dbradio4.addActionListener(new ActionListener(){
public void actionPerformed(ActionEvent actionevent) {
dbradio4Action();
}
});
dbcheckbox1.addActionListener(new ActionListener(){
public void actionPerformed(ActionEvent actionevent) {
dbcheckbox1Action();

33
WEB-INF/src/com/his/mz/gzzmanage/HisMzJbzdForm.xml
Unescape View File

@ -44,6 +44,39 @@
</DxPanelBar>
</col>
</row>
<row height="38" location="0,0" size="0,0" unit="px">
<col>
<DxPanelBar id="panelBaryg" split="false" size="100,38" tabindex="0" unit="%">
<item align="left" autoExtend="false">
<DxLabel id="label3" size="48,13" title="乙肝" />
<DxDataRadioGroup id="dbradio2" tag="10" ds="IFYG@" columns="2" items="阴性,阳性" values="0,1" showtitle="false" size="140,28" />
<DxLabel id="label4" size="15,13" title="" color="255,0,0" />
</item>
</DxPanelBar>
</col>
</row>
<row height="38" location="0,0" size="0,0" unit="px">
<col>
<DxPanelBar id="panelBarmd" split="false" size="100,38" tabindex="0" unit="%">
<item align="left" autoExtend="false">
<DxLabel id="label3" size="48,13" title="梅毒" />
<DxDataRadioGroup id="dbradio3" tag="10" ds="IFMD@" columns="2" items="阴性,阳性" values="0,1" showtitle="false" size="140,28" />
<DxLabel id="label4" size="15,13" title="" color="255,0,0" />
</item>
</DxPanelBar>
</col>
</row>
<row height="38" location="0,0" size="0,0" unit="px">
<col>
<DxPanelBar id="panelBaraz" split="false" size="100,38" tabindex="0" unit="%">
<item align="left" autoExtend="false">
<DxLabel id="label3" size="48,13" title="艾滋" />
<DxDataRadioGroup id="dbradio4" tag="10" ds="IFAZ@" columns="2" items="阴性,阳性" values="0,1" showtitle="false" size="140,28" />
<DxLabel id="label4" size="15,13" title="" color="255,0,0" />
</item>
</DxPanelBar>
</col>
</row>
</Grid>
</DxTitlePanel>
</col>

2
WEB-INF/src/com/his/zy/zyyfcxmanage/ZyTydFindForm.xml
Unescape View File

@ -91,7 +91,7 @@
<s ctrid="datetimepicker1" col="TYRQ" ctrtype="DxDateTimePick" coltype="93" bjgx=">="/>
<s ctrid="datetimepicker2" col="TYRQ" ctrtype="DxDateTimePick" coltype="93" bjgx="&lt;="/>
<s ctrid="popgrid1" col="JSKS" ctrtype="DxPopGridText" coltype="12" isvalue="true" bjgx="="/>
<s ctrid="popgrid2" col="ZXRWARD" ctrtype="DxPopGridText" coltype="12" isvalue="true" bjgx="="/>
<s ctrid="popgrid2" col="WARD" ctrtype="DxPopGridText" coltype="12" isvalue="true" bjgx="="/>
<s ctrid="edit1" col="YZMC" ctrtype="DxCoolTextField" coltype="12" isperc="true" bjgx="alllike"/>
<s ctrid="edit2" col="XM" ctrtype="DxCoolTextField" coltype="12" isperc="true" bjgx="alllike"/>
<s ctrid="edit3" col="ZYNO" ctrtype="DxCoolTextField" coltype="12" isperc="true" bjgx="alllike"/>

2
WEB-INF/src/com/openIntegratedQuery/normalQuery/mzsr/MzrzCountForm.java
View File

File diff suppressed because one or more lines are too long

2
WEB-INF/src/com/openIntegratedQuery/normalQuery/mzsr/MzrzCountForm.xml
View File

File diff suppressed because one or more lines are too long

5
release/20241225_1153.text
Unescape View File

@ -63,6 +63,11 @@ develop/lyx_20241225_zycfdp
...........................................................................................................................................
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
develop/hrl_20241226_bjhzcrb
就诊患者艾滋/梅毒/乙肝记录
门诊日志统计,艾滋/梅毒/乙肝 阳性变红
住院退药单查询页面 病区过滤不生效
...........................................................................................................................................
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

Write Preview
Loading…
Cancel
Save