Saturday, August 29, 2009

sample program1

REPORT  y_exemple.                             

TABLES : ttdtg.

DATA : gv_day TYPE p,
gv_day_num(2) TYPE n,
gv_name_var(20) VALUE '%%SAPSCRIPT_DDDD_00'.

* Saisie date
parameters : p_date like sy-datum obligatory.

* Récupération du no du jour de la semaine
CALL FUNCTION 'DAY_IN_WEEK'
EXPORTING
datum = p_date
IMPORTING
wotnr = gv_day.

* Tranduction de ce no en jour
* Dans la table TTDTG, on a toutes les chaines de caractères utilisées
* par SAPscript pour traduire les dates, on les utilise pour notre ex
IF sy-subrc = 0.
gv_day_num = gv_day.
gv_name_var+17(2) = gv_day_num.
CLEAR ttdtg.
SELECT SINGLE * FROM ttdtg
WHERE spras = sy-langu
AND varname = gv_name_var.

WRITE : /'La date du ', p_date, 'correspond à un', ttdtg-varvalue.
ENDIF.

No comments:

Tutorials on SAP-ABAP

Adobe Interactive Forms Tutorials

Business Server Pages (BSP)

Userexits/BADIs

Web Dynpro for ABAP (Step by step procedure for web dynpro,Tutorials on Web Dynpro,)

ALV Tutorials

goodsites