yoncen
µù¥U®É¶¡: 2005-08-29 ¤å³¹: 35
²Ä 1 ¼Ó
|
µoªí©ó: ¬P´Á¤T ¤@¤ë 31, 2024 8:14 am ¤å³¹¥DÃD: Á{®É§ó§ïCAªºSelectCmd¹J¨ìªº°ÝÃD |
|
|
Local oCA As CursorAdapter
oCA = Thisform._de.caProductDts
oCA.SelectCmd = ""
TEXT TO oCA.SelectCmd
Select a.ProductId,Isnull(a.ColorId,'') As ColorId,
Rtrim(Isnull(a.ProductDesc,'')) + ' ' + Isnull(a.Color,'') As ProductDesc,
a.PaperCoreName,a.PackName,a.PrintWheelName,
Isnull(a.ABC,'') As ABC,Isnull(a.DailyUseQty,0.00) As DailyUseQty,
Isnull(a.EmergPuDays,0) As EmergPuDays,Isnull(a.StandPuDays,0) As StandPuDays,
Isnull(a.MinStock,0.00) As MinStock,Isnull(a.SafeStock,0.00) As SafeStock,
Isnull(a.MaxStock,0.00) As MaxStock,Isnull(a.qDays,0) As qDays,a.Unit,
Isnull(Sum(b.Qty),0.00) As Qty,Isnull(Sum(b.Qty2),0.00) As Qty2,
Cast(Isnull(Sum(b.Qty),0.00)*Isnull(e.ConvRate,0) As Numeric(16,2)) As Area
From View_Product a WITH (NOLOCK)
Left Join OnlineStock b WITH (NOLOCK) On a.ProductId = b.ProductId
Left Join Warehouse c WITH (NOLOCK) On b.wId = c.wId
Left Join View_SA_SalesOrder d WITH (NOLOCK) On b.OrderId = d.OrderId
Left Join UnitConv e WITH (NOLOCK) On a.ProductId = e.ProductId And e.AuxUnit = 'SM'
Where a.ProductId = ?Thisform.ProductId
Group By a.ProductId,a.ColorId,a.ProductDesc,a.Color,
a.PaperCoreName,a.PackName,a.PrintWheelName,
a.ABC,a.DailyUseQty,a.EmergPuDays,a.StandPuDays,
a.MinStock,a.SafeStock,a.MaxStock,a.qDays,a.Unit,e.ConvRate
ENDTEXT
Select ProductDts
Tablerevert(.T.)
Requery()
³oÓCA¥»¨SelectCmd¦³Àq»{¥N½X¡A¦ý§Ú»ÝnÁ{®É®Ú¾Ú¬d¸ß±ø¥ó«¼gCAªºSelectCmd¡AµM«áÅýCA«·s¬d¸ß¨Ãªð¦^µ²ªG¡C¦ýµo²{¥H¤W¥N½X¦³°õ¦æ¡A¦Ó¥BCAªºSelectCmd½T¹ê¤]³Q§ï¤F¡A¦ýRequery()¥X¨Óªºµ²ªG¤´¬O«öÀq»{¥N½X¬d¸ßªº¡C¤£ª¾¹D¬Oþ¸Ì¨S³]¦n¤Þ°_ªº¡H½ÐªB¤ÍÌ«ü±Ð¡AÁÂÁ¡C _________________ ±q¨Æ¥ø·~ERP¶}µo¡A¾Ç·|¤î¹Ò¡Aºë¯q¨Dºë¡C |
|