Need logic for previous Quarter Amount
Hi ,
I have one ztable which contains the Quater wise updated data. In this table MATNR was the key field. I want the requirement that, if i execute my report , i want the previous Quater of the stock of the material should be display in my report.
Example : if July,Aug,Sep is first Quater(2008) , i want the material of the stock value in Apr,May june(2007 4th Quarter) previous quater .
regards,Ajay reddy
pls post the structure of your ztab
q_prev = q_current -1.
If q_prev = 0.
q_prev = 4.
endif.
you can dtermine date of your quarter with fm'
RS_VARI_V_QUARTER1XXXX - RS_VARI_V_QUARTER4XXXX
hope that helps
A.
Similar Messages
-
Need reporting logic for Previous months sales compared to current month
Dear Folks,
I need to design a report that should give cumulative sales for the month compared with cumulative sales for the same date for previous months e.g. Sales upto 21st May should be compared with sales from 1st to 21st April, from 1st March to 21st March and so on.
Can anyone provide me a logic or CMOD code how to develop this report.
Will be great helpful.
Thanks in Advance.
RakeshHi Rakesh,
To accomplish the required output, you need to create variables that are input enabled and of processing type user eixt in the columns of your report in the query designer. I am assuming that, you would have atleast one variable which is input enabled and of processing type manual entry.
The user would input a date ( for example may 21) in this variable. You need to capture this value in the user eixt in I-STEP 2. From this value you need to calculate the previous month and pass it to the user exit variable. Below is a sample code,
----variable ZPREVDATE:pass the to value from variable ZCURRDAT -
DATA : LV_CALDAY TYPE SY-DATUM,
LS_T_VAR_RANGE TYPE i_t_var_range,
LV_YR(4), LV_MN(2), LV_DY(2).
WHEN 'ZPREVDATE'.
IF i_step = 2.
READ TABLE i_t_var_range INTO LS_T_VAR_RANGE
WITH KEY vnam = ZCURRDAT'.
LV_CALDAY = LS_T_VAR_RANGE-high.
LV_YR = LV_CALDAY+0(4).
LV_MN = LV_CALDAY+4(2).
LV_DY = LV_CALDAY+6(2).
LV_MN = LV_MN - 1.
CONCATENATE LV_YR LV_MN LV_DY INTO LV_CALDAY.
ls_range-low = LV_CALDAY.
ls_range-opt = 'EQ'.
ls_range-sign = 'I'.
APPEND ls_range TO e_t_range.
ENDIF.
The above code is a rough code that would help you to acheive your logic
Regards,
Prem -
Need logic for calculate the balance quantity in open sales order
hi all
i need logic to calcuclate the balance quantity in open sales order ,
where i am using VBAK header and VBAP item , and VBFA for document flow tables
i need to have the balance quantity , for the open sales order
especially taking with respect to VBFA-VBTYP_N = M for invoice creation and N for canellation
any one please help methank you but i am clear abt it
will you please anyother way to calucaluate the logic ,
and i need to populate in bukets also for the terms of 5 years
Edited by: sridhar loganathan on Nov 25, 2008 6:43 AM -
Need logic for invoice due date and discount due date uncear
Hi Experts.. am new to ABAP
i had an issue please need some logics for these..
Formatting of the Invoice due dates and Discount due date is unclear e.g 20101109,
Invoice due date and Discount due dates are in correct on 10 and 20 days reminders on missing credit notes for blocked invoices.
<removed by moderator>
Thanks & Regards
Edited by: Thomas Zloch on May 18, 2011 1:55 PMCan you provide more info?
are you talking about BSID open accounts?
if yes, use function module DETERMINE_DUE_DATE.
<removed by moderator>
Edited by: Thomas Zloch on May 18, 2011 2:10 PM - please do not ask for "award" -
Need logic for af:inputNumberSlider
Hello,
Does anyone have any code samples that codes logic for <af:inputNumberSlider> component?
If yes, would you mind pasting on this forum thread?
Thanks a million for the help.
Regards,
RuchirCheckout the following blog post:
http://www.jroller.com/mwessendorf/entry/ajax_client_side_convertion_with
--Ric -
Hi iam trying to get the po line item latest changedby name to display in my report
can you give me the logic to get the changed by name for theline item.
i have written the code but if i change the line item 20 then in the out put the changedby name is being displayed for line itema 10 ,20, 30 i e for all line items .but i want the changeby name to be displayed only for the particular line item which was changed.
*& Report ZMR_PO_AUDIT_RPT *
*& Purpose - Report on PO release details for auditing. *
Program ID : ZMR_PO_AUDIT_RPT *
Title : Purchase Release Audit Report *
Create Date : 19.03.2007 *
Author : Marina Gosman (JH IT services) *
Tech. Spec : *
Change Req #: *
Changed by | Description of change | Date *
MarinaG | Change the report Heading to Purchase | *
| Order Action Audit Report R3DK912376 |23.03.07 *
MarinaG | Fix a select bug. R3DK912384 |23.03.07 *
MarinaG | Change report heading by removing fields |27.03.07 *
| R3DK912404 | *
MarinaG | Add exception checkbox which will only |3.04.07 *
| show the same GR, Released and Created | *
| username R3DK912444. | *
MarinaG | Add GR Value and Vendor Name FP#1919 |28.08.07 *
| R3DK912809 | *
MarinaG | Add line item no., display line items for |11.10.07 *
| GR period and GR date FP#1919 R3DK912960 | *
REPORT ZSAMPLE3 NO STANDARD PAGE HEADING LINE-SIZE 200
MESSAGE-ID zv.
Database Tables
TABLES: ekko,t16fd,cdhdr,cdpos,t000,lfa1,t024,ekbe,mkpf.
TYPE-POOLS slis.
Type Declaration
*TYPE-POOLS: kkblo.
Structures
DATA:BEGIN OF st_output,
ebeln LIKE ekko-ebeln,
batxt LIKE t161t-batxt,
banfn LIKE eban-banfn,
bukrs LIKE ekko-bukrs,
frggr LIKE ekko-frggr,
frgsx LIKE ekko-frgsx,
frgct LIKE t16fd-frgct,
udate LIKE cdhdr-udate,
utime like cdhdr-utime,
username LIKE cdhdr-username,
lifnr LIKE ekko-lifnr, " vendor
name1 LIKE lfa1-name1, " vendor name
ebelp LIKE ekpo-ebelp, " line no.
afnam LIKE ekpo-afnam, " requisitioner
netwr LIKE ekpo-netwr,
ekgrp LIKE ekko-ekgrp,
eknam LIKE t024-eknam,
ernam LIKE ekko-ernam,
grnam LIKE ekbe-ernam,
bedat LIKE ekko-bedat,
budat LIKE ekbe-budat,
belnr LIKE ekbe-belnr, "R3DK912960
dmbtr LIKE ekbe-dmbtr, "R3DK912960
Indira
cdate LIKE cdhdr-username,
Indira
END OF st_output.
Indra
DATA: l_ponum LIKE ekko-ebeln,
l_poline LIKE ekpo-ebelp.
DATA: BEGIN OF t_EKbe OCCURS 0,
ebeln LIKE EKbe-ebeln,
belnr LIKE EKbe-Belnr,
budat LIKE EKbe-Budat,
cputm LIKE EKbe-cputm,
END OF T_EKbe.
DATA: BEGIN OF T_mkpf OCCURS 0,
mblnr LIKE mkpf-mblnr,
usnam LIKE mkpf-usnam,
END OF T_mkpf.
Internal Tables
DATA: t_cdhdr LIKE cdhdr OCCURS 0 WITH HEADER LINE,
t_cdhdr1 LIKE cdhdr OCCURS 0 WITH HEADER LINE,
po_ekko LIKE ekko OCCURS 0 WITH HEADER LINE.
Indra
DATA: t_cdpos LIKE cdpos OCCURS 0 WITH HEADER LINE.
indra
DATA: BEGIN OF tbl_output OCCURS 0.
INCLUDE STRUCTURE st_output.
DATA: END OF tbl_output.
DATA: BEGIN OF tbl_ekpo OCCURS 0.
INCLUDE STRUCTURE ekpo.
DATA: END OF tbl_ekpo.
DATA: BEGIN OF tbl_ekbe OCCURS 0.
INCLUDE STRUCTURE ekbe.
DATA: END OF tbl_ekbe.
DATA: BEGIN OF t_ekko OCCURS 0,
ebeln TYPE ebeln,
ebelp TYPE ebelp, "R3DK912960
belnr TYPE MBLNR, "R3DK912960
bukrs TYPE bukrs,
bsart TYPE bsart,
bedat TYPE bedat,
budat TYPE budat,
ernam TYPE ernam,
grnam TYPE ernam,
dmbtr TYPE dmbtr, "R3DK912960
END OF t_ekko.
DATA: c_tcode(25) TYPE c.
DATA: st_fieldcat TYPE slis_fieldcat_alv.
DATA: tbl_fieldcat TYPE slis_t_fieldcat_alv.
DATA: st_event TYPE slis_alv_event.
DATA: tbl_events TYPE slis_t_event.
DATA: fieldname(30) TYPE c.
DATA: st_layout TYPE slis_layout_alv.
DATA: g_status TYPE slis_formname VALUE 'STANDARD01'.
DATA: g_user_command TYPE slis_formname VALUE 'USER_COMMAND'.
DATA: st_status TYPE slis_status.
DATA: tbl_status TYPE slis_status OCCURS 0 WITH HEADER LINE.
DATA: f_ebeln LIKE ekko-ebeln.
DATA: cursorfield LIKE ekko-ebeln.
DATA: ws_ebeln LIKE ekko-ebeln,
ws_netwr LIKE ekpo-netwr,
ws_ernam LIKE ekbe-ernam,
rs_selfield TYPE slis_selfield,
ws_dmbtr LIKE ekbe-dmbtr. "R3DK912809
RANGES: r_kunnr FOR vbak-kunnr OCCURS 0.
Selection Screen
SELECTION-SCREEN BEGIN OF BLOCK title WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_bukrs FOR ekko-bukrs OBLIGATORY,
s_ekorg FOR ekko-ekorg OBLIGATORY,
s_ebeln FOR ekko-ebeln,
s_groups FOR ekko-ekgrp,
s_lifnr FOR ekko-lifnr,
s_bedat FOR ekko-bedat,
s_budat FOR ekbe-budat,
s_bsart FOR ekko-bsart.
SELECTION-SCREEN END OF BLOCK title .
SELECTION-SCREEN BEGIN OF BLOCK title2 WITH FRAME TITLE text-001.
PARAMETERS: p_gr AS CHECKBOX DEFAULT 'X',
p_excep AS CHECKBOX.
SELECTION-SCREEN END OF BLOCK title2 .
*& AT SELECTION SCREEN
AT SELECTION-SCREEN.
IF NOT p_gr IS INITIAL.
IF s_budat IS INITIAL.
MESSAGE s000 WITH 'Please enter Goods Receipt Date.'.
STOP.
ENDIF.
ELSE.
IF s_bedat IS INITIAL.
MESSAGE s000 WITH 'Please enter Purch Doc Date.'.
STOP.
ENDIF.
ENDIF.
START-OF-SELECTION.
START-OF-SELECTION.
PERFORM select_data. " Select data
PERFORM sort_table.
PERFORM get_events. " Include header in display
PERFORM get_eventstatus. " Set the GUI status
PERFORM get_layout. " Define ALV Layout
PERFORM get_fieldcat. " Fill report fields
PERFORM create_report. " Write ALV format
AT LINE-SELECTION.
PERFORM user_command USING sy-ucomm
rs_selfield.
FORM user_command *
--> R_UCOMM *
--> RS_SELFIELD *
FORM user_command USING r_ucomm LIKE sy-ucomm
rs_selfield TYPE slis_selfield.
DATA: l_ta TYPE sy-tcode VALUE 'SLIS_DUMMY'.
CLEAR: f_ebeln.
CASE r_ucomm.
WHEN 'CF1'.
READ TABLE tbl_output INDEX rs_selfield-tabindex.
IF sy-subrc = 0.
f_ebeln = tbl_output-ebeln.
ENDIF.
SET PARAMETER ID 'BES' FIELD f_ebeln.
CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
Begin of R3DK912404
WHEN 'EXIT' OR 'CANC'.
LEAVE PROGRAM.
End of R3DK912404
WHEN 'OTHERS'.
ENDCASE.
ENDFORM. "user_command
FORM STANDARD_02 *
--> EXTAB *
FORM standard_01 USING extab TYPE slis_t_extab.
SET PF-STATUS 'STANDARD01' EXCLUDING extab .
ENDFORM. "standard_01
*& Form get_events
setup report headings
--> p1 text
<-- p2 text
FORM get_events.
CLEAR st_event.
st_event-name = 'TOP_OF_PAGE'.
st_event-form = 'PROCESS_TOP_OF_PAGE'.
APPEND st_event TO tbl_events.
ENDFORM. " get_events
FORM get_eventstatus *
FORM get_eventstatus.
CLEAR st_status.
st_status-callback_pf_status_set = 'STANDARD_01'.
APPEND st_status TO tbl_status.
ENDFORM. " get_eventstatus
*& Form get_layout
text
--> p1 text
<-- p2 text
FORM get_layout.
CLEAR st_layout.
st_layout-zebra = 'X'.
ENDFORM. " get_layout
*& Form get_fieldcat
text
--> p1 text
<-- p2 text
FORM get_fieldcat.
PERFORM write_fieldcat USING 'EBELN' 'TBL_OUTPUT' 'EKKO' 'X' 1 ' '.
PERFORM write_fieldcat USING 'BUKRS' 'TBL_OUTPUT' 'EKKO' 'X' 2 ' '.
Begin of R3DK912960
PERFORM write_fieldcat USING 'EBELP' 'TBL_OUTPUT' 'EKPO' 'X' 3 ' '.
End of R3DK912960
PERFORM write_fieldcat USING 'UDATE' 'TBL_OUTPUT' ' ' ' ' 4
'Doc. Date'.
PERFORM write_fieldcat USING 'UTIME' 'TBL_OUTPUT' ' ' ' ' 13
'Doc. Time'.
Begin of R3DK912960
PERFORM write_fieldcat USING 'BUDAT' 'TBL_OUTPUT' ' ' ' ' 5
'GR Date'.
End of R3DK912960
PERFORM write_fieldcat USING 'ERNAM' 'TBL_OUTPUT' ' ' ' ' 6
'Created By'.
PERFORM write_fieldcat USING 'USERNAME' 'TBL_OUTPUT' ' ' ' ' 7
'Released By'.
PERFORM write_fieldcat USING 'GRNAM' 'TBL_OUTPUT' ' ' ' ' 8
'Goods Receipted By'.
PERFORM write_fieldcat USING 'CDATE' 'TBL_OUTPUT' ' ' ' ' 9
'Changed By'.
PERFORM write_fieldcat USING 'NETWR' 'TBL_OUTPUT' ' ' ' ' 10
'Total Value'.
PERFORM write_fieldcat USING 'EKGRP' 'TBL_OUTPUT' 'EKKO' ' ' 11 ' '.
Begin of R3DK912809
PERFORM write_fieldcat USING 'DMBTR' 'TBL_OUTPUT' ' ' ' ' 12
'GR Value '.
PERFORM write_fieldcat USING 'NAME1' 'TBL_OUTPUT' ' ' ' ' 13
'Vendor Name'.
End of R3DK912809
ENDFORM. " get_fieldcat
FORM process_top_of_page *
FORM process_top_of_page.
SKIP.
ULINE.
FORMAT COLOR COL_HEADING INTENSIFIED OFF .
Begin of R3DK912376
WRITE:/ 'Report Name : PO Release Audit Report',
WRITE:/ 'Report Name : Purchase Order Actions Report',
End of R3DK912376
/ 'Run Date : ', sy-datum,
/ 'Run Time : ', sy-uzeit,
Begin of R3DK912404
/ 'Document Type : ', c_tcode,
End of R3DK912404
/ 'Company code : ', s_bukrs-low.
IF NOT s_bukrs-high IS INITIAL.
WRITE: 'To', s_bukrs-high.
ENDIF.
WRITE:/ 'Purch Org : ', s_ekorg-low.
IF NOT s_ekorg-high IS INITIAL.
WRITE: 'To', s_ekorg-high.
ENDIF.
Begin of R3DK912404
WRITE:/ 'Purchase Order : ', s_ebeln-low.
IF NOT s_ebeln-high IS INITIAL.
WRITE: 'To', s_ebeln-high.
ENDIF.
WRITE:/ 'Purchasing Grp : ', s_groups-low.
IF NOT s_groups-high IS INITIAL.
WRITE: 'To', s_groups-high.
ENDIF.
WRITE:/ 'Vendor : ', s_lifnr-low.
IF NOT s_lifnr-high IS INITIAL.
WRITE: 'To', s_lifnr-high.
ENDIF.
WRITE:/ 'Goods Receipt Date:', s_budat-low.
IF NOT s_budat-high IS INITIAL.
WRITE: 'To', s_budat-high.
ENDIF.
End of R3DK912404
WRITE:/ 'Purch Doc Date : ', s_bedat-low.
IF NOT s_bedat-high IS INITIAL.
WRITE: 'To', s_bedat-high.
ENDIF.
Begin of R3DK912404
WRITE:/ 'Purch Doc Type : ', s_bsart-low.
IF NOT s_bsart-high IS INITIAL.
WRITE: 'To', s_bsart-high.
ENDIF.
End of R3DK912404
ULINE.
FORMAT COLOR COL_HEADING INTENSIFIED OFF.
ENDFORM. " process_top_of_page
*& Form create_report
text
--> p1 text
<-- p2 text
FORM create_report.
SORT tbl_output BY ebeln ebelp.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
it_events = tbl_events
i_interface_check = ' '
i_callback_program = 'ZSAMPLE3'
i_callback_pf_status_set = g_status
i_callback_user_command = g_user_command
is_layout = st_layout
it_fieldcat = tbl_fieldcat
i_default = 'X'
i_save = 'X'
TABLES
t_outtab = tbl_output
EXCEPTIONS
program_error = 1
OTHERS = 2.
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. " create_report
*& Form select_data
select records for specified selections
--> p1 text
<-- p2 text
FORM select_data.
CLEAR: c_tcode, t_cdhdr, t_ekko, tbl_output.
REFRESH: t_cdhdr, t_ekko, tbl_output, tbl_fieldcat.
IF NOT p_gr IS INITIAL.
SELECT DISTINCT a~ebeln "R3DK912960
SELECT a~ebeln "R3DK912960
b~ebelp "R3DK912960
b~belnr
a~bukrs
a~bsart
a~bedat
b~budat
a~ernam
b~ernam
INTO TABLE t_ekko
FROM ekko AS a
INNER JOIN ekbe AS b
ON aebeln = bebeln
Begin of R3DK912384
AND b~bewtp = 'E'
AND b~bwart = '101'
End of R3DK912384
WHERE a~bukrs IN s_bukrs AND
a~ebeln IN s_ebeln AND
a~ekgrp IN s_groups AND
a~lifnr IN s_lifnr AND
a~bsart IN s_bsart AND
a~ekorg IN s_ekorg and
a~bedat IN s_bedat AND
b~budat IN s_budat AND
a~frgke = 'R'
ORDER BY aebeln bbudat DESCENDING.
Begin of R3DK912809 R3DK912960
DELETE ADJACENT DUPLICATES FROM T_EKKO COMPARING EBELN.
End of R3DK912809 R3DK912960
ELSE.
SELECT DISTINCT a~ebeln "R3DK912960
SELECT a~ebeln "R3DK912960
b~ebelp "R3DK912960
b~belnr
a~bukrs
a~bsart
a~bedat
b~budat
a~ernam
b~ernam
INTO TABLE t_ekko
FROM ekko AS a
LEFT JOIN ekbe AS b
ON aebeln = bebeln
Begin of R3DK912384
AND b~bewtp = 'E'
AND b~bwart = '101'
End of R3DK912384
WHERE a~bukrs IN s_bukrs AND
a~ebeln IN s_ebeln AND
a~ekgrp IN s_groups AND
a~lifnr IN s_lifnr AND
a~bsart IN s_bsart AND
a~ekorg IN s_ekorg AND
a~bedat IN s_bedat AND
a~frgke = 'R'
ORDER BY aebeln bbudat DESCENDING.
Begin of R3DK912809 R3DK912960
DELETE ADJACENT DUPLICATES FROM T_EKKO COMPARING EBELN.
End of R3DK912809 R3DK912960
ENDIF.
sort t_ekko by ebeln ebelp budat descending.
sivanew
delete adjacent duplicates from t_ekko comparing ebeln ebelp .
sivanew
IF sy-subrc EQ 0. "R3DK912809
IF NOT t_ekko[] IS INITIAL. "R3DK912809
PERFORM process_data.
Begin of R3DK912444
IF NOT p_excep IS INITIAL.
PERFORM get_exceptions.
ENDIF.
End of R3DK912444
ENDIF.
ENDFORM. " select_data
*& Form write_fieldcat
text
-->P_0190 field name, if the SAP name used desc will be
automatically get from SAP table
-->P_0191 Internale structure or table name
-->P_0192 SAP table for field description
-->P_0193 format
-->P_1 Position
-->P_0195 Custom Description
FORM write_fieldcat USING name tab st key pos desc.
st_fieldcat-fieldname = name.
st_fieldcat-tabname = tab.
st_fieldcat-ref_tabname = st.
st_fieldcat-key = key.
st_fieldcat-col_pos = pos.
st_fieldcat-seltext_m = desc.
IF pos = 12.
st_fieldcat-outputlen = 40.
ENDIF.
APPEND st_fieldcat TO tbl_fieldcat.
CLEAR st_fieldcat.
ENDFORM. " write_fieldcat
*& Form process_record
text
--> p1 text
<-- p2 text
FORM process_record.
DATA:l_ebeln LIKE ekko-ebeln.
LOOP AT t_cdhdr.
CLEAR: l_ebeln, ws_ebeln, ws_netwr, ws_ernam.
MOVE t_cdhdr-objectid TO l_ebeln.
CALL FUNCTION 'ME_EKKO_SINGLE_READ'
EXPORTING
pi_ebeln = l_ebeln
IMPORTING
po_ekko = po_ekko.
Begin of R3DK912809 R3DK912960
SELECT SUM( dmbtr ) INTO ws_dmbtr
FROM ekbe WHERE ebeln = l_ebeln
AND vgabe = '1'
AND bewtp = 'E'
GROUP BY ebeln.
ENDSELECT.
End of R3DK912809
SELECT SINGLE dmbtr INTO t_ekko-dmbtr
FROM ekbe WHERE ebeln = t_ekko-ebeln
AND ebelp = t_ekko-ebelp
AND belnr = t_ekko-belnr
AND vgabe = '1'
AND bewtp = 'E'.
MODIFY T_EKKO.
End of R3DK912960
SELECT SINGLE ernam INTO t_ekko-grnam
FROM ekbe WHERE ebeln = t_ekko-ebeln
AND ebelp = t_ekko-ebelp
AND ELIKZ = 'X'.
MODIFY T_EKKO.
SELECT ebeln SUM( netwr ) INTO (ws_ebeln, ws_netwr)
FROM ekpo WHERE ebeln = l_ebeln R3DK912960
FROM ekpo WHERE ebeln = t_ekko-ebeln "R3DK912960
GROUP by ebeln.
ENDSELECT.
IF sy-subrc EQ 0.
IF s_groups IS INITIAL.
PERFORM build_output.
ELSE.
IF po_ekko-ekgrp IN s_groups.
PERFORM build_output.
ENDIF.
ENDIF.
ENDIF.
ENDLOOP.
ENDFORM. " process_record
*& Form get_customer
Get Customers if sales office specified
--> p1 text
<-- p2 text
*& Form build_output
text
--> p1 text
<-- p2 text
FORM build_output.
DATA: l_line LIKE ekpo-ebelp.
DATA: l_requisitioner LIKE ekpo-afnam.
IF po_ekko-frgke = 'R'.
CLEAR: tbl_output.
tbl_output-udate = t_cdhdr-udate.
tbl_output-utime = t_cdhdr-utime.
tbl_output-username = t_cdhdr-username.
tbl_output-ebeln = po_ekko-ebeln.
tbl_output-bukrs = po_ekko-bukrs.
tbl_output-lifnr = po_ekko-lifnr.
tbl_output-name1 = ' '.
tbl_output-lifnr = po_ekko-lifnr.
tbl_output-ekgrp = po_ekko-ekgrp.
tbl_output-ernam = po_ekko-ernam.
tbl_output-ernam = t_ekko-ernam.
tbl_output-budat = t_ekko-budat.
tbl_output-grnam = t_ekko-grnam.
tbl_output-bedat = t_ekko-bedat.
tbl_output-dmbtr = t_ekko-dmbtr. "R3DK912809
tbl_output-ebelp = t_ekko-ebelp.
SORT T_CDHDR1.
sivanew
read table t_cdhdr1 with key
objectid = t_cdhdr-objectid binary search.
if sy-subrc = 0.
tbl_output-cdate = t_cdhdr1-username.
endif.
read table t_cdhdr1 with key
tcode = 'ME22N' binary search.
if sy-subrc = 0.
SELECT * FROM cdpos INTO TABLE t_cdpos
WHERE objectid = t_cdhdr1-objectid AND
objectclas = 'EINKBELEG' AND
changenr = t_cdhdr1-changenr.
IF sy-subrc = 0.
l_ponum = t_cdpos-tabkey+3(10).
l_poline = t_cdpos-tabkey+13(6).
ENDIF.
ENDIF.
IF tbl_output-ebeln = l_ponum AND tbl_output-ebelp = l_poline.
READ TABLE t_cdhdr1 WITH KEY changenr = t_cdpos-changenr
tcode = 'ME22N' BINARY SEARCH.
IF sy-subrc = 0.
tbl_output-cdate = t_cdhdr1-username.
ENDIF.
ENDIF.
ENDIF.
select ebeln belnr budat cputm from ekbe into table t_ekbe
where vgabe = '1' and
ebeln = t_cdhdr-objectid.
sort t_ekbe by budat descending cputm descending.
delete adjacent duplicates from t_ekbe comparing ebeln.
loop at t_ekbe.
select mblnr usnam from mkpf into table t_mkpf
where mblnr = t_ekbe-belnr.
if sy-subrc = 0.
read table t_mkpf with key
mblnr = t_ekbe-belnr binary search.
move t_mkpf-usnam to tbl_output-grnam.
endif.
endloop.
Indra
Get the user changed the record
IF t_cdhdr-tcode = 'ME22N'.
SELECT * FROM cdpos INTO TABLE t_cdpos
WHERE objectid = t_cdhdr-objectid AND
objectclas = 'EINKBELEG' AND
changenr = t_cdhdr-changenr.
IF sy-subrc = 0.
l_ponum = t_cdpos-tabkey+3(10).
l_poline = t_cdpos-tabkey+13(6).
ENDIF.
ENDIF.
indra
Display creator or changer
IF tbl_output-ebeln = l_ponum AND tbl_output-ebelp = l_poline.
READ TABLE t_cdhdr WITH KEY changenr = t_cdpos-changenr
tcode = 'ME22N' BINARY SEARCH.
IF sy-subrc = 0.
tbl_output-cdate = t_cdhdr-username.
ENDIF.
ENDIF.
Indra
SELECT SINGLE * FROM t024
WHERE ekgrp = po_ekko-ekgrp.
IF sy-subrc EQ 0.
tbl_output-eknam = t024-eknam.
ENDIF.
tbl_output-netwr = ws_netwr.
SELECT SINGLE name1 FROM lfa1
INTO tbl_output-name1
WHERE lifnr = po_ekko-lifnr.
Get Document descriptions
SELECT SINGLE batxt FROM t161t
INTO tbl_output-batxt
WHERE spras = 'E' AND
bsart = po_ekko-bsart AND
bstyp = po_ekko-bstyp.
Get Release code descriptions
SELECT SINGLE frgct FROM t16fd
INTO tbl_output-frgct
WHERE spras = 'E' AND
frggr = po_ekko-frggr AND
frgco = po_ekko-frgsx.
APPEND tbl_output.
ENDIF.
ENDFORM. " build_output
*& Form SORT_TABLE
text
--> p1 text
<-- p2 text
FORM sort_table.
SORT tbl_output BY ebeln ebelp ascending udate utime DESCENDING.
SORT tbl_output BY ebeln ascending udate utime DESCENDING.
delete adjacent duplicates from tbl_output comparing ebeln ebelp .
ENDFORM. " SORT_TABLE
*& Form PROCESS_DATA
text
--> p1 text
<-- p2 text
FORM process_data.
LOOP AT t_ekko.
c_tcode = 'Purchase Orders'.
SELECT * FROM cdhdr UP TO 1 ROWS INTO TABLE t_cdhdr "R3DK912960
SELECT * FROM cdhdr into table t_cdhdr
WHERE objectclas = 'EINKBELEG' AND
objectid = t_ekko-ebeln AND
tcode = 'ME28'.
SORT T_CDHDR BY UDATE DESCENDING UTIME DESCENDING.
delete adjacent duplicates from t_cdhdr comparing objectid.
siva
SELECT * FROM cdhdr UP TO 1 ROWS INTO TABLE t_cdhdr1
*"R3DK912960
SELECT * FROM cdhdr INTO TABLE t_cdhdr1
WHERE objectclas = 'EINKBELEG' AND
objectid = t_ekko-ebeln AND
tcode = 'ME22N'.
SORT T_CDHDR1 BY UDATE descending UTIME DESCENDING.
delete adjacent duplicates from t_cdhdr1 comparing objectid.
sivanew
if c_tcode = 'ME22N'.
SELECT * FROM cdpos INTO TABLE t_cdpos
WHERE objectid = t_cdhdr1-objectid AND
objectclas = 'EINKBELEG' AND
changenr = t_cdhdr1-changenr.
IF sy-subrc = 0.
l_ponum = t_cdpos-tabkey+3(10).
l_poline = t_cdpos-tabkey+13(6).
ENDIF.
ENDIF.
*sivanew
IF sy-subrc = 0.
delete adjacent duplicates from t_cdhdr comparing objectid.
PERFORM process_record. " process each document
ENDIF.
ENDLOOP.
ENDFORM. " PROCESS_DATA
*& Form get_exceptions
text
--> p1 text
<-- p2 text
form get_exceptions.
Display a report which shows the same released, goods receipted and
created by user
LOOP AT tbl_output.
IF tbl_output-username <> tbl_output-ernam OR
tbl_output-ernam <> tbl_output-grnam.
DELETE tbl_output.
ENDIF.
ENDLOOP.
endform. " get_exceptionsHi,
first of all you should read the following thread ABAP Development It is really hard to read code without proper formatting.
It looks like you use change documents to get user name for last change. For each document you use last change document and hence you have same name for every item. I am not sure if it is possible (it should be) but for each item you need to look for last change document corresponding to this item.
Cheers -
Hi,
I have a selet statement where i need to write below logic .
SELECT bldat xblnr kunnr rstgr xref1 xref2
bukrs belnr blart wrbtr waers shkzg
buzei zfbdt dmbe2 sgtxt augbl augdt
zbd1t zbd2t
FROM bsid
INTO CORRESPONDING FIELDS OF TABLE int_output
WHERE bldat IN so_bldat AND
shkzg IN so_shkzg AND
wrbtr IN so_wrbtr.
Range needs to be entered where from value (for wrbtr field) is -ve negative and to value is +ve positive e.g., -1000 to +200 -:in this case go to BSID with value from 0 to 1000 with debit/credit indicator H and again 0 to 200 with debit/credit indicator S..
can somebody tell me how to set range for the above requirement.
Really need help.
Edited by: Thomas Zloch on May 25, 2011 3:27 PMchange:
AND
shkzg IN so_shkzg AND
wrbtr IN so_wrbtr.
to
and ( (SHKZG eq 'H' and wrbtr le 1000 ) or
(SHKZG eq 'S' and wrbtr le 200 ) ). ?? -
Need code for calculation of amount field(DMBTR)of BSEG table conditionally
Hi all,
I am selecting data for fields belnr(A/c doc.), dmbtr(Amount), hkont(G/L acc) from bseg cluster table giving the particular value for hkont in the selection screen.now there are some records fetched out of which there are few records in which same A/c no.(belnr) .So my requirement is to collect those same belnr records and do following calculation:
1. suppose for some record of same belnr , if all the value for field SHKZG is 'H' then summing up the values of field DMBTR.
2. suppose for some record of same belnr , if few value for the field SHKZG is 'H' and few are 'S' then the (summation the values of field DMBTR for all 'H' in field SHKZG -summation the values of field DMBTR for all 'S') and both the case the single record will fetched with belnr, sum(DMBTR) according to the condition, and hkont. Please provide me the reqd. code for the above problem.Thanks in advance.
regards
Anand.Hi Anand,
We can do like this.
This will take into account 'S', 'H' (debit/credit indicator) and BELNR wise sum.
1. Create new internal table, STAB with only two fields. (with header line)
BELNR "<------- refer below statement
HKONT "<------ Whatever unique combination of field(s) you want, you can put here 1,2,
DMBTR "<----
Numeric field
If you want only HKONT wise SUM, then remove BELNR
2. Now write this code.
Loop at Itab.
Clear STAB.
IF ITAB-SHKZG = 'H'.
STAB-DMBTR = ITAB-DMBTR.
else.
STAB-DMBTR = - ITAB-DMBTR. "<----- Negative Sign
endif.
STAB-BELNR = ITAB-BELNR.
STAB-HKONT = ITAB-HKONT.
COLLECT STAB. "<------ Important.
Endloop
Note:
Based upon the alphanumeric fields combination (BELNR and HKONT), the sum will be done.
Similar to group by in a select query
regards,
amit m.
Edited by: Amit Mittal on Jan 22, 2010 2:14 PM -
Need logic for this output itab format
hi guys
i need the output itab in following format
i have data in my present itab
itab-f1 itab-f2 itab-f3
AAA 10 (means null,' ')
AAA 20
BBB 10
BBB 20 A1
BBB 30
and i want output in following way output itab
itab-f1 itab-f2 itab-f3
AAA 30
BBB 60 A1
can anyone suggest me code for thisYou want the sum of f2 for a group of f1's?
Is f3 going to be the same for that group?
Try this
sum = 0
sort itab by f1.
itab2 like itab.
loop itab.
sum = itab-f2 + sum.
f3var = tab-f3.
at end of f1.
move itab-f1 to itab2-f1.
move sum to itab2-f2.
move f3var to itab2-f3.
append itab2.
sum = 0.
endat.
endloop.
Edited by: Ramiro Escamilla on Feb 7, 2008 11:29 PM -
Need Logic for Inserting data into table from another table
Hi,
Could you please give me some logic on below:
TABLE_A has columns A,B,C,D
What i did
==========
Created new table
TABLE_1_A with columns A1,A2,B1,B2,B3
Requirement
===========
I should populate columns A1,A2 (table TABLE_1_A) with the data from column A (table TABLE_A)
& simillarly populate columns B1,B2 with the data from B.
the data is huge in the table_a.
Database: 10g
Thanks.Hi,
Here's one way:
INSERT INTO table_1_a
(a1, a2, b1, b2)
SELECT a, a, b, b
FROM table_a
I hope this answers your question.
If not, post a little sample data (CREATE TABLE and INSERT statements, relevant columns only) for all tables involved, and also post the results you want from that data.
If you're asking about a DML statement, such as INSERT, the sample data will be the contents of the table before the DML, and the results will be state of the changed table(s) when everything is finished.
Explain, using specific examples, how you get those results from that data.
See the forum FAQ {message:id=9360002} -
Dear All,
We have one requirement for Report,
We have catalogs defined for the WCA Application. We have created one application , in the application we have given the catalogs like (safety and parameters). Once we assign the catalogs for the application , in that we need to write the long text for the codes.
So can you help me from which tables can we fetch the long text written in the catalogs for that specific application.I believe this post answers your question, Retrieving Longtext-lines for Reporting. You need to get the Header details of Longtext as explained in the document, and then with the help of FM READ_TEXT you will be getting the longtext lines. You or your ABAPer follow the document, it is not difficult to retireve the information you sought. The Header Details to your specific case lie in the table of Further section of the above document. (You should find these details on your own by the way described in the document)
KJogeswaraRao -
I HAVE A TABLE AND THE VALUES LIKE THIS,
CALENDAR_DATE working_day return_date
JUL 04 N JUL 04
JUL 05 N JUL 05
JUL 06 N JUL 06
JUL 06 N JUL 07
JUL 08 Y JUL 08
my requirement is how can i change all the return_date for which the working_day is 'N' to JUL 08 (working_day= 'Y')UPDATE table_name
SET return_date = 'JUL 08'
,working_day = 'Y'
WHERE working_day = 'N';
Is this what you wanted ? -
Need logic for Group By function
Hi,
I written this query for the requirement, but when the column column 'exposure_code' included in the group by function,
it's increasing the count's of records, becuase of different combination of values. (its having value like 'DRAWN', 'UNDRAWN', 'OOBS').
Is that any possiblility to get the value of exposure_code column without including the column name in the group by clause.
SELECT /*+NO_MERGE(noacct)*/
vbcar.month_end_date, vbcar.source_system,
rf1.pillar3_exposure_class_code, vbcar.exposure_code
vbcar.exposure_class_code,
CASE
WHEN vbcar.source_system = 'ML'
THEN 'Margin_Lending'
WHEN vbcar.source_system = 'ICBS'
THEN 'Amicus'
|| vbcar.ccis_product_group
WHEN vbcar.source_system IN ('ACBS', 'ASNEMP')
THEN 'Other'
WHEN vbcar.source_system = 'CLSORG'
THEN 'CBNF_Excalibur'
WHEN vbcar.source_system = 'TARGET'
AND vbcar.exposure_code = 'UNDRAW'
AND vbcar.acc_rk = -1
THEN 'CBNF_Target'
WHEN vbcar.source_system = 'PCL'
AND vbcar.exposure_class_code = 'REVOLV'
AND vbcar.exposure_code = 'UNDRAW'
THEN 'PLC_Unsecured'
ELSE vbcar.ccis_product_group
END AS line_of_business,
decode(vbcar.ccis_product,vbcar.ccis_product,vbcar.ccis_product),
vbcar.pd_value, vbcar.lgd_rate,
--stfc.term_period_mth_cnt,
-- Fix for 993 on Sep28th 2009
CASE
WHEN vbcar.exposure_class_code =
'REVOLV'
THEN 'No Specific Maturity'
ELSE rf3.residual_maturity_term
END AS residual_maturity_term,
-- Fix for 993 on Sep28th 2009
-- Fix for MQC - 964
SUM (vbcar.pre_sec_ead_amt) AS ead_pre_sec_pre_crm,
SUM (vbcar.post_sec_ead_amt) AS ead_post_sec_pre_crm,
SUM
(CASE
WHEN vbcar.exposure_class_code = 'REMORT'
AND vbcar.exposure_code = 'DRAWN'
AND ( NVL (vbcar.insurer_type_cd, '') IN
('GVN', 'PRI')
OR vbcar.acc_securitized_ind = 'E'
THEN 0
WHEN vbcar.ccis_product_group = 'Student_Loans'
THEN vbcar.post_gov_ead_amt
ELSE vbcar.post_sec_ead_amt
END
) AS ead_post_sec_post_crm,
CASE
WHEN vbcar.exposure_class_code = 'REMORT'
AND vbcar.insurer_type_cd IN ('GVN', 'PRI') --UAT: 948
THEN 'FULLY INSURED'
WHEN vbcar.ccis_product_group = 'Student_Loans'
AND vbcar.post_gov_ead_amt = 0
THEN 'FULLY INSURED'
WHEN vbcar.ccis_product_group = 'Student_Loans'
AND vbcar.post_gov_ead_amt > 0
THEN 'PARTIALLY INSURED'
ELSE 'NOT INSURED'
END AS insured_ind,
/*CASE
WHEN vbcar.acc_securitized_ind = 'E'
THEN 'FULLY SECURITIZED'
WHEN vbcar.source_system = 'TSYS'
AND vbcar.pre_sec_ead_amt > vbcar.post_sec_ead_amt
THEN 'PARTIALLY SECURITIZED'
ELSE 'NOT SECURITIZED'
END AS securitized_ind,*/
SUM (vbcar.notional_principal_amt) AS notional_principal_amt,
SUM
(CASE
WHEN vbcar.exposure_class_code = 'REMORT'
AND NVL (vbcar.insurer_type_cd, '') IN ('GVN', 'PRI')
THEN 0
WHEN vbcar.ccis_product_group = 'Student_Loans'
THEN vbcar.post_gov_rwa_amt
ELSE vbcar.post_sec_rwa_amt
END
) AS rwa,
SUM
(CASE
WHEN vbcar.exposure_class_code = 'REMORT'
AND NVL (vbcar.insurer_type_cd, '') IN ('GVN', 'PRI')
THEN 0
WHEN vbcar.ccis_product_group = 'Student_Loans'
THEN vbcar.post_gov_el_amt
ELSE vbcar.post_sec_el_amt
END
) AS el,
SUM
(CASE
WHEN vbcar.exposure_class_code = 'REMORT'
AND NVL (vbcar.insurer_type_cd, '') IN
('GVN', 'PRI')
THEN 0
WHEN vbcar.ccis_product_group = 'Student_Loans'
THEN vbcar.post_gov_rwa_amt
ELSE vbcar.post_sec_rwa_amt
END
* .08 AS capital,
NVL (inv1.geo_section, 'CANADA') geo_section,
COUNT (noacct.count_of_accounts) count_of_accounts,
-- Fix for 973
decode(vbcar.pd_model_id,vbcar.pd_model_id,vbcar.pd_model_id),
SYSDATE load_date, SYSDATE update_date,
'PILLAR3' user_id
FROM summary.pillar3_bcar_detail vbcar,
-- Fix for 973
(SELECT DISTINCT acc_rk count_of_accounts
FROM summary.pillar3_bcar_detail a
WHERE a.acc_rk <> -1 --143053
UNION
SELECT DISTINCT cr_app_rk count_of_accounts
FROM summary.pillar3_bcar_detail a
WHERE a.cr_app_rk <> -1) noacct,
-- Fix for 973
rcdwstg.stg_fin_acc stfc,
(SELECT prty.party_src_rk party_src_rk,
-- Fix for UAT 962
src.acc_rk acc_rk,
prty.country_cd, rf4.geo_section
FROM rcdwstg.stg_party_src prty,
(SELECT MAX (party_src_rk) psrk, acc_rk
FROM rcdwstg.stg_fin_acc_party_src
WHERE party_role_cd = 'BOR'
GROUP BY acc_rk) src,
REFERENCE.ref_geo_section rf4
WHERE src.psrk = prty.party_src_rk
AND rf4.country_code(+) = prty.country_cd) inv1,
REFERENCE.ref_p3_bcar_exposure_class_cd rf1,
(SELECT residual_maturity_term, value_from, value_to
FROM REFERENCE.ref_maturity_term) rf3
-- Fix for MQC - 964
WHERE vbcar.acc_rk = stfc.acc_rk(+)
AND vbcar.acc_rk = inv1.acc_rk(+)
--AND vbcar.bcar_id = noacct.bcar_id(+) -- Fix for 973 -- Commented out for the fix of SIT 1162 on March 29th 2010
AND DECODE (vbcar.acc_rk, -1, vbcar.cr_app_rk, vbcar.acc_rk) =
noacct.count_of_accounts(+)
-- Added code for the fix of SIT 1162 on March 29th 2010
AND vbcar.pd_value <> 0
AND vbcar.exposure_class_code = rf1.bcar_exposure_class_code
AND ( ( stfc.term_period_mth_cnt IS NULL
AND rf3.value_from IS NULL
OR (stfc.term_period_mth_cnt BETWEEN rf3.value_from
AND NVL
(rf3.value_to,
stfc.term_period_mth_cnt
) -- Fix for MQC - 964
GROUP BY vbcar.month_end_date,
vbcar.source_system,
rf1.pillar3_exposure_class_code,
vbcar.exposure_code,
vbcar.exposure_class_code,
CASE
WHEN vbcar.source_system = 'ML'
THEN 'Margin_Lending'
WHEN vbcar.source_system = 'ICBS'
THEN 'Amicus' || vbcar.ccis_product_group
WHEN vbcar.source_system IN ('ACBS', 'ASNEMP')
THEN 'Other'
WHEN vbcar.source_system = 'CLSORG'
THEN 'CBNF_Excalibur'
WHEN vbcar.source_system = 'TARGET'
AND vbcar.exposure_code = 'UNDRAW'
AND vbcar.acc_rk = -1
THEN 'CBNF_Target'
WHEN vbcar.source_system = 'PCL'
AND vbcar.exposure_class_code = 'REVOLV'
AND vbcar.exposure_code = 'UNDRAW'
THEN 'PLC_Unsecured'
ELSE vbcar.ccis_product_group
END,
--vbcar.ccis_product,
vbcar.pd_value,
vbcar.lgd_rate,
-- stfc.term_period_mth_cnt,
rf3.residual_maturity_term, -- Fix for MQC - 964
CASE
WHEN vbcar.exposure_class_code = 'REMORT'
AND vbcar.insurer_type_cd IN ('GVN', 'PRI') --UAT: 948
THEN 'FULLY INSURED'
WHEN vbcar.ccis_product_group = 'Student_Loans'
AND vbcar.post_gov_ead_amt = 0
THEN 'FULLY INSURED'
WHEN vbcar.ccis_product_group = 'Student_Loans'
AND vbcar.post_gov_ead_amt > 0
THEN 'PARTIALLY INSURED'
ELSE 'NOT INSURED'
END,
NVL (inv1.geo_section, 'CANADA'),
vbcar.pd_model_id
)Thanks
Radha KHi,
I am getting '9263212' as total_length. I have posted the table structure and some sample data.
-- SUMMARY.PILLAR3_BCAR_DETAIL
NAME Null? Type
BCAR_ID NUMBER
ACC_RK NUMBER
CR_APP_RK NUMBER
SOURCE_SYSTEM VARCHAR2(25)
EXPOSURE_CLASS_CODE VARCHAR2(6)
EXPOSURE_CODE VARCHAR2(6)
CCIS_ACCOUNT VARCHAR2(7)
CCIS_BRANCH_OF_ACCOUNT VARCHAR2(5)
CCIS_CUST_GROUP VARCHAR2(5)
CCIS_PRODUCT VARCHAR2(4)
CCIS_ORG_UNIT VARCHAR2(5)
CCIS_PRODUCT_ORG_ID VARCHAR2(5)
CCIS_PRODUCT_GROUP VARCHAR2(20)
CCIS_CCY_CODE VARCHAR2(3)
ACC_SECURITIZED_IND VARCHAR2(1)
INSURER_TYPE_CD VARCHAR2(20)
SUBSIDIARY_CODE VARCHAR2(6)
PD_MODEL_ID VARCHAR2(32)
PD_BAND VARCHAR2(30)
PD_VALUE NUMBER(34,6)
LGD_RATE NUMBER(34,6)
PRE_SEC_AUTHORIZED_CD_LIMIT NUMBER(34,2)
PRE_SEC_OUTSTANDING_BALANCE NUMBER(34,2)
POST_SEC_OUTSTANDING_BALANCE NUMBER(34,2)
PRE_SEC_EAD_AMT NUMBER(34,2)
POST_SEC_EAD_AMT NUMBER(34,2)
PRE_SEC_RWA_AMT NUMBER(34,2)
POST_SEC_RWA_AMT NUMBER(34,2)
PRE_SEC_EL_AMT NUMBER(34,2)
POST_SEC_EL_AMT NUMBER(34,2)
NOTIONAL_PRINCIPAL_AMT NUMBER(15,2)
MONTH_END_DATE DATE
LOAD_TIME DATE
UPDATE_TIME DATE
POST_GOV_OUTSTANDING_BALANCE NUMBER(34,2)
POST_GOV_EAD_AMT NUMBER(34,2)
POST_GOV_RWA_AMT NUMBER(34,2)
POST_GOV_EL_AMT NUMBER(34,2)
POST_SEC_AUTHORIZED_CD_LIMIT NUMBER(38,2)
INSURER_NAME VARCHAR2(50)
ADJ_CYCLE_ID NUMBER
TARGET_HELOC_IND VARCHAR2(1)
ORIG_ACC_RK NUMBER(*,0)
CURR_CCIS_PROD VARCHAR2(4)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100124900,-1,7021736,'CLSORG','REMORT','UNDRAW','3101100','19702','A0810','0590','09702','09702','Mortgages','CAD','N',NULL,'S1001','MTGPDRTA98','0.001712-0.001900',0.19,11.8183,0,NULL,NULL,0,0,0,0,0,0,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,0,NULL,0,'N',NULL,NULL)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100124901,-1,7006862,'CLSORG','REMORT','UNDRAW','3101100','19702','A0810','0590','09702','09702','Mortgages','CAD','N',NULL,'S1001','MTGPDRTA98','0.001712-0.001900',0.19,11.8183,0,NULL,NULL,0,0,0,0,0,0,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,0,NULL,0,'N',NULL,NULL)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100125019,-1,7001515,'CLSORG','REMORT','UNDRAW','3101100','19702','A0810','0590','09702','09702','Mortgages','CAD','N',NULL,'S1001','MTGPDRTA98','0.001712-0.001900',0.19,11.8183,0,NULL,NULL,0,0,0,0,0,0,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,0,NULL,0,'N',NULL,NULL)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100028602,19857874,-1,'CLASS','OTHRET','DRAWN','1301000','00806','A0810','1260','00806','92181','PL_Unsecured','CAD','N',NULL,'S1001','PLXPDRT010101','0.009062-0.012143',1.2143,82.8109,10284.2,10279.13,10279.13,10284.2,10284.2,9371.67,9371.67,103.42,103.42,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,10284.2,NULL,0,'N',NULL,NULL)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100028603,19857886,-1,'CLASS','OTHRET','DRAWN','1301300','00002','A0810','1260','00002','92181','PL_Unsecured','CAD','N',NULL,'S1001',NULL,NULL,1.2143,82.8109,0,280.36,280.36,0,0,0,0,0,0,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,0,NULL,0,'N',NULL,NULL)
---STG_FIN_ACC table
NAME Null? Type
NTRL_CONCAT_K_ACC NOT NULL VARCHAR2(255)
ACC_RK NOT NULL NUMBER(*,0)
SOURCE_SYSTEM NOT NULL VARCHAR2(25)
BATCH_ID NOT NULL NUMBER(*,0)
UPDATE_TIME NOT NULL DATE
LOAD_TIME NOT NULL DATE
VALID_FROM_DT NOT NULL DATE
VALID_TO_DT NOT NULL DATE
FINANCIAL_ACC_TYPE_CD NOT NULL VARCHAR2(20)
CR_APP_RK NUMBER(*,0)
ACC_BR_TRANSFER_REASON_CD VARCHAR2(20)
ACC_PRE_PAYMENT_OPTION_CD VARCHAR2(20)
ACC_PURPOSE_CD VARCHAR2(20)
ACC_RT_SCHEDULE_CD VARCHAR2(20)
CCIS_BRANCH_OF_ACCOUNT CHAR(5)
ORIGINATION_ORG_UNIT_ID VARCHAR2(20)
PAYMENT_FREQUENCY_CD VARCHAR2(20)
PAYMENT_METHOD_CD VARCHAR2(20)
PAYMENT_TYPE_CD VARCHAR2(20)
ACC_INTERNAL_LENDER_NAME VARCHAR2(65)
SRC_SYS_ACC_NUM NOT NULL VARCHAR2(40)
ACC_CAP_RT_START_DT DATE
ACC_CAP_RT_END_DT DATE
ACC_CAP_RT NUMBER
ACC_CAP_CHARGE_LIMIT_PCT NUMBER(10,4)
ACC_OPEN_DT DATE
ACC_CLOSE_DT DATE
ACC_CLOSE_REASON_CD VARCHAR2(20)
ACC_LAST_ASSUMPTION_DT DATE
ACC_LAST_RENEWAL_DT DATE
ACC_LAST_MATURITY_DT DATE
ACC_LAST_PORT_DT DATE
ACC_LAST_REWRITE_DT DATE
ACC_MATURITY_DT DATE
ACC_NEXT_RENEWAL_DT DATE
FIRST_INTEREST_ADJUSTMENT_DT DATE
INTEREST_PAYMENT_START_DT DATE
LAST_EXTENT_RENEGOTIATION_DT DATE
PAYMENT_START_DT DATE
PRINCIPAL_PAYMENT_END_DT DATE
TERM_START_DT DATE
TERM_MATURITY_DT DATE
TERM_PERIOD_MTH_CNT NUMBER(4,0)
TERM_ANNUAL_INTEREST_RT NUMBER
TERM_PER_ANNUM_INTEREST_RT NUMBER
ACC_FRAUD_IND VARCHAR2(1)
GROUP_ACC_IND VARCHAR2(1)
ACC_LIFETIME_CAP_INT_RT NUMBER
ACC_TRIGGER_INTEREST_RT NUMBER
ACC_AMORTIZATION_PD NUMBER
ACC_TOT_EXTENSIONS_CNT NUMBER(3,0)
ACC_TOT_RENEWAL_CNT NUMBER(3,0)
TOT_INTEREST_COST_AMT NUMBER(38,2)
ACC_FINAL_REPAYMENT_AMT NUMBER(38,2)
ACC_LAST_RENEWAL_VAL_AMT NUMBER(38,2)
ACC_LIFETIME_OUTST_BAL_AMT NUMBER(38,2)
ORIGINAL_PRINCIPAL_BAL_AMT NUMBER(38,2)
FINANCIAL_PROD_RK NUMBER(*,0)
ACC_REVOLVING_FLG VARCHAR2(1)
CCIS_CCY_CODE CHAR(3)
ACC_WORST_ARREARS_DAYS_CNT NUMBER(3,0)
OD_FYTD_DAY_CNT NUMBER(3,0)
OD_ORIGINATION_DT DATE
SRC_SYS_TRANSIT_NUM VARCHAR2(5)
SRC_SYS_APPLICATION_NUM VARCHAR2(40)
INSTRUMENT_QUALIFIER VARCHAR2(25)
NTRL_CONCAT_K_APP VARCHAR2(255)
NTRL_CONCAT_K_FIN_PROD VARCHAR2(255)
SRC_SYS_APP_ID VARCHAR2(40)
SRC_SYS_TRANSIT_NUM_APP VARCHAR2(25)
SRC_SYS_APPLICATION_QUALIFIER VARCHAR2(25)
LOAN_CATEGORY_CD VARCHAR2(20)
SRC_SYS_PRODUCT_ID VARCHAR2(20)
CCIS_PRODUCT CHAR(4)
DIGEST_VALUE VARCHAR2(32)
RELATED_FINANCIAL_ACC_RK NUMBER(*,0)
MARKETING_SOURCE_CD VARCHAR2(20)
FINANCIAL_PROD_SEC_CLASS_CD VARCHAR2(20)
DIGEST_VALUE_CC VARCHAR2(32)
DIGEST_VALUE_MTGE VARCHAR2(32)
DOMICILE_ORG_UNIT_ID VARCHAR2(20)
MARKETING_FEATURE_CODE VARCHAR2(20)
CR_APP_SEQ_NUM NUMBER(*,0)
OD_IND VARCHAR2(1)
ACC_ORIGINAL_WROFF_AMT NUMBER
DIGEST_VALUE_INTEREST_RT VARCHAR2(32)
SOURCE_SYSTEM_FEED_CD VARCHAR2(25)
DIGEST_VALUE_CORE VARCHAR2(32)
SEGMENT_NAME VARCHAR2(60)
MTGE_PROCESSING_IND VARCHAR2(1)
HIGH_VALUE_INDICATOR VARCHAR2(1)
LINE_OF_BUSINESS VARCHAR2(2)
BUILDER_CODE VARCHAR2(5)
MTG_CUSTOMER_GROUP VARCHAR2(2)
GOVT_REPORTING_CODE VARCHAR2(2)
ORIG_SRC_SYS_ACC_NUM VARCHAR2(40)
ORIG_SRC_SYS_TRANSIT_NUM NUMBER(5,0)
ORIG_ACC_RK NUMBER(*,0)
ORIG_CCIS_PRODUCT CHAR(4)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PURCHMORTGEN00001',19866078,'PURCHMORT',357,'THURSDAY, MARCH 04, 2010','THURSDAY, MARCH 04, 2010','SATURDAY, OCTOBER 31, 2009','FRIDAY, DECEMBER 31, 9999','LOAN',-1,NULL,NULL,'UNK',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00000',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00000',NULL,NULL,'-1',NULL,NULL,NULL,NULL,NULL,'UNK',NULL,'95EEFFD275D4879702E53254886D534D',NULL,NULL,'UNK',NULL,NULL,NULL,NULL,NULL,NULL,0,NULL,'GENERICFEED',NULL,'GENPURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PURCHMORTGEN00002',19866079,'PURCHMORT',357,'THURSDAY, MARCH 04, 2010','THURSDAY, MARCH 04, 2010','SATURDAY, OCTOBER 31, 2009','FRIDAY, DECEMBER 31, 9999','LOAN',-1,NULL,NULL,'PURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'0000000000000000000000002',NULL,NULL,NULL,NULL,'THURSDAY, JANUARY 01, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'SATURDAY, JUNE 06, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00002',NULL,NULL,'-1',NULL,NULL,NULL,NULL,NULL,'1234567890ABCDEFGHIJ',NULL,'AC8AFAFCE5501EB3038B8F48EF10D842',NULL,NULL,'REA',NULL,NULL,NULL,NULL,NULL,NULL,100,NULL,'GENERICFEED',NULL,'GENPURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PURCHMORTGEN00003',19866080,'PURCHMORT',357,'THURSDAY, MARCH 04, 2010','THURSDAY, MARCH 04, 2010','SATURDAY, OCTOBER 31, 2009','FRIDAY, DECEMBER 31, 9999','LOAN',-1,NULL,NULL,'PURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'0000000000000000000000003',NULL,NULL,NULL,NULL,'THURSDAY, JANUARY 01, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'SATURDAY, JUNE 06, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00003',NULL,NULL,'-1',NULL,NULL,NULL,NULL,NULL,'1234567890ABCDEFGHIJ',NULL,'72717E6EFA7BD60E863D3920664FDDFE',NULL,NULL,'REA',NULL,NULL,NULL,NULL,NULL,NULL,200,NULL,'GENERICFEED',NULL,'GENPURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PURCHMORTGEN00004',19866081,'PURCHMORT',357,'THURSDAY, MARCH 04, 2010','THURSDAY, MARCH 04, 2010','SATURDAY, OCTOBER 31, 2009','FRIDAY, DECEMBER 31, 9999','LOAN',-1,NULL,NULL,'PURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'0000000000000000000000004',NULL,NULL,NULL,NULL,'THURSDAY, JANUARY 01, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'SATURDAY, JUNE 06, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00004',NULL,NULL,'-1',NULL,NULL,NULL,NULL,NULL,'1234567890ABCDEFGHIJ',NULL,'27746EBD70E09C911260A36E89361275',NULL,NULL,'REA',NULL,NULL,NULL,NULL,NULL,NULL,300,NULL,'GENERICFEED',NULL,'GENPURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PCL8018166323',19864976,'PCL',472,'MONDAY, JANUARY 25, 2010','MONDAY, JANUARY 25, 2010','SATURDAY, FEBRUARY 28, 2009','FRIDAY, DECEMBER 31, 9999','PLC',NULL,NULL,NULL,'99',NULL,'01084',NULL,'MONTH','MANUAL','OTHER','CIBC','8018166323',NULL,NULL,NULL,NULL,'WEDNESDAY, JULY 14, 2004',NULL,'UNK',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,5.25,NULL,NULL,NULL,NULL,NULL,0,NULL,NULL,NULL,NULL,NULL,NULL,537,'Y','CAD',NULL,NULL,NULL,'1084',NULL,NULL,'PCL8018166323','PCLPLCVARUNS','8018166323',NULL,NULL,NULL,'3','1226','0CF50CD64776937BC3926EA169C7F4A2',NULL,'P4SA','UNS',NULL,NULL,'1084',NULL,NULL,NULL,NULL,NULL,'PCL',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
/Thanks
Radha K -
I need logic for selection screen
i have slection screen with block and inserted radio button with all and firmla with 4 digits
example: . all firmla 1202
. all firmla 1203
. all firmla 1210HI,
SELECTION-SCREEN BEGIN OF BLOCK rype WITH FRAME TITLE text-t04.(write text for Block)
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS R1 RADIOBUTTON GROUP one.
SELECTION-SCREEN COMMENT 4(35) text-c05 FOR FIELD R1.
(write text for Radio button1)
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS R2 RADIOBUTTON GROUP one.
SELECTION-SCREEN COMMENT 4(35) text-c06 FOR FIELD R2.
(write text for Radio button2)
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS R3 RADIOBUTTON GROUP one.
SELECTION-SCREEN COMMENT 4(35) text-c06 FOR FIELD R3.
(write text for Radio button3)
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK rype.
Hope you get the answer
Thanks
Sudheer -
Work Center Changes need data for previous and new work center
Hi All,
I have a requirement as the organisation is going through RESTRUCTURING. In ECC in Plant Maintainance they are changing Work Center. E.G.
Work Center OLD : ABC
Work Center NEW : XYZ
Now the requirement is I have data for ABC already coming in BI Prod. Env. Now when they will change ABC to XYZ the new data will come for XYZ.
Reporting Reqmt:
Data In Cube
Work Center No. of Maintainence Orders
ABC 10
XYZ 20
When user run the report it should and gives input in Work Center variable as " XYZ" then
XYZ -- 30
Presently it is showing
ABC --10
XYZ --20
They have list of OLD Work Center mapping to NEW Work Center.
Now, Can anyone tell me is it possible to achive this scenario.
Thanks,
MayankHi,
find the below link it has similar issue ,
Re: mapping between old/new material codes in BW
Regards,
Satya
Maybe you are looking for
-
External PC Hard Drive won't show up on my Mac
My friend copied a bunch of files on his home PC to his external USB Hard Drive. I plugged it in to my USB hub, turned it on, but my Mac won't recognize the drive. It doesn't show anything. How do I get it to see this drive so I can pull the files of
-
How do I add time/date stamp to my screen capture file names?
I'm on mac osx. I'm trying to add time/date stamp to my screen capture file names. (at the moment it's just 'Picture 1' etc..) I've tried the following command in terminal but have not had success. please help!! defaults write com.apple.screencaptur
-
No CD drive on new US iMac with CS5 from Norway
i just bought my iMac, there is no cd drive to install my adobe photoshop CS5 that I had bought in Norway. Would like some ideas as far as what my options are, aside from buying and external CD drive. (example: can I download straight from Adobe?) Th
-
Wireless site survey planner tool for multi floor office building
Hi, I'm looking a wireless site survey planner tool for multi floor office building to estimate the number of APs and location. Not the site survey after install APs. AigMagnet is excellent for single floor but cannot provide multi floor scenario via
-
Guys, I have passed my OCP one month before and still I didn't get my OCP certificate. I have maild to fulfilment complaining about this, thrice, but, no reply from them, just a default mail that we will respond you in two business days. I think they