Problem when invoice in VF01

Hi
I have a problem when create invoice in VF01.
I created billing document in VA01 with order type "Rush order" and next in VF01 when I put
this number then and choose INVOICE type and press SAVE. Then I got an error "No billing documents were generated".
How to create invoice for that?
Thanx for help
Edited by: Kosmo on Oct 27, 2010 4:35 PM

Go to VF02 and do "Relase to Accounting"
What error message you got then?
Regards,
SDNer

Similar Messages

Problem when trying to print standart invoice crystal report for SAP

Hi All, I have the following problem when trying to print a system invoice report in crystal reports for SAP
I pass params and load the report using this code
Private Sub DisplayThreadReportSeq()
Dim oView As New frmViewReport
Dim strReportPath As String = ""
Dim strParamName As String = ""
Try
Dim CR As New ReportDocument
CR.Load(oReport.CrstPath)
' Declare the parameter related objects.
SetReportValues(CR)
Dim crParameterDiscreteValue As ParameterDiscreteValue
Dim crParameterFieldDefinitions As ParameterFieldDefinitions
Dim crParameterFieldLocation As ParameterFieldDefinition
Dim crParameterValues As ParameterValues
' Get the report's parameters collection.
For Each oPar As cslParam In oReport.Params
crParameterFieldDefinitions = CR.DataDefinition.ParameterFields
crParameterFieldLocation = crParameterFieldDefinitions.Item(oPar.ParName)
crParameterValues = crParameterFieldLocation.CurrentValues
crParameterDiscreteValue = New CrystalDecisions.Shared.ParameterDiscreteValue
crParameterDiscreteValue.Value = oPar.Value
crParameterValues.Add(crParameterDiscreteValue)
crParameterFieldLocation.ApplyCurrentValues(crParameterValues)
Next
If pPrint Then
If oReport.Printer "" Then
CR.PrintOptions.PrinterName = oReport.Printer
End If
CR.PrintToPrinter(IIf(oReport.Copies = "", 1, oReport.Copies), False, 0, 0)
SBO_Application.StatusBar.SetText("Printed Document Successfully", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Success)
Else
oView.Text = pReport
oView.TopMost = True
oView.Viewer.ReportSource = CR
oView.Hide()
oView.ShowDialog()
End If
Catch ex As Exception
Util_GenErrorLog("DisplayReport", ex)
End Try
End Sub
This code works fine when the report invoke to print is developed in crystal reports version for .net 2008 or .net 2005
when trying to print a report standart getting from SAP BO 8.8.1 using this code I getting the following error:
Error in File C:UsersecombaAppDataLocalTemp5ARInvoiceStandartSap {300B9A68-DF05-4D7B-8F3B-1670A4493BEE}.rpt:
Error in formula .
'Shared numberVar SectionTotalMaxHeght;
A number, currency amount, boolean, date, time, date-time, or string is expected here.
This report is the standart report that SAP 8.8.1 includes and works fine on SAP.
I referenced this dlls CrystalDecisions.CrystalReports.Engine.dll, CrystalDecisions.CrystalReports.Shared, version 10.2.3600
How I can get these dll´s version for Crystal Report 2008 for SAP Business one or How I can solve this problem
thanks in advance,
Ezequiel.

Hi Ezequiel,
You can try to search in SAP Business One Reporting & Printing forum section or post there.
nd.Q

Error while saving invoice in VF01

Hi,
I am facing problem while saving invoice in VF01 for 1 company code, while no problem occurs when save for other company code.
Text 0040300000 ID 0002 language EN not found
Message no. TD600
Diagnosis
You want to read a text which does not exist in the data base (or update memory).
System Response
Reading could not be carried out.
Procedure
You need to create this text:
1. Initialization (module INIT_TEXT)
2. Save (module SAVE_TEXT)
403 is my company code
wat i m missing here
Regards,
AMit

I hope below links may help you to close the thread.
Service master Long Text Deletion
Text Id F01 language EN not found message no TD600
Text id not found
Regards,
SaiRam

Error while raising a invoice using VF01

Hi,
I am getting an error while raising a invoice using VF01.
Error as follows
RV_MESSAGE_UPDATE
Update was terminated
System ID....   TIP
Client.......   300
User.....   user1
Transaction..   VF01
Update key...   E66E6454075548D8922BAC091E81F0CB
Generated....   18.07.2007, 18:57:38
Completed....   18.07.2007, 18:57:38
Error info...   TD 443: WRITE_FORM
Pls help
Points will be rewarded.
Thanks

