Check box GR-Based INV in PO's

Is there a way to make this checkbox defalut by document type so all our PO's require an invoice for over $5000? Thanks in advance!
Eric
Edited by: Eric Stelter on Aug 4, 2008 3:19 PM

Hi
There are 2 options possible either no facility to have GR based inv verfication ticked as default value or there must be some perimeter to define in SU01. Please ask BASIS person to help you out if he can suggest you something in the parameters in SU01.
There is no configuration setting to care of the grbasedinv verf box checked.

Similar Messages

How do we check the check box items based on the databse fields.

Hi All,
I have a requirement like as mentioned below#
1. I have a combox box whcih i will be populated from database.
2. I have created two check box as "Stategric " and "Non Stategric".
3. Now when i select the combox box condition i need to select the check box items.
4. But the problem is i wil be knowing weather it is a stategric or Non stategirc based on the database column.
5. How do i need to map the database point of view and correlacte with javascript pont of view.
6. Do we need to write any Application process to achieve this task and who we can do that.
Thanks,
Anoo..

Hi VC,
As per my understanding the code should be placed between --.
Based on this i have placed the code
function setCheckbox(pThis, pItem){
alert('inside');
    var l_code = '';
    // Get checkbox name
    rName = document.getElementsById('P1_ENG_BAU').firstChild.name;
alert("The value is"+rName);
    // Fire AJAX
    var get = new htmldb_Get(null,html_GetElement('pFlowId').value,'APPLICATION_PROCESS=CHECKBOX_LIST',0);
    get.add('F120_COMPANY',pThis.value);
    gReturn = get.get('XML');
    if (gReturn) {
      var values = gReturn.getElementsByTagName('value');
      var messages = gReturn.getElementsByTagName('message');
      // Build the checkbox
      for (i=0; i<values.length; i++) {
        var rValue = values.firstChild.nodeValue;
var rMessage = messages[i].firstChild.nodeValue;
l_code+='<input id='+P1_ENG_BAU+'_'+i+' type=checkbox value='+rValue+' name='+rName+'>';
l_code+='<label for='+P1_ENG_BAU+'_'+i+'>'+rMessage+'</label>
document.getElementsById('P1_ENG_BAU').innerHTML = l_code;
Correct me if iam understanding is wrong.
Thanks,
Anoo..
Edited by: Anoo on May 31, 2012 11:04 AM

Check box selection based on name inside a field

I have a fillable PDF form
the form has 2 check box selections. M or F (male or female)
i can get a field to populate with M or F or Male or Female but how can I get a check box to select M or F based on
what comes into a field ?

You can use the text-field's custom validation script to edit the check-box, for example:
if (event.value=="Male") this.getField("CheckBoxMale").checkThisBox(0, true);
else if (event.value=="Female") this.getField("CheckBoxFemale").checkThisBox(0, true);

How to pass the check box values from one view to another view

Hi Experts,
I have a selection screen view which consists of check boxes.
WBS System status.
Release                      Completed                  Closed as 3 check boxes.
Note : The above ones are check boxes.
Based on the selection made by the user, those values needs to be passed to second view which retrieves the data and
displays the data accordingly.
At the same time if the user does not make any selection, then WBS System status should contain Released, Completed and Closed values and that needs to be sent to Second view.
Kindly advise.
Regards,
Chitrasen

hi ,
make a attribute of type WDY_BOOLEAN to achieve this functionality
u need to follow these steps :
1 in side ur component controller , under the ATTRIBUTES tab , make 3 attributes say attr1 , attr2 and attr3 of type WDY_BOOLEAN
2 create a context node , cn_check and 3 context attribute ca_check1 , ca_check2 and ca_check3 in ur first view for
release , complete and close check boxes
3 inside the DOINIT of ur 1st view , set the attributes attr1 , attr2 and attr3 to blank
wd_comp_controller->attr1 = ' '
wd_comp_controller->attr2 = ' '
wd_comp_controller->attr3 = ' '
4 inside the method , where u r validating , if the check boxes are checked or not , read the attributes ca_check1 , ca_check2 and
ca_check3
DATA lo_nd_cn_check TYPE REF TO if_wd_context_node.
    DATA lo_el_cn_check TYPE REF TO if_wd_context_element.
    DATA ls_cn_check TYPE wd_this->element_cn_check.
    DATA lv_ca_check1 LIKE ls_cn_check-ca_check1.
*   navigate from <CONTEXT> to <CN_CHECK> via lead selection
    lo_nd_cn_check = wd_context->get_child_node( name = wd_this->wdctx_cn_check ).
*   get element via lead selection
    lo_el_cn_check = lo_nd_cn_check->get_element( ).
*   get single attribute
    lo_el_cn_check->get_attribute(
      EXPORTING
        name = `CA_CHECK`
      IMPORTING
        value = lv_ca_check1 ).
IF lv_ca_check1 EQ 'X' .
wd_comp_controller->attr1 = ' X'
wd_comp_controller->attr2 = 'X '
wd_comp_controller->attr3 = ' X'

Check Boxes in ALV Grid

Hi,
I want to display an ALV grid/ list report with a check box at the begining of each row.
I want to select some or all check boxes.
Based on the selection, i need to perform some action (like z table update).
Can u plz send the sample code to meet this requirement.
Thanks

Hi..
I had developed this code long time it uses container and its working
*& Report ZHR_REPT_EMP_NOT_PBOOKED
*& Program title:    List of employees who have not done Pre-Booking and
*                     Provision to send E mail to such employees
*& Description:      To display a list of emloyees in report and then sending mails to them
REPORT ZHR_REPT_EMP_NOT_PBOOKED.
TYPE-POOLS slis.
*-----------tables
TABLES: pernr,
        pa0001,
        hrp1001,
        hrp1000,
        zodtab,
        zcstab,
        zsbutab.
*-----------Infotypes
INFOTYPES :0001, "org assignment,
           1001,
           1000,
           0105.
TYPES : BEGIN OF i_conf,
          checkbox ,
          pernr TYPE pa0001-pernr,                  "personnel Number.
          ename TYPE pa0001-ename,                  "Name of Employee.
          zzbtc TYPE pa0001-zzbtc,                  "Band.
          btrtl TYPE pa0001-btrtl,                 "Grade
          Location type string,
          persk type string,
          ptext type string,
          werks TYPE p0001-werks,
          zzod_txt type string,                         "OD name
          zzod type pa0001-zzod,
          zzcs type string,                         "cluster/sector
          vertical type string,
          sbu LIKE pa0001-zzsbu,                    "SBU
          sbutxt LIKE zsbutab-zsbutxt,              "SBUTXT
          orgeh LIKE pa0001-orgeh,                  "Vertical
          org_text type string,
          zzbloc LIKE pa0001-zzbloc,                "base location
          dept_loc type string,                     "dept loc
          ename_s LIKE pa0001-ename,                "Department
          zztc LIKE pa0001-zztc,
          endda type p0001-endda,
         celltab type lvc_t_styl,
        END OF i_conf.
DATA : it_conf TYPE STANDARD TABLE OF i_conf WITH HEADER LINE,
       wa_conf TYPE i_conf.
*data: begin of gs_outtab.
*data: checkbox type c.                "field for checkbox
** §B1.Extend your output table by a field to dis- or enable
**     cells for input.
*data: celltab type lvc_t_styl.        "field to switch editability
*        include structure i_conf.
*data: end of gs_outtab.
*data: gt_outtab type gs_outtab occurs 0 with header line.
*& DATA DECLARATION FOR EMAIL
DATA: docdata    TYPE sodocchgi1,
      objpack    TYPE STANDARD TABLE OF sopcklsti1 WITH HEADER LINE,
      objhead    TYPE STANDARD TABLE OF solisti1   WITH HEADER LINE,
      objtxt     TYPE STANDARD TABLE OF solisti1   WITH HEADER LINE,
      objbin     TYPE STANDARD TABLE OF solisti1   WITH HEADER LINE,
      reclist    TYPE STANDARD TABLE OF somlreci1 WITH HEADER LINE.
DATA: tab_lines TYPE sy-tabix.
DATA : p_1001 TYPE TABLE OF p1001 WITH HEADER LINE.
DATA : p_0001 TYPE TABLE OF p0001 WITH HEADER LINE.
DATA : p_0105 TYPE TABLE OF p0105 WITH HEADER LINE.
DATA : od TYPE p0001-zzod.
DATA : new_pernr type p0001-pernr.
DATA : pernr_s type p0001-pernr.
DATA : email_s type p0105-USRID_LONG.
DATA : email type p0105-USRID_LONG.
DATA : tc_name type string.
DATA : tc_num type string.
DATA : emails type string.
DATA : sel_all type string.
DATA: REF_GRID TYPE REF TO CL_GUI_ALV_GRID.
DATA : flag type i.
DATA : title TYPE string.
DATA : pernr_temp tYPE p0001-pernr.
DATA : rel type string.
DATA : stat type string.
DATA : count type i.
DATA :   v_dynnr type sy-dynnr.
DATA : g_grid type ref to cl_gui_alv_grid.
DATA : g_custom_container type ref to cl_gui_custom_container,
      g_container type scrfname value 'CC'.
*************field cat********************************
DATA: fieldcat TYPE lvc_t_fcat,
       wa_fieldcat LIKE LINE OF fieldcat.
DATA: gd_layout TYPE lvc_s_layo,
      gd_repid TYPE sy-repid.
DATA:gt_events TYPE slis_t_event,
      gt_list_top_of_page TYPE slis_t_listheader.
DATA rec_fetched TYPE sy-tabix.
CONSTANTS g_top_of_page TYPE slis_formname VALUE 'TOP_OF_PAGE'.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS:   s_zzod    FOR   zsbutab-zod       NO INTERVALS ,
                  s_btrtl FOR   pa0001-btrtl     NO INTERVALS.
SELECTION-SCREEN END OF BLOCK b1.
start-of-selection.
if pn-begda is initial.
    pn-begda = '18000101'.
endif.
if pn-endda is initial.
    pn-begda = '99991230'.
endif.
clear : it_conf,it_conf[].
get pernr.
clear new_pernr.
move pernr-pernr to new_pernr.
**************checking whether employee has booked or prebooked for any event****************
clear: p_1001,p_1001[].
perform read_info tables p_1001 using new_pernr '1' 'B027' .
IF SY-SUBRC <> 0.
    clear: p_1001,p_1001[].
    perform read_info tables p_1001 using new_pernr '1' 'B023' .
    IF SY-SUBRC <> 0.
      clear: p_1001,p_1001[].
      perform read_info tables p_1001 using new_pernr '2' 'B027' .
      IF SY-SUBRC <> 0.
        clear: p_1001,p_1001[].
        perform read_info tables p_1001 using new_pernr '2' 'B023' .
        IF SY-SUBRC <> 0.
          clear : p_0001,p_0001[].
          CALL FUNCTION 'HR_READ_INFOTYPE'
            EXPORTING
              pernr           = new_pernr
              infty           = '0001'
              BEGDA           = pn-begda
              ENDDA           = pn-endda
            TABLES
              infty_tab       = p_0001
            EXCEPTIONS
              infty_not_found = 1
              OTHERS          = 2.
          sort p_0001 descending by begda.
          read table p_0001 index 1.
          move p_0001-pernr to wa_conf-pernr.
          move p_0001-ename to wa_conf-ename.
          move p_0001-zzbtc to wa_conf-zzbtc.
          move p_0001-btrtl to wa_conf-btrtl.
          move p_0001-werks to wa_conf-werks.
          move p_0001-zzsbu to wa_conf-sbu.
          move p_0001-orgeh to wa_conf-orgeh.
          move p_0001-zzbloc to wa_conf-zzbloc.
          move p_0001-zztc to wa_conf-zztc.
          move p_0001-zzod to wa_conf-zzod.
          move p_0001-endda to wa_conf-endda.
          move p_0001-btrtl to wa_conf-btrtl.
***************clustor txt**********************
          select single zcstxt into wa_conf-zzcs from zcstab
                                                where zcs = p_0001-zzcs
                                                and zod = p_0001-zzod.
***********operating division*******************************
          select single ZODLTXT into wa_conf-zzod_txt from zodtab
                                             where zod = wa_conf-zzod.
***********sbu txt***************************************************************
          select single zsbutxt into wa_conf-sbutxt from zsbutab
                                        where zsbu = wa_conf-sbu.
***********location**************************************
          select single btext into wa_conf-location from t001p
                                             where btrtl = wa_conf-btrtl
                                             and werks = wa_conf-werks.
***********Dept*********************************************
          select single orgtx into wa_conf-org_text from t527x
                                              where sprsl = 'EN'
                                              and orgeh = wa_conf-orgeh
                                              and begda <= p_0001-begda
                                              and endda >= p_0001-begda.
***************grade******************************************
          SELECT SINGLE ptext FROM t503t INTO wa_conf-persk
                                          WHERE sprsl = 'EN'
                                          AND persk = p_0001-persk .
********************vertical*****************************
select single zverttxt into wa_conf-vertical from zvtab
                             where zvert = p_0001-zzvert.
********deputation location******************
if p_0001-ZZDEPFLG = 'X'.
     select single zdltxt into wa_conf-dept_loc from zdltab where zdl = p_0001-zzdploc.
endif.
***get imm superior
          CALL FUNCTION 'ZHR_GET_IMMMED_SUPERIOR'
           EXPORTING
             pernr     = new_pernr
*          begda     = '18000101'
*          endda     = '99991231'
           IMPORTING
             v_pernr   = pernr_s
           EXCEPTIONS
             not_found = 1
             OTHERS    = 2.
          if sy-subrc = 0.
** find the email of the immed. superiors personal number..
            clear : p_0001,p_0001[].
            CALL FUNCTION 'HR_READ_INFOTYPE'
              EXPORTING
                pernr           = pernr_s
                infty           = '0001'
                BEGDA           = pn-begda
                ENDDA           = pn-endda
              TABLES
                infty_tab       = p_0001
              EXCEPTIONS
                infty_not_found = 1
                OTHERS          = 2.
            read table p_0001 index 1.
            move p_0001-ename to wa_conf-ename_s.
          endif.
          if wa_conf-btrtl in s_btrtl and wa_conf-zzod in s_zzod .
            append wa_conf to it_conf.
          endif.
        endif.
      endif.
    endif.
endif.
clear wa_conf.
end-of-selection.
   if it_conf[] is initial.
      MESSAGE i501(zmod).
      exit.
      endif.
CALL SCREEN 100.
*&      Module STATUS_0100 OUTPUT
*       text
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'USER'.
* SET TITLEBAR 'xxx'.
if g_custom_container is initial.
    data: lt_exclude type ui_functions.
    create object g_custom_container
      EXPORTING
        container_name = g_container.
    create object g_grid
      EXPORTING
        i_parent = g_custom_container.
    perform fieldcat_build .
* Exclude all edit functions in this example since we do not need them:
    perform exclude_tb_functions changing lt_exclude.
* perform build_data.
*§ B3.Use the layout structure to aquaint additional field to ALV.
    gd_layout-stylefname = 'CELLTAB'.
    PERFORM build_layout.
    if it_conf[] is initial.
*      MESSAGE i501(zmod).                    "No data exists
    else.
      call method g_grid->set_table_for_first_display
        EXPORTING
          is_layout            = gd_layout
          it_toolbar_excluding = lt_exclude
        CHANGING
          it_fieldcatalog      = fieldcat
          it_outtab            = it_conf[].
* create object g_event_receiver.
* set handler g_event_receiver->catch_doubleclick for g_grid.
* Set editable cells to ready for input initially
      call method g_grid->set_ready_for_input
        EXPORTING
          i_ready_for_input = 1.
    endif.
endif.
ENDMODULE.                 " STATUS_0100 OUTPUT
*call screen 100.
*&      Form build_layout
FORM build_layout.
CLEAR gd_layout.
v_dynnr = 100.
gd_layout-cwidth_opt = 'X'.
* gd_layout-zebra      = 'X'.
* gd_layout-grid_title = text-002.
ENDFORM.                    "build_layout
*&      Form exclude_tb_functions
*       text
*      -->PT_EXCLUDE text
form exclude_tb_functions changing pt_exclude type ui_functions.
data ls_exclude type ui_func.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_copy_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_delete_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_append_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_insert_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_move_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_copy.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_cut.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_paste.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_paste_new_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_undo.
append ls_exclude to pt_exclude.
endform.                    "exclude_tb_functions
*&      Form field_cat
*       text
FORM fieldcat_build .
wa_fieldcat-fieldname = 'CHECKBOX'.
wa_fieldcat-tabname   = 'IT_CONF'.
wa_fieldcat-checkbox   = 'X'.
wa_fieldcat-edit   = 'X'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'PERNR'.
wa_fieldcat-coltext = 'P.S. No'.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'ENAME'.
wa_fieldcat-coltext = 'Employee Name'.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'ZZBTC'.
wa_fieldcat-coltext = 'Band'.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'PERSK'.
wa_fieldcat-coltext = 'Grade'.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'ZZOD'.
wa_fieldcat-coltext = 'OD Name'.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'ZZCS'.
wa_fieldcat-coltext = 'Cluster / Sector '.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
   wa_fieldcat-fieldname = 'VERTICAL'.
wa_fieldcat-coltext = 'Vertical'.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'SBUTXT'.
wa_fieldcat-coltext = 'SBU'.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'ORG_TEXT'.
wa_fieldcat-coltext = 'Dept.'.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'LOCATION'.
wa_fieldcat-coltext = 'Empl. Base Location '.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
   wa_fieldcat-fieldname = 'DEPT_LOC'.
wa_fieldcat-coltext = 'Empl. Deputation Location '.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
wa_fieldcat-fieldname = 'ENAME_S'.
wa_fieldcat-coltext = 'IS Name '.
wa_fieldcat-tabname   = 'IT_CONF'.
APPEND wa_fieldcat TO fieldcat.
clear wa_fieldcat.
endform.                    "field_cat
*&      Form check_lock
*       text
*      -->PS_OUTTAB text
*      -->P_LOCKED   text
form check_lock using    ps_outtab type i_conf
                changing p_locked.
data ls_celltab type lvc_s_styl.
loop at ps_outtab-celltab into ls_celltab.
    if ls_celltab-fieldname = 'CHECKBOX'.
      if ls_celltab-style eq cl_gui_alv_grid=>mc_style_disabled.
        p_locked = 'X'.
      else.
        p_locked = space.
      endif.
    endif.
endloop.
endform.                    "check_lock
*&      Module USER_COMMAND_0100 INPUT
*       text
MODULE USER_COMMAND_0100 INPUT.
IF sy-ucomm = 'EMAIL'.
    clear it_conf.
*    CALL METHOD g_grid->refresh_table_display.
    data: ls_outtab type i_conf.
    data: l_valid type c,
          l_locked type c.
*§A4ad. Before you (a)set, reset or (d)evaluate checkboxes,
*       you must check the input cells.
* If all entries are ok, ALV transferes new values to the output
* table which you then can modify.
    call method g_grid->check_changed_data
      IMPORTING
        e_valid = l_valid.
    if l_valid eq 'X'.
      loop at it_conf into ls_outtab.
        if     not ls_outtab-checkbox is initial
           and not ls_outtab-checkbox eq '-'.
***************************sending mail to employee and his/her superior************************************
          select single sachn telnr into (tc_name , tc_num) from t526
         where SACHX = it_conf-zztc
         and werks = it_conf-werks .
*   ******find the emil of employee.
          clear : p_0105,p_0105[].
          CALL FUNCTION 'HR_READ_INFOTYPE'
            EXPORTING
              pernr           = ls_outtab-pernr
              infty           = '0105'
              BEGDA           = pn-begda
              ENDDA           = pn-endda
            TABLES
              infty_tab       = p_0105
            EXCEPTIONS
              infty_not_found = 1
              OTHERS          = 2.
          if sy-subrc = 0.
            read table p_0105 with key subty = '0010'.
            move p_0105-USRID_LONG to email.
          endif.
** find immediate superior by Z FM.
          clear pernr_s.
          CALL FUNCTION 'ZHR_GET_IMMMED_SUPERIOR'
            EXPORTING
              pernr     = ls_outtab-pernr
            IMPORTING
              v_pernr   = pernr_s
            EXCEPTIONS
              not_found = 1
              OTHERS    = 2.
          if sy-subrc = 0.
** find the email of the immed. superiors personal number..
            clear : p_0105,p_0105[].
            CALL FUNCTION 'HR_READ_INFOTYPE'
              EXPORTING
                pernr           = pernr_s
                infty           = '0105'
                BEGDA           = pn-begda
                ENDDA           = pn-endda
              TABLES
                infty_tab       = p_0105
              EXCEPTIONS
                infty_not_found = 1
                OTHERS          = 2.
            read table p_0105 with key subty = '0010'.
            move p_0105-USRID_LONG to email_s.
          endif.
          if email <> ' '.
            count = 1.
            perform send_mail using ls_outtab-ename email email_s tc_name tc_num count .
          endif.
          if email_s <> ' '.
            count = 2.
            perform send_mail using ls_outtab-ename email email_s tc_name tc_num count.
          endif.
          call method g_grid->refresh_table_display.
          modify it_conf from ls_outtab.
        endif.
      endloop.
      call method g_grid->refresh_table_display.
    endif.
    set screen 100.
endif.
***************************end of sending mail*****************************************************
IF sy-ucomm = 'SELECT'.
* CALL METHOD g_grid->refresh_table_display.
*§A4ad. Before you (a)set, reset or (d)evaluate checkboxes,
*       you must check the input cells.
* If all entries are ok, ALV transferes new values to the output
* table which you then can modify.
    call method g_grid->check_changed_data
      IMPORTING
        e_valid = l_valid.
    if l_valid eq 'X'.
      loop at it_conf into ls_outtab.
        perform check_lock using    ls_outtab
                           changing l_locked.
        if l_locked is initial
           and not ls_outtab-checkbox eq '-'.
          ls_outtab-checkbox = 'X'.
        endif.
        modify it_conf from ls_outtab.
      endloop.
      call method g_grid->refresh_table_display.
    endif.
    set screen 100.
endif.
IF sy-ucomm = 'BCK' and v_dynnr = 100.
    clear v_dynnr.
    set screen 1000.
    leave screen.                                           " 0."1000.
**call selection-screen 1000.
*call screen 1000.
endif.
IF sy-ucomm = 'EXIT' and v_dynnr = 100.
    clear v_dynnr.
    leave program.
endif.
IF sy-ucomm = 'CANC' and v_dynnr = 100.
    clear v_dynnr.
    leave program.
endif.
ENDMODULE.                 " USER_COMMAND_0100 INPUT
*&      Form send_mail
*       text
*      -->EMAIL_S    text
*      -->EMAIL      text
*      -->TC_NAME    text
*      -->TC_NUM     text
form send_mail using ename email email_s tc_name tc_num count.
* *Body of mail
CLEAR objtxt.
CLEAR objtxt[].
objtxt = text-005.
concatenate objtxt ename into objtxt separated by space.
append objtxt.
clear objtxt.
objtxt = text-006.
concatenate objtxt email_s into objtxt separated by space.
append objtxt.
clear objtxt.
append objtxt.
objtxt = text-002.
append objtxt.
clear objtxt.
objtxt = text-003.
append objtxt.
clear objtxt.
append objtxt.
objtxt = text-004.
concatenate objtxt tc_name 'at' tc_num into objtxt separated by space.
append objtxt.
clear objtxt.
DESCRIBE TABLE objtxt LINES tab_lines.
READ TABLE objtxt INDEX tab_lines.
*Mail description
CLEAR docdata.
docdata-doc_size = ( tab_lines - 1 ) * 255 + STRLEN( objtxt ).
docdata-obj_name = 'Reminder'.
docdata-obj_descr = 'REMINDER TO DO PRE-BOOKING'.
docdata-obj_langu = sy-langu.
*Packing list for main document
CLEAR objpack.
CLEAR objpack[].
objpack-head_start = 1.
objpack-head_num   = 0.
objpack-body_start = 1.
objpack-body_num   = tab_lines.
objpack-doc_type   = 'RAW'.
APPEND objpack.
*Email receiver's list
CLEAR reclist.
CLEAR reclist[].
if count = 1.
* reclist-receiver = 'email address'."put email add here
    reclist-receiver = email.
else.
    reclist-receiver = email_s.
endif.
reclist-rec_type = 'U'.
APPEND reclist.
IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'SO_NEW_DOCUMENT_SEND_API1'
    EXPORTING
      document_data              = docdata
      document_type              = 'RAW'
      put_in_outbox              = 'X'
      commit_work                = 'X'
    TABLES
      object_content             = objtxt
      receivers                  = reclist
    EXCEPTIONS
      TOO_MANY_RECEIVERS         = 1
      DOCUMENT_NOT_SENT          = 2
      DOCUMENT_TYPE_NOT_EXIST    = 3
      OPERATION_NO_AUTHORIZATION = 4
      PARAMETER_ERROR            = 5
      X_ERROR                    = 6
      ENQUEUE_ERROR              = 7
      OTHERS                     = 8.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
endform.                    "send_mail
*&      Form eventtab_build
FORM eventtab_build USING rt_events TYPE slis_t_event.
*Registration of events to happen during list display
DATA: ls_event TYPE slis_alv_event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type = 0
    IMPORTING
      et_events   = rt_events.
READ TABLE rt_events WITH KEY name = slis_ev_top_of_page INTO ls_event.
IF sy-subrc = 0.
    MOVE g_top_of_page TO ls_event-form.
    APPEND ls_event TO rt_events.
ENDIF.
ENDFORM.                    "eventtab_build
*&      Form top_of_page
FORM top_of_page.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = gt_list_top_of_page.
ENDFORM.                    "top_of_page
*&      Form COMMENT_BUILD
FORM comment_build USING lt_top_of_page TYPE slis_t_listheader.
DATA: ls_line TYPE slis_listheader,
          rp_date TYPE string.              "report date
* LIST HEADING LINE: TYPE H
CLEAR ls_line.
ls_line-typ = 'H'.
ls_line-info = text-007.
APPEND ls_line TO lt_top_of_page.
CONCATENATE sy-datum+6(2) sy-datum+4(2) sy-datum(4) INTO rp_date SEPARATED BY '.'.
* STATUS LINE: TYPE S
CLEAR ls_line.
ls_line-typ = 'S'.
ls_line-key = text-008.
ls_line-info = rp_date.
APPEND ls_line TO lt_top_of_page.
ENDFORM.                    "comment_build
*&      Form read_info
*       text
*      -->P_1001     text
*      -->PERNR      text
*      -->STAT       text
*      -->REL        text
form read_info tables p_1001 using pernr stat rel.
CALL FUNCTION 'RH_READ_INFTY_1001'
    EXPORTING
      AUTHORITY        = 'DISP'
      WITH_STRU_AUTH   = 'X'
      PLVAR            = '01'
      OTYPE            = 'P'
      OBJID            = pernr
      ISTAT            = stat
      SUBTY            = rel
      BEGDA            = pn-begda
      ENDDA            = pn-endda
    TABLES
      I1001            = p_1001
    EXCEPTIONS
      NOTHING_FOUND    = 1
      WRONG_CONDITION = 2
      WRONG_PARAMETERS = 3
      OTHERS           = 4.
endform.                    "read_info
*&      Module BACK INPUT
*       text
MODULE BACK INPUT.
IF SY-UCOMM = 'E'.
    leave program.
endif.
IF SY-UCOMM = 'ENDE'.
    leave program.
endif.
IF SY-UCOMM = 'ECAN'.
    leave program.
endif.
ENDMODULE.                 " BACK INPUT
regards
vivek

Check the check-box using script

Hi
I have a requirement where from script i need to check the check box.
Based on if a condition is true , when i execute the script , the check box field needs to be auto-checked .
Appreciate the help

Hi,
Access the field and set it to true. If it is a standard field it should have its getter and setter, you should use that. In case of an extension field do this :
doc.getExtensionField("FIELD_NAME").set(true);
Thanks
Devesh

Hiding text box based on check box checking

Hello,
I have a jsp in which based on whether the check box is checked or unchecked I want to hide or show a text box. I am including the text box in a div tag & calling a javascript function to set the style of the div to hidden or shown based on whether the check box is checked or not. although i am getting the correct values in the alerts the text box is not getting hidden.
   <td class="label"><label for="chk1"><gbms:message key="lblSearchforDeletedCustomer"/>:</label></td><td class="input">
              <html-el:checkbox property="chk1" value="N" tabindex="3" onclick="javascript:checkboxClicked(document.forms['formCustomerOrVehicleMaintenance'])" onfocus="fnShowError(document.formCustomerOrVehicleMaintenance.chk1);"></html-el:checkbox> <gbms:message key="chek"/>
                             </td>
                             <div id="delDateDiv" style:hidden>
                        <td class="label"><label for="txtDeleteDate"><gbms:message key="lblDeletedAsOf"/>:</label></td><td class="input">
             <html-el:text property="txtDeleteDate" size="6" maxlength="40" tabindex="3" onchange="fnChanged()" onfocus="fnShowError(document.formCustomerVehicleMaintenanceDelete.txtDeleteDate);"></html-el:text> <a href="#" onclick="cal1xx.select(document.forms[0].txtDeleteDate,'anchor1xx','MMddyy'); return false;" name="anchor1xx"><img src="<%=request.getContextPath()%>/css/common/calendar.gif" border="0" style="cursor: hand"></a><gbms:help jsp="customerVehicleMaintenanceDelete" module="admin" languageCode="<%=request.getLocale().getLanguage()%>" field="DeletedAsOf"/>
                    </td></div>javascript function being called..
function checkboxClicked(aThis)
                    var aform = document.forms['formCustomerOrVehicleMaintenance'];
                    var aDiv = document.getElementById('delDateDiv');
                    alert(aDiv.style.visibility);
                    alert(aDiv.innerHTML);
                    alert(aform.chk1.checked);
                    if(aThis.chk1.value == true)
                         aform.txtDeleteDate.value = '';
                         aform.txtDeleteDate.disabled = false;
                         aDiv.style.visibility = 'visible';
                    else
                         aform.txtDeleteDate.value = '';
                         aform.txtDeleteDate.disabled = true;
                         aDiv.style.visibility = 'hidden';
               }

in my javascript function the value returned is true when checkbox is checked & false when it is unchecked. visibility is also giving correct value in the alert. but still field is not hiding
          function checkboxClicked()
                    var aform = document.forms['formCustomerOrVehicleMaintenance'];
                    var aDiv = document.getElementById('delDateDiv');
                    alert(aDiv.style.visibility);
                    alert(aform.chk1.checked);
                    if(aform.chk1.checked)
                         aform.txtDeleteDate.value = '';
                         aform.txtDeleteDate.disabled = false;
                         aDiv.style.visibility = 'visible';
                         alert("inside if");
                         alert(aDiv.style.visibility);
                    else
                         aform.txtDeleteDate.value = '';
                         aform.txtDeleteDate.disabled = true;
                         aDiv.style.visibility = 'hidden';
                         alert("inside else");
                         alert(aDiv.style.visibility);
               }

How to implement Check box in the Rtf based on the value from XML datafield

Hello All ,
It would be great if any one can help me in implementing check box in the rtf based on the data filed value from the XML data.
I need to get in the out put checked boxes like what we say Radio button Yes or No ( If Yes it should be marked ).
If any one worked on this please help us...
Thanks in Advance...

Did you check the user guide,
we have a section over there :)
http://blogs.oracle.com/xmlpublisher/2007/05/22

