Table or Function module to get Internal order planning and Cost element pl

Dear All,
Table or Function module to get Internal order planning and Cost element planning.
Internal order planning from T-code KO13.
Thanks in advance.
Regards,
Ravi
Edited by: Ravi Chandra on Sep 13, 2011 8:08 AM

BPEJ, BPEG, BPEP

Similar Messages

Function module to get Sales Order classification.

Hello everyone,
Can someone give me a function module to get Sales Order classification? Really appreciate it.

Hi
Check the following BAPI's:
BAPI_OBJCL_GETDETAIL
BAPI_OBJCL_CHANGE
or use the fun module:
CLAF_CLASSIFICATION_OF_OBJECTS.
Reward points if useful
Regards
Anji

Function module to get Service Order details created with a Sales Order

Hi,
Could anyone tell me if there is any function module to get the details of the Service order that is created automatically for a line item in a sales order. Let me explain my requirement clearly.
When a sales order is created with specific line item, a service order is automatically created for that line item. I need to get the information about the associated service order. I can't find this information in VBAK, VBAP or VBEP tables obviously. But, i can see the link between the service order created and related Sales document # and item # in the DB view CAUFV. But, the key field here is Service order #. But my requirement is to get the service order details from the key field of Sales document.
I tested the FM SD_SALES_DOCUMENT_READ_POS that reads the sales document header and item material tables, but this doesn't help me in getting the service order details associated with the material line item.
Your early response is greatly appreciated.
Thanks in advance,
venu

Hi Akshay,
I actually saw this , but surprisingly, there is nothing stored in this field in either of the tables VBAK or VBAP. I mean, even for the sales orders which have associated service orders, nothing is stored in either of the above tables.
Can you please tell me if there is anyother way.
Thank you,
venu

Table or Function Module to get Condition Values of Quotation

Hi MM Gurus
I created RFQ. Then I maintained Quotation for few Vendors. In the Quotation, I used tax code relevant to taxes in India (TAXINN procedure). I am asked to develop a Z report with the help of ABAPer to compare the quotations with Gross price, discounts, freight along with taxes like Excise Duty, VAT etc. When I had put this Quotation number in EKKO table, I am not getting the condition document number KNUMV. For other purchasing documents, this field is getting generated. Without this field, I can not get Condition values using KONV table as we need to link EKKO-KNUMV with KONV-KNUMV. Do you have any idea how we get the condition values of taxes for Quotation? Is there any function module to get it?
I really appreciate the quick answer.
Thanks
Ravi

Hi
Try ME_GET_PRICE_CONDITION
Regards
Antony

Settle internal order to primary cost element

Hi all,
We use internal orders to collect costs for cars. We differentiate between fuel and maintenance costs. Both cost elements are set up being primary cost elements.When settling the internal order costs are settled using a secondary cost element. What do I need to change and where do I have to change this to have the cost settled against the original, primary cost elements (fuel/maintenance)?
Any help is appreciated.
Best regards, Paul

Hi,
Check the setting
Controlling ->Internal Orders ->Actual Postings->Settlement->Maintain Allocation Structures.
& also check the settlement profile.
Regards,
Deepak

Internal orders/networks and Cost center

is it correct to say, all internal orders and process orders will roll into a cost center at the end.
Sri

Hello Ganga,
You can settle the costs collected on an internal order to one cost center, one G/L account, or one business process using one settlement cost element.
Hene, it is not necessary that all internal orders will roll in to a cost centre at the end.
Rgds
manish

Function Module to Get Process Order Path

Hi All,
I need to show the path for a process order, the process orders and planned order relationated with the main process order. I saw the transaction MD04 but it seems like the path is calculated.
Somebody knows wich tables or funcion module i can use?
Thanks in advance.
Alejandro.

