Báo cáo vật tư xuất-nhập-tồn : dữ liệu nhập tổng/xuất chi tiết

Liên hệ QC

soledad_90

Thành viên thường trực
Tham gia
12/1/10
Bài viết
253
Được thích
47
Giới tính
Nam
Hiện tại bộ phận kho của em đang theo giõi vật tư đóng gói theo hình thức :
./ Tồn ĐK + Nhập kho tổng theo Po đơn đặt hàng phòng thu mua cho nhà cung ứng
./ Xuất kho chi tiết theo từng Đơn hàng/mã hàng/màu sắc ( SO theo khách hàng)
Hàng tháng khi làm báo cáo Xuất-Nhập-Tồn rất mất thời gian trong việc tìm kiếm, tổng hợp trong dữ liệu xuất kho.
Mong nhận được sự hướng dẫn và đoạn code phù hợp cho thao tác thủ công được giảm thiểu đi ạ .
Em cảm ơn !

1615867559829.png1615867581103.png1615867599497.png1615867623217.png
 

File đính kèm

  • 210316_BAOCAOX-N-T.xlsx
    49 KB · Đọc: 43
Đây là kết quả cho 1 mặt hàng . . . 03 sau khi chạy macro sự kiện dưới đây:

STTNgàyLoại N/XĐH muaĐH bánMã hàngMàuQuy cáchSố LượngDVTGC
1​
3/13/2021​
Nhâp
16​
2​
3/15/2021​
Nhâp
9​
3​
3/18/2021​
Nhâp
16​
4​
3/22/2021​
Xuât
9​
5​
3/22/2021​
Xuât
16​
6​
3/23/2021​
Nhâp
11​
7​
3/24/2021​
Nhâp
11​
8​
3/24/2021​
Nhâp
21​
9​
3/24/2021​
Nhâp
20​
10​
3/24/2021​
Nhâp
16​
11​

PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, [I4]) Is Nothing Then
    Dim Sh As Worksheet, Rng As Range, sRng As Range
    Dim fDat As Date, lDat As Date, Rws As Long, SoNgay As Integer, J As Integer
    Dim MyAdd As String
    
    fDat = [I3].Value:              lDat = [K3].Value
    SoNgay = lDat - fDat + 1
1 ' Xóa Du Liêu Cu:      '
    Rws = [C7].CurrentRegion.Rows.Count
    [C7].Resize(Rws, 9).ClearContents
    Application.ScreenUpdating = False
    For J = 0 To SoNgay
2 ' Nhâp     '
        Set Sh = ThisWorkbook.Worksheets("NhapKho")
        Rws = Sh.[C2].CurrentRegion.Rows.Count
        Set Rng = Sh.[C3].Resize(Rws)
        Rng.NumberFormat = "MM/DD/yyyy"
        Set sRng = Rng.Find(Format(fDat + J, "MM/DD/yyyy"), , xlValues, xlWhole)
        If Not sRng Is Nothing Then
            MyAdd = sRng.Address
            Do
                If sRng.Offset(, 1).Value = Target.Value Then
                    [C9999].End(xlUp).Offset(1).Value = Format(fDat + J, "MM/DD/yyyy")
                    [C9999].End(xlUp).Offset(, 1).Value = "Nhâp"
                    [C9999].End(xlUp).Offset(, 7).Value = sRng.Offset(, 9).Value    '"SL" '
                End If
                Set sRng = Rng.FindNext(sRng)
            Loop While Not sRng Is Nothing And sRng.Address <> MyAdd
        End If
