| CL - Submit Job via program |
Drive Clone
|
PGM PARM(&USR &ICN &PSWT)
DCL VAR(&USR) TYPE(*CHAR) LEN(10)
DCL VAR(&ICN) TYPE(*CHAR) LEN(9)
DCL VAR(&PSWT) TYPE(*CHAR) LEN(3)
DCL VAR(&JOBNME) TYPE(*CHAR) LEN(15)
/* Process */
CHGVAR &JOBNME ('E3ASRERCOR')
SBMJOB CMD(CALL PGM(AAC9420) PARM(&USR &ICN &PSWT)) +
JOB(&JOBNME)
ENDPGM:
RCLRSC
ENDPGM
|
| What does it do? |
|
Submit a job on the AS/400 via program code. [FREE] RPG IV ILE |
| |
| Features |
| Added by |
Added |
Downloads |
Rating |
Popularity |
rpgivpgmr |
9:33:16 PM Friday, November 2nd 2007 |
65 |
not rated |
                            |
| |
| |
| About the file |
| Size |
Download |
Rate It |
|
664 KB
|
 |
|
|
| Comments |
|
| |
| Add your comment |
|
|
| |
| Contacts |
Report Abuse |
|
| |