PF-Set-Panel-Name (Value 14)

Parameters:

`PPB-Panel-ID`	pic 9(4) comp-x.
`Panel-Name-Buffer.`	Group item containing:
`Panel-Name-Length` `Panel-Name-Text`	pic 99 comp-x. pic x(30).

On Entry:

`PPB-Panel-ID`	The identifying handle of the panel with which you want to associate a name.
`Panel-Name-Length`	The length of the name.
`Panel-Name-Text`	The name to associate with the panel specified in PPB-Panel-ID.

On Exit:

None.

Comments:

Once you have used this function, you can see the name associated with each panel by using the PF-Get-First-Panel and PF-Get-Next-Panel functions.

Example:

This example assumes that you have just created a panel, and that you have defined Panel-Name-Buffer in the Working-Storage Section of your program as specified above.

       move 11 to panel-name-length.
       move "Dummy Panel" to panel-name-text.
       move pf-set-panel-name to ppb-function.
       call "PANELS" using panels-parameteer-block
                               panel-name-buffer.
       if ppb-status not = zero
*          (code to abort)