create or replace package amfrw030$mere is

   type NBT_REC is record
      ( UI_READ             varchar2(4000)
      , UI_MESSAGE_SUBJECT  varchar2(4000)
      , UI_MESSAGE_DATE     varchar2(4000)
      , UI_MESSAGE_BY       varchar2(4000)
      );

   NBT_VAL    NBT_REC;
   CURR_VAL   CG$MESSAGE_RECIPIENT.CG$ROW_TYPE;


   procedure Startup(
             Z_DIRECT_CALL in boolean default false,
             Z_CHK in varchar2 default null,
             Z_FORM in varchar2 default null);
   procedure QueryView(
             K_BUBM_ID in varchar2 default null,
             K_SYUS_ID in varchar2 default null,
             Z_EXECUTE_QUERY in varchar2 default null,
             Z_POST_DML in boolean default false,
             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
             Z_DIRECT_CALL in boolean default false,
             Z_START in varchar2 default '1',
             Z_ACTION in varchar2 default null,
             Z_CHK in varchar2 default null);
   function QueryHits return number;

   procedure ActionView(
             P_BUBM_ID in owa_text.vc_arr,
             P_SYUS_ID in owa_text.vc_arr,
             O_BUBM_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             O_SYUS_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             O_MESSAGE_READ in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             O_CREATED_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             O_CREATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             O_UPDATED_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             O_UPDATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             H_UI_READ in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             H_UI_MESSAGE_SUBJECT in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             H_UI_MESSAGE_DATE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             H_UI_MESSAGE_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
             z_modified in owa_text.vc_arr,
             z_delete   in owa_text.vc_arr,
             Z_ACTION in varchar2 default null,
             Z_START  in varchar2 default '1',
             Z_CHK in varchar2 default null ,
             C_BBME in owa_text.vc_arr default WSGL.EmptyVCArrLong );
   procedure ActionDelete(
             P_BUBM_ID in varchar2 default null,
             P_SYUS_ID in varchar2 default null,
             O_MESSAGE_READ in varchar2 default null,
             O_CREATED_BY in varchar2 default null,
             O_CREATED_ON in varchar2 default null,
             O_UPDATED_BY in varchar2 default null,
             O_UPDATED_ON in varchar2 default null,
             Z_ACTION in varchar2 default null,
             Z_DIRECT_CALL in boolean default false,
             Z_CHK in varchar2 default null,
             z_success in out boolean);
   procedure QueryViewByKey(
             P_BUBM_ID in varchar2 default null,
             P_SYUS_ID in varchar2 default null,
             Z_POST_DML in boolean default false,
             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
             Z_DIRECT_CALL in boolean default false,
             Z_CHK in varchar2 default null);

   procedure LoadCache
             ( Z_CURR_DEPTH       in number
             , Z_MAX_DEPTH        in number
             , Z_OWN_ROW_VALUES   in boolean             default false
             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
             );
   function RestoreState
             ( Z_CURR_DEPTH          in number
             , Z_MAX_DEPTH           in number
             , Z_RESTORE_OWN_ROW     in boolean default true
             )  return boolean;
   procedure SaveState;
   function  GetRef return WSGOC.COMPONENT_REF;


   procedure InitialiseDomain(P_ALIAS in varchar2);

   procedure calendar
     (
      Z_FIELD_NAME   in varchar2,
      Z_CALLER_URL   in varchar2,
      Z_FIELD_VALUE  in varchar2 default null,
      Z_FIELD_FORMAT in varchar2 default null,
      Z_FIELD_PROMPT in varchar2 default null
     );

   procedure format_cal_date
     (
      Z_FIELD_NAME   in Varchar2,
      Z_FIELD_FORMAT in varchar2,
      day            in varchar2,
      month          in varchar2,
      year           in varchar2
     );

   D_MESSAGE_READ        WSGL.typDVRecord;
end;
/