可以在 EGL 文件中声明函数,如 EGL 源格式中所述。
Program myProgram(employeeNum INT) {includeReferencedFunctions = yes} // program-global variable employees record_ws; employeeName char(20); // a required embedded function Function main() // initialize employee names recd_init(); // get the correct employee name // based on the employeeNum passed employeeName = getEmployeeName(employeeNum); end // another embedded function Function recd_init() employees.name[1] = "Employee 1"; employees.name[2] = "Employee 2"; end end // stand-alone function Function getEmployeeName(employeeNum INT) returns (CHAR(20)) // local variable index BIN(4); index = syslib.size(employees.name); if (employeeNum > index) return("Error"); else return(employees.name[employeeNum]); end end // record part that acts as a typeDef for employees Record record_ws type basicRecord 10 name CHAR(20)[2]; end
此指示符将在从 VisualAge® Generator 迁移的代码中使用。有关详细信息,请参阅 containerContextDependent。