博客园_赖文华.NET

男儿有泪不轻弹，只是未遇感动事

2010-11-24T16:30:00Z

男儿有泪不轻弹，只是未遇感动事

—观电视剧《远山的红叶》有感

有句话叫做“男儿有泪不轻弹”，但是我想在后面补充一句“只是未遇感动事”。不久前我在观看电视剧《远山的红叶》的时候，作为一个二十六岁的男人，我竟会为电视剧中的主人公王瑛的故事而感动得泪流满面，眼睛一次次的模糊。也许，在我这个年龄段的“孩子们”并不会看这么一部既没有漂亮大明星，又没有激烈的武打动作场面的电视剧，但是我看了，我真的认认真真的看了，并且被感动了，被折服了，更被深深的教育了。

电视剧《远山的红叶》通过王瑛同志的优秀事迹，艺术地再现了她在纪委的工作岗位上铁面无私，排除干扰，敢于碰硬的办案故事，也表现了王瑛真心实意帮助挽救犯错误同志的感人故事。通过王瑛与腐败分子岳迎久的坚决斗争，以及她对犯错误同志的关心与爱护，对老百姓的真挚热爱，对自己亲人的严格要求和挂念与无奈。讲述了一个党的优秀女儿，人民深深爱戴的好干部的感人故事。

很荣幸让我有机会看到这样一部感人至深的故事，并且是发生在我的家乡四川的真人真事，作为一名四川人我为四川、为我们党有这样的好书记感到骄傲和自豪。好久都没有看到一部电视剧使人感动得落泪了，是因为现在荧屏上充斥了太多的娱乐和商业炒作。由工作原因，直到上个周末，我才有时间看完了《远山的红叶》，并且是一气呵成独自坚守在电脑前看完了大结局，就是这么一部电视剧，让我在北京这个异常寒冷的冬日里给我带来了一丝感动。

看到乡亲们抬着病重的王书记冒着余震的危险也要把她抢救出去这一段，我陷入了深思：只有一心为民的好干部好党员才能得到老百姓以命相报。老百姓虽然没有权没有钱，但是他们有命。不论在解放前还是新中国，只有王瑛这样的干部才是值得老百姓舍弃性命也要报答的共.产.党人。当看到最后一集时，竟然使我泪流不止，几乎是整个一集都在抹眼泪，可恨上苍将这位好书记的生命过早的画上了句号。

《远山的红叶》一部很真实很真挚的片子，很具有教育和励志意义，非常感人。我将把这份感动化作一股动力，去善待身边的人和事，做好自己的本职工作。作为一名入党积极份子，我认为王书记并没有离我们而去，我觉得她还在我们身边，她在看着我们……。

本文链接

SAP ABAP基础知识自学笔记二

2010-11-22T19:54:00Z

三、各种定义

基本格式

DATA:XX TYPE YY VALUE＇ZZ＇

各种来了

*参照数据字典定义

*参照数据元素定义

data v9 type zdata_jg_20100325_01.

*参照数据库表的字段定义

data v10 type scarr-carrid.

*定义常量

CONSTANTS c1 TYPE i VALUE '1'.

*定义单值选侧屏幕

PARAMETERS p1(8) TYPE n default 'AA'.

*参照自定义类型定义变量

TYPES t1(10) TYPE c.

DATA v9 TYPE t1.

*参照自定义变量定义变量

DATA v10 LIKE v9.

*参照数据字典中的TYPE GROUP定义数据类型

TYPE-POOLS zjg01 .

data v20 type zjg01_z1.

定义结构

DATA : BEGIN OF wa,

carrid TYPE spfli-carrid,

connid TYPE spfli-connid,

cityfrom TYPE spfli-cityfrom,

cityto TYPE spfli-cityto,

distance TYPE spfli-distance,

distid TYPE string,

END OF wa.

根据结构定义内表

DATA itab LIKE TABLE OF wa.

流程控制-IF…ELSE

IF a > 12.

WRITE : '他比12大'.

ELSE.

WRITE : '他比12小'.

ENDIF.

循环

DO 10 TIMES.

WRITE: / '这是第',ie,'次'.

