Jumat, 31 Mei 2013

CREATE MENU PADA ISERIES / AS400

AS 400 atau iSeries memiliki fasilitas yang dapat membantu dalam pembuatan menu. Fasilitas ini sangat memudahkan dalam pembuatan menu karena kita tidak perlu masuk dalam modus programming.

Mengakses fasilita SDA
Untuk mengakses fasilitas SDA dapat dilakukan denan mengetikkan command STRSDA (Start Design Aid). Pada menu SDA pilih design menu. Pada contoh akan kita create menu dengan nama MENUTEST dengan sourcefile QMNUSRC pada library MNULIB. Tampil yang harus diisi :

Source file . . . . . . . . QMNUSRC Name, F4 for list

Library . . . . . . . . . MNULIB Name, *LIBL, *CURLIB

Menu . . . . . . . . . . . MENUTEST Name, F4 for list

Kemudian isikan pilihan 'Y' untuk images dan command. Sedangkan untuk help boleh diisi 'Y' atau 'N'.

Selanjutnya akan muncul layar desain menu :

MENUTEST MENUTEST Menu

Select one of the following:

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.


Mendefisikan Tampilan Menu dan Pilihan Menu

Setelah masuk ke layar design menu, selanjutnya dapat kita ketikan tampilan menunya. Misalnya :

=====================================

MENUTEST MENUTEST Menu

Select one of the following:

1. Menu Query Stock Barang
2. Entri stock baru
3. Cetak Spool file
4.
5.

99. Sign Off
======================================


Selanjutnya yang harus dilakukan adalah mengisikan action/command untuk masing-masing angka pilihan menu. Hal ini dilakukan dengan tombol fungsi F10. (work with command), sehingga muncul layar 'Define Menu Command' . Isikan command, menu, atau progam sesuai dengan nomor pada tampilan menu yang kita buat.



Define Menu Commands

Menu . . . . . . : MENUTEST Position to menu option . .

Type commands, press Enter.

Option Command
01 go M_Qstock --> membuka menu M_Qstock

02 call pgm(p_enStock) --> memanggil program entri stock (p_enstock)
03 ? WRKsplf --> memanggil command 'WRKSPLF'

04

99 SIgn off

====================================================

Tanda Question Mark pilihan menu (pilihna no.3 pada contoh) dimaksudkan untuk memberikan kesempatan pada user untuk mengisi parameter pada command, program, atau menu yang akan dijalan.


Meng-Compile Menu
Setelah design menu selesai maka langkah selanjutnya adalan melakukan compile menu tersebut. Untuk itu cukup dilakukan dengan keluar dari SDA (dengan tombol F3).

Isikan 'N' jika muncul layar 'Specify Menu Function' atau tekan F3 lagi.
Pada layar Exit SDA Menus, isikan :

Save New or updated menu source : 'Y'
Source File dan Library : Isikan nama source file dan library-nya. Yang perlu diperhatikan adalah bahwa Source file ini harus telah dicreate terlebih dahulu, atau menggu




menggunakan tersebut adalah Screen Design AID (SDA).

Tidak ada komentar: