ActiveX AS/400 Objects

ActiveX AS/400 Objects - Spoolfiles

ActiveX AS/400 Objects - Spoolfiles

Use this class to retrieve lists of native AS/400 spool files. See class:SpoolFile

Contains read/write properties:

Name	Type	Description
AutoMessages	Boolean	Set True to halt and display error messages. Default = false
FormType	String	Form type attribute to be used during OpenList method. If blank, no form type filtering will be performed.
LibraryName	String	Library name containing QueueName to be used during OpenList method. If blank, no library name filtering will be performed.
QueueName	String	Output queue name to be used during OpenList method. If blank, no output queue name filtering will be performed.
SystemName	String	Name of AS/400 system. Defaults if blank.
UserData	String	User data attribute to be used during OpenList method. If blank, no user data filtering will be performed.
UserName	String	User profile name to be used during OpenList method. If blank, no user profile name filtering will be performed.

Contains read-only properties:

Name	Type	Description
ListSize	Long	Contains the number of spool file entries opened after OpenList method execution.
Message	String	Most recent diagnostic message generated.
Opened	Boolean	Returns True if spool file list is open.
RC	Long	Most recent CA/400 dll return code.

Contains methods returning a result:

Name	Type	Description
CloseList	Boolean	Closes connection to spool file list opened with OpenList. Returns True if completed normally.
FindInList	SpoolFile	Return a class:SpoolFile for first spool file found whose attributes match optional passed parameters. Parameters may be passed in any combination.
NextInList	SpoolFile	Return a class:SpoolFile for next spool file found since most recent OpenList whose attributes match optional passed parameters. Parameters may be passed in any combination.
OpenList	Boolean	Opens a connection to a list of spool files based on filtering though UserName, LibraryName, QueueName, FormType and UserData. Returns True if completely normally.
SelectFromGrid	SpoolFile	Return a class:SpoolFile for an interactively selected spool file displayed based on attributes which match optional passed parameters. Parameters may be passed in any combination.

VB, VBA SpoolFiles example:

Dim oSplFs As ActiveX_AS400.SpoolFiles

Dim oSplF As ActiveX_AS400.SpoolFile

Set oSplFs = new ActiveX_AS400.SpoolFiles

‘Open spool file list for OutQ QGPL/QPRINT2

oSplFs.LibraryName = "QGPL"

oSplFs.QueueName = "QPRINT2"

If not oSplFs.OpenList then MsgBox oSplFs.Message

‘Display spool file selection grid

oSplF = oSplFs.SelectFromGrid

If oSplF is Nothing then End

‘Print contents of spool file

Do until oSplF.EndOfFile

Printer.Print oSplF.NextLine

Loop

‘Housekeeping

If not oSplFs.CloseList then MsgBox oSplFs.Message

Set oSplFs = Nothing

2003 - Chouinard & Myhre, Inc.