InterForm Manual - System & Method

8=Call Program
Seqnbr Function
1,0 8 Program call
Program name . . . . . . . . . . __________
Library . . . . . . . . . . . __________
User profile . . . . . . . . . . AFCOPER___ AFCOPER, *OWNER
F3=Exit F13=Fold/Unfold F11=Delete F12=Cancel
This function gives you the possibility of letting Auto Forms Control perform operations that are
not contained in this system. It could for instance be to store spooled print in a spool archive.
Other useful features is to make a merge using the APF3812 CL command in order to create
a PCL file in the folder system as seen on page 441, or even E-mail the merged file as a PDF
file using the MRGSPLFPDF command (see page 382).
Program name: A program to be called at this point
The program can be called with the following 7 parameters regarding the relevant spool entry:
Job name *CHAR 10
User *CHAR 10
Job number *CHAR 6
File name *CHAR 10
File number *CHAR 4
Output queue *CHAR 10
Library *CHAR 10
An example of an exit program can be seen in the source member, FUNKT_8 in source file
APF3812/APISRC.
User profile: The user profile under which the user exit program will run.
If e.g. a merge is done by use of the APF3812/APF3812 command the same user profile will
be the owner of the merged spooled file.
InterForm400 will not call the program unless it is owned by QSECOFR. If the program is not
owned by QSECOFR when you add it you will be offered an possibility to change the owner (if
you are authorized) with this window:
Security change required OWN600D
In order to prevent unauthorized programs from being used as
exit programs, the exit program must be owned by QSECOFR.
Press F10 to change the ownership of the program to QSECOFR.
Press F3 or F12 to cancel.
Program name . . . . . : TEST
Library . . . . . . : KSE
Creation date/time . . : 24/01/11 18:00:45
Current owner . . . . : KSE
F3=Exit F10=Change owner F12=Cancel
Here you can simply press F10=Change owner to confirm that the program owner should be
changed. The same screen is shown in InterForm400, whenever you try to add a call to a user
program not owned by QSECOFR. (Also for e.g. split exit programs)
InterForm A/S 149