MyPage is a personalized page based on your interests.The page is customized to help you to find content that matters you the most.


I'm not curious

Multiple Rows deletion in Powerbuilder datawindow

Published on 26 August 16
1036
0
4
Deleting Multiple rows in powerbuilder data window-
************************************************

Method1:
***********


int ll_row

if dw_all_pws.rowcount( ) > 0 then
ll_row = dw_all_pws.GetSelectedRow(0)
if ll_row > 0 then
dw_all_pws.setfilter( "Isselected()")
dw_all_pws.filter( )
dw_all_pws.rowsmove(1, dw_all_pws.rowcount(), primary!,dw_all_pws, 1, delete!)
dw_all_pws.setfilter("")`
dw_all_pws.filter( )
end if
end if



Method2:
*************

boolean lb_filter
dw_all_pws.SetRedraw(FALSE)
lb_filter = Long(dw_all_pws.Describe("Evaluate('sum(if(IsSelected(),1, 0) for all)',1)")) > 0
IF lb_filter THEN
dw_all_pws.SetFilter("IsSelected()")
dw_all_pws.Filter()
END IF
IF dw_all_pws.RowCount() > 0 THEN
dw_all_pws.RowsMove(1, dw_all_pws.RowCount(), Primary!, dw_all_pws, 1,Delete!)
END IF
IF lb_filter THEN
dw_all_pws.SetFilter("")
dw_all_pws.Filter()
dw_all_pws.Sort()
END IF
dw_all_pws.SetRedraw(TRUE)
Deleting Multiple rows in powerbuilder data window-

************************************************

Method1:

***********

int ll_row

if dw_all_pws.rowcount( ) > 0 then

ll_row = dw_all_pws.GetSelectedRow(0)

if ll_row > 0 then

dw_all_pws.setfilter( "Isselected()")

dw_all_pws.filter( )

dw_all_pws.rowsmove(1, dw_all_pws.rowcount(), primary!,dw_all_pws, 1, delete!)

dw_all_pws.setfilter("")`

dw_all_pws.filter( )

end if

end if

Method2:

*************

boolean lb_filter

dw_all_pws.SetRedraw(FALSE)

lb_filter = Long(dw_all_pws.Describe("Evaluate('sum(if(IsSelected(),1, 0) for all)',1)")) > 0

IF lb_filter THEN

dw_all_pws.SetFilter("IsSelected()")

dw_all_pws.Filter()

END IF

IF dw_all_pws.RowCount() > 0 THEN

dw_all_pws.RowsMove(1, dw_all_pws.RowCount(), Primary!, dw_all_pws, 1,Delete!)

END IF

IF lb_filter THEN

dw_all_pws.SetFilter("")

dw_all_pws.Filter()

dw_all_pws.Sort()

END IF

dw_all_pws.SetRedraw(TRUE)

This blog is listed under Development & Implementations Community

Related Posts:
Post a Comment

Please notify me the replies via email.

Important:
  • We hope the conversations that take place on MyTechLogy.com will be constructive and thought-provoking.
  • To ensure the quality of the discussion, our moderators may review/edit the comments for clarity and relevance.
  • Comments that are promotional, mean-spirited, or off-topic may be deleted per the moderators' judgment.
You may also be interested in
 
Awards & Accolades for MyTechLogy
Winner of
REDHERRING
Top 100 Asia
Finalist at SiTF Awards 2014 under the category Best Social & Community Product
Finalist at HR Vendor of the Year 2015 Awards under the category Best Learning Management System
Finalist at HR Vendor of the Year 2015 Awards under the category Best Talent Management Software
Hidden Image Url

Back to Top