AUDIT IT

TUGAS

AUDIT IT

Audit Program Generator (APG)

Disusun oleh:

(161011700020) Aditya Ariediantio

(161011700410) Alamsyah Saputra

(161011700390) Muhammad Najwah

(161011700399) Siska Puspita Ayu

(161011700017) Wilda Ayu Trihandayani

PROGRAM STUDI SISTEM INFORMASI

STMIK ERESHA

2019

APG (Audit Program Generator)

Waktu, biaya, tenaga, tanggal penyelesaian, adalah semua elemen yang harus diperhitungkan ketika sebuah tim audit membuat perencanaan audit. Langkah pertama dalam perencanaan audit tersebut akan dipersiapkan dalam sebuah daftar perencanaan audit.

APG memungkinkan tim audit mempersiapkan daftar perencanaan audit mereka. APG memungkinkan tim audit untuk menambah, menghapus atau melakukan modifikasi item-item individual dalam daftar perencanaan audit untuk menyesuaikan antara pekerjaan auditor dengan keperluan klien mereka.

Daftar perencanaan audit dari APG termasuk item-item untuk menetapkan:

·         Persetujuan penerimaan tugas

·         Persetujuan personel audit terhadap perikatan audit

·         Tingkat independensi

·         Pengetahuan terhadap kesatuan usaha

·         Taksiran kemampuan audit

·         Surat Perikatan

·         Taksiran risiko audit dan tingkat materialitas

·         Taksiran risiko pengendalian

·         Tindakan-tindakan melanggar hukum

·         Tingkat kesalahan dan ketidakpatuhan

·         Prosedur analitikal

·         Strategi audit dan program audit

APG dapat membantu dalam memenuhi standar auditing, mempertimbangkan struktur pengendalian internal dalam sebuah laporan keuangan auditan. Standar auditing mengharuskan auditor mendapatkan pemahaman terhadap tiga elemen dari struktur pengendalian dan apakah kebijakan-kebijakan yang relevan, prosedur-prosedur dan catatan-catatan yang mendasar telah diterapkan pada perusahaan yang diaudit.

Daftar perencanaan berfungsi sebagai sebuah kontrol untuk memastikan bahwa semua bagian struktur pengendalian internal telah diperiksa, dan ini menjadi bagian pertama dari peralatan APG mengacu kepadanya.

Untuk itu, maka pada APG disediakan sebuah form berisikan daftar pertanyaan untuk mengetahui tingkat pengendalian internal pada perusahaan yang diaudit. Untuk penggunaan daftar pertanyaan tersebut secara efektif, maka auditor harus merecord tanggapan-tanggapan untuk pertanyaan-pertanyaan dan pekerjaan yang dilakukan untuk melihat bahwa prosedur-prosedur yang diidentifikasi merupakan kondisi aktual pada perusahaan yang diaudit. Dalam banyak kasus, sebuah referensi dari kertas kerja dimana sebuah hasil pemeriksaaan disimpan, akan menjadi kebutuhan penting dalam audit.

Setelah melengkapi daftar pertanyaan tersebut, berikutnya APG akan mendesain tahapan demi tahapan yang mendasari dalam pembuatan keputusan auditor seperti misalnya : taksiran risiko pengendalian pada tingkat maksimum, dan bagaimana mengurangi beberapa taksiran risiko. Dalam lembar kasus, auditor dapat mendesain pengujian-pengujian khusus dalam bagian pengendalian internal dari program untuk memberikan jaminan bahwa pengendalian dapat dipercaya untuk mengurangi risiko pengendalian dibawah tingkat maksimum sebagai fungsi aktual untuk asersi laporan keuangan tertentu.

Setelah dapat mengembangkan perencanaan untuk auditnya, keuntungan dari sebuah perikatan audit dari struktur pengendalian, dibuat sebuah taksiran risiko pengendalian, dan membuat beberapa analisis finansial pendahuluan. Berikutnya, auditor siap untuk mengerjakan pengaturan dari perencanaan audit, dan program pengujian substantive.

Program audit akan dijilid untuk setiap perikatan audit. Setiap perikatan tersebut berbeda dan meminta auditor untuk menggunakan keahlian professional mereka untuk memformulasikan tahapan-tahapan audit yang dibutuhkan untuk memberikan ukuran yang jelas, tingkat materialitas, dan tingkat objektivitas auditor sebagai factor-faktor yang perlu dipertimbangkan.

Program audit akan dijilid untuk setiap perikatan audit. Setiap perikatan tersebut berbeda dan meminta auditor untuk menggunakan keahlian professional mereka untuk memformulasikan tahapan-tahapan audit yang dibutuhkan untuk memberikan ukuran yang jelas, tingkat materialitas, dan tingkat objektivitas auditor sebagai faktor-faktor yang perlu dipertimbangkan.

Hal tersebut sangat sulit dan waktu yang dikonsumsi untuk mengembangkan program audit sejak awal untuk masing-masing perikatan audit yang baru. Dan seperti telah diuraikan sebelumnya bahwa APG dapat membantu pembuatan perancangan program audit sejak awal mula atau menyediakan langkah-langkah yang diusulkan untuk melakukan modifikasi terhadap kondisi-kondisi yang tertentu pada klien.