3 'Xuât      '
        Set Sh = ThisWorkbook.Worksheets("XuatKho")
        Rws = Sh.[C2].CurrentRegion.Rows.Count
        Set Rng = Sh.[C3].Resize(Rws)
        Rng.NumberFormat = "MM/DD/yyyy"
        Set sRng = Rng.Find(Format(fDat + J, "MM/DD/yyyy"), , xlValues, xlWhole)
        If Not sRng Is Nothing Then
            MyAdd = sRng.Address
            Do
                If sRng.Offset(, 1).Value = Target.Value Then
                    [C9999].End(xlUp).Offset(1).Value = Format(fDat + J, "MM/DD/yyyy")
                    [C9999].End(xlUp).Offset(, 1).Value = "Xuât"
                    [C9999].End(xlUp).Offset(, 7).Value = sRng.Offset(, 8).Value    '"SL X" '
                End If
                Set sRng = Rng.FindNext(sRng)
            Loop While Not sRng Is Nothing And sRng.Address <> MyAdd
        End If
        
    Next J
    Application.ScreenUpdating = True
 End If
End Sub

(Macro này bạn có thể cô gọn thêm!)
 
Upvote 0
Toppic này xin nhận thêm sự giúp đỡ từ các thành viên của diễn đàn, cho file yêu cầu này ạ.
Em xin cảm ơn!
Fo tôi góp vui chống dịch.
Bạn thử file đính kèm. Tôi chỉ làm phần tổng hợp NXT trong tháng (không biêt có đúng ý không)
Trong đó có liệt kê (không trùng) các thị trường đã xuất bán, các đơn hàng, mã hàng, màu.
Bạn chỉ cần nhấn nút TỔNG HỢP... và kiểm tra kết quả. Hãy kiểm tra và test thấy kỹ bởi vì tôi không kiểm tra kỹ được.
Thêm bớt dũ liệu và chạy code===> Kiểm tra
 

File đính kèm

  • GPE_NXT_CS.xlsm
    102.3 KB · Đọc: 6
Upvote 0
Fo tôi góp vui chống dịch.
Bạn thử file đính kèm. Tôi chỉ làm phần tổng hợp NXT trong tháng (không biêt có đúng ý không)
Trong đó có liệt kê (không trùng) các thị trường đã xuất bán, các đơn hàng, mã hàng, màu.
Bạn chỉ cần nhấn nút TỔNG HỢP... và kiểm tra kết quả. Hãy kiểm tra và test thấy kỹ bởi vì tôi không kiểm tra kỹ được.
Thêm bớt dũ liệu và chạy code===> Kiểm tra
Em cảm ơn sự giúp đỡ ạ. Tại kết quả hiển thị chưa đúng theo nhu cầu ạ
Tại sheet BCXNT với vật tư là thùng ( tên vật tư "in" ) sẽ hiển thị các cột Quốc gia/đơn hàng bán KH/mã hàng/màu và sẽ hiển thị theo từng dòng
Với vật tư là hộp và thùng ( loại tên vật tư không hiển thị chữ in ) thì chỉ cần hiển thị tên vật tư và quy cách.
Giống như hình kết quả em có hiển thị kết quả mẫu .
Em cảm ơn ạ.

1647564692291.png1647564720129.png
Bài đã được tự động gộp:

Đây là kết quả cho 1 mặt hàng . . . 03 sau khi chạy macro sự kiện dưới đây:

STTNgàyLoại N/XĐH muaĐH bánMã hàngMàuQuy cáchSố LượngDVTGC
1​
3/13/2021​
Nhâp
16​
2​
3/15/2021​
Nhâp
9​
3​
3/18/2021​
Nhâp
16​
4​
3/22/2021​
Xuât
9​
5​
3/22/2021​
Xuât
16​
6​
3/23/2021​
Nhâp
11​
7​
3/24/2021​
Nhâp
11​
8​
3/24/2021​
Nhâp
21​
9​
3/24/2021​
Nhâp
20​
10​
3/24/2021​
Nhâp
16​
11​

PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, [I4]) Is Nothing Then
    Dim Sh As Worksheet, Rng As Range, sRng As Range
    Dim fDat As Date, lDat As Date, Rws As Long, SoNgay As Integer, J As Integer
    Dim MyAdd As String
   
    fDat = [I3].Value:              lDat = [K3].Value
    SoNgay = lDat - fDat + 1
