國家地面氣象觀測站報文上傳狀態提示軟件的設計

李文斌，史　成，潘志豪

(廣東省四會市氣象局，廣東　四會　526200)

?

國家地面氣象觀測站報文上傳狀態提示軟件的設計

李文斌，史成，潘志豪

(廣東省四會市氣象局，廣東四會526200)

該文利用Visual Basic 6.0計算機程序設計語言編寫了“國家地面氣象觀測站報文上傳狀態提示軟件”，軟件的主要功能是對觀測系統FTP報文上傳的本地或共享路徑作出分析判斷，根據報文上傳的狀態在軟件界面上顯示相應的提示，當報文發送失敗時連接計算機的外置音響會發出連續的系統警報聲，使值班員能迅速作出反應，提前處理傳輸故障，有效提高了報文傳輸的時效性，同時也減輕了臺站觀測員的精神壓力，使臺站氣象工作者在辦公室里既能嚴密監控自動站報文的傳輸狀態，又能集中精力做好其它相關的業務工作，大大提高了工作效能。

觀測系統；上傳提示軟件；FTP報文

1　開發背景

根據中國氣象局預報司的要求，從2015年7月起，全國氣象資料業務系統(MDOS)平臺正式運行，此項改革意味著氣象主管部門對臺站氣象觀測系統逐小時數據傳輸的及時性和可用性有著更嚴謹的要求。目前國家地面觀測站每小時正點上傳的FTP報文[1]均是由省氣象信息中心直接轉發至國家氣象局，而當臺站在非正點時刻觀測業務系統出現故障時(即使網路穩定)，FTP報文也無法傳送至省局服務器(包括廣東省在內)，此時臺站觀測員是收不到任何的故障提示信息或電話通知，最終有可能延誤了觀測員處理系統故障的時效性。眾多省份的氣象部門至今也存在此類問題，只通過檢測觀測站的固定IP地址信息或UDP分鐘數據流[2]來監控各臺站觀測系統的運行狀況，單方考慮臺站網路是否暢通或有無UDP分鐘數據報文上傳，忽略了臺站觀測系統會受計算機死機、FTP報文上傳軟件被防火墻阻止或人為誤操作引起FTP報文傳輸失敗的現象。本軟件可以通過設置FTP報文上傳狀態檢測時間間隔，對存放FTP報文的目標路徑自動定時進行分析判斷，一旦觀測系統的FTP報文上傳受阻，軟件就會通過外置音響或喇叭發出故障警報聲，使整個業務辦公場所都能聽到警報聲，確實有效地起到了提前“預警”作用，為綜合氣象設備保障員提供了充足的維修時間，保證了報文上傳的時效性。

2　軟件功能簡介

國家地面氣象觀測站報文上傳狀態提示軟件(李文斌V通用版)適用于檢測安裝了地面氣象綜合觀測系統的本機或局域網聯機FTP報文的上傳狀態。軟件的菜單欄布設了“檢測時間間隔設置(Menu1)”、“開始檢測(Menu2)”和“退出(Menu3)”3個主菜單，通過點擊Menu1觸發彈出時間設置提示框(Form2)，在Form2里輸入檢測間隔時間(如5 min)，保存后再點擊Menu2，軟件就開始執行檢測任務。現全國所有臺站使用的遙測站OSSMO[3]或新型站ISOS-SMO[4]觀測系統每5 min自動形成一個長Z數據文件，當Z文件上傳成功后，存放該文件的文件夾就會被清空；若上傳不成功，Z文件仍保留在該文件夾當中。本軟件就是通過檢測存放長Z文件的文件夾有無清空來進行分析判斷，若檢測到文件夾被清空，則傳輸狀態欄會用藍色字體標示“報文傳輸成功”，若文件夾積壓著長Z文件，則狀態欄會標示“報文傳輸失敗”，并且連接計算機的外置音響會發出急促的警報聲，直到FTP報文全部上傳完畢后報警聲才會終止。

3　軟件程序代碼

本軟件綜合運用Visual Basic 6.0[5]的選擇、循環、判斷等結構語句，結合多媒體應用控件，定位到FTP長Z數據文件所在的盤符目錄，并進行讀取檢測，若文件數量“>0”，軟件則執行“提示+警報”命令，若文件數為“0”，則報警聲會在下一檢測時間時關閉，執行的“路徑定位”和“檢測報警”程序代碼如下：

(路徑定位)……

Private Sub 開始判斷_Click()

On Error GoTo Err1

Dim fso As Object

If Text1.Text = "" Then MsgBox "請輸入報文傳輸的本地或共享路徑": Exit Sub

Call 讀取時間

FilName = Trim(Text1.Text)

Set fso = CreateObject("Scripting.FileSystemObject")

