Recapturing footage outputted through Adobe

Back in the day, when I used to export 24p widescreen footage off of CS3 through firewire (export to tape) onto a mini dv tape, it played fine and still does. But for some reason it won't let me recapture it without playing back scrambled or sometimes playing fine, but with no audio. There's always a reason that I can't capture it off of tape like I could if it were dailies from a fresh shoot. Any ideas? Thank you.

The computer I have now is a core i7 with 12 gigs ram, 5850 graphics, capturing through firewire off of a Panasonic GS120 - same camera I outputted to - the original camera the material was shot on was a DVX100A, but this has been happening with all my computers (PC) with CS2,3, 4 as well as now CS5. The material will play fine on the camera, but I can't capture it due to unstable video or no audio after capture.
Now I just went MAC for my work notebook and I was able to capture the material easily through Adobe capturing to mov files, but my editing computer is the HP with the above specs. Very frustrating. Shot material fine, but outputting to tape witll not input back in.

Similar Messages

Printing ALV Report output through Function Modules

Hi All,
I want to print my ALV Grid output through function modules/statement (not through print option in menu).
This is because, i am generating a PDF from spool when user clicks on a button. If any changes happened in the ALV output layout, they will be captured in spool through printing it.
So can you please tell me how to print the ALV Output through FMs or sending the ALV output to spool.
Thanks & Regards,
Senthil.
Edited by: senthil nathan on May 17, 2010 2:49 PM

Hi Dev,
Thanks for the reply.
I want to print the ALV when the user clicks on a button in toolbar. Lets say the user has made some changes to the layout, (E.g hiding a field) and when i print that output it should use the changed layout, If i use the FM suggested by you, i cant acheive this.
If you try to print this manually, the system uses the changed layout and not the original. Thats why i want to know FMs/statement to print.
Regards,
Senthil.

Unable to send emails through adobe offline project.

Hi Experts!!!
 I am trying to send an email through Adobe Offline Form. I am quoting the code. Plz check what's the problem with the code.
// This file has been generated partially by the Web Dynpro Code Generator.
// MODIFY CODE ONLY IN SECTIONS ENCLOSED BY @@begin AND @@end.
// ALL OTHER CHANGES WILL BE LOST IF THE FILE IS REGENERATED.
package com.lifecyclelettersapplication;
// IMPORTANT NOTE:
// ALL IMPORT STATEMENTS MUST BE PLACED IN THE FOLLOWING SECTION ENCLOSED
// BY @@begin imports AND @@end. FURTHERMORE, THIS SECTION MUST ALWAYS CONTAIN
// AT LEAST ONE IMPORT STATEMENT (E.G. THAT FOR IPrivateFormView).
// OTHERWISE, USING THE ECLIPSE FUNCTION "Organize Imports" FOLLOWED BY
// A WEB DYNPRO CODE GENERATION (E.G. PROJECT BUILD) WILL RESULT IN THE LOSS
// OF IMPORT STATEMENTS.
//@@begin imports
import java.util.Properties;
import javax.mail.Address;
import javax.mail.BodyPart;
import javax.mail.Message;
import javax.mail.MessagingException;
import javax.mail.SendFailedException;
import javax.mail.Session;
import javax.mail.Transport;
import javax.mail.internet.AddressException;
import javax.mail.internet.InternetAddress;
import javax.mail.internet.MimeBodyPart;
import javax.mail.internet.MimeMessage;
import javax.mail.internet.MimeMultipart;
import com.lifecyclelettersapplication.wdp.IPrivateFormView;
//@@end
//@@begin documentation
//@@end
public class FormView
Logging location.
private static final com.sap.tc.logging.Location logger =
 com.sap.tc.logging.Location.getLocation(FormView.class);
static
 //@@begin id
 String id = "$Id$";
 //@@end
 com.sap.tc.logging.Location.getLocation("ID.com.sap.tc.webdynpro").infoT(id);
Private access to the generated Web Dynpro counterpart
for this controller class. 
Use <code>wdThis</code> to gain typed access to the context,
to trigger navigation via outbound plugs, to get and enable/disable
actions, fire declared events, and access used controllers and/or
component usages.
@see com.lifecyclelettersapplication.wdp.IPrivateFormView for more details
private final IPrivateFormView wdThis;
Root node of this controller's context. 
Provides typed access not only to the elements of the root node
but also to all nodes in the context (methods nodeXYZ())
and their currently selected element (methods currentXYZElement()).
It also facilitates the creation of new elements for all nodes
(methods createXYZElement()). 
@see com.lifecyclelettersapplication.wdp.IPrivateFormView.IContextNode for more details.
private final IPrivateFormView.IContextNode wdContext;
A shortcut for <code>wdThis.wdGetAPI()</code>. 
Represents the generic API of the generic Web Dynpro counterpart
for this controller. 
private final com.sap.tc.webdynpro.progmodel.api.IWDViewController wdControllerAPI;
A shortcut for <code>wdThis.wdGetAPI().getComponent()</code>. 
Represents the generic API of the Web Dynpro component this controller
belongs to. Can be used to access the message manager, the window manager,
to add/remove event handlers and so on. 
private final com.sap.tc.webdynpro.progmodel.api.IWDComponent wdComponentAPI;
public FormView(IPrivateFormView wdThis)
 this.wdThis = wdThis;
 this.wdContext = wdThis.wdGetContext();
 this.wdControllerAPI = wdThis.wdGetAPI();
 this.wdComponentAPI = wdThis.wdGetAPI().getComponent();
//@@begin javadoc:wdDoInit()
/** Hook method called to initialize controller. */
//@@end
public void wdDoInit()
 //@@begin wdDoInit()
 /* The following lines initialize the context elements;
Enter your e-mail id in the set From-method
 //wdContext.currentContextElement().setTeststatus(" do in it");
 try{
 wdContext.currentEmailElement().setFrom("[email protected]");
 wdContext.currentEmailElement().setTo("[email protected]");
 wdContext.currentEmailElement().setCc("[email protected]");
 wdContext.currentEmailElement().setBcc("[email protected]");
// wdContext.currentEmailElement().setCc(" ");
// wdContext.currentEmailElement().setBcc(" ");
 wdContext.currentEmailElement().setSubject("Test Mail By Umang");
 wdContext.currentEmailElement().setBody("You will find the address proof letter in the attachment of this e mail. Please sign this form and send it.");
 catch(Exception e)
 wdContext.currentContextElement().setTeststatus("do in it"+e.getMessage());
 //@@end
//@@begin javadoc:wdDoExit()
/** Hook method called to clean up controller. */
//@@end
public void wdDoExit()
 //@@begin wdDoExit()
 //@@end
//@@begin javadoc:wdDoModifyView
Hook method called to modify a view just before rendering.
This method conceptually belongs to the view itself, not to the
controller (cf. MVC pattern).
It is made static to discourage a way of programming that
routinely stores references to UI elements in instance fields
for access by the view controller's event handlers, and so on.
The Web Dynpro programming model recommends that UI elements can
only be accessed by code executed within the call to this hook method.
@param wdThis Generated private interface of the view's controller, as
 provided by Web Dynpro. Provides access to the view controller's
 outgoing controller usages, etc.
@param wdContext Generated interface of the view's context, as provided
 by Web Dynpro. Provides access to the view's data.
@param view The view's generic API, as provided by Web Dynpro.
 Provides access to UI elements.
@param firstTime Indicates whether the hook is called for the first time
 during the lifetime of the view.
//@@end
public static void wdDoModifyView(IPrivateFormView wdThis, IPrivateFormView.IContextNode wdContext, com.sap.tc.webdynpro.progmodel.api.IWDView view, boolean firstTime)
 //@@begin wdDoModifyView
 //@@end
//@@begin javadoc:onPlugFromFirstview(ServerEvent)
/** Declared validating event handler. */
//@@end
public void onPlugFromFirstview(com.sap.tc.webdynpro.progmodel.api.IWDCustomEvent wdEvent )
 //@@begin onPlugFromFirstview(ServerEvent)
 wdContext.currentContextElement().setTeststatus("from first view");
 //wdDoInit();
 //@@end
//@@begin javadoc:onActionBack(ServerEvent)
/** Declared validating event handler. */
//@@end
public void onActionBack(com.sap.tc.webdynpro.progmodel.api.IWDCustomEvent wdEvent )
 //@@begin onActionBack(ServerEvent)
 wdThis.wdFirePlugToFirstView();
 //@@end
