Sending email and alert notifcation using function module

Hi All,
I am trying to send email and alert notification messages using function modules in CRM. I am unable to send mail using 'SO_DOCUMENT_SEND_API1'. Getting a short dump message "dictionary mismatch". If anyone knows any FM which can be used for sending mails, please let me know. I also want to send alert messages using some FM. Please let me know any FM in this case as well.
All help appreciated. This is urgent and please get back to me soon.
Thanks
Deno

Hi Ranjit,
Thanks a lot for the reply. I already tried these FMs and getting the error message
Trigger Location of Runtime Error
    Program                                 SAPLBUPA_INTERFACE_TDTRANS
    Include                                 LBUPA_INTERFACE_TDTRANSTOP
    Row                                     4
I dont know the reason behind the error. The SO_document_send FM is used inside all these FMs. So It wont work.
Thanks
Deno

Similar Messages

Using Function module SALRT_CREATE_API i am sending alerts ..

Hi gurus,
i am using the Function Module SALRT_CREATE_API to send alerts.
i run the same F.M. in se37 with same input alert id is generated and in SOST i checked them.
but after using the F. M in program , alert id is generated, but in SOST i didn't find anything.
using alert id where i have to check those mails , kindly suggest me ..
Thanks & Regrads
kalyan.

Hi,
Check the bellow thread as per your requirement.
How to use function module SALRT_CREATE_API to trigger alert in XI?
Regards,
Goutam Kolluru.

How to Send Internal table to SAP Spool using Function Modules or Methods?

Hi Experts,
How to Send Internal table to SAP Spool using Function Modules or Methods?
Thanks ,
Kiran

This is my code.
I still get the no ABAP list data for the spool, even tho I can see it sp01?
REPORT Z_MAIL_PAYSLIP.
* Declaration Part *
tables: PERNR, PV000, T549Q, V_T514D, HRPY_RGDIR.
infotypes: 0000, 0001, 0105, 0655.
data: begin of ITAB occurs 0,
MTEXT(25) type C,
PERNR like PA0001-PERNR,
ABKRS like PA0001-ABKRS,
ENAME like PA0001-ENAME,
USRID_LONG like PA0105-USRID_LONG,
end of ITAB.
data: W_BEGDA like HRPY_RGDIR-FPBEG,
 W_ENDDA like HRPY_RGDIR-FPEND.
data: RETURN like BAPIRETURN1 occurs 0 with header line.
data: P_INFO like PC407,
 P_FORM like PC408 occurs 0 with header line.
data: P_IDX type I,
 MY_MONTH type T549Q-PABRP,
 STR_MY_MONTH(2) type C,
 MY_YEAR type T549Q-PABRJ,
 STR_MY_YEAR(4) type C,
 CRLF(2) type x value '0D0A'.
data: W_CMONTH(10) type C.
data: TAB_LINES type I,
 ATT_TYPE like SOODK-OBJTP.
data: begin of P_INDEX occurs 0,
 INDEX type I,
end of P_INDEX.
constants: begin of F__LTYPE, "type of line
 CMD like PC408-LTYPE value '/:', "command
 TXT like PC408-LTYPE value 's', "textline
end of F__LTYPE.
constants: begin of F__CMD, "commands
NEWPAGE like PC408-LINDA value '',
end of F__CMD.
data: P_LIST like ABAPLIST occurs 1 with header line.
*data: OBJBIN like SOLISTI1 occurs 10 with header line,
data: OBJBIN like LVC_S_1022 occurs 10 with header line,
 DOCDATA like SODOCCHGI1,
 OBJTXT like SOLISTI1 occurs 10 with header line,
 OBJPACK like SOPCKLSTI1 occurs 1 with header line,
 RECLIST like SOMLRECI1 occurs 1 with header line,
 OBJHEAD like SOLISTI1 occurs 1 with header line,
 it_mess_att LIKE solisti1 OCCURS 0 WITH HEADER LINE,
 gd_buffer type string,
 l_no_of_bytes TYPE i,
 l_pdf_spoolid LIKE tsp01-rqident,
 l_jobname LIKE tbtcjob-jobname.
data: file_length type int4,
 spool_id type rspoid,
 line_cnt type i.
*-------------------------------------------------------------------* * INITIALIZATION *
OBJBIN = ' | '.
append OBJBIN.
OBJPACK-HEAD_START = 1.
data: S_ABKRS like PV000-ABKRS.
data: S_PABRP like T549Q-PABRP.
data: S_PABRJ like T549Q-PABRJ.
* SELECTION SCREEN *
selection-screen begin of block BL1.
parameters: PAY_VAR like BAPI7004-PAYSLIP_VARIANT default 'ESS_PAYSLIPS' obligatory.
selection-screen end of block BL1.
START-OF-SELECTION.
s_ABKRS = PNPXABKR.
S_PABRP = PNPPABRP.
s_pabrj = PNPPABRJ.
w_begda = PN-BEGDA.
w_endda = PN-ENDDA.
get pernr.
* "Check active employees
rp-provide-from-last p0000 space pn-begda pn-endda.
CHECK P0000-STAT2 IN PNPSTAT2.
* "Check Payslip Mail flag
rp-provide-from-last p0655 space pn-begda pn-endda.
CHECK P0655-ESSONLY = 'X'.
rp-provide-from-last p0001 space pn-begda pn-endda.
* "Find email address
RP-PROVIDE-FROM-LAST P0105 '0030' PN-BEGDA PN-ENDDA.
if p0105-usrid_LONG ne ''.
 ITAB-PERNR = P0001-PERNR.
 ITAB-ABKRS = P0001-ABKRS.
 ITAB-ENAME = P0001-ENAME.
 ITAB-USRID_LONG = P0105-USRID_LONG.
 append itab.
 clear itab.
