FitNesse On WMS with Contract Purchase

Automated Testing Tools are used to assure modifications are always backward compatible and safe for production
Forum rules
This forum is personally pruned to avoid redundant posts. Related topics are moved to the same sub-forum. Language will be corrected for readability.

FitNesse On WMS with Contract Purchase

Postby red1 » Sat Oct 07, 2017 11:59 am

Script of a full scenario test (with screenshots of results below it):
!include -c LogInto

!|UpdateRecord|
|*Table* |C_DocType|
|*Where*||
|Name|'MM Receipt'|
|*Update*||
|IsDefault|true|

!|Create Record Auto|
|*Table* |PM_Contract|
|||
|C_BPartner_ID|@Ref=C_BPartner[Name='Seed Farm Inc.'].C_BPartner_ID|
|M_PriceList_Version_ID|@Ref= M_PriceList_Version[Name='Purchase 2003'].M_PriceList_Version_ID|
|*Save* | |

!|Create Record Auto|
|*Table* |PM_ContractPurchase|
|PM_Contract_id |@PM_Contract.PM_Contract_id@ |
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 2'].WM_Gate_ID|
|*Save* | |

!|Create Record Auto|
|*Table* |PM_ContractDelivery|
|PM_ContractPurchase_id |@PM_ContractPurchase.PM_ContractPurchase_id@ |
|M_Product_ID|127|
|qtyordered |4|
|*Save* | |

!|Create Record Auto|
|*Table* |PM_ContractDelivery|
|PM_ContractPurchase_id |@PM_ContractPurchase.PM_ContractPurchase_id@ |
|M_Product_ID|128|
|qtyordered |6|
|*Save* | |

!|Run Process |
|*ProcessValue*|PM_DeliveryGenerate |
|*RecordID* |@PM_Contract.PM_Contract_ID@|
|*Run* | |

!|Read Record|
|*Table* |WM_DeliverySchedule|
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 2'].WM_Gate_ID|
|*Read*||
|WM_DeliverySchedule_ID||

!|Read Record|
|*Table* |WM_DeliveryScheduleLine|
|WM_DeliverySchedule_ID|@WM_DeliverySchedule.WM_DeliverySchedule_ID@|
|qtyordered |4|
|*Read*||
|WM_DeliveryScheduleLine_ID||
|C_OrderLine_ID||
|M_Product_ID||

!|Read Record|
|*Table* |C_OrderLine|
|C_OrderLine_ID|@WM_DeliveryScheduleLine.C_OrderLine_ID@|
|*Read*||
|C_Order_ID||
|M_Product_ID||

!|Read Record|
|*Table* |WM_DeliveryScheduleLine|
|WM_DeliverySchedule_ID|@WM_DeliverySchedule.WM_DeliverySchedule_ID@|
|qtyordered |6|
|*Read*||
|WM_DeliveryScheduleLine_ID||
|C_OrderLine_ID||
|M_Product_ID||

!|Read Record|
|*Table* |C_OrderLine|
|C_OrderLine_ID|@WM_DeliveryScheduleLine.C_OrderLine_ID@|
|*Read*||
|C_Order_ID||
|M_Product_ID||

!|UpdateRecord|
|*Table* |WM_DeliveryScheduleLine|
|*Where*||
|QtyOrdered|4|
|*Update*||
|QtyDelivered|3|

!|Read Record|
|*Table* |WM_DeliveryScheduleLine|
|qtyordered |4|
|*Read*||
|WM_DeliveryScheduleLine_ID||
|C_OrderLine_ID||
|M_Product_ID||
|QtyOrdered||
|QtyDelivered||
|IsBackOrder||

!|Read Record|
|*Table* |WM_HandlingUnit|
|WM_HandlingUnit_ID|@Ref=WM_HandlingUnit[Name='HU01'].WM_HandlingUnit_ID|
|*Read*||
|WM_HandlingUnit_ID||

!|Set DocAction|
|*Table*|WM_DeliverySchedule|
|WM_DeliverySchedule_ID|@WM_DeliverySchedule.WM_DeliverySchedule_ID@|
|docAction |CO |
|*Save* | |

!|ReadInfoWindow|
|*InfoWindow*|Delivery Schedule to Putaway/Picking|
|*WHERE*|b.IsSOTrx='N'|

!|RunProcess|
|*ProcessValue*|CreatePutawayList|
|WM_HandlingUnit_ID|@WM_HandlingUnit.WM_HandlingUnit_ID@|
|IsSameLine|Y|
|IsSameDistribution|N|
|*Run*||

!|Read Record|
|*Table* |WM_InOut|
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 2'].WM_Gate_ID|
|*Read*||
|WM_InOut_ID||

!|Set DocAction|
|*Table*|WM_InOut|
|WM_InOut_ID|@WM_InOut.WM_InOut_ID@|
|docAction |CO |
|*Save* | |

!|Read Record|
|*Table* |WM_InOutLine|
|WM_InOut_ID|@WM_InOut.WM_InOut_ID@|
|QtyPicked|3|
|*Read*||
|M_InOutLine_ID||

