PF-Get-Panel-At-Position (Value 13)

Determines if there is a panel at a particular position. If there is, details of the panel's appearance are also returned.

Parameters:

PPB-First-Visible-Col pic 9(4) comp-x.
PPB-First-Visible-Row pic 9(4) comp-x.
PPB-Panel-Height pic 9(4) comp-x.
PPB-Panel-ID pic 9(4) comp-x.
PPB-Panel-Start-Column pic 9(4) comp-x.
PPB-Panel-Start-Row pic 9(4) comp-x.
PPB-Panel-Width pic 9(4) comp-x.
PPB-Visible-Height pic 9(4) comp-x.
PPB-Visible-Width pic 9(4) comp-x.

On Entry:

PPB-Panel-Start-Column The x-coordinate to check for the existence of a panel.
PPB-Panel-Start-Row The y-coordinate to check for the existence of a panel.

On Exit:

PPB-First-Visible-Col The x-coordinate of the visible window, relative to the panel. The column of the panel is column 0.
PPB-First-Visible-Row The y-coordinate of the visible window, relative to the panel. The first row of the panel is row 0.
PPB-Panel-Height The height of the panel found at the specified location.
PPB-Panel-ID The identifying handle of the panel found at the specified location. If there is no enabled panel, a value of 0 is returned. If more than one panel exists at the specified location, the handle of the panel most recently enabled is returned.
PPB-Panel-Start-Column The x-coordinate of the left edge of the panel on the screen. The first column on the screen is column 0.
PPB-Panel-Start-Row The y-coordinate of the top edge of the panel on the screen. The first row on the screen is row 0.
PPB-Panel-Width The width of the panel found at the specified location.
PPB-Visible-Height The height of the visible window on the panel.
PPB-Visible-Width The width of the visible window on the panel.

Comments:

Use PF-Get-Panel-Info if you know the handle of a panel but want to return information about its appearance.

Example:

This example identifies which panel is at line 4, column 6 (where 0,0 is the top left-hand corner of the screen).

     move 3 to ppb-panel-start-row.
     move 5 to ppb-panel-start-column.
     move pf-get-panel-at-position to ppb-function.
     call "PANELS" using panels-parameter-block.
     if ppb-status not = zero
*        (code to abort)