Where the documentation is provided for the Standard Function module ?

Question

If there is no documentation provided for the standard function module in SE37 what is the best way to understand the functionality of the function module?Is there any where we can find the documentation?
Please dont say the From coding part its too vast to understand
Ex: HRCM_ORGSTRC_INFO_TABLE_GET
Paint for me ..
Regards
sas
Edited by: Julius Bussche on Mar 18, 2009 1:17 PM

Answer 1

O Really thanks amit !!
Are you able to understand the below code and please provide your valuable inputs what we are understanding is the same.
PERFORM read_infotypes.
*-- ********************************************************** NMP
*-- IF scb frozen then write to itab-scb field.  nmp 11/2001.
*-- ********************************************************** NMP
*--Begin of Change by vneld - 01/17/2007
*  IF PA0001-ZZBERN NE SPACE.
*    FROZEN = PA0001-ZZBERN.
*  ENDIF.
*  ITAB-SCB = FROZEN.
*-- ********************************************************** NMP
*--end of Change by  vneld- 01/17/2007
  PERFORM get_date USING '92'
                   CHANGING w_hiredate.
  PERFORM get_date USING '93'
                   CHANGING w_rehire.
  PERFORM get_date USING '94'
                   CHANGING w_termdate.
  IF NOT ( w_rehire IS INITIAL ).
    w_hiredate = w_rehire.
    itab-code = 'R'.
  ELSE.
    itab-code = 'H'.
  ENDIF.
  IF p0001-persg = '3'.
    itab-code = 'T'.
  ENDIF.
*Change by Mdukes
** We need HIRE,Rehire & term  within 13 month`s window
** But if someone Hire in IT ,change dept and then terminated .
** We need to exclude that person from the list  .
** We need to change his Org.Unit by END_DATE 12/31/9999 from Pa0001.
  CLEAR:result_tab.REFRESH:result_tab.
  CALL FUNCTION 'HRCM_ORGSTRC_INFO_TABLE_GET'
    EXPORTING
      PLVAR          = '01'
      ROOT_OTYPE     = 'O'
      ROOT_OBJID     = P0001-ORGEH
      BEGDA          = SY-DATUM
      ENDDA          = P0001-ENDDA
      PATH_ID        = EVPATH
      PATH_DEPTH     = 10
    TABLES
      ORG_INFO_TABLE = result_tab
    EXCEPTIONS
      PATH_ERROR     = 1
      ROOT_ERROR     = 2
      OTHERS         = 3.
*  CALL FUNCTION 'RH_STRUC_GET'
*    EXPORTING = 'O'
*      act_objid       = PA0001-ORGEH
*      act_wegid       =  EVPATH
*      act_plvar       =  TYPE
*      act_tflag       = space
*      act_vflag       = space
*      authority_check = space
*    TABLES
*      result_tab      = result_tab
*    EXCEPTIONS
*      no_plvar_found  = 1
*      no_entry_found  = 2
*      OTHERS          = 3.
* reading the Org.Unit based on employee Org.unit (Evaluation Path 'O-O'.
* After that making sure the latest Pa0001 org.unit is part of selection org.unit
* If yes, set the flag to = 1 . Otherwise ignore the rec .
* We want only IT folks hire/rehire/term within 13 monthu2019s window
* if somebody change the dept and get term within 13 monthu2019s .it
* Should show up in hire but not in term report .
  CLEAR:REC.
  lOOP AT result_tab.
    read table PCHOBJID with key low = result_tab-OBJID.
    if sy-subrc = 0 .
      Rec = 1.
      EXIT.
    Endif.
  ENDLOOP.
  if rec  = 1.
*--begin of change by vneld- 01/17/07
    CHECK ( ( w_hiredate >= w_13th_mnth_date AND w_hiredate <= sy-datum )
      OR
          ( w_termdate >= w_13th_mnth_date AND w_termdate <= sy-datum ) ).
*--end of change by vneld- 01/17/07
**---check for hires or terms in the calendar year.
**---No future terms
*  CHECK ( ( W_HIREDATE(4) = SY-DATUM(4) ) OR
*  ( W_TERMDATE(4) = SY-DATUM(4) AND W_TERMDATE <= SY-DATUM ) ).
    CONCATENATE p0002-vorna p0002-nachn INTO itab-name SEPARATED BY ' '.
*--Begin of change by vneld 03/29/2007
*--get supervisor name
    data : lname(20),
           fname(20).
    clear: lname,
           fname.
    Select vorna nachn from pa0002 into (fname ,lname)
           where pernr =  p0001-zzsuper_no.
    endselect.
    CONCATENATE lname fname INTO itab-supv SEPARATED BY ' '.
*  itab-supv = p0001-zzsuper_text.
*--End of change by vneld 03/29/2007
*----get employee group text
    CLEAR t501t.
    SELECT SINGLE * FROM t501t WHERE sprsl = 'EN' AND
                                     persg = p0001-persg.
    IF sy-subrc EQ 0.
      itab-group = t501t-ptext.
    ENDIF.
    PERFORM get_dept.
    PERFORM get_position.
    PERFORM append_fields.
  endif.
ENDFORM.                    " PROCESS_EMPLOYEE
Edited by: saslove sap on Mar 19, 2009 7:45 AM