An interactive job is not a group job. You can run only one job in the session. To run additional jobs, you must start other sessions. You can use the system request key to get an alternate sign-on screen, but that limits you to two jobs.
With PC Support and Client Access, you can use the hot key. You can run multiple emulation sessions in separate windows, however, you?re required to sign on to the system again.
Group jobs allow you to run up to 16 distinct interactive jobs in one session; you sign on only once.
Only one group job is active at a time, the rest are suspended. The Transfer to Group Job (TFRGRPJOB) command allows you to switch from one group job to another and to add new jobs to the group.
To change a nongroup job into a group job, use the Change Group Attributes (CHGGRPA) command.
CHGGRPA GRPJOB(JOB1) +
TEXT('Group job 1')
The current interactive job is now a group job called JOB1.
Use attention key program runs the TFRGRPJOB command to return the user to the first group job (JOB1), when the Attn key is pressed. All group jobs share a dataarea *GDA for share information between all group jobs.
Imaging you are keying a transaction. The boss interrupts you with a request for information. You press the Attn key and select the group job that runs the inquiry program. After looking up the information and answering the request, you press the Attn key again, select the data entry job, and continue where you left off.
And image what are you doing with the same condition under none group job function support. Then you will select the GROUP JOB function.
This GRPJOBMNU(Transfer Group Job and Command Key) utility include following Source:
GRPJOBDFTC : Create Default Dataarea in library QUSRTEMP.
GRPJOBMNUD : The utility Display file, it must be created with RSTDSP(*YES).
GRPJOBTFRC : Transfer Group job initial program.
GRPJOBMNUC : The utility main driver.
How to install and use the utility:
1. CRTCLPGM GRPJOBDFT
2. CRTDSPF FILE(GRPJOBMNU) RSTDSP(*YES)
3. CRTCLPGM GRPJOBTFRC
4. CRTCLPGM GRPJOBMNUC
5. CALL GRPJOBDFTC -- create default Dataarea in QUSRTEMP
6. Move Program GRPJOBTFRC, GRPJOBMNUC
Display File GRPJOBMNUD to QGPL
7. ADD SETATNPGM(GRPJOBMNUC) to user's initial program.
8. SIGNON again
9. After SignON, press ATTN key. You will get it.
You can use:
F01, F03, F12 exit menu
F2 choose another bottom key screen
F6 for Job description, Job command, exit Menu when return from another group job modification.
F7 for command key definition
F8, F9 for retrieve previous or next command
F11 switch border color
Click here to view the full code.
MORE INFORMATION ON THIS TOPIC
The Best Web Links: tips, tutorials and more.
Ask your programming questions--or help out your peers by answering them--in our live discussion forums.
Ask the Experts yourself: Our application development gurus are waiting to answer your programming questions.