Program myProgram type basicProgram (employeeNum INT) { includeReferencedFunctions = yes } // variables globales de programa employees record_ws; employeeName char(20); // función incorporada obligatoria Function main() // inicializar nombres de empleados recd_init(); // obtener el nombre de empleado correcto // en función del employeeNum pasado employeeName = getEmployeeName(employeeNum); end // otra función incorporada Function recd_init() employees.name[1] = "Employee 1"; employees.name[2] = "Employee 2"; end end // función autónoma Function getEmployeeName(employeeNum INT) returns (CHAR(20)) // variable local index BIN(4); index = 2; if (employeeNum > index) return("Error"); else return(employees.name[employeeNum]); end end // componente de registro que actúa como typeDef de empleados Record record_ws type basicRecord 10 name CHAR(20)[2]; end
para obtener más detalles, consulte el tema correspondiente al tipo determinado de programa.
Conceptos relacionados
Componentes
Componente de programa