Additional Fields to VL06O in S/4 Hana 1709

It is often required to monitor deliveries on run time basis and there is alot of room given by SAP to additional fields to the report.

Below are few steps that is required to implement it.

1. Add additional Fields to LIPOV Structure.

2. Implement Enhancement V50Q0001 in CMOD.

3. Write your own code to fetch relevant data from system.

For Example:

Snipping Sample Code:

SPAN {
font-family: “Courier New”;
font-size: 10pt;
color: #000000;
background: #FFFFFF;
}
.L0S31 {
font-style: italic;
color: #808080;
}
.L0S33 {
color: #4DA619;
}
.L0S52 {
color: #0000FF;
}
.L0S55 {
color: #800080;
}
.L0S70 {
color: #808080;
}
loop at ct_postab.

select single pernr into s_pernr ” sales person
from vbpa
where vbeln = ct_postab–vbeln
and   parvw = ‘VE’.

select single ename into ct_postab–zzename ” sales person name
from pa0001
where pernr = s_pernr.

select single ktokd adrnr into ( ct_postab–zzktokd, ct_postab–zzst_adrnr ) “customer account group
from kna1
where kunnr = ct_postab–kunnr.

** ship to party address
select single name_co street str_suppl1 str_suppl2 into ( ct_postab–zzname_co, ct_postab–zzst_street1, ct_postab–zzst_street2, ct_postab–zzst_street3 )
from adrc
where addrnumber = ct_postab–zzst_adrnr.

**sold to party address

select single adrnr into ct_postab–zzadrnr
from kna1
where kunnr = ct_postab–kunag.

select single street str_suppl1 str_suppl2 into ( ct_postab–zzstreet1, ct_postab–zzstreet2, ct_postab–zzstreet3 )
from adrc
where addrnumber = ct_postab–zzadrnr.

SPAN {
font-family: “Courier New”;
font-size: 10pt;
color: #000000;
background: #FFFFFF;
}
.L0S52 {
color: #0000FF;
}
.L0S55 {
color: #800080;
}
.L0S70 {
color: #808080;
}
modify ct_postab
transporting zzename zzktokd zzvkbur zzso_bezei zzinco zzic_bezei
zzterm zzterm_desc zzbstkd zzcontract zzkdgrp zzkdgrp_desc
zzname_co zzst_street1 zzst_street2 zzst_street3
zzstreet1 zzstreet2 zzstreet3
zzvehicle_no zzdriver_name zzdriver_cel_no
zzdriver_cnic zzpgi_time zzitem_note zzbundle zzremarks
zzkwmeng zzrate zzkrech zzkrech_desc
zzdate_tw zztime_tw zzdate_nw zztime_nw
where vbeln = ct_postab–vbeln and posnr = ct_postab–posnr.

endloop.

End of Sample Code Snippet.

4. Activate your enhancement project in CMOD.

5. Execute Transaction: VL06PO

Your new fields are added to the report:

Thanks for going through this blog, appreciate any sort of response to this effort.

Regards,

Atif Mukhtar