Hi,
This is an ABAP short dump. If you go through the error log, there will be a section where in you can see > What caused the problem.
Try to analyze this log and you can find a solution. Probably, you can also check whether there is any OSS note with this error message.
Thanks
Murali.

Service entry problem when not accepted

We have a problem when there are multiple service entries agains a PO. There are no problems when we do the first entry and accept. The problem happens when we do a second entry and the end user only saves and forgets to accept the SES. When they do an invoice against this unaccepted SES the system brings in the previous SES number, when this goes unnoticed the vendor gets paid twice for the same thing. Is there a way for SAP to look at the SES field in the invoice and determine that this SES number has already been paid? Thanks in advance.

Hi Eric,
please try the following: check in transaction XK02 the field "Check Flag for Double Invoices or Credit Memos" (LFB1-REPRF).
Indicator which means that incoming invoices and credit memos are checked for double entries at the time of entry.
In checking for duplicate invoices, the system compares the following characteristics by default:
Vendor
Currency
Company code
Gross amount of the invoice
Reference document number
Invoice document date
If all of these characteristics are the same, the system issues a message that you can customize.
The system only checks for duplicate invoices in Materials Management if you enter the reference document number upon entering the invoice.
Of course if the invoice document date is different, there is no message M8108 issued. Please read also the notes 305201 and 308008.
I would recommend you to use the service based invoice verification function (set the field EKPO-LEBRE to X) in the PO item.
Regards,
Edit

Problems when trying to send a smartform through fax

Hi,
Im currently confronting a problem when sending smartforms through fax to multiple recipients.
This is the scenario Im working on:
The client needs to be able to send a document, could be a PO or invoices, to diferent recipients at the same time. So far in case of purchase orders, we have been able to find the respective faxes and emails for each of the partner functions.
Functionality for email is working as desired but when sending faxes I have problems.
Reviewing the output through SOST I get all my receipients which are email and faxes. Emails are fine since it creates a PDF attachment with the order and all of its details.
For fax I get the same even though the paramenters are set for fax.
Here is my code if you could please help me here on this one.
SELECT lifn2 FROM EkPA into l_ekpa-lifn2
             WHERE EBELN = a_EBELN.
    APPEND l_EKPA.
ENDSELECT.
SELECT adrnr
    FROM lfa1
    INTO itab-q_adrnr
    FOR ALL ENTRIES IN l_ekpa WHERE lifnr = l_ekpa-lifn2.
    APPEND itab.
ENDSELECT.
*& End of partner address
*& Selection of Address or Fax number from ADR3 & ADR6 according to ADRNR
*& Nato
IF sy-subrc EQ 0.
    loop at itab.
      SELECT SINGLE smtp_addr INTO (itab-q_mail)
   from adr6 where addrnumber = itab-q_adrnr and flg_nouse eq space.
      IF itab-q_mail ne Space.
        Move 'U' to itab-q_typ2(1).
        Move 'X' to itab-q_express(1).
      Move 'EXT' to itab-XOBJT.
      ENdIF.
   SELECT SINGLE FAXNR_LONG INTO (itab-q_fax)
      SELECT SINGLE country FAX_NUMBER INTO (itab-q_cty, itab-q_fax )
   from adr3 where addrnumber = itab-q_adrnr and flg_nouse eq space.
      If itab-q_fax ne space.
        Move 'F' to itab-q_typ(1).
        Move 'TELEFAX' to itab-q_com.
      Endif.
      Modify itab.
    endloop.
*& END of ITAB
    CLEAR : DOC_CHNG.
    REFRESH LINES.
    IF NAST-NACHA eq '7'.
* Fill both the fax & email Receiver lists
      clear:   reclist, reclist2.
      refresh: reclist, reclist2.
*& loop table itab to update receipient list in table Reclist
*& Nato
      loop at itab.
        IF not itab-q_typ is initial.
         concatenate itab-q_cty itab-q_fax into reclist2-RECNAM separated by space. "FAX NUMBER
          move itab-q_fax to reclist2-receiver. "FAX NUMBER
*&>>>>>>>>>>>>>>>>>>>new entry for testing nato 080206<<<<<<<<<<<&
          move itab-q_cty to RECLIST2-COUNTRY.        "Country Code
          move itab-q_fax to Reclist2-FAX.            "Fax number