Populate drop-down lists based on check box selections

Hi. I'm creating a Service Work Order form. At the top, there are several check boxes for the various services we provide, under that , more text fields, drop downs and checkboxes to elaborate on those services, and then at the bottom, fields for pricing.
I'd like the top half of the form to drive the pricing info that is available or that auto-populates at the bottom.
Ideally, I'd like to make the pricing specific based on 3 things:
the service checkbox
the client
and the details on that service
For example:
If Client XYZ wants Service A that includes subservice B
$123 should show up on the bottom half in the field for that service
If Client ABC wants Service B that includes subservice C
$456 should show up on the bottom half in the field for that service
Does that make sense?
I've been unable to get code to work in either the calculate and pre-Open options
I first tried calculate and used this code (which was just a guess on my part)
if (CheckBox1 == 1) and if (CheckBox9 == 1) then
$.rawValue = 50
elseif
(CheckBox2 == 1) and if (CheckBox9 == 1) then
$.rawValue = 50
elseif
(CheckBox5 == 1) and if (CheckBox9 == 1) then
$.rawValue = 55
elseif
(CheckBox6 == 1) and if (CheckBox9 == 1) then
$.rawValue = 55
elseif
(CheckBox7 == 1) and if (CheckBox9 == 1) then
$.rawValue = 50
elseif
(CheckBox8 == 1) and if (CheckBox9 == 1) then
$.rawValue = 50
else
$.rawValue = 0
endif
That didn't do anything but give me an error about "and"
So I tried putting code in pre-Open:
// clear the dropdown displayed value and items
this.rawValue = null;
this.clearItems();
// repopulate the items based on the checkboxes
if(offshore.rawValue == 1)
    this.addItem("$40.00", "offshore_001");
    this.addItem("$45.00", "offshore_002");
    this.addItem("$50.00", "offshore_003");
