Langsung ke konten utama

FAKTUR PENJUALAN ALAT MUSIK

FAKTUR PENJUALAN ALAT MUSIK

 Pada pembuatan program ini saya menulis tentang perancangan basis data (database) dari sebuah struk belanja. Perancangannya melewati beberapa tahap diantaranya Unnormalized, 1NF, 2NF, 3NF & Relasi. setelah membuat perancangan lanjut ke tahap penerapannya yaitu dengan membuat tabel - tabel pada software Sql Server 2012. setelah tabel-tabel tersebut selesai selanjutnya buat project web dengan visual studio (ASP.NET) lalu mengkoneksikan database tersebut, pada database juga saya berikan perintah -  perintah yaitu simpan, edit, hapus dan cari. Untuk lebih jelasnya saya akan menjelaskan sebagai berikut :

BENTUK UNNORMALIZED
Kode kasir
Nama Kasir
Nama Barang
Qty
Harga
Jumlah
Tanggal
Waktu
K446
SRI MEGA
GUITAR ACUSTIC
1
1000000
1000000
12/7/2019
10:08:37


GUIAR MELODI
1
4000000
4000000




GENDANG
1
1500000
1500000



BENTUK NORMAL 1 NF
Kode kasir
Nama Kasir
Nama Barang
Qty
Harga
Jumlah
Tanggal
Waktu
K446
SRI MEGA
GUITAR ACUSTIC
1
1000000
1000000
12/7/2019
10:08:37
K446
SRI MEGA
GUIAR MELODI
1
4000000
4000000
12/7/2019
10:08:37
K446
SRI MEGA
GENDANG
1
1500000
1500000
12/7/2019
10:08:37

BENTUK NORMAL 2 NF
TABEL KASIR
Tabel Barang
Kode kasir
Nama Barang
Nama Kasir
TABEL STRUK
Qty
Kode kasir
Harga
Nama Kasir
Jumlah
Nama Barang
Qty
Harga
Jumlah
Tanggal
Waktu

BENTUK NORMAL 3 NF
TABEL KASIR
Tabel Barang
Kode kasir
Nama Barang
Nama Kasir
TABEL STRUK
Qty
Kode kasir
Harga
Nama Kasir
Jumlah
Tanggal
TABEL JUAL BELI
Waktu
Kode kasir
Nama Barang
Qty
Harga
Jumlah






































#SOURCH CODE#




<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Tabel Kasir.aspx.vb" Inherits="WebApplication1.Tabel_Kasir" %>

<!DOCTYPE html>

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title></title>
</head>
<body>
    <form id="form1" runat="server">
    <div style="height: 455px">
 
        <br />
        Tabel Kasir<br />
        <br />
        Kode&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox1" runat="server" Width="122px"></asp:TextBox>
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button1" runat="server" Text="Cari" />
        <br />
        Nama Obat&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox2" runat="server" Width="125px"></asp:TextBox>
        <br />
        <br />
        <asp:Button ID="Button2" runat="server" Text="Save" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button3" runat="server" Text="Edit" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button4" runat="server" Text="Hapus" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button5" runat="server" Text="Batal" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button6" runat="server" Text="Kembali" />
        <br />
        <asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataSourceID="SqlDataSource1" EmptyDataText="There are no data records to display.">
            <Columns>
                <asp:BoundField DataField="Kode" HeaderText="Kode" SortExpression="Kode" />
                <asp:BoundField DataField="Nama_Obat" HeaderText="Nama_Obat" SortExpression="Nama_Obat" />
            </Columns>
        </asp:GridView>
        <asp:SqlDataSource ID="SqlDataSource1" runat="server" ConnectionString="<%$ ConnectionStrings:Paulus-Tyas-Adi-NugrohoConnectionString1 %>" ProviderName="<%$ ConnectionStrings:Paulus-Tyas-Adi-NugrohoConnectionString1.ProviderName %>" SelectCommand="SELECT [Kode], [Nama_Obat] FROM [Table_Kasir]"></asp:SqlDataSource>
 
    </div>
    </form>
</body>
</html>

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Tabel Barang.aspx.vb" Inherits="WebApplication1.Tabel_Barang" %>

