Ads

SAP ABAP Program to Send IDOC

-

SAP ABAP Program to Send IDOC

This is the SAP ABAP Program to send custom Idoc ,it useful for SAP ABAP Developers who are developing idocs .  


*&---------------------------------------------------------------------*
*& Report  ZIDOC_PROGRAM
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  ZIDOC_PROGRAM.

types : begin of zidoc_table,
       zid type zid,
       zname type znname2,
     zcity type zcity,

   END OF zidoc_table.

DATA :it_zidoc type TABLE OF zidoc_table,
      wa_zidoc type zidoc_table,
      s_segment type zidoc_segment,

      it_ddic type TABLE OF edidc,
      wa_ddic type edidc,

      it_eddis type TABLE OF edids,
      wa_eddis type edids,
      it_eddid type TABLE OF edidd,
      wa_eddid type edidd.

 CONSTANTS : c_zseg like edidd-segnam VALUE 'zidoc_segment'.
*SELECTION-SCREEN :

      select-OPTIONS : s_zid for wa_zidoc-zid.

      PARAMETERS : p_mestyp type edidc-mestyp,

                    p_prtnr type edidc-rcvprt,
                    p_ddidc type edidc-idoctp,
                   p_lgsys type edidc-rcvprn,
                   p_port type edidc-rcvpor,
                   p_sndsys type edidc-sndprn,
                   p_sndprt type edidc-sndprt.



     perform generate_datarecords.
     perform generate_controlrecords.
     perform send_idoc.
*&---------------------------------------------------------------------*
*&      Form  GENERATE_DATARECORDS
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM GENERATE_DATARECORDS .
select zid zname zcity from zidoc_table into table it_zidoc where zid in s_zid.
  PERFORM arrange-datarecords.
ENDFORM.                    " GENERATE_DATARECORDS
*&---------------------------------------------------------------------*
*&      Form  GENERATE_CONTROLRECORDS
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM GENERATE_CONTROLRECORDS .

  wa_ddic-rcvpor = p_port.
  wa_ddic-mestyp = p_mestyp.
  wa_ddic-idoctp = p_ddidc.
  wa_ddic-rcvprt =   p_prtnr.
  wa_ddic-rcvprn =    p_lgsys.
 wa_ddic-sndprt = p_sndprt.
  wa_ddic-sndprn =  p_sndsys.

ENDFORM.                    " GENERATE_CONTROLRECORDS
*&---------------------------------------------------------------------*
*&      Form  SEND_IDOC
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM SEND_IDOC .
   CALL FUNCTION 'MASTER_IDOC_DISTRIBUTE'
     EXPORTING
       MASTER_IDOC_CONTROL                  = wa_ddic
*      OBJ_TYPE                             = ''
*      CHNUM                                = ''
     TABLES
       COMMUNICATION_IDOC_CONTROL           = it_ddic
       MASTER_IDOC_DATA                     = it_eddid
*    EXCEPTIONS
*      ERROR_IN_IDOC_CONTROL                = 1
*      ERROR_WRITING_IDOC_STATUS            = 2
*      ERROR_IN_IDOC_DATA                   = 3
*      SENDING_LOGICAL_SYSTEM_UNKNOWN       = 4
*      OTHERS                               = 5
             .
   IF SY-SUBRC <> 0.
* Implement suitable error handling here
   ENDIF.

ENDFORM.                    " SEND_IDOC
*&---------------------------------------------------------------------*
*&      Form  ARRANGE-DATARECORDS
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM ARRANGE-DATARECORDS .
loop at it_zidoc INTO wa_zidoc.

      s_segment-zid = wa_zidoc-zid.
      s_segment-zname = wa_zidoc-zname.
      s_segment-zcity = wa_zidoc-zcity.

   wa_eddid-segnam = c_zseg.
   wa_eddid-sdata = s_segment.

   append wa_eddid to it_eddid.
   clear wa_eddid.
   endloop.


ENDFORM.                    " ARRANGE-DATARECORDS

Comments

Post a Comment

Popular posts from this blog

BADI Interview Questions in SAP ABAP