if(inland.rawValue == 1)
    this.addItem("$40.00", "inland_001");
    this.addItem("$45.00", "inland_002");
    this.addItem("$50.00", "inland_003");
I got no error but nothing populated and the drop-down was, in effect, disabled.
Any help would be appreciated.
Thanks!

Gavin,
This sounds like an issue that is not related to JHeadstart. To simplify the test case, you could create a simple drag-and-drop ADF application without JHeadstart and see if the same problem occurs there.
Your suggestion that it is related to the where clause seems likely. Please find out what kind of object USER_ENV is, and how it is initialized. Maybe this initialization is skipped when bouncing the application.
What happens if you perform the query in SQL*Plus, without doing anything about the USER_ENV?
Maybe you should ask the Oracle Applications discussion forum...
kind regards,
Sandra Muller
JHeadstart Team
Oracle Consulting

How do you send an email to a specific person based on if a particular check box is checked?

How do you send an email to a specific person based on if a particular check box is checked?

Try the LiveCycle Designer forum.

Need to change the LOV field based on checked box selection in OAF page

Dear ALL,
I have a requirement as below:
I have a custom OAF page having a lov field which is mandatory, a check box and a two text fields.
So based on LOV value selection i am defaulting two text field value automatically.
So my requirement is when user selects the check box automatically the LOV field should be non mandatory and user can insert in values to the lov field and text field and submit it.
SO basically based on check box field selection i need to make the lov field in such a way it should accept all the values what user enters instead of check the query added in VO behind the LOV.
Please suggest me some pointers to achieve this requirement.
Thanks
Deb