<!DOCTYPE html>

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title></title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
 
        <br />
        Tabel Barang<br />
        <br />
        Nama Obat&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button2" runat="server" Text="Cari" />
        <br />
        Qry&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
        <br />
        Harga&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
        <br />
        <asp:Button ID="Button1" runat="server" Text="Jumlah" />
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
        <br />
        <br />
        <asp:Button ID="Button3" runat="server" Text="Save" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button4" runat="server" Text="Edit" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button5" runat="server" Text="Hapus" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button6" runat="server" Text="Batal" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button7" runat="server" Text="Kembali" />
        <br />
        <asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataSourceID="SqlDataSource1" EmptyDataText="There are no data records to display.">
            <Columns>
                <asp:BoundField DataField="Nama_Obat" HeaderText="Nama_Obat" SortExpression="Nama_Obat" />
                <asp:BoundField DataField="Qty" HeaderText="Qty" SortExpression="Qty" />
                <asp:BoundField DataField="Harga" HeaderText="Harga" SortExpression="Harga" />
                <asp:BoundField DataField="Jumlah" HeaderText="Jumlah" SortExpression="Jumlah" />
            </Columns>
        </asp:GridView>
        <asp:SqlDataSource ID="SqlDataSource1" runat="server" ConnectionString="<%$ ConnectionStrings:Paulus-Tyas-Adi-NugrohoConnectionString1 %>" ProviderName="<%$ ConnectionStrings:Paulus-Tyas-Adi-NugrohoConnectionString1.ProviderName %>" SelectCommand="SELECT [Nama_Obat], [Qty], [Harga], [Jumlah] FROM [Table_Barang]"></asp:SqlDataSource>
 
    </div>
    </form>
</body>
</html>

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Tabel Transaksi.aspx.vb" Inherits="WebApplication1.Tabel_Transaksi" %>

<!DOCTYPE html>

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title></title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
 
        <br />
        Tabel Transaksi<br />
        <br />
        Kode&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button2" runat="server" Height="25px" Text="Cari" Width="37px" />
        <br />
        Nama Obat&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
&nbsp;&nbsp;&nbsp;
        <br />
        Qry&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
        <br />
        Harga&nbsHarga&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
        <br />
        <asp:Button ID="Button1" runat="server" Text="Jumlah" />
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
        <br />
        <br />
        <asp:Button ID="Button3" runat="server" Text="Save" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button4" runat="server" Text="Edit" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button5" runat="server" Text="Hapus" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button6" runat="server" Text="Batal" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button7" runat="server" Text="Kembali" />
        <br />
        <asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataKeyNames="Kode" DataSourceID="SqlDataSource1" EmptyDataText="There are no data records to display.">
            <Columns>
                <asp:BoundField DataField="Kode" HeaderText="Kode" ReadOnly="True" SortExpression="Kode" />
                <asp:BoundField DataField="Nama_Oabt" HeaderText="Nama_Oabt" SortExpression="Nama_Oabt" />
                <asp:BoundField DataField="Qty" HeaderText="Qty" SortExpression="Qty" />
                <asp:BoundField DataField="Harga" HeaderText="Harga" SortExpression="Harga" />
                <asp:BoundField DataField="Jumlah" HeaderText="Jumlah" SortExpression="Jumlah" />
            </Columns>
        </asp:GridView>
        <asp:SqlDataSource ID="SqlDataSource1" runat="server" ConnectionString="<%$ ConnectionStrings:Paulus-Tyas-Adi-NugrohoConnectionString1 %>" DeleteCommand="DELETE FROM [Table_Transaksi] WHERE [Kode] = @Kode" InsertCommand="INSERT INTO [Table_Transaksi] ([Kode], [Nama_Oabt], [Qty], [Harga], [Jumlah]) VALUES (@Kode, @Nama_Oabt, @Qty, @Harga, @Jumlah)" ProviderName="<%$ ConnectionStrings:Paulus-Tyas-Adi-NugrohoConnectionString1.ProviderName %>" SelectCommand="SELECT [Kode], [Nama_Oabt], [Qty], [Harga], [Jumlah] FROM [Table_Transaksi]" UpdateCommand="UPDATE [Table_Transaksi] SET [Nama_Oabt] = @Nama_Oabt, [Qty] = @Qty, [Harga] = @Harga, [Jumlah] = @Jumlah WHERE [Kode] = @Kode">
            <DeleteParameters>
                <asp:Parameter Name="Kode" Type="Int32" />
            </DeleteParameters>
            <InsertParameters>
                <asp:Parameter Name="Kode" Type="Int32" />
                <asp:Parameter Name="Nama_Oabt" Type="String" />
                <asp:Parameter Name="Qty" Type="String" />
                <asp:Parameter Name="Harga" Type="String" />
                <asp:Parameter Name="Jumlah" Type="Int32" />
            </InsertParameters>
            <UpdateParameters>
                <asp:Parameter Name="Nama_Oabt" Type="String" />
                <asp:Parameter Name="Qty" Type="String" />
                <asp:Parameter Name="Harga" Type="String" />
                <asp:Parameter Name="Jumlah" Type="Int32" />
                <asp:Parameter Name="Kode" Type="Int32" />
            </UpdateParameters>
        </asp:SqlDataSource>
 
    </div>
    </form>
