系统函数 VGLib.getVAGSysType 标识正在运行程序的目标系统。如果(在开发时)选择了程序属性 VAGCompatibility 或者(在生成时)将构建描述符选项 VAGCompatibility 设置为 yes,则支持此函数。
如果生成的输出是 Java™ 包装器,则 VGLib.getVAGSysType 不可用。否则,此函数返回 VisualAge® Generator EZESYS 特殊函数字已返回的字符值。如果当前系统不受 VisualAge Generator 支持,则此函数返回 SysVar.systemType 所返回的代码的大写等效字符串。
VGLib.getVAGSysType( ) returns (result CHAR(8))
VGLib.getVAGSysType 返回 SysVar.systemType 的值的 VisualAge Generator 等效值。
sysVar.systemType 中的值 | VGLib.getVAGSysType 返回的值 |
---|---|
AIX® | "AIX" |
DEBUG | "ITF" |
ISERIESC | "OS400" |
ISERIESJ | "OS400" |
LINUX | "LINUX" |
USS | "OS390" |
WIN | "WINNT" |
// valid ONLY for sysVar.systemType if sysVar.systemType is AIX call myProgram; end
只能将 VGLib.getVAGSysType 用作赋值或 move 语句中的源。
建议您使用 sysVar.systemType 而不是 VGLib.getVAGSysType。
mySystem CHAR(8); mySystem = VGLib.getVAGSysType(); if (mySystem == "AIX") add myRecord; end
mySystem CHAR(8); mySystem = VGLib.getVAGSysType(); if (mySystem == "AIX") call myAddProgram myRecord; end
也可以采用另一种方法来解决问题,但仅当使用 sysVar.systemType 而不是 VGLib.getVAGSysType 时该方法才可行;有关详细信息,请参阅 eliminateSystemDependentCode。