PL/SQL 下SQL结果集以html形式发送邮件

2023-10-10 21:18

本文主要是介绍PL/SQL 下SQL结果集以html形式发送邮件,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!

      在运维的过程中,有时候需要定时将SQL查询的数据结果集以html表格形式发送邮件,因此需要将SQL查询得到的结果集拼接成html代码。对于这种情形通常有二种方式来完成。一是直接使用cron job来定时轮询并借助os级别的邮件程序来完成。其查询结果集可以直接在SQL*Plus下通过设置html标签自动实现html表格形式。一种方式是在Oracle中使用scheduler job来定时轮询。这种方式需要我们手动拼接html代码。本文即是对第二种情形展开描述。

      关于PL/SQL下如何发送邮件可参考: PL/SQL 下邮件发送程序
      OS 下发送邮件可参考:不可或缺的 sendEmail

 

1、代码描述

--下面的代码段主要主要是用于发送数据库A部分数据同步到数据库B是出现的错误信息
--表syn_data_err_log_tbl主要是记录错误日志,也就是说只要表中出现了新的记录或者旧记录且mailed列标志为N,即表示需要发送邮件
--下面逐一描述代码段信息,该代码段可以封装到package.
PROCEDURE email_on_syn_data_err_log (err_num   OUT NUMBER,
err_msg   OUT VARCHAR2)
AS
v_msg_txt        VARCHAR2 (32767);
v_sub            VARCHAR2 (100);
v_html_header    VARCHAR (4000);
v_html_content   VARCHAR (32767);
v_count          NUMBER;
v_log_seq        NUMBER (12);
v_loop_count     NUMBER := 0;
CURSOR cur_errlog    --使用cursor来生成表格标题部分
IS
SELECT '<tr >
<td style="vertical-align:top;padding: 5px;"> '
|| TO_CHAR (sd.log_seq)
|| '</td>
<td style="vertical-align:top;padding: 5px;"> '
|| sd.process
|| '</td>'
|| '<td  style="vertical-align:top;padding: 5px;"> '
|| sd.rec_id
|| '</td> '
|| '<td style="padding: 5px;"> '
|| REPLACE (REPLACE (sd.err_msg, '<', ';'), '>', ';')
|| '</td>'
|| '<td  style="vertical-align:top;padding: 5px;">'
|| TO_CHAR (sd.log_time, 'yyyy-mm-dd hh24:mi:ss')
|| '</td>
</tr>',
sd.log_seq
FROM syn_data_err_log_tbl sd
WHERE sd.mailed = 'N'
ORDER BY sd.log_seq;
BEGIN
err_num := common_pkg.c_suc_general;
SELECT COUNT (*)     
INTO v_count        -->统计当次需要发送的总记录数
FROM syn_data_err_log_tbl sd
WHERE sd.mailed = 'N';
IF v_count > 0        --> 表示有记录需要发送邮件
THEN
SELECT 'Job process failed on ' || instance_name || '/' || host_name
INTO v_sub       -->生成邮件的subject  
FROM v$instance;
v_html_header :=             -->定义表格的header部分信息
'<html><header><style>
#log-table {
margin: 0;
padding: 0;
width: 90%;
border-collapse: collapse;
font: 12px "Lucida Grande", Helvetica, Sans-Serif;
border:1px solid #CCC;
}
#log-table td {
padding: 5px;
border:1px solid #CCC;
}
#log-table th {
padding: 5px;
background: black;
color: white;
text-align: left;
}
#log-table tr:nth-child(even) td {
background: #eee;
}
</style></header><body>
<table id="log-table"  style="width: 100%;border-collapse: collapse;font-size:12px;">';
v_html_header :=              -->下面是拼接每一个字段的信息
v_html_header
|| '<tr style="background: black;">
<th  style="color: white;width:100px;padding: 5px;">Log sequence</th>
<th  style="color: white;width:100px;padding: 5px;">Process</th>
<th  style="color: white;width:100px;padding: 5px;">Rec ID</th>
<th  style="color: white;width:100px;padding: 5px;">Error message</th>
<th  style="color: white;padding: 5px;">Log time</th></tr>';
OPEN cur_errlog;     -->打开游标
LOOP
FETCH cur_errlog   
INTO v_msg_txt, v_log_seq;
EXIT WHEN cur_errlog%NOTFOUND;
v_loop_count := v_loop_count + 1;
v_html_content := v_html_content || v_msg_txt;   --->注意这里,不断地把从原表中的err_msg拿出来进行拼接通过v_msg_txt
--Maximun record = 50 --
IF v_loop_count > 50              --->这里的判断就是用于控制表格总共显示多少行
THEN                              --->主要是用于如果由于需要拼接的行太多导致超过字符长度32767,因此从50行处截断
v_html_content :=
v_html_header || v_html_content || '</table></body></html>';  --->这里添加html尾部
SENDMAIL_PKG.sendmail (
bo_system_pkg.get_sys_para_value ('EMAIL_SENDER_HC_EMAIL'),   --->调用函数获得邮件的接收者,此处可以直接写接收者
v_sub,
v_html_content,
err_num,
err_msg);
v_msg_txt := '';             --->注,此处对三个本地变量置空
v_html_content := '';
v_loop_count := 0;               
UPDATE syn_data_err_log_tbl sd     --->根据log_seq字段对已经发送过的记录标记为Y
SET mailed = 'Y'
WHERE sd.mailed = 'N' AND log_seq <= v_log_seq;
-- COMMIT;
ELSIF v_count = cur_errlog%ROWCOUNT   --->当v_count与游标取得记录数相等时,拼接表格尾部html代码,发送邮件以及更新mailed列
THEN
v_html_content :=
v_html_header || v_html_content || '</table></body></html>';
SENDMAIL_PKG.sendmail (
bo_system_pkg.get_sys_para_value ('EMAIL_SENDER_HC_EMAIL'),
v_sub,
v_html_content,
err_num,
err_msg);
v_msg_txt := '';
v_html_content := '';
UPDATE syn_data_err_log_tbl sd
SET mailed = 'Y'
WHERE sd.mailed = 'N' AND log_seq <= v_log_seq;
END IF;
END LOOP;
COMMIT;
CLOSE cur_errlog;
END IF;
EXCEPTION
WHEN NO_DATA_FOUND
THEN
err_num := common_pkg.c_fail_data_not_found;
WHEN OTHERS
THEN
err_num := common_pkg.c_fail_user_define;
err_msg := 'Fail in process SENDMAIL_PKG.email_on_syn_data_err_log. ';
END; 