endif.
"SY-UCOMM ='ONLI'
END-OF-SELECTION.
*------------------------------------------------------------------* start-of-selection.
write : / 'Payroll Area : ', S_ABKRS.
write : / 'Payroll Period/Year : ',STR_MY_MONTH,'-',STR_MY_YEAR. write : / 'System Date : ', SY-DATUM.
write : / 'System Time : ', SY-UZEIT.
write : / 'User Name : ', SY-UNAME.
write : / SY-ULINE.
sort ITAB by PERNR.
loop at ITAB.
 clear : P_INFO, P_FORM, P_INDEX, P_LIST, OBJBIN, DOCDATA, OBJTXT, OBJPACK, RECLIST, TAB_LINES.
 refresh : P_FORM, P_INDEX, P_LIST, OBJBIN, OBJTXT, OBJPACK, RECLIST.
* Retrieve Payroll results sequence number for this run
 select single * from HRPY_RGDIR where PERNR eq ITAB-PERNR
 and FPBEG ge W_BEGDA
 and FPEND le W_ENDDA
 and SRTZA eq 'A'.
* Produce payslip for those payroll results
 if SY-SUBRC = 0.
 call function 'GET_PAYSLIP'
 EXPORTING
 EMPLOYEE_NUMBER = ITAB-PERNR
 SEQUENCE_NUMBER = HRPY_RGDIR-SEQNR
 PAYSLIP_VARIANT = PAY_VAR
 IMPORTING
 RETURN = RETURN
 P_INFO = P_INFO
 TABLES
 P_FORM = P_FORM.
 check RETURN is initial.
* remove linetype from generated payslip
 loop at p_form.
 objbin = p_form-linda.
 append objbin.
 line_cnt = line_cnt + 1.
 endloop.
 file_length = line_cnt * 1022.
* create spool file of paylsip
 CALL FUNCTION 'SLVC_TABLE_PS_TO_SPOOL'
 EXPORTING
 i_file_length = file_length
 IMPORTING
 e_spoolid = spool_id
 TABLES
 it_textdata = objbin.
 IF sy-subrc EQ 0.
 WRITE spool_id.
 ENDIF.
 DESCRIBE table objbin.
 DATA PDF LIKE TLINE OCCURS 100 WITH HEADER LINE.
 CALL FUNCTION 'CONVERT_ABAPSPOOLJOB_2_PDF'
 EXPORTING
 SRC_SPOOLID = spool_id
 NO_DIALOG = ' '
 DST_DEVICE = 'MAIL'
* PDF_DESTINATION =
* IMPORTING
* PDF_BYTECOUNT = l_no_of_bytes
* PDF_SPOOLID = l_pdf_spoolid
* LIST_PAGECOUNT =
* BTC_JOBNAME =
* BTC_JOBCOUNT =
 TABLES
 PDF = pdf
 EXCEPTIONS
 ERR_NO_ABAP_SPOOLJOB = 1
 ERR_NO_SPOOLJOB = 2
 ERR_NO_PERMISSION = 3
 ERR_CONV_NOT_POSSIBLE = 4
 ERR_BAD_DESTDEVICE = 5
 USER_CANCELLED = 6
 ERR_SPOOLERROR = 7
 ERR_TEMSEERROR = 8
 ERR_BTCJOB_OPEN_FAILED = 9
 ERR_BTCJOB_SUBMIT_FAILED = 10
 ERR_BTCJOB_CLOSE_FAILED = 11
 OTHERS = 12
 IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
*Download PDF file C Drive
CALL FUNCTION 'GUI_DOWNLOAD'
 EXPORTING
 filename = 'C:\itab_to_pdf.pdf'
 filetype = 'BIN'
 TABLES
 data_tab = pdf.
* Transfer the 132-long strings to 255-long strings
* LOOP AT pdf.
* TRANSLATE pdf USING ' ~'.
* CONCATENATE gd_buffer pdf INTO gd_buffer.
* ENDLOOP.
* TRANSLATE gd_buffer USING '~ '.
* DO.
* it_mess_att = gd_buffer.
* APPEND it_mess_att.
* SHIFT gd_buffer LEFT BY 255 PLACES.
* IF gd_buffer IS INITIAL.
* EXIT.
* ENDIF.
* ENDDO.
 OBJHEAD = 'Objhead'.
 append OBJHEAD.
* preparing email subject
 concatenate W_ENDDA(6)
 ' Payslip-'
 ITAB-ENAME+0(28)
 ITAB-PERNR+4(4) ')'
 into DOCDATA-OBJ_DESCR.
 DOCDATA-OBJ_NAME = 'Pay Slip'.
 DOCDATA-OBJ_LANGU = SY-LANGU.
 OBJTXT = 'Pay Slip.'.
 append OBJTXT.
