Field system table 2000000041 - get value problem

Asallai

Hi All,

I have a problem with this table because I cannot get the field value from filtered Field table.
I used this but it is not works:
(In a table in OnLookup trigger)

Field.RESET;
Field.SETRANGE(TableNo,"Export Table No.");
Field.FIND('-');
IF FORM.RUNMODAL(FORM::Fields,Field) = ACTION::LookupOK THEN BEGIN
   "Export Table Field No." := Field."No.";
END;

Result (nothing): I can choose a record from the filtered(!) Field table, but after OK button do nothing, the value is stay in the "Export Table Field No." field...

I tried this too, but the result is same:
At the "Export Table Field No." properties the TableRelation was set to

Field.No. WHERE (TableNo=FIELD(Export Table No.))

:shock:
OK, I'm confused why do not works either!

Can anybody help me to solve this problem? :?

Thank you!

A

Miklos_Hollender

Are you writing yet another general export/import tool? There are at least 4 of them in the downloads

Anywhay, the code looks good. What I can think of that maybe Field is a reserved word in some way - try it as Fld.

lessi

Take a look at the GETRECORD Function, may be a solution.

Asallai

BlackTiger wrote:

What do you mean under "get the field value"? Your code retrieves field ID only.

Yes, I need of the choosen Table's field "No.". The ID!

Miklos_Hollender

Have you tried renaming the Field recvar to Fld or myField or whatever? I think you must have a name conflict somewhere.

Asallai

Miklos Hollender wrote:

Have you tried renaming the Field recvar to Fld or myField or whatever? I think you must have a name conflict somewhere.

Yes, I've tried but nothing different result!

Miklos_Hollender

Hm. It's strange. Maybe... I think the FIND is unnecessary:

Field.RESET;
Field.SETRANGE(TableNo,"Export Table No.");
// Field.FIND('-'); -- try this
IF FORM.RUNMODAL(FORM::Fields,Field) = ACTION::LookupOK THEN BEGIN
   ERROR(FORMAT(Field."No.")) // -- try this, what happens? 
END; 

or maybe the FORM.RUNMODAL(0,Field)

Asallai

OK, I found a way, but this is really-really interesting and not good looking :shock:
I put these lines to the OnLookup Trigger:

Fld.RESET;
Fld.SETRANGE(TableNo,"Export Table No.");
IF Fld.FIND('-') THEN
  IF FORM.RUNMODAL(FORM::Fields,Fld) = ACTION::LookupOK THEN BEGIN
     VALIDATE("Export Table Field No.",Fld."No.");
  END;

MODIFY;
COMMIT;

If the COMMIT is mistake the value is not in to the field! But if I use the COMMIT, the choosen Field."No." value is INto the field value. So, the COMMIT was the clue... this is a mistake for me 8-[

Thanks for everyone!

A

Asallai

Miklos Hollender wrote:

Are you writing yet another general export/import tool? There are at least 4 of them in the downloads

Anywhay, the code looks good. What I can think of that maybe Field is a reserved word in some way - try it as Fld.

But yes!
Do you know some? And their places where it can be find them? :?:

Miklos_Hollender

But yes! Very Happy
Do you know some? And their places where it can be find them? Question

In the downloads.

http://mibuso.com/dlinfo.asp?FileID=583

http://mibuso.com/dlinfo.asp?FileID=543

http://mibuso.com/dlinfo.asp?FileID=360

http://mibuso.com/dlinfo.asp?FileID=350

http://mibuso.com/dlinfo.asp?FileID=348

http://mibuso.com/dlinfo.asp?FileID=285

http://mibuso.com/dlinfo.asp?FileID=207

http://mibuso.com/dlinfo.asp?FileID=100

Seems this idea occured to others as well

[/quote]

MissesMagic

What do you want to do with the value you receife from the form?

I would handle with by calling the form through a variable.

Field.SETRANGETableNo,"Export Table No.");

as you´ve done
and then

Clear(FieldForm)
FieldForm.SETTABLEVIEW(Field);
FieldForm.LOOKUPMODE(TRUE);
IF FieldForm.RUNMODAL = ACTION::LookupOK THEN BEGIN
  FieldForm.GETRECORD(rec);
  Rec."Export Table Field No." := Field."No."; 
END;

where you must add to the Variables
FieldForm Type Form (7702)


This is the way I do it

Hope I was able to help
MM

Asallai

Thanks MissesMagic!
And thanks for all! :!:

Asallai

Miklos Hollender wrote:

But yes! Very Happy
Do you know some? And their places where it can be find them? Question

In the downloads.

http://mibuso.com/dlinfo.asp?FileID=583

http://mibuso.com/dlinfo.asp?FileID=543

http://mibuso.com/dlinfo.asp?FileID=360

http://mibuso.com/dlinfo.asp?FileID=350

http://mibuso.com/dlinfo.asp?FileID=348

http://mibuso.com/dlinfo.asp?FileID=285

http://mibuso.com/dlinfo.asp?FileID=207

http://mibuso.com/dlinfo.asp?FileID=100

Seems this idea occured to others as well

Thanks Miklós, these are great help for me

db

this is a Nav 4.x bug. Lookups don't works if you runing table, but it works runing from form.