Index: vhCARETAKER.mac.rou
===================================================================
diff -u -r56988 -r57591
--- vhCARETAKER.mac.rou	(.../vhCARETAKER.mac.rou)	(revision 56988)
+++ vhCARETAKER.mac.rou	(.../vhCARETAKER.mac.rou)	(revision 57591)
@@ -1083,7 +1083,7 @@
 	try { 
  		Do InitRuntimeContext
 		#dim Datum As %String = $ZD($H,3)
-		#dim ParcelQuery As %String = "select ID from APPS_TRANSP_GLS_GLSv1_data.VerzendData Where VerzendWijze = 'Parcel' and TijdstipLaatsteWijziging %StartsWith '{0}' and LaatsteRequestType = 'Registratie' order by ID DESC"
+		#dim ParcelQuery As %String = "select ID from APPS_TRANSP_GLS_GLSv1_data.VerzendData Where VerzendWijze in ('Parcel', 'ParcelCOD') and TijdstipLaatsteWijziging %StartsWith '{0}' and LaatsteRequestType = 'Registratie' order by ID DESC"
  		Set ParcelQuery = ##class(TECH.StringUtils).BuildText(ParcelQuery, Datum)
 		Do ##class(APPS.TRANSP.GLS.impl.Bevestiger).ProcessQueryAsync(ParcelQuery)
 		}