เท่าที่ดูคิวรี่นั้นจากคำถามก่อนๆที่มีใส่ไฟล์ฐานข้อมูลเอาไว้ พอไล่ไป สุดท้ายแล้วก็คือผลรวมของพาเลทเข้า-พาเลทออกจากเทเบิล In และ Out ผมเลยเขียนโค้ดโดยหาจากเทเบิลโดยตรงแทนนะครับ

If Nz(Me![A], "") <> "" Then
    If Not (Left(Me![A], 2) Like "A[MNOP]*") Then
        If Nz(DSum("InPallet", "In", "Place = '" & Me![A] & "'"), 0) _
        - Nz(DSum("OutPallet", "Out", "Place = '" & Me![A] & "'"), 0) >= 1 Then
            MsgBox "พื้นที่เต็ม"
            Cancel = True
        End If
    End If
End If

ถ้า Aและ P คือชื่อคอนโทรลบนฟอร์มที่ป้อนรหัสพื้นที่และจำนวนพาเลทตามลำดับ  ให้ใส่โค้ดนี้ไว้ที่ BeforeUpdate event procedure ของ P

If Nz(Me![A], "") <> "" Then
    If Not (Left(Me![A], 2) Like "A[MNOP]*") Then
        If Me![P] > 1 Then
            MsgBox "พื้นที่เต็ม"
            Cancel = True
        End If
    End If
End If

คลิกเมาส์ขวาที่ตารางเป้าหมาย แล้วเลือก Convert to Local Table ครับ

สามารถทำได้อยู่แล้วครับ แต่ Place จะมีการซ้ำกันตามจำนวนของสินค้าที่แสดง ของแต่ละ รหัสนะครับ

เช่น place A   รหัสสินค้า A = 10 .............ฯลฯ....................
      place A   รหัสสินค้า B = 5  ..............ฯลฯ...................

เป็นต้น
วิธีการ หา max วันที่ให้ได้แล้ว เอา สินค้าทุกตัวของวันที่นั้นมาแสดงทั้งหมด (แต่ place จะซ้ำกันตามจำนวนสินค้านะครับ)

ลองสร้างคิวรี่ ใส่ sql นี้เข้าไปแล้วดูผลลัพธ์นะครับ
ผมหา ตาราง Customer , Product , Gcas ไม่เจอเลยไม่ได้เพิ่มส่วนนี้ให้นะครับ
ไม่รู้ผมเข้าใจถูกไหมนะครับ

คือ
1. หา Place โดยการ GroupBy ให้เหลือ Place 1 ตัว ถ้าซ้ำกันก็รวมกันให้ไม่ซ้ำ
2. ส่วนการหา Inhouse (จากวันที่ล่าสุด) นำคิวรี่ warehouse - รหัสสินค้า มาเชื่อม ความสัมพันธ์ กับ warehouse - จำนวนสินค้า ตรง Place
แล้วดึง Inhouse มาแสดง

แต่ กรณีที่ Place เดียวกัน แต่มี INHOUSE ไม่เหมือนกันทำยังไงครับ

SELECT [Place - Boxes (In)].Place, Nz([SumOfBoxin])+0 AS [จำนวนรับเข้า (ลัง-ห่อ)], Nz([SumOfBoxout])+0 AS [จำนวนจ่ายออก (ลัง-ห่อ)], [จำนวนรับเข้า (ลัง-ห่อ)]-[จำนวนจ่ายออก (ลัง-ห่อ)] AS [จำนวนคงเหลือ (ลัง-ห่อ)], Nz([SumOfPCSin])+0 AS [จำนวนเศษรับเข้า (ชิ้น)], Nz([SumOfPCSout])+0 AS [จำนวนเศษจ่ายออก (ชิ้น)], [จำนวนเศษรับเข้า (ชิ้น)]-[จำนวนเศษจ่ายออก (ชิ้น)] AS [จำนวนเศษคงเหลือ (ชิ้น)]
FROM (([Place - Boxes (In)] LEFT JOIN [Place - Boxes (out)] ON [Place - Boxes (In)].Place = [Place - Boxes (out)].Place) LEFT JOIN [Place - Pcs (In)] ON [Place - Boxes (In)].Place = [Place - Pcs (In)].Place) LEFT JOIN [Place - Pcs (out)] ON [Place - Boxes (In)].Place = [Place - Pcs (out)].Place;U

UNION SELECT T1.*, (select sum(T3.Inboxes) from [In] as T3 where T3.place = T1.place) AS [Sum]
FROM [In] AS T1

WHERE (((T1.date)=(select max(T2.[date]) from [In] as T2 where T2.place = T1.place)));



ลบตรงสีแดงออกครับ

ถึงเจ้าของกระทู้ และสวัสดีอาจารย์ทุกๆท่านครับ

ผมไม่แน่ใจว่าใช่ความต้องการของเจ้าของกระทู้นี้หรือเปล่าครับ...เป็น Code ในคิวรี่ ที่อาจารย์ท่านหนึ่งทำใว้ในบอร์ดนี้ แต่ผมจำชื่อไม่ได้ครับ และผมใช้ในการทำสต็อกมากว่า 1 ปี การตัดสต็อกไม่มีความผิดพลาดเลยครับ ผมแนบไฟล์มาด้วยครับ ถ้าไม่ใช่ความต้องการตามหัวข้อกระทู้ต้องขออภัยด้วยครับ

ขอบคุณครับ
   

เปลี่ยนโหมดคิวรี่จาก Design View ไปเป็น SQL View แล้วเขียนคำสั่งนี้ลงไปแทนครับ

select T1.*, (select sum(T3.Inboxes) from [In] as T3 where T3.place = T1.place) as SumOfBoxin
from [In] as T1
where T1.[date] = (select max(T2.[date]) from [In] as T2 where T2.place = T1.place)

คือ
1. สินค้ามีหลายตัวถูกไหมครับ
2. สินค้าแต่ละตัวมีการป้อนข้อมูลหลายครั้งถูกไหมครับ
3. การบันทึกข้อมูลไม่ได้เรียงกันตามวันที่ถูกไหมครับ แต่ข้อมูลที่บันทึกก็มีวันที่ของข้อมูลถูกไหมครับ

การจะรู้ว่ารายการไหนมาก่อนมาหลัง ก็อยู่ที่วันที่หรือเวลา ไม่ได้อยู่ที่รหัสสินค้าครับ เหมือนโลกนี้มีคนชื่อ "สมชาย" อยู่กี่คนไม่รู้ล่ะ การที่จะรู้ว่าสมชายคนไหนเกิดก่อน เกิดหลังก็ดูจากวันเกิด ไม่ได้ดูจากชื่อสมชาย

ดังนั้นคุณทำอย่างไรล่ะ ก็ต้องใช้ DLast หรือไม่ก็ DMax กับข้อมูลวันเกิดของสมชาย ก็จะรู้ว่าสมชายคนไหนเกิดล่าสุด (คืออายุน้อยที่สุด)

ปล. เว็บนี้มีคนชื่อสมชายไหมอะ??