Inserting From a page to a table

(0) Share

Report

Posted on by Community Member

Hi everyone, am trying to insert a candidate info to my employee table when the status is changed to hired but it is not inserting the new record. I put the codes on page action but i don't know why is not working.

IF Status = Status :: Hired THEN BEGIN
Employee.INIT;
Employee."No." := 'PC037';
Employee."First Name" := "First Name";
Employee."Middle Name" := "Middle Name";
Employee."Last Name" := "Last Name";
Employee."Job Title" := "Job Title";

Employee.INSERT;
END
ELSE BEGIN
MESSAGE('THIS IS NOT INSERTING');
END;

*This post is locked for comments

I have the same question (0)

All responses (20)

Answers (1)

Suggested answer

Tharanga Chandrasekara 23,118 on at

Like (0)

Report

Do the pointer comes inside of your IF condition?

Please do start the debugger and have a debug point at the very fist line of your code and start the debugging.

Was this reply helpful? Yes No
Suggested answer

Tharanga Chandrasekara 23,118 on at

Like (0)

Report

Another method would be have another message box inside your IF condition and check the pointer really comes inside your condition.

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report

I have a message in the IF condition but it is not executing.

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report

Hi SeyMalick,

I think you should change your insert line like this

IF NOT Employee.INSERT THEN

MESSAGE('THIS IS NOT INSERTING');

and you don't need the else begin...

So your message would popup if your insert was not successful, that would give you a better picture. Still as Tharanga said you need to debug it.

Was this reply helpful? Yes No
Suggested answer

Tharanga Chandrasekara 23,118 on at

Like (0)

Report

Have the code like this :

MESSAGE('%1',Status);

IF (Status = Status :: Hired) THEN BEGIN

Employee.INIT;

Employee."No." := 'PC037';

Employee."First Name" := "First Name";

Employee."Middle Name" := "Middle Name";

Employee."Last Name" := "Last Name";

Employee."Job Title" := "Job Title";

Employee.INSERT;

END ELSE BEGIN

MESSAGE('THIS IS NOT INSERTING');

END;

with this code you can check what is the value of the Status option field.

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report

ok let me try this and revert back

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report

still it is not messaging

Was this reply helpful? Yes No
Suggested answer

Suresh Kulla 50,243 Super User 2025 Season 2 on at

Like (0)

Report

Where exactly did you place the code ? on which trigger ? or did you place this under an action button send me the screenshot where you placed the code.

Was this reply helpful? Yes No
Suggested answer

Tharanga Chandrasekara 23,118 on at

Like (0)

Report

It seems you have not insert the code in the correct trigger. As Suresh said please share the screenshot of where you place the code.

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report

that's the snapshot below

Was this reply helpful? Yes No