Is my programming wrong? :(

[radicrains]

Hey guys,

I need help. I need to extract out data.. Please refer to "Picture 1" for the table...

From this table, I need Access to be able to compare the 2 fields, and extract out the overdue drawings.. From what my mentor's condition, he said that overdue drawings are drawings that do NOT have "LatestRevDate", from the picture, you can see that it's Drawing 2729-01.01 and 3076-41.01

Can anybody help me out so that i could get the end product(refer to picture2)

For far, me and my colleague have use VBA to create the functions, but it outcome is not what we wanted, please help us out on this.. thanks.

-----------------------------------------------------------------------
[Note: FieldArray(1) is "latestRevDate" and FieldArray(0) is "DateToOwner"]

Function Overdue(ParamArray FieldArray() As Variant)

' Declare a variant


Dim N As Variant

' setting a variant
N = Null

' Condition
If FieldArray(1) = Null And FieldArray(0) <> Null Then
N = FieldArray(0)
End If

End Function

-----------------------------------------------------------------------

Thanks in adv!

[jzwp11]

I believe that you should be able to do what you want with a query such as the following (you will have to substitute your own table name):

SELECT YourTableName.DrawingNo, YourTableName.Title, YourTableName.DateToOwner, YourTableName.LastRevDate, IIF(isNull(LastRevDate), IIF(isNull(DateToOwner),null,DateToOwner),null) as OverdueDrawings
FROM YourTableName;

[ajetrumpet]

IIF(isNull(LastRevDate), IIF(isNull(DateToOwner),null,DateToOwner),null) as OverdueDrawings
FROM YourTableName;

I don't think 'isnull()' works in queries, but I may be wrong. it is reserved for VBA. It might need to be:

value is null

[jzwp11]

ajetrumpet (Adam),

IsNull() is a valid Access function as well as being a VBA function.

[radicrains]

Got it! thanks!

[jzwp11]

You are welcome. Good luck with your project.