1 ' Xóa Du Liêu Cu:      '
    Rws = [C7].CurrentRegion.Rows.Count
    [C7].Resize(Rws, 9).ClearContents
    Application.ScreenUpdating = False
    For J = 0 To SoNgay
2 ' Nhâp     '
        Set Sh = ThisWorkbook.Worksheets("NhapKho")
        Rws = Sh.[C2].CurrentRegion.Rows.Count
        Set Rng = Sh.[C3].Resize(Rws)
        Rng.NumberFormat = "MM/DD/yyyy"
        Set sRng = Rng.Find(Format(fDat + J, "MM/DD/yyyy"), , xlValues, xlWhole)
        If Not sRng Is Nothing Then
            MyAdd = sRng.Address
            Do
                If sRng.Offset(, 1).Value = Target.Value Then
                    [C9999].End(xlUp).Offset(1).Value = Format(fDat + J, "MM/DD/yyyy")
                    [C9999].End(xlUp).Offset(, 1).Value = "Nhâp"
                    [C9999].End(xlUp).Offset(, 7).Value = sRng.Offset(, 9).Value    '"SL" '
                End If
                Set sRng = Rng.FindNext(sRng)
            Loop While Not sRng Is Nothing And sRng.Address <> MyAdd
        End If
3 'Xuât      '
        Set Sh = ThisWorkbook.Worksheets("XuatKho")
        Rws = Sh.[C2].CurrentRegion.Rows.Count
        Set Rng = Sh.[C3].Resize(Rws)
        Rng.NumberFormat = "MM/DD/yyyy"
        Set sRng = Rng.Find(Format(fDat + J, "MM/DD/yyyy"), , xlValues, xlWhole)
        If Not sRng Is Nothing Then
            MyAdd = sRng.Address
            Do
                If sRng.Offset(, 1).Value = Target.Value Then
                    [C9999].End(xlUp).Offset(1).Value = Format(fDat + J, "MM/DD/yyyy")
                    [C9999].End(xlUp).Offset(, 1).Value = "Xuât"
                    [C9999].End(xlUp).Offset(, 7).Value = sRng.Offset(, 8).Value    '"SL X" '
                End If
                Set sRng = Rng.FindNext(sRng)
            Loop While Not sRng Is Nothing And sRng.Address <> MyAdd
        End If
       
    Next J
    Application.ScreenUpdating = True
 End If
End Sub

(Macro này bạn có thể cô gọn thêm!)
1647565515341.png
Em chạy Macro có báo như hình này ạ .
 
Upvote 0
Em cảm ơn sự giúp đỡ ạ. Tại kết quả hiển thị chưa đúng theo nhu cầu ạ
Tại sheet BCXNT với vật tư là thùng ( tên vật tư "in" ) sẽ hiển thị các cột Quốc gia/đơn hàng bán KH/mã hàng/màu và sẽ hiển thị theo từng dòng
Với vật tư là hộp và thùng ( loại tên vật tư không hiển thị chữ in ) thì chỉ cần hiển thị tên vật tư và quy cách.
Giống như hình kết quả em có hiển thị kết quả mẫu .
Em cảm ơn ạ.
Chỉnh lại. bổ xung thêm sắp xếp lại kết quả: Hộp - Thùng.
Chạy code==> kiểm tra==> báo lại kết quả
 

File đính kèm

  • GPE_NXT_CS.xlsm
    104 KB · Đọc: 7
Upvote 0
View attachment 273292
File hiển thị cho kết quả chưa đúng với yêu cầu ạ
Em có làm tay và kèm hình ảnh này ạ.
Tôi hiểu ngược lại ý bạn muốn.
Bạn mở modul 1 ra và tìm Dòng code sau
Mã:
If XUAT(i, 8) <> "In" Then
Thay thành:
Mã:
If XUAT(i, 8) = "In" Then
Và chay thử. (kết quả trả về nhanh hơn đến không ngờ)
 