2、调用示例及邮件样式  

gx_admin@SYBO2SZ> DECLARE 
2    ERR_NUM NUMBER;
3    ERR_MSG VARCHAR2(32767);
4  
5  BEGIN 
6    ERR_NUM := NULL;
7    ERR_MSG := NULL;
8  
9    GX_ADMIN.SENDMAIL_PKG.EMAIL_ON_SYN_DATA_ERR_LOG ( ERR_NUM, ERR_MSG );
10    COMMIT; 
11  END;
12  /
PL/SQL procedure successfully completed.


 

Oracle&nbsp;牛鹏社    Oracle DBsupport

更多参考

使用 DBMS_PROFILER 定位 PL/SQL 瓶颈代码

使用PL/SQL Developer剖析PL/SQL代码

对比 PL/SQL profiler 剖析结果

PL/SQL Profiler 剖析报告生成html

DML Error Logging 特性 

PL/SQL --> 游标

PL/SQL --> 隐式游标(SQL%FOUND)

批量SQL之 FORALL 语句

批量SQL之 BULK COLLECT 子句

PL/SQL 集合的初始化与赋值

PL/SQL 联合数组与嵌套表
PL/SQL 变长数组
PL/SQL --> PL/SQL记录

SQL tuning 步骤

高效SQL语句必杀技

父游标、子游标及共享游标

绑定变量及其优缺点

dbms_xplan之display_cursor函数的使用

dbms_xplan之display函数的使用

执行计划中各字段各模块描述

使用 EXPLAIN PLAN 获取SQL语句执行计划

