>scan > IF tqpu < whsamt && if the amount given to institution is less that quantity on hand, create a message > crtstr = "You don't have enough "+ALLTRIM(crsprod)+" Product in the inventory. You are trying to deliver " + ; STR(whsamt)+" and you only have "+STR(tqpu) + ; " inventory in stock. Please click 'None' in the option or reduce the amount you are trying to deliver in the 'WHS Qty' column" > msgstr = msgstr + ALLTRIM(crstr) > ENDIF && do we have enough in stock to send >endscan > > IF !EMPTY(msgstr) > MESSAGEBOX(msgstr,0,"Warning, correct the delivery inventory amount") > proceed = .f. > ENDIF>
>message one >space >message two >space.... >>