https://wiki.isikhnas.com/api.php?action=feedcontributions&feedformat=atom&user=PriyonoWiki Sumber Informasi iSIKHNAS - User contributions [en]2026-08-20T08:01:51ZUser contributionsMediaWiki 1.31.16https://wiki.isikhnas.com/index.php?title=File:Spt_v1.xlsx&diff=39383File:Spt v1.xlsx2018-03-13T08:02:10Z<p>Priyono: SPT FORM V1</p>
<hr />
<div>SPT FORM V1</div>Priyonohttps://wiki.isikhnas.com/index.php?title=File:Sbh_v1.xlsx&diff=39382File:Sbh v1.xlsx2018-03-13T08:01:46Z<p>Priyono: SBH FROM v1</p>
<hr />
<div>SBH FROM v1</div>Priyonohttps://wiki.isikhnas.com/index.php?title=File:Hpt_v1.xlsx&diff=39381File:Hpt v1.xlsx2018-03-13T08:00:51Z<p>Priyono: HPT FORM</p>
<hr />
<div>HPT FORM</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39085InfoLab data export daemon2015-08-19T04:39:10Z<p>Priyono: /* Menyisipkan Modul */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi.<br />
<br />
Infolab di konfigurasi sedimikian rupa sehingga selalu terkait dengan data refference di iSIKHNAS. Dari konfigurasi ini akan menghasilkan data yang akan di eksport dalam bentuk ms.excel (*.xlsx) melalui Query. File inilah kemudian akan dikirimkan ke iSIKHNAS secara berkala.<br />
<br />
==Instalasi==<br />
<br />
===''' Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
===''' Membuat Form'''===<br />
Nama Form : fIMEL<br />
<br />
[[File:Form.jpg|Design Form]]<br />
-<br />
<br />
===''' Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
Modul ini terdiri dari 2 (dua) Fungsi utama yaitu Fungsi Cek koneksi Internet dan fungsi untuk koneksi ke mailserver dan mengirimkan email. Modul ditulis melalui pemrograman(Visual Basic Editor) dengan bahasa pemrograman Visual Basic. VBA didesain untuk melakukan beberapa tugas, seperti halnya mengkustomisasi sebuah aplikasi dan untuk mengendalikan aplikasi tersebut melakukan serangkaian objek terprogram. Versi VBA mendukung semua program dalam Microsoft Office, yakni Microsoft Excel, Microsoft Access, Microsoft Word, Microsoft Outlook, Microsoft FrontPage, serta Microsoft PowerPoint dan juga Microsoft Visual Studio. Dua fungsi dalam aplikasi infolab ini disimpan dengan nama mIMEL.<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
'Fungsi Cek koneksi Internet<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
'Fungsi Kirim Email<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39084InfoLab data export daemon2015-08-19T04:30:57Z<p>Priyono: /* Menyisipkan Modul */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi.<br />
<br />
Infolab di konfigurasi sedimikian rupa sehingga selalu terkait dengan data refference di iSIKHNAS. Dari konfigurasi ini akan menghasilkan data yang akan di eksport dalam bentuk ms.excel (*.xlsx) melalui Query. File inilah kemudian akan dikirimkan ke iSIKHNAS secara berkala.<br />
<br />
==Instalasi==<br />
<br />
===''' Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
===''' Membuat Form'''===<br />
Nama Form : fIMEL<br />
<br />
[[File:Form.jpg|Design Form]]<br />
-<br />
<br />
===''' Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
Modul ini terdiri dari 2 (dua) Fungsi utama yaitu Fungsi Cek koneksi Internet dan fungsi untuk koneksi ke mailserver dan mengirimkan email. Modul ditulis melalui pemrograman(Visual Basic Editor) dengan bahasa pemrograman Visual Basic. VBA didesain untuk melakukan beberapa tugas, seperti halnya mengkustomisasi sebuah aplikasi dan untuk mengendalikan aplikasi tersebut melakukan serangkaian objek terprogram. Versi VBA mendukung semua program dalam Microsoft Office, yakni Microsoft Excel, Microsoft Access, Microsoft Word, Microsoft Outlook, Microsoft FrontPage, serta Microsoft PowerPoint dan juga Microsoft Visual Studio. Modul dalam aplikasi infolab ini disimpan dengan nama mIMEL.<br />
Dua fungsi ini disimpan dengan nama mIMEL.<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
'Fungsi Cek koneksi Internet<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
'Fungsi Kirim Email<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39083InfoLab data export daemon2015-08-19T04:29:19Z<p>Priyono: /* Menyisipkan Modul */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi.<br />
<br />
Infolab di konfigurasi sedimikian rupa sehingga selalu terkait dengan data refference di iSIKHNAS. Dari konfigurasi ini akan menghasilkan data yang akan di eksport dalam bentuk ms.excel (*.xlsx) melalui Query. File inilah kemudian akan dikirimkan ke iSIKHNAS secara berkala.<br />
<br />
==Instalasi==<br />
<br />
===''' Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
===''' Membuat Form'''===<br />
Nama Form : fIMEL<br />
<br />
[[File:Form.jpg|Design Form]]<br />
-<br />
<br />
===''' Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
Modul ini terdiri dari 2 (dua) Fungsi utama yaitu Fungsi Cek koneksi Internet dan fungsi untuk koneksi ke mailserver dan mengirimkan email. Modul ditulis melalui pemrograman(Visual Basic Editor) dengan bahasa pemrograman Visual Basic. VBA didesain untuk melakukan beberapa tugas, seperti halnya mengkustomisasi sebuah aplikasi dan untuk mengendalikan aplikasi tersebut melakukan serangkaian objek terprogram. Versi VBA mendukung semua program dalam Microsoft Office, yakni Microsoft Excel, Microsoft Access, Microsoft Word, Microsoft Outlook, Microsoft FrontPage, serta Microsoft PowerPoint dan juga Microsoft Visual Studio.<br />
Dua fungsi ini disimpan dengan nama mIMEL.<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
'Fungsi Cek koneksi Internet<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
'Fungsi Kirim Email<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39082InfoLab data export daemon2015-08-19T04:14:20Z<p>Priyono: /* Menuliskan Kode Program */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi.<br />
<br />
Infolab di konfigurasi sedimikian rupa sehingga selalu terkait dengan data refference di iSIKHNAS. Dari konfigurasi ini akan menghasilkan data yang akan di eksport dalam bentuk ms.excel (*.xlsx) melalui Query. File inilah kemudian akan dikirimkan ke iSIKHNAS secara berkala.<br />
<br />
==Instalasi==<br />
<br />
===''' Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
===''' Membuat Form'''===<br />
Nama Form : fIMEL<br />
<br />
[[File:Form.jpg|Design Form]]<br />
-<br />
<br />
===''' Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
Nama Modul : mIMEL<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39081InfoLab data export daemon2015-08-19T04:11:25Z<p>Priyono: /* Pengenalan */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi.<br />
<br />
Infolab di konfigurasi sedimikian rupa sehingga selalu terkait dengan data refference di iSIKHNAS. Dari konfigurasi ini akan menghasilkan data yang akan di eksport dalam bentuk ms.excel (*.xlsx) melalui Query. File inilah kemudian akan dikirimkan ke iSIKHNAS secara berkala.<br />
<br />
==Instalasi==<br />
<br />
===''' Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
===''' Membuat Form'''===<br />
Nama Form : fIMEL<br />
<br />
[[File:Form.jpg|Design Form]]<br />
-<br />
<br />
===''' Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
==Menyisipkan Modul==<br />
Nama Modul : mIMEL<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39080InfoLab data export daemon2015-08-19T04:02:45Z<p>Priyono: /* InfoLab data export daemon: upload data laboratorium Otomatis */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
<br />
===''' Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
===''' Membuat Form'''===<br />
Nama Form : fIMEL<br />
<br />
[[File:Form.jpg|Design Form]]<br />
-<br />
<br />
===''' Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
==Menyisipkan Modul==<br />
Nama Modul : mIMEL<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39079InfoLab data export daemon2015-08-19T03:12:16Z<p>Priyono: /* 2. Membuat Form */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
<br />
==='''1. Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
==='''2. Membuat Form'''===<br />
Nama Form : fIMEL<br />
<br />
[[File:Form.jpg|Design Form]]<br />
-<br />
<br />
==='''3. Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
==Menyisipkan Modul==<br />
Nama Modul : mIMEL<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39078InfoLab data export daemon2015-08-19T03:09:30Z<p>Priyono: /* 2. Membuat Form */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
<br />
==='''1. Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
==='''2. Membuat Form'''===<br />
Nama Form : fIMEL<br />
[[File:Form.jpg|490px|left]]<br />
<br />
==='''3. Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
==Menyisipkan Modul==<br />
Nama Modul : mIMEL<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=File:Form.jpg&diff=39077File:Form.jpg2015-08-19T03:06:48Z<p>Priyono: </p>
<hr />
<div></div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39076InfoLab data export daemon2015-08-19T03:04:19Z<p>Priyono: /* InfoLab data export daemon: upload data laboratorium Otomatis */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
<br />
==='''1. Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
==='''2. Membuat Form'''===<br />
Nama Form : fIMEL<br />
<gallery><br />
Gambar1<br />
</gallery><br />
==='''3. Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
''' 3.2. Form Event OnLoad'''<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
''' 3.3. Form Event OnTimer'''<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
''' 3.4. Command_Send OnClick'''<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
==Menyisipkan Modul==<br />
Nama Modul : mIMEL<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39075InfoLab data export daemon2015-08-19T03:02:43Z<p>Priyono: /* 1. Membuat Tabel */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
<br />
==='''1. Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
==='''2. Membuat Form'''===<br />
Nama Form : fIMEL<br />
#* Gambar1<br />
<br />
<br />
==='''3. Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
<br />
''' 3.2. Form Event OnLoad'''<br />
<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
<br />
''' 3.3. Form Event OnTimer'''<br />
<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
<br />
''' 3.4. Command_Send OnClick'''<br />
<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
Nama Modul : mIMEL<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39074InfoLab data export daemon2015-08-19T03:01:35Z<p>Priyono: /* Menyisipkan Modul */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
<br />
==='''1. Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
==='''2. Membuat Form'''===<br />
Nama Form : fIMEL<br />
#* Gambar1<br />
<br />
<br />
==='''3. Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
<br />
''' 3.2. Form Event OnLoad'''<br />
<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
<br />
''' 3.3. Form Event OnTimer'''<br />
<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
<br />
''' 3.4. Command_Send OnClick'''<br />
<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
Nama Modul : mIMEL<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39073InfoLab data export daemon2015-08-19T02:59:42Z<p>Priyono: /* InfoLab data export daemon: upload data laboratorium Otomatis */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
<br />
==='''1. Membuat Tabel'''===<br />
Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
==='''2. Membuat Form'''===<br />
Nama Form : fIMEL<br />
#* Gambar1<br />
<br />
<br />
==='''3. Menuliskan Kode Program'''===<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
<br />
''' 3.2. Form Event OnLoad'''<br />
<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
<br />
''' 3.3. Form Event OnTimer'''<br />
<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
<br />
''' 3.4. Command_Send OnClick'''<br />
<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
#Nama Modul mImel<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39072InfoLab data export daemon2015-08-19T02:46:26Z<p>Priyono: /* Instalasi */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
<br />
'''1. Membuat Tabel'''<br />
* Nama Tabel : tIMEL<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
|}<br />
<br />
'''2. Membuat Form'''<br />
* Nama Form : fIMEL<br />
* Gambar1<br />
<br />
<br />
'''3. Menuliskan Kode Program'''<br />
<br />
''' 3.1. Deklarasi Variabel'''<br />
<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
<br />
''' 3.2. Form Event OnLoad'''<br />
<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
<br />
''' 3.3. Form Event OnTimer'''<br />
<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
<br />
''' 3.4. Command_Send OnClick'''<br />
<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
#Nama Modul mImel<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39071InfoLab data export daemon2015-08-19T02:13:14Z<p>Priyono: /* Instalasi */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
#Membuat Tabel<br />
Nama Tabel : tIMEL<br />
<br />
{| class="wikitable"<br />
|-<br />
! Fieldname !! DataType !! input mask !! Description<br />
|-<br />
| Email || Text(100) || || Akun Gmail<br />
|-<br />
| Katasandi || Text(100) || Password || Password Akun Gmail<br />
|-<br />
| Kepada || Text(100) || || Akun Penerima Email<br />
|-<br />
| Jamkirim1 || Datetime || || Jam Pengiriman Email 1<br />
|-<br />
| Jamkirim2 || Datetime || || Jam Pengiriman Email 2<br />
|-<br />
| Lampiran || Text(255) || || File Lampiran<br />
<br />
|}<br />
# Membuat Form<br />
## Nama Form : fIMEL<br />
## Gambar1<br />
# Menuliskan Kode Program<br />
## 3.1. Deklarasi Variabel<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
##3.2. Form Event OnLoad<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
##3.3. Form Event OnTimer<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
##3.4. Command_Send OnClick<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
#Nama Modul mImel<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39070InfoLab data export daemon2015-08-19T02:08:00Z<p>Priyono: /* Menyisipkan Modul */</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
#Membuat Tabel<br />
Nama Tabel : tIMEL<br />
Fieldname DataType Inputmask Description<br />
EMail Text(100) Akun Gmail<br />
KataSandi Text(100) Password Password Akun Gmail<br />
Kepada Text(100) Akun Penerima Email<br />
Jamkirim1 datetime Jam Pengiriman Email 1<br />
Jamkirim2 datetime Jam Pengiriman Email 2<br />
Lampiran Text(255) Lampiran<br />
<br />
# Membuat Form<br />
## Nama Form : fIMEL<br />
## Gambar1<br />
# Menuliskan Kode Program<br />
## 3.1. Deklarasi Variabel<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
##3.2. Form Event OnLoad<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
##3.3. Form Event OnTimer<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
##3.4. Command_Send OnClick<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
#Nama Modul mImel<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39069InfoLab data export daemon2015-08-19T02:06:10Z<p>Priyono: </p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
#Membuat Tabel<br />
Nama Tabel : tIMEL<br />
Fieldname DataType Inputmask Description<br />
EMail Text(100) Akun Gmail<br />
KataSandi Text(100) Password Password Akun Gmail<br />
Kepada Text(100) Akun Penerima Email<br />
Jamkirim1 datetime Jam Pengiriman Email 1<br />
Jamkirim2 datetime Jam Pengiriman Email 2<br />
Lampiran Text(255) Lampiran<br />
<br />
# Membuat Form<br />
## Nama Form : fIMEL<br />
## Gambar1<br />
# Menuliskan Kode Program<br />
## 3.1. Deklarasi Variabel<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
##3.2. Form Event OnLoad<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
##3.3. Form Event OnTimer<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
##3.4. Command_Send OnClick<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
#Nama Modul mImel<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
End Sub<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=InfoLab_data_export_daemon&diff=39068InfoLab data export daemon2015-08-19T02:02:56Z<p>Priyono: Created page with "=InfoLab data export daemon: upload data laboratorium Otomatis= ==Pengenalan== iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian la..."</p>
<hr />
<div>=InfoLab data export daemon: upload data laboratorium Otomatis=<br />
==Pengenalan==<br />
iSIKHNAS modul upload data laboratorium bertujuan untuk mengintegrasikan data hasil pengujian laboratorium (tipe A) secara otomatis melalui E-Mail. Modul ini merupakan salah satu fitur yang dimiliki iSIKHNAS yang di sisipkan kedalam infolab yang berbasis Ms. Access, memanfaatkan Server SMTP Gmail. Server SMTP Gmail berfungsi me-relai pesan dari perangkat atau aplikasi(infolab). Dengan menghubungkannya ke smtp.gmail.com pada port 465, maka anda dapat mengirim email ke siapa saja. Untuk tersambung menggunakan SSL, Anda harus memberikan nama pengguna dan sandi Google untuk autentikasi. <br />
<br />
==Instalasi==<br />
#Membuat Tabel<br />
Nama Tabel : tIMEL<br />
Fieldname DataType Inputmask Description<br />
EMail Text(100) Akun Gmail<br />
KataSandi Text(100) Password Password Akun Gmail<br />
Kepada Text(100) Akun Penerima Email<br />
Jamkirim1 datetime Jam Pengiriman Email 1<br />
Jamkirim2 datetime Jam Pengiriman Email 2<br />
Lampiran Text(255) Lampiran<br />
<br />
# Membuat Form<br />
## Nama Form : fIMEL<br />
## Gambar1<br />
# Menuliskan Kode Program<br />
## 3.1. Deklarasi Variabel<br />
Option Compare Database<br />
Option Explicit<br />
Dim rsz As DAO.Recordset<br />
Dim SQLz As String <br />
##3.2. Form Event OnLoad<br />
Private Sub Form_Load()<br />
SQLz = "select * from timel;"<br />
Set rsz = CurrentDb.OpenRecordset(SQLz)<br />
End Sub<br />
##3.3. Form Event OnTimer<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), _<br />
"HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub<br />
##3.4. Command_Send OnClick<br />
Private Sub Command_Send_Click()<br />
DoCmd.TransferSpreadsheet acExport, acSpreadsheet_<br />
TypeExcel12Xml , "infolab", "C:/infolab/dataexcell.xlsx", True, "", False<br />
If IsInternetConnected() = True Then<br />
Call SendMail<br />
End If<br />
End Sub<br />
<br />
==Menyisipkan Modul==<br />
#Nama Modul mImel<br />
Option Compare Database<br />
Private Declare Function InternetGetConnectedState _<br />
Lib "wininet.dll" (ByRef dwflags As Long, _<br />
ByVal dwReserved As Long) As Long<br />
Private Const INTERNET_CONNECTION_MODEM As Long = &H1<br />
Private Const INTERNET_CONNECTION_LAN As Long = &H2<br />
Private Const INTERNET_CONNECTION_PROXY As Long = &H4<br />
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20<br />
Option Explicit<br />
Function IsInternetConnected() As Boolean<br />
Dim L As Long<br />
Dim R As Long<br />
R = InternetGetConnectedState(L, 0&)<br />
If R = 0 Then<br />
IsInternetConnected = False<br />
Else<br />
If R <= 4 Then<br />
IsInternetConnected = True<br />
Else<br />
IsInternetConnected = False<br />
End If<br />
End If<br />
End Function<br />
<br />
Public Sub SendMail()<br />
Dim iCfg As CDO.Configuration<br />
Dim iMsg As CDO.Message<br />
Set iCfg = New CDO.Configuration<br />
Set iMsg = New CDO.Message<br />
Dim xrs As DAO.Recordset<br />
Dim xSQL As String<br />
xSQL = "select * from timel;"<br />
Set xrs = CurrentDb.OpenRecordset(xSQL)<br />
With iCfg.Fields<br />
.Item(cdoSendUsingMethod) = cdoSendUsingPort<br />
.Item(cdoSMTPServerPort) = 465<br />
.Item(cdoSMTPServer) = "smtp.gmail.com"<br />
.Item(cdoSMTPUseSSL) = True<br />
.Item(cdoSMTPAuthenticate) = 1<br />
.Item(cdoSendUserName) = xrs!EMail<br />
.Item(cdoSendPassword) = xrs!KataSandi<br />
.Item(cdoSendEmailAddress) = "Do Not Reply" & "<" & xrs!EMail & ">"<br />
.Update<br />
End With<br />
<br />
With iMsg<br />
.Configuration = iCfg<br />
.Subject = "Subject"<br />
.To = xrs!Kepada<br />
.TextBody = ""<br />
.AddAttachment xrs!Lampiran<br />
.Send<br />
End With<br />
<br />
Set iMsg = Nothing<br />
Set iCfg = Nothing<br />
<br />
End Sub<br />
<br />
<br />
Private Sub Form_Timer()<br />
If IsInternetConnected() = True Then<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS")<br />
Application.Echo True<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim1 Then <br />
Call Command_Send_Click<br />
If UCase(Me!Label1.Caption) = rsz!JamKirim2 Then <br />
Call Command_Send_Click<br />
Else<br />
Application.Echo False<br />
Me!Label1.Caption = Format(Now(), "HH:NN:SS") & " No/Limited Connection"<br />
Application.Echo True<br />
End If<br />
End Sub</div>Priyonohttps://wiki.isikhnas.com/index.php?title=Spreadsheet_data_submission_manual&diff=24012Spreadsheet data submission manual2015-02-04T01:59:31Z<p>Priyono: </p>
<hr />
<div><languages/><br />
<translate><br />
=Manual for spreadsheet data submission= <!--T:1--><br />
This manual provides guidance for the submission of laboratory data to iSIKHNAS using and Excel spreadsheet. <br />
<br />
==Introduction and overview== <!--T:2--><br />
The overall process is simple:<br />
* Open the spreadsheet template (and the linked data standards spreadsheet)<br />
* Enter the lab submission data <br />
* Send the spreadsheet by email to iSIKHNAS<br />
<br />
<!--T:3--><br />
iSIKHNAS automatically checks the data and, if it is valid, inserts it into the national database. An email is sent with confirmation that the data has been correctly submitted, as well as an automatically generated client report for printing in the lab.<br />
<br />
<!--T:4--><br />
To use the system, laboratory staff must:<br />
* register with iSIKHNAS (talk to your local coordinator)<br />
* have permissions set to be allowed to submit laboratory data (again, talk to your coordinator)<br />
* set up their computer<br />
** get a copy of the submission template<br />
** get a copy of the lab standards spreadsheet<br />
<br />
<!--T:5--><br />
As the system works with Excel and email, you naturally must have <br />
* a recent copy of Excel installed on your computer (one that can handle the newer '.xlsx' file formats), and<br />
* an email address and internet connection to send and receive emails. To send and receive emails you can use <br />
** a web-mail interface (like gmail) through a web browser (like Chrome, Internet Explorer or Firefox), or<br />
** an email client (like Microsoft Outlook or Thunderbird)<br />
<br />
==Setting up== <!--T:6--><br />
To be able to use the system you must have two spreadsheets:<br />
# the template<br />
# 'lab standards.xlsx' - which contains the Indonesian national laboratory data standards to ensure that all data is compatible and able to be analysed.<br />
<br />
<!--T:7--><br />
Both can be downloaded from the iSIKHNAS web site<br />
<br />
====Data submission template spreadsheet==== <!--T:8--><br />
[[image:labdatatemplate.png]]<br />
<br />
<!--T:9--><br />
This is used to enter the data, and is sent by email to iSIKHNAS.<br />
Click on the link below to download the latest version of the data submission spreadsheet:<br />
<br />
<!--T:10--><br />
[[media:iSIKHNAS submission spreadsheet v5.3.xlsx|Submission spreadsheet]]<br />
<br />
<!--T:11--><br />
The template may be updated from time to time. Your iSIKHNAS coordinator will either send you the updated spreadsheet by email, or let you know that a new version is available on this web site for download.<br />
<br />
===Laboratory standards spreadsheet=== <!--T:12--><br />
[[image:labstandards.png]]<br />
<br />
<!--T:13--><br />
The '''lab standards.xlsx''' file is automatically linked to the template, to ensure that all data submitted conforms to the national data standards. This is automatically customised for each different lab, and is generated by iSIKHNAS. Once it is generated and downloaded, you never need to edit it. If changes are required, they can be made on-line on the iSIKHNAS web site, and a new version downloaded. <br />
<br />
<!--T:14--><br />
The spreadsheet can be downloaded from the iSIKHNAS secure web site. Log in and go to:<br />
* Manage | Export Lab standards<br />
or click on the following link to go straight to the download page (you must already be logged in for this link to work)<br />
<br />
<!--T:15--><br />
https://www.isikhnas.com/en/exportlabstandards<br />
<br />
<!--T:16--><br />
[[image:exportstandards.png]]<br />
<br />
<!--T:17--><br />
# Select 'Custom lab references'<br />
# Select your lab from the drop down list<br />
# Either<br />
## Click on 'Export'<br />
### This will send a copy of the standards to your registered email address, or<br />
## Click on 'Export to lab contact'<br />
### This will send a copy to the lab contact person, as recorded in the iSIKHNAS list of laboratories (infrastructure table).<br />
<br />
===Important tips for spreadsheet management=== <!--T:18--><br />
<br />
<!--T:19--><br />
{{hlbox|Always save the template spreadsheet and the standards spreadsheet in the '''same directory'''}}<br />
<br />
<!--T:20--><br />
If they are in different directories, the automatic links will not work.<br />
<br />
<!--T:21--><br />
{{hlbox|The standards spreadsheet must always have the same name: '''lab standards.xlsx'''.}}<br />
<br />
<!--T:22--><br />
If the name is changed, it will not work.<br />
<br />
<!--T:23--><br />
When you download the standards spreadsheet from the web, sometimes your computer will automatically change the name to something like '''lab standards(2).xlsx'''. If this happens, you need to delete the old copy, and rename the file back to '''lab standards.xlsx''' as well as placing it in the correct directory.<br />
<br />
<!--T:24--><br />
{{hlbox|You can copy and rename the template file as many times as you like (but not the standards file)}}<br />
<br />
<!--T:25--><br />
You may want to keep a copy of every submission you send, so saving each file with the epi number is a good way to keep track of the files. They can all be in the same directory, as long as the '''lab standards.xlsx''' file is in the same directory.<br />
<br />
==Entering data== <!--T:26--><br />
To enter data into the template spreadsheet:<br />
# Open the '''lab standards.xlsx''' spreadsheet<br />
# Open the template spreadsheet<br />
<br />
<!--T:27--><br />
{{hlbox|Both spreadsheets must be open at the same time so that template can successfully link to the standards spreadsheet}}<br />
<br />
<!--T:28--><br />
Enter data into the required cells by clicking on the cell and typing, or clicking on the arrow to select from the drop-down list.<br />
<br />
====Controlled cells==== <!--T:29--><br />
The spreadsheet is protected to avoid entering data in the wrong places. You can only select cells intended for data entry<br />
<br />
=====Drop down lists===== <!--T:30--><br />
[[image:dropdownlist.png]]<br />
<br />
<!--T:31--><br />
There are many cells with drop down lists. These ensure that data follows the national laboratory data standards. You can only choose one of the values from the list<br />
<br />
=====Required values===== <!--T:32--><br />
[[image:requiredcell.png]]<br />
<br />
<!--T:33--><br />
When a value is required but missing, the cell is highlighted with a red border.<br />
<br />
===Hints=== <!--T:34--><br />
[[image:hintmarker.png]]<br />
<br />
<!--T:35--><br />
Many cells contain hints to guide you. These are marked with a small triangle in the corner of the cell.<br />
<br />
<!--T:36--><br />
[[image:hint.png]]<br />
<br />
<!--T:37--><br />
To view the hint, float your mouse over the triangle and the text will pop up.<br />
<br />
==Findings, results, diagnosis== <!--T:38--><br />
In iSIKHNAS each of these has a special meaning.<br />
<br />
=====Findings===== <!--T:39--><br />
This is what the lab test tells you. Findings can be <br />
* qualitative (for example, Coliforms were detected in a sample ) or <br />
* quantitative (an HI test gave a titre of 1/40)<br />
Some tests may give both qualitative and quantitative findings (for example a faecal sample contained 300 Strongyloides eggs per gram)<br />
<br />
=====Result===== <!--T:40--><br />
This is our ''interpretation'' of what the findings mean. Normally the result is either positive or negative. For example, the finding for an antibody ELISA may be an optical density of 200. If we use a cut-off of 150, this means that our interpretation of the finding is that the animal is positive - it has antibodies to the pathogen. Other possible results include ''protective'' or ''non-protective'' when doing post-vaccination surveillance; ''within acceptable limits'' or ''outside acceptable limits'' (food safety testing); light, medium or heavy load (worm eggs).<br />
<br />
=====Diagnosis===== <!--T:41--><br />
This is our conclusion, based on all the available information, as to what disease is causing the problem. A diagnosis is only meaningful when disease is present and the purpose of the submission is diagnostic. Some key points:<br />
* For surveillance, movement or other purposes, there is no diagnosis as there is no (known) disease<br />
* AI negative is ''not'' a diagnosis. It is a result (our interpretation of the information that the test gave). It does not tell us what disease is causing the problem.<br />
<br />
==Guidelines for specific fields== <!--T:42--><br />
====Pengajuan uji laboratorium====<br />
Information about the submission.<br />
<br />
=====Nomor Epi===== <!--T:43--><br />
Required. A unique submission number assigned by the laboratory.<br />
<br />
<!--T:44--><br />
When samples are sent from one laboratory to another, the original epi number should always be used (do not create a new one in the referral lab).<br />
<br />
=====Tujuan===== <!--T:45--><br />
Required. The reason for submission of the specimen.<br />
<br />
=====ID kejadian iSIKHNAS===== <!--T:46--><br />
Required for some reasons. This is the iSIKHNAS reference number, to link laboratory data to other data in iSIKHNAS.<br />
<br />
<!--T:47--><br />
This is should be used for:<br />
* Diagnostic cases: The iSIKHNAS case ID<br />
* Movement permits: The iSIKHNAS SKKH ID<br />
* Surveillance: The iSIKHNAS surveillance program ID<br />
* Post vaccination monitoring: The iSIKHNAS vaccination program ID<br />
<br />
<!--T:48--><br />
While iSIKHNAS is being rolled out, not all kabupaten will be using it, so some submissions will not have an iSIKHNAS ID even if they are meant to. In this case, leave the field empty<br />
<br />
====Pemilik dan pengirim==== <!--T:49--><br />
Information about the location, submitter and owner. The location should always be the location of the animal.<br />
<br />
=====Lokasi (PKKD)===== <!--T:50--><br />
Required. Select the location from the four drop down lists.<br />
<br />
<!--T:51--><br />
If there location name has changed because of changes in administrative boundaries, try to find the old name and use that.<br />
<br />
<!--T:52--><br />
If the detailed location is not known, enter as much information as is available (at least the province and kabupaten)<br />
<br />
=====Kode lokasi===== <!--T:53--><br />
This is automatically generated from the information supplied above. You cannot edit this.<br />
<br />
=====Jenis Pengirim===== <!--T:54--><br />
Required. Pick from the drop down list.<br />
<br />
=====Nama Pengirim===== <!--T:55--><br />
Optional. This is included on the client report<br />
<br />
=====Alamat Pengirim===== <!--T:56--><br />
Optional. This is included on the client report<br />
<br />
=====Nomor HP Pengirim===== <!--T:57--><br />
Optional. If available, enter the mobile phone number. This is used to identify the submitter so that it is possible to link all their submissions for consolidated reporting.<br />
<br />
=====Nama Pemilik===== <!--T:58--><br />
Optional. This is included on the client report<br />
<br />
=====Alamat Pemilik===== <!--T:59--><br />
Optional. This is included on the client report<br />
<br />
=====Nomor HP Pemilik===== <!--T:60--><br />
Optional. If available, enter the mobile number. This allows different submissions from the same owner to be linked.<br />
<br />
====Spesimen dan uji==== <!--T:61--><br />
Information about the specimen and test. Each separate specimen and test combination should be entered in a different column.<br />
<br />
<!--T:62--><br />
[[image:multitests.png]]<br />
<br />
<!--T:63--><br />
If there are multiple qualitative findings for a particular test (see below), these should be entered in new columns with the other details blank)<br />
<br />
=====Kelompok spesimen and Jenis specsimen===== <!--T:64--><br />
Required. Use these two fields to select the type of specimen (what it is or what part of the animal it came from)<br />
<br />
=====Bentuk spesimen===== <!--T:65--><br />
Required. This indicates how the specimen has been handled, prepared or treated. This may be the way it is collected (swab) prepared (smear) or preserved (formalin).<br />
<br />
=====Jenis Uji===== <!--T:66--><br />
Required. This specifies the lab section conducting the test. The tests listed in the next drop down depend on the custom list of tests for each laboratory and lab section (see below).<br />
<br />
=====Uji===== <!--T:67--><br />
Required. The test performed.<br />
<br />
=====Temuan kual.===== <!--T:68--><br />
The qualitative finding of a test. If a test produces one or more qualitative findings (e.g. bacterial or parasite species detected, or histopathological findings) each finding should be entered into a separate column on row 29. One test can therefore have multiple findings and use multiple columns.<br />
<br />
<!--T:69--><br />
[[image:qualfindings.png]]<br />
<br />
====Animal details==== <!--T:70--><br />
The bottom of the template contains information about each animal. There should be one animal per row. Each animal must have results for every test.<br />
<br />
=====Jenis kelamin===== <!--T:71--><br />
Optional.Enter the sex of each animal, if known<br />
<br />
=====Umur and Unit Umur===== <!--T:72--><br />
Optional. Enter the age of each animal, if known. The age is split into two columns. The first column (Umur) contains only numbers (whole numbers or decimals). The second column contains the units (days, weeks, months or years), selected from the drop down list. Only one unit can be used, so if an animal is 2 years and 3 months, enter the age as 2.25 years.<br />
<br />
<!--T:73--><br />
You cannot use other symbols such as > 3. Use your best estimate if the age is unknown.<br />
<br />
=====Spesies===== <!--T:74--><br />
Required. Pick from the list.<br />
<br />
=====Ras===== <!--T:75--><br />
Optional. Some species have a number of different breeds available. Add this if it is known. Sometimes there are different options - for exmaple, cattle (sapi) can be identified as beef (potong) or dairy (perah), or can be classified by their breed (limousin, friesian). Use the most detailed information known.<br />
<br />
=====ID hewan===== <!--T:76--><br />
Required. If the animals are individually uniquely identified (for example, with ear tags) then use these identifiers. If no information is available, you can simply give each animal a serial number starting at 1. <br />
<br />
<!--T:77--><br />
If the animals are in a mixed group, you can add other information in this field. For example, if they come from several owners, you could identify each animal with the owner name and the animal number.<br />
<br />
=====Temuan kuant.===== <!--T:78--><br />
Quantitative finding. This is required for tests that produce quantitative outputs. It must be a whole number or a decimal number.<br />
<br />
<!--T:79--><br />
There is a plan to allow ''uncertainty qualifiers'', such as > (greater than), < (less than), ~ approximately, however this feature has not yet been implemented.<br />
<br />
=====Hasil===== <!--T:80--><br />
Required. Pick from the drop down list.<br />
<br />
==Submitting data== <!--T:81--><br />
===Saving and sending the data===<br />
# Once data entry is complete, save the template spreadsheet to your local hard drive. You may want to change the name using the Epi Number to make finding the data again easier. <br />
# Create a new e-mail<br />
# The address should be '''labdata@isikhnas.com'''<br />
# Type the Epi number in the subject line (this is optional but will help you keep track of which data has been submitted and which hasn't, when you look at your 'sent mail' folder)<br />
# Attach the template spreadsheet that you just saved<br />
# Send the e-mail<br />
<br />
<!--T:82--><br />
If you have a local e-mail client installed on your computer (such as Thunderbird or Outlook), sending messages can be made faster and easier:<br />
# In Excel go to the File menu, select '''Save and send''', then click on the '''Send as attachment''' button. This automatically creates an email with the file attached. <br />
# Enter the address '''labdata@isikhnas.com''' and click send<br />
<br />
===Responses from iSIKHNAS=== <!--T:83--><br />
Whenever data is submitted to iSIKHNAS, there will be an automatic response which should arrive within a minute or two. The contents of the response depends on the data sent:<br />
<br />
====Successful submission - client report==== <!--T:84--><br />
If the data is all correct, then it will be automatically inserted into iSIKHNAS. <br />
<br />
<!--T:85--><br />
You will then receive an email confirming that the data has been accepted, with a summary of the data.<br />
<br />
<!--T:86--><br />
You will also receive a second email containing an automatically generated client report. This is in ODT format which can be opened and edited in [https://www.libreoffice.org Libre Office Writer] (free) or in Microsoft Word.<br />
<br />
<!--T:87--><br />
[[image:clientreport.png]]<br />
<br />
<!--T:88--><br />
Once the file has been opened, you can add any further details, save it, and print it.<br />
<br />
====Errors detected in the data==== <!--T:89--><br />
If there are any errors in the submitted data, you will receive an email listing the errors and cell references. <br />
<br />
<!--T:90--><br />
[[image:errorhighlight.png]]<br />
<br />
<!--T:91--><br />
The email will also have an attachment which is copy of the spreadsheet submitted. In this spreadsheet, the cells with errors are highlighted in yellow, with pop-up comments to explain the error.<br />
<br />
<!--T:92--><br />
If there were errors, fix these in your original spreadsheet and submit again in a new email.<br />
<br />
====System errors==== <!--T:93--><br />
If there is an error in the system, you may receive an email with a system error message, instructing you to contact your coordinator. <br />
<br />
<!--T:94--><br />
Forward the message to your iSIKHNAS coordinator or one of the iSIKHNAS champions who will help solve the problem.<br />
<br />
==Customising test details for your lab== <!--T:95--><br />
The list of laboratory sections, and tests performed by each of those sections, needs to be customised for each different laboratory.<br />
<br />
<!--T:96--><br />
To set up the list of tests, log in to the iSIKHNAS web site and go to Manage | Laboratory Tests.<br />
<br />
<!--T:97--><br />
[[image:managelabtests.png]]<br />
<br />
<!--T:98--><br />
# Choose the test from the drop down list. These are national standards so if there is a test that is not present, you must contact the iSIKHNAS champions to update the standards.<br />
# Choose the laboratory section that does the test<br />
# Choose your laboratory from the list<br />
# If the test has a qualitative finding, check the box. For example, bacterial or parasitic identification produce qualitative findings - the names of the bacteria or parasites, while an AI ELISA doesn't - it is always just testing for AI. <br />
# If the test produces a quantitative finding, check the box. For example, an ELISA produces an optical density which is a number (quantitative), a faecal egg count produces a number. However a Rose Bengal Test just has either positive or negative result, so no quantitative finding. <br />
# If a quantitative finding is produced, select the units from the list<br />
# If your lab is officially accredited to perform this test, check the box<br />
# Enter a reference to the specific method used in the test (to be printed on the client report)<br />
<br />
==Updating data standards== <!--T:99--><br />
The national laboratory standards are managed centrally to ensure consistency and the ability to analyse the data automatically. iSIKHNAS enforces these standards, so that it is not permissible to submit data that does not use the standards.<br />
<br />
<!--T:100--><br />
The standards cover all aspects of the data managed, including:<br />
* species<br />
* tests<br />
* findings<br />
* animal sex and ages<br />
* specimens<br />
<br />
<!--T:101--><br />
These standards are contained in the '''lab standards.xlsx''' spreadsheet and are available in the drop down lists on the submission template. <br />
<br />
<!--T:102--><br />
If you ever find that there is a value missing from the standard list, it is possible to have new values added. To ensure that there is consistency, this process is managed by the iSIKHNAS champions. <br />
<br />
<!--T:103--><br />
Please contact the iSIKHNAS champions to request a new value to be added to the standards.<br />
</translate></div>Priyonohttps://wiki.isikhnas.com/index.php?title=Translations:Spreadsheet_data_submission_manual/10/id&diff=24010Translations:Spreadsheet data submission manual/10/id2015-02-04T01:57:40Z<p>Priyono: </p>
<hr />
<div>[[media:iSIKHNAS submission spreadsheet v5.3.xlsx|Submission spreadsheet]]</div>Priyonohttps://wiki.isikhnas.com/index.php?title=Spreadsheet_data_submission_manual/id&diff=24011Spreadsheet data submission manual/id2015-02-04T01:57:40Z<p>Priyono: </p>
<hr />
<div>[[Manual penggunaan form pengisian uji laboratorium iSIKHNAS|Versi bahasa Indonesia]]<br />
=Panduan pengiriman data lembar lajur=<br />
<br />
Panduan ini berisi petunjuk pengiriman data laboratorium melalui iSIKHNAS dengan menggunakan lembar lajur (spreadsheet) Excel. <br />
<br />
==Pengantar dan ikhtisar==<br />
Prosesnya secara keseluruhan cukup sederhana: <br />
*Buka pola acu (template) lembar lajur dan lembar lajur standar data yang tertaut. <br />
*Masukkan data laboratorium yang akan dikirim. <br />
*Kirimkan lembar lajur ke iSIKHNAS melalui surat elektronik (email).<br />
<br />
iSIKHNAS secara otomatis akan memeriksa data yang diterima dan, apabila tidak ada masalah, menambahkannya ke basis data (database) nasional. Setelahnya akan ada surat elektronik balasan berisi konfirmasi bahwa data telah terkirim dengan benar disertai laporan klien yang dihasilkan secara otomatis untuk dicetak di laboratorium.<br />
<br />
Untuk dapat menggunakan sistem tersebut, staf laboratorium membutuhkan hal-hal berikut ini: <br />
*Terdaftar pada iSIKHNAS (tanyakan kepada koordinator lokal). <br />
*Memiliki kewenangan untuk mengirimkan data laboratorium (tanyakan kepada koordinator lokal). <br />
*Unit komputer yang telah dilengkapi dengan: <br />
**Salinan lembar lajur pengiriman data. <br />
**Salinan lembar lajur standar laboratorium.<br />
<br />
Karena sistem ini bekerja berdasarkan Excel dan surat elektronik, maka anda juga membutuhkan hal-hal berikut ini: <br />
* Perangkat lunak Excel yang telah diinstalasi pada komputer anda (dengan versi yang dapat membuka dokumen dengan format '.xlsx'); dan <br />
* alamat surat elektronik dan koneksi internet untuk mengirim dan menerima surat elektronik. Untuk mengirim dan menerima surat elektronik, anda dapat menggunakan fasilitas berikut ini: <br />
** Antarmuka web-mail (misalnya Gmail) melalui perangkat lunak peramban (misalnya Chrome, Internet Explorer atau Firefox); atau <br />
** perangkat lunak surat elektronik (misalnya Microsoft Outlook atau Thunderbird).<br />
<br />
==Pengaturan==<br />
Untuk dapat menggunakan sistem ini, anda membutuhkan dua jenis lembar lajur berikut ini: <br />
# Pola acu (template) lembar lajur. <br />
# Lembar lajur 'lab standards.xlsx' - yang berisi standar data laboratorium nasional Indonesia untuk memastikan kompatibilitas data sehingga dapat dianalisis.<br />
<br />
Keduanya dapat diunduh dari situs web iSIKHNAS.<br />
<br />
====Pola acu lembar lajur untuk pengiriman data====<br />
[[image:labdatatemplate.png]]<br />
<br />
Lembar lajur ini digunakan untuk memasukkan data dan kemudian dikirimkan ke iSIKHNAS melalui surat elektronik.<br />
Klik tautan berikut ini untuk mengunduh versi terbaru dari lembar lajur pengiriman data:<br />
<br />
[[media:iSIKHNAS submission spreadsheet v5.3.xlsx|Submission spreadsheet]]<br />
<br />
Pola acu lembar lajur ini akan diperbarui dari waktu ke waktu. Koordinator iSIKHNAS anda dapat mengirimkan versi lembar lajur terbaru melalui surat elektronik, atau memberi tahu versi terbaru yang dapat diunduh dari situs web ini.<br />
<br />
===Lembar lajur standar laboratorium===<br />
[[image:labstandards.png]]<br />
<br />
Dokumen '''lab standards.xlsx''' telah ditautkan secara otomatis pada pola acu lembar lajur untuk memastikan bahwa semua data yang akan dikirim sudah sesuai dengan standar data nasional. Langkah ini dilakukan dan disesuaikan secara otomatis oleh iSIKHNAS untuk masing-masing laboratorium. Setelah dokumen dibuat dan diunduh, anda tidak perlu lagi melakukan penyuntingan. Apabila ada perubahan, maka dapat dilakukan secara daring (''online'') melalui situs web iSIKHNAS dan kemudian diunduh. <br />
<br />
Lembar lajur tersebut dapat diunduh secara aman dari situs web iSIKHNAS. Lakukan ''log in'' dan lihat:<br />
* Manage | Export Lab standards<br />
atau klik tautan berikut ini untuk langsung masuk ke halaman pengunduh (anda harus sudah ''log in'' sebelum tautan ini dapat bekerja)<br />
<br />
https://www.isikhnas.com/en/exportlabstandards<br />
<br />
[[image:exportstandards.png]]<br />
<br />
# Pilih 'Custom lab references'<br />
# Pilih laboratorium anda dari daftar yang muncul <br />
# Pilihan yang tersedia:<br />
## Klik 'Export'<br />
### Langkah ini akan mengirimkan salinan dokumen standar laboratorium ke alamat surat elektronik anda yang telah terdaftar; atau <br />
## Klik 'Export to lab contact'<br />
### Langkah ini akan mengirimkan salinan dokumen standar laboratorium ke narahubung (''contact person'') yang tercantum pada daftar laboratorium iSIKHNAS (tabel infrastruktur).<br />
<br />
===Petunjuk penting dalam pengelolaan lembar lajur===<br />
<br />
{{hlbox|Selalu simpan pola acu lembar lajur dan lembar lajur standar laboratorium dalam '''direktori yang sama'''}}<br />
<br />
Jika masing-masing lembar lajur ditempatkan pada direktori yang berbeda, maka tautan diantara keduanya tidak akan bekerja.<br />
<br />
{{hlbox|Lembar lajur standar laboratorium harus selalu memiliki nama yang sama: '''lab standards.xlsx'''.}}<br />
<br />
Penggunaan nama yang berbeda akan membuat dokumen tersebut tidak bekerja.<br />
<br />
Ketika mengunduh lembar lajur standar laboratorium dari internet, kadangkala komputer anda secara otomatis akan mengganti nama dokumen yang diunduh menjadi nama lain seperti '''lab standards(2).xlsx'''. Jika ini terjadi, anda perlu menghapus salinan dokumen lama terlebih dahulu kemudian mengganti nama dokumen baru menjadi '''lab standards.xlsx''' dan menempatkannya pada direktori yang benar.<br />
<br />
{{hlbox|Anda dapat menyalin dan mengganti nama dokumen pola acu sesuai keinginan anda (tetapi tidak untuk dokumen standar laboratorium)}}<br />
<br />
Jika anda ingin menyimpan salinan dari setiap pengiriman yang pernah dilakukan, maka menamai masing-masing dokumen dengan menyertakan nomor ''epi'' dapat menjadi ide yang baik sehingga setiap dokumen dapat terlacak. Dokumen-dokumen tersebut dapat disimpan dalam direktori yang sama, selama dokumen '''lab standards.xlsx''' juga berada pada lokasi yang sama.<br />
<br />
==Pemasukkan data==<br />
Lakukan langkah berikut ini untuk memasukkan data ke dalam pola acu lembar lajur:<br />
# Buka lembar lajur '''lab standards.xlsx'''. <br />
# Buka pola acu lembar lajur.<br />
<br />
{{hlbox|Kedua lembar lajur harus dibuka pada waktu yang sama sehingga tautan diantara kedua dokumen tersebut dapat bekerja}}<br />
<br />
Masukkan data pada sel-sel yang sesuai dengan mengklik sel dan mengetikkan data yang diinginkan, atau mengklik tanda panah untuk memilih dari daftar yang muncul.<br />
<br />
====Pengendalian sel====<br />
Lembar lajur ini telah diatur sedemikian rupa untuk mencegah penambahan data pada tempat yang salah. Anda hanya dapat memilih sel-sel tertentu yang ditujukan untuk menyimpan data.<br />
<br />
=====Daftar pilihan=====<br />
[[image:dropdownlist.png]]<br />
<br />
Daftar pilihan berisi banyak sel. Hal ini dilakukan untuk memastikan agar data yang akan dikirim telah sesuai dengan standar data laboratorium nasional. Anda hanya dapat memilih salah satu nilai dari daftar pilihan.<br />
<br />
=====Nilai yang harus diisi=====<br />
[[image:requiredcell.png]]<br />
<br />
Apabila ada nilai kosong yang harus diisi, sel yang bersangkutan akan ditandai dengan garis tepi berwarna merah.<br />
<br />
===Petunjuk===<br />
[[image:hintmarker.png]]<br />
<br />
Banyak sel telah dilengkapi dengan petunjuk untuk memandu anda. Sel-sel ini ditandai dengan segitiga kecil di salah satu sudutnya.<br />
<br />
[[image:hint.png]]<br />
<br />
Untuk melihat petunjuk, gerakkan kursor tetikus anda di atas tanda segitiga kecil pada sudut sel untuk memunculkan teks yang dimaksud.<br />
<br />
==Temuan, hasil, diagnosis==<br />
Dalam iSIKHNAS, masing-masing istilah ini memiliki arti tersendiri.<br />
<br />
=====Temuan=====<br />
Ini merupakan hasil dari pengujian laboratorium. Temuan dapat berbentuk: <br />
* Kualitatif (misalnya terdeteksinya Coliform pada sampel); atau <br />
* kuantitatif (misalnya uji HI menunjukkan titer 1/40)<br />
Beberapa jenis pengujian dapat menghasilkan temuan kualitatif dan kuantitatif (misalnya sampel feses mengandung 300 telur ''Strongyloides'' per gram).<br />
<br />
=====Hasil=====<br />
Ini merupakan ''interpretasi'' dari temuan yang diperoleh. Biasanya hasil dapat berupa positif atau negatif. Sebagai contoh, temuan dari uji antibodi ELISA dapat berupa densitas optik sebesar 200. Jika kita menerapkan ambang batas 150, maka ini berarti interpretasi terhadap temuan tersebut akan menunjukkan hasil positif - hewan yang bersangkutan memiliki antibodi terhadap patogen tertentu. Hasil-hasil lain yang mungkin diperoleh antara lain ''protektif'' atau ''non-protektif'' ketika melakukan surveilans paska-vaksinasi; ''dalam batas aman'' atau ''di luar batas aman'' (uji keamanan pangan); kandungan ringan, medium atau berat (telur cacing).<br />
<br />
=====Diagnosis=====<br />
Ini merupakan kesimpulan yang diambil berdasarkan semua informasi yang tersedia mengenai penyakit apa yang menjadi masalah. Sebuah diagnosis hanya akan berarti jika terdapat suatu penyakit dan tujuan dari pengiriman data adalah untuk tujuan diagnostik. Beberapa poin kunci dalam hal ini antara lain:<br />
* Tidak ada diagnosis untuk surveilans, lalu lintas atau tujuan lainnya karena tidak adanya penyakit (yang diketahui).<br />
* AI negatif ''bukan'' merupakan sebuah diagnosis. Ini merupakan hasil (interpretasi informasi yang diperoleh dari pengujian) dan tidak dapat memberi tahu kita penyakit apa yang menjadi masalah.<br />
<br />
==Pedoman masing-masing kolom==<br />
====Pengajuan uji laboratorium====<br />
Informasi mengenai pengiriman data.<br />
<br />
=====Nomor Epi=====<br />
Harus diisi. Nomor pengiriman unik yang diberikan oleh laboratorium yang bersangkutan.<br />
<br />
Pengiriman sampel dari satu laboratorium ke laboratorium yang lain harus selalu menggunakan nomor epi semula (jangan membuat nomor baru di laboratorium referensi).<br />
<br />
=====Tujuan=====<br />
Harus diisi. Tujuan pengiriman spesimen.<br />
<br />
=====ID kejadian iSIKHNAS=====<br />
Harus diisi untuk beberapa alasan. Ini merupakan nomor referensi iSIKHNAS untuk mengaitkan data laboratorium dengan data lainnya dalam iSIKHNAS.<br />
<br />
Kolom ini perlu diisi dengan:<br />
* Kasus diagnostik: ID kasus iSIKHNAS<br />
* Ijin lalu lintas: ID SKKH iSIKHNAS <br />
* Surveilans: ID program surveilans iSIKHNAS <br />
* Pemantauan paska-vaksinasi: ID program vaksinasi iSIKHNAS<br />
<br />
Selama iSIKHNAS masih dalam proses penerapan, tidak semua kabupaten/kota telah dapat menggunakan penomoran tersebut sehingga akan ada pengiriman yang tidak dilengkapi dengan ID iSIKHNAS walaupun seharusnya disertakan. Dalam hal ini, kolom tersebut dapat dibiarkan kosong.<br />
<br />
====Pemilik dan pengirim====<br />
Informasi mengenai lokasi, pengirim, dan pemilik. Lokasi harus selalu merupakan tempat di mana hewan yang bersangkutan berada.<br />
<br />
=====Lokasi (PKKD)=====<br />
Harus diisi. Pilih lokasi dari keempat daftar pilihan yang ada.<br />
<br />
Apabila terdapat perubahan nama lokasi karena perubahan batas wilayah administratif, cobalah untuk mencari nama lokasi tersebut sebelumnya.<br />
<br />
Jika lokasi yang terperinci tidak diketahui, masukkan sebanyak mungkin informasi yang tersedia (paling sedikit kabupaten dan provinsi).<br />
<br />
=====Kode lokasi=====<br />
Kolom ini otomatis terisi berdasarkan informasi di atas. Anda tidak dapat menyunting bagian ini<br />
<br />
=====Jenis Pengirim=====<br />
Harus diisi. Pilih dari daftar pilihan yang tersedia.<br />
<br />
=====Nama Pengirim=====<br />
Opsional. Informasi ini dicantumkan pada laporan klien.<br />
<br />
=====Alamat Pengirim=====<br />
Opsional. Informasi ini dicantumkan pada laporan klien.<br />
<br />
=====Nomor HP Pengirim=====<br />
Opsional. Sertakan nomor seluler jika tersedia. Data ini digunakan untuk mengidentifikasi pengirim sehingga dapat mengaitkan semua pengiriman dari sumber yang sama untuk keperluan konsolidasi pelaporan.<br />
<br />
=====Nama Pemilik=====<br />
Opsional. Informasi ini dicantumkan pada laporan klien.<br />
<br />
=====Alamat Pemilik=====<br />
Opsional. Informasi ini dicantumkan pada laporan klien.<br />
<br />
=====Nomor HP Pemilik=====<br />
Opsional. Sertakan nomor seluler jika tersedia. Data ini dapat mengaitkan pengiriman yang berbeda-beda dari sumber yang sama.<br />
<br />
====Spesimen dan uji====<br />
Informasi mengenai spesimen dan pengujian yang diperlukan. Setiap spesimen dan kombinasi pengujian yang berbeda dicantumkan pada kolom yang berbeda pula.<br />
<br />
[[image:multitests.png]]<br />
<br />
Apabila terdapat lebih dari satu temuan kualitatif untuk suatu pengujian tertentu (lihat di bawah), temuan-temuan tersebut dicantumkan pada kolom baru dengan perincian lain dibiarkan kosong.<br />
<br />
=====Kelompok spesimen and Jenis spesimen=====<br />
Harus diisi. Gunakan kedua kolom ini untuk memilih jenis spesimen (jenisnya atau bagian tubuh hewan yang menjadi asalnya).<br />
<br />
=====Bentuk spesimen=====<br />
Harus diisi. Informasi ini mengindikasikan bagaimana spesimen ditangani, disiapkan atau diperlakukan. Ini dapat mencakup cara pengambilan (''swab''), persiapan (''smear'') atau pengawetan (formalin).<br />
<br />
=====Jenis Uji=====<br />
Harus diisi. Informasi ini menentukan bagian laboratorium yang akan melaksanakan pengujian. Pengujian yang dicantumkan dalam daftar pilihan berikutnya bergantung pada daftar pengujian yang dimiliki masing-masing laboratorium dan bagian-bagiannya (lihat di bawah).<br />
<br />
=====Uji=====<br />
Harus diisi. Pengujian yang dilakukan.<br />
<br />
=====Temuan kual.=====<br />
Temuan kualitatif dari pengujian. Jika suatu pengujian menghasilkan satu atau lebih temuan kualitatif (misalnya terdeteksinya spesies bakteri atau parasit, atau temuan histopatologis), masing-masing temuan dicantumkan pada kolom yang berbeda di baris 29. Dengan cara ini, suatu pengujian dapat memiliki lebih dari satu temuan yang dicantumkan pada kolom yang berbeda.<br />
<br />
[[image:qualfindings.png]]<br />
<br />
====Perincian hewan====<br />
Pada bagian akhir pola acu lembar lajur terdapat informasi mengenai masing-masing hewan. Setiap baris berisi satu ekor hewan dan masing-masing hewan harus memiliki data hasil untuk setiap pengujian.<br />
<br />
=====Jenis kelamin=====<br />
Opsional. Masukkan jenis kelamin masing-masing hewan, jika diketahui.<br />
<br />
=====Umur and Unit Umur=====<br />
Opsional. Masukkan umur masing-masing hewan jika diketahui. Bagian umur dibagi menjadi dua kolom. Kolom pertama (Umur) hanya berisi angka (bilangan bulat atau desimal). Kolom kedua berisi unit waktu (hari, minggu, bulan atau tahun) yang dapat dipilih dari daftar pilihan yang tersedia. Unit waktu yang berbeda tidak dapat digunakan bersama-sama; jika seekor hewan berumur 2 tahun dan 3 bulan, maka masukkan 2,25 tahun.<br />
<br />
Anda tidak dapat menggunakan simbol-simbol lain seperti > 3. Gunakan perkiraan terbaik anda jika umur pasti tidak diketahui.<br />
<br />
=====Spesies=====<br />
Harus diisi. Pilih dari daftar yang tersedia.<br />
<br />
=====Ras=====<br />
Opsional. Beberapa spesies memiliki jumlah ras yang berbeda-beda. Tambahkan informasi ini jika diketahui. Kadangkala terdapat pilihan yang berbeda - misalnya sapi dapat diidentifikasi sebagai sapi potong atau perah, atau diklasifikasi berdasarkan rasnya (limousin, friesian). Gunakan informasi paling terperinci yang tersedia.<br />
<br />
=====ID hewan=====<br />
Harus diisi. Apabila hewan individual telah ditandai secara unik (misalnya dengan penanda telinga), maka gunakanlah penanda tersebut. Jika informasi tersebut tidak tersedia, maka anda dapat memberikan nomor urut pada masing-masing hewan yang dimulai dengan angka 1. <br />
<br />
Apabila hewan-hewan berada dalam kelompok campuran, maka anda dapat menambahkan informasi lain pada kolom ini. Contohnya jika hewan-hewan tersebut berasal dari pemilik yang berbeda, maka anda dapat mengidentifikasi masing-masing hewan dengan menggunakan nama pemilik dan nomor urut hewan.<br />
<br />
=====Temuan kuant.=====<br />
Temuan kuantitatif. Informasi ini diperlukan untuk pengujian yang menghasilkan keluaran kuantitatif. Harus diisi dengan bilangan bulat atau angka desimal.<br />
<br />
Saat ini tengah direncanakan untuk memungkinkan penggunaan "simbol ketidakpastian" seperti > (lebih besar dari), < (lebih kecil dari), atau ~ (nilai perkiraan); namun fitur ini belum diterapkan.<br />
<br />
=====Hasil=====<br />
Harus diisi. Pilih dari daftar yang tersedia.<br />
<br />
==Pengiriman data==<br />
===Penyimpanan dan pengiriman data===<br />
# Setelah pemasukkan data selesai, simpan pola acu lembar lajur pada komputer anda. Mungkin anda juga ingin mengubah nama dokumennya dengan menambahkan nomor Epi sehingga memudahkan pencarian kembali. <br />
# Buat surat elektronik baru.<br />
# Tambahkan alamat tujuan '''labdata@isikhnas.com'''.<br />
# Cantumkan nomor Epi pada kolom subyek (langkah ini opsional tetapi dapat membantu anda menentukan data apa saja yang sudah dikirim dengan hanya melihat folder 'sent mail').<br />
# Lampirkan pola acu lembar lajur yang sudah anda simpan.<br />
# Kirim surat elektronik tersebut.<br />
<br />
Apabila anda memiliki perangkat lunak surat elektronik yang telah diinstalasi secara lokal pada komputer anda (misalnya Thunderbird atau Outlook), pengiriman surat elektronik dapat menjadi lebih mudah dan cepat:<br />
# Dalam perangkat lunak Excel, buka menu File kemudian pilih '''Save and send'''; klik tombol '''Send as attachment'''. Langkah ini secara otomatis membuat surat elektronik baru dengan dokumen yang telah dilampirkan. <br />
# Masukkan alamat '''labdata@isikhnas.com''' dan kirimkan.<br />
<br />
===Respon dari iSIKHNAS===<br />
Untuk setiap pengiriman data ke iSIKHNAS, terdapat pesan jawaban otomatis yang seharusnya diterima dalam satu atau dua menit setelah pengiriman. Isi dari pesan jawaban tersebut bergantung pada data yang dikirimkan:<br />
<br />
====Pengiriman berhasil - laporan klien====<br />
Apabila semua data yang dikirimkan sudah benar, maka secara otomatis akan dimasukkan ke dalam iSIKHNAS. <br />
<br />
Kemudian anda akan menerima surat elektronik yang mengkonfirmasikan bahwa data telah diterima dan disertai dengan ringkasan data yang dikirim.<br />
<br />
Anda juga akan menerima surat elektronik kedua berisi laporan klien yang dibuat secara otomatis. Dokumen ini memiliki format ODT yang dapat dibuka dan disunting dengan [https://www.libreoffice.org Libre Office Writer] (gratis) atau Microsoft Word.<br />
<br />
[[image:clientreport.png]]<br />
<br />
Setelah membuka dokumen, anda dapat menambah lebih banyak informasi serta menyimpan maupun mencetaknya.<br />
<br />
====Terdapat kesalahan pada data====<br />
Apabila terdapat kesalahan pada data yang dikirim, anda akan menerima surat elektronik berisi daftar kesalahan yang terdeteksi beserta referensi selnya. <br />
<br />
[[image:errorhighlight.png]]<br />
<br />
Surat elektronik ini juga dilampiri salinan lembar lajur yang dikirimkan semula. Pada lembar lajur ini, sel-sel yang mengandung kesalahan akan ditandai dengan warna kuning dan disertai dengan tampilan komentar yang menjelaskan kesalahan tersebut.<br />
<br />
Apabila ini memang kesalahan, anda dapat memperbaikinya pada lembar lajur semula dan mengirimkannya kembali dalam surat elektronik yang baru.<br />
<br />
====Kesalahan sistem====<br />
Apabila terjadi kesalahan pada sistem, anda dapat menerima surat elektronik yang memberitahukan adanya kesalahan tersebut dan menginstruksikan anda untuk melaporkannya kepada koordinator. <br />
<br />
Teruskan surat elektronik tersebut kepada koordinator iSIKHNAS anda atau salah satu ''champion'' iSIKHNAS yang dapat membantu memecahkan masalah tersebut.<br />
<br />
==Menentukan perincian pengujian di laboratorium anda==<br />
Daftar bagian-bagian laboratorium, dan pengujian yang dapat dilakukan oleh setiap bagian, perlu disesuaikan untuk masing-masing laboratorium.<br />
<br />
Untuk membuat daftar pengujian, ''log in'' ke situs web iSIKHNAS dan masuk ke Manage | Laboratory Tests.<br />
<br />
[[image:managelabtests.png]]<br />
<br />
# Pilih pengujian dari daftar yang tersedia. Semua pengujian ini merupakan standar nasional; apabila terdapat pengujian yang tidak tercantum, maka anda harus menghubungi ''champion'' iSIKHNAS untuk memperbarui standar yang digunakan.<br />
# Pilih bagian laboratorium yang melakukan pengujian.<br />
# Pilih laboratorium anda dari daftar yang tersedia.<br />
# Tandai kotak yang sesuai apabila pengujian menghasilkan keluaran kualitatif. Sebagai contoh, identifikasi bakteri atau parasit akan menghasilkan temuan kualitatif - nama-nama bakteri atau parasit, sedangkan ELISA AI tidak - karena hanya melakukan pengujian untuk mendeteksi AI. <br />
# Tandai kotak yang sesuai apabila pengujian menghasilkan keluaran kuantitatif. Sebagai contoh, uji ELISA menghasilkan densitas optik berupa suatu bilangan (kuantitatif); penghitungan telur cacing pada feses juga menghasilkan suatu angka. Sebaliknya, Rose Bengal Test hanya menunjukkan hasil positif atau negatif yang bukan merupakan temuan kuantitatif. <br />
# Apabila dihasilkan temuan kuantitatif, pilih unit yang sesuai pada daftar yang tersedia. <br />
# Tandai kotak yang sesuai apabila laboratorium anda telah mendapatkan akreditasi resmi untuk melakukan pengujian tersebut.<br />
# Masukkan referensi metode khusus yang digunakan dalam pengujian tersebut (untuk dicantumkan pada laporan klien).<br />
<br />
==Memperbarui standar data==<br />
Standar laboratorium nasional dikelola secara terpusat untuk memastikan konsistensi dan kemampuan untuk menganalisis data secara otomatis. iSIKHNAS berupaya menerapkan standar ini, sehingga tidak memungkinkan pengiriman data yang tidak mengikuti standar tersebut.<br />
<br />
Standar ini mencakup seluruh aspek data yang dikelola, termasuk:<br />
* Spesies<br />
* Pengujian<br />
* Temuan<br />
* Jenis kelamin dan umur hewan<br />
* Spesimen<br />
<br />
Semua standar ini tercantum dalam lembar lajur '''lab standards.xlsx''' dan dapat dipilih dari daftar pilihan yang tersedia pada pola acu pengiriman data. <br />
<br />
Apabila anda menemukan nilai yang tidak tercantum dalam daftar standar, maka nilai tersebut dapat ditambahkan. Untuk memastikan konsistensi, proses ini dikelola oleh ''champion'' iSIKHNAS. <br />
<br />
Silakan menghubungi ''champion'' iSIKHNAS untuk mengajukan penambahan nilai baru ke dalam standar yang digunakan.</div>Priyonohttps://wiki.isikhnas.com/index.php?title=Spreadsheet_data_submission_manual&diff=24009Spreadsheet data submission manual2015-02-04T01:56:22Z<p>Priyono: </p>
<hr />
<div><languages/><br />
<translate><br />
=Manual for spreadsheet data submission= <!--T:1--><br />
This manual provides guidance for the submission of laboratory data to iSIKHNAS using and Excel spreadsheet. <br />
<br />
==Introduction and overview== <!--T:2--><br />
The overall process is simple:<br />
* Open the spreadsheet template (and the linked data standards spreadsheet)<br />
* Enter the lab submission data <br />
* Send the spreadsheet by email to iSIKHNAS<br />
<br />
<!--T:3--><br />
iSIKHNAS automatically checks the data and, if it is valid, inserts it into the national database. An email is sent with confirmation that the data has been correctly submitted, as well as an automatically generated client report for printing in the lab.<br />
<br />
<!--T:4--><br />
To use the system, laboratory staff must:<br />
* register with iSIKHNAS (talk to your local coordinator)<br />
* have permissions set to be allowed to submit laboratory data (again, talk to your coordinator)<br />
* set up their computer<br />
** get a copy of the submission template<br />
** get a copy of the lab standards spreadsheet<br />
<br />
<!--T:5--><br />
As the system works with Excel and email, you naturally must have <br />
* a recent copy of Excel installed on your computer (one that can handle the newer '.xlsx' file formats), and<br />
* an email address and internet connection to send and receive emails. To send and receive emails you can use <br />
** a web-mail interface (like gmail) through a web browser (like Chrome, Internet Explorer or Firefox), or<br />
** an email client (like Microsoft Outlook or Thunderbird)<br />
<br />
==Setting up== <!--T:6--><br />
To be able to use the system you must have two spreadsheets:<br />
# the template<br />
# 'lab standards.xlsx' - which contains the Indonesian national laboratory data standards to ensure that all data is compatible and able to be analysed.<br />
<br />
<!--T:7--><br />
Both can be downloaded from the iSIKHNAS web site<br />
<br />
====Data submission template spreadsheet==== <!--T:8--><br />
[[image:labdatatemplate.png]]<br />
<br />
<!--T:9--><br />
This is used to enter the data, and is sent by email to iSIKHNAS.<br />
Click on the link below to download the latest version of the data submission spreadsheet:<br />
<br />
<!--T:10--><br />
[[media:iSIKHNAS submission spreadsheet v5.2.xlsx|Submission spreadsheet]]<br />
<br />
<!--T:11--><br />
The template may be updated from time to time. Your iSIKHNAS coordinator will either send you the updated spreadsheet by email, or let you know that a new version is available on this web site for download.<br />
<br />
===Laboratory standards spreadsheet=== <!--T:12--><br />
[[image:labstandards.png]]<br />
<br />
<!--T:13--><br />
The '''lab standards.xlsx''' file is automatically linked to the template, to ensure that all data submitted conforms to the national data standards. This is automatically customised for each different lab, and is generated by iSIKHNAS. Once it is generated and downloaded, you never need to edit it. If changes are required, they can be made on-line on the iSIKHNAS web site, and a new version downloaded. <br />
<br />
<!--T:14--><br />
The spreadsheet can be downloaded from the iSIKHNAS secure web site. Log in and go to:<br />
* Manage | Export Lab standards<br />
or click on the following link to go straight to the download page (you must already be logged in for this link to work)<br />
<br />
<!--T:15--><br />
https://www.isikhnas.com/en/exportlabstandards<br />
<br />
<!--T:16--><br />
[[image:exportstandards.png]]<br />
<br />
<!--T:17--><br />
# Select 'Custom lab references'<br />
# Select your lab from the drop down list<br />
# Either<br />
## Click on 'Export'<br />
### This will send a copy of the standards to your registered email address, or<br />
## Click on 'Export to lab contact'<br />
### This will send a copy to the lab contact person, as recorded in the iSIKHNAS list of laboratories (infrastructure table).<br />
<br />
===Important tips for spreadsheet management=== <!--T:18--><br />
<br />
<!--T:19--><br />
{{hlbox|Always save the template spreadsheet and the standards spreadsheet in the '''same directory'''}}<br />
<br />
<!--T:20--><br />
If they are in different directories, the automatic links will not work.<br />
<br />
<!--T:21--><br />
{{hlbox|The standards spreadsheet must always have the same name: '''lab standards.xlsx'''.}}<br />
<br />
<!--T:22--><br />
If the name is changed, it will not work.<br />
<br />
<!--T:23--><br />
When you download the standards spreadsheet from the web, sometimes your computer will automatically change the name to something like '''lab standards(2).xlsx'''. If this happens, you need to delete the old copy, and rename the file back to '''lab standards.xlsx''' as well as placing it in the correct directory.<br />
<br />
<!--T:24--><br />
{{hlbox|You can copy and rename the template file as many times as you like (but not the standards file)}}<br />
<br />
<!--T:25--><br />
You may want to keep a copy of every submission you send, so saving each file with the epi number is a good way to keep track of the files. They can all be in the same directory, as long as the '''lab standards.xlsx''' file is in the same directory.<br />
<br />
==Entering data== <!--T:26--><br />
To enter data into the template spreadsheet:<br />
# Open the '''lab standards.xlsx''' spreadsheet<br />
# Open the template spreadsheet<br />
<br />
<!--T:27--><br />
{{hlbox|Both spreadsheets must be open at the same time so that template can successfully link to the standards spreadsheet}}<br />
<br />
<!--T:28--><br />
Enter data into the required cells by clicking on the cell and typing, or clicking on the arrow to select from the drop-down list.<br />
<br />
====Controlled cells==== <!--T:29--><br />
The spreadsheet is protected to avoid entering data in the wrong places. You can only select cells intended for data entry<br />
<br />
=====Drop down lists===== <!--T:30--><br />
[[image:dropdownlist.png]]<br />
<br />
<!--T:31--><br />
There are many cells with drop down lists. These ensure that data follows the national laboratory data standards. You can only choose one of the values from the list<br />
<br />
=====Required values===== <!--T:32--><br />
[[image:requiredcell.png]]<br />
<br />
<!--T:33--><br />
When a value is required but missing, the cell is highlighted with a red border.<br />
<br />
===Hints=== <!--T:34--><br />
[[image:hintmarker.png]]<br />
<br />
<!--T:35--><br />
Many cells contain hints to guide you. These are marked with a small triangle in the corner of the cell.<br />
<br />
<!--T:36--><br />
[[image:hint.png]]<br />
<br />
<!--T:37--><br />
To view the hint, float your mouse over the triangle and the text will pop up.<br />
<br />
==Findings, results, diagnosis== <!--T:38--><br />
In iSIKHNAS each of these has a special meaning.<br />
<br />
=====Findings===== <!--T:39--><br />
This is what the lab test tells you. Findings can be <br />
* qualitative (for example, Coliforms were detected in a sample ) or <br />
* quantitative (an HI test gave a titre of 1/40)<br />
Some tests may give both qualitative and quantitative findings (for example a faecal sample contained 300 Strongyloides eggs per gram)<br />
<br />
=====Result===== <!--T:40--><br />
This is our ''interpretation'' of what the findings mean. Normally the result is either positive or negative. For example, the finding for an antibody ELISA may be an optical density of 200. If we use a cut-off of 150, this means that our interpretation of the finding is that the animal is positive - it has antibodies to the pathogen. Other possible results include ''protective'' or ''non-protective'' when doing post-vaccination surveillance; ''within acceptable limits'' or ''outside acceptable limits'' (food safety testing); light, medium or heavy load (worm eggs).<br />
<br />
=====Diagnosis===== <!--T:41--><br />
This is our conclusion, based on all the available information, as to what disease is causing the problem. A diagnosis is only meaningful when disease is present and the purpose of the submission is diagnostic. Some key points:<br />
* For surveillance, movement or other purposes, there is no diagnosis as there is no (known) disease<br />
* AI negative is ''not'' a diagnosis. It is a result (our interpretation of the information that the test gave). It does not tell us what disease is causing the problem.<br />
<br />
==Guidelines for specific fields== <!--T:42--><br />
====Pengajuan uji laboratorium====<br />
Information about the submission.<br />
<br />
=====Nomor Epi===== <!--T:43--><br />
Required. A unique submission number assigned by the laboratory.<br />
<br />
<!--T:44--><br />
When samples are sent from one laboratory to another, the original epi number should always be used (do not create a new one in the referral lab).<br />
<br />
=====Tujuan===== <!--T:45--><br />
Required. The reason for submission of the specimen.<br />
<br />
=====ID kejadian iSIKHNAS===== <!--T:46--><br />
Required for some reasons. This is the iSIKHNAS reference number, to link laboratory data to other data in iSIKHNAS.<br />
<br />
<!--T:47--><br />
This is should be used for:<br />
* Diagnostic cases: The iSIKHNAS case ID<br />
* Movement permits: The iSIKHNAS SKKH ID<br />
* Surveillance: The iSIKHNAS surveillance program ID<br />
* Post vaccination monitoring: The iSIKHNAS vaccination program ID<br />
<br />
<!--T:48--><br />
While iSIKHNAS is being rolled out, not all kabupaten will be using it, so some submissions will not have an iSIKHNAS ID even if they are meant to. In this case, leave the field empty<br />
<br />
====Pemilik dan pengirim==== <!--T:49--><br />
Information about the location, submitter and owner. The location should always be the location of the animal.<br />
<br />
=====Lokasi (PKKD)===== <!--T:50--><br />
Required. Select the location from the four drop down lists.<br />
<br />
<!--T:51--><br />
If there location name has changed because of changes in administrative boundaries, try to find the old name and use that.<br />
<br />
<!--T:52--><br />
If the detailed location is not known, enter as much information as is available (at least the province and kabupaten)<br />
<br />
=====Kode lokasi===== <!--T:53--><br />
This is automatically generated from the information supplied above. You cannot edit this.<br />
<br />
=====Jenis Pengirim===== <!--T:54--><br />
Required. Pick from the drop down list.<br />
<br />
=====Nama Pengirim===== <!--T:55--><br />
Optional. This is included on the client report<br />
<br />
=====Alamat Pengirim===== <!--T:56--><br />
Optional. This is included on the client report<br />
<br />
=====Nomor HP Pengirim===== <!--T:57--><br />
Optional. If available, enter the mobile phone number. This is used to identify the submitter so that it is possible to link all their submissions for consolidated reporting.<br />
<br />
=====Nama Pemilik===== <!--T:58--><br />
Optional. This is included on the client report<br />
<br />
=====Alamat Pemilik===== <!--T:59--><br />
Optional. This is included on the client report<br />
<br />
=====Nomor HP Pemilik===== <!--T:60--><br />
Optional. If available, enter the mobile number. This allows different submissions from the same owner to be linked.<br />
<br />
====Spesimen dan uji==== <!--T:61--><br />
Information about the specimen and test. Each separate specimen and test combination should be entered in a different column.<br />
<br />
<!--T:62--><br />
[[image:multitests.png]]<br />
<br />
<!--T:63--><br />
If there are multiple qualitative findings for a particular test (see below), these should be entered in new columns with the other details blank)<br />
<br />
=====Kelompok spesimen and Jenis specsimen===== <!--T:64--><br />
Required. Use these two fields to select the type of specimen (what it is or what part of the animal it came from)<br />
<br />
=====Bentuk spesimen===== <!--T:65--><br />
Required. This indicates how the specimen has been handled, prepared or treated. This may be the way it is collected (swab) prepared (smear) or preserved (formalin).<br />
<br />
=====Jenis Uji===== <!--T:66--><br />
Required. This specifies the lab section conducting the test. The tests listed in the next drop down depend on the custom list of tests for each laboratory and lab section (see below).<br />
<br />
=====Uji===== <!--T:67--><br />
Required. The test performed.<br />
<br />
=====Temuan kual.===== <!--T:68--><br />
The qualitative finding of a test. If a test produces one or more qualitative findings (e.g. bacterial or parasite species detected, or histopathological findings) each finding should be entered into a separate column on row 29. One test can therefore have multiple findings and use multiple columns.<br />
<br />
<!--T:69--><br />
[[image:qualfindings.png]]<br />
<br />
====Animal details==== <!--T:70--><br />
The bottom of the template contains information about each animal. There should be one animal per row. Each animal must have results for every test.<br />
<br />
=====Jenis kelamin===== <!--T:71--><br />
Optional.Enter the sex of each animal, if known<br />
<br />
=====Umur and Unit Umur===== <!--T:72--><br />
Optional. Enter the age of each animal, if known. The age is split into two columns. The first column (Umur) contains only numbers (whole numbers or decimals). The second column contains the units (days, weeks, months or years), selected from the drop down list. Only one unit can be used, so if an animal is 2 years and 3 months, enter the age as 2.25 years.<br />
<br />
<!--T:73--><br />
You cannot use other symbols such as > 3. Use your best estimate if the age is unknown.<br />
<br />
=====Spesies===== <!--T:74--><br />
Required. Pick from the list.<br />
<br />
=====Ras===== <!--T:75--><br />
Optional. Some species have a number of different breeds available. Add this if it is known. Sometimes there are different options - for exmaple, cattle (sapi) can be identified as beef (potong) or dairy (perah), or can be classified by their breed (limousin, friesian). Use the most detailed information known.<br />
<br />
=====ID hewan===== <!--T:76--><br />
Required. If the animals are individually uniquely identified (for example, with ear tags) then use these identifiers. If no information is available, you can simply give each animal a serial number starting at 1. <br />
<br />
<!--T:77--><br />
If the animals are in a mixed group, you can add other information in this field. For example, if they come from several owners, you could identify each animal with the owner name and the animal number.<br />
<br />
=====Temuan kuant.===== <!--T:78--><br />
Quantitative finding. This is required for tests that produce quantitative outputs. It must be a whole number or a decimal number.<br />
<br />
<!--T:79--><br />
There is a plan to allow ''uncertainty qualifiers'', such as > (greater than), < (less than), ~ approximately, however this feature has not yet been implemented.<br />
<br />
=====Hasil===== <!--T:80--><br />
Required. Pick from the drop down list.<br />
<br />
==Submitting data== <!--T:81--><br />
===Saving and sending the data===<br />
# Once data entry is complete, save the template spreadsheet to your local hard drive. You may want to change the name using the Epi Number to make finding the data again easier. <br />
# Create a new e-mail<br />
# The address should be '''labdata@isikhnas.com'''<br />
# Type the Epi number in the subject line (this is optional but will help you keep track of which data has been submitted and which hasn't, when you look at your 'sent mail' folder)<br />
# Attach the template spreadsheet that you just saved<br />
# Send the e-mail<br />
<br />
<!--T:82--><br />
If you have a local e-mail client installed on your computer (such as Thunderbird or Outlook), sending messages can be made faster and easier:<br />
# In Excel go to the File menu, select '''Save and send''', then click on the '''Send as attachment''' button. This automatically creates an email with the file attached. <br />
# Enter the address '''labdata@isikhnas.com''' and click send<br />
<br />
===Responses from iSIKHNAS=== <!--T:83--><br />
Whenever data is submitted to iSIKHNAS, there will be an automatic response which should arrive within a minute or two. The contents of the response depends on the data sent:<br />
<br />
====Successful submission - client report==== <!--T:84--><br />
If the data is all correct, then it will be automatically inserted into iSIKHNAS. <br />
<br />
<!--T:85--><br />
You will then receive an email confirming that the data has been accepted, with a summary of the data.<br />
<br />
<!--T:86--><br />
You will also receive a second email containing an automatically generated client report. This is in ODT format which can be opened and edited in [https://www.libreoffice.org Libre Office Writer] (free) or in Microsoft Word.<br />
<br />
<!--T:87--><br />
[[image:clientreport.png]]<br />
<br />
<!--T:88--><br />
Once the file has been opened, you can add any further details, save it, and print it.<br />
<br />
====Errors detected in the data==== <!--T:89--><br />
If there are any errors in the submitted data, you will receive an email listing the errors and cell references. <br />
<br />
<!--T:90--><br />
[[image:errorhighlight.png]]<br />
<br />
<!--T:91--><br />
The email will also have an attachment which is copy of the spreadsheet submitted. In this spreadsheet, the cells with errors are highlighted in yellow, with pop-up comments to explain the error.<br />
<br />
<!--T:92--><br />
If there were errors, fix these in your original spreadsheet and submit again in a new email.<br />
<br />
====System errors==== <!--T:93--><br />
If there is an error in the system, you may receive an email with a system error message, instructing you to contact your coordinator. <br />
<br />
<!--T:94--><br />
Forward the message to your iSIKHNAS coordinator or one of the iSIKHNAS champions who will help solve the problem.<br />
<br />
==Customising test details for your lab== <!--T:95--><br />
The list of laboratory sections, and tests performed by each of those sections, needs to be customised for each different laboratory.<br />
<br />
<!--T:96--><br />
To set up the list of tests, log in to the iSIKHNAS web site and go to Manage | Laboratory Tests.<br />
<br />
<!--T:97--><br />
[[image:managelabtests.png]]<br />
<br />
<!--T:98--><br />
# Choose the test from the drop down list. These are national standards so if there is a test that is not present, you must contact the iSIKHNAS champions to update the standards.<br />
# Choose the laboratory section that does the test<br />
# Choose your laboratory from the list<br />
# If the test has a qualitative finding, check the box. For example, bacterial or parasitic identification produce qualitative findings - the names of the bacteria or parasites, while an AI ELISA doesn't - it is always just testing for AI. <br />
# If the test produces a quantitative finding, check the box. For example, an ELISA produces an optical density which is a number (quantitative), a faecal egg count produces a number. However a Rose Bengal Test just has either positive or negative result, so no quantitative finding. <br />
# If a quantitative finding is produced, select the units from the list<br />
# If your lab is officially accredited to perform this test, check the box<br />
# Enter a reference to the specific method used in the test (to be printed on the client report)<br />
<br />
==Updating data standards== <!--T:99--><br />
The national laboratory standards are managed centrally to ensure consistency and the ability to analyse the data automatically. iSIKHNAS enforces these standards, so that it is not permissible to submit data that does not use the standards.<br />
<br />
<!--T:100--><br />
The standards cover all aspects of the data managed, including:<br />
* species<br />
* tests<br />
* findings<br />
* animal sex and ages<br />
* specimens<br />
<br />
<!--T:101--><br />
These standards are contained in the '''lab standards.xlsx''' spreadsheet and are available in the drop down lists on the submission template. <br />
<br />
<!--T:102--><br />
If you ever find that there is a value missing from the standard list, it is possible to have new values added. To ensure that there is consistency, this process is managed by the iSIKHNAS champions. <br />
<br />
<!--T:103--><br />
Please contact the iSIKHNAS champions to request a new value to be added to the standards.<br />
</translate></div>Priyonohttps://wiki.isikhnas.com/index.php?title=Spreadsheet_data_submission_manual&diff=24008Spreadsheet data submission manual2015-02-04T01:55:08Z<p>Priyono: </p>
<hr />
<div><languages/><br />
<translate><br />
=Manual for spreadsheet data submission= <!--T:1--><br />
This manual provides guidance for the submission of laboratory data to iSIKHNAS using and Excel spreadsheet. <br />
<br />
==Introduction and overview== <!--T:2--><br />
The overall process is simple:<br />
* Open the spreadsheet template (and the linked data standards spreadsheet)<br />
* Enter the lab submission data <br />
* Send the spreadsheet by email to iSIKHNAS<br />
<br />
<!--T:3--><br />
iSIKHNAS automatically checks the data and, if it is valid, inserts it into the national database. An email is sent with confirmation that the data has been correctly submitted, as well as an automatically generated client report for printing in the lab.<br />
<br />
<!--T:4--><br />
To use the system, laboratory staff must:<br />
* register with iSIKHNAS (talk to your local coordinator)<br />
* have permissions set to be allowed to submit laboratory data (again, talk to your coordinator)<br />
* set up their computer<br />
** get a copy of the submission template<br />
** get a copy of the lab standards spreadsheet<br />
<br />
<!--T:5--><br />
As the system works with Excel and email, you naturally must have <br />
* a recent copy of Excel installed on your computer (one that can handle the newer '.xlsx' file formats), and<br />
* an email address and internet connection to send and receive emails. To send and receive emails you can use <br />
** a web-mail interface (like gmail) through a web browser (like Chrome, Internet Explorer or Firefox), or<br />
** an email client (like Microsoft Outlook or Thunderbird)<br />
<br />
==Setting up== <!--T:6--><br />
To be able to use the system you must have two spreadsheets:<br />
# the template<br />
# 'lab standards.xlsx' - which contains the Indonesian national laboratory data standards to ensure that all data is compatible and able to be analysed.<br />
<br />
<!--T:7--><br />
Both can be downloaded from the iSIKHNAS web site<br />
<br />
====Data submission template spreadsheet==== <!--T:8--><br />
[[image:labdatatemplate.png]]<br />
<br />
<!--T:9--><br />
This is used to enter the data, and is sent by email to iSIKHNAS.<br />
Click on the link below to download the latest version of the data submission spreadsheet:<br />
<br />
<!--T:10--><br />
[[media:iSIKHNAS submission spreadsheet v5.3.xlsx|Submission spreadsheet]]<br />
<br />
<!--T:11--><br />
The template may be updated from time to time. Your iSIKHNAS coordinator will either send you the updated spreadsheet by email, or let you know that a new version is available on this web site for download.<br />
<br />
===Laboratory standards spreadsheet=== <!--T:12--><br />
[[image:labstandards.png]]<br />
<br />
<!--T:13--><br />
The '''lab standards.xlsx''' file is automatically linked to the template, to ensure that all data submitted conforms to the national data standards. This is automatically customised for each different lab, and is generated by iSIKHNAS. Once it is generated and downloaded, you never need to edit it. If changes are required, they can be made on-line on the iSIKHNAS web site, and a new version downloaded. <br />
<br />
<!--T:14--><br />
The spreadsheet can be downloaded from the iSIKHNAS secure web site. Log in and go to:<br />
* Manage | Export Lab standards<br />
or click on the following link to go straight to the download page (you must already be logged in for this link to work)<br />
<br />
<!--T:15--><br />
https://www.isikhnas.com/en/exportlabstandards<br />
<br />
<!--T:16--><br />
[[image:exportstandards.png]]<br />
<br />
<!--T:17--><br />
# Select 'Custom lab references'<br />
# Select your lab from the drop down list<br />
# Either<br />
## Click on 'Export'<br />
### This will send a copy of the standards to your registered email address, or<br />
## Click on 'Export to lab contact'<br />
### This will send a copy to the lab contact person, as recorded in the iSIKHNAS list of laboratories (infrastructure table).<br />
<br />
===Important tips for spreadsheet management=== <!--T:18--><br />
<br />
<!--T:19--><br />
{{hlbox|Always save the template spreadsheet and the standards spreadsheet in the '''same directory'''}}<br />
<br />
<!--T:20--><br />
If they are in different directories, the automatic links will not work.<br />
<br />
<!--T:21--><br />
{{hlbox|The standards spreadsheet must always have the same name: '''lab standards.xlsx'''.}}<br />
<br />
<!--T:22--><br />
If the name is changed, it will not work.<br />
<br />
<!--T:23--><br />
When you download the standards spreadsheet from the web, sometimes your computer will automatically change the name to something like '''lab standards(2).xlsx'''. If this happens, you need to delete the old copy, and rename the file back to '''lab standards.xlsx''' as well as placing it in the correct directory.<br />
<br />
<!--T:24--><br />
{{hlbox|You can copy and rename the template file as many times as you like (but not the standards file)}}<br />
<br />
<!--T:25--><br />
You may want to keep a copy of every submission you send, so saving each file with the epi number is a good way to keep track of the files. They can all be in the same directory, as long as the '''lab standards.xlsx''' file is in the same directory.<br />
<br />
==Entering data== <!--T:26--><br />
To enter data into the template spreadsheet:<br />
# Open the '''lab standards.xlsx''' spreadsheet<br />
# Open the template spreadsheet<br />
<br />
<!--T:27--><br />
{{hlbox|Both spreadsheets must be open at the same time so that template can successfully link to the standards spreadsheet}}<br />
<br />
<!--T:28--><br />
Enter data into the required cells by clicking on the cell and typing, or clicking on the arrow to select from the drop-down list.<br />
<br />
====Controlled cells==== <!--T:29--><br />
The spreadsheet is protected to avoid entering data in the wrong places. You can only select cells intended for data entry<br />
<br />
=====Drop down lists===== <!--T:30--><br />
[[image:dropdownlist.png]]<br />
<br />
<!--T:31--><br />
There are many cells with drop down lists. These ensure that data follows the national laboratory data standards. You can only choose one of the values from the list<br />
<br />
=====Required values===== <!--T:32--><br />
[[image:requiredcell.png]]<br />
<br />
<!--T:33--><br />
When a value is required but missing, the cell is highlighted with a red border.<br />
<br />
===Hints=== <!--T:34--><br />
[[image:hintmarker.png]]<br />
<br />
<!--T:35--><br />
Many cells contain hints to guide you. These are marked with a small triangle in the corner of the cell.<br />
<br />
<!--T:36--><br />
[[image:hint.png]]<br />
<br />
<!--T:37--><br />
To view the hint, float your mouse over the triangle and the text will pop up.<br />
<br />
==Findings, results, diagnosis== <!--T:38--><br />
In iSIKHNAS each of these has a special meaning.<br />
<br />
=====Findings===== <!--T:39--><br />
This is what the lab test tells you. Findings can be <br />
* qualitative (for example, Coliforms were detected in a sample ) or <br />
* quantitative (an HI test gave a titre of 1/40)<br />
Some tests may give both qualitative and quantitative findings (for example a faecal sample contained 300 Strongyloides eggs per gram)<br />
<br />
=====Result===== <!--T:40--><br />
This is our ''interpretation'' of what the findings mean. Normally the result is either positive or negative. For example, the finding for an antibody ELISA may be an optical density of 200. If we use a cut-off of 150, this means that our interpretation of the finding is that the animal is positive - it has antibodies to the pathogen. Other possible results include ''protective'' or ''non-protective'' when doing post-vaccination surveillance; ''within acceptable limits'' or ''outside acceptable limits'' (food safety testing); light, medium or heavy load (worm eggs).<br />
<br />
=====Diagnosis===== <!--T:41--><br />
This is our conclusion, based on all the available information, as to what disease is causing the problem. A diagnosis is only meaningful when disease is present and the purpose of the submission is diagnostic. Some key points:<br />
* For surveillance, movement or other purposes, there is no diagnosis as there is no (known) disease<br />
* AI negative is ''not'' a diagnosis. It is a result (our interpretation of the information that the test gave). It does not tell us what disease is causing the problem.<br />
<br />
==Guidelines for specific fields== <!--T:42--><br />
====Pengajuan uji laboratorium====<br />
Information about the submission.<br />
<br />
=====Nomor Epi===== <!--T:43--><br />
Required. A unique submission number assigned by the laboratory.<br />
<br />
<!--T:44--><br />
When samples are sent from one laboratory to another, the original epi number should always be used (do not create a new one in the referral lab).<br />
<br />
=====Tujuan===== <!--T:45--><br />
Required. The reason for submission of the specimen.<br />
<br />
=====ID kejadian iSIKHNAS===== <!--T:46--><br />
Required for some reasons. This is the iSIKHNAS reference number, to link laboratory data to other data in iSIKHNAS.<br />
<br />
<!--T:47--><br />
This is should be used for:<br />
* Diagnostic cases: The iSIKHNAS case ID<br />
* Movement permits: The iSIKHNAS SKKH ID<br />
* Surveillance: The iSIKHNAS surveillance program ID<br />
* Post vaccination monitoring: The iSIKHNAS vaccination program ID<br />
<br />
<!--T:48--><br />
While iSIKHNAS is being rolled out, not all kabupaten will be using it, so some submissions will not have an iSIKHNAS ID even if they are meant to. In this case, leave the field empty<br />
<br />
====Pemilik dan pengirim==== <!--T:49--><br />
Information about the location, submitter and owner. The location should always be the location of the animal.<br />
<br />
=====Lokasi (PKKD)===== <!--T:50--><br />
Required. Select the location from the four drop down lists.<br />
<br />
<!--T:51--><br />
If there location name has changed because of changes in administrative boundaries, try to find the old name and use that.<br />
<br />
<!--T:52--><br />
If the detailed location is not known, enter as much information as is available (at least the province and kabupaten)<br />
<br />
=====Kode lokasi===== <!--T:53--><br />
This is automatically generated from the information supplied above. You cannot edit this.<br />
<br />
=====Jenis Pengirim===== <!--T:54--><br />
Required. Pick from the drop down list.<br />
<br />
=====Nama Pengirim===== <!--T:55--><br />
Optional. This is included on the client report<br />
<br />
=====Alamat Pengirim===== <!--T:56--><br />
Optional. This is included on the client report<br />
<br />
=====Nomor HP Pengirim===== <!--T:57--><br />
Optional. If available, enter the mobile phone number. This is used to identify the submitter so that it is possible to link all their submissions for consolidated reporting.<br />
<br />
=====Nama Pemilik===== <!--T:58--><br />
Optional. This is included on the client report<br />
<br />
=====Alamat Pemilik===== <!--T:59--><br />
Optional. This is included on the client report<br />
<br />
=====Nomor HP Pemilik===== <!--T:60--><br />
Optional. If available, enter the mobile number. This allows different submissions from the same owner to be linked.<br />
<br />
====Spesimen dan uji==== <!--T:61--><br />
Information about the specimen and test. Each separate specimen and test combination should be entered in a different column.<br />
<br />
<!--T:62--><br />
[[image:multitests.png]]<br />
<br />
<!--T:63--><br />
If there are multiple qualitative findings for a particular test (see below), these should be entered in new columns with the other details blank)<br />
<br />
=====Kelompok spesimen and Jenis specsimen===== <!--T:64--><br />
Required. Use these two fields to select the type of specimen (what it is or what part of the animal it came from)<br />
<br />
=====Bentuk spesimen===== <!--T:65--><br />
Required. This indicates how the specimen has been handled, prepared or treated. This may be the way it is collected (swab) prepared (smear) or preserved (formalin).<br />
<br />
=====Jenis Uji===== <!--T:66--><br />
Required. This specifies the lab section conducting the test. The tests listed in the next drop down depend on the custom list of tests for each laboratory and lab section (see below).<br />
<br />
=====Uji===== <!--T:67--><br />
Required. The test performed.<br />
<br />
=====Temuan kual.===== <!--T:68--><br />
The qualitative finding of a test. If a test produces one or more qualitative findings (e.g. bacterial or parasite species detected, or histopathological findings) each finding should be entered into a separate column on row 29. One test can therefore have multiple findings and use multiple columns.<br />
<br />
<!--T:69--><br />
[[image:qualfindings.png]]<br />
<br />
====Animal details==== <!--T:70--><br />
The bottom of the template contains information about each animal. There should be one animal per row. Each animal must have results for every test.<br />
<br />
=====Jenis kelamin===== <!--T:71--><br />
Optional.Enter the sex of each animal, if known<br />
<br />
=====Umur and Unit Umur===== <!--T:72--><br />
Optional. Enter the age of each animal, if known. The age is split into two columns. The first column (Umur) contains only numbers (whole numbers or decimals). The second column contains the units (days, weeks, months or years), selected from the drop down list. Only one unit can be used, so if an animal is 2 years and 3 months, enter the age as 2.25 years.<br />
<br />
<!--T:73--><br />
You cannot use other symbols such as > 3. Use your best estimate if the age is unknown.<br />
<br />
=====Spesies===== <!--T:74--><br />
Required. Pick from the list.<br />
<br />
=====Ras===== <!--T:75--><br />
Optional. Some species have a number of different breeds available. Add this if it is known. Sometimes there are different options - for exmaple, cattle (sapi) can be identified as beef (potong) or dairy (perah), or can be classified by their breed (limousin, friesian). Use the most detailed information known.<br />
<br />
=====ID hewan===== <!--T:76--><br />
Required. If the animals are individually uniquely identified (for example, with ear tags) then use these identifiers. If no information is available, you can simply give each animal a serial number starting at 1. <br />
<br />
<!--T:77--><br />
If the animals are in a mixed group, you can add other information in this field. For example, if they come from several owners, you could identify each animal with the owner name and the animal number.<br />
<br />
=====Temuan kuant.===== <!--T:78--><br />
Quantitative finding. This is required for tests that produce quantitative outputs. It must be a whole number or a decimal number.<br />
<br />
<!--T:79--><br />
There is a plan to allow ''uncertainty qualifiers'', such as > (greater than), < (less than), ~ approximately, however this feature has not yet been implemented.<br />
<br />
=====Hasil===== <!--T:80--><br />
Required. Pick from the drop down list.<br />
<br />
==Submitting data== <!--T:81--><br />
===Saving and sending the data===<br />
# Once data entry is complete, save the template spreadsheet to your local hard drive. You may want to change the name using the Epi Number to make finding the data again easier. <br />
# Create a new e-mail<br />
# The address should be '''labdata@isikhnas.com'''<br />
# Type the Epi number in the subject line (this is optional but will help you keep track of which data has been submitted and which hasn't, when you look at your 'sent mail' folder)<br />
# Attach the template spreadsheet that you just saved<br />
# Send the e-mail<br />
<br />
<!--T:82--><br />
If you have a local e-mail client installed on your computer (such as Thunderbird or Outlook), sending messages can be made faster and easier:<br />
# In Excel go to the File menu, select '''Save and send''', then click on the '''Send as attachment''' button. This automatically creates an email with the file attached. <br />
# Enter the address '''labdata@isikhnas.com''' and click send<br />
<br />
===Responses from iSIKHNAS=== <!--T:83--><br />
Whenever data is submitted to iSIKHNAS, there will be an automatic response which should arrive within a minute or two. The contents of the response depends on the data sent:<br />
<br />
====Successful submission - client report==== <!--T:84--><br />
If the data is all correct, then it will be automatically inserted into iSIKHNAS. <br />
<br />
<!--T:85--><br />
You will then receive an email confirming that the data has been accepted, with a summary of the data.<br />
<br />
<!--T:86--><br />
You will also receive a second email containing an automatically generated client report. This is in ODT format which can be opened and edited in [https://www.libreoffice.org Libre Office Writer] (free) or in Microsoft Word.<br />
<br />
<!--T:87--><br />
[[image:clientreport.png]]<br />
<br />
<!--T:88--><br />
Once the file has been opened, you can add any further details, save it, and print it.<br />
<br />
====Errors detected in the data==== <!--T:89--><br />
If there are any errors in the submitted data, you will receive an email listing the errors and cell references. <br />
<br />
<!--T:90--><br />
[[image:errorhighlight.png]]<br />
<br />
<!--T:91--><br />
The email will also have an attachment which is copy of the spreadsheet submitted. In this spreadsheet, the cells with errors are highlighted in yellow, with pop-up comments to explain the error.<br />
<br />
<!--T:92--><br />
If there were errors, fix these in your original spreadsheet and submit again in a new email.<br />
<br />
====System errors==== <!--T:93--><br />
If there is an error in the system, you may receive an email with a system error message, instructing you to contact your coordinator. <br />
<br />
<!--T:94--><br />
Forward the message to your iSIKHNAS coordinator or one of the iSIKHNAS champions who will help solve the problem.<br />
<br />
==Customising test details for your lab== <!--T:95--><br />
The list of laboratory sections, and tests performed by each of those sections, needs to be customised for each different laboratory.<br />
<br />
<!--T:96--><br />
To set up the list of tests, log in to the iSIKHNAS web site and go to Manage | Laboratory Tests.<br />
<br />
<!--T:97--><br />
[[image:managelabtests.png]]<br />
<br />
<!--T:98--><br />
# Choose the test from the drop down list. These are national standards so if there is a test that is not present, you must contact the iSIKHNAS champions to update the standards.<br />
# Choose the laboratory section that does the test<br />
# Choose your laboratory from the list<br />
# If the test has a qualitative finding, check the box. For example, bacterial or parasitic identification produce qualitative findings - the names of the bacteria or parasites, while an AI ELISA doesn't - it is always just testing for AI. <br />
# If the test produces a quantitative finding, check the box. For example, an ELISA produces an optical density which is a number (quantitative), a faecal egg count produces a number. However a Rose Bengal Test just has either positive or negative result, so no quantitative finding. <br />
# If a quantitative finding is produced, select the units from the list<br />
# If your lab is officially accredited to perform this test, check the box<br />
# Enter a reference to the specific method used in the test (to be printed on the client report)<br />
<br />
==Updating data standards== <!--T:99--><br />
The national laboratory standards are managed centrally to ensure consistency and the ability to analyse the data automatically. iSIKHNAS enforces these standards, so that it is not permissible to submit data that does not use the standards.<br />
<br />
<!--T:100--><br />
The standards cover all aspects of the data managed, including:<br />
* species<br />
* tests<br />
* findings<br />
* animal sex and ages<br />
* specimens<br />
<br />
<!--T:101--><br />
These standards are contained in the '''lab standards.xlsx''' spreadsheet and are available in the drop down lists on the submission template. <br />
<br />
<!--T:102--><br />
If you ever find that there is a value missing from the standard list, it is possible to have new values added. To ensure that there is consistency, this process is managed by the iSIKHNAS champions. <br />
<br />
<!--T:103--><br />
Please contact the iSIKHNAS champions to request a new value to be added to the standards.<br />
</translate></div>Priyonohttps://wiki.isikhnas.com/index.php?title=Spreadsheet_data_submission_manual&diff=23997Spreadsheet data submission manual2015-02-03T09:03:15Z<p>Priyono: </p>
<hr />
<div><languages/><br />
<translate><br />
=Manual for spreadsheet data submission= <!--T:1--><br />
This manual provides guidance for the submission of laboratory data to iSIKHNAS using and Excel spreadsheet. <br />
<br />
==Introduction and overview== <!--T:2--><br />
The overall process is simple:<br />
* Open the spreadsheet template (and the linked data standards spreadsheet)<br />
* Enter the lab submission data <br />
* Send the spreadsheet by email to iSIKHNAS<br />
<br />
<!--T:3--><br />
iSIKHNAS automatically checks the data and, if it is valid, inserts it into the national database. An email is sent with confirmation that the data has been correctly submitted, as well as an automatically generated client report for printing in the lab.<br />
<br />
<!--T:4--><br />
To use the system, laboratory staff must:<br />
* register with iSIKHNAS (talk to your local coordinator)<br />
* have permissions set to be allowed to submit laboratory data (again, talk to your coordinator)<br />
* set up their computer<br />
** get a copy of the submission template<br />
** get a copy of the lab standards spreadsheet<br />
<br />
<!--T:5--><br />
As the system works with Excel and email, you naturally must have <br />
* a recent copy of Excel installed on your computer (one that can handle the newer '.xlsx' file formats), and<br />
* an email address and internet connection to send and receive emails. To send and receive emails you can use <br />
** a web-mail interface (like gmail) through a web browser (like Chrome, Internet Explorer or Firefox), or<br />
** an email client (like Microsoft Outlook or Thunderbird)<br />
<br />
==Setting up== <!--T:6--><br />
To be able to use the system you must have two spreadsheets:<br />
# the template<br />
# 'lab standards.xlsx' - which contains the Indonesian national laboratory data standards to ensure that all data is compatible and able to be analysed.<br />
<br />
<!--T:7--><br />
Both can be downloaded from the iSIKHNAS web site<br />
<br />
====Data submission template spreadsheet==== <!--T:8--><br />
[[image:labdatatemplate.png]]<br />
<br />
<!--T:9--><br />
This is used to enter the data, and is sent by email to iSIKHNAS.<br />
Click on the link below to download the latest version of the data submission spreadsheet:<br />
<br />
<!--T:10--><br />
[[media:iSIKHNAS submission spreadsheet v5.2.xlsx|Submission spreadsheet]]<br />
<br />
<!--T:11--><br />
The template may be updated from time to time. Your iSIKHNAS coordinator will either send you the updated spreadsheet by email, or let you know that a new version is available on this web site for download.<br />
<br />
===Laboratory standards spreadsheet=== <!--T:12--><br />
[[image:labstandards.png]]<br />
<br />
<!--T:13--><br />
The '''lab standards.xlsx''' file is automatically linked to the template, to ensure that all data submitted conforms to the national data standards. This is automatically customised for each different lab, and is generated by iSIKHNAS. Once it is generated and downloaded, you never need to edit it. If changes are required, they can be made on-line on the iSIKHNAS web site, and a new version downloaded. <br />
<br />
<!--T:14--><br />
The spreadsheet can be downloaded from the iSIKHNAS secure web site. Log in and go to:<br />
* Manage | Export Lab standards<br />
or click on the following link to go straight to the download page (you must already be logged in for this link to work)<br />
<br />
<!--T:15--><br />
https://www.isikhnas.com/en/exportlabstandards<br />
<br />
<!--T:16--><br />
[[image:exportstandards.png]]<br />
<br />
<!--T:17--><br />
# Select 'Custom lab references'<br />
# Select your lab from the drop down list<br />
# Either<br />
## Click on 'Export'<br />
### This will send a copy of the standards to your registered email address, or<br />
## Click on 'Export to lab contact'<br />
### This will send a copy to the lab contact person, as recorded in the iSIKHNAS list of laboratories (infrastructure table).<br />
<br />
===Important tips for spreadsheet management=== <!--T:18--><br />
<br />
<!--T:19--><br />
{{hlbox|Always save the template spreadsheet and the standards spreadsheet in the '''same directory'''}}<br />
<br />
<!--T:20--><br />
If they are in different directories, the automatic links will not work.<br />
<br />
<!--T:21--><br />
{{hlbox|The standards spreadsheet must always have the same name: '''lab standards.xlsx'''.}}<br />
<br />
<!--T:22--><br />
If the name is changed, it will not work.<br />
<br />
<!--T:23--><br />
When you download the standards spreadsheet from the web, sometimes your computer will automatically change the name to something like '''lab standards(2).xlsx'''. If this happens, you need to delete the old copy, and rename the file back to '''lab standards.xlsx''' as well as placing it in the correct directory.<br />
<br />
<!--T:24--><br />
{{hlbox|You can copy and rename the template file as many times as you like (but not the standards file)}}<br />
<br />
<!--T:25--><br />
You may want to keep a copy of every submission you send, so saving each file with the epi number is a good way to keep track of the files. They can all be in the same directory, as long as the '''lab standards.xlsx''' file is in the same directory.<br />
<br />
==Entering data== <!--T:26--><br />
To enter data into the template spreadsheet:<br />
# Open the '''lab standards.xlsx''' spreadsheet<br />
# Open the template spreadsheet<br />
<br />
<!--T:27--><br />
{{hlbox|Both spreadsheets must be open at the same time so that template can successfully link to the standards spreadsheet}}<br />
<br />
<!--T:28--><br />
Enter data into the required cells by clicking on the cell and typing, or clicking on the arrow to select from the drop-down list.<br />
<br />
====Controlled cells==== <!--T:29--><br />
The spreadsheet is protected to avoid entering data in the wrong places. You can only select cells intended for data entry<br />
<br />
=====Drop down lists===== <!--T:30--><br />
[[image:dropdownlist.png]]<br />
<br />
<!--T:31--><br />
There are many cells with drop down lists. These ensure that data follows the national laboratory data standards. You can only choose one of the values from the list<br />
<br />
=====Required values===== <!--T:32--><br />
[[image:requiredcell.png]]<br />
<br />
<!--T:33--><br />
When a value is required but missing, the cell is highlighted with a red border.<br />
<br />
===Hints=== <!--T:34--><br />
[[image:hintmarker.png]]<br />
<br />
<!--T:35--><br />
Many cells contain hints to guide you. These are marked with a small triangle in the corner of the cell.<br />
<br />
<!--T:36--><br />
[[image:hint.png]]<br />
<br />
<!--T:37--><br />
To view the hint, float your mouse over the triangle and the text will pop up.<br />
<br />
==Findings, results, diagnosis== <!--T:38--><br />
In iSIKHNAS each of these has a special meaning.<br />
<br />
=====Findings===== <!--T:39--><br />
This is what the lab test tells you. Findings can be <br />
* qualitative (for example, Coliforms were detected in a sample ) or <br />
* quantitative (an HI test gave a titre of 1/40)<br />
Some tests may give both qualitative and quantitative findings (for example a faecal sample contained 300 Strongyloides eggs per gram)<br />
<br />
=====Result===== <!--T:40--><br />
This is our ''interpretation'' of what the findings mean. Normally the result is either positive or negative. For example, the finding for an antibody ELISA may be an optical density of 200. If we use a cut-off of 150, this means that our interpretation of the finding is that the animal is positive - it has antibodies to the pathogen. Other possible results include ''protective'' or ''non-protective'' when doing post-vaccination surveillance; ''within acceptable limits'' or ''outside acceptable limits'' (food safety testing); light, medium or heavy load (worm eggs).<br />
<br />
=====Diagnosis===== <!--T:41--><br />
This is our conclusion, based on all the available information, as to what disease is causing the problem. A diagnosis is only meaningful when disease is present and the purpose of the submission is diagnostic. Some key points:<br />
* For surveillance, movement or other purposes, there is no diagnosis as there is no (known) disease<br />
* AI negative is ''not'' a diagnosis. It is a result (our interpretation of the information that the test gave). It does not tell us what disease is causing the problem.<br />
<br />
==Guidelines for specific fields== <!--T:42--><br />
====Pengajuan uji laboratorium====<br />
Information about the submission.<br />
<br />
=====Nomor Epi===== <!--T:43--><br />
Required. A unique submission number assigned by the laboratory.<br />
<br />
<!--T:44--><br />
When samples are sent from one laboratory to another, the original epi number should always be used (do not create a new one in the referral lab).<br />
<br />
=====Tujuan===== <!--T:45--><br />
Required. The reason for submission of the specimen.<br />
<br />
=====ID kejadian iSIKHNAS===== <!--T:46--><br />
Required for some reasons. This is the iSIKHNAS reference number, to link laboratory data to other data in iSIKHNAS.<br />
<br />
<!--T:47--><br />
This is should be used for:<br />
* Diagnostic cases: The iSIKHNAS case ID<br />
* Movement permits: The iSIKHNAS SKKH ID<br />
* Surveillance: The iSIKHNAS surveillance program ID<br />
* Post vaccination monitoring: The iSIKHNAS vaccination program ID<br />
<br />
<!--T:48--><br />
While iSIKHNAS is being rolled out, not all kabupaten will be using it, so some submissions will not have an iSIKHNAS ID even if they are meant to. In this case, leave the field empty<br />
<br />
====Pemilik dan pengirim==== <!--T:49--><br />
Information about the location, submitter and owner. The location should always be the location of the animal.<br />
<br />
=====Lokasi (PKKD)===== <!--T:50--><br />
Required. Select the location from the four drop down lists.<br />
<br />
<!--T:51--><br />
If there location name has changed because of changes in administrative boundaries, try to find the old name and use that.<br />
<br />
<!--T:52--><br />
If the detailed location is not known, enter as much information as is available (at least the province and kabupaten)<br />
<br />
=====Kode lokasi===== <!--T:53--><br />
This is automatically generated from the information supplied above. You cannot edit this.<br />
<br />
=====Jenis Pengirim===== <!--T:54--><br />
Required. Pick from the drop down list.<br />
<br />
=====Nama Pengirim===== <!--T:55--><br />
Optional. This is included on the client report<br />
<br />
=====Alamat Pengirim===== <!--T:56--><br />
Optional. This is included on the client report<br />
<br />
=====Nomor HP Pengirim===== <!--T:57--><br />
Optional. If available, enter the mobile phone number. This is used to identify the submitter so that it is possible to link all their submissions for consolidated reporting.<br />
<br />
=====Nama Pemilik===== <!--T:58--><br />
Optional. This is included on the client report<br />
<br />
=====Alamat Pemilik===== <!--T:59--><br />
Optional. This is included on the client report<br />
<br />
=====Nomor HP Pemilik===== <!--T:60--><br />
Optional. If available, enter the mobile number. This allows different submissions from the same owner to be linked.<br />
<br />
====Spesimen dan uji==== <!--T:61--><br />
Information about the specimen and test. Each separate specimen and test combination should be entered in a different column.<br />
<br />
<!--T:62--><br />
[[image:multitests.png]]<br />
<br />
<!--T:63--><br />
If there are multiple qualitative findings for a particular test (see below), these should be entered in new columns with the other details blank)<br />
<br />
=====Kelompok spesimen and Jenis specsimen===== <!--T:64--><br />
Required. Use these two fields to select the type of specimen (what it is or what part of the animal it came from)<br />
<br />
=====Bentuk spesimen===== <!--T:65--><br />
Required. This indicates how the specimen has been handled, prepared or treated. This may be the way it is collected (swab) prepared (smear) or preserved (formalin).<br />
<br />
=====Jenis Uji===== <!--T:66--><br />
Required. This specifies the lab section conducting the test. The tests listed in the next drop down depend on the custom list of tests for each laboratory and lab section (see below).<br />
<br />
=====Uji===== <!--T:67--><br />
Required. The test performed.<br />
<br />
=====Temuan kual.===== <!--T:68--><br />
The qualitative finding of a test. If a test produces one or more qualitative findings (e.g. bacterial or parasite species detected, or histopathological findings) each finding should be entered into a separate column on row 29. One test can therefore have multiple findings and use multiple columns.<br />
<br />
<!--T:69--><br />
[[image:qualfindings.png]]<br />
<br />
====Animal details==== <!--T:70--><br />
The bottom of the template contains information about each animal. There should be one animal per row. Each animal must have results for every test.<br />
<br />
=====Jenis kelamin===== <!--T:71--><br />
Optional.Enter the sex of each animal, if known<br />
<br />
=====Umur and Unit Umur===== <!--T:72--><br />
Optional. Enter the age of each animal, if known. The age is split into two columns. The first column (Umur) contains only numbers (whole numbers or decimals). The second column contains the units (days, weeks, months or years), selected from the drop down list. Only one unit can be used, so if an animal is 2 years and 3 months, enter the age as 2.25 years.<br />
<br />
<!--T:73--><br />
You cannot use other symbols such as > 3. Use your best estimate if the age is unknown.<br />
<br />
=====Spesies===== <!--T:74--><br />
Required. Pick from the list.<br />
<br />
=====Ras===== <!--T:75--><br />
Optional. Some species have a number of different breeds available. Add this if it is known. Sometimes there are different options - for exmaple, cattle (sapi) can be identified as beef (potong) or dairy (perah), or can be classified by their breed (limousin, friesian). Use the most detailed information known.<br />
<br />
=====ID hewan===== <!--T:76--><br />
Required. If the animals are individually uniquely identified (for example, with ear tags) then use these identifiers. If no information is available, you can simply give each animal a serial number starting at 1. <br />
<br />
<!--T:77--><br />
If the animals are in a mixed group, you can add other information in this field. For example, if they come from several owners, you could identify each animal with the owner name and the animal number.<br />
<br />
=====Temuan kuant.===== <!--T:78--><br />
Quantitative finding. This is required for tests that produce quantitative outputs. It must be a whole number or a decimal number.<br />
<br />
<!--T:79--><br />
There is a plan to allow ''uncertainty qualifiers'', such as > (greater than), < (less than), ~ approximately, however this feature has not yet been implemented.<br />
<br />
=====Hasil===== <!--T:80--><br />
Required. Pick from the drop down list.<br />
<br />
==Submitting data== <!--T:81--><br />
===Saving and sending the data===<br />
# Once data entry is complete, save the template spreadsheet to your local hard drive. You may want to change the name using the Epi Number to make finding the data again easier. <br />
# Create a new e-mail<br />
# The address should be '''labdata@isikhnas.com'''<br />
# Type the Epi number in the subject line (this is optional but will help you keep track of which data has been submitted and which hasn't, when you look at your 'sent mail' folder)<br />
# Attach the template spreadsheet that you just saved<br />
# Send the e-mail<br />
<br />
<!--T:82--><br />
If you have a local e-mail client installed on your computer (such as Thunderbird or Outlook), sending messages can be made faster and easier:<br />
# In Excel go to the File menu, select '''Save and send''', then click on the '''Send as attachment''' button. This automatically creates an email with the file attached. <br />
# Enter the address '''labdata@isikhnas.com''' and click send<br />
<br />
===Responses from iSIKHNAS=== <!--T:83--><br />
Whenever data is submitted to iSIKHNAS, there will be an automatic response which should arrive within a minute or two. The contents of the response depends on the data sent:<br />
<br />
====Successful submission - client report==== <!--T:84--><br />
If the data is all correct, then it will be automatically inserted into iSIKHNAS. <br />
<br />
<!--T:85--><br />
You will then receive an email confirming that the data has been accepted, with a summary of the data.<br />
<br />
<!--T:86--><br />
You will also receive a second email containing an automatically generated client report. This is in ODT format which can be opened and edited in [https://www.libreoffice.org Libre Office Writer] (free) or in Microsoft Word.<br />
<br />
<!--T:87--><br />
[[image:clientreport.png]]<br />
<br />
<!--T:88--><br />
Once the file has been opened, you can add any further details, save it, and print it.<br />
<br />
====Errors detected in the data==== <!--T:89--><br />
If there are any errors in the submitted data, you will receive an email listing the errors and cell references. <br />
<br />
<!--T:90--><br />
[[image:errorhighlight.png]]<br />
<br />
<!--T:91--><br />
The email will also have an attachment which is copy of the spreadsheet submitted. In this spreadsheet, the cells with errors are highlighted in yellow, with pop-up comments to explain the error.<br />
<br />
<!--T:92--><br />
If there were errors, fix these in your original spreadsheet and submit again in a new email.<br />
<br />
====System errors==== <!--T:93--><br />
If there is an error in the system, you may receive an email with a system error message, instructing you to contact your coordinator. <br />
<br />
<!--T:94--><br />
Forward the message to your iSIKHNAS coordinator or one of the iSIKHNAS champions who will help solve the problem.<br />
<br />
==Customising test details for your lab== <!--T:95--><br />
The list of laboratory sections, and tests performed by each of those sections, needs to be customised for each different laboratory.<br />
<br />
<!--T:96--><br />
To set up the list of tests, log in to the iSIKHNAS web site and go to Manage | Laboratory Tests.<br />
<br />
<!--T:97--><br />
[[image:managelabtests.png]]<br />
<br />
<!--T:98--><br />
# Choose the test from the drop down list. These are national standards so if there is a test that is not present, you must contact the iSIKHNAS champions to update the standards.<br />
# Choose the laboratory section that does the test<br />
# Choose your laboratory from the list<br />
# If the test has a qualitative finding, check the box. For example, bacterial or parasitic identification produce qualitative findings - the names of the bacteria or parasites, while an AI ELISA doesn't - it is always just testing for AI. <br />
# If the test produces a quantitative finding, check the box. For example, an ELISA produces an optical density which is a number (quantitative), a faecal egg count produces a number. However a Rose Bengal Test just has either positive or negative result, so no quantitative finding. <br />
# If a quantitative finding is produced, select the units from the list<br />
# If your lab is officially accredited to perform this test, check the box<br />
# Enter a reference to the specific method used in the test (to be printed on the client report)<br />
<br />
==Updating data standards== <!--T:99--><br />
The national laboratory standards are managed centrally to ensure consistency and the ability to analyse the data automatically. iSIKHNAS enforces these standards, so that it is not permissible to submit data that does not use the standards.<br />
<br />
<!--T:100--><br />
The standards cover all aspects of the data managed, including:<br />
* species<br />
* tests<br />
* findings<br />
* animal sex and ages<br />
* specimens<br />
<br />
<!--T:101--><br />
These standards are contained in the '''lab standards.xlsx''' spreadsheet and are available in the drop down lists on the submission template. <br />
<br />
<!--T:102--><br />
If you ever find that there is a value missing from the standard list, it is possible to have new values added. To ensure that there is consistency, this process is managed by the iSIKHNAS champions. <br />
<br />
<!--T:103--><br />
Please contact the iSIKHNAS champions to request a new value to be added to the standards.<br />
</translate></div>Priyonohttps://wiki.isikhnas.com/index.php?title=Translations:Operational_instructions:DX/4/id&diff=23647Translations:Operational instructions:DX/4/id2015-01-30T08:38:56Z<p>Priyono: </p>
<hr />
<div>===Pengguna===<br />
<br />
*Veterinar</div>Priyonohttps://wiki.isikhnas.com/index.php?title=Operational_instructions:DX/id&diff=23648Operational instructions:DX/id2015-01-30T08:38:56Z<p>Priyono: </p>
<hr />
<div><languages/><br />
<br />
==DX : Diagnosa Definitif ==<br />
<br />
=== Format ===<br />
<br />
{{#apGetSMSFormat:dx|1}} <br />
<br />
===Pengguna===<br />
<br />
*Veterinar<br />
<br />
===Tujuan===<br />
<br />
=== Kapan digunakan ===<br />
<br />
=== Proses Pelaporan ===<br />
<br />
===Kode yang diperlukan===<br />
<br />
===Respon===<br />
<br />
===Aksi tindak lanjut===<br />
<br />
===Contoh===</div>Priyonohttps://wiki.isikhnas.com/index.php?title=Translations:Operational_instructions:DX/4/id&diff=23645Translations:Operational instructions:DX/4/id2015-01-30T08:38:24Z<p>Priyono: </p>
<hr />
<div>===Pengguna===<br />
<br />
* Petugas Dinas<br />
**Paravet<br />
**Veterinar</div>Priyonohttps://wiki.isikhnas.com/index.php?title=Operational_instructions:DX/id&diff=23646Operational instructions:DX/id2015-01-30T08:38:24Z<p>Priyono: </p>
<hr />
<div><languages/><br />
<br />
==DX : Diagnosa Definitif ==<br />
<br />
=== Format ===<br />
<br />
{{#apGetSMSFormat:dx|1}} <br />
<br />
===Pengguna===<br />
<br />
* Petugas Dinas<br />
**Paravet<br />
**Veterinar<br />
<br />
===Tujuan===<br />
<br />
=== Kapan digunakan ===<br />
<br />
=== Proses Pelaporan ===<br />
<br />
===Kode yang diperlukan===<br />
<br />
===Respon===<br />
<br />
===Aksi tindak lanjut===<br />
<br />
===Contoh===</div>Priyonohttps://wiki.isikhnas.com/index.php?title=Operational_instructions:DX&diff=23640Operational instructions:DX2015-01-30T08:28:43Z<p>Priyono: </p>
<hr />
<div><languages/><br />
<translate><br />
<br />
==DX : Diagnosa Definitif : Definitive Diagnosis == <!--T:1--><br />
<br />
=== Format === <!--T:2--><br />
<br />
<!--T:3--><br />
{{#apGetSMSFormat:dx|1}} <br />
<br />
=== Used by === <!--T:4--><br />
Farmer<br />
<br />
=== Purpose === <!--T:5--><br />
<br />
=== When to use === <!--T:6--><br />
<br />
=== Reporting process === <!--T:7--><br />
<br />
=== Codes required with this message === <!--T:8--><br />
<br />
=== Response === <!--T:9--><br />
<br />
=== Follow-up actions === <!--T:10--><br />
<br />
=== Examples === <!--T:11--><br />
</translate></div>Priyonohttps://wiki.isikhnas.com/index.php?title=Operational_instructions:DX&diff=23639Operational instructions:DX2015-01-30T08:28:07Z<p>Priyono: </p>
<hr />
<div><languages/><br />
<translate><br />
<br />
==DX : Diagnosa Definitif : Definitive Diagnosis == <!--T:1--><br />
<br />
=== Format === <!--T:2--><br />
<br />
<!--T:3--><br />
{{#apGetSMSFormat:dx|1}} <br />
<br />
=== Used by === <!--T:4--><br />
Veterinarian Farmer<br />
<br />
=== Purpose === <!--T:5--><br />
<br />
=== When to use === <!--T:6--><br />
<br />
=== Reporting process === <!--T:7--><br />
<br />
=== Codes required with this message === <!--T:8--><br />
<br />
=== Response === <!--T:9--><br />
<br />
=== Follow-up actions === <!--T:10--><br />
<br />
=== Examples === <!--T:11--><br />
</translate></div>Priyonohttps://wiki.isikhnas.com/index.php?title=File:Crus.jpg&diff=23105File:Crus.jpg2015-01-20T06:25:56Z<p>Priyono: </p>
<hr />
<div></div>Priyonohttps://wiki.isikhnas.com/index.php?title=Talk:Test_page&diff=23024Talk:Test page2015-01-20T04:11:20Z<p>Priyono: </p>
<hr />
<div>ja;lkjf;af<br />
akjsdhf;alkdsjfasd<br />
kjasd;fljds;flkajsdf<br />
df;lksajd'fdsa<br />
<br />
<br />
Oke</div>Priyono