L=a.Query("select DVDT.SCP_TAR,DVDT.SCP_NET,DVDT.SCP_INV,CASE WHEN DVDT.SCP_PACK=0 OR DVDT.SCP_NET=0 THEN 0 ELSE ROUND(DVDT.SCP_NET/DVDT.SCP_PACK,2 ) END as midw,CLIENT.CLNAME from ((" & DVDTAz & " DVDT Left outer Join " & ClientAz & " CLIENT on DVDT.SCP_CODCLI=CLIENT.CLCODE) Left outer Join " & TrtocauAz & " ORTOCAU on DVDT.SCP_CMOV=ORTOCAU.OrtcCod) where (((' ' <> SPACE(1) AND DVDT.SCP_CMOV = 'VE ' OR DVDT.SCP_CMOV = 'NC ') OR ' ' = SPACE(1)) AND DVDT.SCP_DTDOC = {d '" & Vyear & "-" & Vmonth & "-" & Vday & "'} AND DVDT.SCP_CODART = '" & Value & "' AND ((' ' = ' ') OR (' ' = 'S' AND (DVDT.SCP_CMO = 'VE ') OR (DVDT.SCP_CMO = 'NC ')))) order by 1 , 2 , 3 ")