!|Read Record|
|*Table* |M_InOutLine|
|M_InOutLine_ID|@WM_InOutLine.M_InOutLine_ID@|
|*Read*||
|M_InOut_ID||

!|Set DocAction|
|*Table*|M_InOut|
|M_InOut_ID|@M_InOutLine.M_InOut_ID@|
|docAction |CO |
|*Save* | |

!|ReadInfoWindow|
|*InfoWindow*|Contract BackOrder Info-Window|
|*WHERE*|a.IsActive='Y'|

!|RunProcess|
|*ProcessValue*|CreateDeliverySchedule|
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 3'].WM_Gate_ID|
|*Run*||

!|Read Record|
|*Table* |WM_DeliverySchedule|
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 3'].WM_Gate_ID|
|*Read*||
|WM_DeliverySchedule_ID||

!|Read Record|
|*Table* |WM_DeliveryScheduleLine|
|WM_DeliverySchedule_ID|@WM_DeliverySchedule.WM_DeliverySchedule_ID@|
|*Read*||
|QtyOrdered ||
|QtyDelivered ||
|C_OrderLine_ID||
|M_Product_ID||

!|Read Record|
|*Table* |WM_DeliveryScheduleLine|
|qtyordered |4|
|*Read*||
|WM_DeliveryScheduleLine_ID||
|C_OrderLine_ID||
|M_Product_ID||
|QtyOrdered||
|QtyDelivered||
|IsBackOrder||

Results:

