Pop up error message if duplica or other error

Question

I have some insert action, I would like to have errormesage pop up if replicate or other error , pop up an error message
Local record &REC;
&REC = CreateRecord(RECORD.MYRECORD);
&REC.KEYF1.Value = "A";
&REC.KEYF2.Value = "B";
&REC.MYRF3.Value = "X";
&REC.MYRF4.Value = "Y";
&REC.Insert();

Answer 1

0,0 stands for the message catalog set and number.
If you want to do it the correct PeopleSoft way, you need to define you message texts as message catalog entry and then use this like
MessageBox(%MsgStyle_OK, "An error occurs in SaveChecklist", 20001, 1, "Default message if message catlog entry is not found");
Custom message catalog entries need be entered on a message set greater then 20000. Message catalog set up to 20000 are reserved by PeopleSoft.
With messagebox you will only popup a message, but processing continues.
If you do not want the component to save, use Error instead, this stop processing and saving the transaction.
Error MsgGet(20001, 1, "Default message if messagecatlog entry is not found");
New message catalog entries can be entered via menu PeopleTools, Utilities, Administration, Message Catalog.
See PeopleBooks for further information
PeopleBooks > PeopleTools 8.52: System and Server Administration > Using PeopleTools Utilities > Message Catalog