</body>
</html>

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Tabel Struk.aspx.vb" Inherits="WebApplication1.Tabel_Struk" %>

<!DOCTYPE html>

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title></title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
 
        <br />
        Tabel Struk<br />
        <br />
        Nama Obat&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button2" runat="server" Text="Cari" />
        <br />
        Qry&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
        <br />
        Harga&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
        <br />
        Jumlah&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
        <br />
        Tanggal&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
        <br />
        Waktu&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
        <br />
        <br />
        <asp:Button ID="Button3" runat="server" Text="Save" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button4" runat="server" Text="Edit" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button5" runat="server" Text="Hapus" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button6" runat="server" Text="Batal" />
&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Button7" runat="server" Text="Kembali" />
        <br />
        <asp:GridView ID="GridView2" runat="server" AutoGenerateColumns="False" DataSourceID="SqlDataSource2" EmptyDataText="There are no data records to display.">
            <Columns>
                <asp:BoundField DataField="Kode" HeaderText="Kode" SortExpression="Kode" />
                <asp:BoundField DataField="Nama_Obat" HeaderText="Nama_Obat" SortExpression="Nama_Obat" />
                <asp:BoundField DataField="Qty" HeaderText="Qty" SortExpression="Qty" />
                <asp:BoundField DataField="Harga" HeaderText="Harga" SortExpression="Harga" />
                <asp:BoundField DataField="Jumlah" HeaderText="Jumlah" SortExpression="Jumlah" />
                <asp:BoundField DataField="Tanggal" HeaderText="Tanggal" SortExpression="Tanggal" />
                <asp:BoundField DataField="Waktu" HeaderText="Waktu" SortExpression="Waktu" />
            </Columns>
        </asp:GridView>
        <asp:SqlDataSource ID="SqlDataSource2" runat="server" ConnectionString="<%$ ConnectionStrings:Paulus-Tyas-Adi-NugrohoConnectionString1 %>" ProviderName="<%$ ConnectionStrings:Paulus-Tyas-Adi-NugrohoConnectionString1.ProviderName %>" SelectCommand="SELECT [Kode], [Nama_Obat], [Qty], [Harga], [Jumlah], [Tanggal], [Waktu] FROM [Table_Struk]"></asp:SqlDataSource>
 
    </div>
    </form>
</body>
</html>

Komentar

Postingan populer dari blog ini

Form Penjualan Tiket Kereta Api menggunakan Visual Studio

1.Deskripsi Aplikasi ini betujuan memudahkan menyimpan data pembeli tiket Kereta Api. Dengan menggunakan tools TextBox, Label, ComboBox, Button. 2. ScreenShot 3. Source Code Imports Word = Microsoft.Office.Interop.Word Imports Excel = Microsoft.Office.Interop.Excel Public Class Form1     Private Sub cmbkrl_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbkrl.SelectedIndexChanged         If (cmbkrl.SelectedIndex.Equals(0)) Then             txtharga.Text = 50000         ElseIf (cmbkrl.SelectedIndex.Equals(1)) Then             txtharga.Text = 100000         Else             txtharga.Text = 150000         End If     End Sub     Private Sub txtjumlah_LostFocus(sender As Object, e As EventArgs) Handles txtjumlah.LostFocus ...