HR开发 读取员工工资

1、使用函数读取员工工资。

 ①数据结构工资结果

DATA: GT_RGDIR     TYPE TABLE OF PC261 ,
      GS_RGDIR     TYPE PC261 ,
      GT_PAYRESULT TYPE PAYCN_RESULT ,
      GS_RT        TYPE PC207 ,
      GV_NR        TYPE PC261-SEQNR.

GET PERNR.
  CALL FUNCTION ‘CU_READ_RGDIR‘
    EXPORTING
      PERSNR                   = PERNR-PERNR
*     BUFFER                   =
*     NO_AUTHORITY_CHECK       = ‘ ‘
*   IMPORTING
*     MOLGA                    =
    TABLES
      IN_RGDIR                 = GT_RGDIR
   EXCEPTIONS
     NO_RECORD_FOUND          = 1
     OTHERS                   = 2
            .
  CALL FUNCTION ‘CD_READ_LAST‘
    EXPORTING
      BEGIN_DATE      = PN-BEGDA
      END_DATE        = PN-ENDDA
    IMPORTING
      OUT_SEQNR       = GV_NR
    TABLES
      RGDIR           = GT_RGDIR
    EXCEPTIONS
      NO_RECORD_FOUND = 1
      OTHERS          = 2.
  IF SY-SUBRC = 0.
    CALL FUNCTION ‘PYXX_READ_PAYROLL_RESULT‘
      EXPORTING
*      CLUSTERID                          = ‘CN‘
        EMPLOYEENUMBER                     = PERNR-PERNR
        SEQUENCENUMBER                     = GV_NR
*     READ_ONLY_BUFFER                   = ‘ ‘
*     READ_ONLY_INTERNATIONAL            = ‘ ‘
*     ARC_GROUP                          = ‘ ‘
*     CHECK_READ_AUTHORITY               = ‘X‘
*     FILTER_CUMULATIONS                 = ‘X‘
*     CLIENT                             =
*   IMPORTING
*     VERSION_NUMBER_PAYVN               =
*     VERSION_NUMBER_PCL2                =
      CHANGING
        PAYROLL_RESULT                     = GT_PAYRESULT
     EXCEPTIONS
       ILLEGAL_ISOCODE_OR_CLUSTERID       = 1
       ERROR_GENERATING_IMPORT            = 2
       IMPORT_MISMATCH_ERROR              = 3
       SUBPOOL_DIR_FULL                   = 4
       NO_READ_AUTHORITY                  = 5
       NO_RECORD_FOUND                    = 6
       VERSIONS_DO_NOT_MATCH              = 7
       ERROR_READING_ARCHIVE              = 8
       ERROR_READING_RELID                = 9
       OTHERS                             = 10
              .
  ENDIF.

  LOOP AT GT_PAYRESULT-INTER-RT INTO GS_RT .
    WRITE:/GS_RT-LGART GS_RT-BETRG .
  ENDLOOP.

②表类型工资结果。

DATA: RESULT_TAB    TYPE HRPAY99_TAB_OF_RESULTS,
      RESULT_HEADER TYPE PAY99_RESULT,
      RT_HEADER     TYPE LINE OF HRPAY99_RT,
      RGDIR         LIKE PC261 OCCURS 0 WITH HEADER LINE,
      PERIOD        TYPE PC261-INPER.
SELECT-OPTIONS: S_STATUS FOR RESULT_HEADER-EVP-SRTZA
                DEFAULT ‘A‘.

START-OF-SELECTION.
  SELECT SINGLE * FROM T549A
          WHERE ABKRS = PNPXABKR.
  PERIOD = PN-PAPER.  

GET PERNR .
  CALL FUNCTION ‘PYXX_GET_EVALUATION_PERIODS‘
    EXPORTING
      CLUSTERID                     = ‘CN‘
      EMPLOYEENUMBER                = PERNR-PERNR
*     BONUS_DATE                    =
      INPER_MODIF                   = T549A-PERMO
      INPER                         = PERIOD
*     PAY_TYPE                      =
*     PAY_IDENT                     =
*     READ_ONLY_INTERNATIONAL       =
    TABLES
      RGDIR                         = RGDIR
      EVALUATED_PERIODS             = RESULT_TAB
*   EXCEPTIONS
*     NO_PAYROLL_RESULTS            = 1
*     NO_ENTRY_FOUND_ON_CU          = 2
*     IMPORT_ERROR                  = 3
*     OTHERS                        = 4
            .
IF SY-SUBRC <> 0.
  ELSE.
    LOOP AT RESULT_TAB INTO RESULT_HEADER.
      CHECK S_STATUS.
      WRITE:/ ‘FOR PERIOD‘,
              RESULT_HEADER-INTER-VERSC-FPPER,
              RESULT_HEADER-INTER-VERSC-ABKRS,
            / ‘IN-PERIOD‘,
              RESULT_HEADER-INTER-VERSC-INPER,
              RESULT_HEADER-INTER-VERSC-IABKRS.
      LOOP AT RESULT_HEADER-INTER-RT INTO RT_HEADER.
        WRITE: RT_HEADER-LGART, RT_HEADER-BETRG.
      ENDLOOP.
    ENDLOOP.
  ENDIF.

