IBM AS/400 Manual do Utilizador Página 130

  • Descarregar
  • Adicionar aos meus manuais
  • Imprimir
  • Página
    / 489
  • Índice
  • MARCADORES
  • Avaliado. / 5. Com base em avaliações de clientes
Vista de página 129
Running a Program From a Menu-Driven Application
A*****************************************************************
A* DESCRIPTION: This is the DDS for the physical file EMPMST. *
A* It contains one record format called EMPREC. *
A* This file contains one record for each employee *
A* of the company. *
A*****************************************************************
A*
A R EMPREC
A ENUM 5 0 TEXT('EMPLOYEE NUMBER')
A ENAME 20 TEXT('EMPLOYEE NAME')
A ETYPE 1 TEXT('EMPLOYEE TYPE')
A EDEPT 3 0 TEXT('EMPLOYEE DEPARTMENT')
A ENHRS 3 1 TEXT('EMPLOYEE NORMAL WEEK HOURS')
A K ENUM
Figure 48. DDS for EMPRPT2
Running a Program From a Menu-Driven Application
Another way to run an ILE program is from a menu-driven application. The work-
station user selects an option from a menu, which in turn calls a particular program.
Figure 49 illustrates an example of an application menu.
PAYROLL DEPARTMENT MENU
Select one of the following:
1. Inquire into employee master
2. Change employee master
3. Add new employee
Selection or command
===> _________________________________________________________________________
_______________________________________________________________________________
F3=Exit F4=Prompt F9=Retrieve F12=Cancel
F13=Information Assistant F16=AS/400 main menu
Figure 49. Example of an Application Menu
The menu shown in Figure 49 is displayed by a menu program in which each
option calls a separate ILE program. You can create the menu by using STRSDA
and selecting option 2 ('Design menus').
Figure 50 on page 107 shows the DDS for the display file of the above PAYROLL
DEPARTMENT MENU. The source member is called PAYROL and has a source
type of MNUDDS. The file was created using SDA.
106 ILE RPG for AS/400 Programmer's Guide
Vista de página 129
1 2 ... 125 126 127 128 129 130 131 132 133 134 135 ... 488 489

Comentários a estes Manuais

Sem comentários