Here is one I found on the list and have been using for a few years.
/* Stopping Over Reporting of Production Quantities */
For each ttLaborDtl where ttLaborDtl.RowMod = 'U' and ttLaborDtl.LaborType = "P" no-lock.
Find First JobOper Where JobOper.Company = ttLaborDtl.Company and JobOper.JobNum = ttLaborDtl.JobNum and JobOper.AssemblySeq = ttLaborDtl.AssemblySeq and
JobOper.OprSeq = ttLaborDtl.OprSeq no-lock no-error.
If avail JobOper Then Do:
If JobOper.QtyCompleted + ttLaborDtl.LaborQty > JobOper.RunQty and ttLaborDtl.EnableRequestMove = yes Then DO:
{lib/PublishEx.i &ExMsg = "'There are already ' + String(JobOper.QtyCompleted) + ' complete. The operation required quantity is ' +
String(JobOper.RunQty) + '. You entered a quantity of ' + String(ttLaborDtl.LaborQty) + ' this will result in over reported quantities.'"}.
assign ttLaborDtl.LaborQty = 0.
End.
End.
Else.
Find First labordtl where labordtl.company = ttlabordtl.company and labordtl.LaborDtlSeq = ttLaborDtl.LaborDtlSeq no-lock no-error.
if avail LaborDtl Then DO:
Define Variable oldLaborQty as integer no-undo.
assign oldLaborQty = LaborDtl.LaborQty.
If (JobOper.QtyCompleted - oldLaborQty) + ttLaborDtl.LaborQty > JobOper.RunQty and ttLaborDtl.EnableRequestMove = no Then DO:
{lib/PublishEx.i &ExMsg = "'There are already ' + String(JobOper.QtyCompleted) + ' complete. The operation required quantity is ' +
String(JobOper.RunQty) + '. You entered a quantity of' + String(ttLaborDtl.LaborQty) + ' this will result in over reported quantities.'"}.
assign ttLaborDtl.LaborQty = 0.
End.
End.
End.
From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com]
Sent: Monday, May 23, 2016 9:48 AM
To: Vantage Group
Subject: [Vantage] BPM for labor entry
We are facing a major problem with the labor entry. The labor they enter either the qty more or less than the production qty in the job.
Help me to make a BPM so that a warning message pops up if the labor qty is more than or less than the production qty for the labor to confirm the entry that he is doing is correct
CONFIDENTIALITY NOTICE
The information contained in this communication, including attachments, is privileged and confidential. It is intended only for the exclusive use of the addressee. If the reader of this message is not the intended recipient, or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify us at 727-578-6240 and immediately delete the communication.
"This (document/presentation) may contain technical data as defined in the International Traffic In Arms Regulations (ITAR) 22 CFR 120.10. Export of this material is restricted by the Arms Export Control Act (22 U.S.C. 2751 et seq.) and may not be exported to foreign persons without prior approval form the U.S. Department of State."