Use GET PERNR without any screen default from Logical DB.

Question

Could anyone help me how to avoid using screen default from logical DB if using GET PERNR?

Answer 1

Are u saying using this logic below  , im can avoid using GET PERNR?
TABLES: RP50G,PERNR,PYORGSCREEN,PYTIMESCREEN.
DATA: IN_RGDIR LIKE PC261 OCCURS 0 WITH HEADER LINE,
      WA_RT LIKE PC207 OCCURS 0 WITH HEADER LINE,
      SEQNR LIKE PC261-SEQNR,
      RESULT TYPE PAY99_RESULT.
DATA: M_START LIKE SY-DATUM,
      M_END LIKE SY-DATUM.
FORM GET_PAYROLL USING P_PERNR M_START M_END.
*This FM help us to get the Sequence number used for the
*employee on the payroll.
  CALL FUNCTION 'CU_READ_RGDIR'
       EXPORTING
            PERSNR          = P_PERNR
       TABLES
            IN_RGDIR        = IN_RGDIR
       EXCEPTIONS
            NO_RECORD_FOUND = 1
            OTHERS          = 2.
*We read it using two dates, which corresponds to the month *we need
  READ TABLE IN_RGDIR WITH KEY FPBEG = M_START
                               FPEND = M_END.
  SEQNR = IN_RGDIR-SEQNR.
*This FM actually reads the payroll and get the information
*we need.
  CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT'
       EXPORTING
            CLUSTERID                    = 'XX'
*In CLUSTERID use the country of your choice
            EMPLOYEENUMBER               = P_PERNR
            SEQUENCENUMBER               = SEQNR
            READ_ONLY_INTERNATIONAL      = 'X'
       CHANGING
            PAYROLL_RESULT               = RESULT
       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
            OTHERS                       = 8.
*We just need to read the result table.
  LOOP AT RESULT-INTER-RT INTO WA_RT.
    CASE WA_RT-LGART.
      WHEN '9010'.
         MOVE WA_RT-BETRG TO T_ANYTABLE-SOMEPAY.
    ENDCASE.
  ENDLOOP.
ENDFORM.