Screen Shot 2017-10-07 at 11.47.49 AM.png
Screen Shot 2017-10-07 at 11.47.49 AM.png (60.24 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.48.03 AM.png
Screen Shot 2017-10-07 at 11.48.03 AM.png (64.44 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.48.17 AM.png
Screen Shot 2017-10-07 at 11.48.17 AM.png (66.95 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.49.07 AM.png
Screen Shot 2017-10-07 at 11.49.07 AM.png (55.68 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.49.21 AM.png
Screen Shot 2017-10-07 at 11.49.21 AM.png (62.83 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.49.31 AM.png
Screen Shot 2017-10-07 at 11.49.31 AM.png (54.52 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.49.44 AM.png
Screen Shot 2017-10-07 at 11.49.44 AM.png (53.52 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.49.53 AM.png
Screen Shot 2017-10-07 at 11.49.53 AM.png (58.63 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.50.08 AM.png
Screen Shot 2017-10-07 at 11.50.08 AM.png (59.85 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.50.29 AM.png
Screen Shot 2017-10-07 at 11.50.29 AM.png (58.66 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.51.02 AM.png
Screen Shot 2017-10-07 at 11.51.02 AM.png (70.21 KiB) Viewed 72 times
Screen Shot 2017-10-07 at 11.51.27 AM.png
Screen Shot 2017-10-07 at 11.51.27 AM.png (33.56 KiB) Viewed 72 times
red1
Site Admin
 
Posts: 2705
Joined: Tue Jul 06, 2004 3:01 pm
Location: Kuala Lumpur, Malaysia

Re: FitNesse On WMS with Contract Purchase

Postby red1 » Sun Oct 08, 2017 6:55 pm

Testing with Same Product, BackOrder receipts.
Code: Select all
!include -c LogInto

!|UpdateRecord|
|*Table*            |C_DocType|
|*Where*||
|Name|'MM Receipt'|
|*Update*||
|IsDefault|true|

!|ReadRecord|
|*Table*            |C_DocType|
|Name|'MM Receipt'|
|*Read*||
|C_DocType_ID||
|IsDefault||

!|Create Record Auto|
|*Table*  |PM_Contract|
|||
|C_BPartner_ID|@Ref=C_BPartner[Name='Seed Farm Inc.'].C_BPartner_ID|
|M_Product_ID|127|
|M_PriceList_Version_ID|@Ref= M_PriceList_Version[Name='Purchase 2003'].M_PriceList_Version_ID|
|*Save*   |           |

!|Create Record Auto|
|*Table* |PM_ContractPurchase|
|PM_Contract_id |@PM_Contract.PM_Contract_id@ |
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 2'].WM_Gate_ID|
|*Save* | |

!|Create Record Auto|
|*Table* |PM_ContractDelivery|
|PM_ContractPurchase_id |@PM_ContractPurchase.PM_ContractPurchase_id@ |
|qtyordered |4|
|*Save* | |

!|Create Record Auto|
|*Table* |PM_ContractDelivery|
|PM_ContractPurchase_id |@PM_ContractPurchase.PM_ContractPurchase_id@ |
|qtyordered |6|
|*Save* | |

!|Run Process                               |
|*ProcessValue*|PM_DeliveryGenerate         |
|*RecordID*    |@PM_Contract.PM_Contract_ID@|
|*Run*         |                            |

!|Read Record|
|*Table*            |WM_DeliverySchedule|
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 2'].WM_Gate_ID|
|*Read*||
|WM_DeliverySchedule_ID||

!|Read Record|
|*Table*            |WM_DeliveryScheduleLine|
|WM_DeliverySchedule_ID|@WM_DeliverySchedule.WM_DeliverySchedule_ID@|
|qtyordered |4|
|*Read*||
|WM_DeliveryScheduleLine_ID||
|C_OrderLine_ID||
|M_Product_ID||

!|Read Record|
|*Table*            |WM_DeliveryScheduleLine|
|WM_DeliverySchedule_ID|@WM_DeliverySchedule.WM_DeliverySchedule_ID@|
|qtyordered |6|
|*Read*||
|WM_DeliveryScheduleLine_ID||
|C_OrderLine_ID||
|M_Product_ID||

!|Read Record|
|*Table*            |C_OrderLine|
|C_OrderLine_ID|@WM_DeliveryScheduleLine.C_OrderLine_ID@|
|*Read*||
|C_Order_ID||
|M_Product_ID||

!|UpdateRecord|
|*Table*            |WM_DeliveryScheduleLine|
|*Where*||
|WM_DeliveryScheduleLine_ID|@WM_DeliveryScheduleLine.WM_DeliveryScheduleLine_ID@|
|*Update*||
|QtyDelivered|3|

!|Read Record|
|*Table*            |WM_DeliveryScheduleLine|
|WM_DeliveryScheduleLine_ID|@WM_DeliveryScheduleLine.WM_DeliveryScheduleLine_ID@|
|*Read*||
|WM_DeliveryScheduleLine_ID||
|C_OrderLine_ID||
|M_Product_ID||
|QtyOrdered||
|QtyDelivered||
|IsBackOrder||

!|Read Record|
|*Table*            |WM_HandlingUnit|
|WM_HandlingUnit_ID|@Ref=WM_HandlingUnit[Name='HU01'].WM_HandlingUnit_ID|
|*Read*||
|WM_HandlingUnit_ID||

!|Set DocAction|
|*Table*|WM_DeliverySchedule|
|WM_DeliverySchedule_ID|@WM_DeliverySchedule.WM_DeliverySchedule_ID@|
|docAction   |CO       |
|*Save*  |         |

!|ReadInfoWindow|
|*InfoWindow*|Delivery Schedule to Putaway/Picking|
|*WHERE*|b.IsSOTrx='N'|

!|RunProcess|
|*ProcessValue*|CreatePutawayList|
|WM_HandlingUnit_ID|@WM_HandlingUnit.WM_HandlingUnit_ID@|
|IsSameLine|Y|
|IsSameDistribution|N|
|*Run*||

!|Read Record|
|*Table*            |WM_InOut|
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 2'].WM_Gate_ID|
|*Read*||
|WM_InOut_ID||

!|Set DocAction|
|*Table*|WM_InOut|
|WM_InOut_ID|@WM_InOut.WM_InOut_ID@|
|docAction   |CO       |
|*Save*  |  |


!|Read Record|
|*Table*            |WM_InOutLine|
|WM_InOut_ID|@WM_InOut.WM_InOut_ID@|
|QtyPicked|3|
|*Read*||
|M_InOutLine_ID||

!|Read Record|
|*Table*            |M_InOutLine|
|M_InOutLine_ID|@WM_InOutLine.M_InOutLine_ID@|
|*Read*||
|M_InOut_ID||

!|Set DocAction|
|*Table*|M_InOut|
|M_InOut_ID|@M_InOutLine.M_InOut_ID@|
|docAction   |CO       |
|*Save*  |  |

!|ReadInfoWindow|
|*InfoWindow*|Contract BackOrder Info-Window|
|*WHERE*|a.IsActive='Y'|

!|RunProcess|
|*ProcessValue*|CreateDeliverySchedule|
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 3'].WM_Gate_ID|
|*Run*||

!|Read Record|
|*Table*            |WM_DeliverySchedule|
|WM_Gate_ID|@Ref=WM_Gate[Name='Gate 3'].WM_Gate_ID|
|*Read*||
|WM_DeliverySchedule_ID||

!|Read Record|
|*Table*            |WM_DeliveryScheduleLine|
|WM_DeliverySchedule_ID|@WM_DeliverySchedule.WM_DeliverySchedule_ID@|
|*Read*||
|QtyOrdered ||
|QtyDelivered ||
|C_OrderLine_ID||
|M_Product_ID||

!|Read Record|
|*Table*            |WM_DeliveryScheduleLine|
|qtyordered |6|
|*Read*||
|WM_DeliveryScheduleLine_ID||
|C_OrderLine_ID||
|M_Product_ID||
|QtyOrdered||
|QtyDelivered||
|IsBackOrder||
red1
Site Admin
 
Posts: 2705
Joined: Tue Jul 06, 2004 3:01 pm
Location: Kuala Lumpur, Malaysia

Re: FitNesse On WMS with Contract Purchase

Postby red1 » Wed Oct 11, 2017 4:22 pm

Made movie demonstrating the above.

red1
Site Admin
 
Posts: 2705
Joined: Tue Jul 06, 2004 3:01 pm
Location: Kuala Lumpur, Malaysia


Return to Quality Assurance

Who is online

Users browsing this forum: No registered users and 1 guest