*&>>>>>>>>>>>>>>ENd of entry<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<&
          move itab-q_typ to REClist2-REC_TYPE. "Communication type for fax
      move itab-q_EXPRESS to Express.        "comment for testing
          move itab-q_com to REClist2-COM_TYPE.
          Move 'X' to reclist2-NOTIF_DEL.
         Move 'TELEFAX' to reclist2-SNDART.    "TYPE OF DEVICE
          Move a_ebeln to sood-OBJDES.              "new addition for testing nato
          append Reclist2.
        endif.
        IF not itab-q_typ2 is initial.
          move itab-q_mail to REclist-receiver. "SMT ADDRESS
          move itab-q_typ2 to REClist-REC_TYPE.
          move itab-q_EXPRESS to REClist-express.
          move 'X' to reclist-TO_ANSWER.
          Move a_ebeln to sood-OBJDES.              "new addition for testing nato
      move itab-q_com to REClist-COM_TYPE.   "comment for testing only
          append Reclist.
        Endif.
        move reclist-receiver to address.
      endLoop.
*& END OF RECipient
    ENDIF.
    DOC_CHNG-OBJ_DESCR = nast-objky.
ELSE.
    IF RECLIST IS INITIAL.
     LOOP AT reclist INTO RECIPIENT .        " This logic might get commented or deleted. Nato 08/01/06
     ENDLOOP.
    ENDIF.
    DOC_CHNG-OBJ_DESCR = L_TITLE.
ENDIF.
IF RECLIST[] IS INITIAL.
    MESSAGE E573(VE) RAISING RECEIVER_NOT_FOUND.
ENDIF.
*& New entry to determine path according to communication
*& type
*& If comm type eq U follow convert_otf
*& then Read text, finaly send API
*& If comm type eq F follow path to "Convert OTF & FAX
*& Nato 080106
REFRESH : HOTFDATA, LT_SOLIX, OBJBIN.
LOOP AT JOB_OUTPUT_INFO-OTFDATA INTO HOTFDATA.
    APPEND HOTFDATA.
ENDLOOP.
*& Prepare content to be converted to PDF format
*& nato
CALL FUNCTION 'CONVERT_OTF'
       EXPORTING
            FORMAT                = 'PDF'
                MAX_LINEWIDTH         = 132
       IMPORTING
            BIN_FILESIZE          = DOC_SIZE
            BIN_FILE              = LD_BINFILE
       TABLES
            OTF                   = HOTFDATA
            LINES                 = HTLINE
       EXCEPTIONS
            ERR_MAX_LINEWIDTH     = 1
            ERR_FORMAT            = 2
            ERR_CONV_NOT_POSSIBLE = 3
            OTHERS                = 4.
*& new entry just for test today 080306
*&nato
*endif.
*&--end of entry--
I = 0.
N = XSTRLEN( LD_BINFILE ).
WHILE I < N.
    LT_SOLIX-LINE = LD_BINFILE+I.
    APPEND LT_SOLIX.
    I = I + 255.
ENDWHILE.
*& end of convertion pdf
LOOP AT LT_SOLIX INTO WA_SOLIX.
    CLEAR WA_SOLI.
    ASSIGN WA_SOLI TO <PTR_HEX> CASTING.
    MOVE WA_SOLIX TO <PTR_HEX>.
    APPEND WA_SOLI TO OBJBIN.
ENDLOOP.
*& Prepare send mail
CLEAR : NAME, DOCNAME.
REFRESH : OBJTXT, OBJPACK.
CONCATENATE NAST-KAPPL NAST-KSCHL INTO NAME.
CONDENSE NAME.
IF NAST-NACHA NE '7'.
    CALL FUNCTION 'READ_TEXT'
      EXPORTING
CLIENT                        = SY-MANDT
        ID                            = 'STAM'
        LANGUAGE                      = SY-LANGU
        NAME                          = NAME
        OBJECT                        = 'OCS'
ARCHIVE_HANDLE                = 0
LOCAL_CAT                     = ' '
IMPORTING
HEADER                        =
      TABLES
        LINES                         = LINES
   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.