ie = ie + 1.

ENDDO.

把内表循环到结构中

LOOP AT itab INTO wa.

WRITE : / wa-id.

ENDLOOP.

内表各种操作-collect

在内表中一定有一个数值型的字段，而且其他字段均为字符型

把数值型字段上的数加起来

DATA : BEGIN OF wa,

a(4) TYPE c,

b(4) TYPE c,

c TYPE i,

END OF wa.

DATA itab LIKE TABLE OF wa.

wa-a = '001'.

wa-b = '0101'.

wa-c = 100.

*APPEND wa TO itab.

COLLECT wa INTO itab.

wa-a = '002'.

wa-b = '0201'.

wa-c = 200.

*APPEND wa TO itab.

COLLECT wa INTO itab.

wa-a = '002'.

wa-b = '0201'.

wa-c = 100.

*APPEND wa TO itab.

COLLECT wa INTO itab.

LOOP AT itab INTO wa.

WRITE : / wa-a,

wa-b,

wa-c.

ENDLOOP.

内表各种操作-read

LOOP AT itab1 INTO wa.

READ TABLE itab2 INTO wa1 WITH KEY carrid = wa-carrid.

IF sy-subrc <> 0.

clear wa1.

move-corresponding wa to wa1.

append wa1 to itab2.

ENDIF.

ENDLOOP.

根据结构修改内表

modify itab from wa.

SQL操作

1、把SQL结果放入内表中

SELECT carrid connid cityfrom cityto distance distid

FROM spfli

INTO CORRESPONDING FIELDS OF TABLE itab. 放到了内表中

INTO CORRESPONDING FIELDS OF wa.放到了结构中

2.1、多表查询

SELECT scarr~carrid scarr~carrname spfli~connid spfli~cityfrom

spfli~cityto

FROM scarr INNER JOIN spfli

ON scarr~carrid = spfli~carrid

INTO CORRESPONDING FIELDS OF TABLE itab.

2.2、更多表查询

SELECT spfli~carrid spfli~connid spfli~cityfrom spfli~cityto

sbook~fldate sbook~bookid sbook~customid sbook~custtype scustom~name

scustom~street

FROM spfli INNER JOIN sbook

ON spfli~carrid = sbook~carrid AND spfli~connid = sbook~connid

INNER JOIN scustom

ON sbook~customid = scustom~id

INTO CORRESPONDING FIELDS OF TABLE itab.

各种关键字

APPEND wa TO itab.把结构搞到内表中

MOVE TO 结构赋值

modify itab from wa根据结构修改内表

MOVE-CORRESPONDING str1 TO str3.同名字段赋值

分支研究

data:v1 type i value '1'.

v2 type i.

do 50 times.

v2 = v1 ** 2.

write : v1,v2.

v1=v1 +1.

enddo.

函数来了

字符串操作

CONCATENATE wa-fldate wa-week INTO wa-www SEPARATED BY

'/星期'.

子程序

三种类型：值传递，值传递并返回

# 1.值传递-实参在传递过程中不发生改变，只是传递一个实参的拷贝，适用于值不能改变的单值，不适合内表参数传递。

# 2.值传递并返回结果-传递一个实参的拷贝，实参的拷贝发生改变，返回给实参，适合于可以改变的单值传递，不适合内表参数传递。

# 3.引用传递-传递实参，子程序运行结束后，实参根据子程序运行结果，适合单值也适合内表。

看看代码就知道怎么用了

DATA : a TYPE i,

b TYPE i,

c TYPE i.

PERFORM x USING a.这是值传递

PERFORM y CHANGING b.这是值传递改变

PERFORM z CHANGING c.这是引用传递

PERFORM xyz USING a

CHANGING b

c.连起来就是这么用滴

*值传递和值传递引用改变需要写个value,引用传递不需要

FORM xyz USING value(f1) TYPE i值传递

CHANGING value(f2) TYPE i值传递改变

f3 TYPE i.引用传递

ENDFORM.

*如果传入的是内表，子程序中可以这么写

FORM xyz CHANGING p-itab like itab.

*也可以这么写吧

