Please help: Is U400 the way to go? Urgent
Hi, I currently have 3 options open for buying a new Laptop. Keep in mind that I'll be buying this from the US, but will be used in India and hence the quality of hardware right of the box is important as I mostly will not have warranty back home.
3 options being Lenovo Y470p, Lenovo U400 and HP Envy 15.
Graphics card apart, these 3 are more or less with the same specs but my concerns are below.
HP seems to have had quite a few problems with regards to Hardware quality right from day1.
U400 is more stylish than the Y470P but with lesser graphics, hence I made the choice between sleek and performance.
Now if I were to decide on the U400, would the following be major problems?
a) Touchpad - I've heard Cypress is crap, are the new U400 coming in with Synaptics touchpad? Is Cypress a deal breaker?
b) Display - Reviews/ people keep saying the colour gets washed out and there is only a small sweet spot area for the diplay to look good. How good is the Display in real life?
c) WiFi - People have said this has really poor reception, is that so?
Any other points?
Secondly, is the Display of the U400 similar to the Z570 or any other? If so, please let me know since the Z model is displayed at my local tech store and I can have a look myself.
P.S: My range is upto 1200+50$ for a new laptop. I think 14" itself is big enough, so max screen size is 15". Performance and good design be the main parameters. Corei7 +discrete graphics... any other Laptop comes to mind to you guys?
Cheers
maybe i can help here becuase ive owned a y570 y470 and a u400. They y series laptops in my opinion look sweet and have amazing performance. They are flimsy as hell in my opinion though since I am actually a mac guy. Some how my 5 year old white plastic macbook had less flex and more rigidty than both those y series computers. Now the u400 is built solid and is just amazing to touch. I havent pushed the gpu yet but yes it is discrete with 1 gb. i played with solidworks a little bit the other day and it handled it fine. Now the trackpad is pretty crummy because of cypress and it is a lot better now with the newest driver update. it still get the bs where the cursor jumps when typing but now i would say it is not worse than any other windows laptop. two finger scrolling and gestures are still impossible to work out. As for the display...its not bad but if you need high contrast you will only get it in that sweet spot they mentioned. The speakers in the computer are also lacking. overall i think its still a good buy for an unibody aluminum computer. this will have to be a personal call. if your not very mobile with the laptop get the y series if you are i would suggest the u and pray u get a synaptics or just deal with the trackpad and wait for updates. you should call lenovo to confirm whether the new touchpads are synaptics...if they are let me know, maybe i will send mine in.
Similar Messages
-
Please help---give me the logic(very-2 urgent)
Hi Experts,,
i am struck in a very difficult situation.
actually its a ageing report,the problem is that when i run this report for a single customer it shows the correct output.
but when i run it for a range suppose for 0610000021 to 0610000024 it starts showing me the the wrong report although i have debugged it and found the problem that instead of picking data for a single customer at a time it picks for all customer in the loop.but i was not able to find out to exit it wen it it encounters a different customer and starts the outer loop again with different customer.please help as this has made my life hell..........plz help. i am attaching the code where the problem is please suggest.......
loop at ctab into wa_ctab. (for customer)
loop at itab_bb where shkzg <> 'C' and augdt > key_date and budat <= key_date and kunnr = wa_ctab-kunnr.
if itab_bb-budat between cc AND d.
amount214 = amount214 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat between a AND b.
amount216 = amount216 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat between e AND f.
amount210 = amount210 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat between g AND h.
amount218 = amount218 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat BETWEEN gg AND hh.
amount212 = amount212 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat <= j.
amt212 = amt212 + itab_bb-wrbtr + itab_bb-bbb.
endif.
endloop.
(wen i use exit here it only run onece and shows the right data for the first customer encounter)
endloop.attaching u the whole code please tell wht changes should i make
*& Report ZAGING1
REPORT zage NO STANDARD PAGE HEADING LINE-SIZE 250.
TABLES : bseg, kna1 ,bsad, bsid, vbrk.
SELECT-OPTIONS: s_kunnr FOR kna1-kunnr OBLIGATORY.
PARAMETERS : key_date TYPE bldat OBLIGATORY.
PARAMETERS : ccode TYPE bukrs OBLIGATORY.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 01(30) text-001 FOR FIELD int1.
SELECTION-SCREEN POSITION POS_LOW.
PARAMETERS: int1(3) TYPE n DEFAULT '030'.
PARAMETERS: int2(3) TYPE n DEFAULT '060'.
PARAMETERS: int3(3) TYPE n DEFAULT '090'.
PARAMETERS: int4(3) TYPE n DEFAULT '120'.
PARAMETERS: int5(3) TYPE n DEFAULT '150'.
SELECTION-SCREEN END OF LINE.
DATA : onacc LIKE bsid-wrbtr,
ind TYPE i.
TYPES: BEGIN OF cust,
kunnr TYPE kna1-kunnr,
adrnr TYPE kna1-adrnr,
name1 TYPE kna1-name1,
wrbtr TYPE bseg-wrbtr,
bzirk TYPE knvv-bzirk,
zterm TYPE knvv-zterm,
ztag1 TYPE t052-ztag1,
END OF cust.
data : amount208 like bsad-wrbtr.
TYPES: BEGIN OF invt,
kunnr TYPE kna1-kunnr,
kunrg TYPE kna1-kunnr,
wrbtr TYPE bseg-wrbtr,
invamt TYPE bseg-wrbtr,
name1 TYPE kna1-name1,
vbeln TYPE vbrk-vbeln,
belnr TYPE bseg-belnr,
END OF invt.
TYPES : BEGIN OF ytab,
kunnr TYPE bsid-kunnr,
wrbtr TYPE bsid-wrbtr,
sinv_amt TYPE bsid-wrbtr,
paid_amt TYPE bsid-wrbtr,
adj_amt TYPE bsid-wrbtr,
cncl_amt TYPE bsid-wrbtr,
baln_amt TYPE bsid-wrbtr,
onac_amt TYPE bsid-wrbtr,
ac_amt TYPE bsid-wrbtr,
age_amt TYPE bsid-wrbtr,
wrbtr_rvh TYPE bsid-wrbtr,
wrbtr_rvs TYPE bsid-wrbtr,
wrbtr_obh TYPE bsid-wrbtr,
wrbtr_obs TYPE bsid-wrbtr,
wrbtr_dg TYPE bsid-wrbtr,
wrbtr_dr TYPE bsid-wrbtr,
wrbtr_dzs TYPE bsid-wrbtr,
wrbtr_dzh TYPE bsid-wrbtr,
wrbtr_sas TYPE bsid-wrbtr,
wrbtr_sah TYPE bsid-wrbtr,
wrbtr_abs TYPE bsid-wrbtr,
wrbtr_abh TYPE bsid-wrbtr,
wrbtr_DAs TYPE bsid-wrbtr,
wrbtr_DAh TYPE bsid-wrbtr,
UMSKZ TYPE BSID-UMSKZ,
baln1 TYPE bsid-wrbtr,
baln2 TYPE bsid-wrbtr,
baln3 TYPE bsid-wrbtr,
baln4 TYPE bsid-wrbtr,
baln5 TYPE bsid-wrbtr,
baln6 TYPE bsid-wrbtr,
blart TYPE bsid-blart,
vbeln TYPE bsid-vbeln,
fkdat TYPE vbrk-fkdat,
belnr TYPE bsid-belnr,
rebzg TYPE bsid-rebzg,
shkzg TYPE bsid-shkzg,
zuonr TYPE bsid-zuonr,
od_days(4) TYPE n,
END OF ytab.
DATA : aa(3) TYPE n,
bb(3) TYPE n,
dd(3) TYPE n,
ee(3) TYPE n,
ind TYPE i,
it TYPE i.
TYPES : BEGIN OF ftab,
kunnr TYPE bsid-kunnr,
name1 TYPE kna1-name1,
WRBTR TYPE BSID-WRBTR,
sinv_amt TYPE bsid-wrbtr,
paid_amt TYPE bsid-wrbtr,
adj_amt TYPE bsid-wrbtr,
cncl_amt TYPE bsid-wrbtr,
baln_amt TYPE bsid-wrbtr,
ac_amt TYPE bsid-wrbtr,
onac_amt TYPE bsid-wrbtr,
outs_amt TYPE bsid-wrbtr,
age_amt TYPE bsid-wrbtr,
wrbtr_rvh TYPE bsid-wrbtr,
wrbtr_rvs TYPE bsid-wrbtr,
wrbtr_obh TYPE bsid-wrbtr,
wrbtr_obs TYPE bsid-wrbtr,
wrbtr_dg TYPE bsid-wrbtr,
wrbtr_dr TYPE bsid-wrbtr,
wrbtr_dzs TYPE bsid-wrbtr,
wrbtr_dzh TYPE bsid-wrbtr,
wrbtr_sas TYPE bsid-wrbtr,
wrbtr_sah TYPE bsid-wrbtr,
wrbtr_abs TYPE bsid-wrbtr,
wrbtr_abh TYPE bsid-wrbtr,
wrbtr_DAs TYPE bsid-wrbtr,
wrbtr_DAh TYPE bsid-wrbtr,
UMSKZ TYPE BSID-UMSKZ,
baln1 TYPE bsid-wrbtr,
baln2 TYPE bsid-wrbtr,
baln3 TYPE bsid-wrbtr,
baln4 TYPE bsid-wrbtr,
baln5 TYPE bsid-wrbtr,
baln6 TYPE bsid-wrbtr,
blart TYPE bsid-blart,
vbeln TYPE bsid-vbeln,
belnr TYPE bsid-belnr,
rebzg TYPE bsid-rebzg,
shkzg TYPE bsid-shkzg,
bzirk TYPE knvv-bzirk,
zterm TYPE knvv-zterm,
ztag1 TYPE t052-ztag1,
zuonr TYPE bsid-zuonr,
od_days(4) TYPE n,
sno(3) TYPE n,
END OF ftab.
data : wrbtr_note like bsid-wrbtr.
DATA : BEGIN OF itab1 OCCURS 0,
hkont LIKE bsid-hkont, " General Ledger Account
kunnr LIKE bsid-kunnr, " Customer Number 1
dmbtr LIKE bsid-dmbtr, " Amount
shkzg LIKE bsid-shkzg, " Debit/Credit Indication
budat LIKE bsid-budat, " Posting date
kostl LIKE bsid-kostl, " Cost center
opnbl LIKE bsid-dmbtr, " Opening Balance Amount
clsbl LIKE bsid-dmbtr, " Closing balnce Amount
vbeln LIKE bsid-vbeln,
blart LIKE bsid-blart,
wrbtr LIKE bsid-wrbtr,
bukrs LIKE bsid-bukrs,
belnr LIKE bsid-belnr,
xblnr LIKE bsid-xblnr,
abc LIKE bsid-wrbtr,
aaa LIKE bsid-wrbtr,
sgtxt LIKE bsid-sgtxt,
bcd LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
bldat like bsid-bldat,
zuonr like bsid-zuonr,
umskz like bsid-umskz,
END OF itab1.
DATA : BEGIN OF itab2 OCCURS 0,
hkont LIKE bsid-hkont, " General Ledger Account
kunnr LIKE bsid-kunnr, " Customer Number 1
txt50 LIKE skat-txt50, " GL A/C TEXT
dmbtr LIKE bsid-dmbtr, " Amount
shkzg LIKE bsid-shkzg, " Debit/Credit Indication
budat LIKE bsid-budat, " Posting date
kostl LIKE bsid-kostl, " Cost center
opnbl LIKE bsid-dmbtr, " Opening Balance Amount
clsbl LIKE bsid-dmbtr, " Closing balnce Amount
vbeln LIKE bsid-vbeln,
blart LIKE bsid-blart,
wrbtr LIKE bsid-wrbtr,
bukrs LIKE bsid-bukrs,
belnr LIKE bsid-belnr,
xblnr LIKE bsid-xblnr,
sgtxt LIKE bsid-sgtxt,
abc LIKE bsid-wrbtr,
aaa LIKE bsid-wrbtr,
bcd LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
bldat like bsid-bldat,
GJAHR like bsid-GJAHR,
zuonr like bsid-zuonr,
umskz like bsid-umskz,
END OF itab2.
DATA : BEGIN OF itab3 OCCURS 0,
hkont LIKE bsid-hkont, " General Ledger Account
kunnr LIKE bsid-kunnr, " Customer Number 1
dmbtr LIKE bsid-dmbtr, " Amount
shkzg LIKE bsid-shkzg, " Debit/Credit Indication
budat LIKE bsid-budat, " Posting date
kostl LIKE bsid-kostl, " Cost center
opnbl LIKE bsid-dmbtr, " Opening Balance Amount
clsbl LIKE bsid-dmbtr, " Closing balnce Amount
vbeln LIKE bsid-vbeln,
blart LIKE bsid-blart,
wrbtr LIKE bsid-wrbtr,
bukrs LIKE bsid-bukrs,
belnr LIKE bsid-belnr,
xblnr LIKE bsid-xblnr,
abc LIKE bsid-wrbtr,
aaa LIKE bsid-wrbtr,
bcd LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
sgtxt LIKE bsid-sgtxt,
bldat like bsid-bldat,
zuonr like bsid-zuonr,
umskz like bsid-umskz,
END OF itab3.
DATA : BEGIN OF itab4 OCCURS 0,
hkont LIKE bsid-hkont, " General Ledger Account
kunnr LIKE bsid-kunnr, " Customer Number 1
txt50 LIKE skat-txt50, " GL A/C TEXT
dmbtr LIKE bsid-dmbtr, " Amount
shkzg LIKE bsid-shkzg, " Debit/Credit Indication
budat LIKE bsid-budat, " Posting date
kostl LIKE bsid-kostl, " Cost center
opnbl LIKE bsid-dmbtr, " Opening Balance Amount
clsbl LIKE bsid-dmbtr, " Closing balnce Amount
vbeln LIKE bsid-vbeln,
blart LIKE bsid-blart,
wrbtr LIKE bsid-wrbtr,
bukrs LIKE bsid-bukrs,
belnr LIKE bsid-belnr,
xblnr LIKE bsid-xblnr,
aaa LIKE bsid-wrbtr,
abc LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
bcd LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
sgtxt LIKE bsid-sgtxt,
bldat like bsid-bldat,
zuonr like bsid-zuonr,
umskz like bsid-umskz,
END OF itab4.
DATA : BEGIN OF itab5 OCCURS 0,
hkont LIKE bsid-hkont, " General Ledger Account
kunnr LIKE bsid-kunnr, " Customer Number 1
txt50 LIKE skat-txt50, " GL A/C TEXT
dmbtr LIKE bsid-dmbtr, " Amount
shkzg LIKE bsid-shkzg, " Debit/Credit Indication
budat LIKE bsid-budat, " Posting date
kostl LIKE bsid-kostl, " Cost center
opnbl LIKE bsid-dmbtr, " Opening Balance Amount
clsbl LIKE bsid-dmbtr, " Closing balnce Amount
vbeln LIKE bsid-vbeln,
blart LIKE bsid-blart,
wrbtr LIKE bsid-wrbtr,
bukrs LIKE bsid-bukrs,
belnr LIKE bsid-belnr,
xblnr LIKE bsid-xblnr,
abc LIKE bsid-wrbtr,
aaa LIKE bsid-wrbtr,
bcd LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
sgtxt LIKE bsid-sgtxt,
bldat like bsid-bldat,
zuonr like bsid-zuonr,
umskz like bsid-umskz,
END OF itab5.
data : amount207 like bsad-wrbtr,
amount210 like bsad-wrbtr,
amount212 like bsad-wrbtr,
amount213 like bsad-wrbtr,
amount214 like bsad-wrbtr,
amount215 like bsad-wrbtr,
amount216 like bsad-wrbtr,
amount217 like bsad-wrbtr,
amount218 like bsad-wrbtr,
amt like bsad-wrbtr,
amt1 like bsad-wrbtr,
amt212 like bsad-wrbtr,
amt213 like bsad-wrbtr,
amount219 like bsad-wrbtr.
DATA : BEGIN OF itab6 OCCURS 0,
hkont LIKE bsid-hkont, " General Ledger Account
kunnr LIKE bsid-kunnr, " Customer Number 1
txt50 LIKE skat-txt50, " GL A/C TEXT
dmbtr LIKE bsid-dmbtr, " Amount
shkzg LIKE bsid-shkzg, " Debit/Credit Indication
budat LIKE bsid-budat, " Posting date
kostl LIKE bsid-kostl, " Cost center
opnbl LIKE bsid-dmbtr, " Opening Balance Amount
clsbl LIKE bsid-dmbtr, " Closing balnce Amount
vbeln LIKE bsid-vbeln,
blart LIKE bsid-blart,
wrbtr LIKE bsid-wrbtr,
bukrs LIKE bsid-bukrs,
belnr LIKE bsid-belnr,
xblnr LIKE bsid-xblnr,
sgtxt LIKE bsid-sgtxt,
bldat like bsid-bldat,
umskz like bsid-umskz,
abc LIKE bsid-wrbtr,
aaa LIKE bsid-wrbtr,
bcd LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
xzahl like bsid-xzahl,
rebzg like bsid-rebzg,
zuonr like bsid-zuonr,
END OF itab6.
data : dr_deduct like bsid-wrbtr.
DATA : a TYPE sy-datum,
b TYPE sy-datum,
cc TYPE sy-datum,
d TYPE sy-datum,
e TYPE sy-datum,
f TYPE sy-datum,
g TYPE sy-datum,
h TYPE sy-datum,
i TYPE sy-datum,
gg TYPE sy-datum,
hh TYPE sy-datum,
j TYPE sy-datum.
DATA : BEGIN OF itab7 OCCURS 0,
hkont LIKE bsid-hkont, " General Ledger Account
kunnr LIKE bsid-kunnr, " Customer Number 1
txt50 LIKE skat-txt50, " GL A/C TEXT
dmbtr LIKE bsid-dmbtr, " Amount
shkzg LIKE bsid-shkzg, " Debit/Credit Indication
budat LIKE bsid-budat, " Posting date
kostl LIKE bsid-kostl, " Cost center
opnbl LIKE bsid-dmbtr, " Opening Balance Amount
clsbl LIKE bsid-dmbtr, " Closing balnce Amount
vbeln LIKE bsid-vbeln,
blart LIKE bsid-blart,
wrbtr LIKE bsid-wrbtr,
bukrs LIKE bsid-bukrs,
belnr LIKE bsid-belnr,
xblnr LIKE bsid-xblnr,
sgtxt LIKE bsid-sgtxt,
bldat like bsid-bldat,
umskz like bsid-umskz,
END OF itab7.
DATA : BEGIN OF itab8 OCCURS 0,
hkont LIKE bsid-hkont, " General Ledger Account
kunnr LIKE bsid-kunnr, " Customer Number 1
txt50 LIKE skat-txt50, " GL A/C TEXT
dmbtr LIKE bsid-dmbtr, " Amount
shkzg LIKE bsid-shkzg, " Debit/Credit Indication
budat LIKE bsid-budat, " Posting date
kostl LIKE bsid-kostl, " Cost center
opnbl LIKE bsid-dmbtr, " Opening Balance Amount
clsbl LIKE bsid-dmbtr, " Closing balnce Amount
vbeln LIKE bsid-vbeln,
blart LIKE bsid-blart,
wrbtr LIKE bsid-wrbtr,
bukrs LIKE bsid-bukrs,
belnr LIKE bsid-belnr,
xblnr LIKE bsid-xblnr,
abc LIKE bsid-wrbtr,
aaa LIKE bsid-wrbtr,
bcd LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
sgtxt LIKE bsid-sgtxt,
bldat like bsid-bldat,
zuonr like bsid-zuonr,
umskz like bsid-umskz,
END OF itab8.
DATA : BEGIN OF itab_b OCCURS 0,
bukrs like bsad-bukrs,
kunnr like bsad-kunnr,
wrbtr like bsad-wrbtr,
belnr like bsad-belnr,
AUGDT like bsad-AUGDT,
AUGBL like bsad-AUGBL,
budat like bsad-budat,
shkzg like bsad-shkzg,
blart like bsad-blart,
vbeln like bsad-vbeln,
bldat like bsad-bldat,
abc LIKE bsad-wrbtr,
aaa LIKE bsad-wrbtr,
bcd LIKE bsad-wrbtr,
bbb LIKE bsad-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
END OF itab_b.
DATA : BEGIN OF itab_bb OCCURS 0,
bukrs like bsad-bukrs,
kunnr like bsad-kunnr,
wrbtr like bsad-wrbtr,
belnr like bsad-belnr,
AUGDT like bsad-AUGDT,
AUGBL like bsad-AUGBL,
budat like bsad-budat,
shkzg like bsad-shkzg,
blart like bsad-blart,
vbeln like bsad-vbeln,
bldat like bsad-bldat,
abc LIKE bsad-wrbtr,
aaa LIKE bsad-wrbtr,
bcd LIKE bsad-wrbtr,
bbb LIKE bsad-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
END OF itab_bb.
DATA : BEGIN OF itab_rv OCCURS 0,
bukrs like bsid-bukrs,
kunnr like bsid-kunnr,
wrbtr like bsid-wrbtr,
belnr like bsid-belnr,
budat like bsid-budat,
shkzg like bsid-shkzg,
blart like bsid-blart,
vbeln like bsid-vbeln,
bldat like bsid-bldat,
abc LIKE bsid-wrbtr,
aaa LIKE bsid-wrbtr,
bcd LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
END OF itab_rv.
DATA : BEGIN OF itab_da OCCURS 0,
bukrs like bsid-bukrs,
kunnr like bsid-kunnr,
wrbtr like bsid-wrbtr,
belnr like bsid-belnr,
budat like bsid-budat,
shkzg like bsid-shkzg,
blart like bsid-blart,
vbeln like bsid-vbeln,
bldat like bsid-bldat,
abc LIKE bsid-wrbtr,
aaa LIKE bsid-wrbtr,
bcd LIKE bsid-wrbtr,
bbb LIKE bsid-wrbtr,
flag TYPE c,
flag1(3) TYPE c,
flag2(15) TYPE c,
END OF itab_da.
DATA : wa_ctab TYPE cust.
DATA : wa_btab TYPE invt.
DATA : wa_bsid type bsid.
DATA : wai_bsid TYPE ytab.
DATA : wac_bsid TYPE ytab. " CREDIT - INVOICE
DATA : wad_bsid TYPE ytab. " DEBIT - PAYMENT
DATA : wao_bsid TYPE ytab. " ON ACCOUNT
DATA : wa_itab TYPE ftab.
DATA : ctab TYPE cust OCCURS 0.
DATA : btab TYPE invt OCCURS 0.
DATA : it_bsid type bsid OCCURS 0.
DATA : iti_bsid TYPE ytab OCCURS 0. " CANCELLED INVOICES
DATA : itc_bsid TYPE ytab OCCURS 0. " CREDIT - INVOICE
DATA : itd_bsid TYPE ytab OCCURS 0. " DEBIT - PAYMENT
DATA : ito_bsid TYPE ytab OCCURS 0. " ON ACCOUNT
DATA : itab TYPE ftab OCCURS 0 with header line. " OUTPUT
DATA : inv_amt LIKE bseg-wrbtr.
DATA : paid_amt LIKE bseg-wrbtr.
DATA : cncl_amt LIKE bseg-wrbtr.
DATA : adj_amt LIKE bseg-wrbtr.
DATA : billing_date LIKE sy-datum.
DATA : overdue_date LIKE sy-datum.
DATA : overdue_days LIKE rfposx-verzn.
DATA : credit_days(4) TYPE n.
DATA : int1s(3) TYPE n VALUE 0,
int1e(3) TYPE n VALUE 0,
int2s(3) TYPE n VALUE 0,
int2e(3) TYPE n VALUE 0,
int3s(3) TYPE n VALUE 0,
int3e(3) TYPE n VALUE 0,
int4s(3) TYPE n VALUE 0,
int4e(3) TYPE n VALUE 0,
int5s(3) TYPE n VALUE 0,
int5e(3) TYPE n VALUE 0,
int TYPE i,
slno(5) TYPE n VALUE 0.
CLEAR : INV_AMT, CTAB, BTAB, WA_ITAB, WAC_BSID, WAD_BSID, WAO_BSID, itab_bb , amount210 , amount212 ,amount214 , amount216 , amount218.
REFRESH : CTAB, BTAB,ITAB, ITC_BSID, ITD_BSID, ITO_BSID , itab_bb .
START-OF-SELECTION.
cc = key_date - int1.
d = key_date.
aa = int1 + 1.
a = key_date - int2.
b = cc - 1.
bb = int2 + 1.
e = key_date - int3.
f = a - 1.
dd = int3 + 1.
g = key_date - int4.
h = e - 1.
dd = int4 + 1.
gg = key_date - int5.
hh = g - 1.
ee = int5 + 1.
j = key_date - ee.
SELECT KUNNR NAME1 ADRNR FROM KNA1 INTO CORRESPONDING FIELDS OF WA_CTAB WHERE KUNNR IN S_KUNNR.
SELECT SINGLE BZIRK ZTERM FROM KNVV INTO (WA_CTAB-BZIRK, WA_CTAB-ZTERM) WHERE KUNNR = WA_CTAB-KUNNR.
SELECT SINGLE ZTAG1 FROM T052 INTO WA_CTAB-ZTAG1 WHERE ZTERM = WA_CTAB-ZTERM.
APPEND WA_CTAB TO CTAB.
ENDSELECT.
hide wa_ctab.
select bukrs kunnr wrbtr belnr AUGDT AUGBL budat shkzg blart vbeln bldat from bsad into
corresponding fields of table itab_bb where kunnr in s_kunnr and augdt > key_date and budat <= key_date.
*if sy-subrc = 0.
*loop at itab_bb.
*write : / 'yes' , itab_bb-wrbtr , itab_bb-kunnr.
*endloop.
*else.
*write : / 'no'.
*endif.
loop at itab_bb.
IF itab_bb-blart = 'RV'.
itab_bb-flag2 = 'INVOICE'.
MODIFY itab_bb.
ELSEIF itab_bb-blart = 'DR'.
itab_bb-flag2 = 'DR-NOTE'.
MODIFY itab_bb.
ELSEIF itab_bb-blart = 'OB'.
itab_bb-flag2 = 'OPN-BAL'.
MODIFY itab_bb.
ELSEIF itab_bb-blart = 'DG'.
itab_bb-flag2 = 'CR-NOTE'.
MODIFY itab_bb.
ELSEIF itab_bb-blart = 'DZ'.
itab_bb-flag2 = 'RECEIPTS'.
MODIFY itab_bb.
ELSEIF itab_bb-blart = 'SA'.
itab_bb-flag2 = 'JOURNAL'.
MODIFY itab_bb.
ELSEIF itab_bb-blart = 'DA'.
itab_bb-flag2 = 'CREDIT'.
MODIFY itab_bb.
ELSEIF itab_bb-blart = 'AB'.
itab_bb-flag2 = 'ADJUSTMENTS'.
MODIFY itab_bb.
ENDIF.
IF itab_bb-shkzg = 'S'.
itab_bb-shkzg = 'D'.
MODIFY itab_bb.
else.
itab_bb-shkzg = 'C'.
MODIFY itab_bb.
ENDIF.
endloop.
loop at itab_bb.
ind = sy-tabix.
IF itab_bb-vbeln IS NOT INITIAL.
SELECT wrbtr FROM bsad INTO itab_bb-abc WHERE vbeln = itab_bb-vbeln and augdt > key_date and budat <= key_date and kunnr = itab_bb-kunnr.
itab_bb-aaa = itab_bb-aaa + itab_bb-abc.
ENDSELECT.
ENDIF.
IF itab_bb-vbeln IS NOT INITIAL.
SELECT wrbtr FROM bsid INTO itab_bb-abc WHERE vbeln = itab_bb-vbeln and budat <= key_date and kunnr = itab_bb-kunnr and blart = 'DZ' .
itab_bb-aaa = itab_bb-aaa + itab_bb-abc.
ENDSELECT.
endif.
IF itab_bb-vbeln IS NOT INITIAL.
SELECT SINGLE wrbtr FROM bsad INTO itab_bb-bcd WHERE vbeln = itab_bb-vbeln and augdt > key_date and budat <= key_date and kunnr = itab_bb-kunnr.
itab_bb-bbb = itab_bb-bcd - itab_bb-aaa.
ENDIF.
IF itab_bb-vbeln IS INITIAL.
SELECT SINGLE wrbtr FROM bsad INTO itab_bb-bcd WHERE belnr = itab_bb-belnr and augdt > key_date and budat <= key_date and kunnr = itab_bb-kunnr.
itab_bb-bbb = itab_bb-bcd - itab_bb-aaa.
ENDIF.
MODIFY itab_bb INDEX ind.
endloop.
*loop at ctab into wa_ctab.
sort itab_bb by kunnr.
data xyz like kna1-kunnr.
loop at itab_bb where shkzg <> 'C' and augdt > key_date and budat <= key_date.
amt = amt + itab_bb-bbb.
endloop.
loop at itab_bb where shkzg = 'C'. " ON ACCOUNT
amount207 = amount207 + itab_bb-wrbtr.
endloop.
loop at ctab into wa_ctab.
loop at itab_bb where shkzg <> 'C' and augdt > key_date and budat <= key_date and kunnr = wa_ctab-kunnr.
if itab_bb-budat between cc AND d.
amount214 = amount214 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat between a AND b.
amount216 = amount216 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat between e AND f.
amount210 = amount210 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat between g AND h.
amount218 = amount218 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat BETWEEN gg AND hh.
amount212 = amount212 + itab_bb-wrbtr + itab_bb-bbb.
endif.
if itab_bb-budat <= j.
amt212 = amt212 + itab_bb-wrbtr + itab_bb-bbb.
endif.
endloop.
endloop.
SELECT * FROM BSID INTO TABLE IT_BSID FOR ALL ENTRIES IN CTAB WHERE KUNNR = CTAB-KUNNR
AND BuDAT =< KEY_DATE
AND BUKRS = CCODE.
SORT IT_BSID BY KUNNR.
LOOP AT IT_BSID INTO WA_BSID.
IF WA_BSID-BLART = 'RV' AND WA_BSID-SHKZG = 'S' OR
WA_BSID-BLART = 'OB' AND WA_BSID-SHKZG = 'S' or
wa_bsid-blart = 'DR'.
WAC_BSID-KUNNR = WA_BSID-KUNNR.
WAC_BSID-BLART = WA_BSID-BLART.
WAC_BSID-VBELN = WA_BSID-VBELN.
WAC_BSID-BELNR = WA_BSID-BELNR.
WAC_BSID-REBZG = WA_BSID-REBZG.
WAC_BSID-WRBTR = WA_BSID-WRBTR.
WAC_BSID-ZUONR = WA_BSID-ZUONR.
WAC_BSID-SHKZG = WA_BSID-SHKZG.
*write : / WAC_BSID-WRBTR , wac_bsid-blart ,WAC_BSID-VBELN.
IF WAC_BSID-VBELN IS NOT INITIAL.
SELECT SINGLE FKDAT FROM VBRK INTO WAC_BSID-FKDAT WHERE VBELN = WAC_BSID-VBELN.
ELSEIF WAC_BSID-VBELN IS INITIAL.
IF WAC_BSID-BELNR IS NOT INITIAL.
SELECT SINGLE BuDAT FROM BSID INTO WAC_BSID-FKDAT WHERE BELNR = WAC_BSID-BELNR.
ENDIF.
ENDIF.
WAC_BSID = WA_BSID.
APPEND WAC_BSID TO ITC_BSID.
ELSEIF WA_BSID-BLART = 'DZ' AND WA_BSID-VBELN <> ' '.
ELSEIF WA_BSID-BLART = 'DZ' .
WAD_BSID = WA_BSID.
WAD_BSID-KUNNR = WA_BSID-KUNNR.
WAD_BSID-BLART = WA_BSID-BLART.
WAD_BSID-VBELN = WA_BSID-VBELN.
WAD_BSID-BELNR = WA_BSID-BELNR.
WAD_BSID-REBZG = WA_BSID-REBZG.
WAD_BSID-WRBTR = WA_BSID-WRBTR.
WAD_BSID-ZUONR = WA_BSID-ZUONR.
WAD_BSID-SHKZG = WA_BSID-SHKZG.
APPEND WAD_BSID TO ITD_BSID.
ELSEIF WA_BSID-BLART = 'RV' AND WA_BSID-SHKZG = 'H' AND WA_BSID-ZUONR <> ' '.
WAI_BSID-KUNNR = WA_BSID-KUNNR.
WAI_BSID-BLART = WA_BSID-BLART.
WAI_BSID-VBELN = WA_BSID-VBELN.
WAI_BSID-BELNR = WA_BSID-BELNR.
WAI_BSID-REBZG = WA_BSID-REBZG.
WAI_BSID-WRBTR = WA_BSID-WRBTR.
WAI_BSID-ZUONR = WA_BSID-ZUONR.
WAI_BSID-SHKZG = WA_BSID-SHKZG.
write : / 'rv-h ' , WAI_BSID-WRBTR.
APPEND WAI_BSID TO ITI_BSID.
ENDIF.
MODIFY IT_BSID FROM WA_BSID.
ENDLOOP.
CLEAR : WAC_BSID.
LOOP AT ITC_BSID INTO WAC_BSID.
CLEAR : WAD_BSID, INV_AMT, PAID_AMT, CNCL_AMT, ADJ_AMT.
IF WAC_BSID-BLART = 'RV' AND WAC_BSID-SHKZG = 'S'.
WAC_BSID-SINV_AMT = WAC_BSID-WRBTR.
INV_AMT = WAC_BSID-SINV_AMT.
*WRITE : / WAC_BSID-SINV_AMT.
READ TABLE ITD_BSID INTO WAD_BSID WITH KEY KUNNR = WAC_BSID-KUNNR VBELN = WAC_BSID-VBELN.
LOOP AT ITD_BSID INTO WAD_BSID WHERE KUNNR = WAC_BSID-KUNNR AND VBELN = WAC_BSID-VBELN.
IF SY-SUBRC = 0.
WAC_BSID-PAID_AMT = WAD_BSID-WRBTR.
PAID_AMT = PAID_AMT + WAD_BSID-WRBTR.
ENDIF.
WRITE : / PAID_AMT.
ENDLOOP.
IF PAID_AMT IS NOT INITIAL.
WAC_BSID-BALN_AMT = WAC_BSID-SINV_AMT - WAC_BSID-PAID_AMT.
WAC_BSID-PAID_AMT = PAID_AMT.
WAC_BSID-BALN_AMT = WAC_BSID-SINV_AMT - PAID_AMT.
WAC_BSID-AGE_AMT = WAC_BSID-BALN_AMT.
ELSE.
WAC_BSID-PAID_AMT = 0.
WAC_BSID-BALN_AMT = WAC_BSID-SINV_AMT.
WRITE : / WAC_BSID-BALN_AMT.
WAC_BSID-AGE_AMT = WAC_BSID-BALN_AMT.
ENDIF.
LOOP AT ITI_BSID INTO WAI_BSID WHERE KUNNR = WAC_BSID-KUNNR AND ZUONR = WAC_BSID-VBELN.
IF SY-SUBRC = 0.
WAC_BSID-PAID_AMT = WAD_BSID-WRBTR.
CNCL_AMT = CNCL_AMT + WAI_BSID-WRBTR.
write :/ 'cancelled' , cncl_amt.
ENDIF.
ENDLOOP.
IF CNCL_AMT IS NOT INITIAL.
WAC_BSID-BALN_AMT = WAC_BSID-SINV_AMT - WAC_BSID-PAID_AMT.
WAC_BSID-CNCL_AMT = CNCL_AMT.
WAC_BSID-BALN_AMT = WAC_BSID-BALN_AMT." - CNCL_AMT.
WAC_BSID-AGE_AMT = WAC_BSID-BALN_AMT.
ELSE.
WAC_BSID-BALN_AMT = WAC_BSID-BALN_AMT.
WAC_BSID-AGE_AMT = WAC_BSID-BALN_AMT.
ENDIF.
ELSEIF WAC_BSID-BLART = 'DR'.
IF WAC_BSID-ZUONR <> ' '.
LOOP AT ITD_BSID INTO WAD_BSID WHERE KUNNR = WAC_BSID-KUNNR AND VBELN = ' ' AND ZUONR = WAC_BSID-ZUONR.
IF SY-SUBRC = 0.
ADJ_AMT = ADJ_AMT + WAD_BSID-WRBTR.
ENDIF.
ENDLOOP.
WAC_BSID-ADJ_AMT = ADJ_AMT.
WAC_BSID-BALN_AMT = WAC_BSID-WRBTR - ADJ_AMT.
WAC_BSID-AGE_AMT = WAC_BSID-BALN_AMT.
ELSEIF WAC_BSID-ZUONR = ' '.
WAC_BSID-BALN_AMT = WAC_BSID-WRBTR.
WAC_BSID-AGE_AMT = WAC_BSID-BALN_AMT.
ENDIF.
ELSEIF WAC_BSID-BLART = 'OB' AND WAC_BSID-SHKZG = 'S'.
IF WAC_BSID-ZUONR <> ' '.
LOOP AT ITD_BSID INTO WAD_BSID WHERE KUNNR = WAC_BSID-KUNNR AND VBELN = ' ' AND ZUONR = WAC_BSID-ZUONR.
IF SY-SUBRC = 0.
ADJ_AMT = ADJ_AMT + WAD_BSID-WRBTR.
ENDIF.
ENDLOOP.
WAC_BSID-ADJ_AMT = ADJ_AMT.
WAC_BSID-BALN_AMT = WAC_BSID-WRBTR - ADJ_AMT.
WAC_BSID-AGE_AMT = WAC_BSID-BALN_AMT.
ELSEIF WAC_BSID-ZUONR = ' '.
WAC_BSID-BALN_AMT = WAC_BSID-WRBTR.
WAC_BSID-AGE_AMT = WAC_BSID-BALN_AMT.
ENDIF.
ENDIF.
PERFORM AGING_CALCULATION.
WA_ITAB-KUNNR = WAC_BSID-KUNNR.
WA_ITAB-SINV_AMT = WAC_BSID-SINV_AMT.
WA_ITAB-PAID_AMT = WAC_BSID-PAID_AMT.
WA_ITAB-CNCL_AMT = WAC_BSID-CNCL_AMT.
WA_ITAB-BALN_AMT = WAC_BSID-BALN_AMT.
WA_ITAB-OD_DAYS = WAC_BSID-OD_DAYS.
WA_ITAB-BALN1 = WAC_BSID-BALN1.
WA_ITAB-BALN2 = WAC_BSID-BALN2.
WA_ITAB-BALN3 = WAC_BSID-BALN3.
WA_ITAB-BALN4 = WAC_BSID-BALN4.
WA_ITAB-BALN5 = WAC_BSID-BALN5.
WA_ITAB-BALN6 = WAC_BSID-BALN6.
COLLECT WA_ITAB INTO ITAB.
MODIFY ITC_BSID FROM WAC_BSID.
COLLECT WAC_BSID.
ENDLOOP.
CLEAR : WA_ITAB, WA_CTAB.
LOOP AT CTAB INTO WA_CTAB.
CLEAR : WAO_BSID.
LOOP AT IT_BSID INTO WA_BSID WHERE KUNNR = WA_CTAB-KUNNR.
IF WA_BSID-BLART = 'RV' OR
WA_BSID-BLART = 'OB' OR
WA_BSID-BLART = 'DG' OR
WA_BSID-BLART = 'DR' OR
WA_BSID-BLART = 'DZ' OR
WA_BSID-BLART = 'DA' OR
WA_BSID-BLART = 'SA' OR
WA_BSID-BLART = 'AB'.
WAO_BSID-KUNNR = WA_BSID-KUNNR.
WAO_BSID-BLART = WA_BSID-BLART.
WAO_BSID-VBELN = WA_BSID-VBELN.
WAO_BSID-BELNR = WA_BSID-BELNR.
WAO_BSID-REBZG = WA_BSID-REBZG.
WAO_BSID-WRBTR = WA_BSID-WRBTR.
WAO_BSID-SHKZG = WA_BSID-SHKZG.
WAO_BSID-ZUONR = WA_BSID-ZUONR.
WAO_BSID-SHKZG = WA_BSID-SHKZG.
WAO_BSID-UMSKZ = WA_BSID-UMSKZ.
APPEND WAO_BSID TO ITO_BSID.
ENDIF.
ENDLOOP.
CLEAR : WAO_BSID.
LOOP AT ITO_BSID INTO WAO_BSID WHERE KUNNR = WA_CTAB-KUNNR.
IF WAO_BSID-BLART = 'OB' AND WAO_BSID-SHKZG = 'H'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT - WAO_BSID-WRBTR.
WAO_BSID-WRBTR_OBH = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'OB' AND WAO_BSID-SHKZG = 'S'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT - WAO_BSID-WRBTR.
WAO_BSID-WRBTR_OBS = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'DG'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT - WAO_BSID-WRBTR.
WAO_BSID-WRBTR_DG = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'DZ' AND WAO_BSID-SHKZG = 'H'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT - WAO_BSID-WRBTR.
WAO_BSID-WRBTR_DZH = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'DZ' AND WAO_BSID-SHKZG = 'S'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT - WAO_BSID-WRBTR.
WAO_BSID-WRBTR_DZS = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'DR'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT + WAO_BSID-WRBTR.
WAO_BSID-WRBTR_DR = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'SA' AND WAO_BSID-SHKZG = 'S'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT + WAO_BSID-WRBTR.
WAO_BSID-WRBTR_SAS = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'SA' AND WAO_BSID-SHKZG = 'H'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT - WAO_BSID-WRBTR.
WAO_BSID-WRBTR_SAH = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'AB' AND WAO_BSID-SHKZG = 'S'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT + WAO_BSID-WRBTR.
WAO_BSID-WRBTR_ABS = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'AB' AND WAO_BSID-SHKZG = 'H'.
WAO_BSID-ONAC_AMT = WAO_BSID-ONAC_AMT - WAO_BSID-WRBTR.
WAO_BSID-WRBTR_ABH = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'RV' AND WAO_BSID-SHKZG = 'H' AND WAO_BSID-ZUONR = ' '.
ELSEIF WAO_BSID-BLART = 'RV' AND WAO_BSID-SHKZG = 'H'.
WAO_BSID-WRBTR_RVH = WAO_BSID-WRBTR.
WRITE : / WAO_BSID-WRBTR_RVH .
ELSEIF WAO_BSID-BLART = 'RV' AND WAO_BSID-SHKZG = 'S'.
WAO_BSID-WRBTR_RVS = WAO_BSID-WRBTR.
ELSEIF WAO_BSID-BLART = 'DA' AND WAO_BSID-SHKZG = 'H' AND WAO_BSID-UMSKZ <> 'G'.
WAO_BSID-WRBTR_DAH = WAO_BSID-WRBTR.
ENDIF.
WA_ITAB-KUNNR = WAO_BSID-KUNNR.
WA_ITAB-WRBTR_DG = WAO_BSID-WRBTR_DG.
WA_ITAB-WRBTR_DR = WAO_BSID-WRBTR_DR.
WA_ITAB-WRBTR_DZS = WAO_BSID-WRBTR_DZS.
WA_ITAB-WRBTR_DZH = WAO_BSID-WRBTR_DZH.
WA_ITAB-WRBTR_OBH = WAO_BSID-WRBTR_OBH.
WA_ITAB-WRBTR_OBS = WAO_BSID-WRBTR_OBS.
WA_ITAB-WRBTR_SAH = WAO_BSID-WRBTR_SAH.
WA_ITAB-WRBTR_SAS = WAO_BSID-WRBTR_SAS.
WA_ITAB-WRBTR_RVH = WAO_BSID-WRBTR_RVH.
WA_ITAB-WRBTR_RVS = WAO_BSID-WRBTR_RVS.
WA_ITAB-WRBTR_ABH = WAO_BSID-WRBTR_ABH.
WA_ITAB-WRBTR_ABS = WAO_BSID-WRBTR_ABS.
WA_ITAB-WRBTR_DAH = WAO_BSID-WRBTR_DAH.
WA_ITAB-WRBTR_DAS = WAO_BSID-WRBTR_DAS.
WA_ITAB-AC_AMT = WAO_BSID-AC_AMT.
COLLECT WA_ITAB INTO ITAB.
MODIFY ITO_BSID FROM WAO_BSID.
ENDLOOP.
ENDLOOP.
CLEAR : SLNO.
clear : wa_itab.
SORT ITAB BY KUNNR.
LOOP AT ITAB INTO WA_ITAB.
SLNO = SLNO + 1.
WA_ITAB-SNO = SLNO.
READ TABLE CTAB INTO WA_CTAB WITH KEY KUNNR = WA_ITAB-KUNNR.
WA_ITAB-NAME1 = WA_CTAB-NAME1.
WA_ITAB-BZIRK = WA_CTAB-BZIRK.
WA_ITAB-ZTAG1 = WA_CTAB-ZTAG1.
WA_ITAB-AC_AMT = WA_ITAB-WRBTR_SAS
- WA_ITAB-WRBTR_SAH
- WA_ITAB-WRBTR_OBH
+ WA_ITAB-WRBTR_OBS
+ WA_ITAB-WRBTR_RVS
- WA_ITAB-WRBTR_RVH
- WA_ITAB-WRBTR_ABH
+ WA_ITAB-WRBTR_ABS
- WA_ITAB-WRBTR_DAH
- WA_ITAB-WRBTR_DG
+ WA_ITAB-WRBTR_DR
- WA_ITAB-WRBTR_DZH
+ WA_ITAB-WRBTR_DZS.
data : amount211 like bsad-wrbtr,
amount_t like bsad-wrbtr.
data : aaaa type p decimals 2,
bbbb type p decimals 2,
cccc type p decimals 2,
wrbtr_shkzg like bsid-shkzg.
SELECT shkzg wrbtr
FROM bsid
INTO (wrbtr_shkzg , wrbtr_note )
WHERE kunnr = wa_itab-kunnr
AND UMSKZ = 'G'.
if wrbtr_shkzg = 'S'.
aaaa = wrbtr_note + aaaa.
elseif wrbtr_shkzg = 'H'.
bbbb = wrbtr_note + bbbb.
endif.
endselect.
cccc = BBBB - AAAA.
amount211 = wa_itab-baln3 + amount210.
amount213 = wa_itab-baln5 + amount212.
amount215 = wa_itab-baln1 + amount214.
amount217 = wa_itab-baln2 + amount216.
amount219 = wa_itab-baln4 + amount218.
amt213 = amt212 + wa_itab-baln6.
amount_t = amount215 + amount217 + amount211 + amount219 + amount213 + amt213.
wa_itab-outs_amt = wa_itab-ac_amt.
wa_itab-onac_amt = wa_itab-baln_amt - wa_itab-outs_amt + amount207 + amt.
onacc = wa_itab-onac_amt.
wa_itab-vbeln = wac_bsid-vbeln.
wa_itab-outs_amt = wa_itab-ac_amt + amount210 + amount212 - amount207.
amount_t = amount_t - wa_itab-onac_amt.
WRITE : / wa_itab-sno,
5 wa_itab-kunnr LEFT-JUSTIFIED HOTSPOT ON,
16 wa_itab-name1,
50 wa_itab-bzirk,
63 wa_itab-ztag1 RIGHT-JUSTIFIED,
69 CCCC,
85 amount_t,
105 amount215,
125 amount217,
145 amount211,
165 amount219,
185 amount213,
205 AMT213,
225 wa_itab-onac_amt.
MODIFY itab FROM wa_itab.
clear : aaaa, bbbb, cccc ,amount215, amount217, amount211, amount219 ,AMT212, AMT213, amount213 ,AMOUNT210 , AMOUNT212 , AMOUNT214 ,AMOUNT216 ,AMOUNT218 , AMOUNT207 , amount_t, cc , d , aa ,
a , b , bb , e , f , dd , g , h , dd, gg , hh , wa_itab-baln1 , wa_itab-baln2 , wa_itab-baln3 , wa_itab-baln4 , wa_itab-baln5 , wa_itab-baln6 ,wa_itab-onac_amt, amt.
HIDE : wa_itab-kunnr , wa_itab-name1.
ENDLOOP.
WRITE : / sy-uline.
TOP-OF-PAGE.
WRITE : 'SAKATA INX INDIA LTD.',
/ 'Age wise analysis as on', key_date,
/ sy-uline.
WRITE : / 'SNo',
5 'C-Code',
16 'Customer Name',
50 'Region',
58 ' CR-DAYS',
72 'SEC.AMOUNT',
86 'Net O/S Amount',
107 '0 to', int1, 'Days',
125 int2s, 'to', int2e, 'Days',
145 int3s, 'to', int3e, 'Days',
165 int4s, 'to', int4e, 'Days',
185 int5s, 'to', int5e, 'Days',
210 '>',int5e, 'Days',
230 'On Account',
/ sy-uline.
'Invoice Amount',
80 'Paid Amount',
100 'Balance Amount',.
FORM aging_calculation.
CLEAR : billing_date, credit_days, wa_ctab.
DATA : shiftdays TYPE tb_days_to_pos.
CLEAR : shiftdays, overdue_days.
READ TABLE ctab INTO wa_ctab WITH KEY kunnr = wac_bsid-kunnr.
billing_date = wac_bsid-fkdat.
credit_days = wa_ctab-ztag1.
overdue_date = billing_date.
CALL FUNCTION 'FAGL_ITEM_OVERDUE_DAYS'
EXPORTING
key_date = key_date
PAY_DATE =
due_date = overdue_date
CLEAR_DATE =
IMPORTING
OVER_SKONTO1_DAYS =
overdue_days = overdue_days
wac_bsid-od_days = overdue_days.
IF int1 IS INITIAL.
int1s = 0.
int1e = 0.
ELSEIF int1 IS NOT INITIAL.
int1s = 0.
int1e = int1.
ENDIF.
IF int2 IS INITIAL.
int2s = 0.
int2e = 0.
ELSE.
int2s = int1 + 1.
int2e = int2.
ENDIF.
IF int3 IS INITIAL.
int3s = 0.
int3e = 0.
ELSE.
int3s = int2 + 1.
int3e = int3.
ENDIF.
IF int4 IS INITIAL.
int4s = 0.
int4e = 0.
ELSE.
int4s = int3 + 1.
int4e = int4.
ENDIF.
IF int5 IS INITIAL.
int5s = 0.
int5e = 0.
ELSE.
int5s = int4 + 1.
int5e = int5.
ENDIF.
write : / WAO_BSID-WRBTR_DR.
IF wac_bsid-od_days BETWEEN int1s AND int1e.
wac_bsid-baln1 = wac_bsid-age_amt.
ELSEIF wac_bsid-od_days BETWEEN int2s AND int2e.
wac_bsid-baln2 = wac_bsid-age_amt .
ELSEIF wac_bsid-od_days BETWEEN int3s AND int3e.
wac_bsid-baln3 = wac_bsid-age_amt.
ELSEIF wac_bsid-od_days BETWEEN int4s AND int4e.
wac_bsid-baln4 = wac_bsid-age_amt .
ELSEIF wac_bsid-od_days BETWEEN int5s AND int5e.
wac_bsid-baln5 = wac_bsid-age_amt .
ELSEIF wac_bsid-od_days > int5e.
wac_bsid-baln6 = wac_bsid-age_amt .
ENDIF.
ENDFORM.
AT LINE-SELECTION.
CASE sy-lsind.
WHEN ' 1'.
WRITE : / sy-uline.
WRITE : 'SAKATA INX INDIA LTD.',
/ 'Age wise analysis as on', key_date,
/ 'Customer-Code : ' , wa_itab-kunnr, 'Customer-Name : ' , wa_itab-name1,
/ sy-uline.
DATA : amount1 LIKE bsid-dmbtr,
amount2 LIKE bsid-dmbtr,
amount3 LIKE bsid-dmbtr,
amount4 LIKE bsid-dmbtr,
amount5 LIKE bsid-dmbtr,
amount6 LIKE bsid-dmbtr,
amount7 LIKE bsid-dmbtr,
amount8 LIKE bsid-dmbtr,
amount9 LIKE bsid-dmbtr,
amount10 LIKE bsid-dmbtr,
amount11 LIKE bsid-dmbtr,
amount12 LIKE bsid-dmbtr,
amount13 LIKE bsid-dmbtr,
amount14 LIKE bsid-dmbtr,
amount15 LIKE bsid-dmbtr,
amount17 LIKE bsid-dmbtr,
amount16 LIKE bsid-dmbtr,
amount19 LIKE bsid-dmbtr,
amount22 LIKE bsid-dmbtr,
amount23 LIKE bsid-dmbtr,
amount200 LIKE bsid-dmbtr,
amount201 LIKE bsid-dmbtr,
amount202 LIKE bsid-dmbtr,
amount203 LIKE bsid-dmbtr,
amount204 LIKE bsid-dmbtr,
amount205 LIKE bsid-dmbtr,
amount206 LIKE bsid-dmbtr,
amount233 LIKE bsid-dmbtr,
amount234 LIKE bsid-dmbtr,
amount235 LIKE bsid-dmbtr,
amount550 LIKE bsid-dmbtr,
amt202 LIKE bsid-dmbtr,
amt205 LIKE bsid-dmbtr,
amt13 LIKE bsid-dmbtr,
amt111 LIKE bsid-dmbtr,
amount236 LIKE bsid-dmbtr.
select bukrs kunnr wrbtr belnr AUGDT AUGBL budat shkzg blart vbeln bldat from bsad into corresponding fields of table itab_b where bukrs = 'SAIL' and kunnr = wa_itab-kunnr and augdt > key_date and budat <= key_date.
loop at itab_b.
IF itab_b-blart = 'RV'.
itab_b-flag2 = 'INVOICE'.
MODIFY itab_b.
ELSEIF itab_b-blart = 'DR'.
itab_b-flag2 = 'DR-NOTE'.
MODIFY itab2.
ELSEIF itab_b-blart = 'OB'.
itab_b-flag2 = 'OPN-BAL'.
MODIFY itab_b.
ELSEIF itab_b-blart = 'DG'.
itab_b-flag2 = 'CR-NOTE'.
MODIFY itab_b.
ELSEIF itab_b-blart = 'DZ'.
itab_b-flag2 = 'RECEIPTS'.
MODIFY itab_b.
ELSEIF itab_b-blart = 'SA'.
itab_b-flag2 = 'JOURNAL'.
MODIFY itab_b.
ELSEIF itab_b-blart = 'DA'.
itab_b-flag2 = 'CREDIT'.
MODIFY itab_b.
ELSEIF itab_b-blart = 'AB'.
itab_b-flag2 = 'ADJUSTMENTS'.
MODIFY itab_b.
ENDIF.
IF itab_b-shkzg = 'S'.
itab_b-shkzg = 'D'.
MODIFY itab_b.
else.
itab_b-shkzg = 'C'.
MODIFY itab_b.
ENDIF.
endloop.
loop at itab_b.
ind = sy-tabix.
IF itab_b-vbeln IS NOT INITIAL.
SELECT wrbtr FROM bsad INTO itab_b-abc WHERE vbeln = itab_b-vbeln and augdt > key_date and budat <= key_date and blart = 'DZ' and kunnr = itab_b-kunnr.
itab_b-aaa = itab_b-aaa + itab_b-abc.
ENDSELECT.
ENDIF.
IF itab_b-vbeln IS NOT INITIAL.
SELECT wrbtr FROM bsid INTO itab_b-abc WHERE vbeln = itab_b-vbeln and budat <= key_date and kunnr = itab_b-kunnr.
itab_b-aaa = itab_b-aaa + itab_b-abc.
ENDSELECT.
endif.
IF itab_b-vbeln IS NOT INITIAL.
SELECT SINGLE wrbtr FROM bsad INTO itab_b-bcd WHERE vbeln = itab_b-vbeln and augdt > key_date and budat <= key_date and kunnr = itab_b-kunnr.
itab_b-bbb = itab_b-bcd - itab_b-aaa.
ENDIF.
IF itab_b-vbeln IS INITIAL.
SELECT SINGLE wrbtr FROM bsad INTO itab_b-bcd WHERE belnr = itab_b-belnr and augdt > key_date and budat <= key_date and kunnr = itab_b-kunnr.
itab_b-bbb = itab_b-bcd - itab_b-aaa.
ENDIF.
MODIFY itab_b INDEX ind.
*write : / itab_b-vbeln , itab_b-bbb.
endloop.
cc = key_date - int1.
d = key_date.
SELECT hkont " General Ledger Account
kunnr " Customer Number 1
-
Please help to set the time zone in a porper way
Dear Folks please help to set the time zone in a porper way
select sessiontimezone from dual;
Database: Oracle 11.2.0.2
Operating system: AIX 5.3
SESSIONTIMEZONE
+00:00
SQL> select systimestamp from dual;
SYSTIMESTAMP
06-NOV-12 04.21.07.438426 AM +00:00
SQL> select dbtimezone from dual;
DBTIME
+00:00
SQL> Select DBMS_SCHEDULER.get_sys_time_zone_name from dual;
GET_SYS_TIME_ZONE_NAME
Asia/Kuala_Lumpur
By looking Doc ID: Note:149120.1 in Metalink:
ALTER DATABASE <my db name> SET TIME_ZONE = 'Asia/Kuala_Lumpur'
or
ALTER DATABASE <my db name> SET TIME_ZONE = '+08:00'
For reflecting the change I refreshed the db by shutdown and restart.
but still the returning no timezone value for user schema, please help how to set the time zone in a proper way?SQL> conn sys/sys as sysdba
Connected.
DBNAME
db
SQL> select u.name || '.' || o.name || '.' || c.name "Col TSLTZ"
2 from sys.obj$ o, sys.col$ c, sys.user$ u
3 where c.type# = 231
4 and o.obj# = c.obj#
5 and u.user# = o.owner#;
no rows selected
SQL> select DBTIMEZONE from dual;
DBTIME
+00:00
SQL> alter database set time_zone='Asia/Kuala_Lumpur';
Database altered.
SQL> select DBTIMEZONE from dual;
DBTIME
+00:00
SQL> startup force;
ORACLE instance started.
Total System Global Area 426852352 bytes
Fixed Size 1375060 bytes
Variable Size 260048044 bytes
Database Buffers 159383552 bytes
Redo Buffers 6045696 bytes
Database mounted.
Database opened.
SQL> select DBTIMEZONE from dual;
DBTIMEZONE
Asia/Kuala_LumpurRefer:
Re: how to check db time zone
Edited by: Ora on 5 Nov, 2012 11:36 PM -
Hello.
I am having much difficulty using any software drum program. I am trying to use EZ Drummer and the drum programs in Logic, with limited success. I was using them, and they were working, but this is no longer the case. Please help me navigate my way through these issues, if possible.
Thanks.
EricAha! I have sorted it.
For those with similar problems, the solution is this:
Macintosh HD > Library > Audio > MIDI Drivers
Then delete DigiDioMidiDriver.plugin -
Please help me with the accounting records of iTunes. At step in placing credit card details are asked to contact iTunes Support
Brenda, the easiest way to contact the support team is thru the iTunes Customer Service website:
http://www.apple.com/support/itunes/contact/ -
Please help me with the step by step instructions on how to install a Windows server 2008 on a computer that has Windows 8 installed on it without formatting windows 8.Please email the steps , Thanks
Please help me with the step by step instructions on how to install a Windows server 2008 on a computer that has Windows 8 installed on it without formatting windows 8.Please email the steps , Thanks
Assuming your rig can support virtual machines, you can use Hyper-V and run another OS there.
Better practice however is to use a dedicated machine and use remote desktop to the server.
Corsair Carbide 300R with window
Corsair TX850V2 70A@12V
Asus M5A99FX PRO R2.0 CFX/SLI
AMD Phenom II 965 C3 Black Edition @ 4.0 GHz
G.SKILL RipjawsX DDR3-2133 8 GB
EVGA GTX 6600 Ti FTW Signature 2(Gk104 Kepler)
Asus PA238QR IPS LED HDMI DP 1080p
ST2000DM001 & Windows 8.1 Enterprise x64
Microsoft Wireless Desktop 2000
Wacom Bamboo CHT470M
Place your rig specifics into your signature like I have, makes it 100x easier to understand!
Hardcore Games Legendary is the Only Way to Play! -
HI Experts,
I have a scenario. Import IDOC into PI and PI transform IDOC to Excel. Using mail adapter attach that Excel using pi and send to vendor. Can you please help me on the same?
Thanks
SaiSreevastavHi Sai,
you can use XSLT or java mapping or adapter module to convert IDOC xml to XLS. Please refer the below blog
Convert incoming XML to Excel or Excel XML – Part 1 - XSLT Way
Convert incoming XML to Excel Sheet Part 2 – Adapter Module way
Convert incoming XML to Excel Sheet
then after converting to Excel, you can use the payloadswap bean in mail adapter
XI: Sender mail adapter - PayloadSwapBean - Step by step
regards,
Harish -
Please help me what other way i can tune this select query..
Hello Guru,
I have a select query which retrieve data from 10 tables and around 4 tables having 2-4 Lac record and rest are having 80,000 - 1 Lac record.
It is taking around 7-8 seconds to fetch 55000 record.
I was strictly told by the client that i should not use HINTS in my query. My query is below. Please help me what other way i can tune this select query..
select
CT.CUST_ID
,CT.ROMANISED_SURNAME
,CT.SURNAME
,CT.ROMANISED_GIVEN_NAME
,CT.GIVEN_NAME
,CT.ROMANISED_MIDDLE_NAME
,CT.MIDDLE_NAME
,CT.ROMANISED_NAME_SUFFIX
,CT.NAME_SUFFIX
,CT.ROMANISED_TITLE
,CT.TITLE
,CT.ROMANISED_NAME_INITIALS
,CT.NAME_INITIALS
,CT.NAME_TEXT
,CT.CUST_JRNY_ID
,RK.REMARK_TYPE
,RK.REMARK_ID+CT.CUST_ID as REMARK_ID
,RK.REMARK_STATUS
,RK.REMARK_TEXT
,RK.HOST_ONLY_IND
,RK.SUPERVISORY_IND
,RK.CUST_COMM_IND
,RK.REMARK_SEQ
,RK.REMARK_CODE
,RK.DEFAULT_CUST_REL_IND
,RK.DEFAULT_FLIGHT_SEG_REL_IND
,RK.IATA_CODE
,RK.ICAO_CODE
,CJ.RECORD_LOCATOR "SITA_RECORD_LOCATOR"
,Cjv.Record_Locator "ORIGINATOR_RECORD_LOCATOR"
,FS.TRAVELLING_GROUP_CODE
,CG.GROUP_NAME
FROM FLIGHT_LEG FL
,CUST_FLIGHT_LEG CFL
,CUST CT
,CUST_REMARK CTR
,REMARK RK
,FLIGHT_SEG_FLIGHT_LEG FSFL
,FLIGHT_SEG FS
,CUST_JRNY CJ
,CUST_JRNY_VERSION CJV
,CUST_GROUP CG
WHERE FL.OPR_FLIGHT_NUMBER = 1--I_OPR_FLIGHT_NUMBER
and FL.HISTORY_VERSION_NUMBER = 0
and FL.DEPARTURE_STATION_CODE = 'DEL'--I_DEPARTURE_STATION_CODE
and FL.DEPARTURE_DATETIME = TO_DATE('10-DEC-2012 18.45.00', 'DD-MON-YYYY HH24.MI.SS')
and FL.OPR_SERVICE_PROVIDER_CODE= 'AI'--i_opr_service_provider_code
and FL.OPR_FLIGHT_SUFFIX = 'A'--NVL(I_OPR_FLIGHT_SUFFIX, FL.OPR_FLIGHT_SUFFIX)
AND FL.FLIGHT_LEG_ID = CFL.FLIGHT_LEG_ID
AND CFL.CUST_ID = CT.CUST_ID
AND FL.FLIGHT_LEG_ID=FSFL.FLIGHT_LEG_ID
AND FSFL.FLIGHT_SEG_ID=FS.FLIGHT_SEG_ID
AND CT.CUST_ID = CTR.CUST_ID(+)
AND CTR.REMARK_ID = RK.REMARK_ID(+)
AND FL.CUST_JRNY_ID = CJ.CUST_JRNY_ID
and CJ.CUST_JRNY_ID = CJV.CUST_JRNY_ID
AND CG.CUST_JRNY_ID(+) = CT.CUST_JRNY_ID
AND CFL.HISTORY_VERSION_NUMBER = 0
AND CT.HISTORY_VERSION_NUMBER = 0
AND NVL(CTR.HISTORY_VERSION_NUMBER,0) = 0
AND NVL(RK.HISTORY_VERSION_NUMBER,0) = 0
AND FS.HISTORY_VERSION_NUMBER = 0
AND FSFL.HISTORY_VERSION_NUMBER = 0
-- AND CJ.HISTORY_VERSION_NUMBER = 0
and CJV.VERSION_NUMBER = 0 --- Need to check
AND NVL(CG.HISTORY_VERSION_NUMBER,0) = 0
order by CT.CUST_JRNY_ID,CT.CUST_ID;
The Tables having record:
select COUNT(*) from FLIGHT_LEG -----241756
select COUNT(*) from CUST_FLIGHT_LEG---632585
select COUNT(*) from CUST---240015
select COUNT(*) from CUST_REMARK---73724
select COUNT(*) from REMARK---73654
select COUNT(*) from FLIGHT_SEG_FLIGHT_LEG---241789
select COUNT(*) from FLIGHT_SEG----260004
select COUNT(*) from CUST_JRNY----74288
select COUNT(*) from CUST_JRNY_VERSION----74477
select COUNT(*) from CUST_GROUP----55819
Thanks,
HP..Plan hash value: 3771714931
| Id | Operation | Name | Rows | Bytes |TempSpc| Cost (%CPU)| Time | Pstart| Pstop |
| 0 | SELECT STATEMENT | | 10239 | 2949K| | 7515 (1)| 00:01:31 | | |
| 1 | SORT ORDER BY | | 10239 | 2949K| 3160K| 7515 (1)| 00:01:31 | | |
|* 2 | HASH JOIN | | 10239 | 2949K| | 6864 (1)| 00:01:23 | | |
| 3 | PARTITION HASH ALL | | 73687 | 1079K| | 417 (1)| 00:00:06 | 1 | 512 |
|* 4 | TABLE ACCESS FULL | CUST_JRNY_VERSION | 73687 | 1079K| | 417 (1)| 00:00:06 | 1 | 512 |
|* 5 | HASH JOIN | | 10239 | 2799K| | 6445 (1)| 00:01:18 | | |
| 6 | PARTITION HASH ALL | | 73654 | 863K| | 178 (1)| 00:00:03 | 1 | 512 |
| 7 | TABLE ACCESS FULL | CUST_JRNY | 73654 | 863K| | 178 (1)| 00:00:03 | 1 | 512 |
|* 8 | FILTER | | | | | | | | |
|* 9 | HASH JOIN RIGHT OUTER | | 10239 | 2679K| | 6267 (1)| 00:01:16 | | |
| 10 | PARTITION HASH ALL | | 55315 | 756K| | 137 (1)| 00:00:02 | 1 | 512 |
| 11 | TABLE ACCESS FULL | CUST_GROUP | 55315 | 756K| | 137 (1)| 00:00:02 | 1 | 512 |
|* 12 | FILTER | | | | | | | | |
|* 13 | HASH JOIN OUTER | | 10240 | 2540K| 2056K| 6129 (1)| 00:01:14 | | |
|* 14 | FILTER | | | | | | | | |
|* 15 | HASH JOIN RIGHT OUTER | | 10242 | 1930K| | 5531 (1)| 00:01:07 | | |
| 16 | INDEX FAST FULL SCAN | CUST_REMARK_PK | 73677 | 935K| | 190 (0)| 00:00:03 | | |
|* 17 | HASH JOIN | | 10257 | 1802K| | 5339 (1)| 00:01:05 | | |
|* 18 | HASH JOIN | | 10257 | 701K| | 3516 (1)| 00:00:43 | | |
|* 19 | HASH JOIN | | 3963 | 220K| | 2476 (1)| 00:00:30 | | |
|* 20 | HASH JOIN | | 3963 | 181K| | 1300 (1)| 00:00:16 | | |
| 21 | PARTITION HASH ALL | | 3963 | 131K| | 728 (1)| 00:00:09 | 1 | 512 |
|* 22 | TABLE ACCESS FULL | FLIGHT_LEG | 3963 | 131K| | 728 (1)| 00:00:09 | 1 | 512 |
|* 23 | INDEX FAST FULL SCAN| FLIGHT_SEG_FLIGHT_LEG_PK | 240K| 3059K| | 571 (1)| 00:00:07 | | |
| 24 | PARTITION HASH ALL | | 259K| 2531K| | 1175 (1)| 00:00:15 | 1 | 512 |
|* 25 | TABLE ACCESS FULL | FLIGHT_SEG | 259K| 2531K| | 1175 (1)| 00:00:15 | 1 | 512 |
| 26 | PARTITION HASH ALL | | 631K| 8011K| | 1037 (1)| 00:00:13 | 1 | 512 |
|* 27 | TABLE ACCESS FULL | CUST_FLIGHT_LEG | 631K| 8011K| | 1037 (1)| 00:00:13 | 1 | 512 |
| 28 | PARTITION HASH ALL | | 239K| 25M| | 1822 (1)| 00:00:22 | 1 | 512 |
|* 29 | TABLE ACCESS FULL | CUST | 239K| 25M| | 1822 (1)| 00:00:22 | 1 | 512 |
| 30 | PARTITION HASH ALL | | 73623 | 4385K| | 243 (1)| 00:00:03 | 1 | 512 |
| 31 | TABLE ACCESS FULL | REMARK | 73623 | 4385K| | 243 (1)| 00:00:03 | 1 | 512 |
Predicate Information (identified by operation id):
2 - access("CJ"."CUST_JRNY_ID"="CJV"."CUST_JRNY_ID")
4 - filter("CJV"."VERSION_NUMBER"=0)
5 - access("FL"."CUST_JRNY_ID"="CJ"."CUST_JRNY_ID")
8 - filter(NVL("CG"."HISTORY_VERSION_NUMBER",0)=0)
9 - access("CG"."CUST_JRNY_ID"(+)="CT"."CUST_JRNY_ID")
12 - filter(NVL("RK"."HISTORY_VERSION_NUMBER",0)=0)
13 - access("CTR"."REMARK_ID"="RK"."REMARK_ID"(+))
14 - filter(NVL("CTR"."HISTORY_VERSION_NUMBER",0)=0)
15 - access("CT"."CUST_ID"="CTR"."CUST_ID"(+))
17 - access("CFL"."CUST_ID"="CT"."CUST_ID")
18 - access("FL"."FLIGHT_LEG_ID"="CFL"."FLIGHT_LEG_ID")
19 - access("FSFL"."FLIGHT_SEG_ID"="FS"."FLIGHT_SEG_ID")
20 - access("FL"."FLIGHT_LEG_ID"="FSFL"."FLIGHT_LEG_ID")
22 - filter("FL"."DEPARTURE_STATION_CODE"='DEL' AND "FL"."DEPARTURE_DATETIME"=TO_DATE(' 2012-12-10 18:45:00', 'syyyy-mm-dd
hh24:mi:ss') AND "FL"."OPR_SERVICE_PROVIDER_CODE"='AI' AND "FL"."OPR_FLIGHT_NUMBER"=1 AND "FL"."OPR_FLIGHT_SUFFIX"='A' AND
"FL"."HISTORY_VERSION_NUMBER"=0)
23 - filter("FSFL"."HISTORY_VERSION_NUMBER"=0)
25 - filter("FS"."HISTORY_VERSION_NUMBER"=0)
27 - filter("CFL"."HISTORY_VERSION_NUMBER"=0)
29 - filter("CT"."HISTORY_VERSION_NUMBER"=0) -
my iphone does not sync with itunes on my second authorized computer, please help. i changed the first authorized computer in May 2012 and have been using the second authorized computer since then but it cannot sync - please help!!
"I was thinking I would just connect my iPhone and all of my music and other stuff would transfer to the new computer. "
Not true. The music and pic sync is one way - computer to iphone. The only exception is itunes purchases. Without syncing: File>Transfer Purchases
You really should transfer everything from the old computer, or your backup copy of your computer. Since you do not have access to the old computer, then use your backup copy of the old computer.
If for some reason you have failed to maintain a backup copy of your computer ( not good), then you would have to transfer itunes purchased as described earlier. Any other itunes content would be lost.
You can e-mail photo library pics to yourself, but they will not be of the original quality.
Before syncing, enter at least one unique contact and calendar entry on the computer. When you first sync, then you should get the option to merge the data. -
HT1414 Turn Passcode Off is disabled in my iPod touch 5. Could you please help me for the same ?
Turn Passcode Off is disabled in my iPod touch 5. Could you please help me for the same ?
What do yoo mean?
-
Can you please help me out the Info Cubes info for Budget Execution?????
Hi,
Can you please help me out the Info Cubes info for Budget Execution and Cash Management.
Thanks in advance,
AndyTake the memory card out of the camer and put it in a card reader. When it mounts on the desktop select it and try to change the name. However, that might make it incompatible with the camera. You'll just have to try and see.
OT -
I am using IOS 4.1 in Ipod touch. I would like to take my data back using icloud. I am not able to enable icloud in to my ipod touch. please help me for the same. Basically I am trying to take back to upgrade my ios to 5 or 6 version.
You can't back up to iCloud until you update to iOS 5 or higher. You will have to back up your iPod on your computer using iTunes. Update iTunes on your computer to the latest version, then connect your iPod to your computer, open iTunes, if iTunes give you a pop-up asking if you want to update your iPod, decline. Then click on the name of your iPod in iTunes, go to File>Devices>Transfer Purchases to transfer any purchased media to your iTunes library. Next, go to the Summary tab of your iTunes sync settings and click on Back Up Now to back up your iPod on your computer.
When it's done backing up, click on Check for Update (or Update) on the Summary tab of your iTunes sync settings. Allow your iPod to update, and leave it connected to your computer. At the end, it will restart and give you the option to restore to the iTunes backup you made earlier. Choose this option to restore your backup and sync your apps and other iTuens media to your phone.
This process is outlined in this article: http://support.apple.com/kb/HT4972, under "If you are attempting to update using a Mac or PC with which you normally sync". -
Please help me with the following two questions, very urgent
Hi All,
Please help me with some scenerios about what are the common problems when modifying a standard script such a standard Invoice script and how can we overcome them.
What are the common problems encountered when working with SAP SMARTFORMS and how to overcome them?
Please help me with these questions, its very urgent.
Thanks in advance.
MD.hi
hope it will help you.
reward if ehlp.
How to create a New smartfrom, it is having step by step procedure
http://sap.niraj.tripod.com/id67.html
step by step good ex link is....
http://smoschid.tripod.com/How_to_do_things_in_SAP/How_To_Build_SMARTFORMS/How_To_Build_SMARTFORMS.html
Here is the procedure
1. Create a new smartforms
Transaction code SMARTFORMS
Create new smartforms call ZSMART
2. Define looping process for internal table
Pages and windows
First Page -> Header Window (Cursor at First Page then click Edit -> Node -> Create)
Here, you can specify your title and page numbering
&SFSY-PAGE& (Page 1) of &SFSY-FORMPAGES(Z4.0)& (Total Page)
Main windows -> TABLE -> DATA
In the Loop section, tick Internal table and fill in
ITAB1 (table in ABAP SMARTFORM calling function) INTO ITAB2
3. Define table in smartforms
Global settings :
Form interface
Variable name Type assignment Reference type
ITAB1 TYPE Table Structure
Global definitions
Variable name Type assignment Reference type
ITAB2 TYPE Table Structure
4. To display the data in the form
Make used of the Table Painter and declare the Line Type in Tabstrips Table
e.g. HD_GEN for printing header details,
IT_GEN for printing data details.
You have to specify the Line Type in your Text elements in the Tabstrips Output options.
Tick the New Line and specify the Line Type for outputting the data.
Declare your output fields in Text elements
Tabstrips - Output Options
For different fonts use this Style : IDWTCERTSTYLE
For Quantity or Amout you can used this variable &GS_ITAB-AMOUNT(12.2)&
5. Calling SMARTFORMS from your ABAP program
REPORT ZSMARTFORM.
Calling SMARTFORMS from your ABAP program.
Collecting all the table data in your program, and pass once to SMARTFORMS
SMARTFORMS
Declare your table type in :-
Global Settings -> Form Interface
Global Definintions -> Global Data
Main Window -> Table -> DATA
Written by : SAP Hints and Tips on Configuration and ABAP/4 Programming
http://sapr3.tripod.com
TABLES: MKPF.
DATA: FM_NAME TYPE RS38L_FNAM.
DATA: BEGIN OF INT_MKPF OCCURS 0.
INCLUDE STRUCTURE MKPF.
DATA: END OF INT_MKPF.
SELECT-OPTIONS S_MBLNR FOR MKPF-MBLNR MEMORY ID 001.
SELECT * FROM MKPF WHERE MBLNR IN S_MBLNR.
MOVE-CORRESPONDING MKPF TO INT_MKPF.
APPEND INT_MKPF.
ENDSELECT.
At the end of your program.
Passing data to SMARTFORMS
call function 'SSF_FUNCTION_MODULE_NAME'
exporting
formname = 'ZSMARTFORM'
VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
FM_NAME = FM_NAME
EXCEPTIONS
NO_FORM = 1
NO_FUNCTION_MODULE = 2
OTHERS = 3.
if sy-subrc <> 0.
WRITE: / 'ERROR 1'.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
call function FM_NAME
EXPORTING
ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =
CONTROL_PARAMETERS =
MAIL_APPL_OBJ =
MAIL_RECIPIENT =
MAIL_SENDER =
OUTPUT_OPTIONS =
USER_SETTINGS = 'X'
IMPORTING
DOCUMENT_OUTPUT_INFO =
JOB_OUTPUT_INFO =
JOB_OUTPUT_OPTIONS =
TABLES
GS_MKPF = INT_MKPF
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.
Smartform
you can check this link here you can see the steps and you can do it the same by looking at it..
http://smoschid.tripod.com/How_to_do_things_in_SAP/How_To_Build_SMARTFORMS/How_To_Build_SMARTFORMS.html
SMARTFORMS STEPS.
1. In Tcode se11 Create a structure(struct) same like the Internal table that you are going to use in your report.
2. Create Table type(t_struct) of stracture in se11.
3. In your program declare Internal table(Itab) type table of structure(struct).
4. Define work area(wa) like line of internal table.
5. Open Tcode Smartforms
6. In form Global setting , forminterface Import parameter define Internal table(Itab) like table type of stracture(t_struct).
7. In form Global setting , Global definitions , in Global data define Work area(wa) like type stracture(struct).
8. In form pages and window, create Page node by default Page1 is available.
9. In page node you can create numbers of secondary window. But in form there is only one Main window.
10. By right click on page you can create windows or Go to Edit, Node, Create.
11. After creating the window right click on window create table for displaying the data that you are passing through internal table.
12. In the table Data parameter, loop internal internal table (Itab) into work area(wa).
13. In table there are three areas Header, Main Area, Footer.
14. Right click on the Main area create table line by default line type1 is there select it.
15. Divide line into cells according to your need then for each cell create Text node.
16. In text node general attribute. Write down fields of your work area(wa) or write any thing you want to display.
17. Save form and activate it.
18. Then go to Environment, function module name, there you get the name of function module copy it.
19. In your program call the function module that you have copied from your form.
20. In your program in exporting parameter of function pass the internal table(itab).
SAP Smart Forms is introduced in SAP Basis Release 4.6C as the tool for creating and maintaining forms.
SAP Smart Forms allow you to execute simple modifications to the form and in the form logic by using simple graphical tools; in 90% of all cases, this won't include any programming effort. Thus, a power user without any programming knowledge can
configure forms with data from an SAP System for the relevant business processes.
To print a form, you need a program for data retrieval and a Smart Form that contains the entire from logic. As data retrieval and form logic are separated, you must only adapt the Smart Form if changes to the form logic are necessary. The application program passes the data via a function module interface to the Smart Form. When activating the Smart Form, the system automatically generates a function module. At runtime, the system processes this function module.
You can insert static and dynamic tables. This includes line feeds in individual table cells, triggering events for table headings and subtotals, and sorting data before output.
You can check individual nodes as well as the entire form and find any existing errors in the tree structure. The data flow analysis checks whether all fields (variables) have a defined value at the moment they are displayed.
SAP Smart Forms allow you to include graphics, which you can display either as part of the form or as background graphics. You use background graphics to copy the layout of an existing (scanned) form or to lend forms a company-specific look. During printout, you can suppress the background graphic, if desired.
SAP Smart Forms also support postage optimizing.
Also read SAP Note No. 168368 - Smart Forms: New form tool in Release 4.6C
What Transaction to start SAP Smart Forms?
Execute transaction SMARTFORMS to start SAP Smart Forms.
Key Benefits of SAP Smart Forms:
SAP Smart Forms allows you to reduce considerably the implementation costs of mySAP.com solutions since forms can be adjusted in minimum time.
You design a form using the graphical Form Painter and the graphical Table Painter. The form logic is represented by a hierarchy structure (tree structure) that consists of individual nodes, such as nodes for global settings, nodes for texts, nodes for output tables, or nodes for graphics.
To make changes, use Drag & Drop, Copy & Paste, and select different attributes.
These actions do not include writing of coding lines or using a Script language.
Using your form description maintained in the Form Builder, Smart Forms generates a function module that encapsulates layout, content and form logic. So you do not need a group of function modules to print a form, but only one.
For Web publishing, the system provides a generated XML output of the processed form.
Smart Forms provides a data stream called XML for Smart Forms (XSF) to allow the use of 3rd party printing tools. XSF passes form content from R/3 to an external product without passing any layout information about the Smart Form.
SmartForms System Fields
Within a form you can use the field string SFSY with its system fields. During form processing the system replaces these fields with the corresponding values. The field values come from the SAP System or are results of the processing.
System fields of Smart Forms
&SFSY-DATE&
Displays the date. You determine the display format in the user master record.
&SFSY-TIME&
Displays the time of day in the form HH:MM:SS.
&SFSY-PAGE&
Inserts the number of the current print page into the text. You determine the format of the page number (for example, Arabic, numeric) in the page node.
&SFSY-FORMPAGES&
Displays the total number of pages for the currently processed form. This allows you to include texts such as'Page x of y' into your output.
&SFSY-JOBPAGES&
Contains the total page number of all forms in the currently processed print request.
&SFSY-WINDOWNAME&
Contains the name of the current window (string in the Window field)
&SFSY-PAGENAME&
Contains the name of the current page (string in the Page field)
&SFSY-PAGEBREAK&
Is set to 'X' after a page break (either automatic [Page 7] or command-controlled [Page 46])
&SFSY-MAINEND&
Is set as soon as processing of the main window on the current page ends
&SFSY-EXCEPTION&
Contains the name of the raised exception. You must trigger your own exceptions, which you defined in the form interface, using the user_exception macro (syntax: user_exception <exception name >).
Example Forms Available in Standard SAP R/3
SF_EXAMPLE_01
Simple example; invoice with table output of flight booking for one customer
SF_EXAMPLE_02
Similar to SF_EXAMPLE_01 but with subtotals
SF_EXAMPLE_03
Similar to SF_EXAMPLE_02, whereby several customers are selected in the application program; the form is called for each customer and all form outputs are included in an output request
Advantages of SAP Smart Forms
SAP Smart Forms have the following advantages:
1. The adaption of forms is supported to a large extent by graphic tools for layout and logic, so that no programming knowledge is necessary (at least 90% of all adjustments). Therefore, power user forms can also make configurations for your business processes with data from an SAP system. Consultants are only required in special cases.
2. Displaying table structures (dynamic framing of texts)
3. Output of background graphics, for form design in particular the use of templates which were scanned.
4. Colored output of texts
5. User-friendly and integrated Form Painter for the graphical design of forms
6. Graphical Table Painter for drawing tables
7. Reusing Font and paragraph formats in forms (Smart Styles)
8. Data interface in XML format (XML for Smart Forms, in short XSF)
9. Form translation is supported by standard translation tools
10. Flexible reuse of text modules
11. HTML output of forms (Basis release 6.10)
12. Interactive Web forms with input fields, pushbuttons, radio buttons, etc. (Basis-Release 6.10) -
Please help me with the installation process.
i have got free norton antivirus activation keybwith the pirchase of hp 16 gb pendrive .
please help me with the installation process.Hey @10p,
Welcome to the HP Support Forums!
I understand that you need assistance with the installation of Norton Antivirus that you received with the purchase of an HP 16gb Pendrive. Did you get the Pendrive with a computer or just purchase the Pendrive on its own?
Once I know if the Pendrive came with the purchase of a computer I will be able to point you in the right direction for support. Good luck!
X-23
I work on behalf of HP
Please click "Accept as Solution" if you feel my post solved your issue, it will help others find the solution.
Click the "Kudos, Thumbs Up" on the right to say "Thanks" for helping! -
Please help me with the homework given to me by my teacher
hello,i am new in java programming please help me with the home work given to me by my teacher at school, help me to build an interface that can work with this code.i can build an interface but i dont just understand this code.
//references:
//http://forums.techguy.org/development/570048-need-write-java-program-convert.html
import java.util.Map;
import java.util.HashMap;
import java.util.Iterator;
import java.io.FileNotFoundException;
import java.io.IOException;
import java.io.BufferedReader;
import java.io.FileReader;
public class Translate
public static void main(String [] args) throws IOException
if (args.length != 2)
System.err.println("usage: Translate wordmapfile textfile");
System.exit(1);
try
HashMap words = ReadHashMapFromFile(args[0]);
System.out.println(ProcessFile(words, args[1]));
catch (Exception e)
e.printStackTrace();
// static helper methods
* Reads a file into a HashMap. The file should contain lines of the format
* "key\tvalue\n"
* @returns a hashmap of the given file
@SuppressWarnings("unchecked")
private static HashMap ReadHashMapFromFile(String filename) throws FileNotFoundException, IOException
BufferedReader in = null;
HashMap map = null;
try
in = new BufferedReader(new FileReader(filename));
String line;
map = new HashMap();
while ((line = in.readLine()) != null)
String[] fields = line.split("\\t", 2);
if (fields.length != 2) continue; //just ignore "invalid" lines
map.put(fields[0], fields[1]);
finally
if(in!=null) in.close(); //may throw IOException
return(map); //returning a reference to local variable is safe in java (unlike C/C++)
* Process the given file
* @returns String contains the whole file.
private static String ProcessFile(Map words, String filename) throws FileNotFoundException, IOException {
BufferedReader in = null;
StringBuffer out = null;
try {
in = new BufferedReader(new FileReader(filename));
out = new StringBuffer();
String line = null;
while( (line=in.readLine()) != null ) {
out.append(SearchAndReplaceWordsInText(words, line)+"\n");
} finally {
if(in!=null) in.close(); //may throw IOException
return out.toString();
* Replaces all occurrences in text of each key in words with it's value.
* @returns String
private static String SearchAndReplaceWordsInText(Map words, String text) {
Iterator it = words.keySet().iterator();
while( it.hasNext() ) {
String key = (String)it.next();
text = text.replaceAll("\\b"+key+"\\b", (String)words.get(key));
return text;
* @returns: s with the first letter capitalized
String capitalize(String s)
return s.substring(0,0).toUpperCase() + s.substring(1);
}... here's the head of my pirate_words_map.txt
hello ahoy
hi yo-ho-ho
pardon me avast
excuse me arrr
yes aye
my me
friend me bucko
sir matey
madam proud beauty
miss comely wench
stranger scurvy dog
officer foul blaggart
where whar
is be
are be
am be
the th'
you ye
your yer
tell be tellin'Heres your answer. Run it in on your pc.
public class Annoy
public static void main(String[] args)
System.out.println("I am a triple poster.");
System.out.println("I can not understand why I can not understand the help I have receved to date on the java forums.");
}
Maybe you are looking for
-
Re-installed itunes; now how do I tell the program where to find music on my external?
I just uninstalled and reinstalled itunes. I keep my files on an external hard drive--but in 2 different folders on the same hard drive. Problems: 1. Itunes does not know where to find the files. I get a little exclamation point next to all the songs
-
I got the new iPhone5 back in Dec, I hooked it up to my computer for the 1st time this wk. It deleted all new data added since Dec (notes,contacts,texts,pics, info added to apps) and reverted back to all my old data (literally uploaded all of my old
-
Get transaction isolation level
How do I ask sql server what it's isolation level is? I know that jdbc has a method to get this but this info is cached and not what the current state is
-
Instructions to create custom home screen icons for websites and phone #'s
Here are instructions to create a home screen icon for a phone number or a website. This is very cool! 1. Go to http://webclip.us on your computer (not on your phone) and click on "create now". 2. In icon label, type what you want to call your icon.
-
What is the field to be used in the field catalog
hi what is the field to be used in the field catalog of an ALV report to hide the relevant column inthe list