Billing printing
Hello
I need some help about a strange problem during the print preview of different billing in a EHP4 FOR SAP ERP 6.0 / NW7.01 .
In SP01 i see the spool with (for example) 6 pages to print. In print preview , i can see only 3 pages.
If i print with my locl printer i have 6 pages correctly but if i use the report RSTXPDFT4 to download in PDF the spool i have only 3 pages.
How can i solve this problem please?
Thanks
Nicola
The problem is the following:
My system has several application servers in multi platform operative system (Solaris and Linux) with different codepages.
the spool is created using different report (in my case 6 report)
3 of them were run in solaris system and other 3 in linux system.
The spool preview doesn't able to manage different codepages in print preview and sap should find a solution in few days.
no problem instead for the printing using local or other printer because the note 1130679 solves the problem.
Thanks all
Nicola
Similar Messages
-
BPA Balance Forward Bill Print Program
Hi All,
Please help me in "***Balance Forward Billing in R12***" and i done all process but bill not generate through concurrnet program.
Regards,
YasirThanks tarun,
As you said its possible to exclude specific invoices from the BFB. My question is if all the invoices of a customer is balance forward bill enabled, is it also possible to to print the invoices separately still being balance forward bill enabled ??
My requirement is that i shouldn't be able to print them separately when balance forward bill enabled.
Raja -
Balance forward billing- Printing separate invoices.
Hi all,
Ii am working on Balance Forward Billing in R12. Most of us know that BFB is used to consolidate several bills into a single bill for customers. My question is:
When a Balance Forward BIlling is enabled at customer level, is it possible to print the invoices separately before the balance forward bill is generated ??
If its possible to print the invoices separately, is it possible to stop from doing that ??
Thanks in advance.
Cheers.
Edited by: 878712 on Aug 10, 2011 6:31 PMThanks tarun,
As you said its possible to exclude specific invoices from the BFB. My question is if all the invoices of a customer is balance forward bill enabled, is it also possible to to print the invoices separately still being balance forward bill enabled ??
My requirement is that i shouldn't be able to print them separately when balance forward bill enabled.
Raja -
Hi All,
Currently I am printing this using Reportwizard, but I have to do this by using POS Printer.
I need to print a receipt by programming in C# to a POS Printer
this data will be populated from database as a data table. All it needs to do is print a sample receipt that shows the table as shown below.
This is the format that i am looking for
ABCDEF Pte. Ltd.
123 My Street, My City,
My State, My Country
012-3456789
DATE : 01/01/1970
CASHIER : ABCDEF
item(width 5cm) qty(width 1cm) Unit Price (width 2cm) Total (width 2cm)
================================================================
Item 1 10 9.99 99.99
Item 2 101 0.00 0.00
Item 3 9 0.10 0.90
Item 4 1000 1.00 1000.00
SUB-TOTAL 1.00
TAX 0.10
DISCOUNT 0.10
TOTAL 0.80
THANK YOU FOR CHOOSING ABC Pte. Ltd.
Please post the sample code for printing datatable at a time. I am using EPSON TM-T111V8 Printer.
Thanks in AdvanceHi Yort,
Thanks for your answer, now i am able to cut the paper size as i reqired. As i am testing my application, while keep on printing the Reciepts, runtime issues occured in the application. not able to know the reason why they come and one more, some times the printer is hangup for some time.
Could you please let me know what might be the reason. here the sample code and error message in detail.
try
//Prepare PrinterHeader
string sHeader = Environment.NewLine +" XYZ " + Environment.NewLine +" www.xyz.com " + Environment.NewLine +" Sales : 400 " + Environment.NewLine +" Welcome : 123 " + Environment.NewLine + "--------------------------------------" + Environment.NewLine;
oPrinter.PrintNormal(PrinterStation.Receipt, sHeader);
//Print Bill Info
foreach (DataRow dr in ds.Tables[0].Rows)
iCount++;
str += "Customer Id" + dr["CustomerId"].ToString() + "--" + dr["TotalAmount"].ToString() + Environment.NewLine;
oPrinter.PrintNormal(PrinterStation.Receipt, str);
//Printer Footer
string sFooter = Environment.NewLine +"----------------------------------------" + Environment.NewLine + " Note : (*) Are Loyalty Incentives " + Environment.NewLine +" Thank You For Visiting " + Environment.NewLine + "----------------------------------------" + Environment.NewLine;
oPrinter.PrintNormal(PrinterStation.Receipt, sFooter);
//Print EmptyLines
string sEmptyLines = string.Empty;
sEmptyLines = Environment.NewLine +Environment.NewLine +Environment.NewLine +Environment.NewLine +Environment.NewLine +Environment.NewLine;
oPrinter.PrintNormal(PrinterStation.Receipt, sEmptyLines);
//Cut the Paper
oPrinter.CutPaper(1);
catch (Exception ex)
MessageBox.Show(ex.ToString());
Error Message :
Microsoft.PointOfService.PosControlException: It could not complete output within the specified period. at jp.co.epson.upos.trace.pntr.CommonPosPrinterTraceService.PrintNormal(PrinterStation station, String data) at MSR1.frmPoleDisplay.button1_Click(Object sender, EventArgs e) in D:\C Drive Backup\POS Driver Implementation\CS_Examples\CS_Examples\MSR1\MSR1\frmPoleDisplay.cs:line 201ErrorCode: FailureErrorCodeExtended: 1007 -
Paper Roll up for Bill Printing
Dear Gurus,
As per my requirement i should take print outs of bills of paper
size 8 inches width and 4 inches height. I have created my own page format to suit the above specifications.There is no problem with printing but the paper eject after printing is skipping two continuous bil slips and the next number is printing on the fourth bill slip only.
How should we avoid this slips rolling?
Thanks in advance.
Regards,
ShanojHi
You will have to create a new device type & attach your page format to it.
Along with this you will have to do settings in SPAD transaction
for breaking page. These settings are genrally done by Basis consultants.
Thanks & Regards
Harshada -
Bill print information message
Hi, I'm getting this information message in Bill Preview option of transaction code EA40.
Message no. EB152 (Test print: Cannot be archived)
Why is this happening?No worries ... this message is simply to inform the user that this is not the real bill printout but just a test print where archiving is not provided.
Regards, Joe -
Hi Experts,
I have a requirement to develop a custom JV billing form using SAPSCRIPT. After investigating the print program, I found that I would need to customize the standard print program in order to produce the custom billing form.
I have finished the development of the program and the form, but am having difficulties with the settings in SPRO.
Configuration was done through TCODE GJ81.
From my past experience, such as in PO form configuration, we can easily change the print program and use the matching form to be used for the print program. In the billing configuration, but here it seems that I cannot change the print program only the form.
Does anyone know how I can change the print program also?
Many thanks in advance for your kind help,
Best regards,
FandiDoes any one has any lead on this?
I have tried posting an OSS message and are currently are waiting for their response to the matter. -
BPA Balance Forward Bill Print Program template (rel 12.0.5)
Hello,
Has any one tried to get the xml file for this concurrent program?
This is the only program that has beginning balance in it's out put. I tried Statements and Invoice Print program but either of them do not spit the beginning balance unless you customize it. If any one has worked with this, could you please share the template and the process to get the xml file from this program?
Here's my e-mail: [email protected]
Regards,
SriniYour question was "... but the font on the footer is much larger than that of the template", yes?
I only can repeat, look at the difference of:
1. index.html (Font-size > medium) >
2. Calendar.html (Font-size > no entry):
> "... font on the footer is much larger than that of the template",
Hans-Günter
P.S.
See us again - maybe - at Monday > we will do a nice little trip to Austria. -
Set print-output as default in Billing
Dear Friends,
To take a billing print out in SD module, we are using VF03 -> Inputing the Billing Document number -> Clicking the Billing Document option from the menu bar -> Selecting the Issue Output to -> (this gives the print output window) and here we have to select the message type eg. RD00 and click on the Print button.
Every time we have select the message type and go for the print option.
I need your help to set the message type RD00 as default on opening the print output window.
Please guide me to set the message type RD00 as default selection.
TIA.
Regards,
VincentHi,
If you have already maintain output determination procedure,you need to create condition record for the output condition type for invoice-standard (RD00) or your own condition type which you have maintain for invoice output.o to VV31 select your condition type and enter and give the required details(sales org,customer)press enter and give the language,select the line and click on communication to give the printer details and save.
Thanks
siva.k -
Print smartform from background
Dear Experts,
I have requirement to create delivery then create bill automatically so i open background job from program (A) and submit the creating program for bill (B) via this job what happened is the delivery creating is ok, the delivery printing is ok and the billing creation is ok but the billing printing program (C) is not ok where the spool is creating with status waiting so can any body help how to print from background job??
program (A) (Create backgroundjob and submit program via it)
FORM USEREXIT_SAVE_DOCUMENT.
DATA: jobcount TYPE tbtcjob-jobcount,
new_time type TBTCJOB-SDLSTRTTM.
data : p_vbeln TYPE likp-vbeln.
DATA : v_JOB_WAS_RELEASED LIKE BTCH0000-CHAR1.
break rurik.
if T180-TRTYP = 'H'
and ( likp-lfart = 'ZDCF'
or likp-lfart = 'ZDCI'
or likp-lfart = 'ZDCO'
or likp-lfart = 'ZDCP'
or likp-lfart = 'ZDCR'
or likp-lfart = 'ZDOB'
or likp-lfart = 'ZDOT'
or likp-lfart = 'ZDQT'
or likp-lfart = 'ZDRE' - Ian
or likp-lfart = 'ZDSO').
CALL FUNCTION 'JOB_OPEN'
EXPORTING
jobname = 'SD_AUTOMATION'
SDLSTRTDT = NO_DATE
SDLSTRTTM = NO_TIME
JOBCLASS =
IMPORTING
JOBCOUNT = jobcount
CHANGING
RET =
EXCEPTIONS
CANT_CREATE_JOB = 1
INVALID_JOB_DATA = 2
JOBNAME_MISSING = 3
OTHERS = 4.
SUBMIT zsd_create_billing_document
with vbeln EQ LIKP-VBELN
AND RETURN
VIA JOB 'SD_AUTOMATION'
NUMBER jobcount.
new_time = sy-uzeit + 10. "short delay
CALL FUNCTION 'JOB_CLOSE'
EXPORTING
jobcount = jobcount
jobname = 'SD_AUTOMATION'
STRTIMMED = 'X'
SDLSTRTDT = sy-datum
SDLSTRTTM = new_time
IMPORTING
JOB_WAS_RELEASED = v_JOB_WAS_RELEASED
EXCEPTIONS
CANT_START_IMMEDIATE = 1
INVALID_STARTDATE = 2
JOBNAME_MISSING = 3
JOB_CLOSE_FAILED = 4
JOB_NOSTEPS = 5
JOB_NOTEX = 6
LOCK_FAILED = 7
INVALID_TARGET = 8
OTHERS = 9
ENDIF.
ENDFORM.
Program B (Creat bill)
REPORT zsd_create_billing_document
NO STANDARD PAGE HEADING LINE-SIZE 255.
TABLES: vbup, vbak, vbuk.
DATA: bdcdata LIKE bdcdata OCCURS 0 WITH HEADER LINE.
DATA done(1).
PARAMETERS vbeln TYPE likp-vbeln.
DATA sal_vbeln TYPE vbeln..
DATA messtab LIKE TABLE OF bdcmsgcoll WITH HEADER LINE.
DATA billing_doc TYPE vbeln.
DATA messagetext(200).
MESSAGE s002(zsd).
WRITE: / vbeln.
DATA : v_print TYPE i.
CALL FUNCTION 'ENQUEUE_EVVBLKE'
EXPORTING
MODE_LIKP = 'E'
MANDT = SY-MANDT
vbeln = vbeln
X_VBELN = ' '
_SCOPE = '2'
_wait = 'X'
" _wait = space
_COLLECT = ' '
EXCEPTIONS
foreign_lock = 1
system_failure = 2
OTHERS = 3
MESSAGE s005(zsd).
*In case ZSOT automatic billing once we create delivery and post goods issue manual.
SELECT SINGLE vbelv
FROM vbfa
INTO sal_vbeln
WHERE vbeln = vbeln
AND vbtyp_v = 'C'.
SELECT SINGLE *
FROM vbak
WHERE vbeln = sal_vbeln.
import v_print to v_print FROM MEMORY id 'PRINTFLAG'.
IF vbak-auart EQ 'ZSOT'.
IF v_print eq '1'.
PERFORM create_document USING vbeln
CHANGING sy-subrc.
ENDIF.
ELSE.
*Other than ZSOT Post Goods issue from ZPGI2 and from there automatic billing.
ENDIF.
*& Form CREATE_DOCUMENT
text
-->P_VBELN text
FORM create_document USING p_vbeln
CHANGING sysubrc.
PERFORM bdc_dynpro USING 'SAPMV60A' '0102'.
PERFORM bdc_field USING 'BDC_CURSOR'
'KOMFK-VBELN(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'KOMFK-VBELN(01)'
p_vbeln."'1130010202'.
PERFORM bdc_dynpro USING 'SAPMV60A' '0104'.
PERFORM bdc_field USING 'BDC_CURSOR'
'VBRK-FKART'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=SICH'.
CALL FUNCTION 'DEQUEUE_EVVBLKE'
EXPORTING
MODE_LIKP = 'E'
MANDT = SY-MANDT
vbeln = vbeln
X_VBELN = ' '
_SCOPE = '3'
_SYNCHRON = ' '
_COLLECT = ' '
CALL TRANSACTION 'VF01' USING bdcdata
MODE 'N'
UPDATE 'S'
MESSAGES INTO messtab.
READ TABLE messtab WITH KEY msgtyp = 'E'.
IF sy-subrc EQ 0.
sysubrc = 4.
ELSE.
sysubrc = 0.
ENDIF.
LOOP AT messtab.
sy-msgty = messtab-msgtyp.
sy-msgid = messtab-msgid.
sy-msgno = messtab-msgnr.
sy-msgv1 = messtab-msgv1.
sy-msgv2 = messtab-msgv2.
sy-msgv3 = messtab-msgv3.
sy-msgv4 = messtab-msgv4.
CALL FUNCTION '/SAPTRX/GET_MESSAGE_TEXT'
EXPORTING
msgid = sy-msgid
msgno = sy-msgno
msgv1 = sy-msgv1
msgv2 = sy-msgv2
msgv3 = sy-msgv3
msgv4 = sy-msgv4
IMPORTING
messagetext = messagetext
EXCEPTIONS
no_message_retrieved = 1
OTHERS = 2.
WRITE: / messagetext.
CLEAR messagetext.
ENDLOOP.
*... refresh tables
REFRESH: messtab, bdcdata.
ENDFORM. "CREATE_DOCUMENT
*& Form BDC_DYNPRO
text
-->PROGRAM text
-->DYNPRO text
FORM bdc_dynpro USING program dynpro.
CLEAR bdcdata.
bdcdata-program = program.
bdcdata-dynpro = dynpro.
bdcdata-dynbegin = 'X'.
APPEND bdcdata.
ENDFORM. "BDC_DYNPRO
Insert field *
FORM bdc_field USING fnam fval.
CLEAR bdcdata.
bdcdata-fnam = fnam.
bdcdata-fval = fval.
APPEND bdcdata.
ENDFORM. "BDC_FIELD
*& Form change_status
text
--> p1 text
<-- p2 text
FORM change_status .
*Change status if delivery and the billing document has been created
SELECT *
FROM vbup
WHERE vbeln = vbeln
AND fksta NE 'C'.
vbup-fksta = 'C'.
vbup-gbsta = 'C'.
MODIFY vbup.
ENDSELECT.
UPDATE vbuk
SET fkstk = 'C'
gbstk = 'C'
WHERE vbeln = vbeln.
ENDFORM. " change_status
Program C (Print Bill)
REPORT z_sdps_invoice.
*& <Module>: SD Smart Forms.
*& Type : Executable
*& Request No.:
*& Author/Co. : Ahmed Al Eryani
*& Created On : 26.02.2007
*& Finished : 24.2007
*& Description:
*& MODIFICATION LOG
*& Modified by :
*& Request No. :
*& Dev. Class :
*& Date Modified:
*& Description :
TABLES: vbrk, kna1, vbrp, makt, konv, vbkd.
SELECTION-SCREEN BEGIN OF BLOCK a.
PARAMETER: p_vbeln LIKE vbrp-vbeln OBLIGATORY MATCHCODE OBJECT vmcf. "Billing document No
"SELECT-OPTIONS s_bukrs FOR bkpf-bukrs. "Company Code
SELECTION-SCREEN END OF BLOCK a.
*itab is object of our smart form structre
DATA: itab TYPE zsd_invoice OCCURS 0 WITH HEADER LINE.
DATA: wa_footer TYPE zsd_invv1.
DATA: t_items TYPE zsd_inv WITH HEADER LINE,
w_items TYPE LINE OF zsd_inv,
it_footer TYPE zsd_inv1,
w_footer TYPE LINE OF zsd_inv1.
DATA: amountspell LIKE spell.
DATA: g_fm_name TYPE rs38l_fnam.
DATA: mnumvflag(10) TYPE c.
DATA: coun TYPE i,
totalforitems TYPE kwert,
lasttotal(8) TYPE p DECIMALS 2,
lasttotalc(11) TYPE c,
firstpart(11) TYPE c,
secondpart(2) TYPE c.
DATA: currency TYPE waerk.
DATA: currtxet(50) TYPE c.
*Header internal table
DATA: BEGIN OF t_header OCCURS 0,
vbeln LIKE vbrk-vbeln,"Document no
name1 LIKE kna1-name1,"Customer Name
adrnr LIKE kna1-adrnr,"Customer Address
bstkd LIKE vbkd-bstkd,"
kunnr LIKE kna1-kunnr,"Customer Account no
waerk LIKE vbrk-waerk, "currency key
aubel LIKE vbrp-aubel,
kunrg LIKE vbrk-kunrg,
street LIKE adrc-street,
fkart LIKE vbrk-fkart,
lgort LIKE lips-lgort,"Stord bin
lgobe LIKE t001l-lgobe,
ktokd LIKE kna1-ktokd,
PSTYV LIKE vbrp-PSTYV,
orgbil LIKE vbfa-vbelv,
END OF t_header.
*detail internal table
DATA: BEGIN OF t_items1 OCCURS 0,
matnr LIKE vbrp-matnr,"Material Number
posnr LIKE vbrp-posnr,
vgpos LIKE vbrp-vgpos,
maktx LIKE makt-maktx,"Material Description
lgort LIKE vbrp-lgort,"Storage location
fkimg LIKE vbrp-fkimg,"
knumv LIKE vbrk-knumv,"
unitprice LIKE konv-kawrt,
total LIKE konv-kawrt,
waers LIKE konv-waers,
kkurs LIKE konv-kkurs,
vgbel LIKE vbrp-vgbel,
lgpbe LIKE lips-lgpbe,
vgtyp LIKE vbrp-vgtyp,
END OF t_items1.
DATA: v_belnr TYPE belnr_d.
*Unit price internal table
DATA: BEGIN OF t_untprice OCCURS 0,
kschl LIKE konv-kschl,"condition type
kawrt LIKE konv-kawrt,"unit price
END OF t_untprice.
*Condition(spcial deduction)
DATA: BEGIN OF t_spcialcnd OCCURS 0,
kschl LIKE konv-kschl,"condition type
kwert LIKE konv-kwert,"Deduction value
END OF t_spcialcnd.
DATA: t_tax LIKE TABLE OF t_spcialcnd WITH HEADER LINE,
v_tax LIKE konv-kwert.
DATA: BEGIN OF t_curtxt OCCURS 0,
ltext LIKE tcurt-ltext,
END OF t_curtxt.
DATA :return_code TYPE i," VALUE 999,
us_screen TYPE c. "VALUE 'X'.
declaration of data
INCLUDE rlb_invoice_data_declare.
definition of forms
INCLUDE rlb_invoice_form01.
INCLUDE rlb_print_forms.
START-OF-SELECTION.
"IF p_vbeln IS NOT INITIAL.
PERFORM entry USING return_code us_screen.
"ENDIF.
FORM ENTRY
FORM entry USING return_code us_screen.
DATA: lf_retcode TYPE sy-subrc.
CLEAR retcode.
xscreen = us_screen.
perform processing using us_screen
changing lf_retcode.
if lf_retcode ne 0.
return_code = 1.
else.
return_code = 0.
endif.
IF p_vbeln IS INITIAL.
p_vbeln = nast-objky.
ENDIF.
"get header data
SELECT SINGLE vbrk~vbeln vbrk~waerk vbrp~aubel vbrk~kunrg vbrk~fkart vbrp~lgort vbrp~PSTYV
INTO (t_header-vbeln, t_header-waerk, t_header-aubel, t_header-kunrg, t_header-fkart,
t_header-lgort, t_header-PSTYV)
FROM vbrk JOIN vbrp ON vbrp~vbeln = vbrk~vbeln
JOIN kna1 ON vbrk~kunrg = kna1~kunnr
WHERE vbrk~vbeln = p_vbeln.
IF t_header-PSTYV = 'ZREN'.
SELECT SINGLE VBELV
INTO t_header-orgbil
FROM vbfa
WHERE vbeln = p_vbeln
and VBTYP_V = 'M'.
ENDIF.
SELECT SINGLE t001l~lgobe
INTO t_header-lgobe
FROM t001l
WHERE t001l~lgort = t_header-lgort.
SELECT SINGLE kna1~name1 kna1~adrnr kna1~kunnr kna1~ktokd
INTO (t_header-name1, t_header-adrnr, t_header-kunnr, t_header-ktokd)
FROM kna1 "ON vbrk~kunrg = kna1~kunnr
WHERE kna1~kunnr = t_header-kunrg
AND spras = 'AR'.
IF t_header-name1 IS INITIAL.
SELECT SINGLE kna1~name1 kna1~adrnr kna1~kunnr kna1~ktokd
INTO (t_header-name1, t_header-adrnr, t_header-kunnr, t_header-ktokd)
FROM kna1 "ON vbrk~kunrg = kna1~kunnr
WHERE kna1~kunnr = t_header-kunrg
AND spras = 'EN'.
ENDIF.
IF t_header-ktokd = 'ZONE'.
SELECT SINGLE belnr
INTO v_belnr
FROM bkpf
WHERE xblnr = p_vbeln.
SELECT SINGLE name1
INTO t_header-name1
FROM bsec
WHERE belnr = v_belnr.
ENDIF.
SELECT SINGLE adrc~street
INTO t_header-street
FROM adrc
WHERE addrnumber = t_header-adrnr
AND langu = 'AR'.
IF t_header-street IS INITIAL.
SELECT SINGLE adrc~street
INTO t_header-street
FROM adrc
WHERE addrnumber = t_header-adrnr
AND langu = 'EN'.
ENDIF.
"get details data
SELECT vbrp~matnr vbrp~posnr vbrp~vgpos vbrp~fkimg
vbrk~knumv vbrp~matnr vbrp~vgbel vbrp~vgtyp"makt~maktx
INTO CORRESPONDING FIELDS OF TABLE t_items1
FROM vbrp "JOIN makt ON vbrp~matnr = makt~matnr
JOIN vbrk ON vbrp~vbeln = vbrk~vbeln
"join konv on vbrk~knumv = konv~knumv
WHERE vbrp~vbeln = p_vbeln
AND vbrp~fkimg NE '0.000'.
"AND makt~spras = 'E'.
break arasmy.
LOOP AT t_items1.
SELECT SINGLE lips~lgpbe
INTO t_items1-lgpbe
FROM lips
WHERE vbeln = t_items1-vgbel
AND posnr = t_items1-vgpos.
SELECT SINGLE makt~maktx
INTO t_items1-maktx
FROM makt
WHERE matnr = t_items1-matnr
AND makt~spras = 'EN'.
SELECT SINGLE konv~kbetr konv~kwert konv~waers konv~kkurs
INTO (t_items1-unitprice, t_items1-total, t_items1-waers,
t_items1-kkurs)
FROM konv
WHERE konv~kschl = 'NETW'"'ZSPC' "'ZSP1'
AND konv~knumv = t_items1-knumv
AND kposn = t_items1-posnr.
t_items1-unitprice = ( t_items1-total / t_items1-fkimg ) * t_items1-kkurs.
MODIFY t_items1.
mnumvflag = t_items1-knumv."Number of the document condition
ENDLOOP.
*get the deduction value for the document condiotion no
SELECT konvkschl konvkwert
INTO CORRESPONDING FIELDS OF TABLE t_spcialcnd
FROM konv
WHERE konv~kschl IN ('ZSSD', 'ZSCD', 'ZSDD', 'ZSPD', 'ZSWD', 'ZMW1', 'ZSGS', 'ZMW2')
AND konv~knumv = mnumvflag.
Get tax 10%
SELECT konvkschl konvkwert
APPENDING CORRESPONDING FIELDS OF TABLE t_tax
FROM konv
WHERE konv~kschl = 'MWST'
AND konv~knumv = mnumvflag.
itab-invn = t_header-vbeln.
itab-orgbil = t_header-orgbil.
itab-cusna = t_header-name1.
itab-addr = t_header-street.
itab-custn = t_header-kunrg.
itab-sord = t_header-aubel.
itab-fkart = t_header-fkart.
itab-lgort = t_header-lgort.
itab-lgobe = t_header-lgobe.
itab-PSTYV = t_header-PSTYV.
currency = t_header-waerk.
LOOP AT t_items1.
w_items-matn = t_items1-matnr.
w_items-matdes = t_items1-maktx.
w_items-stloc = t_items1-lgpbe."lgort.
w_items-qunt = t_items1-fkimg.
w_items-total = t_items1-total.
totalforitems = totalforitems + w_items-total.
COLLECT w_items INTO t_items.
endloop.
LOOP AT t_items1.
LOOP AT t_items WHERE matn = t_items1-matnr.
t_items-prc = t_items1-unitprice.
MODIFY t_items.
ENDLOOP.
ENDLOOP.
LOOP AT t_items.
coun = coun + 1.
t_items-itmn = coun.
MODIFY t_items.
ENDLOOP.
w_footer-totalforitems = totalforitems.
LOOP AT t_spcialcnd.
CASE t_spcialcnd-kschl.
WHEN 'ZSSD'.
w_footer-spdisc = w_footer-spdisc + t_spcialcnd-kwert.
WHEN 'ZSCD'.
w_footer-comdisc = w_footer-comdisc + t_spcialcnd-kwert.
WHEN 'ZSDD'.
w_footer-DIFMAT = w_footer-DIFMAT + t_spcialcnd-kwert.
when 'ZSPD'.
w_footer-trgtdisc = w_footer-trgtdisc + t_spcialcnd-kwert.
WHEN 'ZMW2'.
w_footer-comindisc = w_footer-comindisc + t_spcialcnd-kwert.
WHEN 'ZSWD'.
w_footer-cshdisc = w_footer-cshdisc + t_spcialcnd-kwert.
WHEN 'ZSGS'.
w_footer-stampsdisc = w_footer-stampsdisc + t_spcialcnd-kwert.
ENDCASE.
w_footer-ttldisc = w_footer-spdisc + w_footer-comdisc + w_footer-trgtdisc
+ w_footer-cshdisc + w_footer-DIFMAT + w_footer-stampsdisc.
ENDLOOP.
w_footer-aftrdiscnts = w_footer-totalforitems + w_footer-ttldisc.
LOOP AT t_tax WHERE kwert NE '0.00'.
w_footer-saltax = w_footer-saltax + t_tax-kwert.
ENDLOOP.
w_footer-totalaftrtax = w_footer-aftrdiscnts + w_footer-saltax.
w_footer-total = w_footer-totalaftrtax + w_footer-comindisc.
lasttotal = w_footer-total.
APPEND w_footer TO it_footer.
SELECT tcurt~ltext
INTO CORRESPONDING FIELDS OF TABLE t_curtxt
FROM tcurt
WHERE tcurt~spras = 'AR'
AND tcurt~waers = currency.
LOOP AT t_curtxt.
currtxet = t_curtxt-ltext.
ENDLOOP.
itab[] = t_header[].
lasttotalc = lasttotal.
SPLIT lasttotalc AT '.' INTO firstpart secondpart.
lasttotal = firstpart / 100.
CALL FUNCTION 'SPELL_AMOUNT'
EXPORTING
amount = lasttotal
currency = ''"CURRENCY
filler = space
language = 'A'
IMPORTING
in_words = amountspell
EXCEPTIONS
not_found = 1
too_large = 2
OTHERS = 3.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
--split amount--
BREAK radha.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
formname = 'Z_INVOICE_PARTS2'
VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
fm_name = g_fm_name
EXCEPTIONS
no_form = 1
no_function_module = 2
OTHERS = 3
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
DATA : control_parameters TYPE ssfctrlop,
print_options TYPE ssfcompop.
DATA : document_output_info TYPE ssfcrespd,
job_output_info TYPE ssfcrescl,
job_output_options TYPE ssfcresop.
DATA : count TYPE i.
control_parameters-langu = 'AR'.
control_parameters-no_dialog = 'X'."Don't show Dialog
print_options-tdarmod = '1'.
print_options-tdcopies = '001'.
print_options-tddest = 'LP02'.
print_options-tdprinter = 'ZARSWIN'.
print_options-tdimmed = 'X'.
print_options-tddelete = 'X'.
print_options-tdlifetime = '8'.
print_options-tddest = 'LP03'."nast-ldest.
"print_options-tddest = nast-ldest.
"print_options-tdcopies = pv_copies.
print_options-tddelete = 'X'.
print_options-tdfinal = 'X'.
print_options-tdnewid = 'X'.
WHILE count ne 1.
IF job_output_info-outputdone ne 'X'.
CALL FUNCTION g_fm_name
EXPORTING
ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =
control_parameters = control_parameters
MAIL_APPL_OBJ =
MAIL_RECIPIENT =
MAIL_SENDER =
output_options = print_options
user_settings = space
header = itab
amountspell = amountspell
currtxt = currtxet
secondpart = secondpart
wa_footer = w_footer
IMPORTING
DOCUMENT_OUTPUT_INFO = document_output_info
JOB_OUTPUT_INFO = job_output_info
JOB_OUTPUT_OPTIONS = job_output_options
TABLES
it_items = t_items
it_footer = it_footer
EXCEPTIONS
formatting_error = 1
internal_error = 2
send_error = 3
user_canceled = 4
OTHERS = 5
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. "ENTRYHi,
lw_control_param-device = 'PRINTER'.
lw_control_param-getotf = c_x.
lw_control_param-no_dialog = c_x.
lw_composer_param-tdnoprev = c_x.
<b>*lw_composer_param-tddest = 'LONSC0P310'.</b>
<b>lw_composer_param-tddest = 'XXXX'.</b> <b>"Four digits</b>
<i>lw_composer_param-tdnewid = c_x.
lw_composer_param-tdfinal = c_x.</i> --> Not required
In place of 'XXXX', replace it by a 4 digit value. It would be available in transaction SPAD->Output Devices->Double click your output device. On the right hand side there would be a field Short Name. Replace 'XXXX' with that value.
Best regards,
Prashant -
How to print report in Character mode using Oracle Developer 10g
Dear,
I migrate my forms and reports from Oracle Developer 6 to Oracle Developer reports 10g,
We are using some character mode report for bill printing. But when i run these report through menu on Web i got error message like
"REP-1920: Character mode runtime incompatible with DESFORMAT of PDF, HTML, HTMLCSS, SPREADSHEET or RTF"
i don't want to change the character mode to any other mode because it effects the printing.
so how can it possible to set the mode to character and view report on Web.
pls. suggest me solution.You have to pass the PRT file name as value for the DESFORMAT and use mode= MODE=CHARACTER.
E.g.
http://<host name>:<port>/reports/rwservlet?desformat=dflt&mode=character&..... -
Hi,
We have currently configured the VAT for higher secondary Cess and VF02 getting the Error in billing print preview and printing. for the higher secondary cess appears twice in the printing I have checked it in pricing procd.and also ine the Billing output.
But all configuration is fine there in Billing and Pricing Prod., help me solving this Error.
regards
Shashank.have a look to the print flag control in V/08 at condition level.
If it is ok, then ask to a developer to debug the printing program.
Regards
Roberto -
Maximum number of the "records" in: Aggregated bill and payment handling
HI,
currently we are dealing with proposal and design of processes/settings in area Aggregated bill and payment handling among distributor and suppliers.
Do you have experience and/or knowledge with maximum amount of records in related processes , like:
Supplier side:
- the maximum number of the individual postings aggregated in agregated posting on the supplier contract account?
- the maximum number of the of the aggregated postings included in aggregated bill (print document)?
- and consequently the maximum number of the individual print documents included and printed/sent in aggregated bill (print document)? Also in case, if the aggregated bill is send as IDOC with details ?
- the maximum number of the IDOCS sent in aggregated IDOC?
- the maximum number of the records in distribution lot created form aggregated billing?
Distributor side:
- the maximum number of the individual electronic bills posted in aggregated form on the supplier contract account during processing ?
- the maximum number of the individual payments included in PAN?
Thanks
Tomas.Hi,
I would not receive too many documents into an aggregated document (suppier and distributor side). Try to find an error in a distribution lot or payment advice note with more than 10000 items. You can use posting area R0070 and R0071 (TX FQC0) for limit the size of aggregated postings.
Best regards,
Alexander -
Preview on BILL save (VF01)
HI,
I have a problem with the transaction VF01.
The user request is that when he saves a new bill, he wants to see the bill print preview ...
Actually when user try to save document the print is launched on the printer and new spool is created.
I tried to valorize the structure ie_outputparams param 'preview' but it didn't work ...
Someone have the solution for my problem???
Best regards.Found another solution that worked for me, which did not involve going into terminal:
Open Finder
Click on GO in menu and a list box drops down
Press the ALT key (This will show the Library folder int he drop down list box that appeared)
Click LIBRARY which opens another list of folders
Click CONTAINERS which will open the container folder and should show a Textedit and Preview folder.
DELETE both these folders
And that's it!! -
My first bill is not what I was told
My first bill was not $75 (as I had been led to believe) for monthly service but $77 plus $40 dollars for a variety of other extra charges. The $40 dollar charges were not explained and I could not get a real detail list of them on my first bill. This is false advertising! I was told that I could get a discount for signing up for automatic billing, but I did not get a discount and I did not see the discount written anywhere on the web site either. I was also told that I could get a discount for being elderly and disabled. Neither of those claims were true either. I am on a fixed income and can not afford extra expenses. You sales staff, web site and process mislead and confuse customers purposefully. I was not told that it would cost me $380 to get out of my two year commitment, but I found it in the fine print after I committed contractually. So far my experience with Verizon wireless service has shown to be corrupt in the lack of informing customers of their real costs. This is no way to run a business that needs to rely on reputation and word of mouth business. Your business is just another big corporation that is profiting from extreme greed without a care for their customers. Whatever happened to truth in advertising? Then the worst of it is that I cannot get a contact person to talk to that is not a sales person. It was one of their (several actually) sales staff that misled me to begin with. This note is the only forum I could find to complain.
Mschma wrote:
My first bill was not $75 (as I had been led to believe) for monthly service but $77 plus $40 dollars for a variety of other extra charges. The $40 dollar charges were not explained and I could not get a real detail list of them on my first bill. This is false advertising! I was told that I could get a discount for signing up for automatic billing, but I did not get a discount and I did not see the discount written anywhere on the web site either. I was also told that I could get a discount for being elderly and disabled. Neither of those claims were true either. I am on a fixed income and can not afford extra expenses. You sales staff, web site and process mislead and confuse customers purposefully. I was not told that it would cost me $380 to get out of my two year commitment, but I found it in the fine print after I committed contractually. So far my experience with Verizon wireless service has shown to be corrupt in the lack of informing customers of their real costs. This is no way to run a business that needs to rely on reputation and word of mouth business. Your business is just another big corporation that is profiting from extreme greed without a care for their customers. Whatever happened to truth in advertising? Then the worst of it is that I cannot get a contact person to talk to that is not a sales person. It was one of their (several actually) sales staff that misled me to begin with. This note is the only forum I could find to complain.
The first bill is almost always higher because of prorated charges. So if your bill prints on the 15th and you started service on the 30th of the prior month, your first bill will have half a month's charge for the 30th-15th, then the usual month in advance charges for the 15th-14th of the next month. Discounts for autopay, I believe, take a month or two to show up. There is a plan for people 65+, and you should be able to change to that plan if you want to, just make sure the change is set to take place the first day of the next bill period.
The other $40 in charges probably include activation and possibly insurance on the phone, and you should be able to pull up a detailed bill in MyVerizon with each line charge described.
How did you start your service? Did you go to a store, call, or order online? The ETF for a smartphone is $350, not $380, and if you were not informed of that you should have been, although if I were setting up service with a contract, I ask the terms of the contract, like fees, time frame, service and all that. Did you enter the agreement under the impression that there was no penalty for early cancellation?
Finally, this is primarily a customer to customer forum with occasional input from reps. They are identified with a Verizon logo. If you need immediate action, you will need to call. I hope you are able to get everything straightened out and explained!
Maybe you are looking for
-
Hi, I want to know which devices (iMac, MacBook, iPod, iPhone, iPad & PC) are using my iCloud account, specifically because of iMessage going to devices that im not aware of. A list of those devices would be great. I do have a list of the ones with f
-
Cash Discount may only be granted up to 3%
Hi Guys, Im new to FI. While posting an invoice in MIRO, we encounter an error "Cash Discount may only be granted up to 3%". Payment term we are using has cash discount of 5%. I want to take out the limit of the cash discount, how will I do it? What
-
PRoblems with collision detection and TriggeringPath
I don t know how to get back the object that caused collision with the main object. When I use getTriggeringPath() method there is an error. could someone give me a piece of code wher the method getTriggeringPath() work properly... thank you I really
-
How to attach PDF file to product catalog in Internet Sales R/3
Hi Experts, We are implementing SAP E-Commerce (Internet Sales) for mySAP ERP or SAP R/3, release 5.0. I need to attach a PDF file to the product in the product catalog of the Web Shop. Some where in the documentation I have read that itu2019s possib
-
Modify MVGR4 in formula for condition value
Hello everyone, I want to modify komp-mvgr4 in a formula for condition value. Changes in komp structure are not saved, any idea which field I have to modify? Many thanks! Andreas