static void ExampleForDelete(Args _args)
{
tblParent Parent;
DialogButton Db;
;
Db= Box::yesNo(“Do You Want to Delete the Record…?”,DialogButton::No);
if(Db==DialogButton::Yes)
{
ttsBegin;
delete_from Parent where Parent.deptNo==10;
//{
//Parent.Delete();
// }
ttsCommit;
while select Parent
{
//info(“Dept No : “,strFmt(Parent.deptNo) ” Dept Name : ” +Parent.deptName);
print Parent.deptNo;
print Parent.deptName;
}pause;
}
else
{
while select Parent
{
//info(“Dept No : “,strFmt(Parent.deptNo) ” Dept Name : ” +Parent.deptName);
print Parent.deptNo;
print Parent.deptName;
}pause;
}
}
{
tblParent Parent;
DialogButton Db;
;
Db= Box::yesNo(“Do You Want to Delete the Record…?”,DialogButton::No);
if(Db==DialogButton::Yes)
{
ttsBegin;
delete_from Parent where Parent.deptNo==10;
//{
//Parent.Delete();
// }
ttsCommit;
while select Parent
{
//info(“Dept No : “,strFmt(Parent.deptNo) ” Dept Name : ” +Parent.deptName);
print Parent.deptNo;
print Parent.deptName;
}pause;
}
else
{
while select Parent
{
//info(“Dept No : “,strFmt(Parent.deptNo) ” Dept Name : ” +Parent.deptName);
print Parent.deptNo;
print Parent.deptName;
}pause;
}
}
No comments:
Post a Comment