Associates a name with the specified panel.
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.
|
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)
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.