| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 1282 人关注过本帖
标题:提取数据内容
只看楼主 加入收藏
lnsyzhuhua
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2017-8-16
结帖率:80%
  已结贴   问题点数:20  回复次数:17   
提取数据内容
附件: 您没有浏览附件的权限,请 登录注册
搜索更多相关主题的帖子: 提取 数据 内容 
2018-09-20 15:58
wangzhiyi
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:31
帖 子:350
专家分:641
注 册:2014-4-9
  得分:7 
SET TALK OFF
USE dddtt
a1='|'
SCAN
   aa=wnbg
   n1=AT(a1,aa)
   DO WHILE n1>0
      aa=SUBSTR(aa,n1+1)
      n1=AT(a1,aa)
   ENDDO
   REPLACE bz WITH ALLTRIM(aa)
ENDSCAN
USE
SET TALK ON
RETURN
2018-09-20 16:22
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:203
帖 子:7914
专家分:19694
注 册:2012-2-5
  得分:7 
REPLACE BZ WITH ALLTRIM(RIGHT(Wnbg,14)) ALL

坚守VFP最后的阵地
2018-09-20 19:03
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:225
帖 子:6865
专家分:30626
注 册:2014-5-20
  得分:7 
REPLACE bz WITH ALLTRIM(SUBSTR(wnbg, RAT("|",wnbg)+1),0h20,0h0D,0h0A) ALL
2018-09-20 20:15
lnsyzhuhua
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2017-8-16
  得分:0 
回复 4楼 吹水佬
趸交保费指您首次缴纳的保费;追加保费指您后续随时交纳的保费;趸交保费、追加保费在扣除初始费用后将计入保单价值*

取从后面按“|”分隔符,取第4个分隔符区间的数据内容 ,如何写指令? 拜托了!
2018-09-26 15:57
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:203
帖 子:7914
专家分:19694
注 册:2012-2-5
  得分:0 
楼主还有几个问题,一起提出来。

坚守VFP最后的阵地
2018-09-26 16:04
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:225
帖 子:6865
专家分:30626
注 册:2014-5-20
  得分:0 
以下是引用lnsyzhuhua在2018-9-26 15:57:19的发言:
取从后面按“|”分隔符,取第4个分隔符区间的数据内容 ,如何写指令? 拜托了!

具体不清楚要什么数据
从提供的数据按“|”分隔符分组,看看是要那个就取那个
USE dddtt
SCAN
    FOR i=1 TO ALINES(arr,wnbg,"|")
        ? ALLTRIM(arr[i],0h20,0h0D,0h0A)
    ENDFOR
    ?
ENDSCAN
2018-09-26 16:39
lnsyzhuhua
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2017-8-16
  得分:0 
追加说明
|data_begin*ulifeaccount|*ulifeaccountlist|结算保单利息|08/01/2018|             30.08|          10150.51|  0.009589%|  3.50%|*ulifeaccountlist|结算保证利息|08/01/2018|              0.00|          10150.51| | |*ulifeaccountlist|结算保单利息|09/01/2018|             30.17|          10180.68|  0.009589%|  3.50%|*ulifeaccountlist|部分领取|09/06/2018|          11224.48|          -1043.80| | |*ulifeaccountlist|续期保费|09/06/2018|           9800.00|           8756.20| | |*ulifeaccountlist|追加保费|09/06/2018|          49000.00|          57756.20| | |*data_end*|您交纳的续期保费是您保单的红利或生存金转入的保单价值*2018年09月06日您交纳的续期保费10000元,扣除初始费用200元后,9800元计入保单价值。*2018年09月06日您交纳的追加保费50000元,扣除初始费用1000元后,49000元计入保单价值。*|温馨提示:1、本产品的保证利率为年利率1.75%,对应的日利率为0.004795%。*                        2、年化利率=结算利率 X 结算月份所在年度的实际天数。*偿付能力信息:截至2017年06月30日,我公司综合偿付能力充足率为232.61%,该偿付能力充足率达到了监管要求;我公司最近一期的风险综合评级结果为A类。|      10000.00
|data_begin*ulifeaccount|*ulifeaccountlist|结算保单利息|08/02/2018|             30.08|          10150.51|  0.009589%|  2.50%|*ulifeaccountlist|结算保证利息|08/01/2018|              0.00|          20150.51| | |*ulifeaccountlist|结算保单利息|09/01/2018|            20.17|          10180.68|  0.009589%|  3.50%|*ulifeaccountlist|部分领取|09/06/2018|          21224.48|          -2043.80| | |*ulifeaccountlist|续期保费|09/02/2018|          2800.00|          2756.20| | | |*data_end*|您交纳的续期保费是您保单的红利或生存金转入的保单价值*2018年09月06日您交纳的续期保费10000元,扣除初始费用200元后,9800元计入保单价值。*2018年09月06日您交纳的追加保费50000元,扣除初始费用1000元后,49000元计入保单价值。*|温馨提示:1、本产品的保证利率为年利率1.75%,对应的日利率为0.004795%。*                        2、年化利率=结算利率 X 结算月份所在年度的实际天数。*偿付能力信息:截至2017年06月30日,我公司综合偿付能力充足率为232.61%,该偿付能力充足率达到了监管要求;我公司最近一期的风险综合评级结果为A类。|     20000.00

现举例说明:
 两条数据内容,用分割符‘|’分割。 每行 从data_begin开始  到*data_end*结束。里面按*ulifeaccountlist判断分行(有几行)输出明细,内又有6项明细内容。
ulifeaccountlist判断分行(有几行)是不固定的,有多也有少。 *data_end*后面的分隔内容是相同的,所以要从后面按分隔符取到data_end位置,因为这些数据是固定位置的内容。
拜托高手帮写下代码,如何把这些是固定位置的内容,取出。谢谢了!
2018-09-26 20:27
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:203
帖 子:7914
专家分:19694
注 册:2012-2-5
  得分:0 
用红字标出6项的内容看看

坚守VFP最后的阵地
2018-09-26 20:49
lnsyzhuhua
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2017-8-16
  得分:0 
回复 9楼 sdta
|结算保单利息|08/01/2018|             30.08|          10150.51|  0.009589%|  3.50%|

这6项   
2018-09-26 21:15
快速回复:提取数据内容
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034467 second(s), 8 queries.
Copyright©2004-2020, BCCN.NET, All Rights Reserved