minor modifications

This commit is contained in:
Infineon\Ouellette
2025-02-24 10:43:55 -07:00
parent c8ca009fed
commit e419897d6f
2 changed files with 15 additions and 5 deletions

View File

@ -454,7 +454,7 @@ Service GetLatestDefectCINoByRDSId(RDSNo)
Btree.Extract(SrchString, 'CLEAN_INSP', @DICT, CIList, Option, Flag)
If CIList NE '' then
for each CleanInspKey in CIList using @VM
ThisCIInspDtm = Database_Services('ReadDataColumn', 'CLEAN_INSP', CleanInspKey, CLEAN_INSP_SCAN_VER_SIG_DTM$ , True$, 0, False$)
ThisCIInspDtm = Database_Services('ReadDataColumn', 'CLEAN_INSP', CleanInspKey, CLEAN_INSP_SCAN_SIG$ , True$, 0, False$)<1,1>
ThisCIInspDefAvg = Database_Services('ReadDataColumn', 'CLEAN_INSP', CleanInspKey, CLEAN_INSP_SCAN_SUM_OF_DEF_AVG$ , True$, 0, False$)
If ThisCIInspDtm GT LatestInspDtm AND ThisCIInspDefAvg NE '' then
LatestCINo = CleanInspKey
@ -469,3 +469,4 @@ end service
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Internal GoSubs
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////