Remove PPV Post Production Verification Security Groups required

Modified on Thu, 9 Jan at 8:53 AM

You will need to have a Supervisor fill out an ARF in iTrac to add you to these 2 groups.

HQ Quality Group: Group ID# 17 & iTrac Role ID# 23

plantSupervisor Group: Group ID# 18905 and iTrac Role ID: 32.

You need to be in both groups because if inventory status is 2 then either group will work, but if inventory status is 0 or 1, then just HQ Quality can remove the PPV.

Also, if there is a Special Requirement set up from the Special Requirement Maintenance screen w0384 for that owner or user for that plant, the PPV will not be able to be removed.

IT Use only:

if avail inv then do:
//Coil has been processed
if inv.stat = 2 then do:
pcRtn = "Only a plant supervisor or quality coordinator can remove this requirement".
if (dynamic-function("isGroupMember","IT Staff",psi-user.logon)
or dynamic-function("isGroupMember","plantSupervisor",psi-user.logon)
or dynamic-function("isGroupMember","HQ Quality",psi-user.logon))
and inv.ppaudit = yes then do:
pcRtn = "Yes".
end.
end. // if in plantSupervisor group or IT

//Coil has not been processed
else if (inv.stat = 0 or inv.stat = 1) then do:
pcRtn = "Only a quality coordinator can remove this requirement".

if dynamic-function("isGroupMember","IT Staff",psi-user.logon)
or dynamic-function("isGroupMember","HQ Quality",psi-user.logon)
and inv.ppaudit = yes then do:
pcRtn = "Yes".
end. //if in IT or PlantSupervisor
end. // else if inv stat = 1 or 2
end. // if avail inv
else do:
pcRtn = "Only a quality coordinator can remove this requirement".
find asn no-lock where asn.inv-id = piInvID no-error.
if (dynamic-function("isGroupMember","IT Staff",psi-user.logon)
or dynamic-function("isGroupMember","HQ Quality",psi-user.logon))
and asn.ppaudit = yes then do:
pcRtn = "Yes".
end. // if group member
end. // else do