第六章 使用系统类提供国家语言支持 - 创建自定义语言环境
文章目录
- 第六章 使用系统类提供国家语言支持 - 创建自定义语言环境
- 创建自定义语言环境
第六章 使用系统类提供国家语言支持 - 创建自定义语言环境
创建自定义语言环境
此示例将提供一个模板,用于使用自定义表创建自定义语言环境。自定义表将在 EBCDIC(美国使用的通用格式)和 Latin-1 (ISO-8859–1) 之间转换。
对于任何其他表,首先我们需要获得字符映射的定义。对于此示例,我们使用来自网站 http://source.icu-project.org(International Components for Unicode) 的数据文件。相关数据文件是一个文本文件,其注释行以井号 (#) 开头,然后是一系列格式的翻译定义行:
<Uuuuu> \xee |0
该文件的一小段如下所示:
#
#UNICODE EBCDIC_US
#_______ _________
<U0000> \x00 |0
<U0001> \x01 |0
<U0002> \x02 |0
<U0003> \x03 |0
<U0004> \x37 |0
<U0005> \x2D |0
...
这些行表明 Unicode 字符 Uaaaa 映射到 EBCDIC 字符 \xbb(其中 aaaa 和 bb 以十六进制表示)。我们假设该表是可逆的,并且 EBCDIC 字符 \xbb 映射回 Unicode 字符 Uaaaa。这使我们能够在单次扫描中从同一数据文件创建两面(即 EBCDIC-to-Latin1 和 Latin1-to-EBCDIC)。因为 Unicode 范围只是从 0 到 255,所以这实际上是一个 Latin-1 表。
该过程首先创建 SubTable 对象,然后是 Table,最后是 Locale。对于第一步,该过程创建两个 SubTables 对象,初始化它们的 Name 和 Type 属性,然后用从定义文件中读取的数据填充 FromTo 映射数组。
子表名称采用 Type–FromEncoding–ToEncoding 形式。常规 I/O 转换的类型是“XLT”,因此子表名称将是 XLT-yEBCDIC-Latin1 和 XLT-yLatin1-EBCDIC。
以下代码创建 SubTables 对象。在真实世界的程序中,代码将执行许多一致性检查,为了清楚起见,此处省略了这些检查。此示例删除相同对象(子表、表和区域设置)的现有先前版本,以便您可以多次运行该示例。更恰当地说,您应该使用类方法 Exists() 检查以前的对象是否存在,如果它们已经存在,则采取不同的操作。
// Names for the new SubTables (save for later)Set nam1 = "XLT-Latin1-yEBCDIC"Set nam2 = "XLT-yEBCDIC-Latin1"// Delete existing SubTables instances with same idsDo ##class(Config.NLS.SubTables).Delete(nam1)Do ##class(Config.NLS.SubTables).Delete(nam2)// Create two SubTable objectsSet sub1 = ##class(Config.NLS.SubTables).%New()Set sub2 = ##class(Config.NLS.SubTables).%New()// Set Name and DescriptionSet sub1.Name = nam1Set sub1.Description = "ICU Latin-1->EBCDIC sub-table"Set sub2.Name = nam2Set sub2.Description = "ICU EBCDIC ->Latin-1 sub-table"
SubTables 对象包含一个属性 type,它是一个小整数,指示我们是否正在处理多字节转换。此示例将类型设置为零,表示单字节映射。初始化映射,以便将数据文件中未定义的代码点(字符)映射到它们自己。
// Set Type (single-to-single)Set sub1.Type = 0Set sub2.Type = 0// Initialize FromTo arraysFor i = 0 : 1 : 255{Do sub1.FromTo.SetAt(i, i)Do sub2.FromTo.SetAt(i, i)}
接下来应用程序读取文件。文件中的定义会覆盖那些设置为默认映射的定义。函数 $ZHEX() 将代码从十六进制转换为十进制。
// Assume file is in the mgr directorySet file = "glibc-EBCDIC_US-2.1.2.ucm"// Set EOF exit trapSet $ZTRAP = "EOF"// Make that file the default deviceOpen fileUse fileFor{Read xIf x?1"<U"4AN1">".E{Set uni = $ZHEX($E(x,3,6)),ebcdic = $ZHEX($E(x,12,13))Do sub1.FromTo.SetAt(ebcdic,uni)Do sub2.FromTo.SetAt(uni,ebcdic)}}EOF // No further dataSet $ZT = ""Close file// Save SubTable objectsDo sub1.%Save()Do sub2.%Save()
字符映射现已完成。下一步是创建引用刚刚定义的 SubTables 对象的 Table 对象。表对象实际上是子表的描述符,只有几个属性。下面的代码建立了两者之间的联系:
// Delete existing Tables instances with same idsDo ##class(Config.NLS.SubTables).Delete("XLT", "Latin1", "yEBCDIC")Do ##class(Config.NLS.SubTables).Delete("XLT", "yEBCDIC", "Latin1")// Create two Table objectsSet tab1 = ##class(Config.NLS.Tables).%New()Set tab2 = ##class(Config.NLS.Tables).%New()// Set descriptionSet tab1.Description = "ICU loaded Latin-1 -> EBCDIC table"Set tab2.Description = "ICU generated EBCDIC -> Latin-1 table"// Set From/To encodingsSet tab1.NameFrom = "Latin1"Set tab1.NameTo = "yEBCDIC"Set tab2.NameFrom = "yEBCDIC"Set tab2.NameTo = "Latin1"// Set SubTableSet tab1.SubTableName = nam1Set tab2.SubTableName = nam2// Set TypeSet tab1.Type = "XLT"Set tab2.Type = "XLT"// Set Default Action// 1 = Replace with replacement valueSet tab1.XLTDefaultAction = 1Set tab2.XLTDefaultAction = 1// Set Replacement value of "?"Set tab1.XLTReplacementValue = $ASCII("?")Set tab2.XLTReplacementValue = $ASCII("?")// Set Reversibility// 1 = Reversible// 2 = GeneratedSet tab1.XLTReversibility = 1Set tab2.XLTReversibility = 2// Set Translation Type// 0 = non-modal to non-modalSet tab1.XLTType = 0Set tab2.XLTType = 0// Save Table objectsDo tab1.%Save()Do tab2.%Save()
定义好表后,构建的最后一步是定义一个将包含新表的语言环境对象。应用程序创建一个空的 Locale 对象并像对表和子表所做的那样填充每个属性。然而,Locale 更大更复杂。进行此类简单更改的最简单方法是复制现有语言环境并仅更改我们需要的内容。此过程使用 enu8 作为源语言环境并将新语言环境命名为 yen8。开头的 y 清楚地表明这是一个自定义语言环境,不应在升级时删除。
// Delete existing Locales instance with the same idDo ##class(Config.NLS.Locales).Delete("yen8")// Open source localeSet oldloc = ##class(Config.NLS.Locales).%OpenId("enu8")// Create cloneSet newloc = oldloc.%ConstructClone()// Set new Name and DescriptionSet newloc.Name = "yen8"Set newloc.Description = "New locale with EBCDIC table"
设置好语言环境后,该进程现在将 EBCDIC 表添加到启动时加载的 I/O 表列表中。这是通过在数组属性 XLTTables 中插入一个节点来完成的,如下所示:
XLTTables(<TableName>) = <components>
-
tablename标识此语言环境的一对输入和输出表。因为名称不需要以
y开头,所以我们使用EBCDIC。 -
components是一个四项列表,如下所示:
- 输入“
From”编码 - 输入“
To”编码 - 输出“
From”编码 - 输出“
To”编码
以下代码将表格添加到可用语言环境列表中:
// Add new table to localeSet component = $LISTBUILD("yEBCDIC", "Latin1", "Latin1", "yEBCDIC")Do newloc.XLTTables.SetAt(component, "EBCDIC")
在 IRIS 可以使用语言环境之前,必须将其编译成其内部形式。这有时也称为验证语言环境。 IsValid() 类方法进行详细分析并返回两个数组,一个用于错误,一个用于警告,如果语言环境未正确定义,则带有人类可读的消息。
// Check locale consistencyIf '##class(Config.NLS.Locales).IsValid("yen8", .Errors, .Warns){Write !,"Errors: "ZWrite ErrorsWrite !,"Warnings: "ZWrite WarnsQuit}// Compile new localeSet status = ##class(Config.NLS.Locales).Compile("yen8")If (##class(%SYSTEM.Status).IsError(status)){Do $System.OBJ.DisplayError(status)}Else{Write !,"Locale yen8 successfully created."}
相关文章:
第六章 使用系统类提供国家语言支持 - 创建自定义语言环境
文章目录第六章 使用系统类提供国家语言支持 - 创建自定义语言环境创建自定义语言环境第六章 使用系统类提供国家语言支持 - 创建自定义语言环境 创建自定义语言环境 此示例将提供一个模板,用于使用自定义表创建自定义语言环境。自定义表将在 EBCDIC(美…...
「题解」解决二进制数中1的个数
🐶博主主页:ᰔᩚ. 一怀明月ꦿ ❤️🔥专栏系列:线性代数,C初学者入门训练 🔥座右铭:“不要等到什么都没有了,才下定决心去做” 🚀🚀🚀大家觉不错…...
泛型详解.
1 泛型的引入 问题:我们之前实现过的顺序表,只能保存 int 类型的元素,如果现在需要保存 指向 Person 类型对象的引用的顺序表,请问应该如何解决?如果又需要保存指向 Book 对象类型的引用呢? 之前写的顺序表…...
Vue 3.0 响应性 深入响应性原理 【Vue3 从零开始】
现在是时候深入了!Vue 最独特的特性之一,是其非侵入性的响应性系统。数据模型是被代理的 JavaScript 对象。而当你修改它们时,视图会进行更新。这让状态管理非常简单直观,不过理解其工作原理同样重要,这样你可以避开一…...
升级 vue3 常见问题总汇
Ⅰ、前言 虽然 vue3 是没有删除 vue2 的 选项式 API , 但是我们升级vue3 还是需要修改很多问题的下面来看看我们升级常见的一些问题 👇 文章目录Ⅰ、前言Ⅱ、解决兼容问题1、路由的创建方式2、路由的方法变化3、升级 vuex 到 4.x4、作用域 插槽语法修改…...
汽车 Automotive > T-BOX GNSS高精定位测试相关知识
参考:https://en.wikipedia.org/wiki/Global_Positioning_SystemGPS和GNSS的关系GPS(Global Positioning System),全球定位系统是美国军民两用的导航定位卫星系统,GPS包含双频信号,频点L1、L2和L5GNSS&…...
大数据面试核心101问【大厂超级喜欢这些题】
之前出过《史上最全的大数据开发八股文》这篇文章,同学们都觉得还不错,但是有些同学觉得那个背起来还是有些吃力,于是我再次回顾了自己之前面试所有大厂的一些面试题以及牛客上面的一些面经,然后总结了频率问的最高的101问&#x…...
代码随想录算法训练营第四十八天 | leetcode 121. 买卖股票的最佳时机,122.买卖股票的最佳时机II
代码随想录算法训练营第四十八天 | leetcode 121. 买卖股票的最佳时机,122.买卖股票的最佳时机II121. 买卖股票的最佳时机122.买卖股票的最佳时机II121. 买卖股票的最佳时机 题目: 给定一个数组 prices ,它的第 i 个元素 prices[i] 表示一支…...
RAD 11.3 delphi和C++改进后新增、废弃及优化的功能
RAD 11.3 delphi和C改进后新增和废弃的功能 目录 RAD 11.3 delphi和C改进后新增和废弃的功能 一、版本RAD 11.3 delphi和C改进后新增功能 1、官方视频位置: 2、官方文档的链接位置: 二、版本RAD 11.3 delphi和C改进后废弃的功能 2.1、编译器不再使…...
【C++】引用
🏖️作者:malloc不出对象 ⛺专栏:C的学习之路 👦个人简介:一名双非本科院校大二在读的科班编程菜鸟,努力编程只为赶上各位大佬的步伐🙈🙈 目录前言一、引用1.1 引用概念1.2 引用特性…...
LPNet for Image Derain
Lightweight Pyramid Networks for Image Deraining前置知识高斯-拉普拉斯金字塔图像中的高频信息和低频信息为什么高斯-拉普拉斯金字塔可以实现去雨?可能性分析网络结构整体结构:子网结构:递归块结构:后续补充代码 前置知识 这…...
【NLP相关】基于现有的预训练模型使用领域语料二次预训练
❤️觉得内容不错的话,欢迎点赞收藏加关注😊😊😊,后续会继续输入更多优质内容❤️👉有问题欢迎大家加关注私戳或者评论(包括但不限于NLP算法相关,linux学习相关,读研读博…...
使用git进行项目管理--git使用及其常用命令
使用git进行项目管理 文章目录 使用git进行项目管理git使用1.添加用户名字2.添加用户邮箱3.git初始化4.add5.commit6.添加到gitee仓库7.推送到gitee8.切换版本git常用命令git add把指定的文件添加到暂存区中添加所有修改、已删除的文件到暂存区中添加所有修改、已删除、新增的文…...
Mybatis_CRUD使用
目录1 Mybatis简介环境说明:预备知识:1.1 定义1.2 持久化为什么需要持久化服务呢?1.3 持久层1.4 为什么需要Mybatis2 依赖配置3 CRUDnamespaceselect (查询用户数据)※传值方式:于方法中传值使用Map传值insert (插入用…...
JVM的过程内分析和过程间分析有什么区别?
问: 目前所有常见的Java虚拟机对过程间分析的支持都相 当有限,要么借助大规模的方法内联来打通方法间的隔阂,以过程内分析(Intra-Procedural Analysis, 只考虑过程内部语句,不考虑过程调用的分析ÿ…...
LearnDash测验报告如何帮助改进您的课程
某一个场景。Pennywell 大学有一门课程“Introduction to Linear Algebra”。上学期进行了两次测验。20% 的学生在第一次测验中不及格,而 80% 在第二次测验中不及格。在进一步评估中,观察到第一次测验不及格的学生在第二次测验中也不及格。在第二次测验中…...
如何通过Java将Word转换为PDF
Word是我们日常编辑文档内容时十分常用的一种文档格式。但相比之下,PDF文档的格式、布局更为固定,不易被更改。在保存或传输较为重要的文档内容时,PDF文档格式也时很多人的不二选择。很多时候我们都会遇到需要将Word转换为PDF的情况。下面我就…...
DOM型XSS
DOM型XSSDOM是什么DOM型XSSDOM型XSS实操DOM是什么 DOM就是Document。 文档是由节点构成的集合,在DOM里存在许多不同类型的节点,主要有:元素节点、文本节点,属性节点。 元素节点:好比< body >< p >< h …...
04-项目立项:项目方案、可行性分析、产品规划、立项评审
文章目录4.1 项目方案立项阶段4.2 可行性分析4.3 产品规划4.4 立项评审4.4.1 立项说明书的主要内容4.4.2 立项评审流程章节总结4.1 项目方案 学习目标: 能够输出产品项目方案 项目开发设计流程的主要阶段: 立项阶段 → 设计阶段 → 开发阶段 → 测试阶…...
数据分享|NPP VIIRS夜间灯光数据(2012-2020逐月)
2011年10月美国的“索米”国家极轨卫星伙伴卫星(Suomi National Polar-orbiting Partnership or Suomi NPP)发射,它搭载的VIIRS传感器上有一个称为DNB(Day Night Band)的波段能够在500米分辨率(比原来的OLS提高6倍)的尺度上对地表开展每天覆盖全球一次的高灵敏度(比OLS提…...
多模态2025:技术路线“神仙打架”,视频生成冲上云霄
文|魏琳华 编|王一粟 一场大会,聚集了中国多模态大模型的“半壁江山”。 智源大会2025为期两天的论坛中,汇集了学界、创业公司和大厂等三方的热门选手,关于多模态的集中讨论达到了前所未有的热度。其中,…...
SciencePlots——绘制论文中的图片
文章目录 安装一、风格二、1 资源 安装 # 安装最新版 pip install githttps://github.com/garrettj403/SciencePlots.git# 安装稳定版 pip install SciencePlots一、风格 简单好用的深度学习论文绘图专用工具包–Science Plot 二、 1 资源 论文绘图神器来了:一行…...
【git】把本地更改提交远程新分支feature_g
创建并切换新分支 git checkout -b feature_g 添加并提交更改 git add . git commit -m “实现图片上传功能” 推送到远程 git push -u origin feature_g...
C# 求圆面积的程序(Program to find area of a circle)
给定半径r,求圆的面积。圆的面积应精确到小数点后5位。 例子: 输入:r 5 输出:78.53982 解释:由于面积 PI * r * r 3.14159265358979323846 * 5 * 5 78.53982,因为我们只保留小数点后 5 位数字。 输…...
面向无人机海岸带生态系统监测的语义分割基准数据集
描述:海岸带生态系统的监测是维护生态平衡和可持续发展的重要任务。语义分割技术在遥感影像中的应用为海岸带生态系统的精准监测提供了有效手段。然而,目前该领域仍面临一个挑战,即缺乏公开的专门面向海岸带生态系统的语义分割基准数据集。受…...
Python Ovito统计金刚石结构数量
大家好,我是小马老师。 本文介绍python ovito方法统计金刚石结构的方法。 Ovito Identify diamond structure命令可以识别和统计金刚石结构,但是无法直接输出结构的变化情况。 本文使用python调用ovito包的方法,可以持续统计各步的金刚石结构,具体代码如下: from ovito…...
Razor编程中@Html的方法使用大全
文章目录 1. 基础HTML辅助方法1.1 Html.ActionLink()1.2 Html.RouteLink()1.3 Html.Display() / Html.DisplayFor()1.4 Html.Editor() / Html.EditorFor()1.5 Html.Label() / Html.LabelFor()1.6 Html.TextBox() / Html.TextBoxFor() 2. 表单相关辅助方法2.1 Html.BeginForm() …...
解析奥地利 XARION激光超声检测系统:无膜光学麦克风 + 无耦合剂的技术协同优势及多元应用
在工业制造领域,无损检测(NDT)的精度与效率直接影响产品质量与生产安全。奥地利 XARION开发的激光超声精密检测系统,以非接触式光学麦克风技术为核心,打破传统检测瓶颈,为半导体、航空航天、汽车制造等行业提供了高灵敏…...
安卓基础(Java 和 Gradle 版本)
1. 设置项目的 JDK 版本 方法1:通过 Project Structure File → Project Structure... (或按 CtrlAltShiftS) 左侧选择 SDK Location 在 Gradle Settings 部分,设置 Gradle JDK 方法2:通过 Settings File → Settings... (或 CtrlAltS)…...
Vue3 PC端 UI组件库我更推荐Naive UI
一、Vue3生态现状与UI库选择的重要性 随着Vue3的稳定发布和Composition API的广泛采用,前端开发者面临着UI组件库的重新选择。一个好的UI库不仅能提升开发效率,还能确保项目的长期可维护性。本文将对比三大主流Vue3 UI库(Naive UI、Element …...