//@@begin javadoc:onActionSend(ServerEvent)
/** Declared validating event handler. */
//@@end
public void onActionSend(com.sap.tc.webdynpro.progmodel.api.IWDCustomEvent wdEvent )
 //@@begin onActionSend(ServerEvent)
 Properties props = new Properties();
 String host = "rmail070.zmail.ril.com";
 props.put("rmail070.zmail.ril.com", host);
 Session session = Session.getInstance(props, null);
 MimeMessage message = new MimeMessage(session);
 Address toAddress = new InternetAddress();
 Address fromAddress = new InternetAddress();
 Address ccAddress = new InternetAddress();
 Address bccAddress = new InternetAddress();
 wdContext.currentContextElement().setTeststatus("1");
 try
 MimeMultipart multipart = new MimeMultipart();
 wdContext.currentContextElement().setTeststatus("2");
 BodyPart messageBodyPart = new MimeBodyPart();
 if (! wdContext.currentEmailElement().getFrom().equals(""))
 fromAddress = new InternetAddress(wdContext.currentEmailElement().getFrom());
 message.setFrom(fromAddress);
 wdContext.currentContextElement().setTeststatus("3");
 if (! wdContext.currentEmailElement().getTo().equals(""))
 toAddress = new InternetAddress(wdContext.currentEmailElement().getTo());
 message.setRecipient(Message.RecipientType.TO, toAddress);
 wdContext.currentContextElement().setTeststatus("4");
 if (! wdContext.currentEmailElement().getCc().equals(""))
 ccAddress = new InternetAddress(wdContext.currentEmailElement().getCc());
 message.setRecipient(Message.RecipientType.CC, ccAddress);
 wdContext.currentContextElement().setTeststatus("5");
 if (! wdContext.currentEmailElement().getBcc().equals(""))
 bccAddress = new InternetAddress(wdContext.currentEmailElement().getBcc());
 message.setRecipient(Message.RecipientType.BCC, bccAddress);
 wdContext.currentContextElement().setTeststatus("6");
 if (! wdContext.currentEmailElement().getSubject().equals(""))
 message.setSubject(wdContext.currentEmailElement().getSubject());
 wdContext.currentContextElement().setTeststatus("7");
 if (! wdContext.currentEmailElement().getBody().equals(""))
 messageBodyPart.setText(wdContext.currentEmailElement().getBody());
 wdContext.currentContextElement().setTeststatus("8");
 multipart.addBodyPart(messageBodyPart);
 wdContext.currentContextElement().setTeststatus("10");
//// A new part will be added this will be the attachment
 messageBodyPart = new MimeBodyPart();
// String filename = "temp
webdynpro
web
local
LifeCycleLetters
Components
com.lifecyclelettersapplication.LifeCycleLettersApplication
LifeCycle.pdf";
// DataSource source = new FileDataSource(filename);
// messageBodyPart.setDataHandler(new DataHandler(source));
// messageBodyPart.setFileName(source.getName());
// messageBodyPart.setHeader("Content-Type","application/pdf");
// multipart.addBodyPart(messageBodyPart);
 message.setContent(multipart);
 Transport.send(message);
 wdContext.currentContextElement().setTeststatus("11");
 catch (AddressException e)
 wdComponentAPI.getMessageManager().reportWarning(e.getLocalizedMessage());
 e.printStackTrace();
 catch (SendFailedException e)
 wdComponentAPI.getMessageManager().reportWarning(e.getLocalizedMessage());
 e.printStackTrace();
 catch (MessagingException e)
 wdComponentAPI.getMessageManager().reportWarning(e.getLocalizedMessage());
 e.printStackTrace();
 catch(Exception e)
 wdContext.currentContextElement().setTeststatus("action send"+e.getMessage());
 //@@end
The following code section can be used for any Java code that is
not to be visible to other controllers/views or that contains constructs
currently not supported directly by Web Dynpro (such as inner classes or
member variables etc.). 
Note: The content of this section is in no way managed/controlled
by the Web Dynpro Designtime or the Web Dynpro Runtime.
//@@begin others
//@@end

Hi,
I think u need to set up the SMTP So that u can send the email.
Regards
Mustafa.

I am unable to print a pdf from a website through Adobe Reader on my mac. It keeps telling me that no pages have been selected

I am unable to print a pdf from a website through Adobe Reader on my mac. It keeps telling me that no pages have been selected - I have uploaded the latest version of Adobe with no luck and have never had this issue before !

Hi bengaunt ,
Thank you for posting on the Adobe forums, you can try printing as an image.
Open the file>Print>advanced>check the box "print as an image" OK
Thanks,
Vikrantt Singh

Error while sending PO output through mail in PDF format - Urgent

Dear friends,
Developed program to send sapscript output through mail in pdf format, the program running properly, even function module SO_NEW_DOCUMENT_ATT_SEND_API1 returning sy-subrc 0. But the external mail is not going to user lying in SAP outbox with message "Wait for communications service" . SCOT is properly configured, tested mails sending through SAP office.
Find below the source code:
REPORT zmm_porder_gm
 NO STANDARD PAGE HEADING.
TABLES: ekko, ekpa, t161t, t052, komv, j_1imocomp, t001, esll.
Internal Tables
DATA : txt LIKE tline-tdline, "HEADER LINE
 your_ref LIKE ekko-ihrez, "your ref
 our_ref LIKE ekko-unsez, "our ref
 mcompname LIKE t001-butxt,
 itemname LIKE ekpo-txz01,
 del_text LIKE tline-tdline, "delivery text
 mat_po_text LIKE tline-tdline. "material po text
DATA: g_ind TYPE i.
DATA: it_esll LIKE esll OCCURS 0 WITH HEADER LINE.
DATA: sub_packno LIKE esll-sub_packno.
DATA : po_flag(1) TYPE c.
DATA : it_erev LIKE erev OCCURS 0 WITH HEADER LINE.
DATA : nmebeln LIKE thead-tdname,
 obj LIKE thead-tdname.
DATA : tline LIKE tline OCCURS 0 WITH HEADER LINE. "HEADER TEXT
DATA : it_ekko LIKE ekko OCCURS 0 WITH HEADER LINE.
DATA : it_ekpo LIKE ekpo OCCURS 0 WITH HEADER LINE.
DATA : it_zmm_porder LIKE zmm_porder OCCURS 0 WITH HEADER LINE.
DATA : it_konv LIKE konv OCCURS 0 WITH HEADER LINE.
DATA : it_konv_ftr LIKE konv OCCURS 0 WITH HEADER LINE.
DATA : it_konv_rate LIKE konv OCCURS 0 WITH HEADER LINE.
DATA : it_komv_tax LIKE komv OCCURS 0 WITH HEADER LINE. " For Tax Calculation
DATA : it_zmm_house_bank LIKE zmm_house_bank OCCURS 0 WITH HEADER LINE.
*DATA : mrate TYPE konv-kbetr VALUE 0, mrate1(15). rmoved by ganes and added following logic
DATA : mrate TYPE p VALUE 0 DECIMALS 2, mrate1(15).
DATA : mrate_gm TYPE p DECIMALS 2.
DATA : BEGIN OF it_konv1 OCCURS 0,
 knumv LIKE konv-knumv,
 kschl LIKE konv-kschl,
END OF it_konv1.
DATA : BEGIN OF it_t052u OCCURS 0.
 INCLUDE STRUCTURE t052u.
DATA : END OF it_t052u.
DATA : mpay_terms LIKE t052u-text1.
DATA : mwaers LIKE konv-waers.
DATA : BEGIN OF xt052 OCCURS 0.
 INCLUDE STRUCTURE t052.
DATA : END OF xt052.
DATA : it_t16ct LIKE t16ct OCCURS 0 WITH HEADER LINE.
DATA : BEGIN OF ztext OCCURS 0.
 INCLUDE STRUCTURE ttext.
