GAM: Facebook Interaction Sample

Official Content
This documentation is valid for:

When GAM Authentication Type is Facebook, by using an ExternalToken which is given by Facebook, you can call the Facebook API.

In the following example we get the list of friends of the user who is logged in.

1. You need to have a GAM Facebook Authentication Type defined in GAM Repository.

2. In this example, if the Authentication Type of the user who is logged in is "Facebook", we ask for his friends following the instructions of the Facebook API (graph.facebook.com). This is done using the ExternalToken returned by the current GAM Session.

The code of the web panel should be similar to the following:

Event Refresh
    &SessionValid = GAMSession.IsValid(&Session, &Errors) //&Session is GAMSession data type, &Errors is collection of GAMError data type
    If &SessionValid and not &Session.IsAnonymous
        &User = GAMUser.Get() //&User is GAMUser data type    
        
        if &User.AuthenticationTypeName = 'facebook'
            &ExternalToken = &Session.ExternalToken
        endif

        &httpClient.Host = "graph.facebook.com" //&httpclient is HTTPClient data type
        &httpClient.BaseUrl = "/"
        &HttpClient.Secure = 1
        &StrCall = "me/friends" + "?" + "access_token=" + &ExternalToken
        &httpClient.Execute("GET", &StrCall)
        &ResultHttp = &httpClient.ToString()
        &data.fromJson(&ResultHttp)
        &data2 = &data.data
    
        for &dataitem in &data2  //&dataitem is &data2.data 
            //Display Friends
            msg(&dataitem.name)
        endfor

     else
        do 'ProcessErrors'
     Endif
EndEvent

Sub 'ProcessErrors'
    For &Error in &Errors
        If &Error.Code <> GAMErrorMessages.SessionExpired
            Msg(Format("%1 (GAM%2)", &Error.Message, &Error.Code))
        Endif
    EndFor
EndSub

As calling this method of Facebook API returns a Json structure, we defined an SDT where the information could be loaded, so &data and &data2 are like the following, acording to the format of the Json data returned.

datagamfacesample

data2gamfacesample





Was this page helpful?
What Is This?
Your feedback about this content is important. Let us know what you think.