PF-Get-Panel-Stack (Value 17)

Returns a list of the identifying handles of all enabled panels.

Parameters:

`Panels-Order-List`	A group item containing:
`POL-Count`	pic 9(4) comp-x.
`POL-ID`	pic 9(4) comp-x occurs 254.

On Entry:

None

On Exit:

`POL-Count`	The number of enabled panels in the list.
`POL-ID`	The list of identifying handles.

Comments:

The first item returned in the list (POL-ID(1)) holds the most recently enabled panel, and so on.

Example:

This example returns a list of the identifying handles of all enabled panels. The example assumes that you have declared Panels-Order-List in the Working-Storage Section of your program as described above.

       move pf-get-panel-stack to ppb-function.
       call "PANELS" using panels-parameter-block.
       panels-order-list.