DATA : END OF ztext.
DATA : it_t001 LIKE t001 OCCURS 0 WITH HEADER LINE.
DATA : mtext(15) TYPE c.
DATA : it_adrc LIKE adrc OCCURS 0 WITH HEADER LINE.
DATA : it_adrc_ven LIKE adrc OCCURS 0 WITH HEADER LINE.
DATA : it_adrc_plt LIKE adrc OCCURS 0 WITH HEADER LINE.
DATA : it_makt LIKE makt OCCURS 0 WITH HEADER LINE.
DATA : it_eket LIKE eket OCCURS 0 WITH HEADER LINE. " Schedulling
DATA : it_eikp LIKE eikp OCCURS 0 WITH HEADER LINE. " Export
DATA : it_t001w LIKE t001w OCCURS 0 WITH HEADER LINE.
DATA : it_t685t LIKE t685t OCCURS 0 WITH HEADER LINE.
DATA : it_t618t LIKE t618t OCCURS 0 WITH HEADER LINE.
DATA : it_t685t_ftr LIKE t685t OCCURS 0 WITH HEADER LINE.
DATA : it_lfa1 LIKE lfa1 OCCURS 0 WITH HEADER LINE.
DATA : it_bapi_mltx_ga LIKE bapi_mltx_ga OCCURS 0 WITH HEADER LINE. "Material long text
DATA : mfirst TYPE i VALUE 0,
 mpay_flag(1) TYPE c VALUE 'X',
 mwerks LIKE t001w-werks,
 msr TYPE i VALUE 0,
 l_rate TYPE p DECIMALS 2 VALUE 0,
 l_amt TYPE p DECIMALS 2 VALUE 0,
 mflag(1) TYPE c,
 mlctr TYPE i VALUE 0,
 mfamt TYPE p DECIMALS 2 VALUE 0,
 mcfamt(15) TYPE c,
 mfword(100) TYPE c,
 mkschl LIKE konv-kschl,
 mchgamt TYPE p DECIMALS 2 VALUE 0,
 mkbetr TYPE p DECIMALS 2 VALUE 0,
 mkwert TYPE p DECIMALS 2 VALUE 0.
DATA : j_1iexcd TYPE j_1imocomp-j_1iexcd,
 j_1icstno TYPE j_1imocomp-j_1icstno,
 j_1ilstno TYPE j_1imocomp-j_1ilstno.
DATA : mjmop_r TYPE p DECIMALS 2 VALUE 0,
 mjmoq_r TYPE p DECIMALS 2 VALUE 0,
 mjecs_r TYPE p DECIMALS 2 VALUE 0,
 mjvcs_r TYPE p DECIMALS 2 VALUE 0,
 mjvrd_r TYPE p DECIMALS 2 VALUE 0,
 mjsep_r TYPE p DECIMALS 2 VALUE 0.
DATA : mjmop_a TYPE p DECIMALS 2 VALUE 0,
 mjmoq_a TYPE p DECIMALS 2 VALUE 0,
 mjecs_a TYPE p DECIMALS 2 VALUE 0,
 mjvcs_a TYPE p DECIMALS 2 VALUE 0,
 mjvrd_a TYPE p DECIMALS 2 VALUE 0,
 mjsep_a TYPE p DECIMALS 2 VALUE 0.
DATA : mtitle LIKE t161t-batxt.
DATA : no_ammend(10),request_by(50),ver_txt(100),ver_reason(100),stext(200).
begin of Email data declarations**************
DATA: BEGIN OF otf OCCURS 0.
 INCLUDE STRUCTURE itcoo .
DATA: END OF otf.
DATA: itcpo LIKE itcpo.
DATA: itcpp LIKE itcpp.
DATA: it_docs TYPE STANDARD TABLE OF docs,
 v_bin_filesize TYPE i,
 it_lines TYPE STANDARD TABLE OF tline,
 wa_lines TYPE tline.
DATA : i_pdf LIKE tline OCCURS 1000 WITH HEADER LINE,
v_pdf_bytecount TYPE i,
v_pdf_spoolid TYPE tsp01-rqident,
v_otf_pagecount TYPE i,
v_btc_jobname TYPE tbtcjob-jobname,
v_btc_jobcount TYPE tbtcjob-jobcount.
DATA: objpack LIKE sopcklsti1 OCCURS 0 WITH HEADER LINE.
DATA: objhead LIKE solisti1 OCCURS 1 WITH HEADER LINE.
DATA: objbin LIKE solisti1 OCCURS 0 WITH HEADER LINE.
DATA: objtxt LIKE solisti1 OCCURS 10 WITH HEADER LINE.
DATA: reclist LIKE somlreci1 OCCURS 0 WITH HEADER LINE.
DATA: doc_chng LIKE sodocchgi1.
DATA: tab_lines LIKE sy-tabix.
DATA: vafilename(100) VALUE 'po_output.pdf'.
DATA: jobdata TYPE sxjobdata.
DATA arc_params TYPE arc_params.
DATA print_params TYPE pri_params.
DATA g_send_prog TYPE syrepid VALUE 'ZVF03_TEST_PROG'.
DATA immediate TYPE btcchar1.
DATA: i_jobname TYPE tbtcp-jobname,
i_jobcount TYPE tbtcp-jobcount,
i_jobstepcount TYPE tbtcp-stepcount.
DATA recipient_obj LIKE swotobjid.
CONSTANTS: sx_true TYPE sx_boolean VALUE 'X'.
TABLES: tbtcp.
end of Email data declarations**************
SELECTION-SCREEN : BEGIN OF BLOCK block1 WITH FRAME TITLE text-001.
SELECT-OPTIONS : mebeln FOR ekko-ebeln OBLIGATORY . " 75
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN POSITION 12.
SELECTION-SCREEN COMMENT (20) text-b01.
PARAMETERS: b1 AS CHECKBOX DEFAULT 'X'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN : END OF BLOCK block1.
SELECTION-SCREEN: BEGIN OF SCREEN 200 TITLE text-001 AS WINDOW.
PARAMETERS : p_email TYPE ad_smtpadr. "E-Mail Address
SELECTION-SCREEN: END OF SCREEN 200.
INITIALIZATION.
SET PF-STATUS 'ZMMPORD_STAT'.
AT SELECTION-SCREEN.
CASE sy-ucomm.
 WHEN 'EMAIL'.
 PERFORM zemail.
 WHEN '&IC1'.
 PERFORM load_data.
 PERFORM process.
 IF NOT p_email IS INITIAL.
 PERFORM send_mail.
 ENDIF.