hi
check this report which o/p all the production orders and purchase orders related to a Sales order.. this might be some useful to you..
REPORT z_so_info.
TABLES: vbak, vbap, afko, afpo.
*Field catalog
TYPE-POOLS: slis.
DATA: lv_repid TYPE sy-repid VALUE sy-repid,
xfield TYPE slis_t_fieldcat_alv,
afield TYPE slis_fieldcat_alv.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(25) text-002.
SELECT-OPTIONS: so_so FOR vbak-vbeln OBLIGATORY.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-003.
PARAMETERS:
p_kunnr LIKE vbak-kunnr, " sold-to
p_kunwe LIKE vbak-kunnr. " ship-to
SELECTION-SCREEN END OF BLOCK b2.
*Constants
CONSTANTS: c_zor TYPE vbak-auart VALUE 'ZOR',
c_we TYPE vbpa-parvw VALUE 'WE',
c_ag TYPE vbpa-parvw VALUE 'AG'.
c_space TYPE space.
*Ranges
RANGES: ra_parvw FOR vbpa-parvw,
ra_kunnr FOR vbpa-kunnr.
*Tables
DATA: BEGIN OF gt_output OCCURS 0,
vbeln LIKE vbak-vbeln, " sales order number
posnr LIKE vbap-posnr, " SO item number
matnr LIKE vbap-matnr, " material number
sh LIKE vbpa-kunnr, " Ship-to
sp LIKE vbpa-kunnr, " Sold-to
lifnr LIKE ekko-lifnr, " Vendor
bstnk LIKE vbak-bstnk, " PO number
banfn LIKE vbep-banfn, " Purchase requi
po_st TYPE char30, " PO status text
pstyv TYPE vbap-pstyv, " Item catagory
aufnr LIKE afpo-aufnr, " Production Order
prd_stat TYPE string, " Prd order status
END OF gt_output.
DATA: wa_output LIKE gt_output.
FIELD-SYMBOLS: <fs_output> LIKE gt_output.
*Table for sales order and PO
TYPES : BEGIN OF gs_data,
vbeln TYPE vbak-vbeln,
posnr TYPE vbap-posnr,
pstyv TYPE vbap-pstyv,
matnr TYPE vbap-matnr,
END OF gs_data.
DATA: gt_data TYPE STANDARD TABLE OF gs_data,
wa_data TYPE gs_data.
*Table for Production Orders
TYPES: BEGIN OF gs_prd,
aufnr TYPE afpo-aufnr,
posnr TYPE afpo-posnr,
kdauf TYPE afpo-kdauf,
kdpos TYPE afpo-kdpos,
wepos TYPE afpo-wepos, "Goods Receipt Indicator
elikz TYPE afpo-elikz, "Delivery Completed Indicator
objnr TYPE aufk-objnr, "Object number
getri TYPE afko-getri, "Confirmed Order Finish Date
gltri TYPE afko-gltri, "Actual finish date
END OF gs_prd.
DATA: gt_prd TYPE STANDARD TABLE OF gs_prd,
wa_prd TYPE gs_prd.
*Table for partner data
TYPES: BEGIN OF gs_partner,
vbeln TYPE vbak-vbeln,
posnr TYPE vbap-posnr,
parvw TYPE vbpa-parvw,
kunnr TYPE vbpa-kunnr,
END OF gs_partner.
DATA: gt_partner TYPE STANDARD TABLE OF gs_partner,
wa_partner TYPE gs_partner.
TYPES: BEGIN OF gs_po,
ebeln TYPE ekkn-ebeln,
ebelp TYPE ekkn-ebelp,
vbeln TYPE ekkn-vbeln,
vbelp TYPE ekkn-vbelp,
END OF gs_po.
DATA: gt_po TYPE STANDARD TABLE OF gs_po,
wa_po TYPE gs_po.
TYPES: BEGIN OF gs_preq,
vbeln TYPE vbep-vbeln,
posnr TYPE vbep-posnr,
banfn TYPE vbep-banfn,
END OF gs_preq.
DATA: gt_preq TYPE STANDARD TABLE OF gs_preq,
wa_preq TYPE gs_preq.
TYPES: BEGIN OF gs_po_stat,
ebeln TYPE ekko-ebeln,
procstat TYPE ekko-procstat,
lifnr TYPE ekko-lifnr,
END OF gs_po_stat.
DATA: gt_po_stat TYPE STANDARD TABLE OF gs_po_stat,
wa_po_stat TYPE gs_po_stat.
*Field symbols
FIELD-SYMBOLS: <fs> TYPE tj02t-txt04,
<fs_temp> TYPE tj02t-txt04,
<fs_stat> TYPE char30.
START-OF-SELECTION.
PERFORM fr_build_range.
PERFORM fr_get_data.
PERFORM fr_build_fc.
PERFORM fr_output.
*& Form fr_get_data
text
--> p1 text
<-- p2 text
FORM fr_get_data.
*Get SO
SELECT avbeln aposnr apstyv amatnr
FROM vbap AS a
JOIN vbak AS b
ON avbeln = bvbeln
JOIN vbpa AS c
ON bvbeln = cvbeln
INTO TABLE gt_data
WHERE b~vbeln IN so_so
AND b~auart EQ c_zor "Only Sales Orders
AND c~kunnr IN ra_kunnr. "from selection screen
DELETE ADJACENT DUPLICATES FROM gt_data COMPARING vbeln posnr.
*get data of the production order
IF NOT gt_data[] IS INITIAL.
SELECT aaufnr aposnr akdauf akdpos awepos aelikz
b~objnr
FROM afpo AS a
JOIN aufk AS b
ON aaufnr = baufnr
INTO TABLE gt_prd
FOR ALL ENTRIES IN gt_data
WHERE a~kdauf EQ gt_data-vbeln
AND a~kdpos EQ gt_data-posnr.
ENDIF.
*Get partner data
IF NOT gt_data[] IS INITIAL.
SELECT vbeln posnr parvw kunnr
FROM vbpa
INTO TABLE gt_partner
FOR ALL ENTRIES IN gt_data
WHERE vbeln EQ gt_data-vbeln.
ENDIF.
*Get Purchase Order
IF NOT gt_data[] IS INITIAL.
SELECT ebeln ebelp vbeln vbelp
FROM ekkn
INTO TABLE gt_po
FOR ALL ENTRIES IN gt_data
WHERE vbeln EQ gt_data-vbeln
AND vbelp EQ gt_data-posnr.
SELECT vbeln posnr banfn
FROM vbep
INTO TABLE gt_preq
FOR ALL ENTRIES IN gt_data
WHERE vbeln EQ gt_data-vbeln
AND posnr EQ gt_data-posnr.
ENDIF.
IF NOT gt_po[] IS INITIAL.
SELECT aebeln aprocstat a~lifnr
FROM ekko AS a
JOIN ekpo AS b
ON aebeln = bebeln
INTO TABLE gt_po_stat
FOR ALL ENTRIES IN gt_po
WHERE b~ebeln EQ gt_po-ebeln
AND b~ebelp EQ gt_po-ebelp.
ENDIF.
*Move data to output table
LOOP AT gt_data INTO wa_data.
wa_output-vbeln = wa_data-vbeln.
wa_output-posnr = wa_data-posnr.
wa_output-pstyv = wa_data-pstyv.
wa_output-matnr = wa_data-matnr.
READ TABLE gt_po INTO wa_po WITH KEY vbeln = wa_data-vbeln
vbelp = wa_data-posnr.
IF sy-subrc EQ 0.
wa_output-bstnk = wa_po-ebeln.
READ TABLE gt_po_stat INTO wa_po_stat WITH KEY ebeln = wa_po-ebeln.
IF sy-subrc EQ 0.
wa_output-lifnr = wa_po_stat-lifnr.
CASE wa_po_stat-procstat.
WHEN '01'.
wa_output-po_st = 'Version in process'.
WHEN '02'.
wa_output-po_st = 'Active'.
WHEN '03'.
wa_output-po_st = 'In release'.
WHEN '04'.
wa_output-po_st = 'Partially released'.
WHEN '05'.
wa_output-po_st = 'Released Completely'.
WHEN '08'.
wa_output-po_st = 'Rejected'.
ENDCASE.
ENDIF. "inner read subrc
ENDIF. "outer read subrc
READ TABLE gt_preq INTO wa_preq WITH KEY vbeln = wa_data-vbeln
posnr = wa_data-posnr.
IF sy-subrc EQ 0.
wa_output-banfn = wa_preq-banfn.
ENDIF.
READ TABLE gt_prd INTO wa_prd WITH KEY kdauf = wa_data-vbeln
kdpos = wa_data-posnr.
IF sy-subrc EQ 0.
wa_output-aufnr = wa_prd-aufnr.
*get the purchase requisition for production order as well
SELECT SINGLE banfn
FROM ebkn
INTO wa_output-banfn
WHERE aufnr EQ wa_prd-aufnr.
*Get the status of the production order
PERFORM fr_get_prd_stat USING wa_prd-objnr
CHANGING wa_output-prd_stat.
ENDIF. " sy-subrc
READ TABLE gt_partner INTO wa_partner WITH KEY vbeln = wa_data-vbeln
parvw = c_we.
IF sy-subrc EQ 0.
wa_output-sh = wa_partner-kunnr.
ENDIF.
READ TABLE gt_partner INTO wa_partner WITH KEY vbeln = wa_data-vbeln
parvw = c_ag.
IF sy-subrc EQ 0.
wa_output-sp = wa_partner-kunnr.
ENDIF.
APPEND wa_output TO gt_output.
CLEAR: wa_data, wa_prd,wa_partner,wa_output.
ENDLOOP.
ENDFORM. " fr_get_data
*& Form fr_build_range
text
--> p1 text
<-- p2 text
FORM fr_build_range .
*Range for partner function
MOVE 'I' TO ra_parvw-sign.
MOVE 'EQ' TO ra_parvw-option.
MOVE 'SH' TO ra_parvw-low. " we
APPEND ra_parvw.
CLEAR ra_parvw.
MOVE 'I' TO ra_parvw-sign.
MOVE 'EQ' TO ra_parvw-option.
MOVE 'SP' TO ra_parvw-low. " ag
APPEND ra_parvw.
CLEAR ra_parvw.
*Range for ship-to and sold-to
MOVE 'I' TO ra_kunnr-sign.
MOVE 'EQ' TO ra_kunnr-option.
MOVE p_kunnr TO ra_kunnr-low.
APPEND ra_kunnr.
CLEAR ra_kunnr.
MOVE 'I' TO ra_kunnr-sign.
MOVE 'EQ' TO ra_kunnr-option.
MOVE p_kunwe TO ra_kunnr-low.
APPEND ra_kunnr.
CLEAR ra_kunnr.
ENDFORM. " fr_build_range
*& Form fr_build_fc
text
--> p1 text
<-- p2 text
FORM fr_build_fc .
sales order number
afield-fieldname = 'VBELN'.
afield-seltext_s = 'Sales #'.
afield-ref_tabname = 'VBAK'.
APPEND afield TO xfield. CLEAR afield.
sales ITEM number
afield-fieldname = 'POSNR'.
afield-seltext_s = 'Item #'.
afield-ref_tabname = 'VBAP'.
APPEND afield TO xfield. CLEAR afield.
Material Number
afield-fieldname = 'MATNR'.
afield-seltext_s = 'Material #'.
afield-ref_tabname = 'VBAP'.
afield-outputlen = 10.
APPEND afield TO xfield. CLEAR afield.
*Vendor Number
afield-fieldname = 'LIFNR'.
afield-seltext_s = 'Vendor Num.'.
afield-ref_tabname = 'EKKO'.
APPEND afield TO xfield. CLEAR afield.
ship-to-party
afield-fieldname = 'SH'.
afield-seltext_s = 'Ship-to'.
afield-ref_tabname = 'VBPA'.
APPEND afield TO xfield. CLEAR afield.
sold-to-party
afield-fieldname = 'SP'.
afield-seltext_s = 'Sold-to'.
afield-ref_tabname = 'VBPA'.
APPEND afield TO xfield. CLEAR afield.
*PO number
afield-fieldname = 'BSTNK'.
afield-seltext_s = 'PO NUM'.
afield-ref_tabname = 'EKKO'.
APPEND afield TO xfield. CLEAR afield.
*PO status
afield-fieldname = 'PO_STAT'.
afield-seltext_s = 'Step'.
afield-ref_tabname = 'zbacklog_v2'.
APPEND afield TO xfield. CLEAR afield.
*PO step status
afield-fieldname = 'PO_ST'.
afield-seltext_s = 'PO.Status'.
afield-ref_tabname = 'zbacklog_v2'.
APPEND afield TO xfield. CLEAR afield.
*Purchase requisition
afield-fieldname = 'BANFN'.
afield-seltext_s = 'Pur. Req.'.
afield-ref_tabname = 'VBEP'.
APPEND afield TO xfield. CLEAR afield.
*Item catagory
afield-fieldname = 'PSTYV'.
afield-seltext_s = 'Itm. Catg'.
afield-ref_tabname = 'VBAP'.
APPEND afield TO xfield. CLEAR afield.
*Prodcution Order number
afield-fieldname = 'AUFNR'.
afield-seltext_m = 'Prod.Order'.
afield-ref_tabname = 'AFKO'.
APPEND afield TO xfield. CLEAR afield.
*PRODCUTION status
afield-fieldname = 'PRD_STAT'.
afield-seltext_s = 'Prd. Step'.
afield-ref_tabname = 'zbacklog_v2'.
afield-outputlen = 20.
APPEND afield TO xfield. CLEAR afield.
*PRODUCTION step status
afield-fieldname = 'PRD_ST'.
afield-seltext_s = 'Prd. Status'.
afield-ref_tabname = 'zbacklog_v2'.
APPEND afield TO xfield. CLEAR afield.
ENDFORM. " fr_build_fc
*& Form fr_output
text
--> p1 text
<-- p2 text
FORM fr_output .
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
i_callback_program = sy-repid
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_STRUCTURE_NAME =
IS_LAYOUT =
it_fieldcat = xfield[]
i_default = 'X'
i_save = 'A'
TABLES
t_outtab = gt_output
EXCEPTIONS
program_error = 1
OTHERS = 2.
ENDFORM. " fr_output
*& Form fr_get_prd_stat
text
-->P_WA_PRD_OBJNR text
FORM fr_get_prd_stat USING p_objnr CHANGING p_prd_stat.
DATA: lt_status TYPE STANDARD TABLE OF jstat,
wa_status TYPE jstat,
lv_status TYPE tj02t-txt04,
lv_temp2 TYPE char5,
lv_buff TYPE string.
CALL FUNCTION 'STATUS_READ'
EXPORTING
client = sy-mandt
objnr = p_objnr
only_active = 'X'
TABLES
status = lt_status
EXCEPTIONS
object_not_found = 1
OTHERS = 2.
LOOP AT lt_status INTO wa_status.
IF wa_status-stat(1) EQ 'I'.
SELECT txt04 FROM tj02t
INTO lv_status
WHERE istat EQ wa_status-stat
AND spras EQ 'E'.
ENDSELECT.
lv_temp2 = lv_status.
CONCATENATE lv_temp2 p_prd_stat INTO p_prd_stat
SEPARATED BY ','.
ENDIF.
CLEAR: wa_status, lv_status, lv_temp2.
ENDLOOP.
lv_buff = p_prd_stat.
*Status of Production Order
IF lv_buff CS 'CRTD'.
p_prd_stat = 'Not Active'.
ENDIF.
IF lv_buff CS 'REL'.
IF lv_buff CS 'GMPS'.
p_prd_stat = 'Printed In Prod'.
ELSE.
p_prd_stat = 'Printed'.
ENDIF.
ENDIF.
IF lv_buff CS 'TECO'.
p_prd_stat = 'Technically Compt.'.
ENDIF.
ENDFORM. " fr_get_prd_stat

