Bom dia a Todos!
estou com problema para fazer a união de duas tabelas, tenho uma função que exporta a consulta abaixo para um excel no entanto os dados que vem a partir da união não funciona (Relacionamento), eu declarei certo?
estou com problema para fazer a união de duas tabelas, tenho uma função que exporta a consulta abaixo para um excel no entanto os dados que vem a partir da união não funciona (Relacionamento), eu declarei certo?
- Código:
sSql = "SELECT"
sSql = sSql & " tbl_IPDP_BUY.B_id AS ID_SEQ"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Status AS A_STATUS"
sSql = sSql & " ,tbl_IPDP_BUY.B_Registrado AS DATA_REF"
sSql = sSql & " ,tbl_IPDP_BUY.B_RMD AS A_RMD"
sSql = sSql & " ,tbl_IPDP_BUY.B_Codigo_ipdp AS COD_IPDP"
sSql = sSql & " ,tbl_IPDP_BUY.B_Desenho_ipdp AS A_DESENHO"
sSql = sSql & " ,tbl_IPDP_BUY.B_Descricao_ipdp AS A_DESCRICAO"
sSql = sSql & " ,tbl_IPDP_BUY.B_Fornec_ipdp AS FORNECEDOR"
sSql = sSql & " ,tbl_IPDP_BUY.B_EnteEmbalador AS EMBALADOR"
sSql = sSql & " ,tbl_IPDP_BUY.B_Cod_Emb_Prim_AUD AS COD_PRIM"
sSql = sSql & " ,tbl_IPDP_BUY.B_Prim_Tipo AS TIPO_PRIM"
sSql = sSql & " ,tbl_IPDP_BUY.B_Prim_C AS C_PRIM"
sSql = sSql & " ,tbl_IPDP_BUY.B_Prim_L AS L_PRIM"
sSql = sSql & " ,tbl_IPDP_BUY.B_Prim_A AS A_PRIM"
sSql = sSql & " ,tbl_IPDP_BUY.B_Prim_QE AS QE_PRIM,"
sSql = sSql & " ,tbl_IPDP_BUY.B_Cod_Emb_Sec_AUD AS COD_SEC"
sSql = sSql & " ,tbl_IPDP_BUY.B_Sec_Tipo AS TIPO_SEC"
sSql = sSql & " ,tbl_IPDP_BUY.B_Sec_C AS C_SEC"
sSql = sSql & " ,tbl_IPDP_BUY.B_Sec_L AS L_SEC"
sSql = sSql & " ,tbl_IPDP_BUY.B_Sec_A AS A_SEC"
sSql = sSql & " ,tbl_IPDP_BUY.B_Sec_QE AS QE_SEC"
sSql = sSql & " ,tbl_IPDP_BUY.B_Cant AS CANTONEIRA"
sSql = sSql & " ,tbl_IPDP_BUY.B_Strech AS STRECH"
sSql = sSql & " ,tbl_IPDP_BUY.B_Cintamento AS CINTAMENTO"
sSql = sSql & " ,tbl_IPDP_BUY.B_Log_user AS USER_ATUAL"
sSql = sSql & " ,tbl_IPDP_BUY.B_Baixa AS BAIXA_TOP"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_Cod_Emb AS COD_PRIM_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_Tipo AS TIPO_PRIM_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_C AS C_PRIM_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_L AS L_PRIM_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_A AS A_PRIM_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_QE AS QE_PRIM_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_Cod_Emb1 AS COD_PRIM_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_Tipo1 AS TIPO_PRIM_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_C1 AS C_PRIM_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_L1 AS L_PRIM_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_A1 AS A_PRIM_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Prim_QE1 AS QE_PRIM_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_Cod_Emb AS COD_SEC_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_Tipo AS TIPO_SEC_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_C AS C_SEC_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_L AS L_SEC_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_A AS A_SEC_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_QE AS QE_SEC_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_Cod_Emb1 AS COD_SEC_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_Tipo1 AS TIPO_SEC_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_C1 AS C_SEC_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_L1 AS L_SEC_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_A1 AS A_SEC_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Sec_QE1 AS QE_SEC_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Cant AS CANTONEIRA_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Cant1 AS CANTONEIRA_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Strech AS STRECH_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Strech1 AS STRECH_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Cintamento AS CINTAMENTO_AUD"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Cintamento1 AS CINTAMENTO_AUD1"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.S_Log_user AS USER_BAIXA"
sSql = sSql & " ,tbl_IPDP_BUY_Sub.Observacao AS OBS_AUD"
sSql = sSql & " ,Format([B_Registrado],'mm') & '.' & Format([B_Registrado],'mmm') AS MES_REF"
sSql = sSql & " ,Format([B_Registrado], 'yyyy') As ANO_REF"
sSql = sSql & " FROM tbl_IPDP_BUY " & _
"LEFT JOIN tbl_IPDP_BUY_Sub ON tbl_IPDP_BUY.B_id = tbl_IPDP_BUY_Sub.S_id" & _
" WHERE " & _
" B_Registrado Between #" & Format(Forms!instrucao_trab_princ!dt9, "mm/dd/yyyy") & "# And #" & Format(Forms!instrucao_trab_princ!dt10, "mm/dd/yyyy") & "#"