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的报表了。
以上。