ENDCASE.
*START-OF-SELECTION.
PERFORM load_data.
PERFORM process.
FORM load_data .
DATA : gindex LIKE sy-tabix.
SELECT * FROM t16ct INTO TABLE it_t16ct WHERE spras = 'EN'.
SELECT * FROM ekko INTO TABLE it_ekko WHERE ebeln IN mebeln.
IF sy-subrc EQ 0.
 SELECT * FROM erev INTO CORRESPONDING FIELDS OF TABLE it_erev FOR ALL ENTRIES IN it_ekko
 WHERE edokn = it_ekko-ebeln AND rscod <> '' .
 SORT it_erev BY edokn revno DESCENDING.
 LOOP AT it_ekko.
 IF NOT ( it_ekko-frgke EQ 'O' OR it_ekko-frgke EQ '0' ) .
 MESSAGE e000(zsd) WITH 'Purchase Order is not Realeased'.
 ENDIF.
 ENDLOOP.
 SELECT * FROM ekpo INTO TABLE it_ekpo WHERE ebeln IN mebeln.
 IF sy-subrc EQ 0.
 SELECT * INTO TABLE it_makt
 FROM makt
 FOR ALL ENTRIES IN it_ekpo
 WHERE matnr EQ it_ekpo-matnr.
 SELECT * INTO TABLE it_lfa1
 FROM lfa1
 FOR ALL ENTRIES IN it_ekko
 WHERE lifnr EQ it_ekko-lifnr.
 ENDIF.
 SELECT *
 INTO TABLE it_t052u
 FROM t052u
 FOR ALL ENTRIES IN it_ekko
 WHERE zterm EQ it_ekko-zterm
 AND spras EQ 'EN'.
 IF sy-subrc EQ 0.
 SORT it_t052u BY zterm.
 ENDIF.
 SELECT * FROM eket INTO TABLE it_eket WHERE ebeln IN mebeln.
 IF sy-subrc EQ 0.
 SORT it_eket BY ebeln ebelp.
 ENDIF.
 SELECT *
 INTO TABLE it_eikp
 FROM eikp
 FOR ALL ENTRIES IN it_ekko
 WHERE exnum EQ it_ekko-exnum.
 IF sy-subrc EQ 0.
 SORT it_eikp BY exnum.
 SELECT *
 INTO TABLE it_t618t
 FROM t618t
 FOR ALL ENTRIES IN it_eikp
 WHERE expvz EQ it_eikp-expvz
 AND spras EQ 'E'
 AND land1 EQ 'IN'.
 IF sy-subrc EQ 0.
 SORT it_t618t BY expvz.
 ENDIF.
 ENDIF.
 REFRESH : it_zmm_porder.
 CLEAR : it_zmm_porder.
 SELECT * INTO TABLE it_zmm_porder
 FROM zmm_porder
 WHERE flag EQ 'L'.
 IF sy-subrc EQ 0.
 SORT it_zmm_porder BY kschl.
 ENDIF.
 SELECT * FROM konv INTO TABLE it_konv
 FOR ALL ENTRIES IN it_ekko
 WHERE knumv = it_ekko-knumv
 AND kwert NE 0.
 LOOP AT it_konv.
 gindex = sy-tabix.
 READ TABLE it_zmm_porder WITH KEY kschl = it_konv-kschl BINARY SEARCH.
 IF sy-subrc NE 0.
 DELETE it_konv INDEX gindex.
 ENDIF.
 ENDLOOP.
 IF sy-subrc EQ 0.
 SORT it_konv BY knumv kherk kschl.
 ENDIF.
 REFRESH : it_zmm_porder.
 CLEAR : it_zmm_porder.
 SELECT * INTO TABLE it_zmm_porder
 FROM zmm_porder
 WHERE flag EQ 'F'.
 IF sy-subrc EQ 0.
 SORT it_zmm_porder BY kschl.
 ENDIF.
 SELECT * INTO TABLE IT_KONV_FTR FROM KONV
 FOR ALL ENTRIES IN IT_EKKO
 WHERE KNUMV = IT_EKKO-KNUMV
 AND ( KSCHL = 'ZIN1'
 OR KSCHL = 'ZIN2'
 OR KSCHL = 'ZINS'
 OR KSCHL = 'ZPF1'
 OR KSCHL = 'ZPF2'
 OR KSCHL = 'ZPF3'
 OR KSCHL = 'ZPKG'
 OR KSCHL = 'ZPKF'
 OR KSCHL = 'FRA1'
 OR KSCHL = 'FRB1'
 OR KSCHL = 'FRC1'
 OR KSCHL = 'FRD1'
 OR KSCHL = 'FRD2'
 OR KSCHL = 'FRD3'
 OR KSCHL = 'FRD4'
 OR KSCHL = 'FRD5'
*****Added one condition type below ZFBC as on 05.06.2007 :Rajiv as per mail of Sadiq via mathew sir(RTDK906646)
 OR KSCHL = 'ZFBC' )
 AND KWERT NE 0
 AND KPOSN GT '000000'.
 AND ( KRECH = 'B' " RTDK906167
 OR KRECH = 'A' ).
 SELECT * INTO TABLE it_konv_ftr FROM konv
 FOR ALL ENTRIES IN it_ekko
 WHERE knumv = it_ekko-knumv
 AND kwert NE 0
 AND kposn GT '000000'.
 LOOP AT it_konv_ftr.
 gindex = sy-tabix.
 READ TABLE it_zmm_porder WITH KEY kschl = it_konv_ftr-kschl BINARY SEARCH.
 IF sy-subrc NE 0.
 DELETE it_konv_ftr INDEX gindex.
 ENDIF.
 ENDLOOP.
 IF it_konv_ftr[] IS NOT INITIAL.
 SORT it_konv_ftr BY knumv kschl.
 ENDIF.
 SELECT KNUMV KSCHL INTO CORRESPONDING FIELDS OF TABLE IT_KONV1 FROM KONV
 FOR ALL ENTRIES IN IT_EKKO
 WHERE KNUMV = IT_EKKO-KNUMV
 and kherk = 'D'
 AND ( KSCHL = 'ZIN1'
 OR KSCHL = 'ZIN2'
 OR KSCHL = 'ZINS'
 OR KSCHL = 'ZPF1'
 OR KSCHL = 'ZPF2'
 OR KSCHL = 'ZPF3'
 OR KSCHL = 'ZPKG'
 OR KSCHL = 'ZPKF'
 OR KSCHL = 'FRA1'
 OR KSCHL = 'FRB1'
 OR KSCHL = 'FRC1'
 OR KSCHL = 'FRD1'
 OR KSCHL = 'FRD2'
 OR KSCHL = 'FRD3'
 OR KSCHL = 'FRD4'
 OR KSCHL = 'FRD5'
*****Added one condition type below ZFBC as on 05.06.2007 :Rajiv as per mail of Sadiq via mathew sir(RTDK906646)
 OR KSCHL = 'ZFBC' )
 AND KWERT NE 0.
 AND ( KRECH = 'B' RTDK906167
 OR KRECH = 'A' ).
 SELECT knumv kschl INTO CORRESPONDING FIELDS OF TABLE it_konv1 FROM konv
 FOR ALL ENTRIES IN it_ekko
 WHERE knumv = it_ekko-knumv
 AND kwert NE 0.
 DELETE ADJACENT DUPLICATES FROM it_konv1 COMPARING knumv kschl.
 LOOP AT it_konv1.
 gindex = sy-tabix.
 READ TABLE it_zmm_porder WITH KEY kschl = it_konv1-kschl BINARY SEARCH.
 IF sy-subrc NE 0.
 DELETE it_konv1 INDEX gindex.
 ENDIF.
 ENDLOOP.
 IF sy-subrc EQ 0.
 SORT it_konv1 BY knumv kschl.
 ENDIF.
 SELECT * INTO TABLE it_t685t
 FROM t685t
 FOR ALL ENTRIES IN it_konv
 WHERE kschl EQ it_konv-kschl
 AND kappl EQ it_konv-kappl
 AND spras EQ 'E'.
 SELECT * INTO TABLE it_t685t_ftr
 FROM t685t
 FOR ALL ENTRIES IN it_konv_ftr
 WHERE kschl EQ it_konv_ftr-kschl
 AND kappl EQ it_konv_ftr-kappl
 AND spras EQ 'E'.
 it_t685t_ftr-kschl = 'JVCS'.
 it_t685t_ftr-vtext = 'IN CST in vat'.
 APPEND it_t685t_ftr.
 SELECT * INTO TABLE it_zmm_house_bank
 FROM zmm_house_bank
 WHERE ebeln IN mebeln.
ELSE.
 MESSAGE e899(mm) WITH 'Data not found for selection criteria...'.
ENDIF.
ENDFORM. " Load_data
FORM process .
DATA : mctr TYPE i VALUE 1.
DATA : gindex LIKE sy-tabix.
DATA : mline(75) TYPE c.
DATA : mlifn2 LIKE ekpa-lifn2.
DATA : mv_name LIKE lfa1-name1,
 madrnr LIKE lfa1-adrnr.
CLEAR itcpo.
itcpo-tdgetotf = 'X'.
CALL FUNCTION 'OPEN_FORM'
 EXPORTING
 form = 'ZMM_PORDER'
 language = sy-langu
 OPTIONS = itcpo
 dialog = ' '
 EXCEPTIONS
 OTHERS = 1.
LOOP AT it_ekko.
 CALL FUNCTION 'START_FORM'
 EXPORTING
 form = 'ZMM_PORDER'.
 SELECT SINGLE *
 FROM t001
 INTO it_t001
 WHERE bukrs EQ it_ekko-bukrs.
 mcompname = it_t001-butxt.
 TRANSLATE mcompname TO UPPER CASE.
 Document Type
 SELECT SINGLE batxt
 INTO mtitle
 FROM t161t
 WHERE bstyp EQ 'F'
 AND spras EQ 'E'
 AND bsart EQ it_ekko-bsart.
 REFRESH it_adrc.
 SELECT SINGLE werks
 INTO mwerks
 FROM ekpo
 WHERE ebeln EQ it_ekko-ebeln.
 SELECT SINGLE *
 INTO it_t001w
 FROM t001w
 WHERE werks EQ mwerks.
 REFRESH it_adrc.
 SELECT SINGLE *
 INTO it_adrc_plt
 FROM adrc
 WHERE addrnumber EQ it_t001w-adrnr.
 REFRESH : xt052.
 mfamt = 0.
 msr = 0.
