Clarion - Ejemplo de de la Funtion MONT

Hola necesito hacer un queue que cuente todas las No conformidades que hay por mes

mi busqueda es de una fecha Inicial a una Fecha Final.

LOC:MesIni = LOC:FechaIni
LOC:MesFin = LOC:FechaFin
LOC:FechaMesIni = month(LOC:MesIni)
LOC:FechaMesFin = month(LOC:MesFin)
NumeroMes = LOC:FechaMesIni or LOC:FechaMesFin

If NumeroMes >= 1 and NumeroMes =< 12 and LOC:Area = NCF:AreaResponsable AND LOC:StatusNoconforme<>NCF:StatusNoconforme
LOC:TotalNoConformidades +=1
end

pero lo que me hace es contar las no conformidades de fecha inicial a fecha final
como le hago para que me determine cuando termina un mes

enero febrero marzo
2 8 5

por favor si alguien sabe como lo puedo hacer les pido de favor que me ayuden de antemano gracias
saludos cordiales

Deysi Laura

DEYSI..
SI LO QUE QUIERES ES SABER EL ULTIMO DIA DEL MES ES MUY FACIL, USA ALGO COMO LO SIGUIENTE:

DIAS BYTE,DIM(12)

DIAS[1]=31 !ENERO
DIAS[2]=28 !FEBRERO
DIAS[3]=31
DIAS[4]=30
DIAS[5]=31
DIAS[6]=30
º
º
º
DIAS[12]=31 !DICIEMBRE
Y LO UNICO QUE HACES ES PONER
FINMES=DIA[month(LOC:MesFin)]

Disculpa... se atranco el firewall
fem