Merhaba,
Netsis te Müşteri siparişi girerken bekleyen müşteri siparişlerini hesaplayı depoda bekleyen stoktan düşüyorum ve müşteri siparişindeki miktardan çıkarken örneğin 10 tane daha müşteri siparişi verebilirsin diyorum
sorum şu
bu uyarıyı çıkarırken birde o stok için bekleyen müşteri siparişlerinin listesini göstermek istiyorum . bunu nasıl yapabilirim.
SET sorgu=NETSISCORE.NetLibDB.GetNewQuery
IF NETSISCORE.NetLibSession.AktifModulNo=1 AND NETSISCORE.NetLibSession.AktifProgramNo=7 AND DepoKod.text=10 THEN
sorgu.RecSQL ("SELECT SATILABILIR_ADET FROM TD_SATILABILIR_STOK_MIK WHERE STOK_KODU='"&Kod.text&"' ")
if sorgu.Fields(0).ASinteger<CInt(Miktar.TEXT) then
NETSISCORE.NetLibWin32.ShowNetsisMesaj " "&sorgu.Fields(0).ASinteger&" adet sipariş girebilirsiniz.",2
Miktar.Show
Miktar.SetFocus
end if
END IF
Cevap vermek için giriş yapmanız gerekmektedir.
Soru sormak için lütfen oturum açınız.
Logosphere kullanıcı ve parolası ile giriş yapabilirsiniz.
dinamik kodlama
13/04/21 13:50   Netsis/NDI 9.0.14Merhaba,
Netsis te Müşteri siparişi girerken bekleyen müşteri siparişlerini hesaplayı depoda bekleyen stoktan düşüyorum ve müşteri siparişindeki miktardan çıkarken örneğin 10 tane daha müşteri siparişi verebilirsin diyorum
sorum şu
bu uyarıyı çıkarırken birde o stok için bekleyen müşteri siparişlerinin listesini göstermek istiyorum . bunu nasıl yapabilirim.
SET sorgu=NETSISCORE.NetLibDB.GetNewQuery
IF NETSISCORE.NetLibSession.AktifModulNo=1 AND NETSISCORE.NetLibSession.AktifProgramNo=7 AND DepoKod.text=10 THEN
sorgu.RecSQL ("SELECT SATILABILIR_ADET FROM TD_SATILABILIR_STOK_MIK WHERE STOK_KODU='"&Kod.text&"' ")
if sorgu.Fields(0).ASinteger<CInt(Miktar.TEXT) then
NETSISCORE.NetLibWin32.ShowNetsisMesaj " "&sorgu.Fields(0).ASinteger&" adet sipariş girebilirsiniz.",2
Miktar.Show
Miktar.SetFocus
end if
END IF