Envio de e-mail CGS/GLB4

1. 2º Padrão
   1. Tela/Select do padrão

      Anotações:

      • SELECT LPAD(' ', 32, ' ') AS LOGINSNAP , TRIM(U.SENHASNAP) AS SENHASNAP , TRIM(U.SERVIDORSMTP) AS SERVIDORSMTP , TRIM(U.EMAIL) AS EMAIL , TRIM(U.PORTAENVIO) AS PORTAENVIO , TRIM(U.PORTAPOP3) AS PORTAPOP3 , LPAD(TRIM(U.EMPRESAGRUPO),15,0) AS NOMEUSUARIO , NVL(U.UTILIZARSSL_ENVIO,'N') AS UTILIZARSSL_ENVIO , U.UTILIZA_EMAIL_PADRAO_CONTROLE , U.SERVIDORPOP3 , ' ' AS AUTENTICACAO_USUARIO , ' ' AS AUTENTICACAO_SENHA , 'S' AS SERV_SAIDA_UTILIZA_SERV_ENTR FROM CTR_PARAMETROS U   
2. 1º Empresa
   1. Tela/Select da empresa

      Anotações:

      • SELECT LPAD(' ', 32, ' ') AS LOGINSNAP, CODIGOEMPRESA , EMPRESAGRUPO AS NOMEUSUARIO, EMAIL , SENHASNAP AS SENHASNAP, SERVIDORSMTP AS SERVIDORSMTP, SERVIDORPOP3 , PORTAENVIO AS PORTAENVIO, PORTAPOP3 AS PORTAPOP3, (SELECT NVL(U.UTILIZARSSL_ENVIO,'N') FROM CTR_PARAMETROS U ) AS UTILIZARSSL_ENVIO, ' ' AS AUTENTICACAO_USUARIO, ' ' AS AUTENTICACAO_SENHA, 'S' AS SERV_SAIDA_UTILIZA_SERV_ENTR, UTILIZA_EMAIL_PADRAO_CONTROLE FROM CTR_EMAIL_POR_EMPRESA --WHERE CODIGOEMPRESA = :CODIGOEMPRESA   
3. 3º Usuário
   1. Tela/Select usuário

      Anotações:

      • SELECT TRIM(U.LOGINSNAP) LOGINSNAP , TRIM(U.SENHASNAP) SENHASNAP , TRIM(U.SERVIDORSMTP) SERVIDORSMTP , TRIM(U.EMAIL) EMAIL , TRIM(U.PORTAENVIO) PORTAENVIO , TRIM(U.PORTAPOP3) PORTAPOP3 , TRIM(U.NOMEUSUARIO) NOMEUSUARIO , NVL(U.UTILIZARSSL_ENVIO,''N'') UTILIZARSSL_ENVIO , U.NOME_USUARIO AS AUTENTICACAO_USUARIO , U.SENHA_USUARIO AS AUTENTICACAO_SENHA , U.SERV_SAIDA_UTILIZA_SERV_ENTR FROM CTR_CADASTRODEUSUARIOS U --WHERE U.USUARIO = :USUARIO
4. Definir usuário sem ou com smtp
   1. Servidor de saída desmarcado
      1. Opção nova
   2. Servidor de saída marcado
      1. Opção antiga
5. Prioridades

Anotações:

• GravaBgm_Email (....

1. Valida Empresa / Padrão / Usuário