APG telah didesain untuk dimulai dengan lima asersi:

·         Keberadaan atau keterjadian

·         Kelengkapan

·         Hak dan kewajiban

·         Penilaian atau pengalokasian,

·         Penyajian dan pengungkapan

Kegunaan lain dari APG adalah dapat digunakan untuk meninjau daftar pengungkapan dan tingkat kepatuhan terhadap perpajakan. Hal ini dapat membantu auditor memastikan bahwa laporan keuangan memenuhi semua unsur pengungkapan dan bahwa perusahaan klien telah mematuhi peraturan perpajakan yang berlaku.

DAFTAR PUSTAKA

http://steinmetzweb.blogspot.com/2017/11/audit-program-generator-apg.html

http://camagun.blogspot.com/2017/11/audit-sistem-informasi-aplikasi-apg.html

Pada postingan kali ini saya akan membagikan tutorial cara membuat aplikasi berbasis web dan terkoneksi pada microsoft access dengan menggunakan aplikasi Visual Studio 2012.

Berikut adalah komponen pendukung dari aplikasi ini :

        -          Button   

        -         TextBox

Membuat project baru
 Klik file lalu pilih new project

Lalu klik web dan pilih ASP.NET Empty Web Application

Klik kanan pada "webapplication1" pilih "add" pilih "web form"

 Ubah nama web form sesuai kebutuhan

Lalu akan muncul tampilan pada design seperti ini 

Buat design penjualan buku sebagai berikut

Untuk mengkoneksikan folder di acces kedalam aplikasi web pertama kita harus membuat tabel access terlebih dahulu, contohnya sebagai berikut

Lalu kembali pada aplikasi Visual Studio. Pilih Data Connection yang ada di sebelah kiri lalu klik kanan dan pilih "Add Connection"

Pilih browse lalu klik folder access dan klik test connection 

Akan muncul tampilan sebagai berikut 

Tampilan run pada web browser sebagai berikut 

Tampilan pada microsoft access sebgi berikut 

Berikut coddingan untuk aplikasi penjualan buku berbasis web menggunakan aplikasi Visual Studio 2012

Imports System.Data
Imports System.Data.OleDb


Public Class WebFormPenjualanBuku
    Inherits System.Web.UI.Page
    Dim Koneksi As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\WIN 8.1 Core\Documents\DataPenjualanBuku.accdb"
    Dim objekKoneksi As New OleDb.OleDbConnection(Koneksi)
    Dim XReader As OleDb.OleDbDataReader
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub save_Click(sender As Object, e As EventArgs) Handles save.Click
        objekKoneksi.Open()
        Dim tambah As String = "INSERT INTO [penjualan buku] values('" & TxtIsbn.Text & "','" & TxtJdl.Text & "','" & TxtPgrng.Text & "','" & TxtPenerbit.Text & "','" & TxtThn.Text & "','" & TxtHrg.Text & "') "
        Dim oCmd = New OleDbCommand(tambah, objekKoneksi)
        oCmd.ExecuteNonQuery()
        objekKoneksi.Close()
        MsgBox("Sukses")

    End Sub

    Protected Sub view_Click(sender As Object, e As EventArgs) Handles view.Click
        Response.Redirect("WebFormView.aspx")
    End Sub

    Protected Sub find_Click(sender As Object, e As EventArgs) Handles find.Click
        If Not Len(TxtJdl.Text) = 0 Then

        End If
        objekKoneksi.Close()
        objekKoneksi.Open()
        Dim ocmd As New OleDb.OleDbCommand("SELECT * FROM [penjualan buku] where ISBN='" + TxtIsbn.Text + "'", objekKoneksi)

        XReader = ocmd.ExecuteReader()

        If XReader.HasRows Then
            XReader.Read()
            TxtIsbn.Text = XReader("ISBN")
            TxtJdl.Text = XReader("Judul")
            TxtPgrng.Text = XReader("Pengarang")
            TxtPenerbit.Text = XReader("Penerbit")
            TxtThn.Text = XReader("Tahun")
            TxtHrg.Text = XReader("Harga")
            update.Enabled = True
            delete.Enabled = True
        Else
            TxtJdl.Text = "TIDAK DI TEMUKAN"
            Exit Sub
        End If
        XReader.Close()
    End Sub

    Protected Sub update_Click(sender As Object, e As EventArgs) Handles update.Click
        objekKoneksi.Open()
        Dim rubah As String = "UPDATE [penjualan buku] set Harga='" + TxtHrg.Text + "' where ISBN='" + Trim(TxtIsbn.Text) + "'"
        Dim oCmd = New OleDbCommand(rubah, objekKoneksi)
        oCmd.ExecuteNonQuery()
        objekKoneksi.Close()
        MsgBox("sukses")
        objekKoneksi.Close()
    End Sub

    Protected Sub delete_Click(sender As Object, e As EventArgs) Handles delete.Click
        TxtIsbn.Text = ""
        TxtJdl.Text = ""
        TxtPgrng.Text = ""
        TxtPenerbit.Text = ""
        TxtThn.Text = ""
        TxtHrg.Text = ""
    End Sub
End Class