[KameSama]

Trying to create a new action for a specified constituent from an action screen that is already open.

Basically what I am doing is this:

Quote:

Dim constituent1 as CRecord
Set constituent1 = currentaction.constituent
constituent1.Init REApplication.SessionContext

Dim action1 As CAction
Set action1 = New CAction
action1.Init REApplication.SessionContext

action.save

This should now create a new action for the constituent right?
The error I'm getting is "Required Field Missing: Constituent"

How do I specify that I'm trying to save action1 to constituent1 as a new action??

Many thanks for any help!!!

[DavidZ]

Hi,

What you are doing doesn't really make sense. You need to create the action (as you do in the second part of the code) and then assign a constituent object id to it.

 
Dim action1 As CAction
Set action1 = New CAction
action1.Init REApplication.SessionContext
 
action1.Fields(ACTION_fld_RECORDS_ID) = currentaction.constituent.Fields(RECORDS_fld_ID)
'There are other mandatory fields that should go hear such as action type etc.
action.save

David

[KameSama]

Thanks David!

I don't know what I was thinking there.

The syntax is now sound and should work fine using this:

Dim action1 As CAction
Set action1 = New CAction
action1.Init REApplication.SessionContext
 
action1.Fields(ACTION_fld_RECORDS_ID) = constituent1.Fields(RECORDS_fld_ID)
action1.Fields(ACTION_fld_TYPE) = "Telemarketing Call Out"
action1.Fields(ACTION_fld_CATEGORY) = "Task/Other"
action1.Fields(ACTION_fld_DATE) = UserForm1.TextBox1.Text
action1.Fields(ACTION_fld_STATUS) = "Pending"

action1.Save ' get the annoying error here

But when I try and save my new action I'm getting this annoying error that I just plain don't understand. Reads as follows:

The only thing I can think of is that it could be because I don't have supervisor access. But a normal user like me can create new actions manually, so that doesn't make sense.

Any advice?

[DavidZ]

You seem to have forgotten to post the error message.

This code works fine for me. Although I gave my code a real date and didn't use a UserForm.

As an aside you should also always closedown top level objects that you initialise (and some that you don't - see here)

So that you should have at the end:

action1.Closedown
set action1 = nothing

David

[DrewAllen]

Quote:

Originally Posted by KameSama

The foreign key constraint helps to ensure database integrity. Basically, it is saying that the FK_ACTION_1 (which is the action1.Fields(ACTION_fld_RECORDS_ID) ) does not exist in the table "dbo.RECORDS" in the column 'ID'. The most common reason for this is that you are using the wrong ID field. The constituent ID on the action needs to be the constituent's RE System ID. You'll probably want to use some method to determine what value you are passing to the action.

Drew