Factures i abonaments per correu

Consulta per saber les factures i abonaments pendents d’enviar per correu electrònic segons la configuració del selector:

SELECT PC.E_MailL,O.DocEntry,O.DocNum,O.DocDate,O.U_INTRX_XDOC_ESTAT,O.U_INTRX_XDOC_ENVIAT, IC.CardCode,IC.CardName 
FROM OINV O
JOIN OCRD IC on IC.CardCode=O.CardCode
JOIN OCPR PC on PC.CardCode=O.CardCode
WHERE IC.QryGroup3='Y' and PC.Name='EF' and O.U_INTRX_XDOC_ESTAT<>'E'
ORDER BY O.CardCode,O.DocDate DESC

SELECT PC.E_MailL,O.DocEntry,O.DocNum,O.DocDate,O.U_INTRX_XDOC_ESTAT,O.U_INTRX_XDOC_ENVIAT, IC.CardCode,IC.CardName 
FROM ORIN O
JOIN OCRD IC on IC.CardCode=O.CardCode
JOIN OCPR PC on PC.CardCode=O.CardCode
WHERE IC.QryGroup3='Y' and PC.Name='EF' and O.U_INTRX_XDOC_ESTAT<>'E'
ORDER BY O.CardCode,O.DocDate DESC

Actualitzar per selector:

UPDATE O Set U_INTRX_XDOC_ESTAT='E', U_INTRX_XDOC_ENVIAT='20190101'
FROM OINV O
JOIN OCRD IC on IC.CardCode=O.CardCode
JOIN OCPR PC on PC.CardCode=O.CardCode
WHERE IC.QryGroup3='Y' and PC.Name='EF' and O.U_INTRX_XDOC_ESTAT<>'E'