Loading... * 备用，其他现场应该用不到 > Config/SeparateVBScript.VBS ,在最后面加上，如果已经有了GetPrintBarCodeInfo这个函数，就按照实际新增 ```vbnet '需要条码中添加控件 Param.PrintInfoEx1 Dim sPrintExInfo1 function GetPrintBarCodeInfo(color) '打印函数开始 Dim sQueueNo InputMap.GetMapFieldValue "QueueNo",sQueueNo If sQueueNo = -1 Then sPrintExInfo1 = "-1" ElseIf Left(sQueueNo, 1) = "1" Then sPrintExInfo1 = "A" & Mid(sQueueNo, 2) ElseIf Left(sQueueNo, 1) = "2" Then sPrintExInfo1 = "B" & Mid(sQueueNo, 2) Else ' 处理其他情况，如果需要的话 End If InputMap.SetMapFieldValue "PrintExInfo1",sPrintExInfo1 ResultMap.SetMapFieldValue "Result_PrintBarCodeCount",1 end function ``` * 然后在条码界面处，把显示队列号的控件取值改成Param.PrintInfoEx1 <div class="tip inlineBlock success"> 下面是收集的条码打印字段 </div> | 字段名 | 说明 | | --------------------- | ---------------------------------------------- | | HisPatienttypeName | 就诊类型，门诊、住院等等。 | | HisPatientID | HIS患者编号 | | ClinicPatientID | 门诊号 | | InfeePatientID | 住院号 | | StudyID | 检查号 | | SocietyID | 医保号 | | eNetPatientID | 医联号 | | DepartmentpatientID | 影像号 | | DiagID | 申请单号 | | AccessNum | AccessNum | | PatientName | 患者名称 | | PatientspellName | 患者拼音 | | SexName | 性别，男、女 | | Age | 年龄，带单位 | | Birthday | 生日 | | IDNumber | 身份证号码 | | PhoneNumber | 电话号码 | | Address | 地 | | Folk | 民族 | | Nationality | 国籍 | | Height | 身高 | | Weight | 体重 | | SickRoom | 病房 | | SickBed | 病床 | | IsEmergency | 是否急诊，急诊，平诊 | | Checkserialnum | 检查流水号 | | DeviceTypeName | 设备类型名称 | | DeviceName | 设备名称 | | StudyDescription | 检查项目描述 | | TotalStudyDescription | 总体检查描述（试用于多部位检查对应多条分诊的） | | StudyTime | 检查时间 | | DoctorCode | 申请医生 | | ReqDepartmentName | 申请科室 | | ReqHospital | 申请医院 | | ABStractHistory | 病史 | | PreDiagnose | 临床诊断 | | OperatorName | 操作员名称 | | StudyFee | 费用 | | SJCL | 送检材料 | | Sample\_Count | 标本数量 | | FrostDiagnose | 冰冻诊断 | | BackupField1 | 备用字段1 | | BackupField2 | 备用字段2 | | BackupField3 | 备用字段3 | | BackupField4 | 备用字段4 | | HischeckItem | HIS检查项目 | | PhotoMaker | 技师名称 | | PrintTime | 当前打印时间 | | BackupDate1 | 备用日期1 | | BackupDate2 | 备用日期2 | | Remark | 备注 | | SeparateTime | 分诊时间 | | ExposalCount | 曝光次数 | | FilmCount | 胶片数量 | | FilmTypeName | 胶片类型 | | CallNo | 呼叫好 | | QueueNo | 队列号 | | EstimateTime | 预计检查时间 | | PrintRoomName | 检查房间名称 | | PrintHint | 注意事项提示 | | ReportHint | 去报告时间提示 | | Backup1 | 备用打印1 | | Backup2 | 备用打印2 | | Backup3 | 备用打印3 | 最后修改：2024 年 04 月 23 日 © 允许规范转载 赞 如果觉得我的文章对你有用，请随意赞赏