Aplikasi Program HRD Management

Program Aplikasi Management HRD , Master Karyawan, Karyawan Masuk, karyawan PHK, Karyawan CUTI, karyawan Resign, Karyawan Mutasi, dan Input Absensi , Input Gaji, Input APD (Barang), Pengeluaran Barang(APD), Laporan Stock, Laporan Slip Gaji, Laporan Gaji, Laporan Absensi. Kami Beri Harga Rp. 3.700.000.
Kalau anda berminat anda bisa menghubungi di email muhajir.zusniyanto@yahoo.co.id,  di Nomer 0822-3095-6055.

Program Aplikasi Cerak Kwitansi

Program Aplikasi Cetak Kwitansi

Program Kwitansi di Jual dengan Harga  Rp. 2.500.000  , Untuk memudahkan dalam pembuatan kwitansi, jadi data untuk kwitansi bisa di Simpan, sewaktu-waktu apabila ingin melihatnya bisa di buka kembali, juga di lengkapi dengan Laporan KAS, dan Laporan Penerima KAS, dan Laporan Pengeluaran KAS.

Kalau anda berminat anda bisa menghubungi di email muhajir.zusniyanto@yahoo.co.id,  di Nomer 0822-3095-6055.

Aplikasi Pembayaran Tagihan PDAM

Aplikasi Pembayaran Tagihan PDAM , Program Aplikasi ini sudah banyak dipesan dalam suatu HIPPAM di kalangan Umum.,Fitur-fitur yang digunakan, Ada Master Pelanggan, Input Tagihan, Perhitungan Beban, dan Biaya Bisa Di Custom, sesuai dengan keinginan Pengguna, Juga di Lengkapi Tagihan yang BELUM LUNAS dan Tagihan yang SUDAH LUNAS.

Program Aplikasi Pembayaran Tagihan PDAM, kami hargai Rp. 2.600.000 .

Kalau anda berminat anda bisa menghubungi di email muhajir.zusniyanto@yahoo.co.id, di Nomer 0822-3095-6055.

Program Aplikasi Cetak Kartu ID Barcode

Program Aplikasi Cetak Kartu ID, Di gunakan di Dinas Kesehatan Pemerintahan, yang di Lengkapi dengan Input Foto Penduduk, Cetak ID BARCODE, laporan By Barcode ID, laporan Data Penduduk per Kecamatan/ per Desa, serta Di lengkapi dengan Import Data Dari Excel ke program Aplikasi Untuk Memudahkan user Di input Ulang, dan program ini di lengkapi dengan Multi User, Backup Data.

Program Aplikasi Cetak Kartu ID Barcode, 

Program Tersebut Kami Hargai Rp. 3.000.000, . Kalau anda berminat anda bisa menghubungi di email muhajir.zusniyanto@yahoo.co.id,  di Nomer 0822-3095-6055.

Cara Hitung Inventory Barang , pakai Stored Prodecure SQL Server

 

CREATE PROCEDURE HitungInventory 

(

@xKODEBARANG VARCHAR(30),

@xBULAN INT,

@xTAHUN VARCHAR(4)

)

AS

DECLARE @NOID BIGINT, @PERIODE VARCHAR(6), @NOTRANSAKSI VARCHAR(30), @URUTTRANSAKSI INT, @KODEBARANG VARCHAR(3), @KETERANGAN VARCHAR(50)

DECLARE @TOTALHARGAAWAL MONEY, @MASUK FLOAT, @HARGAMASUK MONEY, @TOTALHARGAMASUK MONEY ,@KELUAR MONEY, @HARGAKELUAR MONEY, @TOTALHARGAKELUAR MONEY

DECLARE @AKHIR FLOAT, @HARGAHPP MONEY, @TOTALHARGAAKHIR MONEY , @BULAN INT, @TAHUN VARCHAR(4), @TANGGAL DATETIME

