PO this-POnum to this-vendor requires a shipment by this-date of this-qty of the part this-number this-name =============================================================================================================== PO298 AA manufacturing 20020805 300 S123 crankcase seal PO299 AA manufacturing 20020808 250 S123 crankcase seal PO300 Bridge Steel Co 20020820 400 C821 crankcase cover PO301 Bridge Steel Co 20020820 100 C821 crankcase cover for PO this-POnum shipment this-shipnum was of this-qty of the part this-partnumber this-name ============================================================================================== for PO this-POnum notification of shipment this-shipnum was sent by this-username working for this-vendor ========================================================================================================== the current user is some-username with userid some-uid and with permission status some-perm ANYUSER is authorized to send ship notices from some-vendor for PO some-POnum that-vendor could ship up to some-qty of the part some-partnumber some-name for PO that-POnum the next shipment number is some-shipnum add : for PO that-POnum notification of shipment that-shipnum was sent by that-username working for that-vendor add : for PO that-POnum shipment that-shipnum was of that-qty of the part that-partnumber that-name ----------------------------------------------------------------------------------------------------------------- SHIP ALL that-POnum that-shipnum : that-username that-vendor ships that-qty of the part that-partnumber that-name the current user is some-username with userid some-uid and with permission status some-perm ANYUSER is authorized to send ship notices from some-vendor for PO some-POnum that-vendor could ship up to some-qty of the part some-partnumber some-name for PO that-POnum the next shipment number is some-shipnum add : for PO that-POnum notification of shipment that-shipnum was sent by that-username working for that-vendor add : for PO that-POnum shipment that-shipnum was of that-qty of the part that-partnumber that-name ------------------------------------------------------------------------------------------------------------------ SHIP SOME that-POnum that-shipnum : that-username that-vendor ships that-qty of the part that-partnumber that-name the current user is some-username with userid some-uid and with permission status some-perm ANYUSER is authorized to send ship notices from some-vendor for PO some-POnum that-vendor could ship up to some-maxqty of the part some-partnumber some-name for PO that-POnum the next shipment number is some-shipnum add : for PO that-POnum notification of shipment that-shipnum was sent by that-username working for that-vendor add : for PO that-POnum shipment that-shipnum was of some-qty of the part that-partnumber that-name ------------------------------------------------------------------------------------------------------------------ SHIP SOME that-POnum that-shipnum : that-username that-vendor ships that~qty of the part that-partnumber that-name the current user has permission to view records for the vendor some-vendor for PO some-POnum shipment some-shipnum was of some-qty of the part some-partnumber some-name for PO that-POnum notification of shipment that-shipnum was sent by some-username working for that-vendor del : for PO that-POnum shipment that-shipnum was of that-qty of the part that-partnumber that-name del : for PO that-POnum notification of shipment that-shipnum was sent by that-username working for that-vendor --------------------------------------------------------------------------------------------------------------- REMOVE records for PO that-POnum shipment number that-shipnum this-user is authorized to send ship notices from this-vendor ============================================================= regression AA manufacturing regression Bridge Steel Co regression1 AA manufacturing user2 Bridge Steel Co Adrian Walker Bridge Steel Co Adrian Walker AA manufacturing ANYUSER Bridge Steel Co ANYUSER AA manufacturing part this-partnumber this-name is handled by this-buyer ======================================================= S123 crankcase seal Fred Lyons C821 crankcase cover Jim Turner the current user is some-username with userid some-uid and with permission status some-perm ANYUSER is authorized to send ship notices from some-vendor --------------------------------------------------------------------------------------------- the current user has permission to view records for the vendor that-vendor the current user has permission to view records for the vendor some-vendor PO some-POnum to that-vendor requires a shipment by some-date of some-qty of the part some-number some-name ------------------------------------------------------------------------------------------------------------- the current user has permission to view records for the PO that-POnum the current user has permission to view records for the PO some-POnum PO that-POnum to some-vendor requires a shipment by some-date of some-rqty of the part some-partnumber some-name sum a-sqty : for PO that-POnum shipment some-shipnum was of some-sqty of the part that-partnumber that-name = a-total ------------------------------------------------------------------------------------------------------------------- for PO that-POnum that-total units of the reqd that-rqty of the part that-partnumber that-name have been shipped so far the current user has permission to view records for the PO some-POnum PO that-POnum to some-vendor requires a shipment by some-date of some-rqty of the part some-partnumber some-name not : for PO that-POnum one or more shipments have been made ------------------------------------------------------------------------------------------------------------------- for PO that-POnum 0 units of the reqd that-rqty of the part that-partnumber that-name have been shipped so far the current user has permission to view records for the PO some-POnum for PO that-POnum shipment some-shipnum was of some-qty of the part some-partnumber some-name --------------------------------------------------------------------------------------------- for PO that-POnum one or more shipments have been made the current user has permission to view records for the PO some-POnum PO that-POnum to some-vendor requires a shipment by some-date of some-rqty of the part some-partnumber some-name for PO that-POnum some-sqty units of the reqd that-rqty of the part that-partnumber that-name have been shipped so far that-rqty - that-sqty = some-qty --------------------------------------------------------------------------------------------------------------- for PO that-POnum that-vendor could ship up to that-qty of the part that-partnumber that-name the current user has permission to view records for the PO some-POnum part some-partnumber some-name is handled by some-buyer PO that-POnum to some-vendor requires a shipment by some-date of some-qtyreqd of the part that-partnumber that-name on PO that-POnum the number of parts shipped so far is some-qtyshipped -------------------------------------------------------------------------------------------------------------------- part that-partnumber that-name handled by buyer that-buyer has POs for vendor, date, qty reqd, and has a qty shipped that-POnum that-vendor that-date that-qtyreqd that-qtyshipped the current user has permission to view records for the PO some-POnum PO that-POnum to some-vendor requires a shipment by some-date of some-qty of the part some-number some-name ----------------------------------------------------------------------------------------------------------- PO that-POnum is on record PO some-POnum is on record sum some-qty : for PO that-POnum shipment some-shipnum was of some-qty of the part some-partnumber some-name = some-total ------------------------------------------------------------------------------------------------------------------------- on PO that-POnum the number of parts shipped so far is that-total PO some-POnum is on record not : for PO that-POnum there is a shipment -------------------------------------------------------- on PO that-POnum the number of parts shipped so far is 0 the current user has permission to view records for the PO some-POnum for PO that-POnum shipment some-shipnum was of some-qty of the part some-partnumber some-name --------------------------------------------------------------------------------------------- for PO that-POnum there is a shipment that-shipnum for PO some-POnum there is a shipment some-shipnum -------------------------------------------------- for PO that-POnum there is a shipment PO some-POnum is on record not : for PO that-POnum there is a shipment ----------------------------------------------- for PO that-POnum the next shipment number is 1 PO some-POnum is on record for PO that-POnum there is a shipment max some-shipnum : for PO that-POnum there is a shipment some-shipnum = some-max-shipnum that-max-shipnum + 1 = some-next-shipnum ---------------------------------------------------------------------------------------- for PO that-POnum the next shipment number is that-next-shipnum