这篇关于PL/SQL 下SQL结果集以html形式发送邮件的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!



http://www.chinasem.cn/article/183148

相关文章

MySQL的JDBC编程详解

《MySQL的JDBC编程详解》:本文主要介绍MySQL的JDBC编程,具有很好的参考价值,希望对大家有所帮助,如有错误或未考虑完全的地方,望不吝赐教... 目录前言一、前置知识1. 引入依赖2. 认识 url二、JDBC 操作流程1. JDBC 的写操作2. JDBC 的读操作总结前言本文介绍了mysq

java.sql.SQLTransientConnectionException连接超时异常原因及解决方案

《java.sql.SQLTransientConnectionException连接超时异常原因及解决方案》:本文主要介绍java.sql.SQLTransientConnectionExcep... 目录一、引言二、异常信息分析三、可能的原因3.1 连接池配置不合理3.2 数据库负载过高3.3 连接泄漏

Vue和React受控组件的区别小结

《Vue和React受控组件的区别小结》本文主要介绍了Vue和React受控组件的区别小结,文中通过示例代码介绍的非常详细,对大家的学习或者工作具有一定的参考学习价值,需要的朋友们下面随着小编来一起学... 目录背景React 的实现vue3 的实现写法一:直接修改事件参数写法二:通过ref引用 DOMVu

Linux下MySQL数据库定时备份脚本与Crontab配置教学

《Linux下MySQL数据库定时备份脚本与Crontab配置教学》在生产环境中,数据库是核心资产之一,定期备份数据库可以有效防止意外数据丢失,本文将分享一份MySQL定时备份脚本,并讲解如何通过cr... 目录备份脚本详解脚本功能说明授权与可执行权限使用 Crontab 定时执行编辑 Crontab添加定

Java实现将HTML文件与字符串转换为图片

《Java实现将HTML文件与字符串转换为图片》在Java开发中,我们经常会遇到将HTML内容转换为图片的需求,本文小编就来和大家详细讲讲如何使用FreeSpire.DocforJava库来实现这一功... 目录前言核心实现:html 转图片完整代码场景 1:转换本地 HTML 文件为图片场景 2:转换 H

C#使用Spire.Doc for .NET实现HTML转Word的高效方案

《C#使用Spire.Docfor.NET实现HTML转Word的高效方案》在Web开发中,HTML内容的生成与处理是高频需求,然而,当用户需要将HTML页面或动态生成的HTML字符串转换为Wor... 目录引言一、html转Word的典型场景与挑战二、用 Spire.Doc 实现 HTML 转 Word1

Vue3绑定props默认值问题

《Vue3绑定props默认值问题》使用Vue3的defineProps配合TypeScript的interface定义props类型,并通过withDefaults设置默认值,使组件能安全访问传入的... 目录前言步骤步骤1:使用 defineProps 定义 Props步骤2:设置默认值总结前言使用T

MySQL中On duplicate key update的实现示例

《MySQL中Onduplicatekeyupdate的实现示例》ONDUPLICATEKEYUPDATE是一种MySQL的语法,它在插入新数据时,如果遇到唯一键冲突,则会执行更新操作,而不是抛... 目录1/ ON DUPLICATE KEY UPDATE的简介2/ ON DUPLICATE KEY UP

MySQL分库分表的实践示例

《MySQL分库分表的实践示例》MySQL分库分表适用于数据量大或并发压力高的场景,核心技术包括水平/垂直分片和分库,需应对分布式事务、跨库查询等挑战,通过中间件和解决方案实现,最佳实践为合理策略、备... 目录一、分库分表的触发条件1.1 数据量阈值1.2 并发压力二、分库分表的核心技术模块2.1 水平分

Python与MySQL实现数据库实时同步的详细步骤

《Python与MySQL实现数据库实时同步的详细步骤》在日常开发中,数据同步是一项常见的需求,本篇文章将使用Python和MySQL来实现数据库实时同步,我们将围绕数据变更捕获、数据处理和数据写入这... 目录前言摘要概述:数据同步方案1. 基本思路2. mysql Binlog 简介实现步骤与代码示例1