Skip to content

Added example for menu #36

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
nehab7 wants to merge 1 commit into
base: master
Choose a base branch
from
+21 −1
Open

Added example for menu #36

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
8 changes: 7 additions & 1 deletion QPNLSRC/Rules.mk
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,3 +1,9 @@
SAMHELP.PNLGRP: SAMHELP-Help_Application_Sam.PNLGRPSRC

SAMMNU.MENU: SAMMNU-Main_menu_application_SAMPLE.MENUSRC
SAMMNU.MENU: SAMMNU-Main_menu_application_SAMPLE.MENUSRC

FOO.FILE: foo.mnudds
FOO1.MSGF: fooqq.mnucmd
FOO1.MSGF: private TEXT = sample msgf
FOOP.MENU: FOO.FILE FOO1.MSGF
FOOP.MENU: private TEXT = sample menu
11 changes: 11 additions & 0 deletions QPNLSRC/foo.mnudds
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -0,0 +1,11 @@
A DSPSIZ(24 80 *DS3)
A R MENU
A CF03(03 'Exit')
A 1 2'Main Menu'
A DSPATR(HI)
A 3 2'Select an option:'
A OPT 1A B 5 2
A 7 2'1. Display library list'
A 8 2'2. Set Current library'
A 11 2'F3=Exit'
A MSG 50A O 23 2DSPATR(HI)
3 changes: 3 additions & 0 deletions QPNLSRC/fooqq.mnucmd
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
FOOQQ,1
0001 DSPLIBL
0002 CHGCURLIB TOBITEST