Dian Tri Raharjo

cara membuat retur create table RETUR_JUAL (No_Retur varchar(15)primary key, No_nota_Jual varchar(10)foreign key references penjualan(nonota), Tanggal_Retur Date, Jumalah_Retur int, Keterangan_Cacat varchar (50))        1. Isi data, ambil dari tabel penjualan, 2 record untuk di retur                      2. Browsing operasi matematika menggunakan sql untuk penambahan stok barang          3.  Alternatif  lain, update stok barang      4. Jumlah retur tidak melebihi jumlah jual       5.  . tanggal retur tidak boleh sebelum tanggal jual       6.  tambahkan 5 data retur                  7.   update data 3 retur          8.  Delete record 1 data retur  ...

Setelah kemarin kita membuat 3 tabel yaitu tabel barang, tabel supplier dan tabel pembelian. Sekarang kita akan membuat aplikasi beradasarkan 3 tabel tersebut menggunakan VB.net sebagai bahasa pemogramannya dan SQL Server 2014 sebagai databasenya. Cara Mengoneksikan Ke Database SQL Server 2014 Imports System.Data Imports System.Data.Sql Imports System.Data.SqlClient Module mdlkoneksi     Public comSQL As New SqlClient.SqlCommand     Public sql As String     Public conn As New SqlConnection     Public str As String = "Data Source=SARJONO-PC;Initial Catalog=KelompokSangar;Integrated Security=True"     Public Sub bukakoneksi()         If conn.State = ConnectionState.Closed Then             conn.ConnectionString = str             Try                 conn.Open()             ...

      1. create tabel penjualan              2. isi tabel penjualan       3.tambahkan 1 field di tabel penjualan       4.hapus 1 record       5.isi data yang kosong       6.tampilkan nama barang dan tanggal jual      7.tampilkan jenis barang dan jumlah jual      8.tampilkan stok dari barang yang penjualanya di bulan april 2017      9.tampilkan harga jual yang barangnya Sampho clear     10.tampilkan nama,barang tanggal beli, tanggal jual dan stock

1. Tampilkan nama supplier yang barangnya indomie     select Nmsup from Supplier     join Pembelian on Supplier.Kdsup = Pembelian.Kdsup     join Barang on Barang.kdbrg = Pembelian.Kdbrg     where Barang.nmbrg='pepsodent' 2. Tampilkan jumlah beli yang nama barangnya indomie      select Jumlahbeli from Pembelian      join barang on barang.kdbrg=Pembelian.Kdbrg     where Barang.nmbrg='pepsodent' 3. Tampilkan nama barang yang harga beli di atas 10.000      select Barang.nmbrg from Barang      join Pembelian on Barang.kdbrg=Pembelian.Kdbrg     where pembelian.Hargabeli > 10000 4. Tampilan kode supplier, nama supplier yang totalnya pembelian diatas 100.00      select Supplier.Kdsup, Supplier.Nmsup from Supplier      join Pembelian on Supplier.Kdsup=Pembelian....