DECLARE @TOTMASUK FLOAT, @TOTKELUAR FLOAT

DECLARE @xTOTALHARGAAKHIR MONEY ,@xTotalHargaAkhirUpdate MONEY, @xAkhirUpdate FLOAT ,@xHargaHPPUpdate MONEY, @xAKHIR FLOAT, @XHARGAHPP MONEY

DECLARE @xTotalHargaKeluar MONEY

CREATE TABLE #TEMP

(

NOID BIGINT,

PERIODE VARCHAR(6),

TANGGAL DATETIME,

NOTRANSAKSI VARCHAR(30),

URUTTRANSAKSI INT,

KODEBARANG VARCHAR(30),

KETERANGAN VARCHAR(50),

TOTALHARGAAWAL MONEY,

MASUK FLOAT,

HARGAMASUK MONEY,

TOTALHARGAMASUK MONEY,

KELUAR FLOAT,

HARGAKELUAR MONEY,

TOTALHARGAKELUAR MONEY,

AKHIR FLOAT,

HARGAHPP MONEY,

TOTALHARGAAKHIR MONEY,

BULAN INT,

TAHUN VARCHAR(4)

) ON [PRIMARY]

DECLARE OPENPART CURSOR FOR

SELECT     NOID,PERIODE, TANGGAL, NOTRANSAKSI, URUTTRANSAKSI, KODEBARANG, KETERANGAN,TOTALHARGAAWAL, MASUK, HARGAMASUK, TOTALHARGAMASUK,

   KELUAR, HARGAKELUAR, TOTALHARGAKELUAR,    AKHIR, HARGAHPP, TOTALHARGAAKHIR, BULAN, TAHUN

FROM    TABELINVENTORY                      

WHERE KODEBARANG=@XKODEBARANG AND Bulan=@xBULAN and Tahun=@xTAHUN 

OPEN OPENPART

FETCH NEXT FROM OPENPART INTO @NOID , @PERIODE, @TANGGAL, @NOTRANSAKSI , @URUTTRANSAKSI, @KODEBARANG , @KETERANGAN , @TOTALHARGAAWAL,

@MASUK, @HARGAMASUK, @TOTALHARGAMASUK ,@KELUAR, @HARGAKELUAR, @TOTALHARGAKELUAR , 

@AKHIR , @HARGAHPP, @TOTALHARGAAKHIR, @BULAN, @TAHUN

WHILE @@FETCH_STATUS=0

BEGIN

INSERT INTO #TEMP

VALUES (@NOID , @PERIODE, @TANGGAL, @NOTRANSAKSI , @URUTTRANSAKSI, @KODEBARANG , @KETERANGAN , @TOTALHARGAAWAL,

@MASUK, @HARGAMASUK, @TOTALHARGAMASUK ,@KELUAR, @HARGAKELUAR, @TOTALHARGAKELUAR , 

@AKHIR , @HARGAHPP, @TOTALHARGAAKHIR, @BULAN, @TAHUN)

    FETCH NEXT FROM OPENPART INTO @NOID , @PERIODE, @TANGGAL, @NOTRANSAKSI , @URUTTRANSAKSI, @KODEBARANG , @KETERANGAN , @TOTALHARGAAWAL,

@MASUK, @HARGAMASUK, @TOTALHARGAMASUK ,@KELUAR, @HARGAKELUAR, @TOTALHARGAKELUAR , 

@AKHIR , @HARGAHPP, @TOTALHARGAAKHIR, @BULAN, @TAHUN

END

CLOSE OPENPART

DEALLOCATE OPENPART

DECLARE OPENPART1 CURSOR FOR

--SELECT    NOID,PERIODE, TANGGAL, NOTRANSAKSI, URUTTRANSAKSI, KODEBARANG, KETERANGAN, TOTALHARGAAWAL, MASUK, HARGAMASUK, TOTALHARGAMASUK,

--   KELUAR, HARGAKELUAR, TOTALHARGAKELUAR, 

