Deleting Child + Parent Case Using Activity
Hi All,
In this blog we will see how to delete child + parent case together.
Step 1: First create activity
ID = DeleteCase
CL = C-C-Art-Work-CA
Step 2: Define Pages & Classes
CACasePg C-C-Art-Work-CAM
CAChildCasePg Code-Pega-List
CAChildCasePg.pxResults C-C-Art-Work-CA-Booking
CAChildDelete C-C-Art-Work-CA-Booking
Step 3: Define Parameters
CaseID String
Step 4: Define Steps
1) Page-New CACasePg
2) Page-New CAChildDelete
3) Obj-Browse CAChildCasePg
PageName = CAChildCasePg
ObjClass = C-C-Art-Work-CA-Booking
MaxRecords = 1000
GetRowKey = checked
RowKey = pzInsKey
UseLightWeightList = checked
{checked} .pyID Contains Param.CaseID
4) Loop = For each embedded Page
Property-Set StepPage = CAChildCasePg.pxResults
Param.ChildCasepyID = .pyID
4.1) Obj-Open StepPage = CAChildDelete
OpenClass = C-C-Art-Work-CA-Booking
Lock = checked
ReleaseOnCommit = checked
.pyID = Param.ChildCasepyID
4.2) Obj-Delete Step Page = CAChildDelete
Remove = checked
5) Obj-Open StepPage = CACasePg
OpenClass = C-C-Art-Work-CA
Lock = checked
ReleaseOnCommit = checked
.pyID = Param.CaseID
6) Obj-Delete CACasePg {Step Page}
7) call CommitData CACasePg{Step Page}
8) Page-Remove CACasePg
CAChildPg
CAChildDelete
CAChildCasePg
Thank you!! Will see you all in next blog post 😊.
Comments
Post a Comment