Chơng iii
6. Các thuật toán chính của chơng trình
Bắt đầu Chọn tệp Định khoản Tính tổng của trường "Thành tiền" theo từng "Mã sản phẩm" Đọc bản ghi Tính giá thành đơn vị sản phẩm từng loại Chuyển sang bản
ghi tiếp theo
Đ
s
đ <Điều kiện về thời gian>
Đ Cập nhật giá Kết thúc <TK nợ = 154> <TK nợ = 155>
Tính tổng của trường "Số lượng" theo từng "Mã sản phẩm" Bản ghi cuối ? đ s s s
Thuật toán tính giá thành sản xuất
Bắt đầu
Mở các tệp cần thiết để phân bổ
Tạo ra tệp các tạm thời để lưu các kết quả trung gian
Chọn tệp DANH Mục Phân Bổ
Đọc bản ghi
Kiểm tra biến M.Chọn=[x]
Xác định bút toán phân bổ: TK nợ,TK có
Phân bổ chi phí sản xuất theo bút toán đã xác định
Định khoản kết quả phân
bổ vào tệp định khoản Chuyển sang bản
ghi tiếp theo Bản ghi cuối ? Đ Đ s s Kết thúc Xóa các tệp Tạm thời
Thuật toán tổng quát phân bổ chi phí sản xuất
Trang - 83 -
Bắt đầu
Chọn tệp Định khoản
Tính tổng của trường "Thành tiền" theo từng "Mã vật tư"
Lưu kết quả vào tệp tạm thời Đọc bản ghi Tính tỉ lệ phân bổ vật liệu chính Chọn tệp định mức Chuyển sang bản
ghi tiếp theo Bản ghi cuối ? Đ
s
s
<Điều kiện về thời gian> .AND.<TK nợ=6211> Đ Phân bổ chi phí vật liệu chính Định khoản kết quả phân bổ Bắt đầu
Thuật toán phân bổ chi phí nguyên vật liệu chính
Bắt đầu
Lấy các tham số để lập báo cáo
Xử lý số liệu để tạo ra một tệp tạm trước khi lên báo cáo Lọc ra các số liệu từ các tệp dữ
liệu phát sinh và số dư
Preview báo cáo
In báo cáo
Kết thúc Browse tệp số liệu tạm thời
Browse tệp số liệu tạm thời
Thuật toán tổng quát lập báo cáo
Kết luận