20130726145756001.0TRUECalculateField profiles1500 Id [FID] VB #CalculateField profiles1500 ET_ID [FID] VB #CalculateField "each 1500 foot\profiles1500" Plot ""\Pictures cross sections\"& [Id]&".png"" VB #CalculateField "each 1500 foot\profiles1500" Plot ""Pictures cross sections\"& [Id]&".png"" VB #CalculateField "each 1500 foot\profiles1500" LOCATIONID [Id] VB #