*prepare email lines
 OBJTXT = DOCDATA-OBJ_DESCR.
 append OBJTXT.
 OBJTXT = 'Please find enclosed your current payslip.'.
 append OBJTXT.
* Write Attachment(Main)
* 3 has been fixed because OBJTXT has fix three lines
 read table OBJTXT index 3.
* DOCDATA-DOC_SIZE = ( 3 - 1 ) * 255 + strlen( OBJTXT ).
 clear OBJPACK-TRANSF_BIN.
 OBJPACK-HEAD_START = 1.
 OBJPACK-HEAD_NUM = 0.
 OBJPACK-BODY_START = 1.
 OBJPACK-BODY_NUM = 3.
 OBJPACK-DOC_TYPE = 'RAW'.
 append OBJPACK.
* Create Message Attachment
 ATT_TYPE = 'PDF'.
 describe table OBJBIN lines TAB_LINES.
 read table OBJBIN index TAB_LINES.
* OBJPACK-DOC_SIZE = ( TAB_LINES - 1 ) * 255 + strlen( OBJBIN ).
 OBJPACK-TRANSF_BIN = 'X'.
 OBJPACK-HEAD_START = 1.
 OBJPACK-HEAD_NUM = 0.
 OBJPACK-BODY_START = 1.
 OBJPACK-BODY_NUM = TAB_LINES.
 OBJPACK-DOC_TYPE = ATT_TYPE.
 OBJPACK-OBJ_NAME = 'ATTACHMENT'.
 OBJPACK-OBJ_DESCR = 'Payslip'.
 append OBJPACK.
* Create receiver list refresh RECLIST.
 clear RECLIST.
 RECLIST-RECEIVER = itab-USRID_long.
 translate RECLIST-RECEIVER to lower case.
 RECLIST-REC_TYPE = 'U'.
 append RECLIST.
* Send the document
*SO_NEW_DOCUMENT_ATT_SEND_API1
 call function 'SO_DOCUMENT_SEND_API1'
 exporting
 DOCUMENT_DATA = DOCDATA
 PUT_IN_OUTBOX = 'X'
 COMMIT_WORK = 'X'
* IMPORTING
* SENT_TO_ALL =
* NEW_OBJECT_ID =
 tables
 PACKING_LIST = OBJPACK
 OBJECT_HEADER = OBJHEAD
 CONTENTS_BIN = pdf
 CONTENTS_TXT = OBJTXT
* CONTENTS_HEX =
* OBJECT_PARA =
* OBJECT_PARB =
 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 NE 0.
 ITAB-MTEXT = 'Message Not Sent to : '.
 else.
 ITAB-MTEXT = 'Message Sent to : '.
 endif.
* else.
* ITAB-MTEXT = 'Message Not Sent to : '.
* endif.
 else.
 "SY-SUBRC Not = 0
 ITAB-MTEXT = 'Payroll data not found : '.
 endif.
 "end of SY-SUBRC = 0.
 modify ITAB.
endloop. "end loop at ITAB
sort ITAB by MTEXT PERNR.
loop at ITAB.
 at new MTEXT.
 uline.
 write : / ITAB-MTEXT color 4 intensified on.
 write : / 'Emp. Code' color 2 intensified on,
 12 'Emp. Name' color 2 intensified on,
 54 'Email ID' color 2 intensified on.
 endat.
 write : / ITAB-PERNR, 12 ITAB-ENAME, 54 ITAB-USRID_LONG.
endloop.

Please send me some sample codes of ALVS using function modules only

Hi,
i am new to alvs
Please send me some sample codes of alvs using function modules only.
My mail id is [email protected]
Thanks & regards,
hari priya

hI
http://www.sapdev.co.uk/reporting/reportinghome.htm SPECIAL FOR ALL ALV PROGRAMS WITH EXAMPLE CODES
Check the below links :
http://www.sap-img.com/abap/sample-programs-on-alv-grid.htm
http://www.sap-img.com/abap-function.htm
http://www.sap-basis-abap.com/sapab034.htm
http://www.erpgenie.com/abap/example_code.htm
These all are very simple ALV programs ,good luck
Reward if usefull

I can no longer send emails and my drafts folder no longer functions. How do I fix them?

I am using Windows XP. I have Mozilla Firefox 3.6. My Gmail account no longer can send emails and my Drafts folder is inoperable. I can see, save, discard, or edit anything in Drafts. This is only with my home pc. Any other computer (library, work..) does work. How do I fix this?
== This happened ==
Every time Firefox opened
== about a momth ago

Please read and begin using Can receive email, but not send email. I had a similar issue with Comcast mail (could receive by not send) and found my answer in this letter. For me it took resetting the outgoing mail and telling the system to use a password when sending outgoing mail. If you need help with that please advise and I'll tell you where to look.

Pls explain me the use and purpose of following Function modules

pls explain me the use and purpose of following Function modules
1. G_MAX_PERIOD_AND_OFFSET_GET
2. DEQUEUE_E_TABLE
3. FI_COMPANY_CODE_CHECK
4. G_PERIOD_GET
5. alv_display_function
6. G_SET_GET_ID_FROM_NAME
thanks ,
phyrose

