炸药入库登记

graph TD Start((开始)) --> A[录入入库日期、入库单号] A --> B[选择供商编号，自动带出供商名称] B --> C[填写负责人、总金额] C --> D{总金额 > 0？} D -->|是| E[填写优惠金额] D -->|否| End((结束)) E --> F{优惠金额 >= 0 且 优惠金额 <= 总金额？} F -->|是| G[计算实付金额 = 总金额 - 优惠金额] F -->|否| E G --> H[填写实付金额] H --> I{实付金额 = 总金额 - 优惠金额？} I -->|是| J[计算欠款金额 = 总金额 - 实付金额 - 优惠金额] I -->|否| H J --> K{欠款金额 >= 0？} K -->|是| L[填写经办人] K -->|否| H L --> M[保存入库登记] M --> End((结束))