UMGA PeopleSoft SA GA Linking Page - stripped for prod.VB

size = IECapture(false, 0)
navBase1 = IEFindValue ("Student ID:",0,false)
locationStudentID = navBase1 + 3
navBase2 = IEFindValue ("Primary:",0,false)
locationPrimaryName = navBase2 - 1
locationAlias1 = navBase2 + 2
locationAlias2 = navBase2 + 3
locationAlias3 = navBase2 + 6
locationAlias4 = navBase2 + 8
navBase3 = IEFindValue ("Application Nbr",0,false)
locationApplicationNbr = navBase3 + 1
locationAdmitTerm = navBase3 + 2
locationProgram = navBase3 + 6
locationPlan = navBase3 + 10
locationSubplan = navBase3 + 13
indexStudentID = IEGetValueByIndex(locationStudentID)
indexPrimaryName = IEGetValueByIndex(locationPrimaryName)
indexAlias1 = IEGetValueByIndex(locationAlias1)
indexAlias2 = IEGetValueByIndex(locationAlias2)
indexAlias3 = IEGetValueByIndex(locationAlias3)
indexAlias4 = IEGetValueByIndex(locationAlias4)
indexApplicationNbr = IEGetValueByIndex(locationApplicationNbr)
indexAdmitTerm = IEGetValueByIndex(locationAdmitTerm)
indexProgram = IEGetValueByIndex(locationProgram)
indexPlan = IEGetValueByIndex(locationPlan)
indexSubplan = IEGetValueByIndex(locationSubplan)
Field("Student ID") = indexStudentID
Field("Name") = indexPrimaryName
Field("Admit Term") = indexAdmitTerm
Field("Plan") = indexPlan
Field("SubPlan") = indexSubplan
Field("Alias 1") = indexAlias1
Field("Alias 2") = indexAlias2
Field("Alias 3") = indexAlias3
Field("Alias 4") = indexAlias4
Field("Program") = indexProgram
Field("Application Number") = indexApplicationNbr