1. G_MAX_PERIOD_AND_OFFSET_GET
For given No. of period & periods it gives the offset
2. DEQUEUE_E_TABLE
To Unlock the table records
3. FI_COMPANY_CODE_CHECK
To validate Company Code

4. G_PERIOD_GET
Returns no. of Posting period & Special period for give company code, posting date & ledger
5. alv_display_function -
No such FM exists

6. G_SET_GET_ID_FROM_NAME - Use this module to derive the internal set Id from the name that appears on the user interface, for example, in order then to import the set (see the function group documentation).
The function module first determines a candidate list of sets based on the set name and the class that might have been specified that could match the set name. The class can also be masked (e.g. 000+ for all FI-SL sets, including dynamic sets).

Comparing OO ALV and ALV using Function modules

Hi All,
Please provide me what are the advantages of developing ALV using Objects compared to creation using function modules. What are the disadvantages of creating using the conventional FM way.
I have not worked much on ALV using Function modules, have been developing using standard abap classes. I wanted to have an detailed understanding and differences between the two.
Please provide your views on the same.
I have searched SDN forum, but didnt find much information, so it will be of great help if you provide some inputs.
Thanks & Regards,
Navneeth K.

Hi, Navneeth,
With ALV functions, you can everything that you would do otherwise with the OOPS ALV. However , I don't think you can possibily have more controls in case of alv function because it occupies the entire screen and the function only calls 2 screens internally ( screen numbers 500 and 700 (for popup alv)).
But with OOPS on the other hand, you can have many controls on one screen, for example, you can have 2 ALV lists, or a splitter control with one of them having a Tree control and the other alv grid/list, pictures etc.
So the sole motive of the function is if you want to display a list, but when developing a serious application, I would go for OOPs ALV.
regards,
Advait

Comparing ALV using Function modules and OO ALV

Hi All,
Please provide me what are the advantages of developing ALV using Objects compared to creation using function modules. What are the disadvantages of creating using the conventional FM way.
I have not worked much on ALV using Function modules, have been developing using standard abap classes. I wanted to have an detailed understanding and differences between the two.
Please provide your views on the same.
I have searched SDN forum, but didnt find much information, so it will be of great help if you provide some inputs.
Thanks & Regards,
Navneeth K.

Hello,
Check this link
ALV FUNCTION MODULE AND OBJECT ORIENTED ?
Example programs
http://saplab.blogspot.com/2007/10/sample-abap-program-of-alv-grid-control.html
http://www.abapcode.info/2007/06/object-oriented-alv-using-two.html

How do I send email with pictures attached, using PSE 9 and Windows 7 ?

How do I send email with pictures attached, using PSE 9 and Windows 7 ?

Try email attachment workflow in Organizer. http://tv.adobe.com/watch/learn-photoshop-elements-9/sharing-your-images-via-email/
Thanks
Andaleeb

My iPod touch works with my home wi Fi but when I use public wi Fi I can send emails and go to websites but I cannot send emails

I would like to be able to use public wi Fi.

What is you problem? You say: "
I can send emails and go to websites but I cannot send emails"
Can you or can you not send email from public sites?
Any error messages?

Delta Extraction Using Function Module ( Customization )

Dear Experts,
I want a sample code for Delta Extraction using Function Module ( If it is customized already working code very helpful ), I have already created Function Module but Full update is happening. If I give delta update again it is retrieving all records. It is very urgent, if you have please send me to the following mail ID.
[email protected]
Best Regards,
SGK.

Hi SGK,
I've done this for a delta based on a timestamp and it's actually pretty easy. The basic steps are:
1) Create an extract structure in SE11. Make sure the structure has a date or timestamp field in it that you can use for delta. You'll need to include the field twice if you also want to extract it to BW/BI since once it's chosen as the delta field then it will be hidden in the interface.
2) Create the extractor function module in SE37. You can use RSAX_BIW_GET_DATA_SIMPLE as a template. Make sure your logic restricts the data it retrieves according to the selections that are passed in I_T_SELECT, including restrictions on the delta field.
3) Create a generic DataSource in RSO2. Click Extraction by FM then fill in your extract structure and function module. Click Generic Delta and pick your delta field and the appropriate radio button (time stamp or calendar day). If your delta field is a timestamp field then be sure to set the upper and lower safety limits to -86400 and 86400 respectively. This might not be necessary on your version of SAPI but on mine there is a bug where it doesn't translate between system time and UTC (GMT) correctly so this was necessary.
You don't need to program any special delta handling logic in your function module as long as you restrict the data you retrieve based on the delta field (I_T_SELECT). This is because the SAPI takes care of catching the init, delta and repeat requests, translating them to the appropriate delta field values, and then passing them to your function module as if it was a full extraction for a specific date or timestamp range.
Hope this helps!
Jason

Error in Data selection in R/3 Generic Extraction Using function Modules

