Hello all,
I have a Microsoft Access database that prints continuing education certificates after employee has completed required hours. The certificate prints the day the employee was issued(date of issuance) the certificate. The code works most of the time but when you try to print out a batch of certificates it will print "this the 12nd day of August 2008". It puts the "nd" where "th" should be. Could someone please advise what I am doing wrong.
Thanks in advance. My code is below. I am a newbie and lost........
Thanks,
Sherry
CODE
=IIf(Not IsNull([Date of Issuance for CCMP-II]),"in the state mental health system , this the " & Format([Date of Issuance for CCMP-II],"d") & IIf(Right(Format([Date of Issuance for CCMP-II],"dd"),2)=11,"th",IIf(Right(Format([Date of Issuance for CCMP-II],"dd"),1)=1,"st",IIf(Right(Format([Date of Issuance for CCMP-II],"dd"),1)=2,"nd",IIf(Right(Format([Date of Issuance for CCMP-II],"dd"),1)=3,"rd","th")))) & " day of " & Format([Date of Issuance for CCMP-II],"mmmm") & ", " & Format([Date of Issuance for CCMP-II],"yyyy") & ".",IIf(Not IsNull([Date of Issuance for CCMP-I]),"in the state mental health system, this the " & Format([Date of Issuance for CCMP-I],"d") & IIf(Right(Format([Date of Issuance for CCMP-I],"dd"),2)=11,"th",IIf(Right(Format([Date of Issuance for CCMP-I],"dd"),1)=1,"st",IIf(Right(Format([Date of Issuance for CCMP-I],"dd"),1)=2,"nd",IIf(Right(Format([Date of Issuance for CCMP-I],"dd"),1)=3,"rd","th")))) & " day of " & Format([Date of Issuance for CCMP-I],"mmmm") & ", " & Format([Date of Issuance for CCMP-I],"yyyy") & ".","None"))