in 500c this statement failed.
 SELECT SINGLE * FROM T052 INTO XT052 WHERE ZTERM = IT_EKKO-ZTERM.
 CALL FUNCTION 'FI_TEXT_ZTERM'
 EXPORTING
 I_T052 = XT052
 TABLES
 T_ZTEXT = ZTEXT.
 As per Preeti... Shipment address should be shown on top as purchase order company address. 27.04.
 PERFORM writeform USING 'PLANT' 'PLANT'.
 SELECT SINGLE name1 adrnr
 INTO (mv_name,madrnr)
 FROM lfa1
 WHERE lifnr EQ it_ekko-lifnr.
 REFRESH it_adrc[].
 CLEAR it_adrc[].
 FREE it_adrc[].
 SELECT SINGLE *
 INTO it_adrc_ven
 FROM adrc
 WHERE addrnumber EQ madrnr.
 READ TABLE it_lfa1 WITH KEY lifnr = it_ekko-lifnr.
 PERFORM writeform USING 'VENDOR' 'VENDOR'.
 Shipment
 SELECT SINGLE werks
 INTO mwerks
 FROM ekpo
 WHERE ebeln EQ it_ekko-ebeln.
 up to 1 rows.
 SELECT SINGLE *
 INTO it_t001w
 FROM t001w
 WHERE werks EQ mwerks.
 SELECT SINGLE j_1iexcd j_1icstno j_1ilstno
 INTO (j_1iexcd,j_1icstno,j_1ilstno)
 FROM j_1imocomp
 WHERE werks = mwerks.
 REFRESH it_adrc.
 SELECT SINGLE *
 INTO it_adrc
 FROM adrc
 WHERE addrnumber EQ it_t001w-adrnr.
 PERFORM writeform USING 'SHIPMNT' 'SHIPMNT'.
 READ TABLE it_eikp WITH KEY exnum = it_ekko-exnum.
 IF sy-subrc EQ 0.
 READ TABLE it_t618t WITH KEY expvz = it_eikp-expvz.
 ENDIF.
 your_ref = it_ekko-ihrez.
 our_ref = it_ekko-unsez.
 READ TABLE it_erev WITH KEY edokn = it_ekko-ebeln.
 IF sy-subrc = 0.
 no_ammend = it_erev-revno.
 request_by = it_erev-crnam.
 ver_txt = it_erev-txz01.
 READ TABLE it_t16ct WITH KEY rscod = it_erev-rscod.
 IF sy-subrc = 0.
 ver_reason = it_t16ct-rstxt.
 ELSE.
 ver_reason = ''.
 ENDIF.
 ELSE.
 no_ammend = ''.
 request_by = ''.
 ver_txt = ''.
 ver_reason = ''.
 ENDIF.
 PERFORM writeform USING 'PO_INFO' 'PO_INFO'.
 IF it_zmm_house_bank[] IS NOT INITIAL.
 READ TABLE it_zmm_house_bank INDEX 1.
 PERFORM writeform USING 'BANKDTL' 'BANKDTL'.
 ENDIF.
 PERFORM writeform USING 'HDR_INFO' 'HDR_INFO'.
 PERFORM writeform USING 'BRK_TTL' 'MAIN'.
 msr = 1.
 mlctr = 1.
*added by ganesh to prevent deleted items to appear in print out
 LOOP AT IT_EKPO WHERE EBELN EQ IT_EKKO-EBELN.
 LOOP AT it_ekpo WHERE ebeln EQ it_ekko-ebeln AND loekz NE 'L'.
*end of change
 CLEAR: mrate, mrate1.
 SELECT * FROM konv INTO TABLE it_konv_rate
 WHERE knumv EQ it_ekko-knumv
 AND kposn EQ it_ekpo-ebelp
 AND ( kschl EQ 'PBXX' OR kschl EQ 'PB00' OR kschl EQ 'P001' ).
 LOOP AT it_konv_rate.
 IF it_konv_rate-kpein > 0. " added by ganesh as per sudhir 12.10.2007
 mrate_gm = it_konv_rate-kbetr / it_konv_rate-kpein.
 mrate = mrate + mrate_gm. " added by ganesh as per sudhir 12.10.2007
 ELSE.
 mrate = mrate + it_konv_rate-kbetr.
 ENDIF.
 IF it_konv_rate-waers IS NOT INITIAL.
 mwaers = it_konv_rate-waers.
 ENDIF.
 ENDLOOP.
 For Japanies Yen "RTDK906759
 IF it_ekko-waers = 'JPY'.
 mrate = mrate * 100.
 ENDIF.
 End for japanies Yen
 mrate1 = mrate.
 End rate
 mfirst = 0.
 MFAMT = MFAMT + ( IT_EKPO-NETPR * IT_EKPO-MENGE ).
 mfamt = mfamt + ( mrate * it_ekpo-menge ).
 PERFORM get_mat_long_text.
 DATA: lt_ctr TYPE i VALUE 0,lt_ctr1 TYPE i, lt_count TYPE i VALUE 0. " Long text counter
 DESCRIBE TABLE it_bapi_mltx_ga LINES lt_count.
 CLEAR it_bapi_mltx_ga.
*Added by Rajiv 10.05.2007 Read and if condition RTDK906165
 READ TABLE it_konv WITH KEY knumv = it_ekko-knumv
 kposn = it_ekpo-ebelp.
 mkbetr = 0.
 mkwert = 0.
 IF sy-subrc EQ 0.
 LOOP AT it_konv WHERE knumv EQ it_ekko-knumv
 AND kposn EQ it_ekpo-ebelp.
 IF it_konv-krech EQ 'A'.
 mkbetr = it_konv-kbetr / 10.
 ELSE.
 mkbetr = it_konv-kbetr.
 ENDIF.
 For Japanies Yen "RTDK906759
 IF it_ekko-waers = 'JPY'.
 mkbetr = mkbetr * 100.
 ENDIF.
 End for japaies Yen
 IF mkbetr LT '0'.
 mkbetr = mkbetr * ( -1 ).
 ENDIF.
 mkwert = it_konv-kwert.
 For Japanies Yen "RTDK906759
 IF it_ekko-waers = 'JPY'.
 mkwert = mkwert * 100.
 ENDIF.
 End for japaies Yen
 mfamt = mfamt + mkwert.
 IF mkwert LT '0'.
 mkwert = mkwert * ( -1 ).
 ENDIF.
 IF it_ekpo-matnr IS INITIAL.
 itemname = it_ekpo-txz01.
 ELSE.
 READ TABLE it_makt WITH KEY matnr = it_ekpo-matnr.
 itemname = it_makt-maktx.
 ENDIF.
 READ TABLE it_t685t WITH KEY kschl = it_konv-kschl BINARY SEARCH.
 READ TABLE it_eket WITH KEY ebeln = it_ekpo-ebeln
 ebelp = it_ekpo-ebelp BINARY SEARCH.
 IF mfirst EQ 0.
 PERFORM writeform USING 'BRK_INFO' 'MAIN'.
 mfirst = 1.
 ELSE.
 ADD 1 TO lt_ctr.
 CLEAR it_bapi_mltx_ga.
 READ TABLE it_bapi_mltx_ga INDEX lt_ctr. "For long text
 IF sy-subrc NE 0.
 CLEAR it_bapi_mltx_ga.
 ENDIF.
 PERFORM writeform USING 'BRK_INFO1' 'MAIN'.
 ENDIF.
 mlctr = mlctr + 1.
 ENDLOOP. " it_konv.
 ELSE.
 IF it_ekpo-matnr IS INITIAL.
 itemname = it_ekpo-txz01.
 ELSE.
 READ TABLE it_makt WITH KEY matnr = it_ekpo-matnr.
 itemname = it_makt-maktx.
 ENDIF.
 READ TABLE IT_T685T WITH KEY KSCHL = IT_KONV-KSCHL BINARY SEARCH.
 READ TABLE it_eket WITH KEY ebeln = it_ekpo-ebeln
 ebelp = it_ekpo-ebelp BINARY SEARCH.
 mfirst = 0.
 IF mfirst EQ 0.
 PERFORM writeform USING 'BRK_INFO' 'MAIN'.
 mfirst = 1.
 ELSE.
 ADD 1 TO lt_ctr.
 CLEAR it_bapi_mltx_ga.
 READ TABLE it_bapi_mltx_ga INDEX lt_ctr. "For long text
 IF sy-subrc NE 0.CLEAR it_bapi_mltx_ga.ENDIF.
 PERFORM writeform USING 'BRK_INFO1' 'MAIN'.
 ENDIF.
 ENDIF.