hi,
in PFR use:
if ("checkevent".equals(pageContext.getParameter(EVENT_PARAM)))
                 HashMap hashMap = new HashMap();
                 String checkboxval=pageContext.getParameter("item2");
              hashMap.put("checkboxval",checkboxval);
                pageContext.setForwardURLToCurrentPage(hashMap ,
                true, // retain the AM
                OAWebBeanConstants.ADD_BREAD_CRUMB_NO,
                OAWebBeanConstants.IGNORE_MESSAGES);
and in PR use:
if((pageContext.getParameter("checkboxval'))!=null)
OAMessageLovInputBean lovInputBean=(OAMessageLovInputBean)webBean.findIndexedChildRecursive("item3");
      lovInputBean.setRequired("false");
try it
Regards
Mahesh

Update order user status based on a custom check box value in web ui

Hi Experts,
I have a requirement to Update the user status based on a custom check box value in web ui.
This is needed at the followup for a SR, the component is BT116H_SRVO, Details View.
I created a value node with 4 checkboxes, based on the check box value, the corresponding user status
need to be updated.
How can I reach to the order save functionality of SAP in EH_ONSAVE method, so that syatem can capture my check box value, along with other screen fields, and append the status parameter in Order maintain?
or do I have to call order maintain in even handler for checkbox, which will affect performance .....
Pls help.
Regards,
Lakshmi

Hi,
In your event handler you can use bol entity corresponding to status BTStatusH and change the user status.
Best regards,
Caíque Escaler

GR based IV check box suppressed - Extended Classic Scenario

Hello Folks,
How are you doing today ?
We are working in SRM 5.0 Extended Classic scenario.
When created the Local PO in SRM with GR Based IV Check box active, the
follow-on back-end Purchase order is generated without this flag. In
other terms, system is creating the follow-on ECC PO without GR Based
IV check box active. As a result, we are unable to run the ERS cycle.
Back-end system in above scenario is ECC 6.0. And vendor settings are
maintained with GR based IV flag on in both ECC and SRM.
Kindly advice.
Thank you for your assistance !

Hi Ravi and Yann,
Thank you for your inputs. OSS note-956083 can not be applied in my case due to the hight system version (patch level 550).
I have already raised this issue to SAP, but in the lack of proper infrastrucure SAP can not access the system. (BASIS guys are still struggling with it)
Well...let me give you recap-
We have not activated nor implemented any BAdi so far (Vanila SRM 5.0 EC scenario) PO creation for goods is working fine and as desired. But when it come across with PO with limit item or services, system throws an error as -
"PO 5100000263: Service-based invoice verif. requires GR "NO" or G R-based invoice verif."
Would deeply appreciate if you guys can share insight on this issue.
Thank you for your assistance!

How to dsplay the values based on the check box?

forms6i
Hi to all
the requirment the we have already master detail form.example emp details based on the dept number.in the form just only displays three coloumns per record wise(emp details).
actually my requrment is place the check box each record and place a one button in the form.once check the particular record and click on the button open the another form
it's displays that particular record entire emp details.any one help me...........
Edited by: 994418 on 3 Apr, 2013 1:50 AM

994418 wrote:
forms6i
Hi to all
the requirment the we have already master detail form.example emp details based on the dept number.in the form just only displays three coloumns per record wise(emp details).
actually my requrment is place the check box each record and place a one button in the form.once check the particular record and click on the button open the another form
it's displays that particular record entire emp details.any one help me...........
Edited by: 994418 on 3 Apr, 2013 1:50 AMHi,
As you said, you emp block is tabular, i think there is no need of check box. Just add a button in that block. So there is a button for each record and associate button click display the associate record details (you said to go another form and display)
check this Calling a form and passing a context
Hope this helps
Hamid
Mark correct/helpful to help others to get right answer(s).*

GR Based IV check box

Hi. I need help in controlling the GR Based IV check box in creating the PO.
We normally set this in the vendor master. But then, How can I set the GR BASED IV checkbox base on the PO document type that will be used?
Let say I want all sap standard types of PO to be GR Based and some Z type PO to be not a GR based IV PO. Is this possible?
Is there a User-Exit for this?

HI,
Since you want to set the GR based IV to set for all Standard Purchase order- at doc type level.
So the first thing is the vendor master setting which you are already doing.
Second you can also do it by the info record .by creating info record for all vendor and material /Material Group ..we can control the GR IV indicator
Third thing is Controlling it by the screen layout.
SPRO-Material Mangement-Purchasing- Purchase order-Define doc types
here in the definition of Doc type ,attach a screen layout.
SPRO-Material Mangement-Purchasing- Purchase order- Define screen Layout at doc type level.
in this Screen layout in the tab --GRIR control. make the GR based invoice as mandatory,so that it cant be skipped while created or change of PO and user will check it even if it is missed out.
hope so it helps
Regards
Anjanna

Check box GR-Based INV in PO's

Similar Messages

Maybe you are looking for