Hi Friends,
I have created a a generic data source using function module to load data from PA0000 and PA0001 Tables ,Function module is working fine when i execute it indipendently and the data source is also working fine when i extract data using RSA3. it is showing correct no of records 157.
When loading data into DSO from BW (using 3.x/7.0 flows) data is comming to PSA all 157 records but in the RSMO the load status is showing yellow when i look into the step by step analysis it is
data selection successfully started
Data selection successfully ended
All Data packets completed.
are showing in red.
after and hour time load getting failed and in the error message it is showing " job terminated in source system---> Request set to red"
it is giving this message wir no RSM 78.
Please let me know it

Hi Jerry,
Thanks for the immediate replay
But here in my source system job is getting terminated.
this is the status of job in Job logs.
the job is running till this step not going ahead.
Call customer enhancement BW_BTE_CALL_BW204010_E (BTE) with 157 records
Result of customer enhancement: 157 records
Call customer enhancement EXIT_SAPLRSAP_001 (CMOD) with 301 records
Result of customer enhancement: 157 records
Asynchronous send of data package 000001 in task 0002 (1 parallel tasks)
pl. update me if any idea.

Code For Delta Extraction Using Function Module

Dear Experts,
I want a sample code for Delta Extraction using Function Module ( If it is customized already working code very helpful ), I have already created Function Module but Full update is happening. If I give delta update again it is retrieving all records. It is very urgent, if you have please send me to the following mail ID.
[email protected]
Best Regards,
SGK.

Dear KJ,
Thank for your response. I saw the code that you sent, you have used some ztables like ZSC_DELTA_IP, ZSC_SAFETY_DELTA, ZSC_SET_EXT_TIME
What are the fields that you have created in these tables , what is use of these tables, can you send the fields that you have used in these tables.
Thanks & Regards,
SGK

ALV Tree using Function Modules

Hi,
I want a simple example of ALV Tree using Function Modules which can display multiple Columns in the Hierarchically arranged fashion along with nodes & icons.
Also should be able to handle the events.
Thanks in Advance..

Hi Ramesh,
Here is a example of alv tree
*& Report BCALV_TREE_DEMO *
report bcalv_tree_demo.
class cl_gui_column_tree definition load.
class cl_gui_cfw definition load.
data tree1 type ref to cl_gui_alv_tree.
data mr_toolbar type ref to cl_gui_toolbar.
include <icon>.
include bcalv_toolbar_event_receiver.
include bcalv_tree_event_receiver.
data: toolbar_event_receiver type ref to lcl_toolbar_event_receiver.
data: gt_sflight type sflight occurs 0, "Output-Table
 gt_fieldcatalog type lvc_t_fcat, "Fieldcatalog
 ok_code like sy-ucomm. "OK-Code
start-of-selection.
end-of-selection.
call screen 100.
*& Module PBO OUTPUT
* process before output
module pbo output.
set pf-status 'MAIN100'.
if tree1 is initial.
 perform init_tree.
endif.
call method cl_gui_cfw=>flush.
endmodule. " PBO OUTPUT
*& Module PAI INPUT
* process after input
module pai input.
case ok_code.
 when 'EXIT' or 'BACK' or 'CANC'.
 perform exit_program.
 when others.
 call method cl_gui_cfw=>dispatch.
endcase.
clear ok_code.
call method cl_gui_cfw=>flush.
endmodule. " PAI INPUT
*& Form build_fieldcatalog
* build fieldcatalog for structure sflight
form build_fieldcatalog.
* get fieldcatalog
call function 'LVC_FIELDCATALOG_MERGE'
 exporting
 i_structure_name = 'SFLIGHT'
 changing
 ct_fieldcat = gt_fieldcatalog.
* change fieldcatalog
data: ls_fieldcatalog type lvc_s_fcat.
loop at gt_fieldcatalog into ls_fieldcatalog.
 case ls_fieldcatalog-fieldname.
 when 'CARRID' or 'CONNID' or 'FLDATE'.
 ls_fieldcatalog-no_out = 'X'.
 ls_fieldcatalog-key = ''.
 when 'PRICE' or 'SEATSOCC' or 'SEATSMAX' or 'PAYMENTSUM'.
 ls_fieldcatalog-do_sum = 'X'.
 endcase.
 modify gt_fieldcatalog from ls_fieldcatalog.
endloop.
endform. " build_fieldcatalog
*& Form build_hierarchy_header
* build hierarchy-header-information
* -->P_L_HIERARCHY_HEADER strucxture for hierarchy-header
form build_hierarchy_header changing
 p_hierarchy_header type treev_hhdr.
p_hierarchy_header-heading = 'Hierarchy Header'. "#EC NOTEXT
p_hierarchy_header-tooltip =
 'This is the Hierarchy Header !'. "#EC NOTEXT
p_hierarchy_header-width = 30.
p_hierarchy_header-width_pix = ''.
endform. " build_hierarchy_header
*& Form exit_program
* free object and leave program
form exit_program.
call method tree1->free.
leave program.
endform. " exit_program
*& Form build_header
* build table for html_header
* --> p1 text
* <-- p2 text
form build_comment using
 pt_list_commentary type slis_t_listheader
 p_logo type sdydo_value.