Upvote 0
Tôi hiểu ngược lại ý bạn muốn.
Bạn mở modul 1 ra và tìm Dòng code sau
Mã:
If XUAT(i, 8) <> "In" Then
Thay thành:
Mã:
If XUAT(i, 8) = "In" Then
Và chay thử. (kết quả trả về nhanh hơn đến không ngờ)
1647577339606.png

Em có làm như hướng dẫn nhưng KQ hiển thị vẫn chưa được đúng ạ.
 
Upvote 0

File đính kèm

  • GPE_NXT_CS.xlsm
    99.9 KB · Đọc: 7
Upvote 0
Bạn chạy thử file của tôi gửi kem sau đây. (có thể bạn chỉ sửa một dòng
If XUAT(i, 8) <> "In" Then
Trong khi trong modul có 2 dòng như vậy.
1647581543322.png

Về loại hộp đã hiển thị đúng rồi ạ
Còn về thùng thì chưa được đúng . Em có hiển thị lại kết quả bằng tay ạ
Với loại hàng không có xuất , nhưng tại kỳ báo cáo XNT vẫn cần được thể hiện ra luôn ạ, giống như phần tô vàng ạ
Em cảm ơn nhiều ạ.
 
Upvote 0
View attachment 273300

Về loại hộp đã hiển thị đúng rồi ạ
Còn về thùng thì chưa được đúng . Em có hiển thị lại kết quả bằng tay ạ
Với loại hàng không có xuất , nhưng tại kỳ báo cáo XNT vẫn cần được thể hiện ra luôn ạ, giống như phần tô vàng ạ
Em cảm ơn nhiều ạ.
Nhìn vào hình bạn gửi thì 2 dòng tô vàng đó giồng nhau chỉ khác có màu (AC6 và ACE)===> bạn muốn phân biệt cả màu nữa à. vậy thì xem file
 

File đính kèm

  • GPE_NXT_CS (có màu).xlsb
    76.5 KB · Đọc: 16
Upvote 0
View attachment 273318
Khi em chạy kết quả báo lỗi như hình ảnh này ạ.\
Máy tôi chạy không báo lỗi nhưng khi kiểm tra lại kết quả tôi nhận thấy:
1,Sheet DMVTHH: Không thấy có VTHH nào có màu.
2/Sheet TON: Chỉ có 3 VTHH (loại thùng là có màu)==> các VTHH cũng đang Tồn khác thì sao?
3/Sheet NHAP: Chỉ có các loại VTHH thuộc loại Thùng và tên VTHH là In mới có màu.===> các loại VTHH khác đã được Nhập vào thì thế nào?
4/Sheet XUAT: Chủng loại VTHH thùng, hộp đều có màu,Tên VTHH là In hay không In đều có màu, cứ có VTHH xuất là có ghi màu(100% bản ghi). Vậy Nhưng VTHH này khi XUAT thì lấy từ đâu? khi Danh mục VTHH và NHAP không phân biệt Màu.====> tất nhiên là khi làm Báo cáo NXT cũng không thể đòi hỏi phân tích chi tiết VTHH theo Mã , chủng loại và cả Màu được như bài #74 bạn yêu cầu "....Với loại hàng không có xuất , nhưng tại kỳ báo cáo XNT vẫn cần được thể hiện ra luôn ạ, giống như phần tô vàng ạ". Phần tô vàng của bạn là 2 dòng giống hệt nhau tất cả các trường trừ trường Màu sắc (AC6 và ACE). dẫn đến bài #75 tôi bị hiểu sai và code theo hướng sai này.

Bạn giải thích những vấn đề nêu trên được không? Nếu không dùng VBA thì bạn tính thế nào? Lời giải thích của bạn sẽ ảnh hưởng đến kết quả tính toán của code. Chỉ có giải thích thỏa đáng thì người giúp mới code đúng hướng được.
Ngóng chờ hồi âm.
 
Upvote 0
Máy tôi chạy không báo lỗi nhưng khi kiểm tra lại kết quả tôi nhận thấy:
1,Sheet DMVTHH: Không thấy có VTHH nào có màu.
2/Sheet TON: Chỉ có 3 VTHH (loại thùng là có màu)==> các VTHH cũng đang Tồn khác thì sao?
3/Sheet NHAP: Chỉ có các loại VTHH thuộc loại Thùng và tên VTHH là In mới có màu.===> các loại VTHH khác đã được Nhập vào thì thế nào?
4/Sheet XUAT: Chủng loại VTHH thùng, hộp đều có màu,Tên VTHH là In hay không In đều có màu, cứ có VTHH xuất là có ghi màu(100% bản ghi). Vậy Nhưng VTHH này khi XUAT thì lấy từ đâu? khi Danh mục VTHH và NHAP không phân biệt Màu.====> tất nhiên là khi làm Báo cáo NXT cũng không thể đòi hỏi phân tích chi tiết VTHH theo Mã , chủng loại và cả Màu được như bài #74 bạn yêu cầu "....Với loại hàng không có xuất , nhưng tại kỳ báo cáo XNT vẫn cần được thể hiện ra luôn ạ, giống như phần tô vàng ạ". Phần tô vàng của bạn là 2 dòng giống hệt nhau tất cả các trường trừ trường Màu sắc (AC6 và ACE). dẫn đến bài #75 tôi bị hiểu sai và code theo hướng sai này.

Bạn giải thích những vấn đề nêu trên được không? Nếu không dùng VBA thì bạn tính thế nào? Lời giải thích của bạn sẽ ảnh hưởng đến kết quả tính toán của code. Chỉ có giải thích thỏa đáng thì người giúp mới code đúng hướng được.
Ngóng chờ hồi âm.
Em cảm ơn anh rất nhiều về sự quan tâm nhiệt tình cho Topic này của em ạ.
Tối qua khi mở máy ở nhà ( office 2013) thì báo lỗi, hôm nay e nên công ty ( office 2019 ) thì file chạy tốt không báo lỗi ạ.
1./ DMVTHH loại Thùng (In) sẽ là dùng chung cho các quốc gia/so/mã hàng/màu nếu có cùng quy cách là giống nhau :
VD :
THU000000004Chile
229402​
S0003C0C90In51*51*37.5
THU000000004Mỹ
235642​
S0003E0
901​
In51*51*37.5
Còn loại Thùng không in ( cột Tên vật tư bỏ trống tức là không in ) Thì sẽ có MVTHH khác.
STTMVTHH mớiMVTHH cũTên vật tưQuy cáchTên vật tưĐVTChủng loại Vtu
543​
THU000000004In51*51*37.5Thùng 51*51*37.5 (In),CáiThùng
639​
THU00000010051*51*37.5Thùng 51*51*37.5CáiThùng
==> MVTHH sẽ không chi tiết tới từng quốc gia/S0/mã hàng/màu : mà chỉ dừng ở mức độ là quy cách khách nhau và chủng loại khác nhau thì MVTHH sẽ khác nhau:
2./ ( Sheet Ton) Dữ liệu file gửi nên là VD nên sẽ không thể hiện nhiều, với Dữ liệu xuyên xuốt sẽ phát sinh rất nhiều ạ . gôm loại in và không in
3./ ( Sheet Nhạp) Các loại VTHH khác sẽ nhập liệu là MVTHH + Tên VTHH + Quy cách + số lượng : VD như hình ảnh 1647662847227.png
4./ (Sheet Xuat) Chủng loại VTHH thùng, hộp đều có màu,Tên VTHH là In hay không In đều có màu, cứ có VTHH xuất là có ghi màu(100% bản ghi). Vậy Nhưng VTHH này khi XUAT thì lấy từ đâu? khi Danh mục VTHH và Nhap không phân biệt Màu : Khi anh nói tới điểm này thì yêu cầu BC XNT của e khi muốn xuất hiện cả Quốc gia/S0/mã hàng/màu là đang chưa hiểu vấn đề nên đưa ra yêu cầu không đúng khi phần DMVTHH đang dùng chung MVTHH
không phân tách chi tiết theo từng Quốc gia/s0/mã hàng/màu.
1647663124899.png
Bài đã được tự động gộp:

Máy tôi chạy không báo lỗi nhưng khi kiểm tra lại kết quả tôi nhận thấy:
1,Sheet DMVTHH: Không thấy có VTHH nào có màu.
2/Sheet TON: Chỉ có 3 VTHH (loại thùng là có màu)==> các VTHH cũng đang Tồn khác thì sao?
3/Sheet NHAP: Chỉ có các loại VTHH thuộc loại Thùng và tên VTHH là In mới có màu.===> các loại VTHH khác đã được Nhập vào thì thế nào?
4/Sheet XUAT: Chủng loại VTHH thùng, hộp đều có màu,Tên VTHH là In hay không In đều có màu, cứ có VTHH xuất là có ghi màu(100% bản ghi). Vậy Nhưng VTHH này khi XUAT thì lấy từ đâu? khi Danh mục VTHH và NHAP không phân biệt Màu.====> tất nhiên là khi làm Báo cáo NXT cũng không thể đòi hỏi phân tích chi tiết VTHH theo Mã , chủng loại và cả Màu được như bài #74 bạn yêu cầu "....Với loại hàng không có xuất , nhưng tại kỳ báo cáo XNT vẫn cần được thể hiện ra luôn ạ, giống như phần tô vàng ạ". Phần tô vàng của bạn là 2 dòng giống hệt nhau tất cả các trường trừ trường Màu sắc (AC6 và ACE). dẫn đến bài #75 tôi bị hiểu sai và code theo hướng sai này.

Bạn giải thích những vấn đề nêu trên được không? Nếu không dùng VBA thì bạn tính thế nào? Lời giải thích của bạn sẽ ảnh hưởng đến kết quả tính toán của code. Chỉ có giải thích thỏa đáng thì người giúp mới code đúng hướng được.
Ngóng chờ hồi âm.
Em xin nhận tư vấn thêm để cách theo giõi cho chủng loại hàng hóa là Thùng loại tên vật tư In
Để có thể hiển thị tại báo cáo XNT với chi tiết là từng dòng : Quốc gia / S0/mã hàng/màu / quy cách / số lượng
Em cảm ơn anh ạ.
 
Upvote 0
Em cảm ơn anh rất nhiều về sự quan tâm nhiệt tình cho Topic này của em ạ.
Tối qua khi mở máy ở nhà ( office 2013) thì báo lỗi, hôm nay e nên công ty ( office 2019 ) thì file chạy tốt không báo lỗi ạ.
1./ DMVTHH loại Thùng (In) sẽ là dùng chung cho các quốc gia/so/mã hàng/màu nếu có cùng quy cách là giống nhau :
VD :
THU000000004Chile
229402​
S0003C0C90In51*51*37.5
THU000000004Mỹ
235642​
S0003E0
901​
In51*51*37.5
Còn loại Thùng không in ( cột Tên vật tư bỏ trống tức là không in ) Thì sẽ có MVTHH khác.
STTMVTHH mớiMVTHH cũTên vật tưQuy cáchTên vật tưĐVTChủng loại Vtu
543​
THU000000004In51*51*37.5Thùng 51*51*37.5 (In),CáiThùng
639​
THU00000010051*51*37.5Thùng 51*51*37.5CáiThùng
==> MVTHH sẽ không chi tiết tới từng quốc gia/S0/mã hàng/màu : mà chỉ dừng ở mức độ là quy cách khách nhau và chủng loại khác nhau thì MVTHH sẽ khác nhau:
2./ ( Sheet Ton) Dữ liệu file gửi nên là VD nên sẽ không thể hiện nhiều, với Dữ liệu xuyên xuốt sẽ phát sinh rất nhiều ạ . gôm loại in và không in
3./ ( Sheet Nhạp) Các loại VTHH khác sẽ nhập liệu là MVTHH + Tên VTHH + Quy cách + số lượng : VD như hình ảnh
4./ (Sheet Xuat) Chủng loại VTHH thùng, hộp đều có màu,Tên VTHH là In hay không In đều có màu, cứ có VTHH xuất là có ghi màu(100% bản ghi). Vậy Nhưng VTHH này khi XUAT thì lấy từ đâu? khi Danh mục VTHH và Nhap không phân biệt Màu : Khi anh nói tới điểm này thì yêu cầu BC XNT của e khi muốn xuất hiện cả Quốc gia/S0/mã hàng/màu là đang chưa hiểu vấn đề nên đưa ra yêu cầu không đúng khi phần DMVTHH đang dùng chung MVTHH
không phân tách chi tiết theo từng Quốc gia/s0/mã hàng/màu.

Em xin nhận tư vấn thêm để cách theo giõi cho chủng loại hàng hóa là Thùng loại tên vật tư In
Để có thể hiển thị tại báo cáo XNT với chi tiết là từng dòng : Quốc gia / S0/mã hàng/màu / quy cách / số lượng
Em cảm ơn anh ạ.
Nếu BCNXT mà cần yêu cầu phân tích VTHH theo (Quốc gia / S0/mã hàng/màu / quy cách / số lượng) thì theo tôi: MaVTHH là ký hiệu quy ước để phân biệt VTHH này khác với tất cả VTHH khác. Do vậy nếu có thể thì ngoài tên gợi nhớ của VTHH thì có thể tích hợp các yếu tố khác nữa (như nguồn gốc xuất xứ =2 ký tự , Ví dụ: 01=Mỹ, 02: trung quốc, 03=Anh,04=,Đức...), quy cách ( T=thùng, H=hộp,L= lẻ,...) chủng loại (100W,100%alcol, 100cc, ...), kích cỡ (W,WL,XL,XX..), màu sắc( R=đỏ, Y=Vàng, B=xanh....), và IN hay không IN nữa thì tùy.
Ví dụ bạn nhập Máy ô tô từ Mỹ về VN; Loại ô tô nguyên chiếc, dung tích xi lanh có 2 loại 1500cc và 1750cc, màu Xanh-Trắng và Xanh-Đen...
Thì mã VTHH của bạn sẽ là: CV01NC15BW khi nhìn vào ta sẽ thấy
02 ký tự đầu (tên HH-kiểu) =CV=ô tô du lịch kiểu xe van , WF = xe tải
02 ký tự tiếp theo (nguồn gốc) = 01 = Mỹ
02 Ký tụ tiếp theo (quy cách)=NC=nguyên chiếc
02 ký tự tiếp theo (chủng loại) =15=1500cc , nếu đầu là WF thì 15 này là tải trọng = 15 tấn
02 Ký tự tiếp theo (màu sắc)=BW= Xanh - trắng
....
Khi Tổng hợp NXT thì sẽ phân tích cụ thể một cách chính xác.
Trở lại với bài và yêu cầu của bạn:
+Nếu BCNXT không phân tích màu thì code sẽ cho ra kết quả chính xác các VTHH có TON, NHAP và XUAT trong thời gian ấn định;
+Nếu BCNXT yêu cầu phân tích dữ liệu cả theo màu sắc nữa thì tôi e rằng code chạy sẽ cho kết quả không đúng với yêu cầu của bạn. Bởi vì khi code sẽ hiểu VTHH Nhập khác với VTHH XUAT (bạn chạy code sẽ thấy điều đó- Điều này khi bạn gửi bài#76 tôi mới kiểm tra và phát hiện). Nếu NHAP không theo dõi màu (Thì bạn không thể xác định được trong kho của bạn hiện còn bao nhiêu hàng hoá, chứ chưa nói đến là hàng hóa ấy có mã và màu gì); đến khi XUAT lại có yêu cầu là phân tích màu của VTHH, Kho hàng mà bạn đã không nắm chắc, vậy thì hỏi rằng căn cứ gì để xuất hàng, hay là cứ xuất loại hàng cùng mã.
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom