Kittostockfinalize

Form KitToStockFinalizeForm

• Unit name: Forms.KitToStockFinalize
• Form name: KitToStockFinalizeForm
• Old form name: form35 (unit35)

Synopsis

Form to finalize the kit-to-stock move operation.

Functionalities

1. Introduce properties:
2. OrderKitID (Int64) the order kit
3. Quantity (integer)
4. LotNumber (string)
5. ExpiryDate (TDateTime)
6. Label to show kit order ID.
7. Label to show kit quanity.
8. Grid to show kit details, view KitDoneDetails:
9. Dropdown to select location: P.00.00.A P.99.00.A only these 2 locations can be chosen.
10. Button to execute FinalizeKit action.
11. Button to execute Cancel action.

Actions

FinalizeKit

1. Enabled when there are records in view KitDoneDetails, and a location was selected.
2. Execute service call Kitting.KitToStock
3. Show message that kit stock was succesfully moved.
4. Close form, go back to main form.

Cancel

1. Always enabled.
2. Closes form.

Tables/Views

• Location
• KitDoneDetails

  SELECT
    DISTINCT B.ArtCode,
    A.ExpiryDATE,
    A.Lotno,
    D.UnitQTY AS UnitQTY,
    sum(B.QTYCF) AS PK_QTY,
    C.ARTCODE AS MARTCODE
  FROM
    INVDETAILS A
    INNER JOIN OUTDETAILS B ON A.ID = B.INVOICENO
    INNER JOIN CGROUP C ON ('KG' + CAST (C.ID AS VARCHAR (15))= B.AVIZNO)
    INNER JOIN CGROUPDET D ON  (D.ARTCODE = B.ARTCODE) AND (D.IDNO = C.ID)
  WHERE
    (B.AVIZNO = :OrderKitID)
    AND (pickedby<>'')
    AND (checkedby= '')
  GROUP BY
    B.ArtCode,
    A.ExpiryDATE,
    A.Lotno,
    D.UnitQTY,
    C.ARTCODE
  ORDER BY
    B.ARTCODE,
    A.Lotno ASC
  

Needed Service Calls

Call 1

Call 2

Reports