员工花名册管理Excel模板
(完整版)工程劳务人员花名册、工资表、考勤、变更周报、台账、会议纪要等
总包劳动力管理员（签字） ：
联系电话：
YELW— FB—03，此表由用工单位（分包）编制，每月报总包项目部备案
施工项目劳务及规范用工管理台账
序 工程名称 号
施工总承 包单位
项目经理 / 电话
劳动力管 理员 / 电话
建设单位
负责人 / 电话
分包单位
负责人 （授权队 长）/ 电话
劳动力管 理员 / 电话
申明：此表登记劳务作业人员为我单位本月在该工程全部出勤人数，出勤情况属实；我单位已将此表向全体劳务作业人员公示，均无异议。
班组长签字：
用工企业 劳动力管理员签字：
用工企业项目负责人 （授权队长）签字：
填表时间：
总计 用工企业盖章：
3
YELW— FB—03，此表由用工单位（分包）编制，每月报总包项目部备案
项目劳务费结算、支付情况报表
项目名称 ( 全称 ) ：
项目实际结算、支付情况
日期：
年月日
序号
分包企业全 称
合同价款 (万元 )
应结算 劳务费 金额 （万元）
已结算 劳务费 金额 （万元）
结算率 %
应支付劳 务费金额
(万元 )
已支付劳务费 金额
（万元）
支付率 %
填报单位名称（章） ：
6
总包项目经理 (签字 )：
编号
本周离场农民工 姓名
身份证号
离场时间
在本工程务 工时间
工种
工资结算、支付情况
申明：此表登记农民工为 我单位在该工程本周全部 离场人数，情况属实。
班组长签字：
；用工企业劳动力管理员签字：
用工企业项目负责人（授权队长）签字：
；填表时间：
员工花名册Excel模板
本科 研究生0
Employee registration form
当前状态 在职 离职 在职 在职 在职 离职 在职 在职 离职 在职 在职 在职 离职 在职 在职
当前人数
0
本年入职
0
合同到期
0
当前年份 2023年
月份 1 2 3 4 5 6 7 8 9 10 11 12
入职人数 0 0 0 0 0 0 0 0 0 0 0 0
员
工
员工花名册 Staff roster
花
1
入职人数
1
0.5 0.5
当前人数
0
本年入职
0 1 2 3 4 5 6 7 8 9 10 11 12
0 销售部 财务部 人事部 客服部 市场部
员工信息登记表
序号 员工姓名
1
XX1
2
XX2
3
XX3
4
XX4
5
XX5
6
XX6
7
XX7
8
XX8
9
XX9
10
XX10
11
0
合同到期
0
男0 女0
本年入职
1
当前人数
0.5
客服部 市场部 策划部 研发部 产品部
0 销售部 财务部 人事部 客服部 市场部 策划部 研发部 产品部
当前人数
博士 0高中
0 大专
部门
联系方式
入职日期
合同期限 （年）
Employee registration form
合同12
XX12
13
XX13
14
XX14
15
XX15
身份证号码
职工花名册(标准模板)
职工花名册(标准模板)1. 背景职工花名册是一份记录公司所有员工信息的文档。
它包括每位员工的基本信息，如姓名、职位、入职日期和员工编号等。
花名册的制作和更新有助于公司管理人力资源，提供及时准确的员工信息。
2. 文档要求- 文档使用标准模板，确保格式一致性。
- 文档至少包括以下字段：- 员工编号- 姓名- 性别- 职位- 入职日期- 所属部门- 可根据需要添加其他相关字段，如联系方式、工作地点等。
3. 制作步骤3.1 准备模板- 根据公司需求，创建合适的职工花名册模板。
- 确保模板中包含上述所需字段。
- 模板格式清晰简洁，方便信息录入和浏览。
3.2 收集员工信息- 从相关部门或人力资源部门收集员工信息。
- 确保信息收集准确完整，包括姓名、性别、职位、入职日期和所属部门等重要信息。
3.3 填写花名册- 将收集到的员工信息按照模板要求填写到职工花名册中。
- 根据员工信息的正确性和准确性进行核对，确保填写正确。
4. 更新管理4.1 入职新员工- 当有新员工入职时，及时更新职工花名册，添加新员工信息。
- 确保信息录入准确，避免信息遗漏或错误。
4.2 离职员工处理- 当有员工离职时，及时将其信息从职工花名册中删除。
- 同步更新员工状态，确保花名册的准确性。
4.3 定期审核- 定期对职工花名册进行审核，核对员工信息的准确性和完整性。
- 如有错误或遗漏，及时进行修正。
5. 保密性和数据安全- 职工花名册包含员工的重要信息，要严格保密。
- 建议将职工花名册保存在安全的服务器或数据库中，只授权特定人员访问。
6. 总结职工花名册是一份重要的人力资源管理文档，有助于公司管理和维护员工信息的准确性。
制作标准模板，并通过定期更新和审核，可以确保花名册的有效性和高质量。
同时，注意保密性和数据安全，确保员工信息不被泄露或滥用。
(完整版)公司员工花名册(模板)
岗位
身份证号
续表三
参加工作时间
岗位工资
备注
第 4页 共 5页
员工基本
序
性
信息
部门
号
别
姓名
57 58 59 60 61 62 63 64 65 66 67 68 69 70
岗位
身份证号
续表四
参加工作时间
岗位工资备注第 来自页 共 5页岗位身份证号
续表一
参加工作时间
岗位工资
备注
第 2页 共 5页
员工基本
序
性
信息
部门
号
别
姓名
29 30 31 32 33 34 35 36 37 38 39 40 41 42
岗位
身份证号
续表二
参加工作时间
岗位工资
备注
第 3页 共 5页
员工基本
序
性
信息
部门
号
别
姓名
43 44 45 46 47 48 49 50 51 52 53 54 55 56
XXX 市 XXX 有 限 责 任 公 司 员 工 花 名 册
编制日期： 2014-03-01
员工基本
序
性
信息
部门
号
别
姓名
岗位
身份证号
参加工作时间
岗位工资
备注
1 2 3 4 5 6 7 8 9 10 11 12 13 14
第 1页 共 5页
员工基本
序
性
信息
部门
号
别
姓名
15 16 17 18 19 20 21 22 23 24 25 26 27 28
员工点名册
员工点名册一、基本信息公司名称：XXX有限公司公司地址：XXX市XXX区XXX路XXX号成立时间：XXXX年XX月XX日经营范围：XXX、XXX、XXX等组织结构：总经理办公室、人力资源部、财务部、生产部、市场部、技术部等二、员工名单1. 张三，男，25岁，人力资源部，新员工，联系方式：XXX。
2. 李四，女，28岁，财务部，资深员工，联系方式：XXX。
3. 王五，男，32岁，生产部，中层管理人员，联系方式：XXX。
4. 赵六，女，27岁，市场部，新员工，联系方式：XXX。
5. 刘七，男，35岁，技术部，资深员工，联系方式：XXX。
6. 钱八，女，30岁，人力资源部，中层管理人员，联系方式：XXX。
7. 孙九，男，29岁，生产部兼市场部，新员工，联系方式：XXX。
8. 周十，女，34岁，财务部兼技术部，资深员工，联系方式：XXX。
三、岗位职责1. 张三：人力资源管理工作，包括招聘、培训、绩效考核等。
2. 李四：财务管理工作，包括会计、出纳、税务等。
3. 王五：生产管理工作，包括生产计划、生产现场管理、质量监控等。
4. 赵六：市场调研、开拓及客户关系管理。
5. 刘七：技术研发、技术支持及售后服务。
6. 钱八：人力资源管理工作中的员工关系处理、薪酬福利管理等。
7. 孙九：生产与市场工作的结合，负责生产与市场的协调与沟通。
8. 周十：财务管理与技术工作的结合，负责财务与技术的协调与沟通。
四、绩效考核标准及奖惩制度1. 绩效考核标准：根据员工的工作完成情况、工作质量、工作效率等方面进行综合评价。
2. 奖惩制度：表现优秀的员工将给予奖金、晋升等奖励；表现不佳的员工将给予批评、扣发奖金等处罚。
五、注意事项1. 员工应按时上下班，遵守公司规章制度。
2. 员工应积极工作，勇于承担责任，提高工作效率。
3. 员工应保持良好的工作态度和精神状态，避免出现消极怠工等现象。
4. 员工之间应保持良好的沟通与协作，共同完成工作任务。
公司员工花名册模板
公司员工花名册模板一、引言花名册是每个公司都必备的员工信息管理工具，它记录了公司所有员工的基本信息，并起到了统一管理、查找、查询员工信息的作用。
为了提高工作效率，许多公司采用花名册模板来快速建立并维护员工花名册。
本文将介绍一个公司员工花名册模板的基本要素和使用方法。
二、公司员工花名册模板的基本要素1. 员工个人信息员工个人信息是花名册的核心内容，包括员工的姓名、性别、出生日期、身份证号码、婚姻状况、联系电话、邮箱地址等。
这些信息是公司对员工进行个体化管理和联系的重要基础。
2. 员工部门信息员工部门信息记录了员工所属部门的名称和编号，这有助于快速定位员工的工作范围和职责。
此外，还可以追踪员工在不同部门之间的变动和调动情况。
3. 员工职位信息员工职位信息记录了员工的职位名称和职位级别，这有助于了解员工在公司内部的职业发展和晋升情况。
同时，职位信息也有助于公司进行薪酬管理和绩效考核。
4. 员工入职信息员工入职信息包括员工的入职日期、试用期结束日期、薪资待遇、入职资料等。
这些信息可以帮助公司进行员工的福利管理和培训发展计划。
5. 员工离职信息员工离职信息记录了员工的离职日期、离职原因、是否签订离职协议等。
这些信息可作为公司扩大或减少员工规模时的参考依据，还有助于评估公司的员工流动情况。
三、公司员工花名册模板的使用方法1. 下载合适的员工花名册模板可以从互联网上下载或购买成熟的员工花名册模板，确保模板的格式和内容满足公司的需求。
花名册模板通常可以在Excel或其他电子表格软件中进行编辑和管理。
2. 输入员工个人信息在花名册模板中，按照所定义的字段，逐个输入员工的个人信息，确保信息的准确性和完整性。
对于某些人事管理软件，也可以通过导入数据或批量添加的方式来快速录入员工信息。
3. 更新员工信息在员工入职、晋升、离职等变动时，及时更新员工花名册中的相关信息。
保持花名册的及时性和准确性，有助于提高人力资源管理的效率和可靠性。
HR人员花名册报表
HR⼈员花名册报表创建程序时要设置逻辑数据库以下例⼦为PNPCE数据库主逻辑*&---------------------------------------------------------------------**& Report ZHRPA001*&---------------------------------------------------------------------**&*&---------------------------------------------------------------------*REPORT ZHRPA001 MESSAGE-ID ZSAP_HR NO STANDARD PAGE HEADING.TABLES: PERNR.NODES:PERAS.INFOTYPES : 0000,0001,0002,0006,0007,0016,0022,0041,0105,0185,0009,3527,3529,9002,9003,9006,9018,9019,9021,9022,9504.TYPE-POOLS : SLIS.*&---------------------------------------------------------------------** INCLUDE*&---------------------------------------------------------------------*INCLUDE ZHRI0001D1.INCLUDE ZHRPA001_DATA.INCLUDE ZHRPA001_SCL.INCLUDE ZHRPA001_FRM.INCLUDE ZHRPA001_EXL.*----------------------------------------------------------------------** INITIALIZATION 选择屏幕初始化处理*----------------------------------------------------------------------*INITIALIZATION.PNPSTAT2-LOW = '3'.APPEND PNPSTAT2.*----------------------------------------------------------------------** START-OF-SELECTION*----------------------------------------------------------------------*START-OF-SELECTION.PERFORM FRM_READ_TEXT.GET PERAS.PERFORM FRM_GET_DATA.END-OF-SELECTION."获取部门PERFORM FRM_PROCESS_DATA."更改⽇期格式PERFORM FRM_PROCESS_DAT.PERFORM FRM_INDICATOR." USING'' I_PROG. "界⾯友好PERFORM FRM_DISPLAY_ALV.View Code包含⽂件ZHRI0001D1*&---------------------------------------------------------------------**& 包含 ZHRI0001D1*&---------------------------------------------------------------------**&---------------------------------------------------------------------**& Include ZHRI0001D1*&---------------------------------------------------------------------*INCLUDE OLE2INCL.DEFINE MCR_MESSAGE.CASE sy-subrc.WHEN 0.WHEN OTHERS.MESSAGE e000WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.ENDCASE.END-OF-DEFINITION.DATA: APPLICATION TYPE OLE2_OBJECT,WORKBOOK TYPE OLE2_OBJECT,SHEET TYPE OLE2_OBJECT,COLUMNS TYPE OLE2_OBJECT,W_COMMENT TYPE OLE2_OBJECT,W_SHAPE TYPE OLE2_OBJECT,ROWS TYPE OLE2_OBJECT,H_F TYPE OLE2_OBJECT, " FONTCELLS1 TYPE OLE2_OBJECT,* ADD FOR CELLS COLORSELECTIONT TYPE OLE2_OBJECT,INTERIOR TYPE OLE2_OBJECT,BORDERS TYPE OLE2_OBJECT,* END ADDCELLS TYPE OLE2_OBJECT,PAG_BREAK TYPE OLE2_OBJECT.DATA: G_6_PAGENO TYPE I VALUE 0. "当前页码，⽤于分页DATA: G_6_PAGENO_COPY TYPE I VALUE 0. "*DATA: P_FILENAME TYPE SAPB-SAPPFAD,DATA: P_FILENAME TYPE STRING,G_6_PATH TYPE STRING.DATA: G_6_ROW TYPE I , "默认⼀次粘贴1000⾏G_6_ROW_BEGIN TYPE I , "开始粘贴的⾏ G_6_LEFT TYPE STRING,G_6_RIGHT TYPE STRING.RANGES: GI_LINE FOR SY-TABIX.TYPES: BEGIN OF TYP_S_SENDERLINE ,LINE(4096) TYPE C,END OF TYP_S_SENDERLINE.TYPES: TYP_T_SENDER TYPE TYP_S_SENDERLINE OCCURS0. DATA: ITB_EXCEL_TAB TYPE TYP_S_SENDERLINE OCCURS0 . DATA: WA_EXCEL TYPE TYP_S_SENDERLINE .DATA: G_6_SEPARATOR TYPE C.View Code包含⽂件ZHRPA001_DATA*&---------------------------------------------------------------------**& 包含 ZHRPA001_DATA*&---------------------------------------------------------------------*DATA : BEGIN OF GT_OUT OCCURS0,CELLCOLOR TYPE LVC_T_SCOL, "单元格颜⾊PERNR TYPE PA0000-PERNR, "⼈员编号USRID1 TYPE PA0105-USRID, "⼯号CNAME TYPE PA0002-CNAME, "姓名GESCH TYPE PA0002-GESCH, "性别GESCH2(2) TYPE C, "性别textBUKRS TYPE CHAR40, "公司代码ORGEH TYPE PA0001-ORGEH, "部门代码ORGTX TYPE T527X-ORGTX,ZZ_YJJG TYPE CHAR100, "集团ZZ_YJJG2 TYPE CHAR40, "⼀级机构中⽂描述ZZ_YJJG3 TYPE CHAR40, "⼆级机构中⽂描述ZZ_YJJG4 TYPE CHAR100, "三级机构中⽂描述ZZ_YJJG5 TYPE CHAR100, "四级机构中⽂描述PLANS(40) TYPE C, "职位PLANSN TYPE P0001-PLANS, "职位编码ZZ_GWZU TYPE PA9002-ZZ_ZWZZ, "职族ZZ_GWZL TYPE P9504-ZZ_GWZL, "职类ZZ_ZZZJ TYPE PA9002-ZZ_ZZZJ, "职级ZZ_ZJSJBH(8) TYPE C, "直线汇报⼈编号ZZ_ZJSJ(8) TYPE C, "直线汇报⼈ZZ_DSBHBH(8) TYPE C, "导师编号ZZ_DSBH(8) TYPE C, "导师STAT2(6) TYPE C, "员⼯状态SJZZRQ TYPE DATS, "实际转正⽇期SJZZRQ1 TYPE CHAR20, "实际转正⽇期SFYZZ(2) TYPE C, "是否转正标识DAT01 TYPE DATS, "⼊职时间DAT011 TYPE CHAR20, "⼊职时间DAT02 TYPE DATS, "预计转正时间DAT021 TYPE CHAR20, "预计转正时间DAT03 TYPE DATS, "⾸次参加⼯作⽇期DAT031 TYPE CHAR20, "⾸次参加⼯作⽇期BEGDA2 TYPE PA9003-BEGDA, "离职时间BEGDA21 TYPE CHAR20, "离职时间SUBTY(12) TYPE C, "学历SLABS(10) TYPE C, "学位INSMO(4) TYPE C, "学习⽅式XXXS(4) TYPE C,FACH3 TYPE PA3529-FACH3, "所学专业INSTI TYPE PA0022-INSTI, "院校培训机构名称ENDDA2 TYPE CHAR20,"PA0022-ENDDA, "毕业时间ZZ_HDZC TYPE PA9019-ZZ_HDZC, "获得职称ZZ_ZCDJ TYPE CHAR10, "职称级别USETO TYPE PA0185-USETO, "⾝份证失效⽇期USETO1 TYPE CHAR20, "⾝份证失效⽇期GBDAT TYPE DATS, "出⽣⽇期GBDAT1 TYPE CHAR20, "出⽣⽇期DISP_AGE TYPE I, "年龄FAMST(4) TYPE C, "婚姻状况ZZ_MZT TYPE DDTEXT, "民族⽂本LOCAT TYPE PA0006-LOCAT, "户⼝所在地HUKOT(6) TYPE C, "户⼝性质ZZ_ZPQD(12) TYPE C, "招聘来源PERSG(8) TYPE C, "员⼯组PERSK(22) TYPE C, "员⼯⼦组CTTYP(12) TYPE C, "合同类型ZZ_QXLX(18) TYPE C, "合同期限分类BEGDA3 TYPE CHAR20, "本期合同开始⽇期ENDDA3 TYPE CHAR20, "本期合同结束⽇期SHAGE TYPE I, "社会⼯龄SLAGE(5) TYPE C, "司龄LOCAT2 TYPE PA0006-LOCAT, "驻外地区ZZ_CZGZD(50) TYPE C, "常驻⼯作地点ZZ_SJGZD(40) TYPE C, "实际⼯作地点LOCAT3 TYPE PA0006-LOCAT, "社保缴纳地KOSTL TYPE PA0001-KOSTL, "发薪成本中⼼号LOCAT4 TYPE PA0006-LOCAT, "现家庭住址USRID TYPE PA0105-USRID, "联系⽅式USRID2 TYPE PA0105-USRID, "电⼦邮件ZZ_JJLXR TYPE PA0105-USRTY, "紧急联系⼈USRID3 TYPE PA0105-USRID, "紧急联系⼈联系⽅式BEGDA4 TYPE DATS, "最后⼯作⽇期BEGDA41 TYPE CHAR20, "最后⼯作⽇期ZZ_JCFS TYPE PA0016-ZZ_JCFS, "解除合同⽅式MASSG(80) TYPE C, "操作原因ZZ_LZXL(80) TYPE C, "离职原因BEGDA5 TYPE PA0022-BEGDA,ENDDA4 TYPE PA0022-ENDDA,ZZ_JGCJ TYPE CHAR40,ZZ_ZGSF TYPE GBDEP, "籍贯省份ZZ_ZGSFMS(50) TYPE C, "籍贯省份描述ZZ_GSDM TYPE BUKRS,ZZ_GSDMT TYPE CHAR50,ZZ_LWSSGS TYPE ZZ_LWSSGS, "⽤⼯形式SNO TYPE I, "序号ZWECK TYPE PA0009-ZWECK, "开户⾏BKREF TYPE PA0009-BKREF, "银⾏账号SCHKZ TYPE PA0007-SCHKZ, "⼯作班次ABKRS TYPE PA0001-ABKRS, "⼯资范围ZGSYX TYPE PA0105-USRID, "公司邮箱END OF GT_OUT.DATA : BEGIN OF GT_0027 OCCURS0. "成本中⼼0027 INCLUDE STRUCTURE P0027.DATA : END OF GT_0027.DATA: GT_HRP9504 TYPE TABLE OF HRP9504,GT_HRP9502 TYPE TABLE OF HRP9502,GT_PA0002 TYPE TABLE OF PA0002,GT_T527X TYPE TABLE OF T527X,GT_ZHR_LZYY TYPE TABLE OF ZHR_LZYY.* GT_9504 TYPE TABLE OF ZHR_GWGF.DATA: GT_OBJID LIKE TABLE OF ZHRS_ORGEH WITH HEADER LINE. DATA GT_T500P LIKE TABLE OF T500P WITH HEADER LINE.DATA GT_T001 LIKE TABLE OF T001 WITH HEADER LINE.DATA GT_HRP1000 LIKE TABLE OF HRP1000 WITH HEADER LINE. DATA GT_HRP1000A LIKE TABLE OF HRP1000 WITH HEADER LINE. DATA GT_PA0041 LIKE TABLE OF PA0041 WITH HEADER LINE. DATA GT_ZHR_CZDD LIKE TABLE OF ZHR_CZDD WITH HEADER LINE. DATA LT_T501T LIKE TABLE OF T501T WITH HEADER LINE.DATA LT_T503T LIKE TABLE OF T503T WITH HEADER LINE.DATA LT_T530T LIKE TABLE OF T530T WITH HEADER LINE.DATA LT_DD07T LIKE TABLE OF DD07T WITH HEADER LINE.DATA LT_T547S LIKE TABLE OF T547S WITH HEADER LINE.DATA LT_T517T LIKE TABLE OF T517T WITH HEADER LINE.DATA LT_T519T LIKE TABLE OF T519T WITH HEADER LINE.DATA LT_BNKA_BF LIKE TABLE OF BNKA_BF WITH HEADER LINE. DATA LT_T005U LIKE TABLE OF T005U WITH HEADER LINE.DATA LT_0000 LIKE TABLE OF PA0000 WITH HEADER LINE.DATA LT_PA0022 LIKE TABLE OF PA0022 WITH HEADER LINE. DATA LT_PA3529 LIKE TABLE OF PA3529 WITH HEADER LINE. DATA: GT_CELLCOLOR TYPE LVC_T_SCOL,GS_CELLCOLOR TYPE LVC_S_SCOL.*---ALV 相关定义DATA: GT_FIELD TYPE LVC_T_FCAT,GS_FIELD TYPE LVC_S_FCAT.GS_FIELD2 TYPE LVC_S_FCAT.DATA: GS_LAYOUT TYPE LVC_S_LAYO.DATA: GR_GRID TYPE REF TO CL_GUI_ALV_GRID.DATA LV_0000 TYPE DATS.*---EXL导出相关DATA : BEGIN OF GT_EXL OCCURS0,PERNR TYPE PA0000-PERNR, "⼈员编号USRID1 TYPE PA0105-USRID, "⼯号CNAME TYPE PA0002-CNAME, "姓名GESCH TYPE PA0002-GESCH, "性别GESCH2(2) TYPE C, "性别textBUKRS TYPE CHAR40, "公司代码ORGEH TYPE PA0001-ORGEH, "部门代码ORGTX TYPE T527X-ORGTX,ZZ_YJJG TYPE CHAR100, "集团ZZ_YJJG2 TYPE CHAR40, "⼀级机构中⽂描述ZZ_YJJG3 TYPE CHAR40, "⼆级机构中⽂描述ZZ_YJJG4 TYPE CHAR100, "三级机构中⽂描述ZZ_YJJG5 TYPE CHAR100, "四级机构中⽂描述PLANS(40) TYPE C, "职位PLANSN TYPE P0001-PLANS, "职位编码ZZ_GWZU TYPE PA9002-ZZ_ZWZZ, "职族ZZ_GWZL TYPE P9504-ZZ_GWZL, "职类ZZ_ZZZJ TYPE PA9002-ZZ_ZZZJ, "职级ZZ_ZJSJBH(8) TYPE C, "直线汇报⼈编号ZZ_ZJSJ(8) TYPE C, "直线汇报⼈ZZ_DSBHBH(8) TYPE C, "导师编号ZZ_DSBH(8) TYPE C, "导师STAT2(6) TYPE C, "员⼯状态SJZZRQ1 TYPE CHAR20, "实际转正⽇期SFYZZ(2) TYPE C, "是否转正标识* DAT01 TYPE DATS, "⼊职时间DAT011 TYPE CHAR20, "⼊职时间* DAT02 TYPE DATS, "预计转正时间DAT021 TYPE CHAR20, "预计转正时间* DAT03 TYPE DATS, "⾸次参加⼯作⽇期DAT031 TYPE CHAR20, "⾸次参加⼯作⽇期* BEGDA2 TYPE PA9003-BEGDA, "离职时间BEGDA21 TYPE CHAR20, "离职时间SUBTY(12) TYPE C, "学历SLABS(10) TYPE C, "学位INSMO(4) TYPE C, "学习⽅式XXXS(4) TYPE C,FACH3 TYPE PA3529-FACH3, "所学专业INSTI TYPE PA0022-INSTI, "院校培训机构名称ENDDA2 TYPE CHAR20,"PA0022-ENDDA, "毕业时间 ZZ_HDZC TYPE PA9019-ZZ_HDZC, "获得职称ZZ_ZCDJ TYPE CHAR10, "职称级别ICNUM TYPE PA0185-ICNUM, "⾝份证USETO1 TYPE CHAR20, "⾝份证失效⽇期* GBDAT TYPE DATS, "出⽣⽇期GBDAT1 TYPE CHAR20, "出⽣⽇期DISP_AGE TYPE I, "年龄FAMST(4) TYPE C, "婚姻状况ZZ_MZT TYPE DDTEXT, "民族⽂本LOCAT TYPE PA0006-LOCAT, "户⼝所在地HUKOT(6) TYPE C, "户⼝性质ZZ_ZPQD(12) TYPE C, "招聘来源PERSG(8) TYPE C, "员⼯组PERSK(22) TYPE C, "员⼯⼦组CTTYP(12) TYPE C, "合同类型ZZ_QXLX(18) TYPE C, "合同期限分类BEGDA3 TYPE CHAR20, "本期合同开始⽇期ENDDA3 TYPE CHAR20, "本期合同结束⽇期SHAGE TYPE I, "社会⼯龄SLAGE(5) TYPE C, "司龄LOCAT2 TYPE PA0006-LOCAT, "驻外地区ZZ_CZGZD(50) TYPE C, "常驻⼯作地点ZZ_SJGZD(40) TYPE C, "实际⼯作地点LOCAT3 TYPE PA0006-LOCAT, "社保缴纳地KOSTL TYPE PA0001-KOSTL, "发薪成本中⼼号LOCAT4 TYPE PA0006-LOCAT, "现家庭住址USRID TYPE PA0105-USRID, "联系⽅式USRID2 TYPE PA0105-USRID, "电⼦邮件ZZ_JJLXR TYPE PA0105-USRTY, "紧急联系⼈USRID3 TYPE PA0105-USRID, "紧急联系⼈联系⽅式* BEGDA4 TYPE DATS, "最后⼯作⽇期BEGDA41 TYPE CHAR20, "最后⼯作⽇期ZZ_JCFS TYPE PA0016-ZZ_JCFS, "解除合同⽅式MASSG(80) TYPE C, "操作原因ZZ_LZXL(80) TYPE C, "离职原因BEGDA5 TYPE PA0022-BEGDA,ENDDA4 TYPE PA0022-ENDDA,ZZ_JGCJ TYPE CHAR40,ZZ_ZGSFMS(50) TYPE C, "籍贯省份描述ZZ_GSDM TYPE BUKRS,ZZ_GSDMT TYPE CHAR50,ZZ_LWSSGS TYPE ZZ_LWSSGS, "⽤⼯形式SNO TYPE I, "序号ZWECK TYPE PA0009-ZWECK, "开户⾏BKREF TYPE PA0009-BKREF, "银⾏账号SCHKZ TYPE PA0007-SCHKZ, "⼯作班次ABKRS TYPE PA0001-ABKRS, "⼯资范围ZGSYX TYPE PA0105-USRID, "公司邮箱END OF GT_EXL.DEFINE MCR_MESSAGE.CASE SY-SUBRC.WHEN 0.WHEN OTHERS.MESSAGE E000(ZSAP_HR)WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.ENDCASE.END-OF-DEFINITION.DATA: I_PROG TYPE I,I_PROG2 TYPE I.View Code包含⽂件ZHRPA001_SCL*&---------------------------------------------------------------------**& 包含 ZHRPA001_SCL*&---------------------------------------------------------------------*SELECTION-SCREEN BEGIN OF BLOCK BKA WITH FRAME TITLE TEXT-B01. SELECT-OPTIONS: P_DAT FOR SY-DATUM NO-EXTENSION.SELECT-OPTIONS: P_LZRQ FOR SY-DATUM NO-EXTENSION.SELECT-OPTIONS: P_SFYZZ FOR GT_OUT-SFYZZ NO-EXTENSION NO INTERVALS. SELECTION-SCREEN END OF BLOCK BKA .AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_SFYZZ-LOW.PERFORM FRM_SEARCH_HELP_FOR_PSTEN.*添加屏幕搜索帮助FORM FRM_SEARCH_HELP_FOR_PSTEN .TYPES:BEGIN OF TY_STR_VALUE_TAB,STAT TYPE JEST-STAT, "审批状态判断条件END OF TY_STR_VALUE_TAB.DATA: LT_VALUE_TAB TYPE TABLE OF TY_STR_VALUE_TAB,LS_VALUE_TAB TYPE TY_STR_VALUE_TAB.CLEAR LT_VALUE_TAB.APPEND LS_VALUE_TAB TO LT_VALUE_TAB.LS_VALUE_TAB-STAT = '是'.APPEND LS_VALUE_TAB TO LT_VALUE_TAB.LS_VALUE_TAB-STAT = '否'.APPEND LS_VALUE_TAB TO LT_VALUE_TAB.CALL FUNCTION'F4IF_INT_TABLE_VALUE_REQUEST'EXPORTING* DDIC_STRUCTURE = ' 'RETFIELD = 'STAT'"搜索帮助内表要输出的的帮助字段名* PVALKEY = 'SPZT'DYNPPROG = SY-REPID "程序名DYNPNR = SY-DYNNR "屏幕号DYNPROFIELD = 'P_SFYZZ'"存储返回值* STEPL = 0* WINDOW_TITLE =* VALUE = ' 'VALUE_ORG = 'S'* MULTIPLE_CHOICE = ' '* DISPLAY = ' '* CALLBACK_PROGRAM = ' '* CALLBACK_FORM = 'cb_form'* CALLBACK_METHOD =* MARK_TAB =* IMPORTING* USER_RESET =TABLESVALUE_TAB = LT_VALUE_TAB* FIELD_TAB = lt_value_tab* RETURN_TAB =* DYNPFLD_MAPPING =EXCEPTIONSPARAMETER_ERROR = 1NO_VALUES_FOUND = 2IF SY-SUBRC <> 0.* Implement suitable error handling hereENDIF.ENDFORM.View Code包含⽂件ZHRPA001_FRM*&---------------------------------------------------------------------**& 包含 ZHRPA001_FRM*&---------------------------------------------------------------------**&---------------------------------------------------------------------**& Form FRM_GET_DATA*&---------------------------------------------------------------------**& text*&---------------------------------------------------------------------*FORM FRM_GET_DATA.DATA: LV_YEARS TYPE I,LV_YEARS2 TYPE I,LV_YEARS3 TYPE I.DATA: LV_MONTH TYPE I.DATA: LV_SILING TYPE P DECIMALS 2.DATA: MESSAGE_HANDLER TYPE REF TO IF_HRPA_MESSAGE_HANDLER. DATA LV_BEGDA TYPE BEGDA.DATA LV_ENDDA TYPE ENDDA.DATA LV_ENDDA02 TYPE ENDDA.DATA LV_VDATE TYPE DATS.CHECK PERNR-PERNR NE'90010175'.CHECK PERNR-PERNR NE'90010176'.IF PN-BEGDA = '18000101'AND PN-ENDDA = '99991231'.LV_BEGDA = SY-DATUM.LV_ENDDA = SY-DATUM.ELSE.LV_BEGDA = PN-BEGDA.LV_ENDDA = PN-ENDDA.ENDIF.*---⼈员编号GT_OUT-PERNR = PERNR-PERNR.*---⼯作班次RP_PROVIDE_FROM_LAST P0007 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.GT_OUT-SCHKZ = P0007-SCHKZ.ENDIF.*----P0009相关RP_PROVIDE_FROM_LAST P0009 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.GT_OUT-BKREF = P0009-BKREF.READ TABLE LT_BNKA_BF WITH KEY BANKL = P0009-BANKL.IF SY-SUBRC = 0.GT_OUT-ZWECK = LT_BNKA_BF-BANKA.ENDIF.ENDIF.*----P0000相关RP_PROVIDE_FROM_LAST P0000 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.IF P0000-STAT2 = '0'.GT_OUT-STAT2 = '离职'. "⼈员状态GT_OUT-BEGDA2 = P0000-BEGDA. "离职⽇期GT_OUT-BEGDA4 = P0000-BEGDA - 1. "最后⼯作⽇期READ TABLE LT_T530T WITH KEY MASSG = P0000-MASSG.IF SY-SUBRC = 0.GT_OUT-MASSG = LT_T530T-MGTXT. "操作原因ENDIF.ELSEIF P0000-STAT2 = '1'.GT_OUT-STAT2 = '不活动'. "⼈员状态ELSEIF P0000-STAT2 = '2'.GT_OUT-STAT2 = '退休'. "⼈员状态ELSEIF P0000-STAT2 = '3'.GT_OUT-STAT2 = '在职'. "⼈员状态CLEAR GT_OUT-MASSG.ENDIF.IF P0000-STAT2 = '0'.EXPORTINGDATE = GT_OUT-BEGDA2DAYS = '1'MONTHS = 0SIGNUM = '-'YEARS = 0IMPORTINGCALC_DATE = LV_VDATE.CALL FUNCTION'ZHR_ZJZW_STEST'EXPORTINGPERNR = PERNR-PERNRBEGDA = LV_VDATEENDDA = LV_VDATEIMPORTINGSTEXT = GT_OUT-PLANS "职位ZZ_ZWBM = GT_OUT-PLANSN. "职位编码ELSE.CALL FUNCTION'ZHR_ZJZW_STEST'EXPORTINGPERNR = PERNR-PERNRBEGDA = PN-BEGDAENDDA = PN-ENDDAIMPORTINGSTEXT = GT_OUT-PLANS "职位ZZ_ZWBM = GT_OUT-PLANSN. "职位编码ENDIF.ENDIF.RP_PROVIDE_FROM_LAST P0001 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.GT_OUT-ZZ_GSDM = P0001-WERKS. "公司代码READ TABLE GT_T500P WITH KEY PERSA = P0001-WERKS.IF SY-SUBRC = 0.GT_OUT-ZZ_GSDMT = GT_T500P-NAME1.ENDIF.GT_OUT-ABKRS = P0001-ABKRS. "⼯资范围ENDIF.*---PA0001相关RP_PROVIDE_FROM_LAST P0016 SPACE PN-BEGDA PN-ENDDA.RP_PROVIDE_FROM_LAST P0001 SPACE PN-BEGDA PN-ENDDA.IF P0001-ORGEH IS INITIAL.SORT P0001 BY BEGDA DESCENDING.READ TABLE P0001 INDEX 2.* gt_out-orgeh = p0001-orgeh.ENDIF.GT_OBJID-OBJID = P0001-ORGEH.APPEND GT_OBJID.READ TABLE GT_T001 WITH KEY BUKRS = P0016-ZZ_HTGS.IF SY-SUBRC = 0.GT_OUT-BUKRS = GT_T001-BUTXT.ENDIF.GT_OUT-ORGEH = P0001-ORGEH. "部门代码GT_OUT-ZZ_LWSSGS = P0001-ZZ_LWSSGS. "劳务所属公司IF GT_OUT-ZZ_LWSSGS = ''.GT_OUT-ZZ_LWSSGS = '⾃有'.ENDIF.READ TABLE GT_HRP1000 WITH KEY OTYPE = 'O'OBJID = GT_OUT-ORGEH.IF SY-SUBRC = 0.GT_OUT-ORGTX = GT_HRP1000-STEXT.ENDIF.READ TABLE GT_ZHR_CZDD WITH KEY ZZ_CZDBM = P0001-ZZ_CZGZD. IF SY-SUBRC = 0.GT_OUT-ZZ_CZGZD = GT_ZHR_CZDD-ZZ_CZDMC.ENDIF."实际⼯作地RP_PROVIDE_FROM_LAST P0006 '04' PN-BEGDA PN-ENDDA.GT_OUT-ZZ_SJGZD = P0006-LOCAT.GT_OUT-KOSTL = P0001-KOSTL. "发薪成本中⼼号READ TABLE LT_T501T WITH KEY PERSG = P0001-PERSG.IF SY-SUBRC = 0.GT_OUT-PERSG = LT_T501T-PTEXT.ENDIF.READ TABLE LT_T503T WITH KEY PERSK = P0001-PERSK.GT_OUT-PERSK = LT_T503T-PTEXT.ENDIF.* ENDIF.*---P0027相关READ TABLE GT_0027 WITH KEY PERNR = PERNR-PERNR.IF SY-SUBRC = 0.GT_OUT-KOSTL = GT_0027-KST01. "个⼈成本中⼼覆盖部门成本中⼼ENDIF.LOOP AT P0000 WHERE MASSN = 'ZB'.IF P0000-BEGDA IS NOT INITIAL.GT_OUT-SJZZRQ = P0000-BEGDA.GT_OUT-SJZZRQ1 = P0000-BEGDA.ENDIF.ENDLOOP.IF GT_OUT-SJZZRQ IS INITIAL.CALL FUNCTION'HR_ECM_GET_DATETYP_FROM_IT0041'EXPORTINGPERNR = GT_OUT-PERNRKEYDT = LV_BEGDADATAR = '04'MESSAGE_HANDLER = MESSAGE_HANDLERIMPORTINGDATE = GT_OUT-SJZZRQ.IF GT_OUT-SJZZRQ IS NOT INITIAL.GT_OUT-SJZZRQ1 = GT_OUT-SJZZRQ.ENDIF.* READ TABLE GT_PA0041 WITH KEY pernr = pernr-pernr.* IF SY-SUBTY = 0.* gt_out-sjzzrq = GT_PA0041-DAT04.* ENDIF.ENDIF.IF GT_OUT-SJZZRQ < SY-DATUM AND GT_OUT-SJZZRQ <> '00000000'.GT_OUT-SFYZZ = '是'.ELSE.GT_OUT-SFYZZ = '否'.ENDIF.*---PA0002相关RP_PROVIDE_FROM_LAST P0002 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.GT_OUT-ZZ_DSBHBH = P0002-ZZ_DSBH.READ TABLE LT_DD07T WITH KEY DOMVALUE_L = P0002-ZZ_MZDOMNAME = 'ZZ_MZ'.IF SY-SUBRC = 0.GT_OUT-ZZ_MZT = LT_DD07T-DDTEXT.ENDIF.READ TABLE LT_0000 WITH KEY PERNR = GT_OUT-ZZ_DSBHBH.IF SY-SUBRC = 0.CLEAR: GT_CELLCOLOR, GS_CELLCOLOR.GS_CELLCOLOR-FNAME = 'ZZ_DSBHBH'. "定位⾏中需要上⾊的单元格GS_CELLCOLOR-COLOR-COL = 6. "颜⾊种类GS_CELLCOLOR-COLOR-INT = 1. "颜⾊浅深GS_CELLCOLOR-COLOR-INV = 1. "相反：⽂字显⽰颜⾊,单元格背景不显⽰APPEND GS_CELLCOLOR TO GT_CELLCOLOR.GT_OUT-CELLCOLOR = GT_CELLCOLOR.* CLEAR: GT_CELLCOLOR, GS_CELLCOLOR.GS_CELLCOLOR-FNAME = 'ZZ_DSBH'. "定位⾏中需要上⾊的单元格GS_CELLCOLOR-COLOR-COL = 6. "颜⾊种类GS_CELLCOLOR-COLOR-INT = 1. "颜⾊浅深GS_CELLCOLOR-COLOR-INV = 1. "相反：⽂字显⽰颜⾊,单元格背景不显⽰APPEND GS_CELLCOLOR TO GT_CELLCOLOR.GT_OUT-CELLCOLOR = GT_CELLCOLOR.ENDIF.READ TABLE GT_PA0002 INTO DATA(GS_PA0002) WITH KEY PERNR = P0002-ZZ_DSBH. IF SY-SUBRC = 0.GT_OUT-ZZ_DSBH = GS_PA0002-NACHN.ENDIF.GT_OUT-CNAME = P0002-NACHN. "姓名IF P0002-GESCH EQ1.GT_OUT-GESCH2 = '男'. "性别ELSEIF P0002-GESCH EQ2.GT_OUT-GESCH2 = '⼥'.ENDIF.GT_OUT-GBDAT = P0002-GBDAT. "出⽣⽇期GT_OUT-FAMST = '未婚'. "婚姻状态ELSEIF P0002-FAMST = 1.GT_OUT-FAMST = '已婚'.ELSEIF P0002-FAMST = 2.GT_OUT-FAMST = '离婚'.ELSEIF P0002-FAMST = 3.GT_OUT-FAMST = '丧偶'.ELSEIF P0002-FAMST = 4.GT_OUT-FAMST = '⽆'.ENDIF.READ TABLE LT_DD07T WITH KEY DOMVALUE_L = P0002-ZZ_ZPQDDOMNAME = 'ZZ_ZPQD'.IF SY-SUBRC = 0.GT_OUT-ZZ_ZPQD = LT_DD07T-DDTEXT.ENDIF.GT_OUT-ZZ_ZGSF = P0002-GBDEP. "籍贯省份READ TABLE LT_T005U WITH KEY BLAND = GT_OUT-ZZ_ZGSF.IF SY-SUBRC = 0.GT_OUT-ZZ_ZGSFMS = LT_T005U-BEZEI.ENDIF.ENDIF."调⽤函数获取年龄CALL FUNCTION'HR_99S_INTERVAL_BETWEEN_DATES'EXPORTINGBEGDA = P0002-GBDATENDDA = SY-DATUMIMPORTINGC_YEARS = LV_YEARS.GT_OUT-DISP_AGE = LV_YEARS. "年龄*---PA9002相关RP_PROVIDE_FROM_LAST P9002 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.GT_OUT-ZZ_GWZU = P9002-ZZ_ZWZZ."职族GT_OUT-ZZ_ZZZJ = P9002-ZZ_ZZZJ."职级ENDIF.*---PA9021相关RP_PROVIDE_FROM_LAST P9021 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.CLEAR GS_PA0002.GT_OUT-ZZ_ZJSJBH = P9021-ZZ_ZJSJ.READ TABLE LT_0000 WITH KEY PERNR = GT_OUT-ZZ_ZJSJBH.IF SY-SUBRC = 0.CLEAR: GT_CELLCOLOR, GS_CELLCOLOR.GS_CELLCOLOR-FNAME = 'ZZ_ZJSJBH'. "定位⾏中需要上⾊的单元格GS_CELLCOLOR-COLOR-COL = 6. "颜⾊种类GS_CELLCOLOR-COLOR-INT = 1. "颜⾊浅深GS_CELLCOLOR-COLOR-INV = 1. "相反：⽂字显⽰颜⾊,单元格背景不显⽰APPEND GS_CELLCOLOR TO GT_CELLCOLOR.GT_OUT-CELLCOLOR = GT_CELLCOLOR.GS_CELLCOLOR-FNAME = 'ZZ_ZJSJ'. "定位⾏中需要上⾊的单元格GS_CELLCOLOR-COLOR-COL = 6. "颜⾊种类GS_CELLCOLOR-COLOR-INT = 1. "颜⾊浅深GS_CELLCOLOR-COLOR-INV = 1. "相反：⽂字显⽰颜⾊,单元格背景不显⽰APPEND GS_CELLCOLOR TO GT_CELLCOLOR.GT_OUT-CELLCOLOR = GT_CELLCOLOR.ENDIF.READ TABLE GT_PA0002 INTO GS_PA0002 WITH KEY PERNR = P9021-ZZ_ZJSJ. GT_OUT-ZZ_ZJSJ = GS_PA0002-NACHN. "直线汇报⼈ENDIF.*---PA9006相关* rp_provide_from_last p9006 space pn-begda pn-endda.* IF pnp-sw-found = 1.* READ TABLE gt_pa0002 INTO gs_pa0002 WITH KEY pernr = p9006-zz_dsbh.* gt_out-zz_dsbh = gs_pa0002-nachn. "导师* ENDIF.*---⼊职⽇期CALL FUNCTION'HR_ECM_GET_DATETYP_FROM_IT0041'EXPORTINGPERNR = GT_OUT-PERNRKEYDT = LV_BEGDADATAR = '01'MESSAGE_HANDLER = MESSAGE_HANDLERIMPORTINGDATE = GT_OUT-DAT01.*---⾸次参加⼯作⽇期CALL FUNCTION'HR_ECM_GET_DATETYP_FROM_IT0041'EXPORTINGPERNR = GT_OUT-PERNRKEYDT = LV_BEGDADATAR = '02'MESSAGE_HANDLER = MESSAGE_HANDLERIMPORTINGDATE = GT_OUT-DAT02.FREE MESSAGE_HANDLER.*---预计转正时间CALL FUNCTION'HR_ECM_GET_DATETYP_FROM_IT0041'EXPORTINGPERNR = GT_OUT-PERNRKEYDT = LV_BEGDADATAR = '03'MESSAGE_HANDLER = MESSAGE_HANDLERIMPORTINGDATE = GT_OUT-DAT03.FREE MESSAGE_HANDLER.*---PA9003相关RP_PROVIDE_FROM_LAST P9003 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.* GT_OUT-BEGDA2 = P9003-BEGDA. "离职⽇期* GT_OUT-BEGDA4 = P9003-BEGDA - 1. "最后⼯作⽇期READ TABLE GT_ZHR_LZYY INTO DATA(GS_ZHR_LZYY) WITH KEY ZZ_LZXLBM = P9003-ZZ_LZXL. IF SY-SUBRC = 0.GT_OUT-ZZ_LZXL = GS_ZHR_LZYY-ZZ_LZXLMS. "离职原因ENDIF.ENDIF.IF GT_OUT-STAT2 = '在职'.CLEAR GT_OUT-ZZ_LZXL.ENDIF.*---PA3529相关教育信息的字段都从0022中取出CLEAR LT_PA3529.READ TABLE LT_PA3529 WITH KEY PERNR = GT_OUT-PERNR.IF SY-SUBRC = 0.GT_OUT-FACH3 = LT_PA3529-FACH3."所学专业ENDIF.* rp_provide_from_last p3529 space pn-begda pn-endda.* IF pnp-sw-found = 1.* gt_out-fach3 = p3529-fach3."所学专业* ENDIF.IF GT_OUT-ENDDA4 <> '00000000'.LV_ENDDA02 = GT_OUT-ENDDA4. "最后⼯作⽇期ELSE.LV_ENDDA02 = SY-DATUM.ENDIF.*---调⽤函数获取社会⼯龄CALL FUNCTION'HR_99S_INTERVAL_BETWEEN_DATES'EXPORTINGBEGDA = GT_OUT-DAT03ENDDA = LV_ENDDA02IMPORTINGC_YEARS = LV_YEARS2.GT_OUT-SHAGE = LV_YEARS2.*---调⽤函数获取司龄CALL FUNCTION'HR_99S_INTERVAL_BETWEEN_DATES'EXPORTINGBEGDA = GT_OUT-DAT01ENDDA = LV_ENDDA02IMPORTINGC_MONTHS = LV_MONTH.LV_SILING = LV_MONTH / 12.GT_OUT-SLAGE = LV_SILING.*---PA0016相关RP_PROVIDE_FROM_LAST P0016 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.READ TABLE LT_T547S WITH KEY CTTYP = P0016-CTTYP.IF SY-SUBRC = 0.GT_OUT-CTTYP = LT_T547S-CTTXT.ENDIF.IF P0016-ZZ_QXLX = 10.ELSEIF P0016-ZZ_QXLX = 20.GT_OUT-ZZ_QXLX = '⽆固定期限劳动合同'.ELSEIF P0016-ZZ_QXLX = 90.GT_OUT-ZZ_QXLX = '其他'.ENDIF.GT_OUT-ZZ_JCFS = P0016-ZZ_JCFS."解除合同⽅式ENDIF.*---PA3527相关RP_PROVIDE_FROM_LAST P3527 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1.IF P3527-HUKOT = 1.GT_OUT-HUKOT = '⾮农业户⼝'. "户⼝性质ELSEIF P3527-HUKOT = 2.GT_OUT-HUKOT = '农业户⼝'.ELSEIF P3527-HUKOT = 3.GT_OUT-HUKOT = '其他'.ENDIF.ENDIF.*---PA0022相关* RP_PROVIDE_FROM_LAST P0022 SPACE PN-BEGDA PN-ENDDA.CLEAR LT_PA0022.READ TABLE LT_PA0022 WITH KEY PERNR = GT_OUT-PERNR.IF SY-SUBRC = 0.READ TABLE LT_T517T WITH KEY SLART = LT_PA0022-SUBTY.IF SY-SUBRC = 0.GT_OUT-SUBTY = LT_T517T-STEXT.ENDIF.GT_OUT-ENDDA2 = LT_PA0022-ZZ_BYSJ. "毕业时间GT_OUT-INSTI = LT_PA0022-INSTI. "院校/培训机构名称GT_OUT-BEGDA5 = LT_PA0022-BEGDA.IF LT_PA0022-ZZ_ZGXW = '01'.READ TABLE LT_T519T WITH KEY SLABS = LT_PA0022-SLABS.IF SY-SUBRC = 0.GT_OUT-SLABS = LT_T519T-STEXT.ENDIF.ENDIF.READ TABLE LT_DD07T WITH KEY DOMVALUE_L = LT_PA0022-ZZ_XXXSDOMNAME = 'ZZ_XXXS'.IF SY-SUBRC = 0.GT_OUT-XXXS = LT_DD07T-DDTEXT.ENDIF.ENDIF.* LOOP AT p0022 WHERE zz_zgxl = '01'.* IF p0022-zz_zgxl = '01'.** READ TABLE lt_t517t WITH KEY slart = p0022-subty.* IF sy-subrc = 0.* gt_out-subty = lt_t517t-stext.* ENDIF.** gt_out-endda2 = p0022-zz_bysj. "毕业时间* gt_out-insti = p0022-insti. "院校/培训机构名称* gt_out-begda5 = p0022-begda.* ENDIF.** IF p0022-zz_zgxw = '01'.* READ TABLE lt_t519t WITH KEY slabs = p0022-slabs.* IF sy-subrc = 0.* gt_out-slabs = lt_t519t-stext.* ENDIF.** ENDIF.** READ TABLE lt_dd07t WITH KEY domvalue_l = p0022-zz_xxxs* domname = 'ZZ_XXXS'.* IF sy-subrc = 0.* gt_out-xxxs = lt_dd07t-ddtext.* ENDIF.** ENDLOOP.********************************************************************************READ TABLE GT_HRP9504 INTO DATA(GS_HRP9504) WITH KEY OBJID = P0001-PLANS. IF SY-SUBRC = 0.* gt_out-zz_gwzu = gs_hrp9504-zz_gwzu. "职族GT_OUT-ZZ_GWZL = GS_HRP9504-ZZ_GWZL. "职类描述IF GS_HRP9504-ZZ_GWZL = '01'.GT_OUT-ZZ_GWZL = '⾼层管理'.ELSEIF GS_HRP9504-ZZ_GWZL = '02'.GT_OUT-ZZ_GWZL = '中层管理'.ENDIF.ENDIF.LOOP AT P9019 WHERE ZZ_SFZGZC = '01'.GT_OUT-ZZ_HDZC = P9019-ZZ_HDZC."获得职称GT_OUT-ZZ_ZCDJ = P9019-ZZ_ZCDJ."职称级别CASE P9019-ZZ_ZCDJ.WHEN '01'.GT_OUT-ZZ_ZCDJ = '教授级'.WHEN '02'.GT_OUT-ZZ_ZCDJ = '正⾼级'.WHEN '03'.GT_OUT-ZZ_ZCDJ = '⾼级'.WHEN '04'.GT_OUT-ZZ_ZCDJ = '中级'.WHEN '05'.GT_OUT-ZZ_ZCDJ = '初级'.ENDCASE.ENDLOOP.SORT P0185 BY SUBTY.RP_PROVIDE_FROM_LAST P0185 SPACE PN-BEGDA PN-ENDDA.GT_OUT-ICNUM = P0185-ICNUM.IF P0185-USETO IS NOT INITIAL.GT_OUT-USETO = P0185-USETO.GT_OUT-USETO1 = P0185-USETO+0(4) && '/' && P0185-USETO+4(2) && '/' && P0185-USETO+6(2). ENDIF.SORT P0006 BY ANSSA.LOOP AT P0006 WHERE ANSSA = '01'OR ANSSA = '05'OR ANSSA = '06'OR ANSSA = '02'.IF P0006-ANSSA = '01'.GT_OUT-LOCAT = P0006-LOCAT."户⼝所在地ELSEIF P0006-ANSSA = '06'.GT_OUT-LOCAT2 = P0006-LOCAT."驻外地区ELSEIF P0006-ANSSA = '05'.GT_OUT-LOCAT3 = P0006-LOCAT."社保缴纳地ELSEIF P0006-ANSSA = '02'.GT_OUT-LOCAT4 = P0006-LOCAT."现住家庭地址ENDIF.ENDLOOP.RP_PROVIDE_FROM_LAST P0016 SPACE PN-BEGDA PN-ENDDA.IF PNP-SW-FOUND = 1..GT_OUT-BEGDA3 = P0016-BEGDA."本期合同开始⽇期GT_OUT-ENDDA3 = P0016-CTEDT."本期合同结束⽇期ENDIF.LOOP AT P0105 WHERE USRTY = '01'OR USRTY = '03'OR USRTY = '04'OR USRTY = '06'OR USRTY = '05'. IF P0105-USRTY = '01'.GT_OUT-USRID = P0105-USRID. "联系⽅式ELSEIF P0105-USRTY = '03'.GT_OUT-USRID3 = P0105-USRID. "紧急联系⼈电话GT_OUT-ZZ_JJLXR = P0105-ZZ_JJLXRDH."紧急联系⼈ELSEIF P0105-USRTY = '04'.GT_OUT-USRID2 = P0105-USRID. "电⼦邮件ELSEIF P0105-USRTY = '06'.GT_OUT-USRID1 = P0105-USRID. "档案编号ELSEIF P0105-USRTY = '05'.GT_OUT-ZGSYX = P0105-USRID.ENDIF.ENDLOOP."如果⼊职⽇期为空则取0000 ZAIF GT_OUT-DAT01 = '00000000'.CLEAR P0000.READ TABLE P0000 WITH KEY MASSN = 'ZA'.IF SY-SUBRC = 0.GT_OUT-DAT01 = P0000-BEGDA.ENDIF.ENDIF.GT_OUT-DAT011 = GT_OUT-DAT01.GT_OUT-DAT021 = GT_OUT-DAT02.GT_OUT-BEGDA21 = GT_OUT-BEGDA2.GT_OUT-GBDAT1 = GT_OUT-GBDAT.GT_OUT-DAT031 = GT_OUT-DAT03.GT_OUT-BEGDA41 = GT_OUT-BEGDA4.IF GT_OUT-USRID2 IS NOT INITIAL.GT_OUT-USRID2 = TO_LOWER( GT_OUT-USRID2 ).ENDIF.IF GT_OUT-ZGSYX IS NOT INITIAL.GT_OUT-ZGSYX = TO_LOWER( GT_OUT-ZGSYX ).ENDIF.。
花名册范本
花名册范本1.求一份公司全体人员的档案表格格式全体人员的档案表，可以用excel表格将员工的信息统一整理起来，便于查阅。
涵盖内容包括所在部门，姓名，性别，出生日期，年龄，户籍所在地，居住地，就职时间，婚姻状况，教育程度，联系电话，紧急联系人，紧急联系人电话。
可参考以下格式：拓展资料档案的防护基本要求1.1档案防护内容应包括外围护结构的保温、隔热，温湿度要求，防潮、防水、防日光及紫外线照射，防尘、防污染、防有害生物（霉、虫、鼠等）和安全防范等。
1.2温湿度要求应根据档案的重要性和载体等因素区别对待。
1.3音像、缩微、电子文件等非纸质档案贮存库设计，除应符合本规范有关规定外，尚应根据使用保管的特殊要求进行设计。
“档案”一词1、“档案”一词来源于清初。
持此观点者的依据，一是见诸于清初文人杨宾所作的《柳边纪略》一书，其第三卷载：“边外文字，多书于木，往来传递者曰‘牌子’，以削木片若牌故也；存贮多年者曰‘档案’，曰‘档子’，以积累多、贯皮条挂壁若档故也。
然今文字之书于纸者，亦呼之谓‘牌子’、‘档子’矣。
”二是见诸于《康熙起居注》一书，其中有“部中无档案”之语。
注：“档案”一词即便来源于清初，也是清代的汉语词汇，并非来源清代的一定就是“满语”。
“档”字为汉语固有词汇，《正字通》：俗谓横木框档。
本义：器物上用以分格或撑的横木条。
用横木间隔，存放案牍，再将“档”与“案”合做一词为“档案”，才符合汉字词语的发展规律。
怎么可能是满语？2、“档案”一词来源于远古，出现在清朝之前。
持此观点者主要有：（1）侯传学提出《周礼注疏》中有“副当”之说：“写副当以授六官。
”（王荣声、王玉声认为“副当”之“当”并非“档案”，而是副词，应释为“将”。
）（2）王金玉等人提出“宋代‘架阁文字’即为‘档案’”之说，还进一步考证明初即有“档案”的称谓，其证据是明初所撰的《明实录》，其上载有：“（洪武二十五年正月）庚子日，据刑部近来因户部文档不明，着本部办理拿问该属官吏等情具奏，帝降旨：‘匡正迟速，非隐匿粮饷则勿问。
花名册表格模板
花名册表格模板
在学校、社团、企业等组织中，花名册是一种非常重要的管理工具。
它记录了
组织成员的基本信息，方便管理者进行统一管理和联系。
为了方便大家使用，我们特别设计了一份花名册表格模板，以便各种组织可以根据自己的需求进行定制。
首先，花名册表格模板包括了基本的个人信息栏，如姓名、性别、出生日期、
联系方式等。
这些信息是花名册的基础，也是组织管理的核心内容。
通过这些信息，管理者可以清楚地了解每个成员的基本情况，为日常管理提供便利。
除了基本的个人信息外，花名册表格模板还可以根据实际需求添加其他栏目。
比如，在学校的花名册中，可以添加学号、专业、班级等信息；在企业的花名册中，可以添加职务、工号、入职日期等信息。
这样一来，花名册不仅可以用于日常管理，还可以用于统计分析和信息查询。
另外，花名册表格模板还可以根据实际情况进行美化和定制。
我们提供了多种
样式和颜色可供选择，用户可以根据自己的喜好和组织的风格进行定制。
这样一来，花名册不仅可以起到实际的管理作用，还可以成为组织的一种形象展示。
总的来说，花名册表格模板是一种非常实用的管理工具。
它不仅方便了管理者
进行统一管理和联系，还可以根据实际需求进行定制和美化。
我们希望这份花名册表格模板能够为各种组织带来便利，让管理工作更加高效和便捷。
如果您对我们的花名册表格模板感兴趣，欢迎联系我们进行咨询和定制。
我们
将竭诚为您提供最优质的服务，让您的组织管理更加便利和高效。
让我们共同努力，让花名册成为组织管理的得力助手！。
员工花名册统计表
身份证号
性别 出生日期
年龄 民族 政治面貌
#VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE! #VALUE!
户口所在地
省/直辖市
现住址
本人联系电 紧急联系 紧急联系电
话
人
话
毕业院校
学历
所学专业
参加工作时间
年-月-日
工龄
-
入职日期
年-月-日
司龄
试用期
转正日期
年-月-日
-
#NUM!
-
#NUM!
-
#NUM!
-
#NUM!
#NUM!
#NUM!
#NUM!
#NUM!
#NUM!
#NUM!
#NUM!
#NUM!
#NUM!
#NUM!
#NUM!
-
#NUM!
-
#NUM!
-
#NUM!
转正提醒 #NUM!
员工状态
合同期 限
合同到期日 期
年-月-日
合同到期提 醒
用工状态 合同状态
参保状态 未参保原因
Excel技巧及花名册资料讲解
Ex c el 技巧及花名册设计标准化规范化的Excel 基础表格，是高效数据分析的第一步，因为数据分析的源头就是基础表格数据。
设计基础表格的总体原则是：结构的科学性数据的易读性汇总的便宜性分析的灵活性外观的美观性结构的科学性，就是要按照工作的性质，管理的内容，数据的种类，分别设计基础管理表格，分别保存不同数据。
基础表格要越简单越好，那些把所有数据都装在一个工作表中的做法是绝对不可取的。
比如，要做入库出库管理，你会如何设计这样的基础表格呢？要用几个表格来反映入库出库数据？每个表格要怎么保存数据？数据的易读性包含两个方面：利用函数读数（取数）方便，叫函数读数；眼睛查看数据容易，叫人工读数。
一个杂而乱的表格，是很难实现这两种高效读数的。
数据易读性差的主要原因有：表格结构设计不合理；数据保存不合理；残缺不全的表格数据结构。
汇总的便宜性是指不论多大的数量，汇总要简单方便容易。
你可以问自己：我设计的工作表内据汇总方便吗？大量表格数据之间的汇总方便吗？如果不方便，或者做起来非常吃力，Excel 很好用的工具也用不上，那唯一的原因就是基础表格设计有问题，不要发牢骚说cel 太难了，总是学不会，尤Ex 其是函数太难掌握了！分析的灵活性，是指不论做何种分析，要讲究数据分析的灵活多变。
因为我们对数据进行分析的目的，是要针对企业的数据进行深度挖掘，从不同方面找问题、找原因、找对策，这就要求基础数据必须能够精准反映企业的管理流程，制作的分析报告也必须具有灵活性，能够在几分钟内通过转换分析角度而得到另外一份分析报外观的美观性。
不论是基础表还是报告，都尽量要求把表格进行美化。
基础表的美化以容易管理数据标准，而报告的美化以分析结果清楚为标准。
特别强调的是，不论是基础表还是报告，很多人喜欢把数据区域加上边框，并保持工作表默认的网格线。
其实，我们可以取消网格线，而把数据区域设置为非常简练的线条表格，并把单元格字体、颜色、边框等进行合理的设置。
实训：员工花名册的编制
实训：员工花名册的编制【实训目的】能熟练掌握工作表的基本操作能用自动填充功对数据快速填充能格式化工作表能够采用技巧方便地录入数据【实训任务要求】一、新建一个Excel工作簿，完成下列操作：1、在Sheet1工作表中完成如下内容的输入：2、将Sheet1重命名为“员工花名册”3、增加一个名为“工资表”的工作表；将所有工作表以“Sheet3、Sheet2、员工花名册、工资表”为顺序排列。
4、操作完成后以“学号+姓名.xlsx”为文件名保存到自己文件夹下。
二、工作表的格式和美化打开“学号+姓名+花名册.xlsx”工作簿，对“花名册”工作表进行如下设置：1、在工作表上方“插入一空行”作为标题行；设置标题行行高为60，并将单元格区域A1：J1合并及居中；输入文字“和润江南二期建筑项目部员工花名册”，设置字体为华文行楷，字号为28，字体颜色为红色；上下、左右居中。
2．将“出生日期”一列放到与“性别”一列的后面。
3．设置表格正文内容中所有单元格字体设置为宋体、14磅，对齐方式设置为水平居中，行高35；第2－4列（从“工号”到“性别”）列宽为10，第5－7列（从“出生日期”到“职务”）列宽为15并将表头单元格区域A2：J2中字体为宋体、14磅、加粗；绿色，加浅兰色的底纹。
4．将表格区域外边框设置为深蓝色的粗实线，将内边框中横线设置为红色的虚线，竖线设置为黑色的细实线，5、将“基本工资”列中输入数据格式改为“6,500.0”的千分位形式；6．为“刘国强”单元格插入批注“特殊引进人才”。
7．将“员工花名册”工作表中内容全部复制到“工资表”工作表中。
操作完成后以保存到自己文件夹下。
三、对“员工工资”表，页面设置与工作表打印：1、冻结工作表“上表头”和“姓名”列2、纸张大小为A4，方向为“横向”，上下页边距为2厘米，左右的页边距为2厘米，水平居中。
3、页眉“第几页共几页”。
4、页脚左边“制表：”，页脚中间“审核：”页脚右边“日期”。
员工花名册EXCEL制作时间提醒公式(精).doc
员工花名册EXCEL制作时间提醒公式试用期到期时间提醒=IF(AND(A2-TODAY(<=10,A2-TODAY(>0,"还有"&A2-TODAY(&"天到期",""说明：1、在A2单元格（视具体表格而定, 替换A2）内输入日期格式的试用期到期时间；2、在B2（目标单元格）内输入（黏贴）上述格式,按回车键,生成提醒天数；3、单击填充柄向下拖动,完成其它单元格的公式复制。
4、本格式提示时间约定为10天,具体需要,可视情况自我设定。
劳动合同到期时间提醒=IF(AND(A2-TODAY(<=60,A2-TODAY(>0,"还有"&A2-TODAY(&"天到期",""说明：1、在A2单元格（视具体表格而定, 替换A2）内输入日期格式的合同到期时间；2、在B2（目标单元格）内输入（黏贴）上述格式,按回车键,生成提醒天数；3、单击填充柄向下拖动,完成其它单元格的公式复制。
4、本格式提示时间约定为60天,具体需要,可视情况自我设定。
由身份证号码自动生成年龄=IF(LEN(A2>15,YEAR(NOW(-MID(A2,7,4,YEAR(NOW(-(MID(A2,7,2+1900说明：1、在A2单元格（视具体表格而定,替换A2）内输入身份证号码；2、在B2（目标单元格）内输入（黏贴）上述格式,按回车键,生成年龄；3、单击填充柄向下拖动,完成其它单元格的公式复制。
由身份证号码自动生成性别=IF($(A2=0," ",IF(LEN($(A2=18,IF(MOD(VALUE(MID($(A2,17,1,2=1,"男","女",IF(MOD(VALUE(MID($(A2,15,1,2=1,"男","女"说明：1、在A2单元格（视具体表格而定,替换A2）内输入身份证号码；2、在B2（目标单元格）内输入（黏贴）上述格式,按回车键,生成工龄；3、单击填充柄向下拖动,完成其它单元格的公式复制。
员工花名册EXCEL制作时间提醒公式
试用期到期时间提醒=IF(AND(A2-TODAY()<=10,A2-TODAY()>0),"还有"&A2-TODAY()&"天到期","") 说明：1、在A2单元格（视具体表格而定, 替换A2）内输入日期格式的试用期到期时间；2、在B2（目标单元格）内输入（黏贴）上述格式，按回车键，生成提醒天数；3、单击填充柄向下拖动，完成其它单元格的公式复制。
4、本格式提示时间约定为10天，具体需要，可视情况自我设定。
劳动合同到期时间提醒=IF(AND(A2-TODAY()<=60,A2-TODAY()>0),"还有"&A2-TODAY()&"天到期","") 说明：1、在A2单元格（视具体表格而定, 替换A2）内输入日期格式的合同到期时间；2、在B2（目标单元格）内输入（黏贴）上述格式，按回车键，生成提醒天数；3、单击填充柄向下拖动，完成其它单元格的公式复制。
4、本格式提示时间约定为60天，具体需要，可视情况自我设定。
由身份证号码自动生成年龄=IF(LEN(A2)>15,YEAR(NOW())-MID(A2,7,4),YEAR(NOW())-(MID(A2,7,2)+19 00))说明：1、在A2单元格（视具体表格而定，替换A2）内输入身份证号码；2、在B2（目标单元格）内输入（黏贴）上述格式，按回车键，生成年龄；3、单击填充柄向下拖动，完成其它单元格的公式复制。
由身份证号码自动生成性别=IF($(A2)=0," ",IF(LEN($(A2))=18,IF(MOD(VALUE(MID($(A2),17,1)),2)=1,"男","女"),IF(MOD(VALUE(MID($(A2),15,1)),2)=1,"男","女")))说明：1、在A2单元格（视具体表格而定，替换A2）内输入身份证号码；2、在B2（目标单元格）内输入（黏贴）上述格式，按回车键，生成工龄；3、单击填充柄向下拖动，完成其它单元格的公式复制。