日常雜事記錄

1.停醫囑的類方法：w ##class(appcom.OEOrdItem).UnUseMultir("77067||13",127,"N","N") 作廢醫囑處理

2.推送健康碼至區裏的任務： d ##class(web.DHCResidentHealthCard).PushUseCardInfo(+$h-1)

3.推送檢驗報告：w ##class(web.DHCENS.EnsWebService).GetLISReportByRegNum("<Request><RegNo>0000509999</RegNo><AdmType>I</AdmType><StDate>2019-08-01</StDate><EndDate>2019-08-31</EndDate></Request>")

4.四捨五入需求門診改表：SELECT * FROM SQLUser.DHC_SOPFConfig

5.呼吸科叫號1分鐘左右才呼叫-----換盒子

6.擺藥機患者0004638628 推送不到包藥機上-----患者住院號取值爲空病案管理--查到點接診

7.更新了手指點穴單次劑量需求

8.0004650634胸部正位片檢查醫生變成了洪景嬌查因

9.等候隊列顯示覆診患者（客服的等候隊列是按照排隊號從小到大排序的；醫生的患者隊列是按照就診號排隊的）

10.流水線條碼識別率低；儀器廠商提供打印機和驅動我們調用（諮詢護理組）

11.醫保卡讀卡慢；已經關閉殺毒軟件觀察

12.科利爾打印機打出來的檢驗結果是空的

喻楓打電話

1.通知技術中心和項目上的人員和趙紅軍開會

2.整理出來回款合同及回款狀況

3.提出建議和自己想法

10.血透的獲取檢驗報告的平臺調his換成ecp226.9

DHC.LIS.WXSOAP.EnsWebServiceSoap

10.檢查ris調用his主web從226.1改爲226.9（DHC.RIS.BS.SOAP.EnsWebServiceSoap）

11.ping -s 2000 192.168.1.88

d ##class(web.DHCResidentHealthCard).PushUseCardInfo(+$h-1)

1.上傳藥監平臺不成（沒有下載價格）

02:GoodsPrice.js-->//下載藥品信息

var url = "dhcst.idruginfoaction.csp?action=DownGoodsPrice";

03:dhcst.idruginfoaction.csp --action=DownGoodsPrice

04:w ##class(web.DHCST.ISZDrugInterface.IGoodsPrice).IDrugDownPrice(1)

SELECT * FROM SQLUser.DHC_frComGoodsPrice WHERE COMGP_Product_DR->COMPD_ypbm=112082

SELECT * FROM SQLUser.DHC_frComProduct WHERE

SELECT * FROM SQLUser.DHC_frComProduct WHERE COMPD_RowId=12309 AND COMPD_ypbm

SELECT * FROM SQLUser.DHC_HisRefereCom WHERE HisRefCom_INCI_DR->INCI_Code=3656

2.中藥錄入界面開不了中藥（web.DHCDocOrderEntryCM）

屏蔽如下代碼

if LUCategoryDesc'=1 {

s CMSubCategory="^"_CMSubCategory_"^"

}else{

s CMSubCategory="^"_CMKLSubCategory_"^"

}*/

if LUCategoryDesc=1 {

;s CMSubCategory="^"_CMSubCategory_"^"

s CMSubCategory="^"_CMKLSubCategory_"^"

}elseif(LUCategoryDesc=2){

s CMSubCategory="^"_CMJPSubCategory_"^"

}else{

;s CMSubCategory="^"_CMKLSubCategory_"^"

s CMSubCategory="^"_CMSubCategory_"^"

}

if $D(^DHCDocConfig("CNMedNormKL")) {

Set RecLoc=$o(^DHCDocConfig("CNMedNormKL",LUCategoryDesc+1,0))

Set CMSubCategory=^DHCDocConfig("CNMedNormKL",LUCategoryDesc+1,RecLoc)

s CMSubCategory="^"_CMSubCategory_"^"

}

把這個Global改成和這個是庫的一樣的^DHCDocConfig("CNMedNormKL")

3.開醫囑控制類web.DHCOEOrdItem和生成條碼和處方號的規則(DHCaOET1.mac)

4.檢驗科條碼補打的功能及條碼佈局的M

DHCLtkPrintBarcode

01)拷貝BarCode.exe到trak—>ActiveX下然後拷貝新的exe出來

barCode.exe在14上的（C:\Trak\ActiveX\LabTrak下）

02）barcode.exe和barcode.dll(在本機註冊)拷貝到C:\Trak\ActiveX\LabTrak下

x\y\con1\fontsize\font

x橫座標

y縱座標

con...內容（其中con1只能是條碼）

fontsize

font

電子健康碼線上支付

記錄人：楊小牛

