create or replace package efnow050$cont is

   type NBT_REC is record
      ( UI_CUST             varchar2(24000)
      , UI_CONTRACT         varchar2(24000)
      , UI_STATUS           varchar2(24000)
      , UI_CONT_FROM        date
      , UI_CONT_TO          date
      , UI_EDIT_URL         varchar2(24000)
      , UI_COPY_URL         varchar2(24000)
      , L_CUST_NAME         CUSTOMERS.NAME%type
      );

   NBT_VAL    NBT_REC;
   CURR_VAL   CONTRACTS%rowtype;


   procedure Startup(
             Z_DIRECT_CALL in boolean default false,
             Z_CHK in varchar2 default null,
             Z_FORM in varchar2 default null);
   procedure ActionQuery(
             P_STATUS in varchar2 default null,
             P_CONTRACT_NUMBER in varchar2 default null,
             P_L_CUST_NAME in varchar2 default null,
             P_VALID_FROM in varchar2 default null,
             U_VALID_FROM in varchar2 default null,
	     Z_DIRECT_CALL in boolean default false,
             Z_ACTION in varchar2 default null,
             Z_CHK in varchar2 default null );

   procedure FormQuery(
             Z_DIRECT_CALL in boolean default false,
             Z_CHK in varchar2 default null);

   procedure QueryList(
             P_STATUS in varchar2 default null,
             P_CONTRACT_NUMBER in varchar2 default null,
             P_L_CUST_NAME in varchar2 default null,
             P_VALID_FROM in varchar2 default null,
             U_VALID_FROM in varchar2 default null,
             Z_START in varchar2 default null,
             Z_ACTION in varchar2 default null,
             Z_DIRECT_CALL in boolean default false,
             Z_CHK in varchar2 default null );
   function QueryHits(
            P_STATUS in varchar2 default null,
            P_CONTRACT_NUMBER in varchar2 default null,
            P_L_CUST_NAME in varchar2 default null,
            P_VALID_FROM in varchar2 default null,
            U_VALID_FROM in varchar2 default null) return number;
   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_STATUS              WSGL.typDVRecord;FUNCTION FormatDate ( p_date IN VARCHAR2 ) RETURN VARCHAR2;

procedure ncalendar
     (
      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 nformat_cal_date
  (
   Z_FIELD_NAME   in Varchar2,
   Z_FIELD_FORMAT in varchar2,
   day            in varchar2,
   month          in varchar2,
   year           in varchar2
  );


end;
/