วันพฤหัสบดีที่ 2 กันยายน พ.ศ. 2553

Program ABAP : zbot_exchangerate : start-of-selection

<< Data Type

*&---------------------------------------------------------------------*
*& S T A R T  O F  S E L E C T I O N                                   *
*&---------------------------------------------------------------------*
start-of-selection.
  clear : gv_edate,gv_pdate.
  gv_i = 1.
  perform check_holiday using p_date changing gv_holiday.  
  perform get_month_name.
  perform get_end_of_prev_month using p_date changing gv_pdate.
  perform get_first_of_month using p_date changing gv_fdate.
  perform get_back_working_day using p_date changing gv_bdate.
  perform check_end_of_month using p_date changing gv_edate.
  perform get_next_last_working_day using p_date changing gv_ndate.
  if p_local = 'X'.
    perform get_file.
  else.
    perform get_uri.
    perform get_http_excel.

  endif.
  perform transform_excel.

*&---------------------------------------------------------------------*
*& E N D  O F  S E L E C T I O N                                       *
*&---------------------------------------------------------------------*
end-of-selection.
  perform post_bapi.
  perform write_result.

<< Data Type 

ไม่มีความคิดเห็น:

แสดงความคิดเห็น