HR开发中会经常用到逻辑数据库，其中PNP逻辑数据最常用的。 人事数据的信息类型数据都存放在PAnnnn这些表中，PNP其实就是从这些表中抓取的数据。现在已经用PNPCE(支持concurrent employment)取代PNP，但是因为PNP已经用得相当普遍而且够用，很多报表还是基于PNP的，这里举个PNP的例子。

1, 指定逻辑数据库PNP

创建程序是在属性界面输入逻辑数据库PNP

下图selection screen处可以选择000或900两个选择屏幕，000是主数据的选择屏，900是薪资结果的选择屏。

然后点击HR Report Catergory，进入report category assignment屏幕，创建一个category。

2, 创建report category

系统中已经存在很多ReportCategory，可以根据开发需要选择类似的进行复制，来看一个比较常见的Category

可以通过下图看到report category中的设置和报表选择画面的关系，其中2是决定哪些字段作为条件显示在选择画面中。

创建一个自定义的report category ’ZEMPLOY'完后保存，然后输入新创建的CATEGORY名字保存退出。

然后se38创建一个程序，输入下面的代码运行就可以看到选择画面了

 

1	TABLES: PERNR.

运行就可以看到效果。

3, 程序编写

3.1 HR数据表定义

由于用到了LDB及HR的表结构与其它模块的不同，所以程序的编写也略有不同，但要比其它模块的更简单。

 

1 2 3 4

REPORT ztest_hr.   TABLES:pernr. INFOTYPES:0000,0001,0002,0015,0041,0185.

程序头部要定义将要用到的HR数据表(如PA0000,PA0001)就是
INFOTYPES：0000，0001.
如果不定义，而在后面使用了该表程序会报语法错误。
而定义好之后在程序中使用时表名是P0000,P0001(而不是pa0000,pa0001)

3.2 get语句

然后用get语句就可以将逻辑数据库中的数据取出来,

Get pernr.

这句是逻辑数据库的专用语法，功能是根据用户输入的选择条件从逻辑数据库PNP中取出相应的数据然后循环，此时的PERNR是一个结构体，会在每次循环时自动赋值。且要注意该句不能写在FORM内部.

 

1 2 3 4

START-OF-SELECTION.   GET pernr. PERFORM frm_get_data.

程序运行时有一个结构体PN,存放的是屏幕上输入的日期及一些基本参数，常用到的是PN-BEGDA及PN-ENDDA。

3.3 宏Rp_provide_from_last

下面介绍一个HR开发中常用的宏，Rp_provide_from_last，标准用法如下：

它的意思是根据PERNR当前的NO.号找表P0000中字段SUBTY = P0000-SUBTY且字段BEGDA及ENDDA在PN-BEGDA和PN-ENDDA之间的数据的最后一条。

如  p0000：

P0000	BEGDA	ENDDA
1	2012.05.01	2012.05.30
2	2012.06.01	2012.06.30

当PN-BEGDA =2012.04.01,PN-ENDDA = 2012.05.03

该语法只会得到第1条，因为第2条的时间不在PN内。

如果PN-BEGDA = 2012.04.01, PN-ENDDA = 2012.06.02.

那么该语法会取第2条，1和2 都在时间内，取最后一条。

下面是一段用到了Rp_provide_from_last的代码。

3.4 DO ..VARYIING OBJ FORM XXX NTEXT XXX

HR的表中有的表的结构如P0041中的DAR01/DAT01,DAR02/DAT02,DAR03/DAT03…

DT是TYPE的类型，如果要取某个类型的DATE时，由于不确定是存放在哪个DT(DAT01/DAT02/…),所以可用语法

DO ..VARYIING OBJ FORM XXX NTEXT XXX来方便解决这个问题。如下：

3.5 provide语句

还有一种常用的语法，PROVIDE * FROM P0000 BETWEEN PN-BEGDA AND PN-ENDDA.

其功能等于一个LOOP AT P0000 WHERE BEGDA LT PN-ENDDA AND ENDDA GTPN-ENDDA. ENDLOOP.

掌握以上几点，基本上可以写出一个基于逻辑数据库PNP的报表了。

以上。