topic Re: selection screen validation for period in Application Development and Automation Discussions

selection screen validation for period

Former Member — Sat, 26 May 2007 06:29:53 GMT

hi,

I am working with a SD report.My requirement is..........in selection screen i had a field called period where we input only month and year.By the coding I had done it is accepting both the formats MM/YYYY and MM.YYYY.But actually what my requirement is it should not accept the input if we enter the period in MM/YYYY format.How can i solve this.

Thanks in advance,

Re: selection screen validation for period

Former Member — Sat, 26 May 2007 06:36:05 GMT

You can try this:

Assuming p_period is your parameter on the screen.

Then you can check for the 3rd character.

You can write this condition either in AT SELECTION-SCREEN or START-OF-SELECTION.

if p_period+2(1) = '.'.

*Error Message.

endif.

Re: selection screen validation for period

Former Member — Sat, 26 May 2007 06:37:31 GMT

Declare ur value as like database field and so that no need have validation.

i do not remember field name but it start with per*

Reward Points if it is helpful

Thanks

Seshu

Re: selection screen validation for period

Former Member — Sat, 26 May 2007 06:38:00 GMT

ARE YOU REFERRING THAT FIELD WITH ANY DATA BASE FIELD

PARAMETERS : P_SPMON LIKE MCS0-SPMON.

JUST TRY LIKE THIS AND CHECK IT IS WORKING OR NOT..

REGARDS

SHIBA DUTTA

Re: selection screen validation for period

Former Member — Sat, 26 May 2007 06:42:51 GMT

hi,

use this type of code .. this is gonna help u... on F4 help it will let u on month and year drop down.

use parameter as

SELECT-OPTIONS : SL_SPMON FOR S031-SPMON.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR SL_SPMON-LOW.

PERFORM MONAT_F4.

FORM MONAT_F4 .

DATA: BEGIN OF MF_DYNPFIELDS OCCURS 1.

INCLUDE STRUCTURE DYNPREAD.

DATA: END OF MF_DYNPFIELDS.

DATA: MF_RETURNCODE LIKE SY-SUBRC,

MF_MONAT LIKE ISELLIST-MONTH,

MF_HLP_REPID LIKE SY-REPID.

FIELD-SYMBOLS: <MF_FELD>.

Wert von Dynpro lesen

GET CURSOR FIELD MF_DYNPFIELDS-FIELDNAME.

APPEND MF_DYNPFIELDS.

MF_HLP_REPID = SY-REPID.

DO 2 TIMES.

CALL FUNCTION 'DYNP_VALUES_READ'

EXPORTING

DYNAME = MF_HLP_REPID

DYNUMB = SY-DYNNR

TABLES

DYNPFIELDS = MF_DYNPFIELDS

EXCEPTIONS

INVALID_ABAPWORKAREA = 01

INVALID_DYNPROFIELD = 02

INVALID_DYNPRONAME = 03

INVALID_DYNPRONUMMER = 04

INVALID_REQUEST = 05

NO_FIELDDESCRIPTION = 06

UNDEFIND_ERROR = 07.

IF SY-SUBRC = 3.

Aktuelles Dynpro ist Wertemengenbild

MF_HLP_REPID = 'SAPLALDB'.

ELSE.

READ TABLE MF_DYNPFIELDS INDEX 1.

Unterstriche durch Blanks ersetzen

TRANSLATE MF_DYNPFIELDS-FIELDVALUE USING '_ '.

EXIT.

ENDIF.

ENDDO.

IF SY-SUBRC = 0.

Konvertierung ins interne Format

CALL FUNCTION 'CONVERSION_EXIT_PERI_INPUT'

EXPORTING

INPUT = MF_DYNPFIELDS-FIELDVALUE

IMPORTING

OUTPUT = MF_MONAT

EXCEPTIONS

ERROR_MESSAGE = 1.

IF MF_MONAT IS INITIAL.

Monat ist initial => Vorschlagswert aus akt. Datum ableiten

MF_MONAT = SY-DATLO(6).

ENDIF.

CALL FUNCTION 'POPUP_TO_SELECT_MONTH'

EXPORTING

ACTUAL_MONTH = MF_MONAT

IMPORTING

SELECTED_MONTH = MF_MONAT

RETURN_CODE = MF_RETURNCODE

EXCEPTIONS

FACTORY_CALENDAR_NOT_FOUND = 01

HOLIDAY_CALENDAR_NOT_FOUND = 02

MONTH_NOT_FOUND = 03.

IF SY-SUBRC = 0 AND MF_RETURNCODE = 0.

ASSIGN (MF_DYNPFIELDS-FIELDNAME) TO <MF_FELD>. " ==>> note 148804
<MF_FELD> = MF_MONAT.

CALL FUNCTION 'CONVERSION_EXIT_PERI_OUTPUT'

EXPORTING

INPUT = MF_MONAT

IMPORTING

OUTPUT = MF_DYNPFIELDS-FIELDVALUE.

COLLECT MF_DYNPFIELDS.

CALL FUNCTION 'DYNP_VALUES_UPDATE'

EXPORTING

DYNAME = MF_HLP_REPID

DYNUMB = SY-DYNNR

TABLES

DYNPFIELDS = MF_DYNPFIELDS

EXCEPTIONS

INVALID_ABAPWORKAREA = 01

INVALID_DYNPROFIELD = 02

INVALID_DYNPRONAME = 03

INVALID_DYNPRONUMMER = 04

INVALID_REQUEST = 05

NO_FIELDDESCRIPTION = 06

UNDEFIND_ERROR = 07. "<<== note 148804

ENDIF.

ENDFORM. " MONAT_F4

regards,

shardul shah

Re: selection screen validation for period

Former Member — Sat, 26 May 2007 07:08:10 GMT

thanks a lot.my problem is solved