data: ls_line type slis_listheader.
* LIST HEADING LINE: TYPE H
clear ls_line.
ls_line-typ = 'H'.
* LS_LINE-KEY: NOT USED FOR THIS TYPE
ls_line-info = 'ALV-tree-demo: flight-overview'. "#EC NOTEXT
append ls_line to pt_list_commentary.
* STATUS LINE: TYPE S
clear ls_line.
ls_line-typ = 'S'.
ls_line-key = 'valid until'. "#EC NOTEXT
ls_line-info = 'January 29 1999'. "#EC NOTEXT
append ls_line to pt_list_commentary.
ls_line-key = 'time'.
ls_line-info = '2.00 pm'. "#EC NOTEXT
append ls_line to pt_list_commentary.
* ACTION LINE: TYPE A
clear ls_line.
ls_line-typ = 'A'.
* LS_LINE-KEY: NOT USED FOR THIS TYPE
ls_line-info = 'actual data'. "#EC NOTEXT
append ls_line to pt_list_commentary.
p_logo = 'ENJOYSAP_LOGO'.
endform.
*& Form create_hierarchy
* text
* --> p1 text
* <-- p2 text
form create_hierarchy.
data: ls_sflight type sflight,
 lt_sflight type sflight occurs 0.
* get data
select * from sflight into table lt_sflight
 UP TO 200 ROWS .
sort lt_sflight by carrid connid fldate.
* add data to tree
data: l_carrid_key type lvc_nkey,
 l_connid_key type lvc_nkey,
 l_last_key type lvc_nkey.
loop at lt_sflight into ls_sflight.
 on change of ls_sflight-carrid.
 perform add_carrid_line using ls_sflight
 changing l_carrid_key.
 endon.
 on change of ls_sflight-connid.
 perform add_connid_line using ls_sflight
 l_carrid_key
 changing l_connid_key.
 endon.
 perform add_complete_line using ls_sflight
 l_connid_key
 changing l_last_key.
endloop.
* calculate totals
call method tree1->update_calculations.
* this method must be called to send the data to the frontend
call method tree1->frontend_update.
endform. " create_hierarchy
*& Form add_carrid_line
* add hierarchy-level 1 to tree
* -->P_LS_SFLIGHT sflight
* -->P_RELEATKEY relatkey
* <-->p_node_key new node-key
form add_carrid_line using ps_sflight type sflight
 p_relat_key type lvc_nkey
 changing p_node_key type lvc_nkey.
data: l_node_text type lvc_value,
 ls_sflight type sflight.
* set item-layout
data: lt_item_layout type lvc_t_layi,
 ls_item_layout type lvc_s_layi.
ls_item_layout-t_image = '@3P@'.
ls_item_layout-fieldname = tree1->c_hierarchy_column_name.
ls_item_layout-style =
 cl_gui_column_tree=>style_intensifd_critical.
append ls_item_layout to lt_item_layout.
* add node
l_node_text = ps_sflight-carrid.
call method tree1->add_node
 exporting
 i_relat_node_key = p_relat_key
 i_relationship = cl_gui_column_tree=>relat_last_child
 i_node_text = l_node_text
 is_outtab_line = ls_sflight
 it_item_layout = lt_item_layout
 importing
 e_new_node_key = p_node_key.
endform. " add_carrid_line
*& Form add_connid_line
* add hierarchy-level 2 to tree
* -->P_LS_SFLIGHT sflight
* -->P_RELEATKEY relatkey
* <-->p_node_key new node-key
form add_connid_line using ps_sflight type sflight
 p_relat_key type lvc_nkey
 changing p_node_key type lvc_nkey.
data: l_node_text type lvc_value,
 ls_sflight type sflight.
* set item-layout
data: lt_item_layout type lvc_t_layi,
 ls_item_layout type lvc_s_layi.
ls_item_layout-t_image = '@3Y@'.
ls_item_layout-style =
 cl_gui_column_tree=>style_intensified.
ls_item_layout-fieldname = tree1->c_hierarchy_column_name.
append ls_item_layout to lt_item_layout.
* add node
l_node_text = ps_sflight-connid.
call method tree1->add_node
 exporting
 i_relat_node_key = p_relat_key
 i_relationship = cl_gui_column_tree=>relat_last_child
 i_node_text = l_node_text
 is_outtab_line = ls_sflight
 it_item_layout = lt_item_layout
 importing
 e_new_node_key = p_node_key.
endform. " add_connid_line
*& Form add_cmplete_line
* add hierarchy-level 3 to tree
* -->P_LS_SFLIGHT sflight
* -->P_RELEATKEY relatkey
* <-->p_node_key new node-key
form add_complete_line using ps_sflight type sflight
 p_relat_key type lvc_nkey
 changing p_node_key type lvc_nkey.
data: l_node_text type lvc_value.
* set item-layout
data: lt_item_layout type lvc_t_layi,
 ls_item_layout type lvc_s_layi.
ls_item_layout-fieldname = tree1->c_hierarchy_column_name.
ls_item_layout-class = cl_gui_column_tree=>item_class_checkbox.
ls_item_layout-editable = 'X'.
append ls_item_layout to lt_item_layout.
l_node_text = ps_sflight-fldate.
call method tree1->add_node
 exporting
 i_relat_node_key = p_relat_key
 i_relationship = cl_gui_column_tree=>relat_last_child
 is_outtab_line = ps_sflight
 i_node_text = l_node_text
 it_item_layout = lt_item_layout
 importing
 e_new_node_key = p_node_key.
