Logo

    Home

    Documentation

    Use Cases

    Training

    Applications

    Release Notes

    Fetch Data Request

    Fetch Data Request

    • How to process fetch data request information in a dynamic business entity
    • Description
    • How to use it

    How to process fetch data request information in a dynamic business entity

    Description

    Starting with version 23.18.0, it is now possible to process the request information of a fetch data request in the Dynamic Business Entity event handler.

    The fetch data request information is available using the FetchDataRequest property available through the base server event handler class.

    The property is an object with the following relevant properties:

    • NumRecords: number of records requested
    • Queries: a standard OpenEdge filter containing all the filters requested by the client
    • NamedQuery: a custom object with a name and list of parameters

    How to use it

    How to process the Queries property:

    On the frontend, the filter criteria is set automatically through specialized controls, like the grid. But they can also be set from client logic by using the ‘setFilter’ method on the data source object.

    How to process the NamedQuery property:

    On the frontend, the named query information can be set from client logic by using the ‘setNamedQueryParam’ method on the data source object.

    Back to DocumentationDocumentation

    Back to Home Page

    Logo
    BLOCK-LEVEL ON ERROR UNDO, THROW.

CLASS Sample.SampleServerEventHandler
  INHERITS Akioma.Swat.OERA.Dynamic.BaseServerEventHandler: 
  { Sample/dsData.i &ACCESS="PRIVATE" }

  CONSTRUCTOR SampleServerEventHandler():
    SUPER(DATASET dsData:HANDLE).
    THIS-OBJECT:TriggerOnAfterFetch = TRUE.
  END CONSTRUCTOR.
  
  METHOD PROTECTED OVERRIDE VOID OnAfterFetch():
		DEFINE VARIABLE cFilterValue AS CHARACTER NO-UNDO.
		cFilterValue = Akioma.Swat.Util.QueryParserHelper:GetQueryConditionCharacterValue(THIS-OBJECT:FetchDataRequest:Queries, "eData.MyField").
		IF cFilterValue NE ? THEN
			MESSAGE "Filtering MyField by" QUOTER(cFilterValue).
  END METHOD.
END CLASS.
    BLOCK-LEVEL ON ERROR UNDO, THROW.

CLASS Sample.SampleServerEventHandler
  INHERITS Akioma.Swat.OERA.Dynamic.BaseServerEventHandler: 
  { Sample/dsData.i &ACCESS="PRIVATE" }

  CONSTRUCTOR SampleServerEventHandler():
    SUPER(DATASET dsData:HANDLE).
    THIS-OBJECT:TriggerOnAfterFetch = TRUE.
  END CONSTRUCTOR.
  
  METHOD PROTECTED OVERRIDE VOID OnAfterFetch():
		DEFINE VARIABLE cParameter AS CHARACTER NO-UNDO.
		IF VALID-OBJECT(THIS-OBJECT:FetchDataRequest:NamedQuery) THEN
			CASE THIS-OBJECT:FetchDataRequest:NamedQuery:Name:
				WHEN "NamedQuery1" THEN
				DO:
					IF THIS-OBJECT:FetchDataRequest:NamedQuery:Parameters:ContainsKey("MyCustomParameter") THEN
						cParameter = THIS-OBJECT:FetchDataRequest:NamedQuery:Parameters:GetParameterValueAsCharacter("MyCustomParameter").
					MESSAGE "Processing data request with 'NamedQuery1' and parameter value" cParameter.
				END.
			END CASE.
  END METHOD.
END CLASS.