*Commented by rajiv 10.05.2007 used this code in above condition.
added by ganesh on 260407 to print record
 if it_konv is initial.
 READ TABLE IT_MAKT WITH KEY MATNR = IT_EKPO-MATNR.
 READ TABLE IT_T685T WITH KEY KSCHL = IT_KONV-KSCHL BINARY SEARCH.
 READ TABLE IT_EKET WITH KEY EBELN = IT_EKPO-EBELN
 EBELP = IT_EKPO-EBELP BINARY SEARCH.
 mFirst = 0.
 if mFirst eq 0.
 PERFORM WRITEFORM USING 'BRK_INFO' 'MAIN'.
 mFirst = 1.
 else.
 add 1 to lt_ctr.
 clear it_bapi_mltx_ga.
 read table IT_BAPI_MLTX_GA index lt_ctr. "For long text
 if sy-subrc ne 0.clear it_bapi_mltx_ga.endif.
 PERFORM WRITEFORM USING 'BRK_INFO1' 'MAIN'.
 Endif.
 endif.
end of change
 REFRESH it_komv_tax.
 PERFORM get_tax_cal USING it_ekpo-ebeln
 it_ekpo-ebelp.
 Changing it_komv_tax.
 REFRESH : it_zmm_porder.
 CLEAR : it_zmm_porder.
 SELECT * INTO TABLE it_zmm_porder
 FROM zmm_porder
 WHERE flag EQ 'T'.
 IF sy-subrc EQ 0.
 SORT it_zmm_porder BY kschl.
 ENDIF.
 LOOP AT it_komv_tax.
 gindex = sy-tabix.
 READ TABLE it_zmm_porder WITH KEY kschl = it_komv_tax-kschl BINARY SEARCH.
 IF sy-subrc NE 0.
 DELETE it_komv_tax INDEX gindex.
 ENDIF.
 ENDLOOP.
 LOOP AT it_komv_tax WHERE kwert IS NOT INITIAL.
 IF ( IT_KOMV_TAX-KSCHL EQ 'JMOP' OR
 IT_KOMV_TAX-KSCHL EQ 'JECS' OR
 IT_KOMV_TAX-KSCHL EQ 'JSEP' OR
 IT_KOMV_TAX-KSCHL EQ 'JMOQ' OR
 IT_KOMV_TAX-KSCHL EQ 'JVCS' OR
 IT_KOMV_TAX-KSCHL EQ 'JVRD' OR
 IT_KOMV_TAX-KSCHL EQ 'JMIP' OR
* IT_KOMV_TAX-KSCHL EQ 'JEIP' OR
 IT_KOMV_TAX-KSCHL EQ 'JSEI' OR
 IT_KOMV_TAX-KSCHL EQ 'JSRT' OR
 IT_KOMV_TAX-KSCHL EQ 'JEC3' OR
 IT_KOMV_TAX-KSCHL EQ 'JVRN' )
 AND IT_KOMV_TAX-KWERT IS NOT INITIAL.
 SELECT SINGLE vtext
 INTO mtext
 FROM t685t
 WHERE kschl EQ it_komv_tax-kschl
 AND spras EQ 'E'.
 l_rate = it_komv_tax-kbetr / 10.
 l_amt = it_komv_tax-kwert.
 For Japanies Yen "RTDK906759
 IF it_ekko-waers = 'JPY'.
 l_amt = l_amt * 100.
 ENDIF.
 End for japaies Yen
 ADD l_amt TO mfamt.
 IF lt_ctr LT lt_count. "Long text
 ADD 1 TO lt_ctr.
 READ TABLE it_bapi_mltx_ga INDEX lt_ctr.
 ELSE.
 CLEAR it_bapi_mltx_ga.
 ENDIF.
 IF l_rate EQ 0 OR l_amt EQ 0.
 l_rate = ''.
 l_amt = ''.
 ENDIF.
 PERFORM writeform USING 'TAX_LINE_ITEM' 'MAIN'.
 ENDIF.
 ENDLOOP.
 IF lt_ctr LT lt_count.
 DATA mbal_line TYPE i.
 mbal_line = ( lt_count - lt_ctr ).
 DO mbal_line TIMES.
 ADD 1 TO lt_ctr.
 READ TABLE it_bapi_mltx_ga INDEX lt_ctr.
 IF sy-subrc = 0.
 PERFORM writeform USING 'LTEXT' 'MAIN'.
 ENDIF.
 ENDDO.
 ENDIF.
 CONCATENATE it_ekko-ebeln it_ekpo-ebelp INTO nmebeln.
 REFRESH tline.
 CALL FUNCTION 'READ_TEXT'
 EXPORTING
 id = 'F04'
 language = sy-langu
 name = nmebeln
 object = 'EKPO'
 TABLES
 lines = tline
 EXCEPTIONS
 id = 1
 language = 2
 name = 3
 not_found = 4
 object = 5
 reference_check = 6
 wrong_access_to_archive = 7
 OTHERS = 8.
 IF sy-subrc <> 0.
 ENDIF.
 LOOP AT tline.
 IF tline-tdline IS NOT INITIAL.
 del_text = tline-tdline.
 ENDIF.
 CONDENSE del_text.
 ENDLOOP.
 CONCATENATE it_ekko-ebeln it_ekpo-ebelp INTO nmebeln.
 REFRESH tline.
 CALL FUNCTION 'READ_TEXT'
 EXPORTING
 id = 'F03'
 language = sy-langu
 name = nmebeln
 object = 'EKPO'
 TABLES
 lines = tline
 EXCEPTIONS
 id = 1
 language = 2
 name = 3
 not_found = 4
 object = 5
 reference_check = 6
 wrong_access_to_archive = 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.
 refresh.
 CLEAR : po_flag, mat_po_text.
 LOOP AT tline.
 IF tline-tdline IS NOT INITIAL.
 MOVE tline-tdline TO mat_po_text.
 CONDENSE mat_po_text.
 PERFORM writeform USING 'MTRL_PO_TEXT' 'MAIN'.
 po_flag = 'X'.
 CLEAR : mat_po_text.
 ENDIF.
 ENDLOOP.
*Added lines below for Schedule delivery for line item on 09.05.2007:Rajiv
 CLEAR g_ind.
 READ TABLE it_eket WITH KEY ebeln = it_ekpo-ebeln
 ebelp = it_ekpo-ebelp BINARY SEARCH.
 g_ind = sy-tabix.
 LOOP AT it_eket FROM g_ind.
 IF it_eket-ebeln EQ it_ekpo-ebeln AND it_eket-ebelp = it_ekpo-ebelp.
 PERFORM writeform USING 'SCHEDULE' 'MAIN'.
 ELSE.
 EXIT.
 ENDIF.
 ENDLOOP.
*End Addition:Rajiv
 PERFORM writeform USING 'REQSLP' 'MAIN'.
 mlctr = mlctr + 1.
 msr = msr + 1.
 CLEAR: lt_ctr, lt_ctr1.
