31.01.2013 Views

InterForm Manual - System & Method

InterForm Manual - System & Method

InterForm Manual - System & Method

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

� WARNING �<br />

®<br />

All exit programs called by <strong>InterForm</strong>400 must be owned by QSECOFR. If it is not the AFC<br />

job will halt with an error message. Change the owner with the command:<br />

CHGOBJOWN OBJ(library/program) OBJTYPE(*PGM) NEWOWN(QSECOFR)<br />

� TIP �<br />

In order to be able to change the owner of a program into QSECOFR, it is enough to have<br />

*ADD authority for the QSECOFR user profile. You can give a user profile this via this<br />

command:<br />

GRTOBJAUT OBJ(QSECOFR) OBJTYPE(*USRPRF) USER(user profile) AUT(*ADD).<br />

Notice however that if the program is adopting the authority from the owner, then *ALLOBJ<br />

and *SECADM is required in order to change the object owner.<br />

9=E xit<br />

This function will cause all remaining AFC functions (sequence lines) to be skipped.<br />

If you want to insert AFC functions, that are to be executed for all spooled files not specifically<br />

handled in previous lines you could use this function. Just after handling a specific spooled file<br />

insert this function to exit from AFC.<br />

Example:<br />

Below we have defined, that spooled files with form type ‘DEMO’ should be merged with<br />

overlay ‘IF400DEMO’, spooled files with form type ‘DEMO2' should be merged with overlay<br />

‘RULER’ and all other spooled files should be moved to output queue, PRT01 where they will<br />

be printed.<br />

150 User’s <strong>Manual</strong> for <strong>InterForm</strong>400 ®<br />

Update AFC-functions attached to output queues AFC305D<br />

Queue: AFC_INPUT1 Library: APF3812<br />

Seqnbr F. Formtyp Save Jobname Filename Device file Program UserData<br />

0001 1 DEMO<br />

Merge, Overlay: IF400DEMO Fileset: SAMPLE<br />

0002 9 DEMO<br />

Exit<br />

0003 *<br />

0004 1 DEMO2<br />

Merge, Overlay: RULER Fileset: SAMPLE<br />

0005 9 DEMO2<br />

Exit<br />

0499 *<br />

0500 5 Move spooled file, new outq: PRT01 library: QUSRSYS<br />

F3=Exit F5=Service F13=Fold/Unfold

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!