Can someone give a simple answer about mirroring please ;-)
I have a few iMac G5's and am thinking about picking up some more. They are the flat panel, all in one types.
We need a second monitor to be added so people have a larger desktop for menu's, control panels, etc....
I'd like to buy a Cinema Display to do this.
Will it work or not?? It "sounds" like mirroring is only the same thing that's on your corrent monitor, not a true "SECOND" monitor? Don't see what good it is if that's the case. If it's not a "second" monitor that can be used, why are the ports there??
many thanks
Hi Mike and Ybysaiah,
This is a firmware hack. The website Mike cited is dotted with warnings and rightly so. Get it wrong, and you will have a dead computer.
You may also have issues if system updates are released that include (newer) graphics drivers that are incompatible with the adjusted firmware settings this hack causes.
I'm not saying "don't do it". I'm just suggesting you be very careful, and aware of the possible consequences.
Cheers!
Karl
Similar Messages
-
Can someone give me sme information about an ibook G4 Model A1054?
The graphics adapter isn't working correctly. I have to push on the left side of the tracking pad while booting in order for the display to come on. The question is, can I have just the display adapter replaced or do I have to replace the logic board?
A great suggestion, but sadly it doesn't work long term. Adding such shims to the GPU is not going to hold the kind of pressure needed to keep a join as small as these chips. It will get the iBook to boot and may work a short while. Sadly not a long term fix. As per my other post for gedjr, a logic board replacement is the only true solution. However if they can get their iBook working a while on this method then nothing is in vain. Sadly I've spent a lot of time working on both the G4 and G3 chip (graphics controller) problem and have yet to find a successful solution.
However there was one thing that work very well for a while. Taking off the base and on the heat shielding sticking a coin between the case and the shielding, above the chip in question. This seemed to clamp the coin allowing the right pressure to the chip. This can only be archived by a ten cent coin, plus the coin helps with heat dissipation.
As you can read... spent too much time investigation this one. -
Can someone give me more detail about an error
environment did not include a memory pool : I intialize my environment and try to open a database when I get this message.
Thanks for answering my question with an answer to the question I already asked :) . It doesn't make sense to my why I got the error though. Up until then I wasn't setting the flag and I wasn't getting the error.
I have searched the documentation but I must not be looking in the right place for more details on this. Could you please direct me to the page or explain why it works without the flag sometimes and doesn't others? -
hi can someone keep this simple for me! my iPhone is due for a renewal. but my old laptop that it is backed up to no longer works! how do i go about saving all my songs pics etc to a new laptop without losing anything? please help!!!
Syncing to a "New" Computer or replacing a "crashed" Hard Drive
-
Can someone give me ABAP Dialog program /ALV Step by Step hands on examples
Can someone give me a document for ABAP Dialog programming(module pool) and ALV - but i need Step by Step example ,with sreenshots and explanations.
In general any ABAP, STEP BY STEP hands on examples - Smartform, Sapscrips, Report, BDC will be highly appreciated.
I only need hands on examples please - regular Abap courses does not work because they dont have examples.
Please help ASAP.
Bob
Welcome to SCN - but please read the rules of engagement before posting
Edited by: Rob Burbank on Jun 14, 2009 4:28 PMWhat temporary files are you talking about?
-
Everything runs als Root, can someone give me a hand for the system rights?
yeah I screwed up big times because of this neat unknow_user "Feature" in Leopard.
First i installed a os 10.4 app under leopard which let the disk utility slow down and the finder crashes if i change the user rights, and then i changed globally the group and user of everything in the application folder and my documents folder with pathfinder for looking if i can solve the problem that way.
-But now everything runs as Root and even the hd itself has a owner root and as group admin.
i don't get the difference between system, root, admin, wheel, username for the owner and group. I googled but found nothing clear about this.
And i also wonder what i should do about the group and the meaning of root, system, admin, wheel, username as a group for a single user system. Where should i give a read, read&write and execute permission for example?
at the moment everything seems to run mostly root and every program runs on root and i think this is the worst think that can happen and causes some trouble for the programs.
Can someone give me a short hand and for example tell me if i should set the hd owner to my username and the group to system or admin or whatever and this also for the application and documents/film and other stuff on my user folder?
that would be great
I think i have to reinstall leopard, but as long as this unknow_user problem still resist and no patch is available, i see the same thing happen again and again for me, so a little help would be great
here the ls -l -a from the system and user directory
drwxrwxr-t 26 root admin 1496 Nov 1 23:41 .
drwxrwxr-t 26 root admin 1496 Nov 1 23:41 ..
-rw-rw-r--@ 1 root admin 15364 Nov 5 22:42 .DS_Store
drwxrwxr-x@ 3 root admin 102 Oct 30 18:40 .Spotlight-V100
drwxrwxr-x@ 2 root admin 68 Aug 2 12:29 .Trashes
-rw-r--r-- 1 root admin 0 Oct 30 17:09 .com.apple.timemachine.supported
drwx------ 2 root admin 952 Nov 5 22:09 .fseventsd
-rw-rw-r--@ 1 root admin 262144 Oct 10 11:42 .hotfiles.btree
drwxr-xr-x@ 2 root wheel 68 Aug 2 12:30 .vol
drwxrwxrwx+ 400 adrian admin 13872 Nov 5 22:00 Applications
drwxr-xr-x 2 root admin 102 Nov 1 23:01 Data
-rw-r--r--@ 1 root admin 10240 Oct 25 05:19 Desktop DB
-rw-r--r--@ 1 root admin 37442 Oct 25 01:39 Desktop DF
drwxrwxr-x@ 13 root admin 544 Oct 30 19:46 Developer
drwxr-xr-x 5 adrian adrian 204 Sep 12 14:25 InputManagers
-rw-r--r--@ 1 adrian adrian 1568128 Nov 1 23:45 Installer Log File
drwxrwxr-t+ 60 root admin 2108 Nov 1 22:06 Library
drwxr-xr-x@ 2 root wheel 68 Aug 2 10:08 Network
drwxr-xr-x 3 root wheel 136 Oct 30 18:01 System
drwxrwxrwx@ 3 root admin 102 Aug 2 17:21 TheVolumeSettingsFolder
drwxr-xr-x 5 root admin 238 Nov 2 00:03 Users
drwxrwxrwt@ 4 root admin 170 Nov 5 20:21 Volumes
-rw-r--r-- 1 adrian admin 0 Oct 29 22:51 az.log
drwxr-xr-x@ 2 root wheel 1360 Oct 30 17:57 bin
drwxrwxr-t@ 2 root admin 68 Jan 13 2006 cores
dr-xr-xr-x 2 root wheel 512 Nov 2 04:11 dev
lrwxr-xr-x@ 1 root admin 11 Oct 30 17:57 etc -> private/etc
dr-xr-xr-x 2 root wheel 1 Nov 2 04:11 home
lrwxr-xr-x 1 root 502 11 Nov 1 22:40 mach -> mach_kernel
-r--r--r--@ 1 root admin 615748 Oct 29 18:23 mach.sym
-rw-r--r--@ 1 root wheel 10243756 Oct 10 06:38 mach_kernel
-rw-r--r--@ 1 root wheel 10696809 Oct 10 06:38 mach_kernel.ctfsys
dr-xr-xr-x 3 root wheel 2 Nov 2 04:11 net
drwxr-xr-x@ 3 root admin 102 Sep 14 17:40 opt
drwxr-xr-x@ 6 root wheel 204 Oct 29 18:23 private
drwxr-xr-x@ 2 root wheel 2244 Oct 30 18:01 sbin
drwxr-xr-x 11 root admin 374 Jun 9 2006 sw
lrwxr-xr-x@ 1 root admin 11 Oct 30 17:57 tmp -> private/tmp
drwxr-xr-x@ 13 root wheel 510 Oct 30 19:52 usr
lrwxr-xr-x@ 1 root admin 11 Oct 30 17:57 var -> private/var
and for the my user folder:
drwxr-xr-x+ 22 adrian adrian 1156 Nov 3 02:30 .
drwxr-xr-x 5 root admin 238 Nov 2 00:03 ..
-rw-r--r-- 1 adrian adrian 3 Sep 13 22:41 .CFUserTextEncoding
-rw-r--r--@ 1 adrian adrian 15364 Nov 5 21:50 .DS_Store
-rw-r--r-- 1 adrian adrian 11 Oct 16 17:17 .PortAuthority2.4.rc
drwx------ 2 adrian adrian 68 Nov 5 20:58 .Trash
-rw-r--r-- 1 adrian adrian 0 Aug 16 04:37 .Xauthority
-rw-r--r-- 1 adrian adrian 2552 Nov 5 22:43 .bash_history
drwxr-xr-x 4 adrian adrian 136 Aug 17 21:11 .config
drwxr-xr-x 8 adrian adrian 306 Aug 6 02:22 .dvdcss
drwxr-xr-x 2 adrian adrian 578 Oct 21 19:32 .fontconfig
-rw-r--r-- 1 adrian adrian 489724 Aug 30 17:49 .fonts.cache-1
drwxr-xr-x 2 adrian adrian 68 Sep 14 17:40 .macports
-rw-r--r-- 1 adrian adrian 1643 Aug 30 19:01 .mime.types
-rw-r--r-- 1 adrian adrian 47 Oct 12 22:45 .parallels_settings
-rw-r--r-- 1 adrian adrian 194 Sep 28 02:52 .profile
drwxr-xr-x 3 adrian adrian 102 Sep 23 00:48 .stella
drwxr-xr-x 2 adrian adrian 68 Aug 16 20:09 .wapi
-rw-r--r-- 1 adrian adrian 467 Nov 5 04:21 .webaom
-rw-r--r-- 1 adrian adrian 570 Aug 16 04:37 .xinitrc
drwxr-xr-x 3 adrian adrian 170 Aug 5 08:10 Applications
drwxr-xr-x+ 23 adrian adrian 1190 Nov 5 20:21 Desktop
drwxrwxrwx+ 35 adrian adrian 2210 Nov 5 22:08 Documents
drwxr-xr-x+ 14 adrian adrian 3332 Nov 5 20:02 Downloads
drwxr-xr-x+ 48 adrian adrian 1836 Oct 30 19:11 Library
drwxr-xr-x+ 9 adrian adrian 748 Nov 2 23:49 Movies
drwxr-xr-x+ 8 adrian adrian 510 Sep 29 05:44 Music
drwxr-xr-x 2 root adrian 68 Nov 3 02:30 New Folder
drwxr-xr-x+ 6 adrian adrian 748 Oct 18 23:26 Pictures
drwxrwxrwx+ 3 adrian adrian 238 Nov 4 20:34 Public
drwxr-xr-x+ 3 adrian adrian 204 Aug 14 21:29 Sites
drwxr-xr-x 3 adrian adrian 340 Oct 31 05:55 CompilationUnix
-rw-r--r-- 1 adrian adrian 129 Oct 6 16:48 license.jailllaass wrote:
lizdance40, did you read the original post? The poster's problem is that when he connects the iPod to his computer the iPod does not appear in iTunes. He does not say he has a wifi problem with his iPod.
lizdance40 wrote:
You need to do an update on your router's firmware, or get a higher speed router..
Or replace the router and or modem. High demand can burn out a router in 2 years. Typical life is about 4-5 at most.
The new iPod is more advanced and if your router is slow or inconsistant signal your iPod will stop trying to connect to save your battery.
of course he dose have a wifi problwm. read the last line of the original post -
Dear All
Can anyone give me simple instructions on how to use more than one ipod on the same computer with itunes. My daughters have a different generation 'nano' each & my wife a 'shuffle'?
Many thanksClick here for options.
(69081) -
can you give me some reasons about why I need to buy an iPod touch 5.Although I have the iPhone ,iPod nano, iPad ,MacBook pro,I think the iPod touch 5 is so attractive that I can't help buying it at once.If I have it,what I can do with it,can you tell me?
All I can say is that I REALLY like my Touch 4th gen because I have all sorts of capabilities in a small form: e-mail, web browsing, news, weather, books, magazines, etc. etc. Plus lots and lots of apps out there, including so many free ones. I use the Cloud a lot so it's great to have everything sync'd to my MacBookPro (e-mail, Evernote, Pocket, etc.)
It would be easier, though, to do some of this, especially magazines, on the iPad mini, but, again, I love the small size of the Touch.
As for the 5th gen instead of the 4th, the fifth has Siri and the 3D feature in maps, which are great. And I'm sure it's a lot faster in iOS 6 than the 4th gen. And cool colors!
Don't know if this helps . . . -
I'm not sure how to use this site....but here goes, I have a samsung galaxy and it's fully charged but it won't turn on, can someone give me some solutions I can use to fix this problem???
Try this website. Yes its sprint but it might help you. http://support.sprint.com/support/article/Troubleshoot_issues_related_to_your_Sa msung_Galaxy_S_II_not_turning_on_completely/WTroubleshootingGuide_542_GKB51165-T rend?INTNAV=SU:DP:OV:TSIS:SamsungGalaxySIi-AsYouGo:TroubleshootIssuesRelatedToYo urSamsungG
-
Can somebody give me a sample about alv oo?
hi experts ,can you give me a sample about alv using oo method,
i have tried
data GS_LAYOUT TYPE SLIS_LAYOUT_ALV.
data lt_fieldcat TYPE slis_t_fieldcat_alv.
call method alv_grid->set_table_for_first_display
exporting is_layout = gs_layout
changing it_outtab = itab_data
it_fieldcatalog = lt_fieldcat.
but the code cann't be compiled, and says "lt_fieldcat is not type-compatible with formal parameter it_fieldcatalog.",and so is the gs_layout.
can you give me a sample for using alv oo ,and use the fieldcat to set table for first display, not to use i_structure_name.
Message was edited by:
liu shaochangHi,
Please take a look at my code below. Just create a custom control in screen painter and PF-status and title as well. Hope it helps...
P.S. Please award points if it helps...
[code]
*& Report ZFI_CASH_PROOF_SHEET
*& PROGRAM TYPE : Report
*& RICEF ID : R-149
*& TITLE : ZFI_CASH_PROOF_SHEET
*& SAP Module : FI
*& CREATION DATE : 11/06/2007
*& AUTHOR : Aris Hidalgo
*& DESIGNER : Aris Hidalgo
*& DESCRIPTION :
$*********************************************************************
*$ CHANGE HISTORY
*$----
*$ DATE | T-Num | Description | Reference
| | |
$*********************************************************************
REPORT zfi_cash_proof_sheet
NO STANDARD PAGE HEADING
MESSAGE-ID zfi.
Data Dictionary Table/s *
TABLES: t012k.
CLASS lcl_event_receiver DEFINITION DEFERRED.
Global Data/s *
DATA: gt_fieldcat TYPE lvc_t_fcat,
wa_fieldcat LIKE LINE OF gt_fieldcat,
ok_code TYPE syst-ucomm,
save_ok TYPE syst-ucomm,
g_repid TYPE syst-repid,
gs_layout TYPE lvc_s_layo,
gv_container TYPE scrfname VALUE 'CUSTOM_CONTROL',
lcl_grid1 TYPE REF TO cl_gui_alv_grid,
lcl_custom_container TYPE REF TO cl_gui_custom_container,
gs_disvariant TYPE disvariant,
lcl_event_receiver TYPE REF TO lcl_event_receiver,
gt_sort TYPE lvc_t_sort,
gs_sort TYPE lvc_s_sort.
Global Structure/s *
TYPES: BEGIN OF t_output,
bukrs TYPE bsis-bukrs,
hbkid TYPE t012k-hbkid,
hktid TYPE t012k-hktid,
cash_in_bank TYPE bsis-dmbtr,
one_day TYPE bsis-dmbtr,
two_days TYPE bsis-dmbtr,
more_than_two_days TYPE bsis-dmbtr,
misc_collection TYPE bsis-dmbtr,
outs_rel_checks TYPE bsis-dmbtr,
treas_transactions TYPE bsis-dmbtr,
tot_cash_bal TYPE bsis-dmbtr,
outs_unrel_checks TYPE bsis-dmbtr,
imp_docs_due TYPE bsis-dmbtr,
est_cash_balance TYPE bsis-dmbtr,
END OF t_output.
DATA: gt_output TYPE STANDARD TABLE OF t_output,
wa_output LIKE LINE OF gt_output.
SELECTION-SCREEN *
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_bukrs FOR t012k-bukrs OBLIGATORY,
s_hbkid FOR t012k-hbkid,
s_hktid FOR t012k-hktid.
PARAMETERS: p_budat TYPE bsak-budat OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b1.
*/ CLASS DEFINITION/S */
CLASS lcl_data_def DEFINITION
CLASS lcl_data_def DEFINITION ABSTRACT.
PUBLIC SECTION.
TYPES: BEGIN OF t_t012k,
bukrs TYPE t012k-bukrs,
hbkid TYPE t012k-hbkid,
hktid TYPE t012k-hktid,
hkont TYPE t012k-hkont,
END OF t_t012k.
TYPES: BEGIN OF t_bsis_bsas,
bukrs TYPE bsis-bukrs,
hkont TYPE bsis-hkont,
belnr TYPE bsis-belnr,
buzei TYPE bsis-buzei,
gjahr TYPE bsis-gjahr,
budat TYPE bsis-budat,
blart TYPE bsis-blart,
dmbtr TYPE bsis-dmbtr,
shkzg TYPE bsis-shkzg,
END OF t_bsis_bsas.
TYPES: BEGIN OF t_bsid_bsad,
bukrs TYPE bsid-bukrs,
belnr TYPE bsid-belnr,
gjahr TYPE bsid-gjahr,
blart TYPE bsid-blart,
buzei TYPE bsid-buzei,
budat TYPE bsid-budat,
dmbtr TYPE bsid-dmbtr,
shkzg TYPE bsid-shkzg,
bschl TYPE bsid-bschl,
END OF t_bsid_bsad.
TYPES: BEGIN OF t_cash_in_bank,
bukrs TYPE bsis-bukrs,
hkont TYPE bsis-hkont,
dmbtr TYPE bsis-dmbtr,
END OF t_cash_in_bank.
TYPES: BEGIN OF t_outs_trade_coll,
bukrs TYPE bsis-bukrs,
hkont TYPE bsis-hkont,
one_day TYPE bsis-dmbtr,
two_days TYPE bsis-dmbtr,
more_than_two_days TYPE bsis-dmbtr,
END OF t_outs_trade_coll.
TYPES: BEGIN OF t_zcheck_monitor,
zzbukr TYPE zcheck_monitor-zzbukr,
zhbkid TYPE zcheck_monitor-zhbkid,
zhktid TYPE zcheck_monitor-zhktid,
zubhkt TYPE zcheck_monitor-zubhkt,
zrwbtr TYPE zcheck_monitor-zrwbtr,
zrlsvd TYPE zcheck_monitor-zrlsvd,
zrlsdt TYPE zcheck_monitor-zrlsdt,
END OF t_zcheck_monitor.
TYPES: BEGIN OF t_zcheck_monitor_collect,
zzbukr TYPE zcheck_monitor-zzbukr,
zubhkt TYPE zcheck_monitor-zubhkt,
zrwbtr TYPE zcheck_monitor-zrwbtr,
END OF t_zcheck_monitor_collect.
TYPES: BEGIN OF t_company,
bukrs TYPE t001-bukrs,
butxt TYPE t001-butxt,
END OF t_company.
TYPES: BEGIN OF t_header,
bukrs TYPE t001-bukrs,
butxt TYPE t001-butxt,
hbkid TYPE t012k-hbkid,
hktid TYPE t012k-hktid,
expand(1) TYPE c,
END OF t_header.
DATA: gt_t012k TYPE HASHED TABLE OF t_t012k
WITH UNIQUE KEY bukrs hbkid hktid,
gt_bsis TYPE STANDARD TABLE OF t_bsis_bsas,
wa_bsis LIKE LINE OF gt_bsis,
gt_bsas LIKE gt_bsis,
gt_bsis_bsas LIKE gt_bsas,
gt_bsid_bsad TYPE STANDARD TABLE OF t_bsid_bsad
WITH NON-UNIQUE KEY bukrs belnr gjahr blart,
gt_bsid LIKE gt_bsid_bsad,
gt_bsad LIKE gt_bsid_bsad,
gt_bsik LIKE gt_bsid_bsad,
gt_bsak LIKE gt_bsid_bsad,
gt_cash_in_bank TYPE HASHED TABLE OF t_cash_in_bank
WITH UNIQUE KEY bukrs hkont,
gt_misc_collection LIKE gt_cash_in_bank,
wa_misc_collection LIKE LINE OF gt_misc_collection,
gt_importation_docs_due LIKE gt_cash_in_bank,
wa_importation_docs_due LIKE LINE OF gt_importation_docs_due,
wa_cash_in_bank LIKE LINE OF gt_cash_in_bank,
gt_outs_trade_coll TYPE HASHED TABLE OF t_outs_trade_coll
WITH UNIQUE KEY bukrs hkont,
wa_outs_trade_coll LIKE LINE OF gt_outs_trade_coll,
gt_zcheck_monitor TYPE STANDARD TABLE OF t_zcheck_monitor,
gt_zcheck_monitor_collect TYPE HASHED TABLE OF t_zcheck_monitor_collect
WITH UNIQUE KEY zzbukr zubhkt,
wa_zcheck_monitor_collect LIKE LINE OF gt_zcheck_monitor_collect,
gt_outs_rel_checks LIKE gt_cash_in_bank,
wa_outs_rel_checks LIKE LINE OF gt_outs_rel_checks,
gt_outs_unrel_checks LIKE gt_cash_in_bank,
wa_outs_unrel_checks LIKE LINE OF gt_outs_unrel_checks,
gt_company TYPE HASHED TABLE OF t_company
WITH UNIQUE KEY bukrs,
wa_company LIKE LINE OF gt_company,
gt_header TYPE STANDARD TABLE OF t_header,
wa_header LIKE LINE OF gt_header.
ENDCLASS. "lcl_data_def DEFINITION
CLASS lcl_get_data DEFINITION
CLASS lcl_get_data DEFINITION INHERITING FROM lcl_data_def.
PUBLIC SECTION.
METHODS: get_bank_details,
get_gl_balances,
get_cust_items,
get_vend_items,
sum_gl_accounts,
monday_routines
IMPORTING
im_date TYPE bsis-budat
im_bukrs TYPE bsis-bukrs
im_hkont TYPE bsis-hkont
im_budat TYPE bsis-budat
im_dmbtr TYPE bsis-dmbtr,
sunday_routines
IMPORTING
im_date TYPE bsis-budat
im_bukrs TYPE bsis-bukrs
im_hkont TYPE bsis-hkont
im_budat TYPE bsis-budat
im_dmbtr TYPE bsis-dmbtr,
tuesday_routines
IMPORTING
im_date TYPE bsis-budat
im_bukrs TYPE bsis-bukrs
im_hkont TYPE bsis-hkont
im_budat TYPE bsis-budat
im_dmbtr TYPE bsis-dmbtr,
other_days_routines
IMPORTING
im_date TYPE bsis-budat
im_bukrs TYPE bsis-bukrs
im_hkont TYPE bsis-hkont
im_budat TYPE bsis-budat
im_dmbtr TYPE bsis-dmbtr,
difference_in_days
IMPORTING
im_date TYPE bsis-budat
im_budat TYPE bsis-budat
EXPORTING
ex_diff TYPE vtbbewe-atage,
outs_check_released,
process_data.
PRIVATE SECTION.
CONSTANTS: lc_credit TYPE bsis-shkzg VALUE 'H',
lc_debit TYPE bsis-shkzg VALUE 'S',
lc_nt TYPE bsis-blart VALUE 'NT',
lc_nc TYPE bsis-blart VALUE 'NC',
lc_gl_zero TYPE bsis-hkont VALUE '+++++++++0',
lc_gl_one TYPE bsis-hkont VALUE '+++++++++1',
lc_gl_three TYPE bsis-hkont VALUE '+++++++++3',
lc_monday TYPE dtresr-weekday VALUE 'Monday',"#EC NOTEXT
lc_tuesday TYPE dtresr-weekday VALUE 'Tuesday',"#EC NOTEXT
lc_sunday TYPE dtresr-weekday VALUE 'Sunday'."#EC NOTEXT
CONSTANTS: lc_k3 TYPE bsik-blart VALUE 'K3',
lc_k4 TYPE bsik-blart VALUE 'K4',
lc_k5 TYPE bsik-blart VALUE 'K5',
lc_k6 TYPE bsik-blart VALUE 'K6',
lc_k7 TYPE bsik-blart VALUE 'K7',
lc_kb TYPE bsik-blart VALUE 'KB',
lc_kd TYPE bsik-blart VALUE 'KD',
lc_31 TYPE bsid-blart VALUE '31',
lc_001 TYPE bsid-buzei VALUE '001'.
DATA: lv_hkont TYPE bsis-hkont,
lr_hkont TYPE RANGE OF bsis-hkont,
wa_hkont LIKE LINE OF lr_hkont,
lr_blart TYPE RANGE OF bsik-blart,
wa_blart LIKE LINE OF lr_blart,
lv_hkont_new TYPE bsis-hkont,
lv_hkont_old TYPE bsis-hkont,
lv_date TYPE vtbbewe-atage,
lv_budat TYPE bsis-budat,
lv_day TYPE dtresr-weekday.
ENDCLASS. "lcl_get_data DEFINITION
CLASS lcl_alv_routines DEFINITION
CLASS lcl_alv_routines DEFINITION INHERITING FROM lcl_data_def.
PUBLIC SECTION.
METHODS: build_fieldcat FINAL,
sort_alv_display FINAL.
ENDCLASS. "lcl_alv_routines DEFINITION
CLASS lcl_event_receiver DEFINITION
CLASS lcl_event_receiver DEFINITION.
PUBLIC SECTION.
METHODS:
handle_data_changed FOR EVENT data_changed OF cl_gui_alv_grid
IMPORTING
er_data_changed,
handle_top_of_page FOR EVENT print_top_of_page OF cl_gui_alv_grid,
handle_top_of_list FOR EVENT print_top_of_list OF cl_gui_alv_grid.
PRIVATE SECTION.
DATA: ls_good TYPE lvc_s_modi,
lv_treas_transactions TYPE t_output-tot_cash_bal,
lv_tot_cash_bal TYPE t_output-tot_cash_bal,
lv_outs_unrel_checks TYPE t_output-outs_unrel_checks,
lv_imp_docs_due TYPE t_output-imp_docs_due,
lv_est_cash_balance TYPE t_output-est_cash_balance.
ENDCLASS. "lcl_event_receiver DEFINITION
*/ CLASS IMPLEMENTATION/S */
CLASS lcl_get_data IMPLEMENTATION
CLASS lcl_get_data IMPLEMENTATION.
METHOD get_bank_details
METHOD get_bank_details.
FIELD-SYMBOLS: <fs_t012k> LIKE LINE OF gt_t012k.
Get bank account/s and their corresponding G/L account/s
SELECT bukrs hbkid
hktid hkont
FROM t012k
INTO TABLE gt_t012k
WHERE bukrs IN s_bukrs
AND hbkid IN s_hbkid
AND hktid IN s_hktid.
IF NOT gt_t012k[] IS INITIAL.
SORT gt_t012k BY bukrs hbkid hktid hkont.
Get company name
SELECT bukrs butxt
FROM t001
INTO TABLE gt_company
FOR ALL ENTRIES IN gt_t012k
WHERE bukrs = gt_t012k-bukrs.
LOOP AT gt_t012k ASSIGNING <fs_t012k>.
wa_hkont-sign = 'I'.
wa_hkont-option = 'EQ'.
wa_hkont-low = <fs_t012k>-hkont.
SHIFT wa_hkont-low LEFT DELETING LEADING space.
APPEND wa_hkont TO lr_hkont.
CLEAR wa_hkont.
lv_hkont_new = <fs_t012k>-hkont.
IF lv_hkont_new <> lv_hkont_old.
CLEAR lv_hkont.
lv_hkont = <fs_t012k>-hkont.
DO 4 TIMES.
ADD 1 TO lv_hkont.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = lv_hkont
IMPORTING
output = lv_hkont.
wa_hkont-sign = 'I'.
wa_hkont-option = 'EQ'.
wa_hkont-low = lv_hkont.
SHIFT wa_hkont-low LEFT DELETING LEADING space.
APPEND wa_hkont TO lr_hkont.
CLEAR wa_hkont.
ENDDO.
ENDIF.
lv_hkont_old = lv_hkont_new.
ENDLOOP.
CALL METHOD me->get_gl_balances.
ENDIF.
ENDMETHOD. "get_bank_details
METHOD get_gl_balances
METHOD get_gl_balances.
Get G/L line items(Open items)
SELECT bukrs hkont belnr
buzei gjahr budat
blart dmbtr shkzg
FROM bsis
INTO TABLE gt_bsis
FOR ALL ENTRIES IN gt_t012k
WHERE bukrs = gt_t012k-bukrs
AND hkont IN lr_hkont
AND budat <= p_budat.
Get G/L line items(Cleared items)
SELECT bukrs hkont belnr
buzei gjahr budat
blart dmbtr shkzg
FROM bsas
INTO TABLE gt_bsas
FOR ALL ENTRIES IN gt_t012k
WHERE bukrs = gt_t012k-bukrs
AND hkont IN lr_hkont
AND budat <= p_budat.
APPEND LINES OF gt_bsis TO gt_bsis_bsas.
APPEND LINES OF gt_bsas TO gt_bsis_bsas.
IF NOT gt_bsis_bsas[] IS INITIAL.
CALL METHOD me->get_cust_items.
CALL METHOD me->get_vend_items.
CALL METHOD me->sum_gl_accounts.
ENDIF.
ENDMETHOD. "get_gl_balances
METHOD get_cust_items
METHOD get_cust_items.
Get customer line items(Open items)
SELECT bukrs belnr gjahr blart
buzei budat dmbtr shkzg
bschl
FROM bsid
INTO TABLE gt_bsid
FOR ALL ENTRIES IN gt_bsis_bsas
WHERE bukrs = gt_bsis_bsas-bukrs
AND gjahr = gt_bsis_bsas-gjahr
AND belnr = gt_bsis_bsas-belnr.
Get customer line items(Cleared items)
SELECT bukrs belnr gjahr blart
buzei budat dmbtr shkzg
bschl
FROM bsad
INTO TABLE gt_bsad
FOR ALL ENTRIES IN gt_bsis_bsas
WHERE bukrs = gt_bsis_bsas-bukrs
AND gjahr = gt_bsis_bsas-gjahr
AND belnr = gt_bsis_bsas-belnr.
APPEND LINES OF gt_bsid TO gt_bsid_bsad.
APPEND LINES OF gt_bsad TO gt_bsid_bsad.
ENDMETHOD. "get_cust_items
METHOD get_vend_items
METHOD get_vend_items.
Get vendor line items(Open items)
SELECT bukrs belnr gjahr blart
buzei budat dmbtr shkzg
bschl
FROM bsik
INTO TABLE gt_bsik
FOR ALL ENTRIES IN gt_bsis_bsas
WHERE bukrs = gt_bsis_bsas-bukrs
AND gjahr = gt_bsis_bsas-gjahr
AND belnr = gt_bsis_bsas-belnr.
DEFINE m_blart.
wa_blart-sign = 'I'.
wa_blart-option = 'EQ'.
wa_blart-low = &1.
append wa_blart to lr_blart.
clear wa_blart.
END-OF-DEFINITION.
m_blart lc_k3.
m_blart lc_k4.
m_blart lc_k5.
m_blart lc_k6.
m_blart lc_k7.
m_blart lc_kb.
m_blart lc_kd.
IF NOT gt_bsik[] IS INITIAL AND NOT lr_blart[] IS INITIAL.
DELETE gt_bsik WHERE blart NOT IN lr_blart[].
DELETE gt_bsik WHERE bschl <> lc_31.
ENDIF.
ENDMETHOD. "get_vend_items
METHOD sum_gl_accounts
METHOD sum_gl_accounts.
FIELD-SYMBOLS: <fs_bsis_bsas> LIKE LINE OF gt_bsis_bsas,
<fs_bsis> LIKE LINE OF gt_bsis,
<fs_bsid_bsad> LIKE LINE OF gt_bsid_bsad,
<fs_bsik> LIKE LINE OF gt_bsik,
<fs_outs_rel_checks> LIKE LINE OF gt_outs_rel_checks,
<fs_outs_unrel_checks> LIKE LINE OF gt_outs_unrel_checks.
SORT gt_bsis_bsas BY bukrs hkont belnr.
LOOP AT gt_bsis_bsas ASSIGNING <fs_bsis_bsas>.
IF <fs_bsis_bsas>-shkzg = lc_credit. "H
MULTIPLY <fs_bsis_bsas>-dmbtr BY -1.
ENDIF.
*/Routine for cash in bank
IF <fs_bsis_bsas>-hkont CP lc_gl_zero.
MOVE-CORRESPONDING <fs_bsis_bsas> TO wa_cash_in_bank.
COLLECT wa_cash_in_bank INTO gt_cash_in_bank.
CLEAR wa_cash_in_bank.
ENDIF.
*/Routine for miscellaneous collection
IF <fs_bsis_bsas>-blart = lc_nt OR
<fs_bsis_bsas>-blart = lc_nc AND
<fs_bsis_bsas>-shkzg = lc_debit AND
<fs_bsis_bsas>-hkont CP lc_gl_one.
READ TABLE gt_bsid_bsad ASSIGNING <fs_bsid_bsad> WITH TABLE KEY bukrs = <fs_bsis_bsas>-bukrs
belnr = <fs_bsis_bsas>-belnr
gjahr = <fs_bsis_bsas>-gjahr
blart = <fs_bsis_bsas>-blart.
IF sy-subrc = 0.
MOVE-CORRESPONDING <fs_bsis_bsas> TO wa_misc_collection.
COLLECT wa_misc_collection INTO gt_misc_collection.
CLEAR wa_misc_collection.
ENDIF.
ENDIF.
*/Routine for importation docs.due
IF <fs_bsis_bsas>-shkzg = lc_credit.
READ TABLE gt_bsik ASSIGNING <fs_bsik> WITH TABLE KEY bukrs = <fs_bsis_bsas>-bukrs
belnr = <fs_bsis_bsas>-belnr
gjahr = <fs_bsis_bsas>-gjahr
blart = <fs_bsis_bsas>-blart.
IF sy-subrc = 0.
MOVE-CORRESPONDING <fs_bsis_bsas> TO wa_importation_docs_due.
COLLECT wa_importation_docs_due INTO gt_importation_docs_due.
CLEAR gt_importation_docs_due.
ENDIF.
ENDIF.
ENDLOOP.
IF NOT gt_bsis[] IS INITIAL.
IF NOT gt_bsis[] IS INITIAL.
lv_budat = p_budat.
CALL FUNCTION 'DATE_TO_DAY'
EXPORTING
date = lv_budat
IMPORTING
weekday = lv_day.
LOOP AT gt_bsis ASSIGNING <fs_bsis>.
*/Routine for outstanding trade collection
IF <fs_bsis>-shkzg = lc_debit AND <fs_bsis>-blart <> lc_nt.
IF lv_day = lc_monday.
CALL METHOD me->monday_routines
EXPORTING
im_date = p_budat
im_bukrs = <fs_bsis>-bukrs
im_hkont = <fs_bsis>-hkont
im_budat = <fs_bsis>-budat
im_dmbtr = <fs_bsis>-dmbtr.
ELSEIF lv_day = lc_sunday.
CALL METHOD me->sunday_routines
EXPORTING
im_date = p_budat
im_bukrs = <fs_bsis>-bukrs
im_hkont = <fs_bsis>-hkont
im_budat = <fs_bsis>-budat
im_dmbtr = <fs_bsis>-dmbtr.
ELSEIF lv_day = lc_tuesday.
CALL METHOD me->tuesday_routines
EXPORTING
im_date = p_budat
im_bukrs = <fs_bsis>-bukrs
im_hkont = <fs_bsis>-hkont
im_budat = <fs_bsis>-budat
im_dmbtr = <fs_bsis>-dmbtr.
ELSE.
CALL METHOD me->other_days_routines
EXPORTING
im_date = p_budat
im_bukrs = <fs_bsis>-bukrs
im_hkont = <fs_bsis>-hkont
im_budat = <fs_bsis>-budat
im_dmbtr = <fs_bsis>-dmbtr.
ENDIF.
ENDIF.
*/Routine for outstanding released checks
IF <fs_bsis>-hkont CP lc_gl_three AND <fs_bsis>-shkzg = lc_debit.
MOVE-CORRESPONDING <fs_bsis> TO wa_outs_rel_checks.
COLLECT wa_outs_rel_checks INTO gt_outs_rel_checks.
CLEAR wa_outs_rel_checks.
*/Routine for outstanding unreleased checks
ELSEIF <fs_bsis>-hkont CP lc_gl_three AND <fs_bsis>-shkzg = lc_credit.
MOVE-CORRESPONDING <fs_bsis> TO wa_outs_unrel_checks.
COLLECT wa_outs_unrel_checks INTO gt_outs_unrel_checks.
CLEAR wa_outs_unrel_checks.
ENDIF.
ENDLOOP.
ENDIF.
ENDIF.
*/Routine for outstanding released check/s
*/this routine will get all records from custom table zcheck_monitor
*/where status is released to vendor
CALL METHOD me->outs_check_released.
IF NOT gt_outs_rel_checks[] IS INITIAL.
Subtract debit line items from ZFE002
LOOP AT gt_outs_rel_checks ASSIGNING <fs_outs_rel_checks>.
CLEAR wa_zcheck_monitor_collect.
READ TABLE gt_zcheck_monitor_collect INTO wa_zcheck_monitor_collect
WITH TABLE KEY zzbukr = <fs_outs_rel_checks>-bukrs
zubhkt = <fs_outs_rel_checks>-hkont.
IF sy-subrc = 0.
<fs_outs_rel_checks>-dmbtr = wa_zcheck_monitor_collect-zrwbtr -
<fs_outs_rel_checks>-dmbtr.
ELSE.
<fs_outs_rel_checks>-dmbtr = 0 - <fs_outs_rel_checks>-dmbtr.
ENDIF.
ENDLOOP.
ENDIF.
IF NOT gt_outs_unrel_checks[] IS INITIAL.
Subtract ZFE002 records from credit line items
LOOP AT gt_outs_unrel_checks ASSIGNING <fs_outs_unrel_checks>.
CLEAR wa_zcheck_monitor_collect.
READ TABLE gt_zcheck_monitor_collect INTO wa_zcheck_monitor_collect
WITH TABLE KEY zzbukr = <fs_outs_unrel_checks>-bukrs
zubhkt = <fs_outs_unrel_checks>-hkont.
IF sy-subrc = 0.
<fs_outs_unrel_checks>-dmbtr = ABS( <fs_outs_unrel_checks>-dmbtr ) -
ABS( wa_zcheck_monitor_collect-zrwbtr ).
ENDIF.
ENDLOOP.
ENDIF.
Move records to output table
CALL METHOD me->process_data.
ENDMETHOD. "sum_gl_accounts
METHOD monday_routines
METHOD monday_routines.
wa_outs_trade_coll-bukrs = im_bukrs.
wa_outs_trade_coll-hkont = im_hkont.
CLEAR lv_date.
CALL METHOD me->difference_in_days
EXPORTING
im_date = im_date
im_budat = im_budat
IMPORTING
ex_diff = lv_date.
One day
IF lv_date = 3.
wa_outs_trade_coll-one_day = im_dmbtr.
Two days
ELSEIF lv_date = 4.
wa_outs_trade_coll-two_days = im_dmbtr.
More than two days
ELSEIF lv_date > 4.
wa_outs_trade_coll-more_than_two_days = im_dmbtr.
ENDIF.
COLLECT wa_outs_trade_coll INTO gt_outs_trade_coll.
CLEAR wa_outs_trade_coll.
ENDMETHOD. "monday_routines
METHOD sunday_routines
METHOD sunday_routines.
wa_outs_trade_coll-bukrs = im_bukrs.
wa_outs_trade_coll-hkont = im_hkont.
CLEAR lv_date.
CALL METHOD me->difference_in_days
EXPORTING
im_date = im_date
im_budat = im_budat
IMPORTING
ex_diff = lv_date.
One day
IF lv_date = 2.
wa_outs_trade_coll-one_day = im_dmbtr.
Two days
ELSEIF lv_date = 3.
wa_outs_trade_coll-two_days = im_dmbtr.
More than two days
ELSEIF lv_date > 3.
wa_outs_trade_coll-more_than_two_days = im_dmbtr.
ENDIF.
COLLECT wa_outs_trade_coll INTO gt_outs_trade_coll.
CLEAR wa_outs_trade_coll.
ENDMETHOD. "sunday_routines
METHOD tuesday_routines
METHOD tuesday_routines.
wa_outs_trade_coll-bukrs = im_bukrs.
wa_outs_trade_coll-hkont = im_hkont.
CLEAR lv_date.
CALL METHOD me->difference_in_days
EXPORTING
im_date = im_date
im_budat = im_budat
IMPORTING
ex_diff = lv_date.
One day
IF lv_date = 1.
wa_outs_trade_coll-one_day = im_dmbtr.
Two days
ELSEIF lv_date = 4.
wa_outs_trade_coll-two_days = im_dmbtr.
More than two days
ELSEIF lv_date > 4.
wa_outs_trade_coll-more_than_two_days = im_dmbtr.
ENDIF.
COLLECT wa_outs_trade_coll INTO gt_outs_trade_coll.
CLEAR wa_outs_trade_coll.
ENDMETHOD. "tuesday_routines
METHOD other_days_routines
METHOD other_days_routines.
wa_outs_trade_coll-bukrs = im_bukrs.
wa_outs_trade_coll-hkont = im_hkont.
CLEAR lv_date.
CALL METHOD me->difference_in_days
EXPORTING
im_date = im_date
im_budat = im_budat
IMPORTING
ex_diff = lv_date.
One day
IF lv_date = 1.
wa_outs_trade_coll-one_day = im_dmbtr.
Two days
ELSEIF lv_date = 2.
wa_outs_trade_coll-two_days = im_dmbtr.
More than two days
ELSEIF lv_date > 3.
wa_outs_trade_coll-more_than_two_days = im_dmbtr.
ENDIF.
COLLECT wa_outs_trade_coll INTO gt_outs_trade_coll.
CLEAR wa_outs_trade_coll.
ENDMETHOD. "other_days_routines
METHOD difference_in_days
METHOD difference_in_days.
CALL FUNCTION 'FIMA_DAYS_AND_MONTHS_AND_YEARS'
EXPORTING
i_date_from = im_budat
I_KEY_DAY_FROM =
i_date_to = im_date
I_KEY_DAY_TO =
I_FLG_SEPARATE = ' '
IMPORTING
e_days = ex_diff.
E_MONTHS =
E_YEARS =
ENDMETHOD. "difference_in_days
METHOD outs_check_released
METHOD outs_check_released.
FIELD-SYMBOLS: <fs_zcheck_monitor> LIKE LINE OF gt_zcheck_monitor.
SELECT zzbukr zhbkid zhktid
zubhkt zrwbtr zrlsvd
zrlsdt
FROM zcheck_monitor
INTO TABLE gt_zcheck_monitor
WHERE zrlsvd <> space.
IF NOT gt_zcheck_monitor[] IS INITIAL.
LOOP AT gt_zcheck_monitor ASSIGNING <fs_zcheck_monitor>.
MOVE-CORRESPONDING <fs_zcheck_monitor> TO wa_zcheck_monitor_collect.
COLLECT wa_zcheck_monitor_collect INTO gt_zcheck_monitor_collect.
CLEAR wa_zcheck_monitor_collect.
ENDLOOP.
ENDIF.
ENDMETHOD. "outs_check_released
METHOD process_data
METHOD process_data.
FIELD-SYMBOLS: <fs_t012k> LIKE LINE OF gt_t012k,
<fs_company> LIKE LINE OF gt_company,
<fs_cash_in_bank> LIKE LINE OF gt_cash_in_bank,
<fs_outs_trade_coll> LIKE LINE OF gt_outs_trade_coll,
<fs_misc_collection> LIKE LINE OF gt_misc_collection,
<fs_outs_rel_checks> LIKE LINE OF gt_outs_rel_checks,
<fs_outs_unrel_checks> LIKE LINE OF gt_outs_unrel_checks.
SORT gt_t012k BY bukrs hbkid.
LOOP AT gt_t012k ASSIGNING <fs_t012k>.
AT NEW hbkid.
READ TABLE gt_company ASSIGNING <fs_company>
WITH TABLE KEY bukrs = <fs_t012k>-bukrs.
IF sy-subrc = 0.
wa_header-bukrs = <fs_company>-bukrs.
wa_header-butxt = <fs_company>-butxt.
wa_header-hbkid = <fs_t012k>-hbkid.
wa_header-hktid = <fs_t012k>-hktid.
APPEND wa_header TO gt_header.
CLEAR wa_header.
ENDIF.
ENDAT.
wa_output-bukrs = <fs_t012k>-bukrs.
wa_output-hbkid = <fs_t012k>-hbkid.
wa_output-hktid = <fs_t012k>-hktid.
Move cash in bank
READ TABLE gt_cash_in_bank ASSIGNING <fs_cash_in_bank>
WITH TABLE KEY bukrs = <fs_t012k>-bukrs
hkont = <fs_t012k>-hkont.
IF sy-subrc = 0.
wa_output-cash_in_bank = <fs_cash_in_bank>-dmbtr.
ADD wa_output-cash_in_bank TO wa_output-tot_cash_bal.
ENDIF.
CLEAR lv_hkont.
lv_hkont = <fs_t012k>-hkont.
ADD 1 TO lv_hkont.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = lv_hkont
IMPORTING
output = lv_hkont.
Move outstanding trade collection(Deposit in transit)
READ TABLE gt_outs_trade_coll ASSIGNING <fs_outs_trade_coll>
WITH TABLE KEY bukrs = <fs_t012k>-bukrs
hkont = lv_hkont.
IF sy-subrc = 0.
wa_output-one_day = <fs_outs_trade_coll>-one_day.
ADD wa_output-one_day TO wa_output-tot_cash_bal.
wa_output-two_days = <fs_outs_trade_coll>-two_days.
ADD wa_output-two_days TO wa_output-tot_cash_bal.
wa_output-more_than_two_days = <fs_outs_trade_coll>-more_than_two_days.
ADD wa_output-more_than_two_days TO wa_output-tot_cash_bal.
ENDIF.
Move miscellaneous collection
READ TABLE gt_misc_collection ASSIGNING <fs_misc_collection>
WITH TABLE KEY bukrs = <fs_t012k>-bukrs
hkont = lv_hkont.
IF sy-subrc = 0.
wa_output-misc_collection = <fs_misc_collection>-dmbtr.
ADD wa_output-misc_collection TO wa_output-tot_cash_bal.
ENDIF.
Move outstanding released checks
CLEAR lv_hkont.
lv_hkont = <fs_t012k>-hkont.
ADD 3 TO lv_hkont.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = lv_hkont
IMPORTING
output = lv_hkont.
READ TABLE gt_outs_rel_checks ASSIGNING <fs_outs_rel_checks>
WITH TABLE KEY bukrs = <fs_t012k>-bukrs
hkont = lv_hkont.
IF sy-subrc = 0.
wa_output-outs_rel_checks = <fs_outs_rel_checks>-dmbtr.
IF wa_output-outs_rel_checks < 0.
ADD wa_output-outs_rel_checks TO wa_output-tot_cash_bal.
ELSE.
SUBTRACT wa_output-outs_rel_checks FROM wa_output-tot_cash_bal.
ENDIF.
ELSE.
CLEAR wa_zcheck_monitor_collect.
READ TABLE gt_zcheck_monitor_collect INTO wa_zcheck_monitor_collect
WITH TABLE KEY zzbukr = <fs_t012k>-bukrs
zubhkt = lv_hkont.
IF sy-subrc = 0.
wa_output-outs_rel_checks = wa_zcheck_monitor_collect-zrwbtr.
IF wa_output-outs_rel_checks < 0.
ADD wa_output-outs_rel_checks TO wa_output-tot_cash_bal.
ELSE.
SUBTRACT wa_output-outs_rel_checks FROM wa_output-tot_cash_bal.
ENDIF.
ENDIF.
ENDIF.
Move outstanding unreleased checks
CLEAR lv_hkont.
lv_hkont = <fs_t012k>-hkont.
ADD 3 TO lv_hkont.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = lv_hkont
IMPORTING
output = lv_hkont.
READ TABLE gt_outs_unrel_checks ASSIGNING <fs_outs_unrel_checks>
WITH TABLE KEY bukrs = <fs_t012k>-bukrs
hkont = lv_hkont.
IF sy-subrc = 0.
wa_output-outs_unrel_checks = <fs_outs_unrel_checks>-dmbtr.
ENDIF.
Move importation docs. due
CLEAR wa_importation_docs_due.
READ TABLE gt_importation_docs_due INTO wa_importation_docs_due
WITH TABLE KEY bukrs = <fs_t012k>-bukrs
hkont = lv_hkont
TRANSPORTING dmbtr.
IF sy-subrc = 0.
wa_output-imp_docs_due = wa_importation_docs_due-dmbtr.
ENDIF.
wa_output-est_cash_balance = wa_output-tot_cash_bal - ( wa_output-outs_unrel_checks +
wa_output-imp_docs_due ).
APPEND wa_output TO gt_output.
CLEAR wa_output.
ENDLOOP.
ENDMETHOD. "process_data
ENDCLASS. "lcl_get_data IMPLEMENTATION
CLASS lcl_alv_routines IMPLEMENTATION
CLASS lcl_alv_routines IMPLEMENTATION.
METHOD build_fieldcat.
DEFINE m_fieldcat.
add 1 to wa_fieldcat-col_pos.
wa_fieldcat-fieldname = &1.
wa_fieldcat-tabname = &2.
wa_fieldcat-coltext = &3.
wa_fieldcat-outputlen = &4.
wa_fieldcat-key = &5.
wa_fieldcat-just = &6.
wa_fieldcat-do_sum = &7.
wa_fieldcat-emphasize = &8.
wa_fieldcat-edit = &9.
append wa_fieldcat to gt_fieldcat.
clear wa_fieldcat.
END-OF-DEFINITION.
m_fieldcat 'BUKRS' 'GT_OUTPUT' text-a01 '12' 'X' '' '' '' ''.
m_fieldcat 'HBKID' 'GT_OUTPUT' text-a14 '10' 'X' '' '' '' ''.
m_fieldcat 'HKTID' 'GT_OUTPUT' text-a02 '10' 'X' '' '' '' ''.
m_fieldcat 'CASH_IN_BANK' 'GT_OUTPUT' text-a03 '12' '' 'R' 'X' '' ''.
m_fieldcat 'ONE_DAY' 'GT_OUTPUT' text-a04 '05' '' 'R' 'X' '' ''.
m_fieldcat 'TWO_DAYS' 'GT_OUTPUT' text-a05 '06' '' 'R' 'X' '' ''.
m_fieldcat 'MORE_THAN_TWO_DAYS' 'GT_OUTPUT' text-a06 '08' '' 'R' 'X' '' ''.
m_fieldcat 'MISC_COLLECTION' 'GT_OUTPUT' text-a07 '16' '' 'R' 'X' '' ''.
m_fieldcat 'OUTS_REL_CHECKS' 'GT_OUTPUT' text-a08 '21' '' 'R' 'X' '' ''.
m_fieldcat 'TREAS_TRANSACTIONS' 'GT_OUTPUT' text-a09 '19' '' 'R' 'X' '' 'X'.
m_fieldcat 'TOT_CASH_BAL' 'GT_OUTPUT' text-a10 '15' '' 'R' 'X' 'C300' ''.
m_fieldcat 'OUTS_UNREL_CHECKS' 'GT_OUTPUT' text-a11 '19' '' 'R' 'X' '' ''.
m_fieldcat 'IMP_DOCS_DUE' 'GT_OUTPUT' text-a12 '14' '' 'R' 'X' '' ''.
m_fieldcat 'EST_CASH_BALANCE' 'GT_OUTPUT' text-a13 '17' '' 'R' 'X' 'C300' ''.
ENDMETHOD. "build_fieldcat
METHOD sort_alv_display.
DEFINE m_sort.
clear gs_sort.
gs_sort-fieldname = &1.
gs_sort-spos = &2.
gs_sort-up = &3.
gs_sort-down = &4.
gs_sort-subtot = &5.
append gs_sort to gt_sort.
END-OF-DEFINITION.
m_sort 'BUKRS' '1' 'X' '' ''.
m_sort 'HBKID' '2' 'X' '' 'X'.
ENDMETHOD. "sort_alv_display
ENDCLASS. "lcl_alv_routines IMPLEMENTATION
CLASS lcl_event_receiver IMPLEMENTATION
CLASS lcl_event_receiver IMPLEMENTATION.
METHOD handle_data_changed.
LOOP AT er_data_changed->mt_mod_cells INTO ls_good.
CASE ls_good-fieldname.
WHEN 'TREAS_TRANSACTIONS'.
CLEAR lv_tot_cash_bal.
CALL METHOD er_data_changed->get_cell_value
EXPORTING
i_row_id = ls_good-row_id
i_fieldname = 'TOT_CASH_BAL'
IMPORTING
e_value = lv_tot_cash_bal.
IF ls_good-value CA 'ABCDEFGHIJKLMNOPQRSTUVWXYZ/'.
CALL METHOD er_data_changed->add_protocol_entry
EXPORTING
i_msgid = '0K'
i_msgno = '000'
i_msgty = 'E'
i_msgv1 = text-e01
i_msgv2 = ls_good-value
i_msgv3 = text-e02
i_fieldname = ls_good-fieldname
i_row_id = ls_good-row_id.
EXIT.
ELSE.
CLEAR lv_treas_transactions.
lv_treas_transactions = ls_good-value.
ADD lv_tot_cash_bal TO lv_treas_transactions.
CALL METHOD er_data_changed->modify_cell
EXPORTING
i_row_id = ls_good-row_id
i_fieldname = 'TOT_CASH_BAL'
i_value = lv_treas_transactions.
CLEAR lv_outs_unrel_checks.
CALL METHOD er_data_changed->get_cell_value
EXPORTING
i_row_id = ls_good-row_id
i_fieldname = 'OUTS_UNREL_CHECKS'
IMPORTING
e_value = lv_outs_unrel_checks.
CLEAR lv_imp_docs_due.
CALL METHOD er_data_changed->get_cell_value
EXPORTING
i_row_id = ls_good-row_id
i_fieldname = 'IMP_DOCS_DUE'
IMPORTING
e_value = lv_imp_docs_due.
lv_est_cash_balance = ls_good-value - ( lv_outs_unrel_checks +
lv_imp_docs_due ).
CALL METHOD er_data_changed->modify_cell
EXPORTING
i_row_id = ls_good-row_id
i_fieldname = 'EST_CASH_BALANCE'
i_value = lv_est_cash_balance.
CLEAR lv_est_cash_balance.
ENDIF.
ENDCASE.
ENDLOOP.
ENDMETHOD. "handle_data_changed
METHOD handle_top_of_page.
WRITE: sy-repid.
ENDMETHOD. "handle_top_of_page
METHOD handle_top_of_list.
WRITE: sy-repid.
ENDMETHOD. "handle_top_of_list
ENDCLASS. "lcl_event_receiver IMPLEMENTATION
START-OF- -
I have a few compile errors. Can someone give me direction?
I have some compile areas in the following code and I am not really sure how to correct.
Can someone give guidance? Thanks
import java.io.*;
import java.util.*;
import java.awt.*;
import java.awt.Window.*;
import java.awt.event.*;
import javax.swing.*;
import java.applet.*;
import java.net.*;
public class FrontEnd_2 extends Applet{
private static int appType = 0;
private Frame FrontEnd_2 = null;
private Choice nameList = new Choice();
private Label PipeID = new Label("");
private TextField pipelineName = new TextField();
private TextField problem = new TextField();
private TextField location = new TextField();
private TextField repairCost = new TextField();
private Button update = new Button("Update");
private Button clear = new Button("Clear");
private Button delete = new Button("Delete");
private Button exit = new Button("Exit");
private long idList[] = null;
public static void main(String args[]){
appType = 1;
new FrontEnd_2();
public FrontEnd_2(){
Panel p = new Panel(new GridLayout(6,3));
p.add(new Label());
p.add(nameList);
p.add(new Label());
p.add(new Label("PipeId"));
p.add(new Label());
p.add(new Label());
p.add(new Label("Pipeline Name"));
p.add(pipelineName);
p.add(update);
p.add(new Label("Problem"));
p.add(problem);
p.add(clear);
p.add(new Label("Location"));
p.add(location);
p.add(delete);
p.add(new Label("Repair Cost"));
p.add(repairCost);
p.add(exit);
String data = getData("L0");
StringTokenizer st = new StringTokenizer(stRetVal, ",");
nameList.add("[select a name]");
int size = st.countTokens() / 2;
idList = new long[size+1];
for ( int i=1; i<=size; i++ ) {
idList[i] = Long.parseLong(st.nextToken());
nameList.add(st.nextToken());
private String getData(String cmd)
Socket s = null;
BufferedReader reader = null;
BufferedWriter writer = null;
String sRetVal = " ";
try{
s = new Socket("66.24.174.32",1234);
reader = new BufferedReader(new InputStreamReader(s.getInputStream()));
writer = new BufferedWriter(new OutputStreamWriter(s.getOutputStream()));
writer.write(cmd);
writer.newLine();
writer.flush();
writer.close();
sRetVal = reader.readLine();
catch(UnknownHostException ue){
catch(IOException ioe){
finally
writer = null;
reader = null;
return sRetVal;
switch(appType){
case 0: // Applet extends panel
FrontEnd.add(p);
break;
case 1: // Application
FrontEnd_2 = new Frame("Pipeline Inputs");
FrontEnd_2.addWindowListener(this);
nameList.addItemListener(this);
exit.addActionListener(this);
p.add(exit);
FrontEnd.add(p);
FrontEnd.setSize(30,60);
FrontEnd.setVisible(true);
break;
public void actionPerformed(ActionEvent ae){
if(ae.getSource() == exit){
fileExit();
else if (ae.getSource() == clear){
fileClear();
public void itemStateChanged(ItemEvent e) {
int index = nameList.getSelectedIndexOf();
long id = idList[index];
String data = getData("R" + id);
StringTokenizer st = StringTokenizer(data, ",");
PipeID.setText(st.nextToken());
problem.setText(st.nextToken());
location.setText(st.nextToken());
repairCost.setText(st.nextToken()):
public void windowActivated(WindowEvent we){ }
public void windowClosed(WindowEvent we){ }
public void windowClosing(WindowEvent we){ fileExit();}
public void windowDeactivated(WindowEvent we){ }
public void windowDeiconified(WindowEvent we){ }
public void windowIconified(WindowEvent we){ }
public void windowOpened(WindowEvent we){ }
private void fileExit(){
FrontEnd_2.dispose();
System.exit(0);Some of the errors that I got while compiling your program were the following:
1) You need to declare your methods outside of your constructor
2) You are declaring sretval in a private method getData and passing it on to StringTokenizer. You should declare it as an instance variable cuz local variables won't go any farther than the method in which they were declared.
3) You did not implement WindowListener, ActionListener, ItemListener.
Some tips: Try to use adapters in an anonymous inner class to implement listeners such as WindowAdapter.
Use some white space between your code. It makes it a heck of a lot easier to read. Use indentation to show nested statements :)
Here is the fixed code.
import java.io.*;
import java.util.*;
import java.awt.*;
import java.awt.Window.*;
import java.awt.event.*;
import javax.swing.*;
import java.applet.*;
import java.net.*;
public class FrontEnd_2 extends Applet implements WindowListener, ActionListener, ItemListener{
private static int appType = 0;
private String sRetVal = " ";
private Frame FrontEnd_2 = null;
private Choice nameList = new Choice();
private Label PipeID = new Label("");
private TextField pipelineName = new TextField();
private TextField problem = new TextField();
private TextField location = new TextField();
private TextField repairCost = new TextField();
private Button update = new Button("Update");
private Button clear = new Button("Clear");
private Button delete = new Button("Delete");
private Button exit = new Button("Exit");
private long idList[] = null;
* mainline
public static void main(String args[]){
appType = 1;
new FrontEnd_2();
public FrontEnd_2(){
Panel p = new Panel(new GridLayout(6,3));
p.add(new Label());
p.add(nameList);
p.add(new Label());
p.add(new Label("PipeId"));
p.add(new Label());
p.add(new Label());
p.add(new Label("Pipeline Name"));
p.add(pipelineName);
p.add(update);
p.add(new Label("Problem"));
p.add(problem);
p.add(clear);
p.add(new Label("Location"));
p.add(location);
p.add(delete);
p.add(new Label("Repair Cost"));
p.add(repairCost);
p.add(exit);
String data = getData("L0");
StringTokenizer st = new StringTokenizer(sRetVal, ",");
nameList.add("[select a name]");
int size = st.countTokens() / 2;
long idList = size+1;
for ( int i=1; i<=size; i++ ) {
idList = Long.parseLong(st.nextToken());
nameList.add(st.nextToken());
switch(appType){
case 0: // Applet extends panel
FrontEnd_2.add(p);
break;
case 1: // Application
FrontEnd_2 = new Frame("Pipeline Inputs");
FrontEnd_2.addWindowListener(this);
nameList.addItemListener(this);
exit.addActionListener(this);
p.add(exit);
FrontEnd_2.add(p);
FrontEnd_2.setSize(300,300);
FrontEnd_2.setVisible(true);
break;
}//end constructor
public void actionPerformed(ActionEvent ae){
if(ae.getSource() == exit){
fileExit();
else if (ae.getSource() == clear){
fileClear();
public void itemStateChanged(ItemEvent e) {
int index = nameList.getSelectedIndex();
long id = idList[index];
String data = getData("R" + id);
StringTokenizer st = new StringTokenizer(data, ",");
PipeID.setText(st.nextToken());
problem.setText(st.nextToken());
location.setText(st.nextToken());
repairCost.setText(st.nextToken());
public void windowActivated(WindowEvent we){ }
public void windowClosed(WindowEvent we){ }
public void windowClosing(WindowEvent we){ fileExit();}
public void windowDeactivated(WindowEvent we){ }
public void windowDeiconified(WindowEvent we){ }
public void windowIconified(WindowEvent we){ }
public void windowOpened(WindowEvent we){ }
private void fileExit(){
FrontEnd_2.dispose();
System.exit(0);
private void fileClear(){
//do something here
//start of getData
private String getData(String cmd){
Socket s = null;
BufferedReader reader = null;
BufferedWriter writer = null;
try{
s = new Socket("66.24.174.32",1234);
reader = new BufferedReader(new InputStreamReader(s.getInputStream()));
writer = new BufferedWriter(new OutputStreamWriter(s.getOutputStream()));
writer.write(cmd);
writer.newLine();
writer.flush();
writer.close();
sRetVal = reader.readLine();
}//end try
catch(UnknownHostException ue){
catch(IOException ioe){
finally{
writer = null;
reader = null;
return sRetVal;
}//end getData -
What exactly is balance in Oracle Payroll. Can someone give an example pls
Hi
I am a newbie to Oracle Payroll. Could some one xplain what exactly is balance in Oracle Payroll. Can someone give an example pls. Is there any link which would be useful to clearly explain this.Results of Payroll run get accumulated in the Balances. The accumulation happens according to the dimension like ASGRUN holds the value of current payroll run, ASGYTD holds the cumulative value for the current financial year and gets reset at the beginning of the next financial year, ASGQTD holds the cumulative value for the current quarter and gets reset at the beginning of the next quarter etc.
You can see the values of the balances for different dimension after running the payroll.
View -> Assignment Process Results -> Balances. -
KCLP - can someone give me the big picture?
In a project I have to review I stumbled into some log files displayed with Tx KCLP. It's some "external data transfer" logs.
Unfortunately I miss the big picture and I did not find much on KCLP. Can someone give me a hint what's the big picture, e.g. what kind of applications use the KCLP logs.
Thanks FrankI know KCLP is used by CO-PA to import external data via KEFC.
THe bigger picture is
- provide an import structure
- define some transfer rules
- post the data
Christian -
I am new to webdynpro ABAP can someone give the good material ?
Hi,
i am new to webdynpro ABAP can someone give the good material ?
Please tell me what knowledge do i need to learn webdynpro ABAP?
Regards,
Chow.Hi Chow,
SAP Web Dynpro Overview
http://wendtstud1.hpi.uni-potsdam.de/sysmod-seminar/SS2005/presentations/12-WebDynpro-Overview.ppt
Web Dynpro General Concepts
https://admin.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/webcontent/uuid/30ea953b-8e57-2910-4e85-f7be60b00407 [original link is broken]
Web Dynpro
http://help.sap.com/saphelp_nw2004s/helpdata/en/15/0d4f21c17c8044af4868130e9fea07/frameset.htm
Web Dynpro for ABAP: Tutorials for Beginners
Web Dynpro for ABAP: Tutorials for Beginners [original link is broken]
Web Dynpro Architecture
http://help.sap.com/saphelp_nw04/helpdata/en/a5/1a1e3e7181b60ae10000000a114084/content.htm
Web Dynpro User Interface Design
https://www.sdn.sap.com/irj/sdn/webdynpro?rid=/webcontent/uuid/ce44a14c-0a01-0010-af89-d7dbd944f176 [original link is broken]
Getting Started with Web Dynpro Java
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/webcontent/uuid/28113de9-0601-0010-71a3-c87806865f26?rid=/webcontent/u [original link is broken]
uid/8921447c-0501-0010-07b4-83bd39ffc7be
Developing ABAP applications using Web Dynpro Configuration Scenario
http://www50.sap.com/businessmaps/8729920B31E343F099B71340B15F06DB.htm
http://www.sapforum.co.kr/TECHDAY07/download/9.%20SAP%20WebDynpro_%EA%B9%80%ED%98%9C%EC%84%AD.pdf
How-to add a custom Web Dynpro iView to the MSS Employee Profile (ECC 6.0)
https://www.sdn.sap.com/irj/sdn/wiki?path=/display/profile/how-toaddacustomWebDynproiViewtotheMSSEmployeeProfile(
ECC+6.0)&focusedCommentId=55238
Developing Java Applications using Web Dynpro Configuration Scenario
http://www50.sap.com/businessmaps/8F5B533C4CD24A59B11DE1E9BDD13CF1.htm
Regards,
J.Joe -
Plz can someone show me simple thread code work
Plz can someone show me simple thread code work with main function, without any applet...thread including start(),run(), and stop(), am I right or not ??
thxhttp://java.sun.com/docs/books/tutorial/essential/threads/index.html
Maybe you are looking for
-
New-AzureDeployment - Error while copying content to a stream
Hi All, I am trying to deploy a packages using the Azure Powershell Cmdlets. Each time I try to deploy a particular package, I get the following error message.. New-AzureDeployment : Error while copying content to a stream. At line:1 char:1 + New-Azu
-
TS4006 Find my iPhone app is not coming up in location services
On my new iPod when you go into PRIVACY > LOCATION SERVICES there is a list of apps that can use location services. In the list the app FIND MY IPHONE which I have previously downloaded does not come up in the list. This means that I cannot turn loca
-
How to add Freight Charges for SO Via B1WS
I am using B1Ws for adding a new Sales Order. I want to enter Freight Charges details also. In DIAPI through expense code we can add but in b1ws what is the equivalent of that ? Can anbody guide me ? Thanks Vaithy
-
For the past couple days my phone keeps notifying me that my email address could not log in, yet every time I get an email it shows up perfectly fine. It's happening every few minutes and is getting very annoying. I've reset the phone several times a
-
I've synched all my cams, everything looks great in the viewer window...I see all cameras. The problem is when I am using 'open' playhead sync. When I click on different cams to edit, I am not getting the blue marks in the timeline that I should be g