Posts

Showing posts from October, 2019

Field Symbols

REPORT  test . TYPES :  BEGIN  OF  TY_FINAL ,          NAME  TYPE  CHAR10 ,          NAME2  TYPE  CHAR20 ,       END  OF     TY_FINAL .       DATA :  GT_FINAL  TYPE  TABLE  OF  TY_FINAL ,            GS_FINAL  TYPE           TY_FINAL .       FIELD-SYMBOLS :  <STRY>  TYPE  ANY ,                     <STRY1>  TYPE  TY_FINAL ,                     <STRY_>  TYPE  ANY  TABLE . data  lv_name  type  string . lv_name  =  'NAME' . APPEND  INITIAL  LINE  TO  gt_final . LOOP  AT  GT_FINAL  ASSIGNING  <STRY1> .    if  <stry1>  is  ASSIGNED .    ASSIGN  COMPONENT   lv_name  OF  STRUCTURE  <STRY1>  TO  <stry> .   <stry>  =   'dev' .    endif . ENDLOOP .

Some time requirment to reset userpassword

change passoword as per the requirments BAPI_USER_CHANGE parameter to give the change password USERNAME PASSWORD PASSWORDX Here function module you can change passowrd Reset password

VT02N Enhnchment while saving the data

VT02N While Saving BADI_LE_SHIPMENT     METHOD  IF_EX_BADI_LE_SHIPMENT ~ AT_SAVE .      DATA : GT_VTTKVB  TYPE  TABLE  OF  VTTKVB ,          GS_VTTKVB   TYPE  VTTKVB .      DATA : GT_VTTP  TYPE  TABLE  OF  VTTPVB ,          GS_VTTP  TYPE  VTTPVB .     GT_VTTKVB[]  =  IM_SHIPMENTS_AT_SAVE - NEW_VTTK .      CLEAR : GS_VTTKVB .      READ  TABLE  GT_VTTKVB  INTO  GS_VTTKVB  INDEX  1 .     GT_VTTP[]  =  IM_SHIPMENTS_AT_SAVE - NEW_VTTP .      CLEAR : GS_VTTP .      IF  GS_VTTKVB - TPLST  GT  '3000' .        LOOP  AT  GT_VTTP  INTO  GS_VTTP .          IF  GS_VTTKVB - TPLST  NE  GS_VTTP - WERKS .            MESSAGE  'You can not add delivery plant diffrent'  TYPE  'E' .          ENDIF .          CLEAR :  GS_VTTP .        ENDLOOP .      ENDIF .    ENDMETHOD .

How to fetch data on selection screen dynamically .

Image
Method 1. Using F4 help using this you will get data in different field created on selection screen    *create selection screen* SELECTION-SCREEN  BEGIN  OF  BLOCK  b1  WITH  FRAME . SELECT-OPTIONS  :  p_reason   FOR  zmm_reason - zzreasoncode  NO  INTERVALS  NO - EXTENSION MODIF  ID  r1  .           "reason for reversal SELECT-OPTIONS  :  p_value   FOR  zmm_reason - zzreason  NO  INTERVALS  NO - EXTENSION MODIF  ID  r2 . SELECTION-SCREEN  END  OF  BLOCK  b1 . AT  SELECTION-SCREEN  ON  VALUE-REQUEST  FOR  p_reason - low  .   PERFORM  f4_help  . *&---------------------------------------------------------------------* *&      Form  F4_help *&---------------------------------------------------------------------* *       text *----------------------------------------------------------------------* FORM  f4_help  .    SELECT  zzreasoncode zzreason  FROM  zmm_reason  INTO  TABLE  gt_reason .    CALL  FUNCTION  'F4IF_INT_TABLE_VALUE_REQUEST'      EXPO