--  AKHIR, HARGAHPP, TOTALHARGAAKHIR, BULAN, TAHUN

--FROM    #TEMP    ORDER BY  Tanggal asc,NoId asc     

SELECT     NOID,PERIODE, TANGGAL, NOTRANSAKSI, URUTTRANSAKSI, KODEBARANG, KETERANGAN,TOTALHARGAAWAL, MASUK, HARGAMASUK, TOTALHARGAMASUK,

   KELUAR, HARGAKELUAR, TOTALHARGAKELUAR, 

  AKHIR, HARGAHPP, TOTALHARGAAKHIR, BULAN, TAHUN

FROM    TABELINVENTORY                      

WHERE KODEBARANG=@XKODEBARANG AND Bulan=@xBULAN and Tahun=@xTAHUN              

OPEN OPENPART1

FETCH NEXT FROM OPENPART1 INTO @NOID , @PERIODE, @TANGGAL, @NOTRANSAKSI , @URUTTRANSAKSI, @KODEBARANG , @KETERANGAN , @TOTALHARGAAWAL,

@MASUK, @HARGAMASUK, @TOTALHARGAMASUK ,@KELUAR, @HARGAKELUAR, @TOTALHARGAKELUAR , 

@AKHIR , @HARGAHPP, @TOTALHARGAAKHIR, @BULAN, @TAHUN

WHILE @@FETCH_STATUS=0

BEGIN

IF @URUTTRANSAKSI=0

BEGIN

IF @HARGAHPP=0 

BEGIN

SET @xTOTALHARGAAKHIR=@TOTALHARGAAWAL

SET @xTotalHargaAkhirUpdate=@xTOTALHARGAAKHIR

SET @xAkhirUpdate=@AKHIR

END

ELSE

BEGIN

SET @xTOTALHARGAAKHIR=@TOTALHARGAAKHIR

SET @xTotalHargaAkhirUpdate=@xTOTALHARGAAKHIR

SET @xAkhirUpdate=@AKHIR

SET @xHargaHPPUpdate=@HARGAHPP

END

END

IF @URUTTRANSAKSI=1 AND @KETERANGAN='FAKTURBELI'

BEGIN

IF @HARGAHPP=0 

BEGIN

SET @xTOTALHARGAAKHIR=@TOTALHARGAAWAL

SET @xAkhir=@AKHIR

END

ELSE

BEGIN

SET @xTOTALHARGAAKHIR=@xTotalHargaAkhirUpdate

SET @xAkhir=@xAkhirUpdate

END

--NEXT DATA

SET @xAkhir=@xAkhir + @Masuk

SET @xTotalHargaAkhir = @TOTALHARGAMASUK + @XTOTALHARGAAKHIR

IF @xAKHIR<>0

BEGIN

SET @XHARGAHPP=@XTOTALHARGAAKHIR / @XAKHIR

END

SET  @xHargaHPPUpdate =@XHargaHPP

            SET @xTotalHargaAkhirUpdate = @xTotalHargaAkhir

            SET @xAkhirUpdate = @xAkhir

Update #TEMP set  Masuk=@MASUK, HargaMasuk=@HARGAMASUK, TotalHargaMasuk=@TOTALHARGAMASUK,

                                                 Akhir=@XAKHIR, HargaHPP=@XHARGAHPP, TotalHargaAkhir=@XTOTALHARGAAKHIR

                          where NOID=@NOID and periode=@PERIODE and NoTransaksi=@NOTRANSAKSI and KodeBarang=@KODEBARANG

END

IF @URUTTRANSAKSI=2 AND @KETERANGAN='FAKTURJUAL'

BEGIN

IF @HARGAHPP=0 

BEGIN

SET @xTOTALHARGAAKHIR=@TOTALHARGAAWAL

SET @xAkhir=@AKHIR

END

ELSE

BEGIN