BAPI/Function Module for posting internal order + cost center plan

Hi Guru:
Is there any function module/BAPI, which could be used to post internal order + cost center( both of them )plan data?
Like post a record:
internal order = 10000
cost center = C1000
amount = 1000$
for plann version 30?
It seems the BAPI could only contain 1 cost object, either cost center or internal order.
Thanks.
Eric

Hi again,
I think you may have missed something important here. In R/3 there can only be a single "real" cost object for any one posting. If not then the whole SAP financail model would collapse as there would be "double postings" and that is certainly not wanted.
If there is a need to post to two cost objects, like in your case, then one of the cost objects MUST be statistical.
In your scenario SAP has thought of a solution that might be of help for you. An internal order can be set to be statistical in master data. When posting to both the cost center and the internal order then you will get a real posting for the CC and a statisitical posting for the IO. Reporting does work with this as per your requirement.
Hope this gives you some hints for how to proceed.
Regards, Johan
Aaaaah. Noted that this was only plan data. Sorry. But the same still applies for plan data postings as well as for actual data postings. If there should be just one posting that could be "drilled down" from IO to CC -> If you post twice then, when doing "Grand total" for instance, double values would appear. So, still IO should be statistical. //Johan
Message was edited by: Johan von Reedtz

BAPI function module to get process orders for certain material

