天软金融分析.NET函数大全 > 金融报表分析 > 11.报告模板 > 公司公告

Get_StockAnn_PDF    

简述
获得指定股票指定公告原文(PDF)
注意：
（1）一次性只能下载最多不超过300个文件，可以分批分次下载
（2）目前暂只支持下载1年内的公告
定义
Get_StockAnn_PDF(t:array):array
参数
名称类型说明
tArray,TableArray要获得股票的公告详情，需要包含以下字段
字段 含义 类型 非空 规范 范例
代码 代码 varchar 是 SHxxxxxx、SZxxxxxx SH600519
公布日 公告日 Int 是 yyyymmdd 20260508
公告标题 公告标题 varchar 是 　 600519 贵州茅台:贵州茅台关于回购股份实施进展的公告.PDF
返回Array,TableArray查询到的公告原文(PDF)，包含以下字段
字段 含义 类型 非空 备注
代码 　 varchar 是 SHxxxxxx、SZxxxxxx
公布日 　 Int 是 yyyymmdd
公告标题 　 varchar 是 　
标志 是否获取成功标志 Bool 是 0/1
文件大小 　 Int 是 　
文件名称 　 varchar 是 　
详情 PDF二进制 Binary 是 　
  • 范例
    应用要点介绍：
    1、如何下载PDF详情
    （1）利用 WriteFile & rdo2 把PDF原文下载到本地的指定目录
       sName:=a[nI]['文件名称'];
       iSize:=a[nI]['文件大小'];
       Data:=a[nI]['详情'];
       Ret:=rdo2 WriteFile(rwBinary(),'',dir+'\\'+sName,0,iSize,Data);

    2、如何获得要下载的公告列表
    （1）直接指定下载公告列表
    例如：
    t:=array(
    ("代码":"SH600519","公布日":20260508,"公告标题":"600519 贵州茅台：贵州茅台关于回购股份实施进展的公告.PDF"),
    ("代码":"SH600519","公布日":20260429,"公告标题":"600519 贵州茅台：贵州茅台关于召开2025年度及2026年第一季度业绩说明会的公告.PDF"),
    ("代码":"SH600519","公布日":20260425,"公告标题":"600519 贵州茅台：贵州茅台2026年第一季度报告.PDF"),
    ("代码":"SH600519","公布日":20260425,"公告标题":"600519 贵州茅台：贵州茅台2026年第一季度主要经营数据公告.PDF"),
    ("代码":"SH600519","公布日":20260417,"公告标题":"600519 贵州茅台：贵州茅台2025年度独立董事述职报告（王鑫）.PDF"));

    （2）从InfoTable 122获得
    范例：
       //1、获得要下载的公告列表
      t:=select *
         from infoTable 122
         of getbk('沪深300')
         where ['公布日']=20260430 and ['公告类型(一级)']='董、监、股东大会公告'
         order by ['']
       end;
      return t;


    3、调用范例：将指定的股票公告列表PDF文件下载到本地
    //1、指定要下载的公告列表
    t:=array(
    ("代码":"SH600519","公布日":20260508,"公告标题":"600519 贵州茅台：贵州茅台关于回购股份实施进展的公告.PDF"),
    ("代码":"SH600519","公布日":20260429,"公告标题":"600519 贵州茅台：贵州茅台关于召开2025年度及2026年第一季度业绩说明会的公告.PDF"),
    ("代码":"SH600519","公布日":20260425,"公告标题":"600519 贵州茅台：贵州茅台2026年第一季度报告.PDF"),
    ("代码":"SH600519","公布日":20260425,"公告标题":"600519 贵州茅台：贵州茅台2026年第一季度主要经营数据公告.PDF"),
    ("代码":"SH600519","公布日":20260417,"公告标题":"600519 贵州茅台：贵州茅台2025年度独立董事述职报告（王鑫）.PDF"));
    //2、获得指定股票指定公告原文(PDF)
    a:=Get_StockAnn_PDF(t);
    //3、保存公告到本地
    dir:="D:\\Downloads\\"; //导出公告目录
    for nI:=0 to length(a)-1 do
    begin
      if a[nI]['标志']<>1 then continue;
      sName:=a[nI]['文件名称'];
      iSize:=a[nI]['文件大小'];
      Data:=a[nI]['详情'];
      Ret:=rdo2 WriteFile(rwBinary(),'',dir+'\\'+sName,0,iSize,Data);
      a[nI]['下载成功']:=Ret;
    end;
    return a;

    执行返回结果：
    代码 公布日 公告标题 标志 文件大小 文件名称 详情
    SH600519 20260508 600519 贵州茅台：贵州茅台关于回购股份实施进展的公告.PDF 1 81255 600519-2026-05-08-贵州茅台：贵州茅台关于回购股份实施进展的公告.PDF < BINARY >
    SH600519 20260429 600519 贵州茅台：贵州茅台关于召开2025年度及2026年第一季度业绩说明会的公告.PDF 1 123549 600519-2026-04-29-贵州茅台：贵州茅台关于召开2025年度及2026年第一季度业绩说明会的公告.PDF < BINARY >
    SH600519 20260425 600519 贵州茅台：贵州茅台2026年第一季度报告.PDF 1 158374 600519-2026-04-25-贵州茅台：贵州茅台2026年第一季度报告.PDF < BINARY >
    SH600519 20260425 600519 贵州茅台：贵州茅台2026年第一季度主要经营数据公告.PDF 1 86837 600519-2026-04-25-贵州茅台：贵州茅台2026年第一季度主要经营数据公告.PDF < BINARY >
    SH600519 20260417 600519 贵州茅台：贵州茅台2025年度独立董事述职报告（王鑫）.PDF 1 113122 600519-2026-04-17-贵州茅台：贵州茅台2025年度独立董事述职报告（王鑫）.PDF < BINARY >

    本地目录导出公告PDF文件：


相关