If fso.GetFolder(FilName).Files.Count > 0 Then

End If

設置時間.Enabled = False

Label3.Visible = True

Dim a

a = Trim(Format(Now, "yyyymmddhhMM") + Ftime)

Ntime = a

Timer1.Enabled = True

Timer1.Interval = 1000

Exit Sub

……(報警提示)

Private Sub Timer1_Timer()

Dim fso As Object

Dim Ttimer As Integer

Dim Tnow

Static K As Integer

Tnow = Format(Now, "yyyymmddhhMM")

If Ntime = Tnow Then

Set fso = CreateObject("Scripting.FileSystemObject")

If fso.GetFolder(FilName).Files.Count > 0 Then

Label2.Caption = "報文傳輸失敗"

WindowsMediaPlayer1.URL = App.Path & "Windows XP.wav"

Else

Label2.Caption = "報文傳輸成功"

WindowsMediaPlayer1.Close

End If

Ntime = Trim(Format(Now, "yyyymmddhhMM") + Ftime)

K = K + 1

Label3.Caption = "正在開始檢測第 " & K & " 次........"

End If

End Sub

……

4　軟件檢測實況

用報文上傳狀態提示軟件對本站2015年10月3日10時45分的長Z文件進行測試，本站使用的OSSMO觀測業務系統存放長Z文件(待上傳)的AwsNet2文件夾里存有10時45分沒上傳成功的報文。在本機的報文上傳提示軟件上輸入局域網聯機的報文上傳目標路徑“10.150.72.200AwsNet2”，點擊Menu2，則軟件界面顯示“報文傳輸失敗”的提示，同時，外置音響發出連續不斷的警報聲，如圖1所示。

當長Z文件上傳成功后，AwsNet2文件夾清空，軟件自動執行第2次檢測，結果顯示“報文傳輸成功”。

通過以上測試結果，可認為由本研究開發的通用版FTP報文上傳狀態提示軟件能應用于氣象部門內部任一聯網的觀測系統，使臺站業務人員能在辦公場所的不同地點進行聯機監控觀測系統的報文傳輸狀態，有效提高了數據的傳輸質量和工作效率。

5　結束語

本研究開發的國家地面氣象報文上傳狀態提示軟件使廣大基層臺站工作人員能在氣象系統內部任一聯網的計算機上從視覺和聽覺及時獲知觀測業務系統正點報或加密報的傳輸情況，杜絕了過往“來電通知后處理”的現象，達到“先處理后恢復”的目的，讓臺站氣象工作者在嚴密監控數據的同時也能專心做好本職相關的其它業務工作。研發者下一步將進一步完善和修改軟件的使用功能，使軟件能同時進行多機聯合檢測，最終實現上級業務部門能聯機監控轄區所有氣象臺站觀測系統的報文傳輸狀態。

圖1　局域網聯機觀測系統狀態及本機檢測傳輸狀態提示和警報聲浪Fig.1　State LAN on-line observation system and the detection and alarm sound transmission condition

[1] 鐘靜，李赟，陳海濤,等．基于SMS枝術的氣象報文監控設計與實現 [J]．貴州氣象， 2011，35(4)：42-43．

[2] 湯寧，方斌，王娟．貴州省氣象局實時業務管理及監控平臺簡介 [J]．貴州氣象，2012，36 (4)：42-43．

[3] 王力．OSSMO2010與2004業務軟件差異分析[J]．氣象科技，2015，43(2)：236-239．

[4] 宋云．ISOS新型測報軟件的應用體會[J]．中國新技術新產品，2015，22(4)：35．

[5] 吳昌平．Visual Basic 6.0程序設計[M]．北京：人民郵電出版社，2002：1-2．

Design of the Software for the Message Upload Status of the National Ground Meteorological Observation Station

LI Wenbin，SHI Cheng，PAN Zhihao

(Sihui Meteorological bureau, Sihui 526200, China)

Visual Basic 6 computer programming language was used to write into a "national meteorological station message upload status prompt software", the main functions of the software realization of the observation system FTP message upload local or shared path analysis and judgment, according to a message on the transfer of state display the corresponding information on the software interface, when the messages ending failed, an external audio connection with the computer system will send the alarm sounds continuously, so that the attendant can respond rapidly to transmission failure in advance, effectively improve the efficiency of message transmission, but also reduce the observatory staff stress, the meteorological workers in the office can transfer the status message to closely monitor the automatic station again, to concentrate on other related work, greatly improving the work efficiency.

observation system; upload prompt software; FTP message

1003-6598(2016)02-0070-03

2015-10-04

李文斌(1983—)，男，工程師，主要從事綜合氣象觀測與應用氣象工作，E-mail:lwb@163.com。

P413

B