ENDIF.
CONCATENATE NAST-OBJKY '.PDF' INTO DOCNAME .
CONDENSE DOCNAME.
*endif.      "temp nato -080406
if reclist-rec_type eq 'U'.
    DOC_CHNG-OBJ_NAME   = 'Delivery'.
    LOOP AT LINES.
      OBJTXT = LINES-TDLINE.
      APPEND OBJTXT.
    ENDLOOP.
    DESCRIBE TABLE OBJTXT LINES TAB_LINES.
    IF TAB_LINES > 0.
      READ TABLE OBJTXT INDEX TAB_LINES.
      DOC_CHNG-DOC_SIZE = ( TAB_LINES - 1 ) * 255 + STRLEN( OBJTXT ).
    ENDIF.
    CLEAR OBJPACK-TRANSF_BIN.
    OBJPACK-HEAD_START = 1.
    OBJPACK-HEAD_NUM   = 0.
    OBJPACK-BODY_START = 1.
    OBJPACK-BODY_NUM   = TAB_LINES.
    OBJPACK-DOC_TYPE   = 'RAW'.
    APPEND OBJPACK.
    DESCRIBE TABLE OBJBIN LINES TAB_LINES.
    OBJHEAD            = DOCNAME.
    APPEND OBJHEAD.
    OBJPACK-TRANSF_BIN = 'X'.
    OBJPACK-HEAD_START = 1.
    OBJPACK-HEAD_NUM   = 1.
    OBJPACK-BODY_START = 1.
    OBJPACK-BODY_NUM   = TAB_LINES.
    OBJPACK-DOC_TYPE   = 'PDF'.
    OBJPACK-OBJ_NAME   = 'Delivery'.
OBJPACK-OBJ_DESCR = NAST-OBJKY.
    OBJPACK-OBJ_DESCR = A_EBELN.
    OBJPACK-DOC_SIZE   = TAB_LINES * 255.
    APPEND OBJPACK.
    break nhernandez.
    CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
      EXPORTING
         DOCUMENT_DATA                    = DOC_CHNG
    PUT_IN_OUTBOX                    = 'X'
COMMIT_WORK                      = ' '
IMPORTING
SENT_TO_ALL                      =
NEW_OBJECT_ID                    =
      TABLES
       PACKING_LIST                     = OBJPACK
       OBJECT_HEADER                    = OBJHEAD
       CONTENTS_BIN                     = OBJBIN
       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 <> 0.
      MESSAGE E081(ZGLO) WITH SY-SUBRC RAISING MAIL_SENDING_ERROR.
    ENDIF.
endif.
AM I missing something?

Hi Nat,
You can check this link which shows how to use the PRINT_TEXT for sending fax.
http://www.sap-img.com/abap/sending-fax-from-abap.htm
Also you can check these
Smartforms
Sending Smartforms through Fax
Sending SMARTFORM output to FAX gateway
How to fax a smartform?
/people/pavan.bayyapu/blog/2005/08/30/sending-html-email-from-sap-crmerp
ftp
Cheers
VJ

Problem in invoice correction (ZRK) with deleted territories.

Dear Gurus,
When invoice correction is created for invoices with deleted territories the correction(ZRK) should go to the new territory but it doesn't happen in the following case.Some time ago we were closing territories by changing account group from ZTERR to ZOTR type and when creating ZRK it worked as desired like Invoice correction request the territory partner was changed both on header and on item level. But last year we were asked to stop using ZOTR for closed territories and to mark deletion flag instead.
Since then we have problem that the new territory is not reflected in the invoice correction and always the old territory is reflected in the invoice. How to correct this?
Can you please assisst. .
Thanks and kind regards,
Ricky

Hello,
I think some technical details are necessary.
- what is the technical name of field "Territory" ?
- What is the link between the Territory and the account group ?
- where did you set deletion flag ? By which transaction ?
Thank you.
Best regards,
Ivano.

Problem secondary invoice approval workflow

Hi
i have problem when i run the secondary invoice appoval concurrent program
i am not getting any notification
but i can see a record in the wf_items table..
can u pls help me out
What the process does :
by running the concurrent program ‘ HC Secondary Invoice Approval Workflow ‘ which trigger
The Secondary Invoice Approval workflow .
What happens when workflow is triggered;
Workflow will start for any invoice that has a secondary approval hold applied and does not have a workflow already in progress..
If all the lines of an invoice are approved then the secondary approval hold on the invoice is released by the workflow..
So this is the processs..
Minimum requirement for the workflow to run is
Any Invoice with a secondary approval hold on it…….
we are trying with this but I CAN see the record in wf_items and
item_activity_statusses but I cant find in the wf_notifications
please help me out thanks
sesh..

Hello Akkshaya,
Seems , attachment pass automatically and it is not passing in your case, Check the binding and pass the attachment from workflow container to task container.
Element Name is Attachement both in task and workflow container.
Cheers,
Arti

Periodic Billing: Invoicing with VF01 vs VF04

Hello,
I have created a basic billing plan for a rental contract. The contract is for 12 months (01.01.-31.12.2011)
Billing date is at month end. Billing plan type is 02 = periodic and does NOT have a billing block assigned to it.
Now I would like to create an invoice with VF01 for the month of January i.e. I go into VF01 and put in billing date 31.01.2011 but the system gives me all 12 items.
When I use VF04 and also enter billing date to 31.01.2011 it gives me only the first invoice for January (which is correct).
Why is the functionality in VF01 different to VF04? Why does VF01 not pull in the first item only (even though I enter billing date 31.01.2011)?
What am I doing wrong here?
Thanks in advance.