記錄時間：2019-10-08

（1）添加支付方式

（2）添加權限

（3）查看第三支付方式表、支付方式表

SELECT * FROM Dhc_ctpaymodeexp --第三支付方式表

SELECT * FROM SQLUser.CT_PayMode ---支付方式

--INSERT INTO SQLUser.DHC_CTPayModeExp (PME_AppRefundPM_DR, PME_ClassName, PME_HardCom_DR, PME_IFMode, PME_IOType, PME_MethodName, PME_PayMode_DR, PME_RefundFlag)

--VALUES (NULL, NULL, 1, 'WS', 'OP', NULL, '42', NULL);

（4）修改Global

zw ^DHCRegInterfaceCodeRelate("PayMode","His")

------------------------

1.上傳藥監平臺不成（沒有下載價格）

02:GoodsPrice.js-->//下載藥品信息

var url = "dhcst.idruginfoaction.csp?action=DownGoodsPrice";

03:dhcst.idruginfoaction.csp --action=DownGoodsPrice

04:w ##class(web.DHCST.ISZDrugInterface.IGoodsPrice).IDrugDownPrice(1)

SELECT * FROM SQLUser.DHC_frComGoodsPrice WHERE COMGP_Product_DR->COMPD_ypbm=112082

SELECT * FROM SQLUser.DHC_frComProduct WHERE

SELECT * FROM SQLUser.DHC_frComProduct WHERE COMPD_RowId=12309 AND COMPD_ypbm

SELECT * FROM SQLUser.DHC_HisRefereCom WHERE HisRefCom_INCI_DR->INCI_Code=3656

2.中藥錄入界面開不了中藥（web.DHCDocOrderEntryCM）

屏蔽如下代碼

if LUCategoryDesc'=1 {

s CMSubCategory="^"_CMSubCategory_"^"

}else{

s CMSubCategory="^"_CMKLSubCategory_"^"

}*/

if LUCategoryDesc=1 {

;s CMSubCategory="^"_CMSubCategory_"^"

s CMSubCategory="^"_CMKLSubCategory_"^"

}elseif(LUCategoryDesc=2){

s CMSubCategory="^"_CMJPSubCategory_"^"

}else{

;s CMSubCategory="^"_CMKLSubCategory_"^"

s CMSubCategory="^"_CMSubCategory_"^"

}

if $D(^DHCDocConfig("CNMedNormKL")) {

Set RecLoc=$o(^DHCDocConfig("CNMedNormKL",LUCategoryDesc+1,0))

Set CMSubCategory=^DHCDocConfig("CNMedNormKL",LUCategoryDesc+1,RecLoc)

s CMSubCategory="^"_CMSubCategory_"^"

}

把這個Global改成和這個是庫的一樣的^DHCDocConfig("CNMedNormKL")

3.開醫囑控制類web.DHCOEOrdItem和生成條碼和處方號的規則(DHCaOET1.mac)

4.檢驗科條碼補打的功能及條碼佈局的M

DHCLtkPrintBarcode

01)拷貝BarCode.exe到trak—>ActiveX下然後拷貝新的exe出來

barCode.exe在14上的（C:\Trak\ActiveX\LabTrak下）

02）barcode.exe和barcode.dll(在本機註冊)拷貝到C:\Trak\ActiveX\LabTrak下

2.增加判斷上次就診沒有交診查費的患者

-----------------------------------------------------------------

1.增加配藥確認後掃碼不能上屏幕

2.三號窗口上打出來的條碼不能掃上屏

-----------------------------------

週五開會三點：

1.人員問題：黃智，楊小牛,周政華（去廣州婦幼上線支持）

2.回款合同：2017DHC0714HCQ深圳市寶安區中醫院移動臨牀信息系統項目 34.5w，回款60%

2018DHC0316HCQ02351深圳市寶安區中醫院（集團）迎三甲複審新增工作項目合同 111.82w 回款60%

一臺尿基（BH2101S型原子吸收光譜儀）

一臺微量元素（BOHUI博暉全血七袁旭分析儀檢驗儀器雙通連接）;小鬧鐘

東區連的uf1000 已經在用了未回款

-------------

3.當前項目的困難：1.產品組需求響應慢

4.收費時按叫號狀態，和是否有診斷，來判斷

5.判斷上次就診的診查費是否已繳納，如果沒有繳納在通過叫號狀態和是否有診斷來彈框提示收費員，並在收費界面顯示上次的診查費讓收費員可以結上次的診查費

6--------------------------------------------------------------------------------------------------------------------------

新員工日常內容：

1、一篇會議紀要

2、一篇需求實例

3、一篇客戶關係心得