FORM xyz CHANGING p-itab type itab.

屏幕

START-OF-SELECTION. "主程序开始了！

WRITE : / text-001,sy-lsind.

AT LINE-SELECTION.

CASE sy-lsind.

WHEN '1'.

WRITE : / '第一级详细列表',sy-lsind.

WHEN '2'.

WRITE : / '第二级详细列表',sy-lsind.

WHEN '3'.

WRITE : / '第三级详细列表',sy-lsind.

ENDCASE.

单值选择屏幕

PARAMETER p1 TYPE scarr-carrid DEFAULT 'AA'.

多重选择屏幕

TABLES scarr.相当于data scarr type scarr.

SELECT-OPTIONS pi FOR scarr-carrid. for后面不是类型是变量

*下面是用法

SELECT carrid carrname FROM scarr

INTO CORRESPONDING FIELDS OF TABLE itab

WHERE carrid IN pi.

LOOP AT itab INTO wa.

WRITE : / wa-carrid,

wa-carrname.

ENDLOOP.

data : v1 type i value '1'.

data : v2 type i value '1'.

data : v3 type i value '2'.

data : v4 type i value '3'.

do v1 times.

write : v1, '-' , v2.

data : begin of wa1,

ebeln(3) type c,

dat type d,

menge type i,

end of wa1.

data itab like table of wa1.

wa1-ebeln = '001'.

wa1-dat = '20070803'.

wa1-menge = '10'.

append wa1 to itab.

clear wa1.

wa1-ebeln = '001'.

wa1-dat = '20070903'.

wa1-menge = '20'.

append wa1 to itab.

clear wa1.

wa1-ebeln = '002'.

wa1-dat = '20080303'.

wa1-menge = '20'.

append wa1 to itab.

clear wa1.

wa1-ebeln = '003'.

wa1-dat = '20080603'.

wa1-menge = '30'.

append wa1 to itab.

clear wa1.

loop at itab into wa1.

write : / wa1-ebeln,

wa1-dat,

wa1-menge.

endloop.

uline.

data : begin of wa2,

ebeln(3) type c,

menge type i,

end of wa2.

data itab2 like table of wa2.

loop at itab into wa1.

move-corresponding wa1 to wa2.

collect wa2 into itab2.

endloop.

loop at itab2 into wa2.

write : / wa2-ebeln,

wa2-menge.

endloop.

sy-subrc 判断有没有东西

condense 字符型 //去空格

for all entries in 内表

DATA wa LIKE LINE OF itab. //参照内表建结构

sort it by carrid connid fldate.

delete adjacent duplicates from it comparing all fields.

本文链接

SAP ABAP基础知识自学笔记一

2010-11-22T19:52:00Z

学习顺序

数据类型

域什么什么的

字符串

结构

内表

OpenSQL

函数

子程序

报表

一、T-CODE

SE80 对象浏览器

SE38 写程序

SE11 建表

SE37 函数

SM04 查看用户

SE91 message

系统

sy-uzeit 系统时间

sy-datum 系统日期

sy-datum是2010.10.10

sy-datum+0(2)是20

sy-datum+2(3)是101

PS a-comun+29(11).这也是偏移的操作

sy-subrc 正常是0，不正常是<>0或其他

二、数据类型

完整型

d 日期 8字节 YYYYMMDD

t 时间 6字节

i 整型

f 浮点型

string 可变长的字符型非完整型

非完整型

c 字符型（若不指定长度默认是1个字节）

n 数字字符型

p 小数（常用）(压缩数装载它的空间是（x+1）/2 x是原来装载它的长度)

data v1(5) type p decimals 2 value '123.45'.

本文链接

工作“三年半中”得与失的总结

2010-11-22T19:50:00Z

