Setting Property Value in Work Class Page Using Activity

 Hi All,


In this blog we will see how we can set Property Value in Work Class Page Using Activity.



Follow below steps

Step 1:  Create activity

CL = C-C-Art-Work-CA

ID = SetPropInWork


Step 2: Define Pages & Classes

CaseList    Code-Pega-List

CaseList.pxResults        C-C-Art-Work-CA

Case         C-C-Art-Work-CA

D_SavableCACase        C-C-Art-Work-CA

D_SetNewestIBRenewal        Code-Pega-List

D_SetNewestIBRenewal.pxResult        C-C-Art-Data-IBRenewal


Step 3: Define steps


1) Obj-Browse       StepPage = CaseList


2) Loop = For each embedded Page    


Property-Set        Page = CaseList.pxREsults


Param.CaseID = CaseList.pxResults(<CURRENT>).pyID


2.1)  Property-Set

Param.NextIBDate = D_SetNewestIBRenewal[CaseID:Param.CaseID].pxResults(1).NextIBRenewalDate


2.2)  When  Param.NextIBDate ! =  ""   if true = Continue Whens     if false = Exit iteration


Obj-Open                                                    Step Page = Case

OpenClass = C-C-Art-Work-CA

Lock = checked

ReleaseOnCommit  = chedke

.pyID = Param.CaseID


2.3)  

When

.NextIBRenewalDAte==""  if true = Continue Whens     if false = Skip Step

Property-Set          D_SavableCAMCase[CAMID:Param.CaseID]

.NextIBRenewalDate = 

D_SetNewestIBRenewalDate[CaseID:Param.CaseID].pxResults(1).NextIBRenewalDate


2.4) History-Add                 Step Page = Case

HistoryMemo = "Save value in NextIBRenewal"

Category = pyHistoryMemo


2.5) Obj-Save          D_SavableCAMCase[CAMID:Param.CaseID]


2.6)  call commitWithErrorHandling             Case


2.7) Label = ERR  

Page-Remove                          Case


D_SavableCAMCase[CAMID:.pyID]


3) Page-Remove      StepPage = CaseList


4) Call FlushDataPAge

DataPage = D_SetNewestIBRenewalDate

FlushAllInstances = checked


5) Exit-Activity


Data Page

ID = D_SetNewestIBRenewalDate

Structure = D_SetNewestIBRenewalDate

Object Type = C-C-Art-Data-IBRenewal

Mode = Read-Only

Scope = Thread

Data Source

Source = Report definition            IBRenewalNewest {checked} Pass current parameter page

Refresh Strategy

{checked} Reload once per interaction

Parameter

CaseID        String


Report Definition

Query

.NextIBRenewalDate           Highest to Lowest         Sort order = 1

.pyGUID                              Globally unique ID            


Filters

F1         .CAMID          Is equal        Param.CaseID


Parameters

CaseID                       Text


Thank you!! Will see you all in next blog post 😊. 


Comments

Popular posts from this blog

pxSubscript and pxListSubscript Properties In Pega

Frequently Used Date Expressions In Pega

pyForEachCount In Pega