-
BADI Interview Questions in SAP ABAP A BAdI is an object-oriented enhancement option, which makes it the most sophisticated enhancement type. The main characteristic of a BAdI is that it provides a mechanism to change the functionality of a well-defined business function without making changes to the delivered source code. Future upgrades of the original business function can be applied without losing the customer-specific enhancements or the need to merge the changes.  If you want to become a professional and technical blogger practically, read these real-world practical SAP ABAP books . These books will help you to become a more flexible coding developer in future SAP technology. What is a BADI in SAP? BADI (Business Add-In) is a new SAP Object Oriented enhancement technique that is used to add our own business functionality to the existing SAP standard functionality.  BADI follows the Object-Oriented approach to make them reusable. A BADI can be used any number of times
Read more

Sample SAP ABAP Programming Examples for Practice

-
Sample SAP ABAP Programming Examples for Practice Are you a beginner at ABAP Language, you're looking for example programs for practice. Here I collected some sample programs from various objects in ABAP that are useful for beginners to improve their Technical skills. To familiar with coding and ABAP applications, you must be practice all applications. As per my experience, practice makes you perfect, as a technical consultant, should be ready to develop any object based on the need of the client, then only, we will get appreciation from the client and from our team side and it helps us to develop complex objects in SAP. ABAP Syntax ABAP Statements ABAP Program Types SAP ABAP Workbench Tools SAP Modules SAP Transaction Codes SAP Tables SAP ABAP Hello world Program Example ABAP- Simple ALV report Example ABAP- Interactive ALV Report Example ABAP- BDC Call Transaction Method Programming ABAP- BDC Session Method Programming Example ABAP- Smartforms
Read more

Module Pool Programming Interview Questions and Answers in SAP ABAP

-
Module Pool Programming(Dialog Programming)  Interview Questions and Answers in SAP ABAP As an ABAP Consultant, you should be strong in Module pool programming techniques as well as when you face the real-time or fresher interview, Questions, and answers to test your talent to select for the interview. For that purpose, I am sharing my interview experiences in which I faced the most of the times on these topics that are at exit command, events difference between set screen and call screen difference between call screen and set screen in module pool,chain-end chain in module pool. What is the transaction code for the screen painter? SE51. What is the transaction code for Menu painter? SE41. What is the transaction code for the screen painter? SE93. What are the main components of dialog programs? Screens Module pools Subroutines Menus Transactions What is Screen flow Logic? The screen flow logic is like an ABAP program in that it serves as a
Read more

Step by Step tutorial on BDC Session Method Program in SAP ABAP

-
Image
Step by Step tutorial on BDC Session Method Program in SAP ABAP BDC Session Method is used to upload data from Non-SAP to SAP System. Using Session method, we can transfer data through more than one Transaction, Unlike BDC Call Transaction Method Program . We are Processing Batch input Session From SM35 Transaction Code. Session method. 1) synchronous processing. 2) can transfer a large amount of data. 3) processing is slower. 4) error log is created 5) data is not updated until the session is processed. Call transaction Method. 1) asynchronous processing 2) can transfer a small amount of data 3) processing is faster. 4) errors need to be handled explicitly 5) data is updated automatically Go to SHDB and Press Enter Click on New Recording Button and Give the zrecord1 name and enter transaction code MM01 and click on the Start recording button. The system goes to the Create material screen, there give the industry sector and material type and selects ba
Read more

SAP ABAP Interview Questions and Answers for 10 Years Experienced

-
SAP ABAP Interview Questions and Answers for 10 Years Experienced This post will helpful for SAP ABAP experienced candidates who may have 3,4 5, 6,7, and 10 years of experience, all of them can be follow this interview pattern for their successful interview.  SAP Data Dictionary Realtime Interview Questions SAP BDC Realtime Interview Questions SAP ALV Reports  Real-time Interview Questions Module Pool Interview Questions SAP Smartforms Realtime Interview Questions SAP BADI Realtime Interview Questions SAP BAPI Realtime Interview Questions SAP  IDOC Realtime Interview Questions ABAP Check and Value Table Questions SAP SD MM FICO Flow Interview Questions SAP OOPs Realtime Interview Questions SAP OOPs Part One  Real-time Interview Questions SAP OOPs Part two Real time Interview Questions SAP OOPs Part three Realtime Interview Questions SAP OOPs Part four Realtime Interview Questions ABAP  Realtime Interview Questio
Read more