Listing 2: Create intermediate files

#
# Listing 2  -  Creates intermediate files
#
BEGIN {
Seconds_Per_Minute=60
Minutes_Per_Hour=60
Hours_Per_Day=24
Seconds_Per_Hour=Minutes_Per_Hour*Seconds_Per_Minute
Seconds_Per_Day=Hours_Per_Day*Seconds_Per_Hour
}

$7 == "on" && $9 == "at" && $13 == "for" {

Username=$6
split($8, SS, ":")
$8=SS[1]
Portname=$8
split($8, UU, ".")
Portname=UU[1]

Start_Month=$10
Start_Day=$11
Start_Time=$12
Timeon_Seconds=$14


if ( Portname != "158") {

f = split($12, ST, ":")
Start_Seconds=ST[1]*Seconds_Per_Hour + ST[2]*Seconds_Per_Minute

End_Timeon = Start_Seconds + Timeon_Seconds

print Username "\t" Portname "\t" Start_Month " " Start_Day "\t" \
Start_Seconds "\t" End_Timeon

}

}

# End of File