Dear experts ,
kindly , I need my vb application to get all CRD , but not DLV Process orders for Material X.
Into SAP , I use the COIO , then set material to X , then display flag CRTD included , and Exclude DLV.
Question now , What is the function module that does this. what is the table name , and how to set search parameters.
my code will be like this
theFunc = functionCtrl.Add("BAPI_PO_GETDETAIL") ' get po data
   theFunc.exports("purchaseorder") = t.Text
             returnFunc = theFunc.call
        returnParam = theFunc.imports("po_header")
        retTab = theFunc.tables("po_items")
        For Each rr In retTab.Rows
            tt1.Text &= (rr("MATERIAL")) & vbTab
        next
Thanks
Waleed

Hi,
Check if the below helps:
1. BAPI_SALESORDER_GETLIST for VA05
2. BAPI_QUOTATION_GETDETAILBOS for VA25.
Regards,
Vivek

BAPI or Function Module to get open orders and open quotation details

Hi,
I have requirement to get all the open orders(as in VA05) and all the open quotations( as in VA25) for a sold-to-party. Could you please let me know if there are any BAPIs or Function Modules for the same.
Thanks,
Surekha.

Hi,
Check if the below helps:
1. BAPI_SALESORDER_GETLIST for VA05
2. BAPI_QUOTATION_GETDETAILBOS for VA25.
Regards,
Vivek