Hello,
the field 'Billing date' in first screen of VF01 is the Default billing date, it is not a selection criteria.
To select by billing date in VF01 select menu Settings > Selection date.
Best regards,
Ivano.

My Invoice no(VF01) will same as Excise invoice(j1iin)

Hi,
Experts
want same number of Excise invoice(J1IIN) as well as invoice(VF01)
My configuration is at the time of saving the invoice through (VF01) Excise invoice should be automatically generated. for that how to mantain my number range of INVOICE according my document types and where to assign the number ranges then when will come Excise invoice how to mantain the number ranges and where.pls tell me in briefly- for which i will clarify for this senario.
thanks
sunil

HI Sunil,
You can maitain number ranges in SNUM for document types and this number give in the document type.For Excise go to J1I9 and maintain for local J_1IEXCLOC and for exports J_1IEXCEXP.Excise invoice is year dependentYou can give the same number ranges for both.
Hope this will help
RV

Po Print when invoice is posted

Hello Gurus,
I still have the problem of PO priniting when invoice is posted thru idoc.
Please let me know where to check and avoid this.
Helpfull answers will be rewarded
regards
suresh

hi,
please go to MN05 and check
click on comminucations tab
mention the output and check
ME9F-->print PO
Thanks & Regards
Swathi

I have an Epson printer on a Wifi network. Windows 7 desktop and and HP Win 7 laptop (my wifes) print to it just fine. My MacBook Pro running Yosemite won't detect it, and I have the latest driver installed. No problem when I had a Canon...

I have an Epson printer on a Wifi network. Windows 7 desktop is running the network, and my wife's HP Win 7 laptop prints to it just fine. My MacBook Pro running Yosemite won't detect it, and I do have the latest driver installed. I didn't have a problem when I had a Canon Pixma on the network, but when I replaced it with the Epson nothing seems to work. I go to add a printer to the queue and only the FAX function of the printer shows up - not the WS-4530 print function. Does anyone out there have any suggestions? Please??? :-)

Hi Kelly,
As someone who has to print from my Mac to a networked printer at home all the time, I can certainly understand how frustrating it must be to have that fail to perform as expected. Let's see if we can get you up and running.
I would suggest that you troubleshoot using the steps in this article -
OS X Yosemite: Printing troubleshooting
Start with the section titled Check the network.
Thanks for using Apple Support Communities.
Sincerely,
Brett L

How do I stop Firefox from creating untitled web pages when I try to send email from a web page. The only way I have found is to turn the computor off and then reboot. I don't have this problem when using Internet Explorer

Every time I click on a web site that has an email option the browser starts making untitled web pages and never stops unless I turn the computer off. It is very frustrating to not be able to use an email option when offered by a web site. The only way I can send email messages on the Firefox browser is to go into my hotmail acct. and copy and paste the addresses. I don't have this problem when I use the Internet Explorer browser.

See [[Firefox keeps opening many tabs or windows]]

Firefox gets problems when 2,7 GB of memory is used by Firefox

Firefox gets problems when 2,7 GB of memory is used by Firefox. Or more. Like 2,8 GB.
It started when I read jpost.com with tens of tabs open. I don't remember how many. But I know there was more than 40.
On the tab I that I was reading, the page turned completely black. Pitch black with nothing else, not even the Firefox interface. It was actually a pitch black shape that looked like a web page in shape. The blackness quickly disappeared and the page was normally readable again. But then it happened again - the page turned black again.
The same page turns black happened again later.
One of my browsing sessions had Firefox slow down so much that you could see scrolling happening when I used scrolling.
Still another time I had 60 tabs open and Firefox worked completely fine without freezes, slowdowns, or black shapes. I could close Firefox by just pressing the red X in the title bar.
Yesterday, I had 50 tabs open and I experienced a slowdown when I looked at the Breaking News headlines. The headlines would show slower than usual. The Breaking News headlines at jpost.com show the headlines a few words at a time until the headline is completely shown. Then the headline disappears and the next starts showing a few words at a time. And speed in general was not what you normally have with a computer that has 8 GB of memory. And a Core i5 processor. I opened two more tabs from the Breaking News section I had opened. After I opened a new window, Firefox froze. I had to close Firefox from the Task Manager by pressing End process. I had used Firefox for 6 hours without ever closing any of the tabs I had opened.
In all of these cases, more than 40 tabs were open. In all of these cases, the slow down or freeze meant I had to use Task Manager and then press End process on the Processes tab. In all cases except the two I describe in the next paragraph, I never close any tabs after opening them. No problems have ever happened until Firefox started using 2,7 GB of memory. Until that point, everything is normal with no freezes or slowdowns.
At two times, I tried to reduce memory usage by closing tabs. However, in both cases this would make Firefox freeze. In one of these cases, Firefox would show something bizarre: there would be about 7 tabs, and one of the tabs would be partly shown. Also, Firefox would show the busy cursor. Firefox did not show how many tabs I actually had. The second time, I tried to close the tabs by clicking Close other tabs in the menu that you get when right-click a tab. The tabs would close fine, but I remember that I opened Gmail and then I did this: I clicked on the Promotions tab. Instead of seeing the tab with the Emails, Firefox showed a busy cursor and the title bar said not responding. Firefox froze.
The reason might be Adblock Plus memory usage. In Adblock Plus home page, developer Wladimir Palant writes in his blog about how Adblock Plus uses a lot of memory: https://adblockplus.org/blog/on-the-adblock-plus-memory-consumption .