2、GET PAYROLL 获取。

TABLES: PYORGSCREEN , PYTIMESCREEN.
NODES: PAYROLL TYPE PAYCN_RESULT .

GET PERNR .

GET PAYROLL .
*    PAYROLL-EVP-FPPER
*    PAYROLL-EVP-INPER
  DATA WA_RT LIKE LINE OF PAYROLL-INTER-RT .
  LOOP AT PAYROLL-INTER-RT INTO WA_RT.
    WRITE: /  WA_RT- LGART,  WA_RT-BETRG .
  ENDLOOP.
时间: 2024-11-05 15:58:31

HR开发 读取员工工资的相关文章

企业员工工资管理系统

企业工资管理是人力资源管理的一个核心环节,在市场经济和全球一体化的大背景下,随着人力资源管理在战略层面上发挥着越来越重要的作用,传统的薪酬制度已于现代化的要求不匹配,并越来越限制着企业的发展.本系统以员工的考勤信息作为基础,因为本系统是使用员工考勤信息来计算员工的工资.系统结合实际的人事.财务制度,通过实际的需求分析,采用功能强大的VS2008作为开发工具.SQL作为数据库开发出来的企业工资管理系统.使用的技术有:数据库的访问,菜单控制.本文分析了企业工资管理系统的应用现状,阐述了本工资管理系统

iOS开发读取plist文件、iphone中plist文件的

在Xcode中建立一个iOS项目后,会自己产生一个.plist文件,点击时会看见它显示的是类似于excel表格: 但是,如果打开方式选择Source Code,你会看见它其实是一个xml文件. 我们会做一个小例子,在这个例子中我们自己建立一个plist文件并填入数据,然后运行时读取这个plist文件,并将数据填写在界面上. 首先要知道读取plist文件的方法,一般来说,使用代码 NSString *plistPath = [[NSBundle mainBundle] pathForResourc

帮朋友急招PHP、Android开发工程师 西安 工资8k-12k

PHP高级工程师岗位要求: 1. 有两年以上PHP开发经验, 2. 精通PHP+MySQL程序设计及开发,拥有良好的代码习惯,要求结构清晰,命名规范,逻辑性强,代码冗余率低. 3. 熟悉面向对象的软件设计方法,对面向对象的设计模式有较深的理解并能熟练应用.4. 熟悉常用框架thinkphp或CI或YII其中一种.5. 熟悉webAndroid开发工程师前端HTML[XHTML).JQuery等JS框架.6. 逻辑性强,思维清晰,学习能力强,能够快速的学习新的技能.7. 有高流量网站开发架构经验,

超实用 2 ArrayList链表之 员工工资管理系统

1 package ArrayList的小程序; 2 import java.io.*; 3 import java.util.*; 4 public class kkk { 5 6 /** 7 * 作者:Mr.fan 8 * 功能:展示一个小的ArrayList链表的 员工工资记录系统 9 */ 10 public static void main(String[] args)throws Exception 11 { 12 //创建EmpManage对象 13 EmpManage em=ne

C 计算员工工资

#include <stdio.h> int main(int argc, char **argv) { //定义四个变量 g每小时固定的工资 40 固定工作时间 pay工资 hours员工的实际工作时间 const double g=9; const int s=40; double pay=0.0; int hours; // 输入员工的实际工作时间 printf("请输入员工 工作时间."); scanf("%d",&hours); pri

ASP.NET Core开发-读取配置文件Configuration

ASP.NET Core 是如何读取配置文件,今天我们来学习. ASP.NET Core的配置系统已经和之前版本的ASP.NET有所不同了,之前是依赖于System.Configuration和XML配置文件web.config. 新的配置系统支持多种格式的配置文件. 下面我们来以json 格式的配置文件正式开始学习. 我们新建一个ASP.NET Core Web 应用程序,选择无身份验证. 读取配置文件 在项目目录下有个 appsettings.json ,我们先来操作这个文件. 在appse

iOS开发读取plist内容

ios开发中会用到plist保存数据,读取plist数据只需要一行代码就行: NSArray * appInfos = [NSArray arrayWithContentsOfFile:[[NSBundle mainBundle] pathForResource:@"appslist" ofType:@"plist"] [NSBundle mainBundle]会返回当前程序的bundle bundle是什么鬼? 调用NSBundle的方法-> pathFor

Oracle求部门员工工资占总工资的比率

--根据每个部门来统计部门工资总和 select deptid, sum(sal) 工资合计 from emp group by deptid; --根据每个部门来统计部门工资总和select deptid, 工资合计, sum(工资合计) over() as 总合计  from (select deptid, sum(sal) 工资合计 from emp group by deptid) x;       select     deptid  部门,        工资合计,        总

使用Java继承的特性实现员工工资管理

父类: 1 /** 2 * 员工总类 3 * @author Administrator 4 * 5 */ 6 public class Employee { 7 8 private String name;//员工名字 9 private int birthMonth;//员工的生日月份 10 public String getName() { 11 return name; 12 } 13 public void setName(String name) { 14 this.name = n