时间过得让人摸不着头绪，一转眼已走出学校大门三年半时间，在这三年半时间里得到许多也失去了不少。在大学毕业前也就是（大四）通过四次面试，层层的PK，我进入了一家美国电子商务公司的成都全球研发中心实习的机会。在这一年里，我学习到了很多前沿技术，所以快毕业时，帮着同学在两周内做了四个毕业设计项目。在年级中被同学们称为技术N人、程序高手。顶着这些光环，我想出去看看外面的世界是怎么样的，因为从小到大没有出过四川，偶然机会，来到了北京现在的单位，一家国企背景的单位，一呆就是三年半的时间有余了。认识了不少铁朋友，在技术、管理方面都有所提高，但在对家庭方面关心的太少太少。由于我的原因，女朋友也离开所在的外企，进入我单位。

在三年半时间里，从最初的普通开发人员、项目主要开发人员、项目主力开发人员，再到项目副经理（两次得到公司优秀员工称号），负责整个项目技术走向，协助项目经理管理日常开发任务。在10年初（部门的人员关系开始让我莫不头绪），自己老觉得有点不对劲，我看不见前面的路是怎么样的了，不知道自己的职业生涯应该如何走了，不知道自己该如何往前走了，所以在这时我决定对自己进行一个转行，所以在自己的坚持下，从原来的“应用软件”开发，转向了SAP的ABAP开发。这对我来说算是从头再来，前面一切我光环都得舍弃，从新开始。

朋友们知道我这一决定时，都为我的决定使自己很被动，说我完全有能力慢慢走向管理岗位的，我说这个我也不知道该怎么说，只有等个一两年才能看到是什么结果了。

所以现在我常为自己的职业路线做计划：

线路1：技术－－＞技术经理－－＞架构师。

线路2：技术－－＞技术经理－－＞项目管理经理。

线路3：技术－－＞技术经理－－＞技术与管理融合的经理。

我比较偏向线路3。常常为自己计划1年后，要成为什么什么，要达到什么什么，5年后要成为什么什么，要达到什么什么.......

但有时候有计划有迷失方向。

现在的的我得从新开始.......

本文链接

使用TransactionScope实现单数据库连接事务操作

2009-08-18T03:15:00Z

当应用程序需要在多个数据库中进行事务性操作的时候，使用TransactionScope类可以方便地实现应用程序的这一需求。只要对多个数据库的操作代码位于同一个事务范围内，即可实现多数据库连接的事务操作。技术要点本示例主要说明了如何在程序中使用TransactionScope实现多数据库连接事务操作，技术要点如下。— 因为位于同一个事务范围内的不同的数据库操作，程序视为同一个事务，所...

资料大搜集(一)

2009-08-03T01:56:00Z

近期看过的好文章，及技术讨论!1，个人知识管理http://topic.csdn.net/u/20090704/11/1c1d9a22-3e27-4c19-9efa-8d68f293bf62.html?93596http://download.csdn.net/source/14468252，C#通讯编程http://topic.csdn.net/u/20080623/08/4bbd2475-45...

windows系统远程桌面相关内容

2009-08-02T05:09:00Z

一般来说我们公司服务器使用的操作系统都是windows 2000 server版或者windows 2003，而这两个版本的远程桌面在使用上和windows XP系统有一个很大的区别，那就是在2000和2003中如果服务器自身已经登录到系统桌面并在上面运行一些服务或应用程序时，如果同时网络中其他计算机通过远程桌面连接进入系统桌面时并不会看到这些启用的服务和应用程序，因为2000和2003系统中的...

述WinForm多线程编程与Control.Invoke的应用

2009-08-02T04:32:00Z

环境：VS2008、C#3.0　　在WinForm开发中，我们通常不希望当窗体上点了某个按钮执行某个业务的时候，窗体就被卡死了，直到该业务执行完毕后才缓过来。一个最直接的方法便是使用多线程。多线程编程的方式在WinForm开发中必不可少。　　本文介绍在WinForm开发中如何使用多线程，以及在线程中如何通过Control.Invoke方法返回窗体主线程执行相关操作。－. WinForm多线程编程...

如何制作复杂表头的Grid （UltraGrid）

2009-07-07T09:50:00Z

如何制作复杂表头的Grid （UltraGrid）http://www.cnblogs.com/doc/articles/1183894.html

UltraChart绑定数据的问题(翻译)

2009-07-07T09:34:00Z

http://blog.csdn.net/lijigang1982/archive/2009/06/04/4241949.aspx