4、週報，新員工獨立完成，指導老師監督及時完成

5、培養計劃 (xls)、月報，指導老師和新員工共同完成，每月一次指導老師每月初參考《新員工培訓計劃.doc》和本項目情況制定本月培養計劃，月底新員工和指導老師完成總結

6、轉正考題可提前下發和提前學習準備《新員工培訓計劃考覈表.doc》《轉正試題 20160114》，機試題請截圖新員工轉正時完成： 1、安全考試（打印出來手寫，掃描成電子檔） 2、完成轉正考題，筆試+機試 3、轉正申請書（協同上完成）

4、準備轉正答辯ppt

---------------------------------------------------------------------------------------------------------------------------------

SELECT * FROM SQLUser.ARC_ItemCat WHERE ARCIC_Desc="診查費"

SELECT * FROM SQLUser.RB_Resource

SELECT * FROM RB_Appointment WHERE APPT_BookIDCard="440883199410153593"

SELECT * FROM SQLUser.SS_User WHERE SSUSR_RowId="1516"

SELECT OEORD_Adm_DR *FROM SQLUser.OE_Order

SELECT OSTAT_Code *FROM SQLUser.OEC_OrderStatus

SELECT ARCIC_Code *FROM ARC_ItemCat

SELECT ARCIM_ItemCat_DR *FROM SQLUser.ARC_ItmMast

SELECT OEORI_RowId *FROM SQLUser.OE_OrdItem WHERE OEORI_OEORD_ParRef->OEORD_Adm_DR=''

AND OEORI_ItmMast_DR->ARCIM_ItemCat_DR->ARCIC_Code='診查費'

AND OEORI_ItemStat_DR->OSTAT_Code='D' OR OEORI_ItemStat_DR->OSTAT_Code='C'

SELECT OEORI_PRN, * FROM SQLUser.OE_ORDITEM WHERE OEORI_OEORD_ParRef=4725762

SELECT * FROM DHC_PE_OrderDetail WHERE OD_Desc LIKE "%胸部%"

---------------------------------------------------------------------------------------------------------------------------------------------

SELECT ad.PAADM_Type AS 就診類型,ad.PAADM_AdmDate AS 開單時間,ad.PAADM_RowID,re.Rlt_ADM_DR,

pe.PAPER_Name AS 姓名,pa.PAPMI_ID AS 身份證,pa.PAPMI_Sex_DR->CTSEX_Desc AS 性別,pe.PAPER_Dob AS 出生日期,pa.PAPMI_SecondPhone AS 工作單位,

pe.PAPER_Nation_DR->CTNAT_Desc AS 民族,

pa.PAPMI_MobPhone AS 手機,pe.PAPER_ForeignId AS 聯繫人,pe.PAPER_ForeignPhone AS 聯繫人電話,pe.PAPER_StNameLine1 AS 居住地址,

(SELECT PAPER_HouseAddress FROM DHC_Person WHERE PAPER_PaPerson_dr=pe.PAPER_RowId) AS 戶籍地址,

pe.PAPER_Education_DR->EDU_Desc AS 學歷,pe.PAPER_Occupation_DR->CTOCC_Desc AS 職業,pe.PAPER_Marital_DR->CTMAR_Desc AS 婚姻狀況,

pa.PAPMI_Name3 AS 醫保卡號,

pe.PAPER_Province_Birth_DR->PROV_Desc AS 戶籍省,pe.PAPER_Province_Birth_DR->PROV_Code AS 戶籍省代碼,

pe.PAPER_CityBirth_DR->CTCIT_Desc AS 戶籍市,pe.PAPER_CityBirth_DR->CTCIT_Code AS 戶籍市代碼,

(SELECT PROV_Code FROM CT_Province WHERE PROV_RowId=(SELECT PAPER_HouseProvince_DR FROM DHC_Person WHERE

PAPER_PaPerson_dr=pe.PAPER_RowId)) AS 居住地省代碼,

(SELECT PROV_Desc FROM CT_Province WHERE PROV_RowId=(SELECT PAPER_HouseProvince_DR FROM DHC_Person WHERE

PAPER_PaPerson_dr=pe.PAPER_RowId)) AS 居住地省,

(SELECT CTCIT_Code FROM CT_City WHERE CTCIT_RowId=(SELECT PAPER_HouseCity_DR FROM DHC_Person WHERE PAPER_PaPerson_dr=pe.PAPER_RowId)) AS

居住地市代碼,

(SELECT CTCIT_Desc FROM CT_City WHERE CTCIT_RowId=(SELECT PAPER_HouseCity_DR FROM DHC_Person WHERE PAPER_PaPerson_dr=pe.PAPER_RowId)) AS

