Notam Code Sample

This is an example of the Notam processing software in action, it is a short piece of code that create the objects required to process Notam Data and then filters out all bar those relating to London Gatwick [EGKK].

The full implementation can process Notam Data from multiple sources including the UK AIS PIBS, and filter on all fields included in a standard notam including IDs, details and validity dates. Notam data can be linked to the navigational data included in the software for the processing of precise location information and map generation.

The ouput from these samples can be viewed here

<%@ Page Title="Notams" Language="vb" AutoEventWireup="false" MasterPageFile="~/samples/sample.master" CodeBehind="notams.aspx.vb" Inherits="www.aviationwebdesign.co.uk.notams1" AspCompat="true" %>
<%@ MasterType TypeName="www.aviationwebdesign.co.uk.sample1" %>
<asp:Content ID="Content1" ContentPlaceHolderID="head" runat="server">
<meta name="Keywords" content="notams, notam, notice to airmen, nats, uk, notamplot, icao" />
</asp:Content>

<asp:Content ID="Content2" ContentPlaceHolderID="ContentPlaceHolder1" runat="server">

    <asp:Repeater ID="Repeater1" runat="server">
    <HeaderTemplate></HeaderTemplate>
    <ItemTemplate>
        <div class="exampleOneNotam">
        <div class="exampleNotamId"><%#Eval("ID")%></div>
          <div class="NotamDetails"><%#Replace(Eval("Details"), vbLf, "<br/>")%></div>
          <div class="QLine"><%#Eval("QLine")%></div>
        </div>
    </ItemTemplate>
    <FooterTemplate></FooterTemplate>
    </asp:Repeater>
    
</asp:Content>

Public Partial Class notams1
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim lonotams As New AWDCommon.AviationData.Notams
        Dim lofilter As New AWDCommon.AviationData.NotamFilter

        lofilter.ICAO = Me.Master.ICAO
        Master.Header = "Notams For " & Me.Master.ICAO

        lonotams.ApplyFilter(lofilter)

        lonotams.PopulateDefault()

        Repeater1.DataSource = lonotams
        Repeater1.DataBind()

        Me.Page.Title = "Aviation Web Development | Notams for " & Me.Master.ICAO

        lonotams = Nothing
    End Sub

End Class