SET @xTOTALHARGAAKHIR=@xTotalHargaAkhirUpdate

SET @xAkhir=@xAkhirUpdate

SET @xHargaHPP = @xHargaHPPUpdate

END

--NEXT DATA

SET @xAkhir=@xAkhir - @Keluar

SET @xTotalHargaKeluar = @KELUAR * @xHargaHPP  

SET @xTotalHargaAkhir = @XTOTALHARGAAKHIR - @xTotalHargaKeluar

SET @xAkhirUpdate = @xAkhir

SET  @xHargaHPPUpdate =@XHargaHPP

            SET @xTotalHargaAkhirUpdate = @xTotalHargaAkhir            

Update #TEMP set  KELUAR=@KELUAR, HargaKeluar=@xHARGAHPP, TotalHargaKeluar=@xTotalHargaKeluar,

                                                 Akhir=@XAKHIR, HargaHPP=@XHARGAHPP, TotalHargaAkhir=@XTOTALHARGAAKHIR

                          where NOID=@NOID and periode=@PERIODE and NoTransaksi=@NOTRANSAKSI and KodeBarang=@KODEBARANG

END

SELECT @TOTMASUK=SUM(MASUK) , @TOTKELUAR=SUM(KELUAR) FROM #TEMP WHERE KODEBARANG=@KODEBARANG AND PERIODE=@PERIODE GROUP BY KODEBARANG

-- -- UPDATE NILAI STOCK

Update mstbarang SET  HargaHPP=@XHARGAHPP,QtyStock=@XAKHIR,  MASUK=@TOTMASUK, KELUAR=@TOTKELUAR, NilaiPersediaan=@XTOTALHARGAAKHIR

                      where kodebarang=@XKODEBARANG

    FETCH NEXT FROM OPENPART1 INTO @NOID , @PERIODE, @TANGGAL, @NOTRANSAKSI , @URUTTRANSAKSI, @KODEBARANG , @KETERANGAN , @TOTALHARGAAWAL,

@MASUK, @HARGAMASUK, @TOTALHARGAMASUK ,@KELUAR, @HARGAKELUAR, @TOTALHARGAKELUAR , 

@AKHIR , @HARGAHPP, @TOTALHARGAAKHIR, @BULAN, @TAHUN

END

CLOSE OPENPART1

DEALLOCATE OPENPART1

SELECT * FROM #TEMP ORDER BY  Tanggal asc,NoId asc

GO

Program Untuk Rekap Angka dan Perhitungan Angka , antara 4 digit, 3 digit, 2 digit. Dilengkapi dengan Report Untuk Cetak, 4 Digit, 3 Digit, dan 2 Digit, dan juga di lengkapi dengan Login User, serta data User, serta di lengkapi dengan pencarian datanya.

Kami Jual Dengan Harga Rp. 1.500.000, Untuk Order Ke Email Kami : Muhajir.Zusniyanto@Yahoo.co.id , atau Telp : 082230956055 dan juga kami melayani program custom yaitu sesuai dengan keinginan pelanggan.

Perekam Panggilan

Kami ingin mempromosikan Perekam Panggilan Skype kami di blog Anda. Namanya adalah Riviera untuk Skype.
Dalam pertukaran untuk promosi Anda akan menerima salinan lengkap dari produk.
Anda perlu membuat posting pendek dengan beberapa kalimattentang Riviera untuk Skype (seperti saya tulis di bawah) danmenyertakan link kembali:

http://www.jiteco.com/skype_call_recorder.html">Skype Call Recorder

Riviera untuk Skype adalah perekam panggilan Skype. Ini secara otomatis mencatat panggilan Skype dan percakapan ke file MP3.
Sangat nyaman untuk wawancara merekam, pembicaraanteknologi, konferensi, gips audio, polong gips untuk belajarkemudian, dll

Here is a link to download Riviera for Skype 3.6.21573: http://www.jiteco.com/download/riviera/riviera.exe