Cannot access object inside include.

"Here is my code...

*&---------------------------------------------------------------------*
*& Report ZMS_TEST14
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

INCLUDE ZMS_TEST14_TOP . " global Data

* INCLUDE ZMS_TEST14_F01 . " FORM-Routines

INITIALIZATION.

AT SELECTION-SCREEN.


INCLUDE ZMS_TEST14_CI01. " Definition and implementation of lcl_po class..

START-OF-SELECTION.
data: po type ref to lcl_po.
create object po.

CALL METHOD po->get_sflight.


INCLUDE ZMS_TEST14_O01 . " PBO-Modules
INCLUDE ZMS_TEST14_I01 . " PAI-Modules

-----------------------------------------------------------------------------------------------------

"My problem is I cannot access object po in my PBO-Modules..

"Here is my PBO-Module code..

*&---------------------------------------------------------------------*
*& Include ZMS_TEST14_O01
*&---------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*& Module STATUS_9003 OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*

MODULE STATUS_9003 OUTPUT.
SET PF-STATUS 'SELECT PO'.
SET TITLEBAR 'SELECT PO'.

CREATE OBJECT OB_CONT
EXPORTING
* PARENT =
CONTAINER_NAME = 'CONTAINER'.


CREATE OBJECT OB_GRID
EXPORTING
* I_SHELLSTYLE = 0
* I_LIFETIME =
I_PARENT = ob_cont.


set HANDLER po->add_toolbar_but for ob_grid.

set HANDLER po->add_double_click for ob_grid.
set HANDLER po->add_menu_but for ob_grid.
set HANDLER po->add_user_command_insert for ob_grid.

CALL METHOD OB_GRID->SET_TABLE_FOR_FIRST_DISPLAY
CHANGING
IT_OUTTAB = it_sflight
IT_FIELDCATALOG = it_fld.

ENDMODULE. " STATUS_9003 OUTPUT

"_________________________________________________________

And I keep getting error Field PO is unknown ....