One more bit of information: I have a Geforce 640 GT graphics card. My graphics card drivers are old- version 311.41. The newest version of the drivers is 340.52. Would a new graphics card driver solve the problem?

Problem when I execute program SCM in background

Hi experts,
    I am with problem when I execute a program (SCM) in background. I inserted a new field (estoque_seg(10)) and the process stopped at execute in background.When I call transaction and press F8, works but for this, I need jump the consistence IF sy-batch IS INITIAL....Dont has any bath imput, only functions. Any idea?
Follow below the code:
Estrutura para tabela ENTRADA
DATA: BEGIN OF st_entrada,
        matnr(40)            TYPE c,
        werks(20)            TYPE c,
        ponto_abas(10)       TYPE c,
        estoque_max(10)      TYPE c,
        cobertura(10)        TYPE c,
        estoque_seg(10)      TYPE c, " Erlon Lourenço 20/01/2011
      END OF st_entrada.
Estrutura para tabela de LOG
*TYPES: BEGIN OF st_saida,
       pernr(8)             TYPE c ,
       date(10)             TYPE c,
       er_contribuition(15) TYPE c,
       tax(15)              TYPE c,
       msg_erro(80)         TYPE c,
     END OF st_saida.
Tabela para obter descricao da mensagem
*DATA: ti_saida TYPE STANDARD TABLE OF st_saida WITH HEADER LINE
                                              INITIAL SIZE 0.
Tabela que recebera o arquivo texto
DATA: BEGIN OF ti_entrada OCCURS 0.
        INCLUDE STRUCTURE st_entrada.
DATA: END OF ti_entrada.
DATA: BEGIN OF it_matid OCCURS 0,
matnr TYPE /sapapo/matkey-matnr,
matid TYPE /sapapo/matkey-matid,
END OF it_matid.
DATA: BEGIN OF it_locid OCCURS 0,
locno TYPE /sapapo/loc-locno,
locid TYPE /sapapo/loc-locid,
END OF it_locid.
DATA: BEGIN OF it_matlotsz OCCURS 0,
target_dur TYPE /sapapo/matlotsz-target_dur,
END OF it_matlotsz.
DATA:        wa_matloc       LIKE /sapapo/matloc   OCCURS 0 WITH HEADER LINE,
             wa_matlsim      LIKE /sapapo/matlsim OCCURS 0 WITH HEADER LINE,
             wa_matlotsz     LIKE /sapapo/matlotsz OCCURS 0 WITH HEADER LINE.
Variáveis Globais
DATA: v_tabix   TYPE sy-tabix,
      v_vrsioid TYPE /sapapo/apo01-vrsioid,
      v_tam     TYPE i.
    Select-Options & Parameters
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: p_versao    TYPE /sapapo/apo01-vrsioex OBLIGATORY DEFAULT '000',
             p_abas AS CHECKBOX ,
             p_est   AS CHECKBOX ,
             p_cober AS CHECKBOX ,
             p_estsg AS CHECKBOX.   " ERLON LOURENCO - 20/01/2012 - Estoque Segurança
SELECTION-SCREEN END OF BLOCK b1.
    Start-of-Selection
START-OF-SELECTION.
PERFORM consiste.
PERFORM f_upload.
PERFORM f_processa_batch.
PERFORM f_saida_dados.
MESSAGE i000 WITH 'Processo encerrado com Sucesso'.
END-OF-SELECTION.
*&      Form F_UPLOAD
      text
