MEDRUCK modification

[Former Member]

hi,

while modifying sapscript MEDRUCK i want to add email id of the contact person in the form that is in the vendor adress

how can i do this

regards,

siri.

Message was edited by:

sireesha yalamanchili

Message was edited by:

sireesha yalamanchili

[Former Member · Accepted solution]

Hi

U need to read the table ADR6 to find out the mail address.

Max

[Former Member · Accepted solution]

thank you,

could you please explain me how to modify this medruck form then

by adding the emailid

and i need to add add client logo also

and how to configure the form to bring the changes into effect

please explain if i need to do something with NACE tcode

regards,

siri.

Message was edited by:

sireesha yalamanchili

[Former Member · Accepted solution]

1) copy the form intio z form do the changes.

2) in NACE assiegn ur form in output type NEU

[Former Member · Accepted solution]

Hi

These should be the steps to be done:

- Create a new form ZMEDRUCK as copy of MEDRUCK

- Change the window where the e-mail id has to be placed in this way:

---> Routine to search the mail id (without to change the main program)

/: PERFORM SEARCH_MAIL IN PROGRAM Z<PROGRAM>
/:               USING           &LFA1-ADRNR&
/:               CHANGING    &ADR6-SMTP_ADDR&

---> Print mail id

• &ADR6-SMTP_ADDR&

- Create the program Z<PROGRAM> and insert the routine SEARCH_MAIL:

FORM SEARCH_MAIL TABLES IN_TAB TRUCTURE ITCSY
                       OUT_TAB STRUCTURE ITCSY.

   READ TABLE IN_TAB WITH KEY NAME = 'LFA1-ADRNR'.
   IF SY-SUBRC = 0.
      CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
         EXPORTING
             INPUT = IN_TAB-VALUE
         IMPORTING
             OUTPUT = _ADRNR.
      SELECT * FROM ADR6 WHERE ADDRNUMBER = _ADRN.
            EXIT.
      ENDSELECT.
      READ TABLE OUT_TAB WITH KEY NAME = 'ADR6-SMTP_ADDR'.
      IF SY-SUBRC = 0.
        OUT_TAB-VALUE = ADR6-SMTP_ADDR.
        MODIFY OUT_TAB INDEX SY-TABIX.
      ENDIF.
   ENDIF.
ENDFORM.

- Create a new window where it places the logo.

- Replace the new form ZMEDURCK instead of MEDRUCK by NACE trx

Max