endform. " add_complete_line
*& Form register_events
* text
* --> p1 text
* <-- p2 text
form register_events.
* define the events which will be passed to the backend
data: lt_events type cntl_simple_events,
 l_event type cntl_simple_event.
* define the events which will be passed to the backend
l_event-eventid = cl_gui_column_tree=>eventid_expand_no_children.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_checkbox_change.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_header_context_men_req.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_node_context_menu_req.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_item_context_menu_req.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_header_click.
append L_EVENT to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_item_keypress.
append L_EVENT to lt_events.
call method tree1->set_registered_events
 exporting
 events = lt_events
 exceptions
 cntl_error = 1
 cntl_system_error = 2
 illegal_event_combination = 3.
if sy-subrc <> 0.
 message x208(00) with 'ERROR'. "#EC NOTEXT
endif.
* set Handler
data: l_event_receiver type ref to lcl_tree_event_receiver.
create object l_event_receiver.
set handler l_event_receiver->handle_node_ctmenu_request
 for tree1.
set handler l_event_receiver->handle_node_ctmenu_selected
 for tree1.
set handler l_event_receiver->handle_item_ctmenu_request
 for tree1.
set handler l_event_receiver->handle_item_ctmenu_selected
 for tree1.
endform. " register_events
*& Form change_toolbar
* text
* --> p1 text
* <-- p2 text
form change_toolbar.
* get toolbar control
call method tree1->get_toolbar_object
 importing
 er_toolbar = mr_toolbar.
check not mr_toolbar is initial.
* add seperator to toolbar
call method mr_toolbar->add_button
 exporting
 fcode = ''
 icon = ''
 butn_type = cntb_btype_sep
 text = ''
 quickinfo = 'This is a Seperator'. "#EC NOTEXT
* add Standard Button to toolbar (for Delete Subtree)
call method mr_toolbar->add_button
 exporting
 fcode = 'DELETE'
 icon = '@18@'
 butn_type = cntb_btype_button
 text = ''
 quickinfo = 'Delete subtree'. "#EC NOTEXT
* add Dropdown Button to toolbar (for Insert Line)
call method mr_toolbar->add_button
 exporting
 fcode = 'INSERT_LC'
 icon = '@17@'
 butn_type = cntb_btype_dropdown
 text = ''
 quickinfo = 'Insert Line'. "#EC NOTEXT
* set event-handler for toolbar-control
create object toolbar_event_receiver.
set handler toolbar_event_receiver->on_function_selected
 for mr_toolbar.
set handler toolbar_event_receiver->on_toolbar_dropdown
 for mr_toolbar.
endform. " change_toolbar
*& Form init_tree
* text
* --> p1 text
* <-- p2 text
FORM init_tree.
* create fieldcatalog for structure sflight
perform build_fieldcatalog.
* create container for alv-tree
data: l_tree_container_name(30) type c,
 l_custom_container type ref to cl_gui_custom_container.
l_tree_container_name = 'TREE1'.
if sy-batch is initial.
 create object l_custom_container
 exporting
 container_name = l_tree_container_name
 exceptions
 cntl_error = 1
 cntl_system_error = 2
 create_error = 3
 lifetime_error = 4
 lifetime_dynpro_dynpro_link = 5.
 if sy-subrc <> 0.
 message x208(00) with 'ERROR'. "#EC NOTEXT
 endif.
endif.
* create tree control
create object tree1
 exporting
 parent = l_custom_container
 node_selection_mode = cl_gui_column_tree=>node_sel_mode_single
 item_selection = 'X'
 no_html_header = ''
 no_toolbar = ''
 exceptions
 cntl_error = 1
 cntl_system_error = 2
 create_error = 3
 lifetime_error = 4
 illegal_node_selection_mode = 5
 failed = 6
 illegal_column_name = 7.
if sy-subrc <> 0.
 message x208(00) with 'ERROR'. "#EC NOTEXT
endif.
* create Hierarchy-header
data l_hierarchy_header type treev_hhdr.
perform build_hierarchy_header changing l_hierarchy_header.
* create info-table for html-header
data: lt_list_commentary type slis_t_listheader,
 l_logo type sdydo_value.
perform build_comment using
 lt_list_commentary
 l_logo.
* repid for saving variants
data: ls_variant type disvariant.
ls_variant-report = sy-repid.
* create emty tree-control
call method tree1->set_table_for_first_display
 exporting
 is_hierarchy_header = l_hierarchy_header
 it_list_commentary = lt_list_commentary
 i_logo = l_logo
 i_background_id = 'ALV_BACKGROUND'
 i_save = 'A'
 is_variant = ls_variant
 changing
 it_outtab = gt_sflight "table must be emty !!
 it_fieldcatalog = gt_fieldcatalog.
* create hierarchy
perform create_hierarchy.
* add own functioncodes to the toolbar
perform change_toolbar.
* register events
perform register_events.
* adjust column_width
call method tree1->COLUMN_OPTIMIZE.
ENDFORM. " init_tree
regards,
venu.

