Skip to main content

Hello,

i try to read user information from the ActiveDirectory with OleDB. Most work already. But currently i have problems to get the Data when the User Password will expire.

The Data is saved in an integer8 field but i don't get the expected value in my code here.

in  @fields::@item
("msDS-UserPasswordExpiryTimeComputed")::value
in hlp-test4

I should receive for my user for example the value: 133494369554492556
But i get only 7624

I tried several things.
Cause it is an integer8 value it should be declared as s9(18) comp-5 but here is also the value 7624.

Has anyone an idea how to get here the correct value? Or what 7624 is, that i can work with this value?

Regards David Neidinger


#AcuCobol

Hello,

i try to read user information from the ActiveDirectory with OleDB. Most work already. But currently i have problems to get the Data when the User Password will expire.

The Data is saved in an integer8 field but i don't get the expected value in my code here.

in  @fields::@item
("msDS-UserPasswordExpiryTimeComputed")::value
in hlp-test4

I should receive for my user for example the value: 133494369554492556
But i get only 7624

I tried several things.
Cause it is an integer8 value it should be declared as s9(18) comp-5 but here is also the value 7624.

Has anyone an idea how to get here the correct value? Or what 7624 is, that i can work with this value?

Regards David Neidinger


#AcuCobol

This would be tough to help, without your adodb.def copybook. When I use NetDefGen on the ADODB.dll, I get both a copybook and the events copybook. What happens when you just use s9(18) or even a pic x(50)?


This would be tough to help, without your adodb.def copybook. When I use NetDefGen on the ADODB.dll, I get both a copybook and the events copybook. What happens when you just use s9(18) or even a pic x(50)?

i tried also just s9(18) and pic x(250). Always same result.

my def-file is here.


i tried also just s9(18) and pic x(250). Always same result.

my def-file is here.

I noticed that the previous 3 @fields::@item("myvalues ")::@value   use the ::@value whereas @fields::@item
("msDS-UserPasswordExpiryTimeComputed")::value in hlp-test4 - that value does not have the @


I noticed that the previous 3 @fields::@item("myvalues ")::@value   use the ::@value whereas @fields::@item
("msDS-UserPasswordExpiryTimeComputed")::value in hlp-test4 - that value does not have the @

i checked it, the @ doesn't make a difference. The result is still the same. 


i checked it, the @ doesn't make a difference. The result is still the same. 

I suggest opening a support case so we can take a closer look at this.