following lines added by ganesh to add service po details as per Mr. sadiq 21.08.2007
 IF it_ekpo-packno IS NOT INITIAL.
 CLEAR sub_packno.
 SELECT SINGLE sub_packno INTO sub_packno FROM esll WHERE packno = it_ekpo-packno.
 IF sub_packno IS NOT INITIAL.
 CLEAR it_esll.
 REFRESH it_esll.
 SELECT * FROM esll INTO CORRESPONDING FIELDS OF TABLE it_esll
 WHERE packno = sub_packno.
 IF sy-subrc = 0.
 PERFORM writeform USING 'SERVICE_PO_TEXT' 'MAIN'.
 ENDIF.
 LOOP AT it_esll.
 CONCATENATE sub_packno it_esll-introw INTO obj.
 CALL FUNCTION 'READ_TEXT' "4500002446 C300
 EXPORTING
 id = 'LTXT'
 language = sy-langu
 name = obj
 object = 'ESLL'
 TABLES
 lines = tline
 EXCEPTIONS
 id = 1
 language = 2
 name = 3
 not_found = 4
 object = 5
 reference_check = 6
 wrong_access_to_archive = 7
 OTHERS = 8.
 IF sy-subrc <> 0.
 ENDIF.
 CLEAR stext.
 LOOP AT tline.
 CONCATENATE stext tline-tdline INTO stext SEPARATED BY space.
 ENDLOOP.
 FREE tline.
 CLEAR tline.
 REFRESH tline.
 PERFORM writeform USING 'SERVICE_PO' 'MAIN'.
 PERFORM writeform USING 'SERVICE_TEXT' 'MAIN'.
 ENDLOOP.
 ENDIF.
 ENDIF.
 end of change
 ENDLOOP. " it_ekpo.
 IF mlctr < 15.
 DO 5 TIMES.
 PERFORM writeform USING 'LINEFEED' 'MAIN'.
 ENDDO.
 ENDIF.
 added by ganesh for allding line before ECC No.
 IF it_ekko-bsart NE 'ZIM'. " IF EXPORT NO NEED TO PRINT ECC.
 PERFORM writeform USING 'LIN' 'MAIN'.
 PERFORM writeform USING 'WERKS_TAX_DETAIL' 'MAIN'.
 ENDIF.
 end of change
 MFLAG = 'Y'.
 PERFORM writeform USING 'TERMS_VAL' 'MAIN'.
 LOOP AT it_konv1 WHERE knumv EQ it_ekko-knumv.
 mkschl = it_konv1-kschl.
 mchgamt = 0.
 LOOP AT it_konv_ftr WHERE knumv EQ it_konv1-knumv
 AND kschl EQ mkschl.
 mchgamt = mchgamt + it_konv_ftr-kwert.
 ENDLOOP.
 For Japanies Yen "RTDK906759
 IF it_ekko-waers = 'JPY'.
 mchgamt = mchgamt * 100.
 ENDIF.
 End for japaies Yen
 mfamt = mfamt + mchgamt.
 IF mchgamt LT '0'.
 mchgamt = mchgamt * ( -1 ).
 ENDIF.
 READ TABLE it_t685t_ftr WITH KEY kschl = mkschl.
 PERFORM writeform USING 'TERMS_FTR_VAL' 'MAIN'.
 mlctr = mlctr + 1.
 ENDLOOP.
 mflag = 'T'.
 CALL FUNCTION 'HR_IN_CHG_INR_WRDS'
 EXPORTING
 amt_in_num = mfamt
 IMPORTING
 amt_in_words = mfword
 EXCEPTIONS
 data_type_mismatch = 1
 OTHERS = 2.
 CONDENSE mebeln.
 nmebeln = it_ekko-ebeln.
 REFRESH tline.
 CALL FUNCTION 'READ_TEXT'
 EXPORTING
 id = 'F01'
 language = sy-langu
 name = nmebeln
 object = 'EKKO'
 TABLES
 lines = tline
 EXCEPTIONS
 id = 1
 language = 2
 name = 3
 not_found = 4
 object = 5
 reference_check = 6
 wrong_access_to_archive = 7
 OTHERS = 8.
 IF sy-subrc <> 0.
 ENDIF.
*---- CHANGED BY MATHEW BECAUSE THIS STATMENT WORKING FINE IN 300 BUT NOT IN 500C.
 LOOP AT ZTEXT.
 IF ZTEXT-TEXT1 IS NOT INITIAL.
 PERFORM WRITEFORM USING 'TERMS_COND_VAL_PAY' 'MAIN'.
 ENDIF.
 MPAY_FLAG = 'Y'.
 ENDLOOP.
 READ TABLE it_t052u WITH KEY zterm = it_ekko-zterm.
 LOOP AT it_t052u WHERE zterm EQ it_ekko-zterm.
 IF it_t052u-text1 IS NOT INITIAL.
 PERFORM writeform USING 'TERMS_COND_VAL_PAY' 'MAIN'.
 ENDIF.
 mpay_flag = 'Y'.
 ENDLOOP.
 PERFORM writeform USING 'TERMS_COND_VAL' 'MAIN'.
 LOOP AT tline.
 IF tline-tdline IS NOT INITIAL.
 PERFORM writeform USING 'TERMS_COND_VAL_HDR' 'MAIN'.
 ENDIF.
 CONDENSE txt.
 ENDLOOP.
 PERFORM writeform USING 'FTR' 'FTR_LIN3'.
 PERFORM writeform USING 'FTR_LIN1' 'FTR_LIN1'.
 CALL FUNCTION 'END_FORM'.
ENDLOOP. " It_ekko.
CALL FUNCTION 'CLOSE_FORM'
 IMPORTING
 RESULT = itcpp
RDI_RESULT =
 TABLES
 otfdata = otf
 EXCEPTIONS
 unopened = 1
 bad_pageformat_for_print = 2
 send_error = 3
 spool_error = 4
 codepage = 5
 OTHERS = 6.
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. " Process
*& Form WRITEFORM
 text
 -->P_0150 text
 -->P_0151 text
FORM writeform USING value(p_0150)
 value(p_0151).
CALL FUNCTION 'WRITE_FORM'

Hi
I think some basis related configuartions to be done
Try like this and inform me
A cyclic job runs, which processes the messages seen in the SOST queue.
Are you sure it's not the frequency of the cyclic job, rather than the
number of messages in the queue, that you are observing? In messages
that are queued and before the cyclic job runs, "wait for comm. service"
is the normal status.
If you mean that there are always 4 items queued in SOST regardless of
the cyclic send job, then I have no ideas. I would have thought there
was no way to do that.
when the send job runs it just never
picks them up & sends them, while it picks up many others. The send job
is somehow blind to these; no error message occurs. In this case, I
'delete' them from the queue (in SOST) and then 'undelete' (drop down
menu -> /Go to /Deleted Items) them and then re-queue them. THEN they
actually get picked up & sent when the next cyclic send job executes.
Regards
Pavan

I no longer have sound when playing my clips through adobe premiere elements 12. How to I correct this problem? I have checked all audio levels and there is no mute on etc. I have updated to 12.1. Still no sound.

I no longer have sound when playing my clips through adobe premiere elements 12. How to I correct this problem? I have checked all audio levels and there is no mute on etc. I updated to 12.1, but still no sound in any clips. Even not on old files which used to work.

bfun
What computer operating system is your Premiere Elements 12/12.1 running on? Can we assume that this audio plays back OK
on the same computer when you are using a computer player independent of Premiere Elements?
What are the properties of these clips that worked before but do not know with regard to sound
For now, I will assume that you are working on Windows 7, 8, or 8.1 64 bit.
Have you checked the Edit Menu/Preferences/Audio Hardware ASIO settings? Do you have any 3rd party audio devices incorporated in your computer environment?
Please delete the Adobe Premiere Elements Prefs file and, if that does not work, then the whole 12.0 Folder in which the Adobe Premiere Elements Prefs file exists. The Windows 7, 8, or 8.1 64 bit path is
Local Disk C
Users
Owner
AppData
Roaming
Adobe
Premiere Elements
12.0
and, in the 12.0 Folder, is the Adobe Premiere Elements Prefs file that you delete. If that does not work, then delete the whole 12.0 Folder in which the Adobe Premiere Elements Prefs file exists. Make sure that you are working with Folder Option "Show Hidden Files, Folders, and Drives" active so that you can see the complete path cited.
Do you have installation files or installation disc with the purchased serial number in case we need to resort to uninstall/reinstall?
We will be watching for your follow up.
ATR

Editing and sharing custom metadata/keywords through Adobe Drive in Adobe Bridge

I am part of a four-person video production unit operating within a local governmental entity. We are currently using four licenses of Adobe Master Collection CS5, and are about to get access to dedicated SAN storage.
We would like each user to have the ability to assign specific keywords to any given video clip (or remove keywords from clips) within Adobe Bridge, and have the three other users see the same results. I've noticed that Bridge alone will allow for keywords to be added or removed, but this list is specific to each user. Importing one list into other users' profiles is a start, but would no longer work, once keywords are added or taken away.
The overview page for Adobe Drive 3 says that it, "allows users to edit and view custom metadata/properties through Adobe Drive in Adobe Bridge," but I haven't found any explanation in either the website, forums, or user's guides that delves any farther into this area. If we incorporate Adobe Drive/Bridge into our workflow, will we be able to share/sync keywords between users? Is there some other (affordable) solution that would let us do this?
Thanks for any insight you might be able to offer.
Chuck

