{"id":267,"date":"2009-10-29T16:14:46","date_gmt":"2009-10-29T21:14:46","guid":{"rendered":"http:\/\/www.1oc.com\/blog\/?p=267"},"modified":"2009-10-29T16:14:46","modified_gmt":"2009-10-29T21:14:46","slug":"genexus-work-with-pattern-under-gxportal","status":"publish","type":"post","link":"http:\/\/blog.1oc.com\/?p=267","title":{"rendered":"GeneXus Work With Pattern under gxPortal"},"content":{"rendered":"

Whit this example we’ll show how to create ANY groups under gxPortal, and apply certain privileges, or GRANT privileges to those groups, to perform the basic MODES under Genexus.<\/p>\n

That is:<\/p>\n

DSP – Display<\/p>\n

DLT – Delete<\/p>\n

UPD – Update<\/p>\n

INS – Insert (Create)<\/p>\n

EXP – Export<\/p>\n

So, when you “put” a Work With Pattern under the portal, all those Privileges are Guarantee to work automatically.<\/p>\n

First Step.<\/h2>\n

On the Application we are working under the portal, let’s create the following 5 Activities:<\/p>\n


\n\"WW_List_ALL\"<\/a><\/p>\n

\"WW_EXP\"<\/a><\/p>\n

\"WW_INS\"<\/a><\/p>\n

\"WW_UPD\"<\/a><\/p>\n

\"WW_DSP\"<\/a><\/p>\n

\"WW_DLT\"<\/a><\/p>\n

As you can see on the pictures bellow there is a special Activity, that we call WWUsers_ALL which in terms, includes ALL the rest, what this means, is that the “group” that is assigned this Applications has “Admin” privileges, ALL the privileges<\/p>\n

\"WW_ALL\"<\/a><\/p>\n

\"WW_ALL_Activities\"<\/a><\/p>\n

Second Step<\/h2>\n

There is a Procedure that is called by the WW every time they are executed, and its “isAuthorized”<\/p>\n

Here’s where we’re going to put some code:<\/p>\n

&Authorized = True<\/span><\/p>\n

LoadContext.Call<\/span>(&Context<\/span>)<\/p>\n

&Context<\/span>.Porta_access_DLT = false<\/p>\n

&Context<\/span>.Portal_access_DSP = false<\/p>\n

&Context<\/span>.Portal_access_EXP = false<\/p>\n

&Context<\/span>.Portal_access_INS = false<\/p>\n

&Context<\/span>.Portal_access_UPD = false<\/p>\n

\n

\n

\n

<\/span>\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/ Check GXportal Security \/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/<\/p>\n

&GXPConnInf<\/span>.DBConnection.Type \u00a0 = GXPDBConnectionType.LAN<\/p>\n

&GXPActivity<\/span> = New GXPActivitySDT()<\/p>\n

<\/span>&GXPActivity.Name \u00a0 = <\/span>lower<\/span>(<\/span>&GxObject)<\/span><\/p>\n

<\/span>&GXPChkSec.Activities.Add(<\/span>&GXPActivity)<\/span><\/p>\n

&GXPActivity<\/span> = New GXPActivitySDT()<\/p>\n

&GXPActivity<\/span>.Name \u00a0 = !”WWUsers_”<\/span> + GAMMode.INS<\/p>\n

<\/span>&GXPChkSec.Activities.Add(<\/span>&GXPActivity)<\/span><\/p>\n

&GXPActivity<\/span> = New GXPActivitySDT()<\/p>\n

&GXPActivity<\/span>.Name \u00a0 = !”WWUsers_”<\/span> + GAMMode.DSP<\/p>\n

<\/span>&GXPChkSec.Activities.Add(<\/span>&GXPActivity)<\/span><\/p>\n

&GXPActivity<\/span> = New GXPActivitySDT()<\/p>\n

&GXPActivity<\/span>.Name \u00a0 = !”WWUsers_”<\/span> + GAMMode.UPD<\/p>\n

<\/span>&GXPChkSec.Activities.Add(<\/span>&GXPActivity)<\/span><\/p>\n

&GXPActivity<\/span> = New GXPActivitySDT()<\/p>\n

&GXPActivity<\/span>.Name \u00a0 = !”WWUsers_”<\/span> + GAMMode.DLT<\/p>\n

&GXPChkSec<\/span>.Activities.Add(&GXPActivity<\/span>)<\/p>\n

&GXPActivity<\/span> = New GXPActivitySDT()<\/p>\n

&GXPActivity<\/span>.Name \u00a0 = !”WWUsers_EXP”<\/span> \/\/ export Data<\/span><\/p>\n

&GXPChkSec<\/span>.Activities.Add(&GXPActivity<\/span>) \u00a0 <\/span><\/p>\n

Call<\/span>(PGXPCheckSecurity , &GXPChkSec<\/span>, &GXPConnInf<\/span>, &GXPStatus<\/span> )<\/p>\n

\n

<\/span>\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/<\/p>\n

If<\/span> not Null<\/span>(&GXPStatus<\/span>.Id)<\/p>\n

<\/span><\/span>&Authorized = False<\/span><\/p>\n

<\/span>endif<\/p>\n

\n

<\/span>\/\/ Valid Access\u00a0 \/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/<\/p>\n

<\/span>For<\/span> <\/span>&GXPActivity <\/span>In<\/span> <\/span>&GXPChkSec.Activities<\/span><\/p>\n

<\/span><\/span>\/\/msg(‘Name: ‘ + &GXPActivity.Name + ‘ – ProgramName :’ + &GXPActivity.ProgramName + ‘ – Status :’ + &GXPActivity.Status + ‘ – Access :’ +&GXPActivity.Access)<\/p>\n

Do Case<\/span><\/p>\n

<\/span> <\/span>Case<\/span> <\/span>&GXPActivity.Name = <\/span>&GxObject<\/p>\n

<\/span> if<\/span> &GXPActivity<\/span>.Access\u00a0 = GAMBoolean.False<\/p>\n

<\/span> &Authorized<\/span> = False<\/p>\n

<\/span> endif<\/span><\/p>\n

<\/span> Case<\/span> &GXPActivity<\/span>.Name = !”WWUsers_”<\/span> + GAMMode.INS<\/p>\n

<\/span>&Context<\/span>.Portal_access_INS = &GXPActivity<\/span>.Access<\/p>\n

<\/span> Case<\/span> &GXPActivity<\/span>.Name = !”WWUsers_”<\/span> + GAMMode.DSP<\/p>\n

<\/span>&Context<\/span>.Portal_access_DSP = &GXPActivity<\/span>.Access<\/p>\n

<\/span> Case<\/span> &GXPActivity<\/span>.Name = !”WWUsers_”<\/span> + GAMMode.UPD<\/p>\n

<\/span>&Context<\/span>.Portal_access_UPD = &GXPActivity<\/span>.Access<\/p>\n

<\/span> Case<\/span> &GXPActivity<\/span>.Name = !”WWUsers_”<\/span> + GAMMode.DLT<\/p>\n

<\/span>&Context<\/span>.Porta_access_DLT = &GXPActivity<\/span>.Access<\/p>\n

<\/span> Case<\/span> &GXPActivity<\/span>.Name = !”WWUsers_EXP”<\/span> <\/span><\/p>\n

<\/span>&Context<\/span>.Portal_access_EXP = &GXPActivity<\/span>.Access<\/p>\n

<\/span> <\/span>\/\/ExportExcel.Visible = &GXPActivity.Access<\/p>\n

<\/span> \/\/TImportExcel.Visible = &GXPActivity.Access<\/p>\n

EndCase<\/span><\/p>\n

<\/span>EndFor<\/p>\n

<\/span>\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/<\/p>\n

\n

<\/span>SetContext.Call<\/span>(&Context<\/span>)<\/p>\n

After that we are ready to call the WWs from inside the portal<\/p>\n

Let’s just analyze it a little bit:<\/p>\n

First we reset the “Modes” we’ll be load in the Context later<\/p>\n

&Authorized = True<\/span><\/address>\n
LoadContext.Call<\/span>(&Context<\/span>)<\/address>\n
&Context<\/span>.Porta_access_DLT = false<\/address>\n
&Context<\/span>.Portal_access_DSP = false<\/address>\n
&Context<\/span>.Portal_access_EXP = false<\/address>\n
&Context<\/span>.Portal_access_INS = false<\/address>\n
&Context<\/span>.Portal_access_UPD = false<\/address>\n

Then we prepare the “Actions” to be checked on the gxPortal<\/p>\n

\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/ Check GXportal Security \/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/<\/address>\n
&GXPConnInf<\/span>.DBConnection.Type \u00a0 = GXPDBConnectionType.LAN<\/address>\n
&GXPActivity<\/span> = New GXPActivitySDT()<\/address>\n
&GXPActivity.Name \u00a0 = <\/span>lower<\/span>(<\/span>&GxObject)<\/span><\/address>\n
&GXPChkSec.Activities.Add(<\/span>&GXPActivity)<\/span><\/address>\n
&GXPActivity<\/span> = New GXPActivitySDT()<\/address>\n
&GXPActivity<\/span>.Name \u00a0 =\u00a0!”WWUsers_”<\/span> + GAMMode.INS<\/address>\n
&GXPChkSec.Activities.Add(<\/span>&GXPActivity)<\/span><\/address>\n
&GXPActivity<\/span> = New GXPActivitySDT()<\/address>\n
&GXPActivity<\/span>.Name \u00a0 =\u00a0!”WWUsers_”<\/span> + GAMMode.DSP<\/address>\n
&GXPChkSec.Activities.Add(<\/span>&GXPActivity)<\/span><\/address>\n
&GXPActivity<\/span> = New GXPActivitySDT()<\/address>\n
&GXPActivity<\/span>.Name \u00a0 =\u00a0!”WWUsers_”<\/span> + GAMMode.UPD<\/address>\n
&GXPChkSec.Activities.Add(<\/span>&GXPActivity)<\/span><\/address>\n
&GXPActivity<\/span> = New GXPActivitySDT()<\/address>\n
&GXPActivity<\/span>.Name \u00a0 =\u00a0!”WWUsers_”<\/span> + GAMMode.DLT<\/address>\n
&GXPChkSec<\/span>.Activities.Add(&GXPActivity<\/span>)<\/address>\n
&GXPActivity<\/span> = New GXPActivitySDT()<\/address>\n
&GXPActivity<\/span>.Name \u00a0 =\u00a0!”WWUsers_EXP”<\/span> \/\/ export Data<\/span><\/address>\n
&GXPChkSec<\/span>.Activities.Add(&GXPActivity<\/span>) \u00a0 <\/span><\/address>\n
Call<\/span>(PGXPCheckSecurity ,\u00a0&GXPChkSec<\/span>,\u00a0&GXPConnInf<\/span>,\u00a0&GXPStatus<\/span> )<\/address>\n
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/<\/address>\n

\n<\/span><\/span><\/div>\n

and here we check that the actual “program” (work with) it’s authorized to be access under the “current user”, the user who is logged in the gxPortal<\/p>\n

Case<\/span> <\/span>&GXPActivity.Name = <\/span>&GxObject<\/address>\n
<\/span> if<\/span> &GXPActivity<\/span>.Access\u00a0 = GAMBoolean.False<\/address>\n
<\/span> &Authorized<\/span> = False<\/address>\n
endif<\/address>\n

And on the rest of the “case” we assigned the MODE to the “Context” to be used latter.<\/p>\n

At this point pretty much ends up the “automatic” user control of privileges, now we need to proceed to write \/ apply the rules based on the “Modes”<\/p>\n

Third Step<\/h2>\n

Now we work on the Transaction’s Work With Pattern<\/p>\n

Once we’ve applied the Work With Patter, we select the “Modes” on the Main Selection Level of the Pattern.<\/p>\n

\"Screen<\/a><\/p>\n

And now we defined the “Condition” we want to apply for each MODE, for example, for INSERT we want “&Context.Portal_access_INS” to be “TRUE”, so we defined it as shown on the next pictures:<\/p>\n

\"Screen<\/a><\/p>\n

\"Screen<\/a><\/p>\n

Here you can see an example of how it works with a user logged in with “DSP” privileges<\/p>\n

\"Screen<\/a><\/p>\n

And here with “UPD” privileges, notice the differences, in the previous one all the options were grayed out, on this one the “Edit” it is NOT, so he\/she can edit the record<\/p>\n

\"Screen<\/a><\/p>\n

So far everything it’s working fine, but here is where it gets a little bit tricky, take a look at the next images showing the “TABs” on the Work With:<\/p>\n

\"Screen<\/a><\/p>\n

\"Screen<\/a><\/p>\n

\"Screen<\/a><\/p>\n

\n

As you can see on the pictures above NONE of the privileges have been applied (by default) on the tabs, in order to correct that, we\u00a0\u00a0have to repeat the same procedure for the MODES on each “TAB” of the work with.<\/p>\n

NOTE:<\/p>\n

There should be a way to apply the same concepts to the “TRANSACTIONS” inside the gxPortal, but I haven’t try anything yet. Please, let me know if you can figure it out an easy way to apply the privileges through the WW inside the Transactions.<\/p>\n

\n

Thanks.<\/p>\n

\n

\n","protected":false},"excerpt":{"rendered":"

Whit this example we’ll show how to create ANY groups under gxPortal, and apply certain privileges, or GRANT privileges to those groups, to perform the basic MODES under Genexus. That is: DSP – Display DLT – Delete UPD – Update … Continue reading →<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[6],"tags":[],"class_list":["post-267","post","type-post","status-publish","format-standard","hentry","category-genexus"],"_links":{"self":[{"href":"http:\/\/blog.1oc.com\/index.php?rest_route=\/wp\/v2\/posts\/267","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/blog.1oc.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/blog.1oc.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/blog.1oc.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/blog.1oc.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=267"}],"version-history":[{"count":0,"href":"http:\/\/blog.1oc.com\/index.php?rest_route=\/wp\/v2\/posts\/267\/revisions"}],"wp:attachment":[{"href":"http:\/\/blog.1oc.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=267"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/blog.1oc.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=267"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/blog.1oc.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=267"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}