Function Module to get sales order number

Hi,
In a custom program I am giving Material number and Plant as input in VBAP to find the Sales Order number. However this step is taking long time to execute and so getting dump with time out error.
Please let me know whether there is any Function Module in which we can input Material and plant and get the Sales Order Number.
Regards

Hi,
Rather than searching for a FM, you can get a small report developed to look up for VBAP for a given material, plant.
Ensure that this report is always run in background. Also consider giving other parameters for faster processing like date range etc..
Regards,
RS.

Urjent-Any function module for finding Sales order, Delivery and Invoic

Hi Experts,
I am having selection screen like
Sales order
Delivery
Invoice
Customer
If i give sales order
         Delivery and Invoice should pull
If i give delivery
         sales order and Invoice should pull
If i give Invoice
         sales order and delivery should pull
If i give customer
           all customer related data should pull
Do we have any function modules to meet this reqirement?
If we have please provide function modules.
Thanks,
mahe
Edited by: Rob Burbank on Mar 30, 2009 4:17 PM
Edited by: mahahe on Mar 31, 2009 9:12 PM

You can use VBFA table, right? in the FM also, you can find the same logic, like pulling from VBFA table.
thanq

Function Module: to get Cash Journal Entries and Balances

Dear Guru's,
We need to develop a function module to display cash journal opening balance line item entries and closing balance of specific period.
we have found document entries through table TCJ_DOCUMENTS or TCJ_POSITIONS now require help to generate opening and closing balances.
Please help for the solution.
AAR

Hi,
check FM FCJ_GET_DATA_FOR_SCREEN. Next time you can try to figure out by yourself. The program for transaction FBCJ is not that complicated and you can easily find this FM used there.
Cheers

Function modules to get wbs level budgets and activity level cost

hai gurus can any one tell me the function modules or any other bapis to get the wbs level budgets and activity level costs
thanx in advance
afzal

ok

Function Module for getting Payroll start date and end date

Hi Gurus,
If I give one date then is there any function module to find the payroll period start date and enddate for that given date?
Points will be awarded
Thanks
Ravi

Hi,
Try these FMs
HR_PAYROLL_PERIODS_GET
HR_BEN_PAY_GET_PAYROLL_PERIODS
HR_PAYROLL_PERIOD_GET
HR_P06I_GET_PAYROLL_PERIOD
Regards,
PRashant

Table or Function module to get Internal order planning and Cost element pl

Similar Messages

Maybe you are looking for