User Function AT580HR() Local cCodTGY := PARAMIXB[1] Local cCodAtend := PARAMIXB[2] Local cDtIni := PARAMIXB[3] Local cDtFim := PARAMIXB[4] Local cTurno := PARAMIXB[5] Local cSeq := PARAMIXB[6] Local cEntra1 := "06:33" Local cSaida1 := "12:00" Local cEntra2 := "13:00" Local cSaida2 := "17:33" Local aHoras := {} Local nI := 1
For nI := 1 To 2
If nI == 1 Aadd(aHoras, {cEntra1,; cSaida1})
ElseIf nI == 2 Aadd(aHoras, {cEntra2,; cSaida2}) EndIf
Next nI
Return aHoras
Obs: O retorno sempre deverá ser um array com duas posições, sendo elas a primeira o horário de início e a segunda o horário de fim.