--> p1        text
<-- p2        text
FORM f_upload .
DATA: lc_file TYPE string.
TYPES: BEGIN OF st_ent,
            cam(80),
         END OF st_ent.
DATA: ti_ent TYPE STANDARD TABLE OF st_ent WITH HEADER LINE
                                              INITIAL SIZE 0.
RANGES: r_file       FOR zget0001-field_content.
r_file[] = zbs_constantes=>obter( i_bukrs = space i_field = 'FILE' i_process = 'PONTO-REAB' ).
READ TABLE r_file INDEX 1.
lc_file = r_file-low.
CLEAR: ti_entrada,
         ti_entrada[],
         ti_ent,
         ti_ent[].
abrir arquivo para leitura
OPEN DATASET lc_file FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc NE 0.
    MESSAGE i000 WITH text-e01.
    STOP.
ENDIF.
Leitura de arquivos
DO.
    READ DATASET lc_file INTO ti_ent.
    IF sy-subrc <> 0.
      EXIT.
    ENDIF.
    APPEND ti_ent.
ENDDO.
Fechamento do arquivo
CLOSE DATASET lc_file.
LOOP AT ti_ent.
    SPLIT ti_ent AT ';' INTO ti_entrada-matnr ti_entrada-werks ti_entrada-ponto_abas ti_entrada-estoque_max ti_entrada-cobertura ti_entrada-estoque_seg.
    APPEND ti_entrada.
ENDLOOP.
ENDFORM.                    " F_UPLOAD
*&      Form F_PROCESSA_BATCH
      text
--> p1        text
<-- p2        text
FORM f_processa_batch .
LOOP AT ti_entrada.
    v_tabix = sy-tabix.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input = ti_entrada-matnr
      IMPORTING
        output = ti_entrada-matnr.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input = ti_entrada-ponto_abas
      IMPORTING
        output = ti_entrada-ponto_abas.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input = ti_entrada-estoque_max
      IMPORTING
        output = ti_entrada-estoque_max.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input = ti_entrada-cobertura
      IMPORTING
        output = ti_entrada-cobertura.
IA - ERLON LOURENCO - 20/01/2012
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input = ti_entrada-estoque_seg
      IMPORTING
        output = ti_entrada-estoque_seg.
FA - ERLON LOURENCO - 20/01/2012
    MODIFY ti_entrada INDEX v_tabix.
ENDLOOP.
CLEAR: it_matid,
         it_matid[],
         it_locid,
         it_locid[],
         wa_matlsim,
         wa_matlsim[],
         wa_matloc,
         wa_matloc[].
SELECT matnr matid INTO TABLE it_matid FROM /sapapo/matkey
FOR ALL ENTRIES IN ti_entrada WHERE matnr = ti_entrada-matnr.
SELECT locno locid INTO TABLE it_locid FROM /sapapo/loc
FOR ALL ENTRIES IN ti_entrada WHERE locno = ti_entrada-werks.
IF p_versao = '000'.
    LOOP AT ti_entrada.
      READ TABLE it_matid WITH KEY matnr = ti_entrada-matnr.
      IF sy-subrc = 0 .
        READ TABLE it_locid WITH KEY locno = ti_entrada-werks.
        IF sy-subrc = 0.
          SELECT SINGLE * INTO wa_matloc FROM /sapapo/matloc WHERE matid = it_matid-matid AND
                                                                   locid = it_locid-locid.
          IF sy-subrc = 0.
            IF p_abas = 'X'.
              wa_matloc-reord    = ti_entrada-ponto_abas.
            ENDIF.
            IF p_est = 'X'.
              wa_matloc-maxstock = ti_entrada-estoque_max.
            ENDIF.
            " IA - Erlon Lourenço - 23/01/2012
            if p_estsg = 'X'.
              wa_matloc-safty    = ti_entrada-estoque_seg.     " Erlon Lourenço - 23/01/2012
            endif.
            "FA - Erlon Lourenço - 23/01/2012
            IF p_abas = 'X'   OR
               p_est   = 'X'   OR
               p_estsg = 'X'.      " Erlon Lourenço - 23/01/2012
              APPEND wa_matloc TO wa_matloc.
            ENDIF.
            SELECT SINGLE * INTO wa_matlotsz FROM /sapapo/matlotsz WHERE lszid = wa_matloc-lszid.
            IF sy-subrc = 0.
              IF p_cober = 'X'.
                wa_matlotsz-target_dur = ti_entrada-cobertura.
                APPEND wa_matlotsz TO wa_matlotsz.
              ENDIF.
            ENDIF.
          ENDIF.
        ENDIF.
      ENDIF.
    ENDLOOP.   " LOOP AT ti_entrada.