Why we use function module u0091SSF_FUNCTION_MODULE_NAMEu0092 in smartform driver p

Why we use function module SSF_FUNCTION_MODULE_NAME in smartform driver program?

Forum Search
Use the form below to search the forum content. You can choose to search all content or restrict it to certain forums or dates. Also, you can filter the results by a username or user ID.
Search Forum Content
Search Terms:        Search Tips
Category or Forum:
Date Range:
Results Per Page:
Welcome, Clemens Li      Help
Your Control Panel      Your Control Panel
Your Reward Points      Your Reward Points
Your Questions      Your Questions
Search Results » Messages: 271 - Search Terms: why we require form interface section in smartform?      Sort by:
Pages: 19 1 2 3 4 5 6 7 8 9 10
   1. Why we require FORM INTERFACE section in smartform?
      Posted on: Sep 12, 2007 10:47 PM, by user: p d -- Relevance: 100% -- Show all results within this thread
      Why we require FORM INTERFACE section in smartform?
   2. What is the driver program & why we require driver program?
      Posted on: Sep 12, 2007 10:48 PM, by user: p d -- Relevance: 17% -- Show all results within this thread
      What is the driver program & why we require driver program?
   3. Re: form interface in smartform
      Posted on: Feb 21, 2006 11:51 AM, by user: Hasmath -- Relevance: 14% -- Show all results within this thread
      hard-coded driver program in the tables section. for this u have to define the same structure in the form interface of the smartforms and can use the same structure for sending the data to the smartform ...
   4. Smartform: Form Interface
      Posted on: Aug 24, 2007 2:34 PM, by user: vivek pandey -- Relevance: 13% -- Show all results within this thread
      Hi, If we want to use a workarea/internaltable in the form interface of Smartform of a user defined structure ...
   5. Form Interface in Smartforms ?
      Posted on: Oct 27, 2006 5:32 PM, by user: SAP BEE -- Relevance: 12% -- Show all results within this thread
      ztest ) on the table and print the value : &gs_vbap-total&. I activate the form ...it is fine ...as well as program !! Now , when i do the print preview of the form , It gives an error : Reference ...
   6. SmartForms form interface - tables
      Posted on: May 18, 2005 2:44 PM, by user: Diliip Gupchup -- Relevance: 12% -- Show all results within this thread
      Hi All, In smart forms how to declare our internal table in form interface? By using types in global itried but it is ...
   7. Calling thru Form Interface of Smartforms
      Posted on: May 4, 2007 3:03 AM, by user: Subhasish Ganguly -- Relevance: 11% -- Show all results within this thread
      In a Smartforms, how can I call a internal table thru 'Form interface' which has been declared in the driver program? ...
   8. Form Interface in SMARTFORMS
      Posted on: Jun 1, 2006 10:56 AM, by user: Rams V -- Relevance: 11% -- Show all results within this thread
      Hi There, Is it mandatory to create a custom structure in ABAP dictionary to use it in SMARTFORM interface? regards, Rams. ...
   9. Line Types and Table types & Smartform form interface
      Posted on: Sep 21, 2005 3:38 PM, by user: Aadarsh K -- Relevance: 10% -- Show all results within this thread
      types ?? 2. In smartforms form interface, in the importing parameter, can tables be passed ?? [we use tables parameter generally, but even if passed in export parameter, no error is being given and ...
10. regarding complex section in smartforms
      Posted on: Aug 25, 2007 7:49 AM, by user: ravi -- Relevance: 10% -- Show all results within this thread
      learning smartforms on 5.0ecc and i got the documents which is showing the complex section but in 5.0 ecc we have no complex section cud u plz let me know where sud i add the contents of the complex section ...
11. why is it that some function module require an endselect
      Posted on: Aug 8, 2007 3:40 PM, by user: mathias Mbizvo -- Relevance: 10% -- Show all results within this thread
      why is it that some function module require an endselect and some can work without the endselect...
12. Complex section in smartforms
      Posted on: Aug 11, 2007 7:29 PM, by user: narendra veduru -- Relevance: 9% -- Show all results within this thread
      Hi I am practicing smartforms in 4.7. I have a tutorial based on 4.6c and they have complex section in the nodes. How do i ...
13. form interface using currency fields - smartforms urgent!!!!
      Posted on: Aug 17, 2005 1:11 AM, by user: skmysore -- Relevance: 9% -- Show all results within this thread
      called function module. what is the error here? How can i correct this to display data into the form? Please help me it is urgent!!! Thanks Santhosh ...
14. why do we activate a program
      Posted on: Feb 28, 2007 5:50 AM, by user: Rose -- Relevance: 8% -- Show all results within this thread
      hi, why do we activate a program or tables in sap.Though there is a option known as save why do we activate? ...
15. Re: what is form interface and global definitions
      Posted on: Jun 5, 2007 8:25 AM, by user: Venkatesh -- Relevance: 8% -- Show all results within this thread
      Function modules. and global definitions are the variable or tables declared with in the smartform. we can pass values to the smartform from the driver programme through the form interface. if helpful ...
Pages: 19 [ 1 2 3 4 5 6 7 8 9 10 | Next

Sending email and alert notifcation using function module

Similar Messages

Maybe you are looking for