居住地市,

pe.PAPER_Nation_DR->CTNAT_Desc,re.RLT_OEORI_DR AS 醫囑ID,

(SELECT ARCIM_Desc FROM ARC_ItmMast WHERE ARCIM_RowId=re.RLT_ARCIM_DR ) AS 體檢項目,

(SELECT OD_Desc FROM DHC_PE_OrderDetail WHERE OD_RowId=re.RLT_OD_DR) AS 體檢細項,re.RLT_Result 體檢結果,re.RLT_UpdateDate AS 報告更新

from SQLUser.PA_Adm ad,SQLUser.PA_Person pe,SQLUser.PA_PatMas pa,DHC_PE_Result re WHERE

ad.PAADM_PAPMI_DR =pe.PAPER_RowId

AND ad.PAADM_PAPMI_DR =pa.PAPMI_RowId1

and re.RLT_ADM_DR =ad.PAADM_RowID

AND ad.PAADM_AdmDate BETWEEN '2017-05-02' AND '2017-10-01'

AND ad.PAADM_RowID IN (

SELECT RLT_ADM_DR FROM DHC_PE_Result WHERE (OR RLT_OD_DR ='8||2134' OR RLT_OD_DR ='8||2183'

OR RLT_OD_DR ='8||2184' OR RLT_OD_DR ='8||2185' OR RLT_OD_DR ='8||2186' OR RLT_OD_DR ='8||2187'

OR RLT_OD_DR ='8||2188' OR RLT_OD_DR ='8||2190' OR RLT_OD_DR ='8||2191' OR RLT_OD_DR ='8||2192' OR RLT_OD_DR ='8||2193'

OR RLT_OD_DR ='8||2194' OR RLT_OD_DR ='8||2195' OR RLT_OD_DR ='8||2303' OR RLT_OD_DR ='8||2362' OR RLT_OD_DR ='8||2363' OR RLT_OD_DR='13||798'

OR RLT_OD_DR='13||798' OR RLT_OD_DR='13||799' OR RLT_OD_DR='13||800' OR RLT_OD_DR='13||802' OR RLT_OD_DR='13||804' OR RLT_OD_DR='13||940'

) )

258892

-----------------------------------------------------

SELECT OEORI_RowId into:OEOID FROM SQLUser.OE_OrdItem WHERE ( OEORI_OEORD_ParRef->OEORD_Adm_DR=:Adm AND OEORI_ItmMast_DR->ARCIM_ItemCat_DR->ARCIC_Code="診查費" AND (OEORI_ItemStat_DR->OSTAT_Code!="D" and OEORI_ItemStat_DR->OSTAT_Code!="C"

------------------------------------------------------------------------------------------

1.慢病院需要的his和體檢的數據導出

2.抽血室掃健康碼獲取不到醫囑信息跟程序處理

3.自助機取號密碼生成10位改爲6位

4.門診收費提示上次未交診查費的更新

5. 自助機通過省份證獲取患者信息接口修改

-----------------------------------------------------------------------------------------------

排班擴展表：RB_ApptSchedule中的AS_QueueNo字段中的26:1:1中的第一位代表號源，第二位數代表(0:未取號1:正常取號2:已預約,3:預約取號,4.已退號,5:加號,6:診間預約取號)，第三位數代表預約機構1:3:1=序號:預約方式:佔用情況(0-未佔用，1佔用)

1------------------------------------------------------------------------------------------------

1.個別患者入院後病案組生成了病案號但是電子病歷裏面沒有取到病案號和護理病歷;在打開病歷時日過pa_patmas爲空時重新插入

2.斷電後檢驗科客戶端用戶憑據丟失查因

3.E:\LC\測試庫程序更新\寶安中醫院檢驗源碼20171212\檢驗源碼20170803\寶安中醫院檢驗源碼\寶安中醫院檢驗源碼\寶安中醫院\dthealth\技師

日常雜事記錄

PDManer [元數建模]-v4.9.0 發佈：一款簡單好用的數據庫建模平臺

使用neovim打造go ide(支持代碼跳轉, 代碼補全, 實時語法檢查)

sql求連續值問題

cs01 CSS Syntax

挑戰程序設計競賽 2.3章習題 poj 3046 Ant Counting

[MASM拾遺]Offset僞指令

h30 HTML Layout Elements

瞭解顯卡

一款基於C#開發的通訊調試工具（支持Modbus RTU、MQTT調試）

Linux/Golang/glibC系統調用

SQL語句

日常記錄20191129

日常雜事記錄

sql20200202

sql servier

https://yachay.unat.edu.pe/blog/index.php?comment_area=format_blog&comment_component=blog&comment_co

linux以太網驅動總結