Hi,
Thanks for sharing your case.
The keywords you mentioned is XMP metadata, if all your digital assets are managed by ADEP CQ DAM service, you can use AD3 with built-in ADEP connector to communicate with the DAM server, then, I think it can meet your requirement, it means, the keywords can be set by one user through metadata panel in Bridge, and can be viewed by other users.
for custom properites, it's different from XMP metadata, it refers to the properties of one asset which is managed by a Content Management service. users have to use another UI to edit/view them in Br after AD3 is installed.
here are some requirements to use it.
1) CMIS 1.0 compiliant server should be used to manage all your digital assets
2) use the built-in CMIS with AD3 to connect to the server.
if other kind of servers are used, you should develope a custom connector through AD SDK to enable custom properties feature as well as some other handler required by AD SDK
thanks

Corruption in text files retrieved through Adobe Drive on Mac

I am running an OpenCMIS based CMIS server on Mac. When viewing text files retrieved from the CMIS repository through Adobe Drive, there is nontextual content appearing at the end of the file. XCode, for example, ends up displaying this content as a variable number of '¿' characters. This is not just a visual problem as file comparisons between a file retrieved through Adobe Drive and the same file retrieved through other means detect the files as being different.
This is only happening with text files. Binary comparison of nontext files retrieved through Adobe Drive and files retrieved through other means detect the files identical.
This only occurs when the CMIS server is running on a Mac and Adobe Drive is running on a Mac. Adove Drive running on a Windows machine and connecting to this same CMIS server does not have this problem and vice versa.
This problem does not occur if I retrieve files through other CMIS clients.
Any help/resolution you could offer on this issue would be appreciated.

Having same issue. Using Indesign CC 2014.2 update, OS X 10.10.3 and any server using a smb, afp, or cifs connection.

Anyone see changes in images when making a web gallery through Adobe Bridge cs4??? Please Help!

When creating web galleries through adobe bridge CS4 the final gallery images become very orange.....
Not even comparable to what we are seeing in Bridge or Photoshop CS4....
Adobe tells me that this is happening because of the conversion for web use.
We are just noticing this change now and feel that there is a problem somewhere.....
Has anyone else seen this issue or now anything to do to get it fixed???
It's really annoying, Please Help!!!

You probably want to ask this in the Bridge forum. From what I know, Bridge converts the profile to sRGB which helps avoids big color shifts if you view the images in an uncolormanaged web browser. This may change the appearance slightly, but there shouldn't be a huge shift.

I have a Mac computer and am trying to use a Photoshop CS4 program, but after accessing my desktop files through Adobe Bridge and clicking twice on any of the pictures to get into Photoshop, instead of entering photoshop I get an enlarged version of the

I have a Mac computer and am trying to use a Photoshop CS4 program, but after accessing my desktop files through Adobe Bridge and clicking twice on any of the pictures to get into Photoshop, instead of entering photoshop, I get on the lefthand side an enlarged version of the picture with red, yellow and green buttons on top. Any suggestions on what is wrong, or what can be corrected ?

And there is the problem. Your pictures are opening up in Mac's own Preview app.
Do you want all your jpegs to open in Photoshop, or only when you are in Bridge?
Selecting a program to open a certain file is called: File Type Association.
You can choose this at the MacOS level or the Bridge level.
Here's how to do both:
Either MacOS or Bridge has the wrong app associated with the jpeg. Let's start with MacOS
Close Bridge and Preview. Select one of your jpegs, and press Cmd i, That will bring up the file info window.
Go down to the "Open with" section of File Info.
Choose Photoshop CS4 and click on the Change All... button to apply this choice to every jpeg on your Mac.
Then open Bridge and see if double-clicking opens it in Photoshop.
Now that means all jpegs on your Mac will open in Photoshop. Maybe you don't want that.
You can set your jpegs to open in Preview when Bridge is closed.
When you open Bridge, there is Preferences > File Type Associations where you can direct Bridge to open the jpegs in Photoshop when you are viewing in Bridge.

Possible through "Adobe Bridge scripting"

I saved the "Document Info" details in adobe illustrator manually using "Document Info Pannel". But i could not save the "Document Info" details through illustrator action and script. Is it possible the above process through "Adobe Bridge scripting". Kindly advice me.

I am on CS3, so I can't help you with CS version. But anyway here is an example (for CS3).
I assume that an illustrator file is selected in Bridge.
#target bridge
var sels = app.document.selections[0];
var md = sels.metadata;
md.namespace = "http://ns.adobe.com/xap/1.0/";
var myCreator = md.read("http://ns.adobe.com/xap/1.0/", "xap:CreatorTool");
$.writeln ("File was created by " + myCreator);
var myModifyDate = md.read("http://ns.adobe.com/xap/1.0/", "xap:ModifyDate");
$.writeln ("File was modified at " + myModifyDate);
// Let's write some info into IPTC Contact panel (IPTC Core in Metadata panel)
md.namespace = "http://iptc.org/std/Iptc4xmpCore/1.0/xmlns/";
md.CiAdrCity = "Kiev";
md.CiAdrCtry = "Ukraine";

Why I cannot open camera raw files from camera Nikon 3200 through Adobe Bridge and/or Photoshop?

Why I cannot open raw files (NEF) from camera Nikon D3200 through Adobe Bridge and/or Photoshop ?

Thanks for the tip. It worked out perfectly.
De: ssprengel [email protected]
Enviada em: terça-feira, 14 de janeiro de 2014 19:14
Para: Aecio Paes Leme
Assunto: Why I cannot open camera raw files from camera Nikon 3200 through Adobe Bridge and/or Photoshop?
Re: Why I cannot open camera raw files from camera Nikon 3200 through Adobe Bridge and/or Photoshop?
created by ssprengel <http://forums.adobe.com/people/ssprengel> in Adobe Camera Raw - View the full discussion <http://forums.adobe.com/message/6012775#6012775

Please help-I was just informed I cant activate my CS software through Adobe?!!! What a pisser-I lost my desktop to a virus, I got a new one and refuse to ever go online with it. I put Photoshop in, it wants an authorization code that Adobe says "CS is to

Please help-I was just informed I cant activate my CS software through Adobe?!!! What a pisser-I lost my desktop to a virus, I got a new one and refuse to ever go online with it. I put @Photoshop in, it wants an authorization code that Adobe says "CS is too old so please go to our forum for help"... So I am here Ladies and Gentlemen. I really need help on how to reactivate my software and without the use of the internet (last time I tried online, ended up doing over the phone which is no longer offered...) that cost me several hundred to begin with-I am upset @Adobe won't activate it-why? I don't know. But please, if someone out there knows what I can do to overcome this, I would be very grateful. Thank you for all help and taking the time to reply.
Peace, John Shea

it's your lucky day. you can upgrade to ps cs2 free.
Error: Activation Server Unavailable | CS2, Acrobat 7, Audition 3

I am unable to sign into my account through Adobe Elements 12. I can sign in on Adobe's website, and through Revel online, and through my smartphone, however when I try to sign in through Adobe Elements 12 directly, the hourglass never stops turning, and

I am unable to sign into my account through Adobe Elements 12. I can sign in on Adobe's website, and through Revel online, and through my smartphone, however when I try to sign in through Adobe Elements 12 directly, the hourglass never stops turning, and turning.

Hi,
Have you tried working through this document - it does apply to Elements as well.
Sign in, activation, or connection errors | CS5.5 and later
If you still have problems you may need to contact the Adobe activation team - see the "Still need help?" link at the end of the document.
Good luck
Brian

How do I get digital audio to output through my Audigy 2?, What hardware do I ne

I play my 360 on my computer monitor and I have an Audigy 2 ZS sound card w/ Inspire p7800 7. speaker setup.
My question is, if I have Dolby Digital 5. and DTS output through those speakers, what kind of hardware would I need to run the optical output from my 360 into the computer and get a digital signal through my speakers in 5. Is it possible? Thanks in advance.Message Edited by Reeg on -29-20072:0 PM

you need to buy their i/o dri've that's mean for the audigy 2zs

Recapturing footage outputted through Adobe

Similar Messages

Maybe you are looking for