ELSE.
Verifica versáo para saber se preenche a tabela wa_matlsim
    SELECT SINGLE vrsioid INTO v_vrsioid FROM /sapapo/apo01 WHERE vrsioex = p_versao.
    IF sy-subrc = 0.
      SELECT * INTO TABLE wa_matlsim FROM /sapapo/matlsim WHERE simid = v_vrsioid.
      IF wa_matlsim[] IS NOT INITIAL.
        LOOP AT ti_entrada.
          READ TABLE it_matid WITH KEY matnr = ti_entrada-matnr.
          IF sy-subrc = 0 .
            READ TABLE it_locid WITH KEY locno = ti_entrada-werks.
            IF sy-subrc = 0.
              READ TABLE wa_matlsim WITH KEY matid = wa_matloc-matid
                                             locid = wa_matloc-locid.
              IF sy-subrc = 0.
                wa_matlsim-reord    = ti_entrada-ponto_abas.
                wa_matlsim-maxstock = ti_entrada-estoque_max.
                wa_matlsim-safty    = ti_entrada-estoque_seg.     " Erlon Lourenço - 23/01/2012
                MODIFY wa_matlsim INDEX v_tabix.
              ENDIF.
            ENDIF.
          ENDIF.
        ENDLOOP. " LOOP AT ti_entrada.
      ENDIF.     " IF wa_matlsim[] IS NOT INITIAL.
    ENDIF.     " IF sy-subrc = 0. 1º
ENDIF.     "IF p_versao = '000'
Funcáo que atualiza campos nas bases de dados.
CALL FUNCTION '/SAPAPO/DM_PRODUCTS_POST'
    EXPORTING
      iv_vb         = 'U'
    TABLES
      it_matloc     = wa_matloc
      it_matlsim    = wa_matlsim
      it_matlotsz   = wa_matlotsz
    EXCEPTIONS
      not_qualified = 1
      insert_failed = 2
      update_failed = 3
      OTHERS        = 4.
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.                    " F_PROCESSA_BATCH
FORM BDC_DYNPRO
*&      Form F_SAIDA_DADOS
      text
--> p1        text
<-- p2        text
FORM f_saida_dados .
IF ti_saida[] IS NOT INITIAL.
   DATA: lc_file TYPE string.
   lc_file = p_erros.
   CALL FUNCTION 'GUI_DOWNLOAD'
     EXPORTING
BIN_FILESIZE                    =
       filename                        = lc_file
FILETYPE                        = 'ASC'
     TABLES
       data_tab                        = ti_saida
FIELDNAMES                      =
    EXCEPTIONS
      file_write_error                = 1
      no_batch                        = 2
      gui_refuse_filetransfer         = 3
      invalid_type                    = 4
      no_authority                    = 5
      unknown_error                   = 6
      header_not_allowed              = 7
      separator_not_allowed           = 8
      filesize_not_allowed            = 9
      header_too_long                 = 10
      dp_error_create                 = 11
      dp_error_send                   = 12
      dp_error_write                  = 13
      unknown_dp_error                = 14
      access_denied                   = 15
      dp_out_of_memory                = 16
      disk_full                       = 17
      dp_timeout                      = 18
      file_not_found                  = 19
      dataprovider_exception          = 20
      control_flush_error             = 21
      OTHERS                          = 22
   IF sy-subrc <> 0.
     MESSAGE i005 WITH 'Error to unload file !'.
     STOP.
   ENDIF.
ENDIF.
ENDFORM.                    " F_SAIDA_DADOS
*&      Form CONSISTE
      text
--> p1        text
<-- p2        text
FORM consiste .
IF p_abas IS INITIAL AND
     p_est   IS INITIAL AND
     p_cober IS INITIAL AND
     p_estsg IS INITIAL.   " ERLON LOURENCO - 20/01/2012 - Estoque Segurança
    MESSAGE i000 WITH text-e03.
    STOP.
ENDIF.
IF sy-batch IS INITIAL.
    MESSAGE i000 WITH text-e02.
    STOP.
ENDIF.
Best regards,
Erlon Lourenço
Edited by: Erlon Louren on Jan 27, 2012 11:09 AM

Hi Raja,
            Check weather there are any enhancements to the datasource.If yes once check the code in CMOD.Seems there is some discrepency in that.
Regards
Karthik

Problem when invoice in VF01

Similar Messages

Maybe you are looking for