-
Products and Technology
By Category
-
Groups
Activity Groups
Industry Groups
Influence and Feedback Groups
Interest Groups
Location Groups
Customer Only Groups
- Developers
- Partners
- Events
- Help Center
- Topic Pages
-
Explore SAP
Products
- Autonomous Enterprise
- Artificial intelligence
- Data and analytics
- Autonomous Suite
- Technology platform
- Transformation management
- Midsize business solutions
- Financial management
- Spend management
- Supply chain management
- Human capital management
- Customer experience
- Enterprise resource planning
- Business network
- Sustainability management
- SAP Store
- Try SAP
- View all industries
- Partners
- Services
Learning and Support
-
- Products and Technology
- Groups
- Developers
- Partners
- Events
- Help Center
- Topic Pages
-
Explore SAP
- Explore SAP
-
Products
- Products
- Autonomous Enterprise
- Artificial intelligence
- Data and analytics
- Autonomous Suite
- Technology platform
- Transformation management
- Midsize business solutions
- Financial management
- Spend management
- Supply chain management
- Human capital management
- Customer experience
- Enterprise resource planning
- Business network
- Sustainability management
- SAP Store
- Try SAP
- View all industries
- Partners
- Services
- Learning and Support
- About
- SAP Community
- Groups
- Interest Groups
- Application Development and Automation
- Discussions
- alv run time error
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results forÂ
Success! Subscription added.
Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Mute
- Printer Friendly Page
This group has been set to read-only. Please go to our new Developer forums to publish your content instead.
Read only
alv run time error
Former Member
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 10:27 AM
895
- SAP Managed Tags
- ABAP Development
this is program im getting a runtime in alv grid display function module
plz help me out
*&---------------------------------------------------------------------*
*& Report ZHR_MAH32_PAYROLL
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZHR_MAH32_PAYROLL no standard page heading.
tables: pernr.
type-pools: slis.
infotypes:0000,"actions
0001,"org assignment
0002,"personal data
0170."flexi plans
types: begin of ty_final,
massn type massn,"actions
massg type massg,"action type
stat1 type stat1,"employment
bukrs type bukrs,"company code
werks type werks,"plant
kostl type kostl,"stell
sacha type sacha,"payroll adminstrator
nachn type nachn,"last name
vorna type vorna,"first name
barea type ben_area,"benifit area
pltyp type ben_type,"benifit plan type
bplan type ben_plan,"benifit plan
bnktr type char15,
end of ty_final.
data: it_final type standard table of ty_final,
wa_final like line of it_final.
data: w_pernr type pc200-pernr,
w_molga type molga,
w_seqnr type pc261-seqnr,
w_relid type pcl2-relid.
data: it_rgdir type standard table of pc261,
IT_RESULT TYPE PAY99_RESULT,
WA_BT TYPE PC209.
data: it_fcat type table of slis_fieldcat_alv ,
wa_fcat type slis_fieldcat_Alv.
data: it_events type SLIS_T_EVENT,
wa_event like line of it_events.
START-OF-SELECTION.
get pernr.
*subroutine to get the employee last record
perform f_get_emp_data.
*step1
*subroutine for reading payroll resullts from rgdir
perform f_get_payroll.
*step5 to process the records of the table cluster and internal tables using loop or read statements
perform f_process_record.
*defining a macro
define: add_fcat.
clear wa_fcat.
wa_fcat-col_pos = &1.
wa_fcat-fieldname = &2.
wa_fcat-tabname = &3.
wa_fcat-seltext_m = &4.
wa_fcat-outputlen = &5.
append wa_fcat to it_fcat.
end-of-definition.
end-of-selection.
*
*perform f_built_fcat.
perform f_display_report.
*&---------------------------------------------------------------------*
*& Form f_get_emp_data
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_get_emp_data .
rp_provide_from_last p0000 space pn-begda pn-endda.
if pnp-sw-found eq 1.
move: p0000-massn to wa_final-massn,
p0000-massg to wa_final-massg,
p0000-stat1 to wa_final-stat1.
endif.
rp_provide_from_last p0001 space pn-begda pn-endda.
if pnp-sw-found eq 1.
move: p0001-bukrs to wa_final-bukrs,
p0001-werks to wa_final-werks,
p0001-kostl to wa_final-kostl,
p0001-sacha to wa_final-sacha.
endif.
rp_provide_from_last p0002 space pn-begda pn-endda.
if pnp-sw-found eq 1.
move: p0002-nachn to wa_final-nachn,
p0002-vorna to wa_final-vorna.
endif.
rp_provide_from_last p0170 space pn-begda pn-endda.
if pnp-sw-found eq 1.
move: p0170-barea to wa_final-barea,
p0170-pltyp to wa_final-pltyp,
p0170-bplan to wa_final-bplan.
else.
message i011(zhnc).
endif.
ENDFORM. " f_get_emp_data
*&---------------------------------------------------------------------*
*& Form f_get_payroll
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_get_payroll .
*SUBROUTINE TO FETCH EMPLOYEE PAYROLL RUNS
PERFORM F_GET_PAYROLL_RUNS.
IF SY-SUBRC eq 0.
*step2
*subroutine for getting sequence number
PERFORM F_GET_SEQNR.
IF SY-SUBRC eq 0.
*SUBROUTINE FOR GETTING CLUSTER TABLE NAME or CLUSTER ID OR RELID
PERFORM F_GET_RELID.
IF SY-DBCNT NE 0.
*EXTRACT PAYROLL DATA RESULTS BY PASSING EMPLOYEE NO, SEQ NO , CLUSTER TABLE NAME
PERFORM F_GET_RESULT.
IF SY-SUBRC EQ 0.
*perform F_PROCESS_REC.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
ENDFORM. " f_get_payroll
*&---------------------------------------------------------------------*
*& Form F_GET_SEQNR
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM F_GET_SEQNR .
CALL FUNCTION 'CD_READ_LAST'
EXPORTING
BEGIN_DATE = pn-begda
END_DATE = pn-endda
IMPORTING
OUT_SEQNR = w_seqnr
TABLES
RGDIR = it_rgdir
EXCEPTIONS
NO_RECORD_FOUND = 1
OTHERS = 2.
ENDFORM. " F_GET_SEQNR
*&---------------------------------------------------------------------*
*& Form F_GET_RELID
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM F_GET_RELID .
select single relid into w_relid from t500l where molga eq w_molga.
ENDFORM. " F_GET_RELID
*&---------------------------------------------------------------------*
*& Form F_GET_RESULT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM F_GET_RESULT .
CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT'
EXPORTING
CLUSTERID = W_RELID
EMPLOYEENUMBER = pernr-pernr
SEQUENCENUMBER = W_SEQNR
READ_ONLY_INTERNATIONAL = 'X '
CHANGING
PAYROLL_RESULT = IT_RESULT
EXCEPTIONS
ILLEGAL_ISOCODE_OR_CLUSTERID = 1
ERROR_GENERATING_IMPORT = 2
IMPORT_MISMATCH_ERROR = 3
SUBPOOL_DIR_FULL = 4
NO_READ_AUTHORITY = 5
NO_RECORD_FOUND = 6
VERSIONS_DO_NOT_MATCH = 7
ERROR_READING_ARCHIVE = 8
ERROR_READING_RELID = 9
OTHERS = 10.
ENDFORM. " F_GET_RESULT
*&---------------------------------------------------------------------*
*& Form F_GET_PAYROLL_RUNS
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM F_GET_PAYROLL_RUNS .
CALL FUNCTION 'CU_READ_RGDIR'
EXPORTING
PERSNR = pernr-pernr
IMPORTING
MOLGA = w_molga
TABLES
IN_RGDIR = it_rgdir
EXCEPTIONS
NO_RECORD_FOUND = 1
OTHERS = 2.
ENDFORM. " F_GET_PAYROLL_RUNS
*&---------------------------------------------------------------------*
*& Form f_process_record
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_process_record .
loop at it_result-inter-BT into wa_BT.
if wa_bt-lgart eq '/559'.
MOVE: wa_bt-betrg TO wa_final-bnktr.
APPEND WA_FINAL TO IT_FINAL.
CLEAR WA_FINAL.
ENDIF.
ENDLOOP.
ENDFORM. " f_process_record
*&---------------------------------------------------------------------*
*& Form f_display_report
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_display_report .
perform f_get_cat.
data:g_repid type sy-repid.
g_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = g_repid
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
* I_CALLBACK_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
* I_BACKGROUND_ID = ' '
* I_GRID_TITLE =
* I_GRID_SETTINGS =
* IS_LAYOUT =
IT_FIELDCAT = it_fcat
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT = 'X'
* I_SAVE = ' '
* IS_VARIANT =
* IT_EVENTS =
* IT_EVENT_EXIT =
* IS_PRINT =
* IS_REPREP_ID =
* I_SCREEN_START_COLUMN = 0
* I_SCREEN_START_LINE = 0
* I_SCREEN_END_COLUMN = 0
* I_SCREEN_END_LINE = 0
* I_HTML_HEIGHT_TOP = 0
* I_HTML_HEIGHT_END = 0
* IT_ALV_GRAPHICS =
* IT_HYPERLINK =
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* IR_SALV_FULLSCREEN_ADAPTER =
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
TABLES
T_OUTTAB = it_final
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. " f_display_report
*&---------------------------------------------------------------------*
*& Form f_get_cat
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_get_cat .
add_fcat :
'1' 'massn' 'pa0000' 'actions' '10',
'2' 'massg' 'pa0000' 'action type' '10',
'3' 'stat1' 'pa0000' 'employment' '10',
'4' 'bukrs' 'pa0001' 'company code' '4',
'5' 'werks' 'pa0001' 'plant' '4',
'6' 'kostl' 'pa0001' 'work center' '8',
'7' 'sacha' 'pa0001' 'payroll adminstrator' '10',
'8' 'nachn' 'pa0002' 'last name' '40',
'9' 'vorna' 'pa0002' 'first name' '40',
'10' 'barea' 'pa0170' 'benifit area' '10',
'11' 'pltyp' 'pa0170' 'benefit paln type' '10',
'12' 'bplan' 'pa0170' 'benefit paln' '10'.
'13' '' '' 'bank transfer amount' '10'.
ENDFORM. " f_get_cat
*&---------------------------------------------------------------------*
*& Report ZHR_MAH32_PAYROLL
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZHR_MAH32_PAYROLL no standard page heading.
tables: pernr.
type-pools: slis.
infotypes:0000,"actions
0001,"org assignment
0002,"personal data
0170."flexi plans
types: begin of ty_final,
massn type massn,"actions
massg type massg,"action type
stat1 type stat1,"employment
bukrs type bukrs,"company code
werks type werks,"plant
kostl type kostl,"stell
sacha type sacha,"payroll adminstrator
nachn type nachn,"last name
vorna type vorna,"first name
barea type ben_area,"benifit area
pltyp type ben_type,"benifit plan type
bplan type ben_plan,"benifit plan
bnktr type char15,
end of ty_final.
data: it_final type standard table of ty_final,
wa_final like line of it_final.
data: w_pernr type pc200-pernr,
w_molga type molga,
w_seqnr type pc261-seqnr,
w_relid type pcl2-relid.
data: it_rgdir type standard table of pc261,
IT_RESULT TYPE PAY99_RESULT,
WA_BT TYPE PC209.
data: it_fcat type table of slis_fieldcat_alv ,
wa_fcat type slis_fieldcat_Alv.
data: it_events type SLIS_T_EVENT,
wa_event like line of it_events.
START-OF-SELECTION.
get pernr.
*subroutine to get the employee last record
perform f_get_emp_data.
*step1
*subroutine for reading payroll resullts from rgdir
perform f_get_payroll.
*step5 to process the records of the table cluster and internal tables using loop or read statements
perform f_process_record.
*defining a macro
define: add_fcat.
clear wa_fcat.
wa_fcat-col_pos = &1.
wa_fcat-fieldname = &2.
wa_fcat-tabname = &3.
wa_fcat-seltext_m = &4.
wa_fcat-outputlen = &5.
append wa_fcat to it_fcat.
end-of-definition.
end-of-selection.
*
*perform f_built_fcat.
perform f_display_report.
*&---------------------------------------------------------------------*
*& Form f_get_emp_data
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_get_emp_data .
rp_provide_from_last p0000 space pn-begda pn-endda.
if pnp-sw-found eq 1.
move: p0000-massn to wa_final-massn,
p0000-massg to wa_final-massg,
p0000-stat1 to wa_final-stat1.
endif.
rp_provide_from_last p0001 space pn-begda pn-endda.
if pnp-sw-found eq 1.
move: p0001-bukrs to wa_final-bukrs,
p0001-werks to wa_final-werks,
p0001-kostl to wa_final-kostl,
p0001-sacha to wa_final-sacha.
endif.
rp_provide_from_last p0002 space pn-begda pn-endda.
if pnp-sw-found eq 1.
move: p0002-nachn to wa_final-nachn,
p0002-vorna to wa_final-vorna.
endif.
rp_provide_from_last p0170 space pn-begda pn-endda.
if pnp-sw-found eq 1.
move: p0170-barea to wa_final-barea,
p0170-pltyp to wa_final-pltyp,
p0170-bplan to wa_final-bplan.
else.
message i011(zhnc).
endif.
ENDFORM. " f_get_emp_data
*&---------------------------------------------------------------------*
*& Form f_get_payroll
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_get_payroll .
*SUBROUTINE TO FETCH EMPLOYEE PAYROLL RUNS
PERFORM F_GET_PAYROLL_RUNS.
IF SY-SUBRC eq 0.
*step2
*subroutine for getting sequence number
PERFORM F_GET_SEQNR.
IF SY-SUBRC eq 0.
*SUBROUTINE FOR GETTING CLUSTER TABLE NAME or CLUSTER ID OR RELID
PERFORM F_GET_RELID.
IF SY-DBCNT NE 0.
*EXTRACT PAYROLL DATA RESULTS BY PASSING EMPLOYEE NO, SEQ NO , CLUSTER TABLE NAME
PERFORM F_GET_RESULT.
IF SY-SUBRC EQ 0.
*perform F_PROCESS_REC.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
ENDFORM. " f_get_payroll
*&---------------------------------------------------------------------*
*& Form F_GET_SEQNR
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM F_GET_SEQNR .
CALL FUNCTION 'CD_READ_LAST'
EXPORTING
BEGIN_DATE = pn-begda
END_DATE = pn-endda
IMPORTING
OUT_SEQNR = w_seqnr
TABLES
RGDIR = it_rgdir
EXCEPTIONS
NO_RECORD_FOUND = 1
OTHERS = 2.
ENDFORM. " F_GET_SEQNR
*&---------------------------------------------------------------------*
*& Form F_GET_RELID
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM F_GET_RELID .
select single relid into w_relid from t500l where molga eq w_molga.
ENDFORM. " F_GET_RELID
*&---------------------------------------------------------------------*
*& Form F_GET_RESULT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM F_GET_RESULT .
CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT'
EXPORTING
CLUSTERID = W_RELID
EMPLOYEENUMBER = pernr-pernr
SEQUENCENUMBER = W_SEQNR
READ_ONLY_INTERNATIONAL = 'X '
CHANGING
PAYROLL_RESULT = IT_RESULT
EXCEPTIONS
ILLEGAL_ISOCODE_OR_CLUSTERID = 1
ERROR_GENERATING_IMPORT = 2
IMPORT_MISMATCH_ERROR = 3
SUBPOOL_DIR_FULL = 4
NO_READ_AUTHORITY = 5
NO_RECORD_FOUND = 6
VERSIONS_DO_NOT_MATCH = 7
ERROR_READING_ARCHIVE = 8
ERROR_READING_RELID = 9
OTHERS = 10.
ENDFORM. " F_GET_RESULT
*&---------------------------------------------------------------------*
*& Form F_GET_PAYROLL_RUNS
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM F_GET_PAYROLL_RUNS .
CALL FUNCTION 'CU_READ_RGDIR'
EXPORTING
PERSNR = pernr-pernr
IMPORTING
MOLGA = w_molga
TABLES
IN_RGDIR = it_rgdir
EXCEPTIONS
NO_RECORD_FOUND = 1
OTHERS = 2.
ENDFORM. " F_GET_PAYROLL_RUNS
*&---------------------------------------------------------------------*
*& Form f_process_record
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_process_record .
loop at it_result-inter-BT into wa_BT.
if wa_bt-lgart eq '/559'.
MOVE: wa_bt-betrg TO wa_final-bnktr.
APPEND WA_FINAL TO IT_FINAL.
CLEAR WA_FINAL.
ENDIF.
ENDLOOP.
ENDFORM. " f_process_record
*&---------------------------------------------------------------------*
*& Form f_display_report
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_display_report .
perform f_get_cat.
data:g_repid type sy-repid.
g_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = g_repid
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
* I_CALLBACK_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
* I_BACKGROUND_ID = ' '
* I_GRID_TITLE =
* I_GRID_SETTINGS =
* IS_LAYOUT =
IT_FIELDCAT = it_fcat
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT = 'X'
* I_SAVE = ' '
* IS_VARIANT =
* IT_EVENTS =
* IT_EVENT_EXIT =
* IS_PRINT =
* IS_REPREP_ID =
* I_SCREEN_START_COLUMN = 0
* I_SCREEN_START_LINE = 0
* I_SCREEN_END_COLUMN = 0
* I_SCREEN_END_LINE = 0
* I_HTML_HEIGHT_TOP = 0
* I_HTML_HEIGHT_END = 0
* IT_ALV_GRAPHICS =
* IT_HYPERLINK =
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* IR_SALV_FULLSCREEN_ADAPTER =
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
TABLES
T_OUTTAB = it_final
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. " f_display_report
*&---------------------------------------------------------------------*
*& Form f_get_cat
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_get_cat .
add_fcat :
'1' 'massn' 'pa0000' 'actions' '10',
'2' 'massg' 'pa0000' 'action type' '10',
'3' 'stat1' 'pa0000' 'employment' '10',
'4' 'bukrs' 'pa0001' 'company code' '4',
'5' 'werks' 'pa0001' 'plant' '4',
'6' 'kostl' 'pa0001' 'work center' '8',
'7' 'sacha' 'pa0001' 'payroll adminstrator' '10',
'8' 'nachn' 'pa0002' 'last name' '40',
'9' 'vorna' 'pa0002' 'first name' '40',
'10' 'barea' 'pa0170' 'benifit area' '10',
'11' 'pltyp' 'pa0170' 'benefit paln type' '10',
'12' 'bplan' 'pa0170' 'benefit paln' '10'.
'13' '' '' 'bank transfer amount' '10'.
ENDFORM. " f_get_cat
Code Formatted by: Alvaro Tejada Galindo on Apr 14, 2008 4:40 PM
1 ACCEPTED SOLUTION
Read only
Former Member
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 10:34 AM
867
- SAP Managed Tags
- ABAP Development
hi Mozam,
Can you give me the error that you are getting?
Thanks,
Arun
7 REPLIES 7
Read only
Former Member
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 10:34 AM
868
- SAP Managed Tags
- ABAP Development
hi Mozam,
Can you give me the error that you are getting?
Thanks,
Arun
Read only
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 10:47 AM
Read only
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 10:56 AM
867
- SAP Managed Tags
- ABAP Development
error is in this form..
give the names in CAPs.
instead of bukrs give BUKRS , and instead of pa0000 use PA0000 in quotes . for all fieldnames and table names use CAPS.
FORM f_get_cat .
add_fcat :
'1' 'MASSNR' 'PA0000' 'actions' '10',
'2' 'MASSG' 'PA0000' 'action type' '10',
'3' 'STAT1' 'AA0000' 'employment' '10',
'4' 'BUKRS' 'pa0001' 'company code' '4',
'5' 'WERKS' 'pa0001' 'plant' '4',
'6' 'KOSTL' 'pa0001' 'work center' '8',
'7' 'sacha' 'pa0001' 'payroll adminstrator' '10',
'8' 'nachn' 'pa0002' 'last name' '40',
'9' 'vorna' 'pa0002' 'first name' '40',
'10' 'barea' 'pa0170' 'benifit area' '10',
'11' 'pltyp' 'pa0170' 'benefit paln type' '10',
'12' 'bplan' 'pa0170' 'benefit paln' '10'.
'13' '' '' 'bank transfer amount' '10'.
ENDFORM. " f_get_cat
Read only
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 10:58 AM
867
- SAP Managed Tags
- ABAP Development
Yes,
As YASH suggested provide the field details in CAPS.
One more thing I want to add is check whether you have provided the exact field name as the internal table.
Hope this helps you.
Thanks,
Arun
Read only
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 11:10 AM
Read only
Former Member
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 10:57 AM
867
- SAP Managed Tags
- ABAP Development
hi Moazam,
Problem seems to be with following piece of code:
FORM f_get_cat .
add_fcat :
'1' 'massn' 'pa0000' 'actions' '10',
'2' 'massg' 'pa0000' 'action type' '10',
'3' 'stat1' 'pa0000' 'employment' '10',
'4' 'bukrs' 'pa0001' 'company code' '4',
'5' 'werks' 'pa0001' 'plant' '4',
'6' 'kostl' 'pa0001' 'work center' '8',
'7' 'sacha' 'pa0001' 'payroll adminstrator' '10',
'8' 'nachn' 'pa0002' 'last name' '40',
'9' 'vorna' 'pa0002' 'first name' '40',
'10' 'barea' 'pa0170' 'benifit area' '10',
'11' 'pltyp' 'pa0170' 'benefit paln type' '10',
'12' 'bplan' 'pa0170' 'benefit paln' '10'.
'13' '' '' 'bank transfer amount' '10'.
ENDFORM. " f_get_cat
Give table name and field name in capital letters.
<REMOVED BY MODERATOR>
Regards,
Talwinder
Edited by: Alvaro Tejada Galindo on Apr 14, 2008 4:43 PM
Read only
Options
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
‎2008 Apr 14 11:17 AM
Bluesky